1/*****************************************************************************
2  Copyright (c) 2010, Intel Corp.
3  All rights reserved.
4
5  Redistribution and use in source and binary forms, with or without
6  modification, are permitted provided that the following conditions are met:
7
8    * Redistributions of source code must retain the above copyright notice,
9      this list of conditions and the following disclaimer.
10    * Redistributions in binary form must reproduce the above copyright
11      notice, this list of conditions and the following disclaimer in the
12      documentation and/or other materials provided with the distribution.
13    * Neither the name of Intel Corporation nor the names of its contributors
14      may be used to endorse or promote products derived from this software
15      without specific prior written permission.
16
17  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
18  AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
21  LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
22  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
23  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
25  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
26  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
27  THE POSSIBILITY OF SUCH DAMAGE.
28******************************************************************************
29* Contents: Native C interface to LAPACK
30* Author: Intel Corporation
31* Generated November, 2011
32*****************************************************************************/
33
34#ifndef _MKL_LAPACKE_H_
35
36#ifndef _LAPACKE_H_
37#define _LAPACKE_H_
38
39/*
40*  Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
41*/
42#ifdef HAVE_LAPACK_CONFIG_H
43#include "lapacke_config.h"
44#endif
45
46#ifdef __cplusplus
47extern "C" {
48#endif /* __cplusplus */
49
50#include <stdlib.h>
51
52#ifndef lapack_int
53#define lapack_int     int
54#endif
55
56#ifndef lapack_logical
57#define lapack_logical lapack_int
58#endif
59
60/* Complex types are structures equivalent to the
61* Fortran complex types COMPLEX(4) and COMPLEX(8).
62*
63* One can also redefine the types with his own types
64* for example by including in the code definitions like
65*
66* #define lapack_complex_float std::complex<float>
67* #define lapack_complex_double std::complex<double>
68*
69* or define these types in the command line:
70*
71* -Dlapack_complex_float="std::complex<float>"
72* -Dlapack_complex_double="std::complex<double>"
73*/
74
75#ifndef LAPACK_COMPLEX_CUSTOM
76
77/* Complex type (single precision) */
78#ifndef lapack_complex_float
79#include <complex.h>
80#define lapack_complex_float    float _Complex
81#endif
82
83#ifndef lapack_complex_float_real
84#define lapack_complex_float_real(z)       (creal(z))
85#endif
86
87#ifndef lapack_complex_float_imag
88#define lapack_complex_float_imag(z)       (cimag(z))
89#endif
90
91lapack_complex_float lapack_make_complex_float( float re, float im );
92
93/* Complex type (double precision) */
94#ifndef lapack_complex_double
95#include <complex.h>
96#define lapack_complex_double   double _Complex
97#endif
98
99#ifndef lapack_complex_double_real
100#define lapack_complex_double_real(z)      (creal(z))
101#endif
102
103#ifndef lapack_complex_double_imag
104#define lapack_complex_double_imag(z)       (cimag(z))
105#endif
106
107lapack_complex_double lapack_make_complex_double( double re, double im );
108
109#endif
110
111#ifndef LAPACKE_malloc
112#define LAPACKE_malloc( size ) malloc( size )
113#endif
114#ifndef LAPACKE_free
115#define LAPACKE_free( p )      free( p )
116#endif
117
118#define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
119#define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
120
121#define LAPACK_ROW_MAJOR               101
122#define LAPACK_COL_MAJOR               102
123
124#define LAPACK_WORK_MEMORY_ERROR       -1010
125#define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
126
127/* Callback logical functions of one, two, or three arguments are used
128*  to select eigenvalues to sort to the top left of the Schur form.
129*  The value is selected if function returns TRUE (non-zero). */
130
131typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
132typedef lapack_logical (*LAPACK_S_SELECT3)
133    ( const float*, const float*, const float* );
134typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
135typedef lapack_logical (*LAPACK_D_SELECT3)
136    ( const double*, const double*, const double* );
137
138typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
139typedef lapack_logical (*LAPACK_C_SELECT2)
140    ( const lapack_complex_float*, const lapack_complex_float* );
141typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
142typedef lapack_logical (*LAPACK_Z_SELECT2)
143    ( const lapack_complex_double*, const lapack_complex_double* );
144
145#include "lapacke_mangling.h"
146
147#define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
148lapack_logical LAPACK_lsame( char* ca,  char* cb,
149                              lapack_int lca, lapack_int lcb );
150
151/* C-LAPACK function prototypes */
152
153lapack_int LAPACKE_sbdsdc( int matrix_order, char uplo, char compq,
154                           lapack_int n, float* d, float* e, float* u,
155                           lapack_int ldu, float* vt, lapack_int ldvt, float* q,
156                           lapack_int* iq );
157lapack_int LAPACKE_dbdsdc( int matrix_order, char uplo, char compq,
158                           lapack_int n, double* d, double* e, double* u,
159                           lapack_int ldu, double* vt, lapack_int ldvt,
160                           double* q, lapack_int* iq );
161
162lapack_int LAPACKE_sbdsqr( int matrix_order, char uplo, lapack_int n,
163                           lapack_int ncvt, lapack_int nru, lapack_int ncc,
164                           float* d, float* e, float* vt, lapack_int ldvt,
165                           float* u, lapack_int ldu, float* c, lapack_int ldc );
166lapack_int LAPACKE_dbdsqr( int matrix_order, char uplo, lapack_int n,
167                           lapack_int ncvt, lapack_int nru, lapack_int ncc,
168                           double* d, double* e, double* vt, lapack_int ldvt,
169                           double* u, lapack_int ldu, double* c,
170                           lapack_int ldc );
171lapack_int LAPACKE_cbdsqr( int matrix_order, char uplo, lapack_int n,
172                           lapack_int ncvt, lapack_int nru, lapack_int ncc,
173                           float* d, float* e, lapack_complex_float* vt,
174                           lapack_int ldvt, lapack_complex_float* u,
175                           lapack_int ldu, lapack_complex_float* c,
176                           lapack_int ldc );
177lapack_int LAPACKE_zbdsqr( int matrix_order, char uplo, lapack_int n,
178                           lapack_int ncvt, lapack_int nru, lapack_int ncc,
179                           double* d, double* e, lapack_complex_double* vt,
180                           lapack_int ldvt, lapack_complex_double* u,
181                           lapack_int ldu, lapack_complex_double* c,
182                           lapack_int ldc );
183
184lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
185                           float* sep );
186lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
187                           const double* d, double* sep );
188
189lapack_int LAPACKE_sgbbrd( int matrix_order, char vect, lapack_int m,
190                           lapack_int n, lapack_int ncc, lapack_int kl,
191                           lapack_int ku, float* ab, lapack_int ldab, float* d,
192                           float* e, float* q, lapack_int ldq, float* pt,
193                           lapack_int ldpt, float* c, lapack_int ldc );
194lapack_int LAPACKE_dgbbrd( int matrix_order, char vect, lapack_int m,
195                           lapack_int n, lapack_int ncc, lapack_int kl,
196                           lapack_int ku, double* ab, lapack_int ldab,
197                           double* d, double* e, double* q, lapack_int ldq,
198                           double* pt, lapack_int ldpt, double* c,
199                           lapack_int ldc );
200lapack_int LAPACKE_cgbbrd( int matrix_order, char vect, lapack_int m,
201                           lapack_int n, lapack_int ncc, lapack_int kl,
202                           lapack_int ku, lapack_complex_float* ab,
203                           lapack_int ldab, float* d, float* e,
204                           lapack_complex_float* q, lapack_int ldq,
205                           lapack_complex_float* pt, lapack_int ldpt,
206                           lapack_complex_float* c, lapack_int ldc );
207lapack_int LAPACKE_zgbbrd( int matrix_order, char vect, lapack_int m,
208                           lapack_int n, lapack_int ncc, lapack_int kl,
209                           lapack_int ku, lapack_complex_double* ab,
210                           lapack_int ldab, double* d, double* e,
211                           lapack_complex_double* q, lapack_int ldq,
212                           lapack_complex_double* pt, lapack_int ldpt,
213                           lapack_complex_double* c, lapack_int ldc );
214
215lapack_int LAPACKE_sgbcon( int matrix_order, char norm, lapack_int n,
216                           lapack_int kl, lapack_int ku, const float* ab,
217                           lapack_int ldab, const lapack_int* ipiv, float anorm,
218                           float* rcond );
219lapack_int LAPACKE_dgbcon( int matrix_order, char norm, lapack_int n,
220                           lapack_int kl, lapack_int ku, const double* ab,
221                           lapack_int ldab, const lapack_int* ipiv,
222                           double anorm, double* rcond );
223lapack_int LAPACKE_cgbcon( int matrix_order, char norm, lapack_int n,
224                           lapack_int kl, lapack_int ku,
225                           const lapack_complex_float* ab, lapack_int ldab,
226                           const lapack_int* ipiv, float anorm, float* rcond );
227lapack_int LAPACKE_zgbcon( int matrix_order, char norm, lapack_int n,
228                           lapack_int kl, lapack_int ku,
229                           const lapack_complex_double* ab, lapack_int ldab,
230                           const lapack_int* ipiv, double anorm,
231                           double* rcond );
232
233lapack_int LAPACKE_sgbequ( int matrix_order, lapack_int m, lapack_int n,
234                           lapack_int kl, lapack_int ku, const float* ab,
235                           lapack_int ldab, float* r, float* c, float* rowcnd,
236                           float* colcnd, float* amax );
237lapack_int LAPACKE_dgbequ( int matrix_order, lapack_int m, lapack_int n,
238                           lapack_int kl, lapack_int ku, const double* ab,
239                           lapack_int ldab, double* r, double* c,
240                           double* rowcnd, double* colcnd, double* amax );
241lapack_int LAPACKE_cgbequ( int matrix_order, lapack_int m, lapack_int n,
242                           lapack_int kl, lapack_int ku,
243                           const lapack_complex_float* ab, lapack_int ldab,
244                           float* r, float* c, float* rowcnd, float* colcnd,
245                           float* amax );
246lapack_int LAPACKE_zgbequ( int matrix_order, lapack_int m, lapack_int n,
247                           lapack_int kl, lapack_int ku,
248                           const lapack_complex_double* ab, lapack_int ldab,
249                           double* r, double* c, double* rowcnd, double* colcnd,
250                           double* amax );
251
252lapack_int LAPACKE_sgbequb( int matrix_order, lapack_int m, lapack_int n,
253                            lapack_int kl, lapack_int ku, const float* ab,
254                            lapack_int ldab, float* r, float* c, float* rowcnd,
255                            float* colcnd, float* amax );
256lapack_int LAPACKE_dgbequb( int matrix_order, lapack_int m, lapack_int n,
257                            lapack_int kl, lapack_int ku, const double* ab,
258                            lapack_int ldab, double* r, double* c,
259                            double* rowcnd, double* colcnd, double* amax );
260lapack_int LAPACKE_cgbequb( int matrix_order, lapack_int m, lapack_int n,
261                            lapack_int kl, lapack_int ku,
262                            const lapack_complex_float* ab, lapack_int ldab,
263                            float* r, float* c, float* rowcnd, float* colcnd,
264                            float* amax );
265lapack_int LAPACKE_zgbequb( int matrix_order, lapack_int m, lapack_int n,
266                            lapack_int kl, lapack_int ku,
267                            const lapack_complex_double* ab, lapack_int ldab,
268                            double* r, double* c, double* rowcnd,
269                            double* colcnd, double* amax );
270
271lapack_int LAPACKE_sgbrfs( int matrix_order, char trans, lapack_int n,
272                           lapack_int kl, lapack_int ku, lapack_int nrhs,
273                           const float* ab, lapack_int ldab, const float* afb,
274                           lapack_int ldafb, const lapack_int* ipiv,
275                           const float* b, lapack_int ldb, float* x,
276                           lapack_int ldx, float* ferr, float* berr );
277lapack_int LAPACKE_dgbrfs( int matrix_order, char trans, lapack_int n,
278                           lapack_int kl, lapack_int ku, lapack_int nrhs,
279                           const double* ab, lapack_int ldab, const double* afb,
280                           lapack_int ldafb, const lapack_int* ipiv,
281                           const double* b, lapack_int ldb, double* x,
282                           lapack_int ldx, double* ferr, double* berr );
283lapack_int LAPACKE_cgbrfs( int matrix_order, char trans, lapack_int n,
284                           lapack_int kl, lapack_int ku, lapack_int nrhs,
285                           const lapack_complex_float* ab, lapack_int ldab,
286                           const lapack_complex_float* afb, lapack_int ldafb,
287                           const lapack_int* ipiv,
288                           const lapack_complex_float* b, lapack_int ldb,
289                           lapack_complex_float* x, lapack_int ldx, float* ferr,
290                           float* berr );
291lapack_int LAPACKE_zgbrfs( int matrix_order, char trans, lapack_int n,
292                           lapack_int kl, lapack_int ku, lapack_int nrhs,
293                           const lapack_complex_double* ab, lapack_int ldab,
294                           const lapack_complex_double* afb, lapack_int ldafb,
295                           const lapack_int* ipiv,
296                           const lapack_complex_double* b, lapack_int ldb,
297                           lapack_complex_double* x, lapack_int ldx,
298                           double* ferr, double* berr );
299
300lapack_int LAPACKE_sgbrfsx( int matrix_order, char trans, char equed,
301                            lapack_int n, lapack_int kl, lapack_int ku,
302                            lapack_int nrhs, const float* ab, lapack_int ldab,
303                            const float* afb, lapack_int ldafb,
304                            const lapack_int* ipiv, const float* r,
305                            const float* c, const float* b, lapack_int ldb,
306                            float* x, lapack_int ldx, float* rcond, float* berr,
307                            lapack_int n_err_bnds, float* err_bnds_norm,
308                            float* err_bnds_comp, lapack_int nparams,
309                            float* params );
310lapack_int LAPACKE_dgbrfsx( int matrix_order, char trans, char equed,
311                            lapack_int n, lapack_int kl, lapack_int ku,
312                            lapack_int nrhs, const double* ab, lapack_int ldab,
313                            const double* afb, lapack_int ldafb,
314                            const lapack_int* ipiv, const double* r,
315                            const double* c, const double* b, lapack_int ldb,
316                            double* x, lapack_int ldx, double* rcond,
317                            double* berr, lapack_int n_err_bnds,
318                            double* err_bnds_norm, double* err_bnds_comp,
319                            lapack_int nparams, double* params );
320lapack_int LAPACKE_cgbrfsx( int matrix_order, char trans, char equed,
321                            lapack_int n, lapack_int kl, lapack_int ku,
322                            lapack_int nrhs, const lapack_complex_float* ab,
323                            lapack_int ldab, const lapack_complex_float* afb,
324                            lapack_int ldafb, const lapack_int* ipiv,
325                            const float* r, const float* c,
326                            const lapack_complex_float* b, lapack_int ldb,
327                            lapack_complex_float* x, lapack_int ldx,
328                            float* rcond, float* berr, lapack_int n_err_bnds,
329                            float* err_bnds_norm, float* err_bnds_comp,
330                            lapack_int nparams, float* params );
331lapack_int LAPACKE_zgbrfsx( int matrix_order, char trans, char equed,
332                            lapack_int n, lapack_int kl, lapack_int ku,
333                            lapack_int nrhs, const lapack_complex_double* ab,
334                            lapack_int ldab, const lapack_complex_double* afb,
335                            lapack_int ldafb, const lapack_int* ipiv,
336                            const double* r, const double* c,
337                            const lapack_complex_double* b, lapack_int ldb,
338                            lapack_complex_double* x, lapack_int ldx,
339                            double* rcond, double* berr, lapack_int n_err_bnds,
340                            double* err_bnds_norm, double* err_bnds_comp,
341                            lapack_int nparams, double* params );
342
343lapack_int LAPACKE_sgbsv( int matrix_order, lapack_int n, lapack_int kl,
344                          lapack_int ku, lapack_int nrhs, float* ab,
345                          lapack_int ldab, lapack_int* ipiv, float* b,
346                          lapack_int ldb );
347lapack_int LAPACKE_dgbsv( int matrix_order, lapack_int n, lapack_int kl,
348                          lapack_int ku, lapack_int nrhs, double* ab,
349                          lapack_int ldab, lapack_int* ipiv, double* b,
350                          lapack_int ldb );
351lapack_int LAPACKE_cgbsv( int matrix_order, lapack_int n, lapack_int kl,
352                          lapack_int ku, lapack_int nrhs,
353                          lapack_complex_float* ab, lapack_int ldab,
354                          lapack_int* ipiv, lapack_complex_float* b,
355                          lapack_int ldb );
356lapack_int LAPACKE_zgbsv( int matrix_order, lapack_int n, lapack_int kl,
357                          lapack_int ku, lapack_int nrhs,
358                          lapack_complex_double* ab, lapack_int ldab,
359                          lapack_int* ipiv, lapack_complex_double* b,
360                          lapack_int ldb );
361
362lapack_int LAPACKE_sgbsvx( int matrix_order, char fact, char trans,
363                           lapack_int n, lapack_int kl, lapack_int ku,
364                           lapack_int nrhs, float* ab, lapack_int ldab,
365                           float* afb, lapack_int ldafb, lapack_int* ipiv,
366                           char* equed, float* r, float* c, float* b,
367                           lapack_int ldb, float* x, lapack_int ldx,
368                           float* rcond, float* ferr, float* berr,
369                           float* rpivot );
370lapack_int LAPACKE_dgbsvx( int matrix_order, char fact, char trans,
371                           lapack_int n, lapack_int kl, lapack_int ku,
372                           lapack_int nrhs, double* ab, lapack_int ldab,
373                           double* afb, lapack_int ldafb, lapack_int* ipiv,
374                           char* equed, double* r, double* c, double* b,
375                           lapack_int ldb, double* x, lapack_int ldx,
376                           double* rcond, double* ferr, double* berr,
377                           double* rpivot );
378lapack_int LAPACKE_cgbsvx( int matrix_order, char fact, char trans,
379                           lapack_int n, lapack_int kl, lapack_int ku,
380                           lapack_int nrhs, lapack_complex_float* ab,
381                           lapack_int ldab, lapack_complex_float* afb,
382                           lapack_int ldafb, lapack_int* ipiv, char* equed,
383                           float* r, float* c, lapack_complex_float* b,
384                           lapack_int ldb, lapack_complex_float* x,
385                           lapack_int ldx, float* rcond, float* ferr,
386                           float* berr, float* rpivot );
387lapack_int LAPACKE_zgbsvx( int matrix_order, char fact, char trans,
388                           lapack_int n, lapack_int kl, lapack_int ku,
389                           lapack_int nrhs, lapack_complex_double* ab,
390                           lapack_int ldab, lapack_complex_double* afb,
391                           lapack_int ldafb, lapack_int* ipiv, char* equed,
392                           double* r, double* c, lapack_complex_double* b,
393                           lapack_int ldb, lapack_complex_double* x,
394                           lapack_int ldx, double* rcond, double* ferr,
395                           double* berr, double* rpivot );
396
397lapack_int LAPACKE_sgbsvxx( int matrix_order, char fact, char trans,
398                            lapack_int n, lapack_int kl, lapack_int ku,
399                            lapack_int nrhs, float* ab, lapack_int ldab,
400                            float* afb, lapack_int ldafb, lapack_int* ipiv,
401                            char* equed, float* r, float* c, float* b,
402                            lapack_int ldb, float* x, lapack_int ldx,
403                            float* rcond, float* rpvgrw, float* berr,
404                            lapack_int n_err_bnds, float* err_bnds_norm,
405                            float* err_bnds_comp, lapack_int nparams,
406                            float* params );
407lapack_int LAPACKE_dgbsvxx( int matrix_order, char fact, char trans,
408                            lapack_int n, lapack_int kl, lapack_int ku,
409                            lapack_int nrhs, double* ab, lapack_int ldab,
410                            double* afb, lapack_int ldafb, lapack_int* ipiv,
411                            char* equed, double* r, double* c, double* b,
412                            lapack_int ldb, double* x, lapack_int ldx,
413                            double* rcond, double* rpvgrw, double* berr,
414                            lapack_int n_err_bnds, double* err_bnds_norm,
415                            double* err_bnds_comp, lapack_int nparams,
416                            double* params );
417lapack_int LAPACKE_cgbsvxx( int matrix_order, char fact, char trans,
418                            lapack_int n, lapack_int kl, lapack_int ku,
419                            lapack_int nrhs, lapack_complex_float* ab,
420                            lapack_int ldab, lapack_complex_float* afb,
421                            lapack_int ldafb, lapack_int* ipiv, char* equed,
422                            float* r, float* c, lapack_complex_float* b,
423                            lapack_int ldb, lapack_complex_float* x,
424                            lapack_int ldx, float* rcond, float* rpvgrw,
425                            float* berr, lapack_int n_err_bnds,
426                            float* err_bnds_norm, float* err_bnds_comp,
427                            lapack_int nparams, float* params );
428lapack_int LAPACKE_zgbsvxx( int matrix_order, char fact, char trans,
429                            lapack_int n, lapack_int kl, lapack_int ku,
430                            lapack_int nrhs, lapack_complex_double* ab,
431                            lapack_int ldab, lapack_complex_double* afb,
432                            lapack_int ldafb, lapack_int* ipiv, char* equed,
433                            double* r, double* c, lapack_complex_double* b,
434                            lapack_int ldb, lapack_complex_double* x,
435                            lapack_int ldx, double* rcond, double* rpvgrw,
436                            double* berr, lapack_int n_err_bnds,
437                            double* err_bnds_norm, double* err_bnds_comp,
438                            lapack_int nparams, double* params );
439
440lapack_int LAPACKE_sgbtrf( int matrix_order, lapack_int m, lapack_int n,
441                           lapack_int kl, lapack_int ku, float* ab,
442                           lapack_int ldab, lapack_int* ipiv );
443lapack_int LAPACKE_dgbtrf( int matrix_order, lapack_int m, lapack_int n,
444                           lapack_int kl, lapack_int ku, double* ab,
445                           lapack_int ldab, lapack_int* ipiv );
446lapack_int LAPACKE_cgbtrf( int matrix_order, lapack_int m, lapack_int n,
447                           lapack_int kl, lapack_int ku,
448                           lapack_complex_float* ab, lapack_int ldab,
449                           lapack_int* ipiv );
450lapack_int LAPACKE_zgbtrf( int matrix_order, lapack_int m, lapack_int n,
451                           lapack_int kl, lapack_int ku,
452                           lapack_complex_double* ab, lapack_int ldab,
453                           lapack_int* ipiv );
454
455lapack_int LAPACKE_sgbtrs( int matrix_order, char trans, lapack_int n,
456                           lapack_int kl, lapack_int ku, lapack_int nrhs,
457                           const float* ab, lapack_int ldab,
458                           const lapack_int* ipiv, float* b, lapack_int ldb );
459lapack_int LAPACKE_dgbtrs( int matrix_order, char trans, lapack_int n,
460                           lapack_int kl, lapack_int ku, lapack_int nrhs,
461                           const double* ab, lapack_int ldab,
462                           const lapack_int* ipiv, double* b, lapack_int ldb );
463lapack_int LAPACKE_cgbtrs( int matrix_order, char trans, lapack_int n,
464                           lapack_int kl, lapack_int ku, lapack_int nrhs,
465                           const lapack_complex_float* ab, lapack_int ldab,
466                           const lapack_int* ipiv, lapack_complex_float* b,
467                           lapack_int ldb );
468lapack_int LAPACKE_zgbtrs( int matrix_order, char trans, lapack_int n,
469                           lapack_int kl, lapack_int ku, lapack_int nrhs,
470                           const lapack_complex_double* ab, lapack_int ldab,
471                           const lapack_int* ipiv, lapack_complex_double* b,
472                           lapack_int ldb );
473
474lapack_int LAPACKE_sgebak( int matrix_order, char job, char side, lapack_int n,
475                           lapack_int ilo, lapack_int ihi, const float* scale,
476                           lapack_int m, float* v, lapack_int ldv );
477lapack_int LAPACKE_dgebak( int matrix_order, char job, char side, lapack_int n,
478                           lapack_int ilo, lapack_int ihi, const double* scale,
479                           lapack_int m, double* v, lapack_int ldv );
480lapack_int LAPACKE_cgebak( int matrix_order, char job, char side, lapack_int n,
481                           lapack_int ilo, lapack_int ihi, const float* scale,
482                           lapack_int m, lapack_complex_float* v,
483                           lapack_int ldv );
484lapack_int LAPACKE_zgebak( int matrix_order, char job, char side, lapack_int n,
485                           lapack_int ilo, lapack_int ihi, const double* scale,
486                           lapack_int m, lapack_complex_double* v,
487                           lapack_int ldv );
488
489lapack_int LAPACKE_sgebal( int matrix_order, char job, lapack_int n, float* a,
490                           lapack_int lda, lapack_int* ilo, lapack_int* ihi,
491                           float* scale );
492lapack_int LAPACKE_dgebal( int matrix_order, char job, lapack_int n, double* a,
493                           lapack_int lda, lapack_int* ilo, lapack_int* ihi,
494                           double* scale );
495lapack_int LAPACKE_cgebal( int matrix_order, char job, lapack_int n,
496                           lapack_complex_float* a, lapack_int lda,
497                           lapack_int* ilo, lapack_int* ihi, float* scale );
498lapack_int LAPACKE_zgebal( int matrix_order, char job, lapack_int n,
499                           lapack_complex_double* a, lapack_int lda,
500                           lapack_int* ilo, lapack_int* ihi, double* scale );
501
502lapack_int LAPACKE_sgebrd( int matrix_order, lapack_int m, lapack_int n,
503                           float* a, lapack_int lda, float* d, float* e,
504                           float* tauq, float* taup );
505lapack_int LAPACKE_dgebrd( int matrix_order, lapack_int m, lapack_int n,
506                           double* a, lapack_int lda, double* d, double* e,
507                           double* tauq, double* taup );
508lapack_int LAPACKE_cgebrd( int matrix_order, lapack_int m, lapack_int n,
509                           lapack_complex_float* a, lapack_int lda, float* d,
510                           float* e, lapack_complex_float* tauq,
511                           lapack_complex_float* taup );
512lapack_int LAPACKE_zgebrd( int matrix_order, lapack_int m, lapack_int n,
513                           lapack_complex_double* a, lapack_int lda, double* d,
514                           double* e, lapack_complex_double* tauq,
515                           lapack_complex_double* taup );
516
517lapack_int LAPACKE_sgecon( int matrix_order, char norm, lapack_int n,
518                           const float* a, lapack_int lda, float anorm,
519                           float* rcond );
520lapack_int LAPACKE_dgecon( int matrix_order, char norm, lapack_int n,
521                           const double* a, lapack_int lda, double anorm,
522                           double* rcond );
523lapack_int LAPACKE_cgecon( int matrix_order, char norm, lapack_int n,
524                           const lapack_complex_float* a, lapack_int lda,
525                           float anorm, float* rcond );
526lapack_int LAPACKE_zgecon( int matrix_order, char norm, lapack_int n,
527                           const lapack_complex_double* a, lapack_int lda,
528                           double anorm, double* rcond );
529
530lapack_int LAPACKE_sgeequ( int matrix_order, lapack_int m, lapack_int n,
531                           const float* a, lapack_int lda, float* r, float* c,
532                           float* rowcnd, float* colcnd, float* amax );
533lapack_int LAPACKE_dgeequ( int matrix_order, lapack_int m, lapack_int n,
534                           const double* a, lapack_int lda, double* r,
535                           double* c, double* rowcnd, double* colcnd,
536                           double* amax );
537lapack_int LAPACKE_cgeequ( int matrix_order, lapack_int m, lapack_int n,
538                           const lapack_complex_float* a, lapack_int lda,
539                           float* r, float* c, float* rowcnd, float* colcnd,
540                           float* amax );
541lapack_int LAPACKE_zgeequ( int matrix_order, lapack_int m, lapack_int n,
542                           const lapack_complex_double* a, lapack_int lda,
543                           double* r, double* c, double* rowcnd, double* colcnd,
544                           double* amax );
545
546lapack_int LAPACKE_sgeequb( int matrix_order, lapack_int m, lapack_int n,
547                            const float* a, lapack_int lda, float* r, float* c,
548                            float* rowcnd, float* colcnd, float* amax );
549lapack_int LAPACKE_dgeequb( int matrix_order, lapack_int m, lapack_int n,
550                            const double* a, lapack_int lda, double* r,
551                            double* c, double* rowcnd, double* colcnd,
552                            double* amax );
553lapack_int LAPACKE_cgeequb( int matrix_order, lapack_int m, lapack_int n,
554                            const lapack_complex_float* a, lapack_int lda,
555                            float* r, float* c, float* rowcnd, float* colcnd,
556                            float* amax );
557lapack_int LAPACKE_zgeequb( int matrix_order, lapack_int m, lapack_int n,
558                            const lapack_complex_double* a, lapack_int lda,
559                            double* r, double* c, double* rowcnd,
560                            double* colcnd, double* amax );
561
562lapack_int LAPACKE_sgees( int matrix_order, char jobvs, char sort,
563                          LAPACK_S_SELECT2 select, lapack_int n, float* a,
564                          lapack_int lda, lapack_int* sdim, float* wr,
565                          float* wi, float* vs, lapack_int ldvs );
566lapack_int LAPACKE_dgees( int matrix_order, char jobvs, char sort,
567                          LAPACK_D_SELECT2 select, lapack_int n, double* a,
568                          lapack_int lda, lapack_int* sdim, double* wr,
569                          double* wi, double* vs, lapack_int ldvs );
570lapack_int LAPACKE_cgees( int matrix_order, char jobvs, char sort,
571                          LAPACK_C_SELECT1 select, lapack_int n,
572                          lapack_complex_float* a, lapack_int lda,
573                          lapack_int* sdim, lapack_complex_float* w,
574                          lapack_complex_float* vs, lapack_int ldvs );
575lapack_int LAPACKE_zgees( int matrix_order, char jobvs, char sort,
576                          LAPACK_Z_SELECT1 select, lapack_int n,
577                          lapack_complex_double* a, lapack_int lda,
578                          lapack_int* sdim, lapack_complex_double* w,
579                          lapack_complex_double* vs, lapack_int ldvs );
580
581lapack_int LAPACKE_sgeesx( int matrix_order, char jobvs, char sort,
582                           LAPACK_S_SELECT2 select, char sense, lapack_int n,
583                           float* a, lapack_int lda, lapack_int* sdim,
584                           float* wr, float* wi, float* vs, lapack_int ldvs,
585                           float* rconde, float* rcondv );
586lapack_int LAPACKE_dgeesx( int matrix_order, char jobvs, char sort,
587                           LAPACK_D_SELECT2 select, char sense, lapack_int n,
588                           double* a, lapack_int lda, lapack_int* sdim,
589                           double* wr, double* wi, double* vs, lapack_int ldvs,
590                           double* rconde, double* rcondv );
591lapack_int LAPACKE_cgeesx( int matrix_order, char jobvs, char sort,
592                           LAPACK_C_SELECT1 select, char sense, lapack_int n,
593                           lapack_complex_float* a, lapack_int lda,
594                           lapack_int* sdim, lapack_complex_float* w,
595                           lapack_complex_float* vs, lapack_int ldvs,
596                           float* rconde, float* rcondv );
597lapack_int LAPACKE_zgeesx( int matrix_order, char jobvs, char sort,
598                           LAPACK_Z_SELECT1 select, char sense, lapack_int n,
599                           lapack_complex_double* a, lapack_int lda,
600                           lapack_int* sdim, lapack_complex_double* w,
601                           lapack_complex_double* vs, lapack_int ldvs,
602                           double* rconde, double* rcondv );
603
604lapack_int LAPACKE_sgeev( int matrix_order, char jobvl, char jobvr,
605                          lapack_int n, float* a, lapack_int lda, float* wr,
606                          float* wi, float* vl, lapack_int ldvl, float* vr,
607                          lapack_int ldvr );
608lapack_int LAPACKE_dgeev( int matrix_order, char jobvl, char jobvr,
609                          lapack_int n, double* a, lapack_int lda, double* wr,
610                          double* wi, double* vl, lapack_int ldvl, double* vr,
611                          lapack_int ldvr );
612lapack_int LAPACKE_cgeev( int matrix_order, char jobvl, char jobvr,
613                          lapack_int n, lapack_complex_float* a, lapack_int lda,
614                          lapack_complex_float* w, lapack_complex_float* vl,
615                          lapack_int ldvl, lapack_complex_float* vr,
616                          lapack_int ldvr );
617lapack_int LAPACKE_zgeev( int matrix_order, char jobvl, char jobvr,
618                          lapack_int n, lapack_complex_double* a,
619                          lapack_int lda, lapack_complex_double* w,
620                          lapack_complex_double* vl, lapack_int ldvl,
621                          lapack_complex_double* vr, lapack_int ldvr );
622
623lapack_int LAPACKE_sgeevx( int matrix_order, char balanc, char jobvl,
624                           char jobvr, char sense, lapack_int n, float* a,
625                           lapack_int lda, float* wr, float* wi, float* vl,
626                           lapack_int ldvl, float* vr, lapack_int ldvr,
627                           lapack_int* ilo, lapack_int* ihi, float* scale,
628                           float* abnrm, float* rconde, float* rcondv );
629lapack_int LAPACKE_dgeevx( int matrix_order, char balanc, char jobvl,
630                           char jobvr, char sense, lapack_int n, double* a,
631                           lapack_int lda, double* wr, double* wi, double* vl,
632                           lapack_int ldvl, double* vr, lapack_int ldvr,
633                           lapack_int* ilo, lapack_int* ihi, double* scale,
634                           double* abnrm, double* rconde, double* rcondv );
635lapack_int LAPACKE_cgeevx( int matrix_order, char balanc, char jobvl,
636                           char jobvr, char sense, lapack_int n,
637                           lapack_complex_float* a, lapack_int lda,
638                           lapack_complex_float* w, lapack_complex_float* vl,
639                           lapack_int ldvl, lapack_complex_float* vr,
640                           lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
641                           float* scale, float* abnrm, float* rconde,
642                           float* rcondv );
643lapack_int LAPACKE_zgeevx( int matrix_order, char balanc, char jobvl,
644                           char jobvr, char sense, lapack_int n,
645                           lapack_complex_double* a, lapack_int lda,
646                           lapack_complex_double* w, lapack_complex_double* vl,
647                           lapack_int ldvl, lapack_complex_double* vr,
648                           lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
649                           double* scale, double* abnrm, double* rconde,
650                           double* rcondv );
651
652lapack_int LAPACKE_sgehrd( int matrix_order, lapack_int n, lapack_int ilo,
653                           lapack_int ihi, float* a, lapack_int lda,
654                           float* tau );
655lapack_int LAPACKE_dgehrd( int matrix_order, lapack_int n, lapack_int ilo,
656                           lapack_int ihi, double* a, lapack_int lda,
657                           double* tau );
658lapack_int LAPACKE_cgehrd( int matrix_order, lapack_int n, lapack_int ilo,
659                           lapack_int ihi, lapack_complex_float* a,
660                           lapack_int lda, lapack_complex_float* tau );
661lapack_int LAPACKE_zgehrd( int matrix_order, lapack_int n, lapack_int ilo,
662                           lapack_int ihi, lapack_complex_double* a,
663                           lapack_int lda, lapack_complex_double* tau );
664
665lapack_int LAPACKE_sgejsv( int matrix_order, char joba, char jobu, char jobv,
666                           char jobr, char jobt, char jobp, lapack_int m,
667                           lapack_int n, float* a, lapack_int lda, float* sva,
668                           float* u, lapack_int ldu, float* v, lapack_int ldv,
669                           float* stat, lapack_int* istat );
670lapack_int LAPACKE_dgejsv( int matrix_order, char joba, char jobu, char jobv,
671                           char jobr, char jobt, char jobp, lapack_int m,
672                           lapack_int n, double* a, lapack_int lda, double* sva,
673                           double* u, lapack_int ldu, double* v, lapack_int ldv,
674                           double* stat, lapack_int* istat );
675
676lapack_int LAPACKE_sgelq2( int matrix_order, lapack_int m, lapack_int n,
677                           float* a, lapack_int lda, float* tau );
678lapack_int LAPACKE_dgelq2( int matrix_order, lapack_int m, lapack_int n,
679                           double* a, lapack_int lda, double* tau );
680lapack_int LAPACKE_cgelq2( int matrix_order, lapack_int m, lapack_int n,
681                           lapack_complex_float* a, lapack_int lda,
682                           lapack_complex_float* tau );
683lapack_int LAPACKE_zgelq2( int matrix_order, lapack_int m, lapack_int n,
684                           lapack_complex_double* a, lapack_int lda,
685                           lapack_complex_double* tau );
686
687lapack_int LAPACKE_sgelqf( int matrix_order, lapack_int m, lapack_int n,
688                           float* a, lapack_int lda, float* tau );
689lapack_int LAPACKE_dgelqf( int matrix_order, lapack_int m, lapack_int n,
690                           double* a, lapack_int lda, double* tau );
691lapack_int LAPACKE_cgelqf( int matrix_order, lapack_int m, lapack_int n,
692                           lapack_complex_float* a, lapack_int lda,
693                           lapack_complex_float* tau );
694lapack_int LAPACKE_zgelqf( int matrix_order, lapack_int m, lapack_int n,
695                           lapack_complex_double* a, lapack_int lda,
696                           lapack_complex_double* tau );
697
698lapack_int LAPACKE_sgels( int matrix_order, char trans, lapack_int m,
699                          lapack_int n, lapack_int nrhs, float* a,
700                          lapack_int lda, float* b, lapack_int ldb );
701lapack_int LAPACKE_dgels( int matrix_order, char trans, lapack_int m,
702                          lapack_int n, lapack_int nrhs, double* a,
703                          lapack_int lda, double* b, lapack_int ldb );
704lapack_int LAPACKE_cgels( int matrix_order, char trans, lapack_int m,
705                          lapack_int n, lapack_int nrhs,
706                          lapack_complex_float* a, lapack_int lda,
707                          lapack_complex_float* b, lapack_int ldb );
708lapack_int LAPACKE_zgels( int matrix_order, char trans, lapack_int m,
709                          lapack_int n, lapack_int nrhs,
710                          lapack_complex_double* a, lapack_int lda,
711                          lapack_complex_double* b, lapack_int ldb );
712
713lapack_int LAPACKE_sgelsd( int matrix_order, lapack_int m, lapack_int n,
714                           lapack_int nrhs, float* a, lapack_int lda, float* b,
715                           lapack_int ldb, float* s, float rcond,
716                           lapack_int* rank );
717lapack_int LAPACKE_dgelsd( int matrix_order, lapack_int m, lapack_int n,
718                           lapack_int nrhs, double* a, lapack_int lda,
719                           double* b, lapack_int ldb, double* s, double rcond,
720                           lapack_int* rank );
721lapack_int LAPACKE_cgelsd( int matrix_order, lapack_int m, lapack_int n,
722                           lapack_int nrhs, lapack_complex_float* a,
723                           lapack_int lda, lapack_complex_float* b,
724                           lapack_int ldb, float* s, float rcond,
725                           lapack_int* rank );
726lapack_int LAPACKE_zgelsd( int matrix_order, lapack_int m, lapack_int n,
727                           lapack_int nrhs, lapack_complex_double* a,
728                           lapack_int lda, lapack_complex_double* b,
729                           lapack_int ldb, double* s, double rcond,
730                           lapack_int* rank );
731
732lapack_int LAPACKE_sgelss( int matrix_order, lapack_int m, lapack_int n,
733                           lapack_int nrhs, float* a, lapack_int lda, float* b,
734                           lapack_int ldb, float* s, float rcond,
735                           lapack_int* rank );
736lapack_int LAPACKE_dgelss( int matrix_order, lapack_int m, lapack_int n,
737                           lapack_int nrhs, double* a, lapack_int lda,
738                           double* b, lapack_int ldb, double* s, double rcond,
739                           lapack_int* rank );
740lapack_int LAPACKE_cgelss( int matrix_order, lapack_int m, lapack_int n,
741                           lapack_int nrhs, lapack_complex_float* a,
742                           lapack_int lda, lapack_complex_float* b,
743                           lapack_int ldb, float* s, float rcond,
744                           lapack_int* rank );
745lapack_int LAPACKE_zgelss( int matrix_order, lapack_int m, lapack_int n,
746                           lapack_int nrhs, lapack_complex_double* a,
747                           lapack_int lda, lapack_complex_double* b,
748                           lapack_int ldb, double* s, double rcond,
749                           lapack_int* rank );
750
751lapack_int LAPACKE_sgelsy( int matrix_order, lapack_int m, lapack_int n,
752                           lapack_int nrhs, float* a, lapack_int lda, float* b,
753                           lapack_int ldb, lapack_int* jpvt, float rcond,
754                           lapack_int* rank );
755lapack_int LAPACKE_dgelsy( int matrix_order, lapack_int m, lapack_int n,
756                           lapack_int nrhs, double* a, lapack_int lda,
757                           double* b, lapack_int ldb, lapack_int* jpvt,
758                           double rcond, lapack_int* rank );
759lapack_int LAPACKE_cgelsy( int matrix_order, lapack_int m, lapack_int n,
760                           lapack_int nrhs, lapack_complex_float* a,
761                           lapack_int lda, lapack_complex_float* b,
762                           lapack_int ldb, lapack_int* jpvt, float rcond,
763                           lapack_int* rank );
764lapack_int LAPACKE_zgelsy( int matrix_order, lapack_int m, lapack_int n,
765                           lapack_int nrhs, lapack_complex_double* a,
766                           lapack_int lda, lapack_complex_double* b,
767                           lapack_int ldb, lapack_int* jpvt, double rcond,
768                           lapack_int* rank );
769
770lapack_int LAPACKE_sgeqlf( int matrix_order, lapack_int m, lapack_int n,
771                           float* a, lapack_int lda, float* tau );
772lapack_int LAPACKE_dgeqlf( int matrix_order, lapack_int m, lapack_int n,
773                           double* a, lapack_int lda, double* tau );
774lapack_int LAPACKE_cgeqlf( int matrix_order, lapack_int m, lapack_int n,
775                           lapack_complex_float* a, lapack_int lda,
776                           lapack_complex_float* tau );
777lapack_int LAPACKE_zgeqlf( int matrix_order, lapack_int m, lapack_int n,
778                           lapack_complex_double* a, lapack_int lda,
779                           lapack_complex_double* tau );
780
781lapack_int LAPACKE_sgeqp3( int matrix_order, lapack_int m, lapack_int n,
782                           float* a, lapack_int lda, lapack_int* jpvt,
783                           float* tau );
784lapack_int LAPACKE_dgeqp3( int matrix_order, lapack_int m, lapack_int n,
785                           double* a, lapack_int lda, lapack_int* jpvt,
786                           double* tau );
787lapack_int LAPACKE_cgeqp3( int matrix_order, lapack_int m, lapack_int n,
788                           lapack_complex_float* a, lapack_int lda,
789                           lapack_int* jpvt, lapack_complex_float* tau );
790lapack_int LAPACKE_zgeqp3( int matrix_order, lapack_int m, lapack_int n,
791                           lapack_complex_double* a, lapack_int lda,
792                           lapack_int* jpvt, lapack_complex_double* tau );
793
794lapack_int LAPACKE_sgeqpf( int matrix_order, lapack_int m, lapack_int n,
795                           float* a, lapack_int lda, lapack_int* jpvt,
796                           float* tau );
797lapack_int LAPACKE_dgeqpf( int matrix_order, lapack_int m, lapack_int n,
798                           double* a, lapack_int lda, lapack_int* jpvt,
799                           double* tau );
800lapack_int LAPACKE_cgeqpf( int matrix_order, lapack_int m, lapack_int n,
801                           lapack_complex_float* a, lapack_int lda,
802                           lapack_int* jpvt, lapack_complex_float* tau );
803lapack_int LAPACKE_zgeqpf( int matrix_order, lapack_int m, lapack_int n,
804                           lapack_complex_double* a, lapack_int lda,
805                           lapack_int* jpvt, lapack_complex_double* tau );
806
807lapack_int LAPACKE_sgeqr2( int matrix_order, lapack_int m, lapack_int n,
808                           float* a, lapack_int lda, float* tau );
809lapack_int LAPACKE_dgeqr2( int matrix_order, lapack_int m, lapack_int n,
810                           double* a, lapack_int lda, double* tau );
811lapack_int LAPACKE_cgeqr2( int matrix_order, lapack_int m, lapack_int n,
812                           lapack_complex_float* a, lapack_int lda,
813                           lapack_complex_float* tau );
814lapack_int LAPACKE_zgeqr2( int matrix_order, lapack_int m, lapack_int n,
815                           lapack_complex_double* a, lapack_int lda,
816                           lapack_complex_double* tau );
817
818lapack_int LAPACKE_sgeqrf( int matrix_order, lapack_int m, lapack_int n,
819                           float* a, lapack_int lda, float* tau );
820lapack_int LAPACKE_dgeqrf( int matrix_order, lapack_int m, lapack_int n,
821                           double* a, lapack_int lda, double* tau );
822lapack_int LAPACKE_cgeqrf( int matrix_order, lapack_int m, lapack_int n,
823                           lapack_complex_float* a, lapack_int lda,
824                           lapack_complex_float* tau );
825lapack_int LAPACKE_zgeqrf( int matrix_order, lapack_int m, lapack_int n,
826                           lapack_complex_double* a, lapack_int lda,
827                           lapack_complex_double* tau );
828
829lapack_int LAPACKE_sgeqrfp( int matrix_order, lapack_int m, lapack_int n,
830                            float* a, lapack_int lda, float* tau );
831lapack_int LAPACKE_dgeqrfp( int matrix_order, lapack_int m, lapack_int n,
832                            double* a, lapack_int lda, double* tau );
833lapack_int LAPACKE_cgeqrfp( int matrix_order, lapack_int m, lapack_int n,
834                            lapack_complex_float* a, lapack_int lda,
835                            lapack_complex_float* tau );
836lapack_int LAPACKE_zgeqrfp( int matrix_order, lapack_int m, lapack_int n,
837                            lapack_complex_double* a, lapack_int lda,
838                            lapack_complex_double* tau );
839
840lapack_int LAPACKE_sgerfs( int matrix_order, char trans, lapack_int n,
841                           lapack_int nrhs, const float* a, lapack_int lda,
842                           const float* af, lapack_int ldaf,
843                           const lapack_int* ipiv, const float* b,
844                           lapack_int ldb, float* x, lapack_int ldx,
845                           float* ferr, float* berr );
846lapack_int LAPACKE_dgerfs( int matrix_order, char trans, lapack_int n,
847                           lapack_int nrhs, const double* a, lapack_int lda,
848                           const double* af, lapack_int ldaf,
849                           const lapack_int* ipiv, const double* b,
850                           lapack_int ldb, double* x, lapack_int ldx,
851                           double* ferr, double* berr );
852lapack_int LAPACKE_cgerfs( int matrix_order, char trans, lapack_int n,
853                           lapack_int nrhs, const lapack_complex_float* a,
854                           lapack_int lda, const lapack_complex_float* af,
855                           lapack_int ldaf, const lapack_int* ipiv,
856                           const lapack_complex_float* b, lapack_int ldb,
857                           lapack_complex_float* x, lapack_int ldx, float* ferr,
858                           float* berr );
859lapack_int LAPACKE_zgerfs( int matrix_order, char trans, lapack_int n,
860                           lapack_int nrhs, const lapack_complex_double* a,
861                           lapack_int lda, const lapack_complex_double* af,
862                           lapack_int ldaf, const lapack_int* ipiv,
863                           const lapack_complex_double* b, lapack_int ldb,
864                           lapack_complex_double* x, lapack_int ldx,
865                           double* ferr, double* berr );
866
867lapack_int LAPACKE_sgerfsx( int matrix_order, char trans, char equed,
868                            lapack_int n, lapack_int nrhs, const float* a,
869                            lapack_int lda, const float* af, lapack_int ldaf,
870                            const lapack_int* ipiv, const float* r,
871                            const float* c, const float* b, lapack_int ldb,
872                            float* x, lapack_int ldx, float* rcond, float* berr,
873                            lapack_int n_err_bnds, float* err_bnds_norm,
874                            float* err_bnds_comp, lapack_int nparams,
875                            float* params );
876lapack_int LAPACKE_dgerfsx( int matrix_order, char trans, char equed,
877                            lapack_int n, lapack_int nrhs, const double* a,
878                            lapack_int lda, const double* af, lapack_int ldaf,
879                            const lapack_int* ipiv, const double* r,
880                            const double* c, const double* b, lapack_int ldb,
881                            double* x, lapack_int ldx, double* rcond,
882                            double* berr, lapack_int n_err_bnds,
883                            double* err_bnds_norm, double* err_bnds_comp,
884                            lapack_int nparams, double* params );
885lapack_int LAPACKE_cgerfsx( int matrix_order, char trans, char equed,
886                            lapack_int n, lapack_int nrhs,
887                            const lapack_complex_float* a, lapack_int lda,
888                            const lapack_complex_float* af, lapack_int ldaf,
889                            const lapack_int* ipiv, const float* r,
890                            const float* c, const lapack_complex_float* b,
891                            lapack_int ldb, lapack_complex_float* x,
892                            lapack_int ldx, float* rcond, float* berr,
893                            lapack_int n_err_bnds, float* err_bnds_norm,
894                            float* err_bnds_comp, lapack_int nparams,
895                            float* params );
896lapack_int LAPACKE_zgerfsx( int matrix_order, char trans, char equed,
897                            lapack_int n, lapack_int nrhs,
898                            const lapack_complex_double* a, lapack_int lda,
899                            const lapack_complex_double* af, lapack_int ldaf,
900                            const lapack_int* ipiv, const double* r,
901                            const double* c, const lapack_complex_double* b,
902                            lapack_int ldb, lapack_complex_double* x,
903                            lapack_int ldx, double* rcond, double* berr,
904                            lapack_int n_err_bnds, double* err_bnds_norm,
905                            double* err_bnds_comp, lapack_int nparams,
906                            double* params );
907
908lapack_int LAPACKE_sgerqf( int matrix_order, lapack_int m, lapack_int n,
909                           float* a, lapack_int lda, float* tau );
910lapack_int LAPACKE_dgerqf( int matrix_order, lapack_int m, lapack_int n,
911                           double* a, lapack_int lda, double* tau );
912lapack_int LAPACKE_cgerqf( int matrix_order, lapack_int m, lapack_int n,
913                           lapack_complex_float* a, lapack_int lda,
914                           lapack_complex_float* tau );
915lapack_int LAPACKE_zgerqf( int matrix_order, lapack_int m, lapack_int n,
916                           lapack_complex_double* a, lapack_int lda,
917                           lapack_complex_double* tau );
918
919lapack_int LAPACKE_sgesdd( int matrix_order, char jobz, lapack_int m,
920                           lapack_int n, float* a, lapack_int lda, float* s,
921                           float* u, lapack_int ldu, float* vt,
922                           lapack_int ldvt );
923lapack_int LAPACKE_dgesdd( int matrix_order, char jobz, lapack_int m,
924                           lapack_int n, double* a, lapack_int lda, double* s,
925                           double* u, lapack_int ldu, double* vt,
926                           lapack_int ldvt );
927lapack_int LAPACKE_cgesdd( int matrix_order, char jobz, lapack_int m,
928                           lapack_int n, lapack_complex_float* a,
929                           lapack_int lda, float* s, lapack_complex_float* u,
930                           lapack_int ldu, lapack_complex_float* vt,
931                           lapack_int ldvt );
932lapack_int LAPACKE_zgesdd( int matrix_order, char jobz, lapack_int m,
933                           lapack_int n, lapack_complex_double* a,
934                           lapack_int lda, double* s, lapack_complex_double* u,
935                           lapack_int ldu, lapack_complex_double* vt,
936                           lapack_int ldvt );
937
938lapack_int LAPACKE_sgesv( int matrix_order, lapack_int n, lapack_int nrhs,
939                          float* a, lapack_int lda, lapack_int* ipiv, float* b,
940                          lapack_int ldb );
941lapack_int LAPACKE_dgesv( int matrix_order, lapack_int n, lapack_int nrhs,
942                          double* a, lapack_int lda, lapack_int* ipiv,
943                          double* b, lapack_int ldb );
944lapack_int LAPACKE_cgesv( int matrix_order, lapack_int n, lapack_int nrhs,
945                          lapack_complex_float* a, lapack_int lda,
946                          lapack_int* ipiv, lapack_complex_float* b,
947                          lapack_int ldb );
948lapack_int LAPACKE_zgesv( int matrix_order, lapack_int n, lapack_int nrhs,
949                          lapack_complex_double* a, lapack_int lda,
950                          lapack_int* ipiv, lapack_complex_double* b,
951                          lapack_int ldb );
952lapack_int LAPACKE_dsgesv( int matrix_order, lapack_int n, lapack_int nrhs,
953                           double* a, lapack_int lda, lapack_int* ipiv,
954                           double* b, lapack_int ldb, double* x, lapack_int ldx,
955                           lapack_int* iter );
956lapack_int LAPACKE_zcgesv( int matrix_order, lapack_int n, lapack_int nrhs,
957                           lapack_complex_double* a, lapack_int lda,
958                           lapack_int* ipiv, lapack_complex_double* b,
959                           lapack_int ldb, lapack_complex_double* x,
960                           lapack_int ldx, lapack_int* iter );
961
962lapack_int LAPACKE_sgesvd( int matrix_order, char jobu, char jobvt,
963                           lapack_int m, lapack_int n, float* a, lapack_int lda,
964                           float* s, float* u, lapack_int ldu, float* vt,
965                           lapack_int ldvt, float* superb );
966lapack_int LAPACKE_dgesvd( int matrix_order, char jobu, char jobvt,
967                           lapack_int m, lapack_int n, double* a,
968                           lapack_int lda, double* s, double* u, lapack_int ldu,
969                           double* vt, lapack_int ldvt, double* superb );
970lapack_int LAPACKE_cgesvd( int matrix_order, char jobu, char jobvt,
971                           lapack_int m, lapack_int n, lapack_complex_float* a,
972                           lapack_int lda, float* s, lapack_complex_float* u,
973                           lapack_int ldu, lapack_complex_float* vt,
974                           lapack_int ldvt, float* superb );
975lapack_int LAPACKE_zgesvd( int matrix_order, char jobu, char jobvt,
976                           lapack_int m, lapack_int n, lapack_complex_double* a,
977                           lapack_int lda, double* s, lapack_complex_double* u,
978                           lapack_int ldu, lapack_complex_double* vt,
979                           lapack_int ldvt, double* superb );
980
981lapack_int LAPACKE_sgesvj( int matrix_order, char joba, char jobu, char jobv,
982                           lapack_int m, lapack_int n, float* a, lapack_int lda,
983                           float* sva, lapack_int mv, float* v, lapack_int ldv,
984                           float* stat );
985lapack_int LAPACKE_dgesvj( int matrix_order, char joba, char jobu, char jobv,
986                           lapack_int m, lapack_int n, double* a,
987                           lapack_int lda, double* sva, lapack_int mv,
988                           double* v, lapack_int ldv, double* stat );
989
990lapack_int LAPACKE_sgesvx( int matrix_order, char fact, char trans,
991                           lapack_int n, lapack_int nrhs, float* a,
992                           lapack_int lda, float* af, lapack_int ldaf,
993                           lapack_int* ipiv, char* equed, float* r, float* c,
994                           float* b, lapack_int ldb, float* x, lapack_int ldx,
995                           float* rcond, float* ferr, float* berr,
996                           float* rpivot );
997lapack_int LAPACKE_dgesvx( int matrix_order, char fact, char trans,
998                           lapack_int n, lapack_int nrhs, double* a,
999                           lapack_int lda, double* af, lapack_int ldaf,
1000                           lapack_int* ipiv, char* equed, double* r, double* c,
1001                           double* b, lapack_int ldb, double* x, lapack_int ldx,
1002                           double* rcond, double* ferr, double* berr,
1003                           double* rpivot );
1004lapack_int LAPACKE_cgesvx( int matrix_order, char fact, char trans,
1005                           lapack_int n, lapack_int nrhs,
1006                           lapack_complex_float* a, lapack_int lda,
1007                           lapack_complex_float* af, lapack_int ldaf,
1008                           lapack_int* ipiv, char* equed, float* r, float* c,
1009                           lapack_complex_float* b, lapack_int ldb,
1010                           lapack_complex_float* x, lapack_int ldx,
1011                           float* rcond, float* ferr, float* berr,
1012                           float* rpivot );
1013lapack_int LAPACKE_zgesvx( int matrix_order, char fact, char trans,
1014                           lapack_int n, lapack_int nrhs,
1015                           lapack_complex_double* a, lapack_int lda,
1016                           lapack_complex_double* af, lapack_int ldaf,
1017                           lapack_int* ipiv, char* equed, double* r, double* c,
1018                           lapack_complex_double* b, lapack_int ldb,
1019                           lapack_complex_double* x, lapack_int ldx,
1020                           double* rcond, double* ferr, double* berr,
1021                           double* rpivot );
1022
1023lapack_int LAPACKE_sgesvxx( int matrix_order, char fact, char trans,
1024                            lapack_int n, lapack_int nrhs, float* a,
1025                            lapack_int lda, float* af, lapack_int ldaf,
1026                            lapack_int* ipiv, char* equed, float* r, float* c,
1027                            float* b, lapack_int ldb, float* x, lapack_int ldx,
1028                            float* rcond, float* rpvgrw, float* berr,
1029                            lapack_int n_err_bnds, float* err_bnds_norm,
1030                            float* err_bnds_comp, lapack_int nparams,
1031                            float* params );
1032lapack_int LAPACKE_dgesvxx( int matrix_order, char fact, char trans,
1033                            lapack_int n, lapack_int nrhs, double* a,
1034                            lapack_int lda, double* af, lapack_int ldaf,
1035                            lapack_int* ipiv, char* equed, double* r, double* c,
1036                            double* b, lapack_int ldb, double* x,
1037                            lapack_int ldx, double* rcond, double* rpvgrw,
1038                            double* berr, lapack_int n_err_bnds,
1039                            double* err_bnds_norm, double* err_bnds_comp,
1040                            lapack_int nparams, double* params );
1041lapack_int LAPACKE_cgesvxx( int matrix_order, char fact, char trans,
1042                            lapack_int n, lapack_int nrhs,
1043                            lapack_complex_float* a, lapack_int lda,
1044                            lapack_complex_float* af, lapack_int ldaf,
1045                            lapack_int* ipiv, char* equed, float* r, float* c,
1046                            lapack_complex_float* b, lapack_int ldb,
1047                            lapack_complex_float* x, lapack_int ldx,
1048                            float* rcond, float* rpvgrw, float* berr,
1049                            lapack_int n_err_bnds, float* err_bnds_norm,
1050                            float* err_bnds_comp, lapack_int nparams,
1051                            float* params );
1052lapack_int LAPACKE_zgesvxx( int matrix_order, char fact, char trans,
1053                            lapack_int n, lapack_int nrhs,
1054                            lapack_complex_double* a, lapack_int lda,
1055                            lapack_complex_double* af, lapack_int ldaf,
1056                            lapack_int* ipiv, char* equed, double* r, double* c,
1057                            lapack_complex_double* b, lapack_int ldb,
1058                            lapack_complex_double* x, lapack_int ldx,
1059                            double* rcond, double* rpvgrw, double* berr,
1060                            lapack_int n_err_bnds, double* err_bnds_norm,
1061                            double* err_bnds_comp, lapack_int nparams,
1062                            double* params );
1063
1064lapack_int LAPACKE_sgetf2( int matrix_order, lapack_int m, lapack_int n,
1065                           float* a, lapack_int lda, lapack_int* ipiv );
1066lapack_int LAPACKE_dgetf2( int matrix_order, lapack_int m, lapack_int n,
1067                           double* a, lapack_int lda, lapack_int* ipiv );
1068lapack_int LAPACKE_cgetf2( int matrix_order, lapack_int m, lapack_int n,
1069                           lapack_complex_float* a, lapack_int lda,
1070                           lapack_int* ipiv );
1071lapack_int LAPACKE_zgetf2( int matrix_order, lapack_int m, lapack_int n,
1072                           lapack_complex_double* a, lapack_int lda,
1073                           lapack_int* ipiv );
1074
1075lapack_int LAPACKE_sgetrf( int matrix_order, lapack_int m, lapack_int n,
1076                           float* a, lapack_int lda, lapack_int* ipiv );
1077lapack_int LAPACKE_dgetrf( int matrix_order, lapack_int m, lapack_int n,
1078                           double* a, lapack_int lda, lapack_int* ipiv );
1079lapack_int LAPACKE_cgetrf( int matrix_order, lapack_int m, lapack_int n,
1080                           lapack_complex_float* a, lapack_int lda,
1081                           lapack_int* ipiv );
1082lapack_int LAPACKE_zgetrf( int matrix_order, lapack_int m, lapack_int n,
1083                           lapack_complex_double* a, lapack_int lda,
1084                           lapack_int* ipiv );
1085
1086lapack_int LAPACKE_sgetri( int matrix_order, lapack_int n, float* a,
1087                           lapack_int lda, const lapack_int* ipiv );
1088lapack_int LAPACKE_dgetri( int matrix_order, lapack_int n, double* a,
1089                           lapack_int lda, const lapack_int* ipiv );
1090lapack_int LAPACKE_cgetri( int matrix_order, lapack_int n,
1091                           lapack_complex_float* a, lapack_int lda,
1092                           const lapack_int* ipiv );
1093lapack_int LAPACKE_zgetri( int matrix_order, lapack_int n,
1094                           lapack_complex_double* a, lapack_int lda,
1095                           const lapack_int* ipiv );
1096
1097lapack_int LAPACKE_sgetrs( int matrix_order, char trans, lapack_int n,
1098                           lapack_int nrhs, const float* a, lapack_int lda,
1099                           const lapack_int* ipiv, float* b, lapack_int ldb );
1100lapack_int LAPACKE_dgetrs( int matrix_order, char trans, lapack_int n,
1101                           lapack_int nrhs, const double* a, lapack_int lda,
1102                           const lapack_int* ipiv, double* b, lapack_int ldb );
1103lapack_int LAPACKE_cgetrs( int matrix_order, char trans, lapack_int n,
1104                           lapack_int nrhs, const lapack_complex_float* a,
1105                           lapack_int lda, const lapack_int* ipiv,
1106                           lapack_complex_float* b, lapack_int ldb );
1107lapack_int LAPACKE_zgetrs( int matrix_order, char trans, lapack_int n,
1108                           lapack_int nrhs, const lapack_complex_double* a,
1109                           lapack_int lda, const lapack_int* ipiv,
1110                           lapack_complex_double* b, lapack_int ldb );
1111
1112lapack_int LAPACKE_sggbak( int matrix_order, char job, char side, lapack_int n,
1113                           lapack_int ilo, lapack_int ihi, const float* lscale,
1114                           const float* rscale, lapack_int m, float* v,
1115                           lapack_int ldv );
1116lapack_int LAPACKE_dggbak( int matrix_order, char job, char side, lapack_int n,
1117                           lapack_int ilo, lapack_int ihi, const double* lscale,
1118                           const double* rscale, lapack_int m, double* v,
1119                           lapack_int ldv );
1120lapack_int LAPACKE_cggbak( int matrix_order, char job, char side, lapack_int n,
1121                           lapack_int ilo, lapack_int ihi, const float* lscale,
1122                           const float* rscale, lapack_int m,
1123                           lapack_complex_float* v, lapack_int ldv );
1124lapack_int LAPACKE_zggbak( int matrix_order, char job, char side, lapack_int n,
1125                           lapack_int ilo, lapack_int ihi, const double* lscale,
1126                           const double* rscale, lapack_int m,
1127                           lapack_complex_double* v, lapack_int ldv );
1128
1129lapack_int LAPACKE_sggbal( int matrix_order, char job, lapack_int n, float* a,
1130                           lapack_int lda, float* b, lapack_int ldb,
1131                           lapack_int* ilo, lapack_int* ihi, float* lscale,
1132                           float* rscale );
1133lapack_int LAPACKE_dggbal( int matrix_order, char job, lapack_int n, double* a,
1134                           lapack_int lda, double* b, lapack_int ldb,
1135                           lapack_int* ilo, lapack_int* ihi, double* lscale,
1136                           double* rscale );
1137lapack_int LAPACKE_cggbal( int matrix_order, char job, lapack_int n,
1138                           lapack_complex_float* a, lapack_int lda,
1139                           lapack_complex_float* b, lapack_int ldb,
1140                           lapack_int* ilo, lapack_int* ihi, float* lscale,
1141                           float* rscale );
1142lapack_int LAPACKE_zggbal( int matrix_order, char job, lapack_int n,
1143                           lapack_complex_double* a, lapack_int lda,
1144                           lapack_complex_double* b, lapack_int ldb,
1145                           lapack_int* ilo, lapack_int* ihi, double* lscale,
1146                           double* rscale );
1147
1148lapack_int LAPACKE_sgges( int matrix_order, char jobvsl, char jobvsr, char sort,
1149                          LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
1150                          lapack_int lda, float* b, lapack_int ldb,
1151                          lapack_int* sdim, float* alphar, float* alphai,
1152                          float* beta, float* vsl, lapack_int ldvsl, float* vsr,
1153                          lapack_int ldvsr );
1154lapack_int LAPACKE_dgges( int matrix_order, char jobvsl, char jobvsr, char sort,
1155                          LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
1156                          lapack_int lda, double* b, lapack_int ldb,
1157                          lapack_int* sdim, double* alphar, double* alphai,
1158                          double* beta, double* vsl, lapack_int ldvsl,
1159                          double* vsr, lapack_int ldvsr );
1160lapack_int LAPACKE_cgges( int matrix_order, char jobvsl, char jobvsr, char sort,
1161                          LAPACK_C_SELECT2 selctg, lapack_int n,
1162                          lapack_complex_float* a, lapack_int lda,
1163                          lapack_complex_float* b, lapack_int ldb,
1164                          lapack_int* sdim, lapack_complex_float* alpha,
1165                          lapack_complex_float* beta, lapack_complex_float* vsl,
1166                          lapack_int ldvsl, lapack_complex_float* vsr,
1167                          lapack_int ldvsr );
1168lapack_int LAPACKE_zgges( int matrix_order, char jobvsl, char jobvsr, char sort,
1169                          LAPACK_Z_SELECT2 selctg, lapack_int n,
1170                          lapack_complex_double* a, lapack_int lda,
1171                          lapack_complex_double* b, lapack_int ldb,
1172                          lapack_int* sdim, lapack_complex_double* alpha,
1173                          lapack_complex_double* beta,
1174                          lapack_complex_double* vsl, lapack_int ldvsl,
1175                          lapack_complex_double* vsr, lapack_int ldvsr );
1176
1177lapack_int LAPACKE_sggesx( int matrix_order, char jobvsl, char jobvsr,
1178                           char sort, LAPACK_S_SELECT3 selctg, char sense,
1179                           lapack_int n, float* a, lapack_int lda, float* b,
1180                           lapack_int ldb, lapack_int* sdim, float* alphar,
1181                           float* alphai, float* beta, float* vsl,
1182                           lapack_int ldvsl, float* vsr, lapack_int ldvsr,
1183                           float* rconde, float* rcondv );
1184lapack_int LAPACKE_dggesx( int matrix_order, char jobvsl, char jobvsr,
1185                           char sort, LAPACK_D_SELECT3 selctg, char sense,
1186                           lapack_int n, double* a, lapack_int lda, double* b,
1187                           lapack_int ldb, lapack_int* sdim, double* alphar,
1188                           double* alphai, double* beta, double* vsl,
1189                           lapack_int ldvsl, double* vsr, lapack_int ldvsr,
1190                           double* rconde, double* rcondv );
1191lapack_int LAPACKE_cggesx( int matrix_order, char jobvsl, char jobvsr,
1192                           char sort, LAPACK_C_SELECT2 selctg, char sense,
1193                           lapack_int n, lapack_complex_float* a,
1194                           lapack_int lda, lapack_complex_float* b,
1195                           lapack_int ldb, lapack_int* sdim,
1196                           lapack_complex_float* alpha,
1197                           lapack_complex_float* beta,
1198                           lapack_complex_float* vsl, lapack_int ldvsl,
1199                           lapack_complex_float* vsr, lapack_int ldvsr,
1200                           float* rconde, float* rcondv );
1201lapack_int LAPACKE_zggesx( int matrix_order, char jobvsl, char jobvsr,
1202                           char sort, LAPACK_Z_SELECT2 selctg, char sense,
1203                           lapack_int n, lapack_complex_double* a,
1204                           lapack_int lda, lapack_complex_double* b,
1205                           lapack_int ldb, lapack_int* sdim,
1206                           lapack_complex_double* alpha,
1207                           lapack_complex_double* beta,
1208                           lapack_complex_double* vsl, lapack_int ldvsl,
1209                           lapack_complex_double* vsr, lapack_int ldvsr,
1210                           double* rconde, double* rcondv );
1211
1212lapack_int LAPACKE_sggev( int matrix_order, char jobvl, char jobvr,
1213                          lapack_int n, float* a, lapack_int lda, float* b,
1214                          lapack_int ldb, float* alphar, float* alphai,
1215                          float* beta, float* vl, lapack_int ldvl, float* vr,
1216                          lapack_int ldvr );
1217lapack_int LAPACKE_dggev( int matrix_order, char jobvl, char jobvr,
1218                          lapack_int n, double* a, lapack_int lda, double* b,
1219                          lapack_int ldb, double* alphar, double* alphai,
1220                          double* beta, double* vl, lapack_int ldvl, double* vr,
1221                          lapack_int ldvr );
1222lapack_int LAPACKE_cggev( int matrix_order, char jobvl, char jobvr,
1223                          lapack_int n, lapack_complex_float* a, lapack_int lda,
1224                          lapack_complex_float* b, lapack_int ldb,
1225                          lapack_complex_float* alpha,
1226                          lapack_complex_float* beta, lapack_complex_float* vl,
1227                          lapack_int ldvl, lapack_complex_float* vr,
1228                          lapack_int ldvr );
1229lapack_int LAPACKE_zggev( int matrix_order, char jobvl, char jobvr,
1230                          lapack_int n, lapack_complex_double* a,
1231                          lapack_int lda, lapack_complex_double* b,
1232                          lapack_int ldb, lapack_complex_double* alpha,
1233                          lapack_complex_double* beta,
1234                          lapack_complex_double* vl, lapack_int ldvl,
1235                          lapack_complex_double* vr, lapack_int ldvr );
1236
1237lapack_int LAPACKE_sggevx( int matrix_order, char balanc, char jobvl,
1238                           char jobvr, char sense, lapack_int n, float* a,
1239                           lapack_int lda, float* b, lapack_int ldb,
1240                           float* alphar, float* alphai, float* beta, float* vl,
1241                           lapack_int ldvl, float* vr, lapack_int ldvr,
1242                           lapack_int* ilo, lapack_int* ihi, float* lscale,
1243                           float* rscale, float* abnrm, float* bbnrm,
1244                           float* rconde, float* rcondv );
1245lapack_int LAPACKE_dggevx( int matrix_order, char balanc, char jobvl,
1246                           char jobvr, char sense, lapack_int n, double* a,
1247                           lapack_int lda, double* b, lapack_int ldb,
1248                           double* alphar, double* alphai, double* beta,
1249                           double* vl, lapack_int ldvl, double* vr,
1250                           lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
1251                           double* lscale, double* rscale, double* abnrm,
1252                           double* bbnrm, double* rconde, double* rcondv );
1253lapack_int LAPACKE_cggevx( int matrix_order, char balanc, char jobvl,
1254                           char jobvr, char sense, lapack_int n,
1255                           lapack_complex_float* a, lapack_int lda,
1256                           lapack_complex_float* b, lapack_int ldb,
1257                           lapack_complex_float* alpha,
1258                           lapack_complex_float* beta, lapack_complex_float* vl,
1259                           lapack_int ldvl, lapack_complex_float* vr,
1260                           lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
1261                           float* lscale, float* rscale, float* abnrm,
1262                           float* bbnrm, float* rconde, float* rcondv );
1263lapack_int LAPACKE_zggevx( int matrix_order, char balanc, char jobvl,
1264                           char jobvr, char sense, lapack_int n,
1265                           lapack_complex_double* a, lapack_int lda,
1266                           lapack_complex_double* b, lapack_int ldb,
1267                           lapack_complex_double* alpha,
1268                           lapack_complex_double* beta,
1269                           lapack_complex_double* vl, lapack_int ldvl,
1270                           lapack_complex_double* vr, lapack_int ldvr,
1271                           lapack_int* ilo, lapack_int* ihi, double* lscale,
1272                           double* rscale, double* abnrm, double* bbnrm,
1273                           double* rconde, double* rcondv );
1274
1275lapack_int LAPACKE_sggglm( int matrix_order, lapack_int n, lapack_int m,
1276                           lapack_int p, float* a, lapack_int lda, float* b,
1277                           lapack_int ldb, float* d, float* x, float* y );
1278lapack_int LAPACKE_dggglm( int matrix_order, lapack_int n, lapack_int m,
1279                           lapack_int p, double* a, lapack_int lda, double* b,
1280                           lapack_int ldb, double* d, double* x, double* y );
1281lapack_int LAPACKE_cggglm( int matrix_order, lapack_int n, lapack_int m,
1282                           lapack_int p, lapack_complex_float* a,
1283                           lapack_int lda, lapack_complex_float* b,
1284                           lapack_int ldb, lapack_complex_float* d,
1285                           lapack_complex_float* x, lapack_complex_float* y );
1286lapack_int LAPACKE_zggglm( int matrix_order, lapack_int n, lapack_int m,
1287                           lapack_int p, lapack_complex_double* a,
1288                           lapack_int lda, lapack_complex_double* b,
1289                           lapack_int ldb, lapack_complex_double* d,
1290                           lapack_complex_double* x, lapack_complex_double* y );
1291
1292lapack_int LAPACKE_sgghrd( int matrix_order, char compq, char compz,
1293                           lapack_int n, lapack_int ilo, lapack_int ihi,
1294                           float* a, lapack_int lda, float* b, lapack_int ldb,
1295                           float* q, lapack_int ldq, float* z, lapack_int ldz );
1296lapack_int LAPACKE_dgghrd( int matrix_order, char compq, char compz,
1297                           lapack_int n, lapack_int ilo, lapack_int ihi,
1298                           double* a, lapack_int lda, double* b, lapack_int ldb,
1299                           double* q, lapack_int ldq, double* z,
1300                           lapack_int ldz );
1301lapack_int LAPACKE_cgghrd( int matrix_order, char compq, char compz,
1302                           lapack_int n, lapack_int ilo, lapack_int ihi,
1303                           lapack_complex_float* a, lapack_int lda,
1304                           lapack_complex_float* b, lapack_int ldb,
1305                           lapack_complex_float* q, lapack_int ldq,
1306                           lapack_complex_float* z, lapack_int ldz );
1307lapack_int LAPACKE_zgghrd( int matrix_order, char compq, char compz,
1308                           lapack_int n, lapack_int ilo, lapack_int ihi,
1309                           lapack_complex_double* a, lapack_int lda,
1310                           lapack_complex_double* b, lapack_int ldb,
1311                           lapack_complex_double* q, lapack_int ldq,
1312                           lapack_complex_double* z, lapack_int ldz );
1313
1314lapack_int LAPACKE_sgglse( int matrix_order, lapack_int m, lapack_int n,
1315                           lapack_int p, float* a, lapack_int lda, float* b,
1316                           lapack_int ldb, float* c, float* d, float* x );
1317lapack_int LAPACKE_dgglse( int matrix_order, lapack_int m, lapack_int n,
1318                           lapack_int p, double* a, lapack_int lda, double* b,
1319                           lapack_int ldb, double* c, double* d, double* x );
1320lapack_int LAPACKE_cgglse( int matrix_order, lapack_int m, lapack_int n,
1321                           lapack_int p, lapack_complex_float* a,
1322                           lapack_int lda, lapack_complex_float* b,
1323                           lapack_int ldb, lapack_complex_float* c,
1324                           lapack_complex_float* d, lapack_complex_float* x );
1325lapack_int LAPACKE_zgglse( int matrix_order, lapack_int m, lapack_int n,
1326                           lapack_int p, lapack_complex_double* a,
1327                           lapack_int lda, lapack_complex_double* b,
1328                           lapack_int ldb, lapack_complex_double* c,
1329                           lapack_complex_double* d, lapack_complex_double* x );
1330
1331lapack_int LAPACKE_sggqrf( int matrix_order, lapack_int n, lapack_int m,
1332                           lapack_int p, float* a, lapack_int lda, float* taua,
1333                           float* b, lapack_int ldb, float* taub );
1334lapack_int LAPACKE_dggqrf( int matrix_order, lapack_int n, lapack_int m,
1335                           lapack_int p, double* a, lapack_int lda,
1336                           double* taua, double* b, lapack_int ldb,
1337                           double* taub );
1338lapack_int LAPACKE_cggqrf( int matrix_order, lapack_int n, lapack_int m,
1339                           lapack_int p, lapack_complex_float* a,
1340                           lapack_int lda, lapack_complex_float* taua,
1341                           lapack_complex_float* b, lapack_int ldb,
1342                           lapack_complex_float* taub );
1343lapack_int LAPACKE_zggqrf( int matrix_order, lapack_int n, lapack_int m,
1344                           lapack_int p, lapack_complex_double* a,
1345                           lapack_int lda, lapack_complex_double* taua,
1346                           lapack_complex_double* b, lapack_int ldb,
1347                           lapack_complex_double* taub );
1348
1349lapack_int LAPACKE_sggrqf( int matrix_order, lapack_int m, lapack_int p,
1350                           lapack_int n, float* a, lapack_int lda, float* taua,
1351                           float* b, lapack_int ldb, float* taub );
1352lapack_int LAPACKE_dggrqf( int matrix_order, lapack_int m, lapack_int p,
1353                           lapack_int n, double* a, lapack_int lda,
1354                           double* taua, double* b, lapack_int ldb,
1355                           double* taub );
1356lapack_int LAPACKE_cggrqf( int matrix_order, lapack_int m, lapack_int p,
1357                           lapack_int n, lapack_complex_float* a,
1358                           lapack_int lda, lapack_complex_float* taua,
1359                           lapack_complex_float* b, lapack_int ldb,
1360                           lapack_complex_float* taub );
1361lapack_int LAPACKE_zggrqf( int matrix_order, lapack_int m, lapack_int p,
1362                           lapack_int n, lapack_complex_double* a,
1363                           lapack_int lda, lapack_complex_double* taua,
1364                           lapack_complex_double* b, lapack_int ldb,
1365                           lapack_complex_double* taub );
1366
1367lapack_int LAPACKE_sggsvd( int matrix_order, char jobu, char jobv, char jobq,
1368                           lapack_int m, lapack_int n, lapack_int p,
1369                           lapack_int* k, lapack_int* l, float* a,
1370                           lapack_int lda, float* b, lapack_int ldb,
1371                           float* alpha, float* beta, float* u, lapack_int ldu,
1372                           float* v, lapack_int ldv, float* q, lapack_int ldq,
1373                           lapack_int* iwork );
1374lapack_int LAPACKE_dggsvd( int matrix_order, char jobu, char jobv, char jobq,
1375                           lapack_int m, lapack_int n, lapack_int p,
1376                           lapack_int* k, lapack_int* l, double* a,
1377                           lapack_int lda, double* b, lapack_int ldb,
1378                           double* alpha, double* beta, double* u,
1379                           lapack_int ldu, double* v, lapack_int ldv, double* q,
1380                           lapack_int ldq, lapack_int* iwork );
1381lapack_int LAPACKE_cggsvd( int matrix_order, char jobu, char jobv, char jobq,
1382                           lapack_int m, lapack_int n, lapack_int p,
1383                           lapack_int* k, lapack_int* l,
1384                           lapack_complex_float* a, lapack_int lda,
1385                           lapack_complex_float* b, lapack_int ldb,
1386                           float* alpha, float* beta, lapack_complex_float* u,
1387                           lapack_int ldu, lapack_complex_float* v,
1388                           lapack_int ldv, lapack_complex_float* q,
1389                           lapack_int ldq, lapack_int* iwork );
1390lapack_int LAPACKE_zggsvd( int matrix_order, char jobu, char jobv, char jobq,
1391                           lapack_int m, lapack_int n, lapack_int p,
1392                           lapack_int* k, lapack_int* l,
1393                           lapack_complex_double* a, lapack_int lda,
1394                           lapack_complex_double* b, lapack_int ldb,
1395                           double* alpha, double* beta,
1396                           lapack_complex_double* u, lapack_int ldu,
1397                           lapack_complex_double* v, lapack_int ldv,
1398                           lapack_complex_double* q, lapack_int ldq,
1399                           lapack_int* iwork );
1400
1401lapack_int LAPACKE_sggsvp( int matrix_order, char jobu, char jobv, char jobq,
1402                           lapack_int m, lapack_int p, lapack_int n, float* a,
1403                           lapack_int lda, float* b, lapack_int ldb, float tola,
1404                           float tolb, lapack_int* k, lapack_int* l, float* u,
1405                           lapack_int ldu, float* v, lapack_int ldv, float* q,
1406                           lapack_int ldq );
1407lapack_int LAPACKE_dggsvp( int matrix_order, char jobu, char jobv, char jobq,
1408                           lapack_int m, lapack_int p, lapack_int n, double* a,
1409                           lapack_int lda, double* b, lapack_int ldb,
1410                           double tola, double tolb, lapack_int* k,
1411                           lapack_int* l, double* u, lapack_int ldu, double* v,
1412                           lapack_int ldv, double* q, lapack_int ldq );
1413lapack_int LAPACKE_cggsvp( int matrix_order, char jobu, char jobv, char jobq,
1414                           lapack_int m, lapack_int p, lapack_int n,
1415                           lapack_complex_float* a, lapack_int lda,
1416                           lapack_complex_float* b, lapack_int ldb, float tola,
1417                           float tolb, lapack_int* k, lapack_int* l,
1418                           lapack_complex_float* u, lapack_int ldu,
1419                           lapack_complex_float* v, lapack_int ldv,
1420                           lapack_complex_float* q, lapack_int ldq );
1421lapack_int LAPACKE_zggsvp( int matrix_order, char jobu, char jobv, char jobq,
1422                           lapack_int m, lapack_int p, lapack_int n,
1423                           lapack_complex_double* a, lapack_int lda,
1424                           lapack_complex_double* b, lapack_int ldb,
1425                           double tola, double tolb, lapack_int* k,
1426                           lapack_int* l, lapack_complex_double* u,
1427                           lapack_int ldu, lapack_complex_double* v,
1428                           lapack_int ldv, lapack_complex_double* q,
1429                           lapack_int ldq );
1430
1431lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
1432                           const float* d, const float* du, const float* du2,
1433                           const lapack_int* ipiv, float anorm, float* rcond );
1434lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
1435                           const double* d, const double* du, const double* du2,
1436                           const lapack_int* ipiv, double anorm,
1437                           double* rcond );
1438lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
1439                           const lapack_complex_float* dl,
1440                           const lapack_complex_float* d,
1441                           const lapack_complex_float* du,
1442                           const lapack_complex_float* du2,
1443                           const lapack_int* ipiv, float anorm, float* rcond );
1444lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
1445                           const lapack_complex_double* dl,
1446                           const lapack_complex_double* d,
1447                           const lapack_complex_double* du,
1448                           const lapack_complex_double* du2,
1449                           const lapack_int* ipiv, double anorm,
1450                           double* rcond );
1451
1452lapack_int LAPACKE_sgtrfs( int matrix_order, char trans, lapack_int n,
1453                           lapack_int nrhs, const float* dl, const float* d,
1454                           const float* du, const float* dlf, const float* df,
1455                           const float* duf, const float* du2,
1456                           const lapack_int* ipiv, const float* b,
1457                           lapack_int ldb, float* x, lapack_int ldx,
1458                           float* ferr, float* berr );
1459lapack_int LAPACKE_dgtrfs( int matrix_order, char trans, lapack_int n,
1460                           lapack_int nrhs, const double* dl, const double* d,
1461                           const double* du, const double* dlf,
1462                           const double* df, const double* duf,
1463                           const double* du2, const lapack_int* ipiv,
1464                           const double* b, lapack_int ldb, double* x,
1465                           lapack_int ldx, double* ferr, double* berr );
1466lapack_int LAPACKE_cgtrfs( int matrix_order, char trans, lapack_int n,
1467                           lapack_int nrhs, const lapack_complex_float* dl,
1468                           const lapack_complex_float* d,
1469                           const lapack_complex_float* du,
1470                           const lapack_complex_float* dlf,
1471                           const lapack_complex_float* df,
1472                           const lapack_complex_float* duf,
1473                           const lapack_complex_float* du2,
1474                           const lapack_int* ipiv,
1475                           const lapack_complex_float* b, lapack_int ldb,
1476                           lapack_complex_float* x, lapack_int ldx, float* ferr,
1477                           float* berr );
1478lapack_int LAPACKE_zgtrfs( int matrix_order, char trans, lapack_int n,
1479                           lapack_int nrhs, const lapack_complex_double* dl,
1480                           const lapack_complex_double* d,
1481                           const lapack_complex_double* du,
1482                           const lapack_complex_double* dlf,
1483                           const lapack_complex_double* df,
1484                           const lapack_complex_double* duf,
1485                           const lapack_complex_double* du2,
1486                           const lapack_int* ipiv,
1487                           const lapack_complex_double* b, lapack_int ldb,
1488                           lapack_complex_double* x, lapack_int ldx,
1489                           double* ferr, double* berr );
1490
1491lapack_int LAPACKE_sgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
1492                          float* dl, float* d, float* du, float* b,
1493                          lapack_int ldb );
1494lapack_int LAPACKE_dgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
1495                          double* dl, double* d, double* du, double* b,
1496                          lapack_int ldb );
1497lapack_int LAPACKE_cgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
1498                          lapack_complex_float* dl, lapack_complex_float* d,
1499                          lapack_complex_float* du, lapack_complex_float* b,
1500                          lapack_int ldb );
1501lapack_int LAPACKE_zgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
1502                          lapack_complex_double* dl, lapack_complex_double* d,
1503                          lapack_complex_double* du, lapack_complex_double* b,
1504                          lapack_int ldb );
1505
1506lapack_int LAPACKE_sgtsvx( int matrix_order, char fact, char trans,
1507                           lapack_int n, lapack_int nrhs, const float* dl,
1508                           const float* d, const float* du, float* dlf,
1509                           float* df, float* duf, float* du2, lapack_int* ipiv,
1510                           const float* b, lapack_int ldb, float* x,
1511                           lapack_int ldx, float* rcond, float* ferr,
1512                           float* berr );
1513lapack_int LAPACKE_dgtsvx( int matrix_order, char fact, char trans,
1514                           lapack_int n, lapack_int nrhs, const double* dl,
1515                           const double* d, const double* du, double* dlf,
1516                           double* df, double* duf, double* du2,
1517                           lapack_int* ipiv, const double* b, lapack_int ldb,
1518                           double* x, lapack_int ldx, double* rcond,
1519                           double* ferr, double* berr );
1520lapack_int LAPACKE_cgtsvx( int matrix_order, char fact, char trans,
1521                           lapack_int n, lapack_int nrhs,
1522                           const lapack_complex_float* dl,
1523                           const lapack_complex_float* d,
1524                           const lapack_complex_float* du,
1525                           lapack_complex_float* dlf, lapack_complex_float* df,
1526                           lapack_complex_float* duf, lapack_complex_float* du2,
1527                           lapack_int* ipiv, const lapack_complex_float* b,
1528                           lapack_int ldb, lapack_complex_float* x,
1529                           lapack_int ldx, float* rcond, float* ferr,
1530                           float* berr );
1531lapack_int LAPACKE_zgtsvx( int matrix_order, char fact, char trans,
1532                           lapack_int n, lapack_int nrhs,
1533                           const lapack_complex_double* dl,
1534                           const lapack_complex_double* d,
1535                           const lapack_complex_double* du,
1536                           lapack_complex_double* dlf,
1537                           lapack_complex_double* df,
1538                           lapack_complex_double* duf,
1539                           lapack_complex_double* du2, lapack_int* ipiv,
1540                           const lapack_complex_double* b, lapack_int ldb,
1541                           lapack_complex_double* x, lapack_int ldx,
1542                           double* rcond, double* ferr, double* berr );
1543
1544lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
1545                           float* du2, lapack_int* ipiv );
1546lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
1547                           double* du2, lapack_int* ipiv );
1548lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
1549                           lapack_complex_float* d, lapack_complex_float* du,
1550                           lapack_complex_float* du2, lapack_int* ipiv );
1551lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
1552                           lapack_complex_double* d, lapack_complex_double* du,
1553                           lapack_complex_double* du2, lapack_int* ipiv );
1554
1555lapack_int LAPACKE_sgttrs( int matrix_order, char trans, lapack_int n,
1556                           lapack_int nrhs, const float* dl, const float* d,
1557                           const float* du, const float* du2,
1558                           const lapack_int* ipiv, float* b, lapack_int ldb );
1559lapack_int LAPACKE_dgttrs( int matrix_order, char trans, lapack_int n,
1560                           lapack_int nrhs, const double* dl, const double* d,
1561                           const double* du, const double* du2,
1562                           const lapack_int* ipiv, double* b, lapack_int ldb );
1563lapack_int LAPACKE_cgttrs( int matrix_order, char trans, lapack_int n,
1564                           lapack_int nrhs, const lapack_complex_float* dl,
1565                           const lapack_complex_float* d,
1566                           const lapack_complex_float* du,
1567                           const lapack_complex_float* du2,
1568                           const lapack_int* ipiv, lapack_complex_float* b,
1569                           lapack_int ldb );
1570lapack_int LAPACKE_zgttrs( int matrix_order, char trans, lapack_int n,
1571                           lapack_int nrhs, const lapack_complex_double* dl,
1572                           const lapack_complex_double* d,
1573                           const lapack_complex_double* du,
1574                           const lapack_complex_double* du2,
1575                           const lapack_int* ipiv, lapack_complex_double* b,
1576                           lapack_int ldb );
1577
1578lapack_int LAPACKE_chbev( int matrix_order, char jobz, char uplo, lapack_int n,
1579                          lapack_int kd, lapack_complex_float* ab,
1580                          lapack_int ldab, float* w, lapack_complex_float* z,
1581                          lapack_int ldz );
1582lapack_int LAPACKE_zhbev( int matrix_order, char jobz, char uplo, lapack_int n,
1583                          lapack_int kd, lapack_complex_double* ab,
1584                          lapack_int ldab, double* w, lapack_complex_double* z,
1585                          lapack_int ldz );
1586
1587lapack_int LAPACKE_chbevd( int matrix_order, char jobz, char uplo, lapack_int n,
1588                           lapack_int kd, lapack_complex_float* ab,
1589                           lapack_int ldab, float* w, lapack_complex_float* z,
1590                           lapack_int ldz );
1591lapack_int LAPACKE_zhbevd( int matrix_order, char jobz, char uplo, lapack_int n,
1592                           lapack_int kd, lapack_complex_double* ab,
1593                           lapack_int ldab, double* w, lapack_complex_double* z,
1594                           lapack_int ldz );
1595
1596lapack_int LAPACKE_chbevx( int matrix_order, char jobz, char range, char uplo,
1597                           lapack_int n, lapack_int kd,
1598                           lapack_complex_float* ab, lapack_int ldab,
1599                           lapack_complex_float* q, lapack_int ldq, float vl,
1600                           float vu, lapack_int il, lapack_int iu, float abstol,
1601                           lapack_int* m, float* w, lapack_complex_float* z,
1602                           lapack_int ldz, lapack_int* ifail );
1603lapack_int LAPACKE_zhbevx( int matrix_order, char jobz, char range, char uplo,
1604                           lapack_int n, lapack_int kd,
1605                           lapack_complex_double* ab, lapack_int ldab,
1606                           lapack_complex_double* q, lapack_int ldq, double vl,
1607                           double vu, lapack_int il, lapack_int iu,
1608                           double abstol, lapack_int* m, double* w,
1609                           lapack_complex_double* z, lapack_int ldz,
1610                           lapack_int* ifail );
1611
1612lapack_int LAPACKE_chbgst( int matrix_order, char vect, char uplo, lapack_int n,
1613                           lapack_int ka, lapack_int kb,
1614                           lapack_complex_float* ab, lapack_int ldab,
1615                           const lapack_complex_float* bb, lapack_int ldbb,
1616                           lapack_complex_float* x, lapack_int ldx );
1617lapack_int LAPACKE_zhbgst( int matrix_order, char vect, char uplo, lapack_int n,
1618                           lapack_int ka, lapack_int kb,
1619                           lapack_complex_double* ab, lapack_int ldab,
1620                           const lapack_complex_double* bb, lapack_int ldbb,
1621                           lapack_complex_double* x, lapack_int ldx );
1622
1623lapack_int LAPACKE_chbgv( int matrix_order, char jobz, char uplo, lapack_int n,
1624                          lapack_int ka, lapack_int kb,
1625                          lapack_complex_float* ab, lapack_int ldab,
1626                          lapack_complex_float* bb, lapack_int ldbb, float* w,
1627                          lapack_complex_float* z, lapack_int ldz );
1628lapack_int LAPACKE_zhbgv( int matrix_order, char jobz, char uplo, lapack_int n,
1629                          lapack_int ka, lapack_int kb,
1630                          lapack_complex_double* ab, lapack_int ldab,
1631                          lapack_complex_double* bb, lapack_int ldbb, double* w,
1632                          lapack_complex_double* z, lapack_int ldz );
1633
1634lapack_int LAPACKE_chbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
1635                           lapack_int ka, lapack_int kb,
1636                           lapack_complex_float* ab, lapack_int ldab,
1637                           lapack_complex_float* bb, lapack_int ldbb, float* w,
1638                           lapack_complex_float* z, lapack_int ldz );
1639lapack_int LAPACKE_zhbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
1640                           lapack_int ka, lapack_int kb,
1641                           lapack_complex_double* ab, lapack_int ldab,
1642                           lapack_complex_double* bb, lapack_int ldbb,
1643                           double* w, lapack_complex_double* z,
1644                           lapack_int ldz );
1645
1646lapack_int LAPACKE_chbgvx( int matrix_order, char jobz, char range, char uplo,
1647                           lapack_int n, lapack_int ka, lapack_int kb,
1648                           lapack_complex_float* ab, lapack_int ldab,
1649                           lapack_complex_float* bb, lapack_int ldbb,
1650                           lapack_complex_float* q, lapack_int ldq, float vl,
1651                           float vu, lapack_int il, lapack_int iu, float abstol,
1652                           lapack_int* m, float* w, lapack_complex_float* z,
1653                           lapack_int ldz, lapack_int* ifail );
1654lapack_int LAPACKE_zhbgvx( int matrix_order, char jobz, char range, char uplo,
1655                           lapack_int n, lapack_int ka, lapack_int kb,
1656                           lapack_complex_double* ab, lapack_int ldab,
1657                           lapack_complex_double* bb, lapack_int ldbb,
1658                           lapack_complex_double* q, lapack_int ldq, double vl,
1659                           double vu, lapack_int il, lapack_int iu,
1660                           double abstol, lapack_int* m, double* w,
1661                           lapack_complex_double* z, lapack_int ldz,
1662                           lapack_int* ifail );
1663
1664lapack_int LAPACKE_chbtrd( int matrix_order, char vect, char uplo, lapack_int n,
1665                           lapack_int kd, lapack_complex_float* ab,
1666                           lapack_int ldab, float* d, float* e,
1667                           lapack_complex_float* q, lapack_int ldq );
1668lapack_int LAPACKE_zhbtrd( int matrix_order, char vect, char uplo, lapack_int n,
1669                           lapack_int kd, lapack_complex_double* ab,
1670                           lapack_int ldab, double* d, double* e,
1671                           lapack_complex_double* q, lapack_int ldq );
1672
1673lapack_int LAPACKE_checon( int matrix_order, char uplo, lapack_int n,
1674                           const lapack_complex_float* a, lapack_int lda,
1675                           const lapack_int* ipiv, float anorm, float* rcond );
1676lapack_int LAPACKE_zhecon( int matrix_order, char uplo, lapack_int n,
1677                           const lapack_complex_double* a, lapack_int lda,
1678                           const lapack_int* ipiv, double anorm,
1679                           double* rcond );
1680
1681lapack_int LAPACKE_cheequb( int matrix_order, char uplo, lapack_int n,
1682                            const lapack_complex_float* a, lapack_int lda,
1683                            float* s, float* scond, float* amax );
1684lapack_int LAPACKE_zheequb( int matrix_order, char uplo, lapack_int n,
1685                            const lapack_complex_double* a, lapack_int lda,
1686                            double* s, double* scond, double* amax );
1687
1688lapack_int LAPACKE_cheev( int matrix_order, char jobz, char uplo, lapack_int n,
1689                          lapack_complex_float* a, lapack_int lda, float* w );
1690lapack_int LAPACKE_zheev( int matrix_order, char jobz, char uplo, lapack_int n,
1691                          lapack_complex_double* a, lapack_int lda, double* w );
1692
1693lapack_int LAPACKE_cheevd( int matrix_order, char jobz, char uplo, lapack_int n,
1694                           lapack_complex_float* a, lapack_int lda, float* w );
1695lapack_int LAPACKE_zheevd( int matrix_order, char jobz, char uplo, lapack_int n,
1696                           lapack_complex_double* a, lapack_int lda,
1697                           double* w );
1698
1699lapack_int LAPACKE_cheevr( int matrix_order, char jobz, char range, char uplo,
1700                           lapack_int n, lapack_complex_float* a,
1701                           lapack_int lda, float vl, float vu, lapack_int il,
1702                           lapack_int iu, float abstol, lapack_int* m, float* w,
1703                           lapack_complex_float* z, lapack_int ldz,
1704                           lapack_int* isuppz );
1705lapack_int LAPACKE_zheevr( int matrix_order, char jobz, char range, char uplo,
1706                           lapack_int n, lapack_complex_double* a,
1707                           lapack_int lda, double vl, double vu, lapack_int il,
1708                           lapack_int iu, double abstol, lapack_int* m,
1709                           double* w, lapack_complex_double* z, lapack_int ldz,
1710                           lapack_int* isuppz );
1711
1712lapack_int LAPACKE_cheevx( int matrix_order, char jobz, char range, char uplo,
1713                           lapack_int n, lapack_complex_float* a,
1714                           lapack_int lda, float vl, float vu, lapack_int il,
1715                           lapack_int iu, float abstol, lapack_int* m, float* w,
1716                           lapack_complex_float* z, lapack_int ldz,
1717                           lapack_int* ifail );
1718lapack_int LAPACKE_zheevx( int matrix_order, char jobz, char range, char uplo,
1719                           lapack_int n, lapack_complex_double* a,
1720                           lapack_int lda, double vl, double vu, lapack_int il,
1721                           lapack_int iu, double abstol, lapack_int* m,
1722                           double* w, lapack_complex_double* z, lapack_int ldz,
1723                           lapack_int* ifail );
1724
1725lapack_int LAPACKE_chegst( int matrix_order, lapack_int itype, char uplo,
1726                           lapack_int n, lapack_complex_float* a,
1727                           lapack_int lda, const lapack_complex_float* b,
1728                           lapack_int ldb );
1729lapack_int LAPACKE_zhegst( int matrix_order, lapack_int itype, char uplo,
1730                           lapack_int n, lapack_complex_double* a,
1731                           lapack_int lda, const lapack_complex_double* b,
1732                           lapack_int ldb );
1733
1734lapack_int LAPACKE_chegv( int matrix_order, lapack_int itype, char jobz,
1735                          char uplo, lapack_int n, lapack_complex_float* a,
1736                          lapack_int lda, lapack_complex_float* b,
1737                          lapack_int ldb, float* w );
1738lapack_int LAPACKE_zhegv( int matrix_order, lapack_int itype, char jobz,
1739                          char uplo, lapack_int n, lapack_complex_double* a,
1740                          lapack_int lda, lapack_complex_double* b,
1741                          lapack_int ldb, double* w );
1742
1743lapack_int LAPACKE_chegvd( int matrix_order, lapack_int itype, char jobz,
1744                           char uplo, lapack_int n, lapack_complex_float* a,
1745                           lapack_int lda, lapack_complex_float* b,
1746                           lapack_int ldb, float* w );
1747lapack_int LAPACKE_zhegvd( int matrix_order, lapack_int itype, char jobz,
1748                           char uplo, lapack_int n, lapack_complex_double* a,
1749                           lapack_int lda, lapack_complex_double* b,
1750                           lapack_int ldb, double* w );
1751
1752lapack_int LAPACKE_chegvx( int matrix_order, lapack_int itype, char jobz,
1753                           char range, char uplo, lapack_int n,
1754                           lapack_complex_float* a, lapack_int lda,
1755                           lapack_complex_float* b, lapack_int ldb, float vl,
1756                           float vu, lapack_int il, lapack_int iu, float abstol,
1757                           lapack_int* m, float* w, lapack_complex_float* z,
1758                           lapack_int ldz, lapack_int* ifail );
1759lapack_int LAPACKE_zhegvx( int matrix_order, lapack_int itype, char jobz,
1760                           char range, char uplo, lapack_int n,
1761                           lapack_complex_double* a, lapack_int lda,
1762                           lapack_complex_double* b, lapack_int ldb, double vl,
1763                           double vu, lapack_int il, lapack_int iu,
1764                           double abstol, lapack_int* m, double* w,
1765                           lapack_complex_double* z, lapack_int ldz,
1766                           lapack_int* ifail );
1767
1768lapack_int LAPACKE_cherfs( int matrix_order, char uplo, lapack_int n,
1769                           lapack_int nrhs, const lapack_complex_float* a,
1770                           lapack_int lda, const lapack_complex_float* af,
1771                           lapack_int ldaf, const lapack_int* ipiv,
1772                           const lapack_complex_float* b, lapack_int ldb,
1773                           lapack_complex_float* x, lapack_int ldx, float* ferr,
1774                           float* berr );
1775lapack_int LAPACKE_zherfs( int matrix_order, char uplo, lapack_int n,
1776                           lapack_int nrhs, const lapack_complex_double* a,
1777                           lapack_int lda, const lapack_complex_double* af,
1778                           lapack_int ldaf, const lapack_int* ipiv,
1779                           const lapack_complex_double* b, lapack_int ldb,
1780                           lapack_complex_double* x, lapack_int ldx,
1781                           double* ferr, double* berr );
1782
1783lapack_int LAPACKE_cherfsx( int matrix_order, char uplo, char equed,
1784                            lapack_int n, lapack_int nrhs,
1785                            const lapack_complex_float* a, lapack_int lda,
1786                            const lapack_complex_float* af, lapack_int ldaf,
1787                            const lapack_int* ipiv, const float* s,
1788                            const lapack_complex_float* b, lapack_int ldb,
1789                            lapack_complex_float* x, lapack_int ldx,
1790                            float* rcond, float* berr, lapack_int n_err_bnds,
1791                            float* err_bnds_norm, float* err_bnds_comp,
1792                            lapack_int nparams, float* params );
1793lapack_int LAPACKE_zherfsx( int matrix_order, char uplo, char equed,
1794                            lapack_int n, lapack_int nrhs,
1795                            const lapack_complex_double* a, lapack_int lda,
1796                            const lapack_complex_double* af, lapack_int ldaf,
1797                            const lapack_int* ipiv, const double* s,
1798                            const lapack_complex_double* b, lapack_int ldb,
1799                            lapack_complex_double* x, lapack_int ldx,
1800                            double* rcond, double* berr, lapack_int n_err_bnds,
1801                            double* err_bnds_norm, double* err_bnds_comp,
1802                            lapack_int nparams, double* params );
1803
1804lapack_int LAPACKE_chesv( int matrix_order, char uplo, lapack_int n,
1805                          lapack_int nrhs, lapack_complex_float* a,
1806                          lapack_int lda, lapack_int* ipiv,
1807                          lapack_complex_float* b, lapack_int ldb );
1808lapack_int LAPACKE_zhesv( int matrix_order, char uplo, lapack_int n,
1809                          lapack_int nrhs, lapack_complex_double* a,
1810                          lapack_int lda, lapack_int* ipiv,
1811                          lapack_complex_double* b, lapack_int ldb );
1812
1813lapack_int LAPACKE_chesvx( int matrix_order, char fact, char uplo, lapack_int n,
1814                           lapack_int nrhs, const lapack_complex_float* a,
1815                           lapack_int lda, lapack_complex_float* af,
1816                           lapack_int ldaf, lapack_int* ipiv,
1817                           const lapack_complex_float* b, lapack_int ldb,
1818                           lapack_complex_float* x, lapack_int ldx,
1819                           float* rcond, float* ferr, float* berr );
1820lapack_int LAPACKE_zhesvx( int matrix_order, char fact, char uplo, lapack_int n,
1821                           lapack_int nrhs, const lapack_complex_double* a,
1822                           lapack_int lda, lapack_complex_double* af,
1823                           lapack_int ldaf, lapack_int* ipiv,
1824                           const lapack_complex_double* b, lapack_int ldb,
1825                           lapack_complex_double* x, lapack_int ldx,
1826                           double* rcond, double* ferr, double* berr );
1827
1828lapack_int LAPACKE_chesvxx( int matrix_order, char fact, char uplo,
1829                            lapack_int n, lapack_int nrhs,
1830                            lapack_complex_float* a, lapack_int lda,
1831                            lapack_complex_float* af, lapack_int ldaf,
1832                            lapack_int* ipiv, char* equed, float* s,
1833                            lapack_complex_float* b, lapack_int ldb,
1834                            lapack_complex_float* x, lapack_int ldx,
1835                            float* rcond, float* rpvgrw, float* berr,
1836                            lapack_int n_err_bnds, float* err_bnds_norm,
1837                            float* err_bnds_comp, lapack_int nparams,
1838                            float* params );
1839lapack_int LAPACKE_zhesvxx( int matrix_order, char fact, char uplo,
1840                            lapack_int n, lapack_int nrhs,
1841                            lapack_complex_double* a, lapack_int lda,
1842                            lapack_complex_double* af, lapack_int ldaf,
1843                            lapack_int* ipiv, char* equed, double* s,
1844                            lapack_complex_double* b, lapack_int ldb,
1845                            lapack_complex_double* x, lapack_int ldx,
1846                            double* rcond, double* rpvgrw, double* berr,
1847                            lapack_int n_err_bnds, double* err_bnds_norm,
1848                            double* err_bnds_comp, lapack_int nparams,
1849                            double* params );
1850
1851lapack_int LAPACKE_chetrd( int matrix_order, char uplo, lapack_int n,
1852                           lapack_complex_float* a, lapack_int lda, float* d,
1853                           float* e, lapack_complex_float* tau );
1854lapack_int LAPACKE_zhetrd( int matrix_order, char uplo, lapack_int n,
1855                           lapack_complex_double* a, lapack_int lda, double* d,
1856                           double* e, lapack_complex_double* tau );
1857
1858lapack_int LAPACKE_chetrf( int matrix_order, char uplo, lapack_int n,
1859                           lapack_complex_float* a, lapack_int lda,
1860                           lapack_int* ipiv );
1861lapack_int LAPACKE_zhetrf( int matrix_order, char uplo, lapack_int n,
1862                           lapack_complex_double* a, lapack_int lda,
1863                           lapack_int* ipiv );
1864
1865lapack_int LAPACKE_chetri( int matrix_order, char uplo, lapack_int n,
1866                           lapack_complex_float* a, lapack_int lda,
1867                           const lapack_int* ipiv );
1868lapack_int LAPACKE_zhetri( int matrix_order, char uplo, lapack_int n,
1869                           lapack_complex_double* a, lapack_int lda,
1870                           const lapack_int* ipiv );
1871
1872lapack_int LAPACKE_chetrs( int matrix_order, char uplo, lapack_int n,
1873                           lapack_int nrhs, const lapack_complex_float* a,
1874                           lapack_int lda, const lapack_int* ipiv,
1875                           lapack_complex_float* b, lapack_int ldb );
1876lapack_int LAPACKE_zhetrs( int matrix_order, char uplo, lapack_int n,
1877                           lapack_int nrhs, const lapack_complex_double* a,
1878                           lapack_int lda, const lapack_int* ipiv,
1879                           lapack_complex_double* b, lapack_int ldb );
1880
1881lapack_int LAPACKE_chfrk( int matrix_order, char transr, char uplo, char trans,
1882                          lapack_int n, lapack_int k, float alpha,
1883                          const lapack_complex_float* a, lapack_int lda,
1884                          float beta, lapack_complex_float* c );
1885lapack_int LAPACKE_zhfrk( int matrix_order, char transr, char uplo, char trans,
1886                          lapack_int n, lapack_int k, double alpha,
1887                          const lapack_complex_double* a, lapack_int lda,
1888                          double beta, lapack_complex_double* c );
1889
1890lapack_int LAPACKE_shgeqz( int matrix_order, char job, char compq, char compz,
1891                           lapack_int n, lapack_int ilo, lapack_int ihi,
1892                           float* h, lapack_int ldh, float* t, lapack_int ldt,
1893                           float* alphar, float* alphai, float* beta, float* q,
1894                           lapack_int ldq, float* z, lapack_int ldz );
1895lapack_int LAPACKE_dhgeqz( int matrix_order, char job, char compq, char compz,
1896                           lapack_int n, lapack_int ilo, lapack_int ihi,
1897                           double* h, lapack_int ldh, double* t, lapack_int ldt,
1898                           double* alphar, double* alphai, double* beta,
1899                           double* q, lapack_int ldq, double* z,
1900                           lapack_int ldz );
1901lapack_int LAPACKE_chgeqz( int matrix_order, char job, char compq, char compz,
1902                           lapack_int n, lapack_int ilo, lapack_int ihi,
1903                           lapack_complex_float* h, lapack_int ldh,
1904                           lapack_complex_float* t, lapack_int ldt,
1905                           lapack_complex_float* alpha,
1906                           lapack_complex_float* beta, lapack_complex_float* q,
1907                           lapack_int ldq, lapack_complex_float* z,
1908                           lapack_int ldz );
1909lapack_int LAPACKE_zhgeqz( int matrix_order, char job, char compq, char compz,
1910                           lapack_int n, lapack_int ilo, lapack_int ihi,
1911                           lapack_complex_double* h, lapack_int ldh,
1912                           lapack_complex_double* t, lapack_int ldt,
1913                           lapack_complex_double* alpha,
1914                           lapack_complex_double* beta,
1915                           lapack_complex_double* q, lapack_int ldq,
1916                           lapack_complex_double* z, lapack_int ldz );
1917
1918lapack_int LAPACKE_chpcon( int matrix_order, char uplo, lapack_int n,
1919                           const lapack_complex_float* ap,
1920                           const lapack_int* ipiv, float anorm, float* rcond );
1921lapack_int LAPACKE_zhpcon( int matrix_order, char uplo, lapack_int n,
1922                           const lapack_complex_double* ap,
1923                           const lapack_int* ipiv, double anorm,
1924                           double* rcond );
1925
1926lapack_int LAPACKE_chpev( int matrix_order, char jobz, char uplo, lapack_int n,
1927                          lapack_complex_float* ap, float* w,
1928                          lapack_complex_float* z, lapack_int ldz );
1929lapack_int LAPACKE_zhpev( int matrix_order, char jobz, char uplo, lapack_int n,
1930                          lapack_complex_double* ap, double* w,
1931                          lapack_complex_double* z, lapack_int ldz );
1932
1933lapack_int LAPACKE_chpevd( int matrix_order, char jobz, char uplo, lapack_int n,
1934                           lapack_complex_float* ap, float* w,
1935                           lapack_complex_float* z, lapack_int ldz );
1936lapack_int LAPACKE_zhpevd( int matrix_order, char jobz, char uplo, lapack_int n,
1937                           lapack_complex_double* ap, double* w,
1938                           lapack_complex_double* z, lapack_int ldz );
1939
1940lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo,
1941                           lapack_int n, lapack_complex_float* ap, float vl,
1942                           float vu, lapack_int il, lapack_int iu, float abstol,
1943                           lapack_int* m, float* w, lapack_complex_float* z,
1944                           lapack_int ldz, lapack_int* ifail );
1945lapack_int LAPACKE_zhpevx( int matrix_order, char jobz, char range, char uplo,
1946                           lapack_int n, lapack_complex_double* ap, double vl,
1947                           double vu, lapack_int il, lapack_int iu,
1948                           double abstol, lapack_int* m, double* w,
1949                           lapack_complex_double* z, lapack_int ldz,
1950                           lapack_int* ifail );
1951
1952lapack_int LAPACKE_chpgst( int matrix_order, lapack_int itype, char uplo,
1953                           lapack_int n, lapack_complex_float* ap,
1954                           const lapack_complex_float* bp );
1955lapack_int LAPACKE_zhpgst( int matrix_order, lapack_int itype, char uplo,
1956                           lapack_int n, lapack_complex_double* ap,
1957                           const lapack_complex_double* bp );
1958
1959lapack_int LAPACKE_chpgv( int matrix_order, lapack_int itype, char jobz,
1960                          char uplo, lapack_int n, lapack_complex_float* ap,
1961                          lapack_complex_float* bp, float* w,
1962                          lapack_complex_float* z, lapack_int ldz );
1963lapack_int LAPACKE_zhpgv( int matrix_order, lapack_int itype, char jobz,
1964                          char uplo, lapack_int n, lapack_complex_double* ap,
1965                          lapack_complex_double* bp, double* w,
1966                          lapack_complex_double* z, lapack_int ldz );
1967
1968lapack_int LAPACKE_chpgvd( int matrix_order, lapack_int itype, char jobz,
1969                           char uplo, lapack_int n, lapack_complex_float* ap,
1970                           lapack_complex_float* bp, float* w,
1971                           lapack_complex_float* z, lapack_int ldz );
1972lapack_int LAPACKE_zhpgvd( int matrix_order, lapack_int itype, char jobz,
1973                           char uplo, lapack_int n, lapack_complex_double* ap,
1974                           lapack_complex_double* bp, double* w,
1975                           lapack_complex_double* z, lapack_int ldz );
1976
1977lapack_int LAPACKE_chpgvx( int matrix_order, lapack_int itype, char jobz,
1978                           char range, char uplo, lapack_int n,
1979                           lapack_complex_float* ap, lapack_complex_float* bp,
1980                           float vl, float vu, lapack_int il, lapack_int iu,
1981                           float abstol, lapack_int* m, float* w,
1982                           lapack_complex_float* z, lapack_int ldz,
1983                           lapack_int* ifail );
1984lapack_int LAPACKE_zhpgvx( int matrix_order, lapack_int itype, char jobz,
1985                           char range, char uplo, lapack_int n,
1986                           lapack_complex_double* ap, lapack_complex_double* bp,
1987                           double vl, double vu, lapack_int il, lapack_int iu,
1988                           double abstol, lapack_int* m, double* w,
1989                           lapack_complex_double* z, lapack_int ldz,
1990                           lapack_int* ifail );
1991
1992lapack_int LAPACKE_chprfs( int matrix_order, char uplo, lapack_int n,
1993                           lapack_int nrhs, const lapack_complex_float* ap,
1994                           const lapack_complex_float* afp,
1995                           const lapack_int* ipiv,
1996                           const lapack_complex_float* b, lapack_int ldb,
1997                           lapack_complex_float* x, lapack_int ldx, float* ferr,
1998                           float* berr );
1999lapack_int LAPACKE_zhprfs( int matrix_order, char uplo, lapack_int n,
2000                           lapack_int nrhs, const lapack_complex_double* ap,
2001                           const lapack_complex_double* afp,
2002                           const lapack_int* ipiv,
2003                           const lapack_complex_double* b, lapack_int ldb,
2004                           lapack_complex_double* x, lapack_int ldx,
2005                           double* ferr, double* berr );
2006
2007lapack_int LAPACKE_chpsv( int matrix_order, char uplo, lapack_int n,
2008                          lapack_int nrhs, lapack_complex_float* ap,
2009                          lapack_int* ipiv, lapack_complex_float* b,
2010                          lapack_int ldb );
2011lapack_int LAPACKE_zhpsv( int matrix_order, char uplo, lapack_int n,
2012                          lapack_int nrhs, lapack_complex_double* ap,
2013                          lapack_int* ipiv, lapack_complex_double* b,
2014                          lapack_int ldb );
2015
2016lapack_int LAPACKE_chpsvx( int matrix_order, char fact, char uplo, lapack_int n,
2017                           lapack_int nrhs, const lapack_complex_float* ap,
2018                           lapack_complex_float* afp, lapack_int* ipiv,
2019                           const lapack_complex_float* b, lapack_int ldb,
2020                           lapack_complex_float* x, lapack_int ldx,
2021                           float* rcond, float* ferr, float* berr );
2022lapack_int LAPACKE_zhpsvx( int matrix_order, char fact, char uplo, lapack_int n,
2023                           lapack_int nrhs, const lapack_complex_double* ap,
2024                           lapack_complex_double* afp, lapack_int* ipiv,
2025                           const lapack_complex_double* b, lapack_int ldb,
2026                           lapack_complex_double* x, lapack_int ldx,
2027                           double* rcond, double* ferr, double* berr );
2028
2029lapack_int LAPACKE_chptrd( int matrix_order, char uplo, lapack_int n,
2030                           lapack_complex_float* ap, float* d, float* e,
2031                           lapack_complex_float* tau );
2032lapack_int LAPACKE_zhptrd( int matrix_order, char uplo, lapack_int n,
2033                           lapack_complex_double* ap, double* d, double* e,
2034                           lapack_complex_double* tau );
2035
2036lapack_int LAPACKE_chptrf( int matrix_order, char uplo, lapack_int n,
2037                           lapack_complex_float* ap, lapack_int* ipiv );
2038lapack_int LAPACKE_zhptrf( int matrix_order, char uplo, lapack_int n,
2039                           lapack_complex_double* ap, lapack_int* ipiv );
2040
2041lapack_int LAPACKE_chptri( int matrix_order, char uplo, lapack_int n,
2042                           lapack_complex_float* ap, const lapack_int* ipiv );
2043lapack_int LAPACKE_zhptri( int matrix_order, char uplo, lapack_int n,
2044                           lapack_complex_double* ap, const lapack_int* ipiv );
2045
2046lapack_int LAPACKE_chptrs( int matrix_order, char uplo, lapack_int n,
2047                           lapack_int nrhs, const lapack_complex_float* ap,
2048                           const lapack_int* ipiv, lapack_complex_float* b,
2049                           lapack_int ldb );
2050lapack_int LAPACKE_zhptrs( int matrix_order, char uplo, lapack_int n,
2051                           lapack_int nrhs, const lapack_complex_double* ap,
2052                           const lapack_int* ipiv, lapack_complex_double* b,
2053                           lapack_int ldb );
2054
2055lapack_int LAPACKE_shsein( int matrix_order, char job, char eigsrc, char initv,
2056                           lapack_logical* select, lapack_int n, const float* h,
2057                           lapack_int ldh, float* wr, const float* wi,
2058                           float* vl, lapack_int ldvl, float* vr,
2059                           lapack_int ldvr, lapack_int mm, lapack_int* m,
2060                           lapack_int* ifaill, lapack_int* ifailr );
2061lapack_int LAPACKE_dhsein( int matrix_order, char job, char eigsrc, char initv,
2062                           lapack_logical* select, lapack_int n,
2063                           const double* h, lapack_int ldh, double* wr,
2064                           const double* wi, double* vl, lapack_int ldvl,
2065                           double* vr, lapack_int ldvr, lapack_int mm,
2066                           lapack_int* m, lapack_int* ifaill,
2067                           lapack_int* ifailr );
2068lapack_int LAPACKE_chsein( int matrix_order, char job, char eigsrc, char initv,
2069                           const lapack_logical* select, lapack_int n,
2070                           const lapack_complex_float* h, lapack_int ldh,
2071                           lapack_complex_float* w, lapack_complex_float* vl,
2072                           lapack_int ldvl, lapack_complex_float* vr,
2073                           lapack_int ldvr, lapack_int mm, lapack_int* m,
2074                           lapack_int* ifaill, lapack_int* ifailr );
2075lapack_int LAPACKE_zhsein( int matrix_order, char job, char eigsrc, char initv,
2076                           const lapack_logical* select, lapack_int n,
2077                           const lapack_complex_double* h, lapack_int ldh,
2078                           lapack_complex_double* w, lapack_complex_double* vl,
2079                           lapack_int ldvl, lapack_complex_double* vr,
2080                           lapack_int ldvr, lapack_int mm, lapack_int* m,
2081                           lapack_int* ifaill, lapack_int* ifailr );
2082
2083lapack_int LAPACKE_shseqr( int matrix_order, char job, char compz, lapack_int n,
2084                           lapack_int ilo, lapack_int ihi, float* h,
2085                           lapack_int ldh, float* wr, float* wi, float* z,
2086                           lapack_int ldz );
2087lapack_int LAPACKE_dhseqr( int matrix_order, char job, char compz, lapack_int n,
2088                           lapack_int ilo, lapack_int ihi, double* h,
2089                           lapack_int ldh, double* wr, double* wi, double* z,
2090                           lapack_int ldz );
2091lapack_int LAPACKE_chseqr( int matrix_order, char job, char compz, lapack_int n,
2092                           lapack_int ilo, lapack_int ihi,
2093                           lapack_complex_float* h, lapack_int ldh,
2094                           lapack_complex_float* w, lapack_complex_float* z,
2095                           lapack_int ldz );
2096lapack_int LAPACKE_zhseqr( int matrix_order, char job, char compz, lapack_int n,
2097                           lapack_int ilo, lapack_int ihi,
2098                           lapack_complex_double* h, lapack_int ldh,
2099                           lapack_complex_double* w, lapack_complex_double* z,
2100                           lapack_int ldz );
2101
2102lapack_int LAPACKE_clacgv( lapack_int n, lapack_complex_float* x,
2103                           lapack_int incx );
2104lapack_int LAPACKE_zlacgv( lapack_int n, lapack_complex_double* x,
2105                           lapack_int incx );
2106
2107lapack_int LAPACKE_slacpy( int matrix_order, char uplo, lapack_int m,
2108                           lapack_int n, const float* a, lapack_int lda, float* b,
2109                           lapack_int ldb );
2110lapack_int LAPACKE_dlacpy( int matrix_order, char uplo, lapack_int m,
2111                           lapack_int n, const double* a, lapack_int lda, double* b,
2112                           lapack_int ldb );
2113lapack_int LAPACKE_clacpy( int matrix_order, char uplo, lapack_int m,
2114                           lapack_int n, const lapack_complex_float* a,
2115                           lapack_int lda, lapack_complex_float* b,
2116                           lapack_int ldb );
2117lapack_int LAPACKE_zlacpy( int matrix_order, char uplo, lapack_int m,
2118                           lapack_int n, const lapack_complex_double* a,
2119                           lapack_int lda, lapack_complex_double* b,
2120                           lapack_int ldb );
2121
2122lapack_int LAPACKE_zlag2c( int matrix_order, lapack_int m, lapack_int n,
2123                           const lapack_complex_double* a, lapack_int lda,
2124                           lapack_complex_float* sa, lapack_int ldsa );
2125
2126lapack_int LAPACKE_slag2d( int matrix_order, lapack_int m, lapack_int n,
2127                           const float* sa, lapack_int ldsa, double* a,
2128                           lapack_int lda );
2129
2130lapack_int LAPACKE_dlag2s( int matrix_order, lapack_int m, lapack_int n,
2131                           const double* a, lapack_int lda, float* sa,
2132                           lapack_int ldsa );
2133
2134lapack_int LAPACKE_clag2z( int matrix_order, lapack_int m, lapack_int n,
2135                           const lapack_complex_float* sa, lapack_int ldsa,
2136                           lapack_complex_double* a, lapack_int lda );
2137
2138lapack_int LAPACKE_slagge( int matrix_order, lapack_int m, lapack_int n,
2139                           lapack_int kl, lapack_int ku, const float* d,
2140                           float* a, lapack_int lda, lapack_int* iseed );
2141lapack_int LAPACKE_dlagge( int matrix_order, lapack_int m, lapack_int n,
2142                           lapack_int kl, lapack_int ku, const double* d,
2143                           double* a, lapack_int lda, lapack_int* iseed );
2144lapack_int LAPACKE_clagge( int matrix_order, lapack_int m, lapack_int n,
2145                           lapack_int kl, lapack_int ku, const float* d,
2146                           lapack_complex_float* a, lapack_int lda,
2147                           lapack_int* iseed );
2148lapack_int LAPACKE_zlagge( int matrix_order, lapack_int m, lapack_int n,
2149                           lapack_int kl, lapack_int ku, const double* d,
2150                           lapack_complex_double* a, lapack_int lda,
2151                           lapack_int* iseed );
2152
2153float LAPACKE_slamch( char cmach );
2154double LAPACKE_dlamch( char cmach );
2155
2156float LAPACKE_slange( int matrix_order, char norm, lapack_int m,
2157                           lapack_int n, const float* a, lapack_int lda );
2158double LAPACKE_dlange( int matrix_order, char norm, lapack_int m,
2159                           lapack_int n, const double* a, lapack_int lda );
2160float LAPACKE_clange( int matrix_order, char norm, lapack_int m,
2161                           lapack_int n, const lapack_complex_float* a,
2162                           lapack_int lda );
2163double LAPACKE_zlange( int matrix_order, char norm, lapack_int m,
2164                           lapack_int n, const lapack_complex_double* a,
2165                           lapack_int lda );
2166
2167float LAPACKE_clanhe( int matrix_order, char norm, char uplo, lapack_int n,
2168                           const lapack_complex_float* a, lapack_int lda );
2169double LAPACKE_zlanhe( int matrix_order, char norm, char uplo, lapack_int n,
2170                           const lapack_complex_double* a, lapack_int lda );
2171
2172float LAPACKE_slansy( int matrix_order, char norm, char uplo, lapack_int n,
2173                           const float* a, lapack_int lda );
2174double LAPACKE_dlansy( int matrix_order, char norm, char uplo, lapack_int n,
2175                           const double* a, lapack_int lda );
2176float LAPACKE_clansy( int matrix_order, char norm, char uplo, lapack_int n,
2177                           const lapack_complex_float* a, lapack_int lda );
2178double LAPACKE_zlansy( int matrix_order, char norm, char uplo, lapack_int n,
2179                           const lapack_complex_double* a, lapack_int lda );
2180
2181float LAPACKE_slantr( int matrix_order, char norm, char uplo, char diag,
2182                           lapack_int m, lapack_int n, const float* a,
2183                           lapack_int lda );
2184double LAPACKE_dlantr( int matrix_order, char norm, char uplo, char diag,
2185                           lapack_int m, lapack_int n, const double* a,
2186                           lapack_int lda );
2187float LAPACKE_clantr( int matrix_order, char norm, char uplo, char diag,
2188                           lapack_int m, lapack_int n, const lapack_complex_float* a,
2189                           lapack_int lda );
2190double LAPACKE_zlantr( int matrix_order, char norm, char uplo, char diag,
2191                           lapack_int m, lapack_int n, const lapack_complex_double* a,
2192                           lapack_int lda );
2193
2194
2195lapack_int LAPACKE_slarfb( int matrix_order, char side, char trans, char direct,
2196                           char storev, lapack_int m, lapack_int n,
2197                           lapack_int k, const float* v, lapack_int ldv,
2198                           const float* t, lapack_int ldt, float* c,
2199                           lapack_int ldc );
2200lapack_int LAPACKE_dlarfb( int matrix_order, char side, char trans, char direct,
2201                           char storev, lapack_int m, lapack_int n,
2202                           lapack_int k, const double* v, lapack_int ldv,
2203                           const double* t, lapack_int ldt, double* c,
2204                           lapack_int ldc );
2205lapack_int LAPACKE_clarfb( int matrix_order, char side, char trans, char direct,
2206                           char storev, lapack_int m, lapack_int n,
2207                           lapack_int k, const lapack_complex_float* v,
2208                           lapack_int ldv, const lapack_complex_float* t,
2209                           lapack_int ldt, lapack_complex_float* c,
2210                           lapack_int ldc );
2211lapack_int LAPACKE_zlarfb( int matrix_order, char side, char trans, char direct,
2212                           char storev, lapack_int m, lapack_int n,
2213                           lapack_int k, const lapack_complex_double* v,
2214                           lapack_int ldv, const lapack_complex_double* t,
2215                           lapack_int ldt, lapack_complex_double* c,
2216                           lapack_int ldc );
2217
2218lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
2219                           lapack_int incx, float* tau );
2220lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
2221                           lapack_int incx, double* tau );
2222lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
2223                           lapack_complex_float* x, lapack_int incx,
2224                           lapack_complex_float* tau );
2225lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
2226                           lapack_complex_double* x, lapack_int incx,
2227                           lapack_complex_double* tau );
2228
2229lapack_int LAPACKE_slarft( int matrix_order, char direct, char storev,
2230                           lapack_int n, lapack_int k, const float* v,
2231                           lapack_int ldv, const float* tau, float* t,
2232                           lapack_int ldt );
2233lapack_int LAPACKE_dlarft( int matrix_order, char direct, char storev,
2234                           lapack_int n, lapack_int k, const double* v,
2235                           lapack_int ldv, const double* tau, double* t,
2236                           lapack_int ldt );
2237lapack_int LAPACKE_clarft( int matrix_order, char direct, char storev,
2238                           lapack_int n, lapack_int k,
2239                           const lapack_complex_float* v, lapack_int ldv,
2240                           const lapack_complex_float* tau,
2241                           lapack_complex_float* t, lapack_int ldt );
2242lapack_int LAPACKE_zlarft( int matrix_order, char direct, char storev,
2243                           lapack_int n, lapack_int k,
2244                           const lapack_complex_double* v, lapack_int ldv,
2245                           const lapack_complex_double* tau,
2246                           lapack_complex_double* t, lapack_int ldt );
2247
2248lapack_int LAPACKE_slarfx( int matrix_order, char side, lapack_int m,
2249                           lapack_int n, const float* v, float tau, float* c,
2250                           lapack_int ldc, float* work );
2251lapack_int LAPACKE_dlarfx( int matrix_order, char side, lapack_int m,
2252                           lapack_int n, const double* v, double tau, double* c,
2253                           lapack_int ldc, double* work );
2254lapack_int LAPACKE_clarfx( int matrix_order, char side, lapack_int m,
2255                           lapack_int n, const lapack_complex_float* v,
2256                           lapack_complex_float tau, lapack_complex_float* c,
2257                           lapack_int ldc, lapack_complex_float* work );
2258lapack_int LAPACKE_zlarfx( int matrix_order, char side, lapack_int m,
2259                           lapack_int n, const lapack_complex_double* v,
2260                           lapack_complex_double tau, lapack_complex_double* c,
2261                           lapack_int ldc, lapack_complex_double* work );
2262
2263lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2264                           float* x );
2265lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2266                           double* x );
2267lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2268                           lapack_complex_float* x );
2269lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2270                           lapack_complex_double* x );
2271
2272lapack_int LAPACKE_slaset( int matrix_order, char uplo, lapack_int m,
2273                           lapack_int n, float alpha, float beta, float* a,
2274                           lapack_int lda );
2275lapack_int LAPACKE_dlaset( int matrix_order, char uplo, lapack_int m,
2276                           lapack_int n, double alpha, double beta, double* a,
2277                           lapack_int lda );
2278lapack_int LAPACKE_claset( int matrix_order, char uplo, lapack_int m,
2279                           lapack_int n, lapack_complex_float alpha,
2280                           lapack_complex_float beta, lapack_complex_float* a,
2281                           lapack_int lda );
2282lapack_int LAPACKE_zlaset( int matrix_order, char uplo, lapack_int m,
2283                           lapack_int n, lapack_complex_double alpha,
2284                           lapack_complex_double beta, lapack_complex_double* a,
2285                           lapack_int lda );
2286
2287lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
2288lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
2289
2290lapack_int LAPACKE_slaswp( int matrix_order, lapack_int n, float* a,
2291                           lapack_int lda, lapack_int k1, lapack_int k2,
2292                           const lapack_int* ipiv, lapack_int incx );
2293lapack_int LAPACKE_dlaswp( int matrix_order, lapack_int n, double* a,
2294                           lapack_int lda, lapack_int k1, lapack_int k2,
2295                           const lapack_int* ipiv, lapack_int incx );
2296lapack_int LAPACKE_claswp( int matrix_order, lapack_int n,
2297                           lapack_complex_float* a, lapack_int lda,
2298                           lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2299                           lapack_int incx );
2300lapack_int LAPACKE_zlaswp( int matrix_order, lapack_int n,
2301                           lapack_complex_double* a, lapack_int lda,
2302                           lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2303                           lapack_int incx );
2304
2305lapack_int LAPACKE_slatms( int matrix_order, lapack_int m, lapack_int n,
2306                           char dist, lapack_int* iseed, char sym, float* d,
2307                           lapack_int mode, float cond, float dmax,
2308                           lapack_int kl, lapack_int ku, char pack, float* a,
2309                           lapack_int lda );
2310lapack_int LAPACKE_dlatms( int matrix_order, lapack_int m, lapack_int n,
2311                           char dist, lapack_int* iseed, char sym, double* d,
2312                           lapack_int mode, double cond, double dmax,
2313                           lapack_int kl, lapack_int ku, char pack, double* a,
2314                           lapack_int lda );
2315lapack_int LAPACKE_clatms( int matrix_order, lapack_int m, lapack_int n,
2316                           char dist, lapack_int* iseed, char sym, float* d,
2317                           lapack_int mode, float cond, float dmax,
2318                           lapack_int kl, lapack_int ku, char pack,
2319                           lapack_complex_float* a, lapack_int lda );
2320lapack_int LAPACKE_zlatms( int matrix_order, lapack_int m, lapack_int n,
2321                           char dist, lapack_int* iseed, char sym, double* d,
2322                           lapack_int mode, double cond, double dmax,
2323                           lapack_int kl, lapack_int ku, char pack,
2324                           lapack_complex_double* a, lapack_int lda );
2325
2326lapack_int LAPACKE_slauum( int matrix_order, char uplo, lapack_int n, float* a,
2327                           lapack_int lda );
2328lapack_int LAPACKE_dlauum( int matrix_order, char uplo, lapack_int n, double* a,
2329                           lapack_int lda );
2330lapack_int LAPACKE_clauum( int matrix_order, char uplo, lapack_int n,
2331                           lapack_complex_float* a, lapack_int lda );
2332lapack_int LAPACKE_zlauum( int matrix_order, char uplo, lapack_int n,
2333                           lapack_complex_double* a, lapack_int lda );
2334
2335lapack_int LAPACKE_sopgtr( int matrix_order, char uplo, lapack_int n,
2336                           const float* ap, const float* tau, float* q,
2337                           lapack_int ldq );
2338lapack_int LAPACKE_dopgtr( int matrix_order, char uplo, lapack_int n,
2339                           const double* ap, const double* tau, double* q,
2340                           lapack_int ldq );
2341
2342lapack_int LAPACKE_sopmtr( int matrix_order, char side, char uplo, char trans,
2343                           lapack_int m, lapack_int n, const float* ap,
2344                           const float* tau, float* c, lapack_int ldc );
2345lapack_int LAPACKE_dopmtr( int matrix_order, char side, char uplo, char trans,
2346                           lapack_int m, lapack_int n, const double* ap,
2347                           const double* tau, double* c, lapack_int ldc );
2348
2349lapack_int LAPACKE_sorgbr( int matrix_order, char vect, lapack_int m,
2350                           lapack_int n, lapack_int k, float* a, lapack_int lda,
2351                           const float* tau );
2352lapack_int LAPACKE_dorgbr( int matrix_order, char vect, lapack_int m,
2353                           lapack_int n, lapack_int k, double* a,
2354                           lapack_int lda, const double* tau );
2355
2356lapack_int LAPACKE_sorghr( int matrix_order, lapack_int n, lapack_int ilo,
2357                           lapack_int ihi, float* a, lapack_int lda,
2358                           const float* tau );
2359lapack_int LAPACKE_dorghr( int matrix_order, lapack_int n, lapack_int ilo,
2360                           lapack_int ihi, double* a, lapack_int lda,
2361                           const double* tau );
2362
2363lapack_int LAPACKE_sorglq( int matrix_order, lapack_int m, lapack_int n,
2364                           lapack_int k, float* a, lapack_int lda,
2365                           const float* tau );
2366lapack_int LAPACKE_dorglq( int matrix_order, lapack_int m, lapack_int n,
2367                           lapack_int k, double* a, lapack_int lda,
2368                           const double* tau );
2369
2370lapack_int LAPACKE_sorgql( int matrix_order, lapack_int m, lapack_int n,
2371                           lapack_int k, float* a, lapack_int lda,
2372                           const float* tau );
2373lapack_int LAPACKE_dorgql( int matrix_order, lapack_int m, lapack_int n,
2374                           lapack_int k, double* a, lapack_int lda,
2375                           const double* tau );
2376
2377lapack_int LAPACKE_sorgqr( int matrix_order, lapack_int m, lapack_int n,
2378                           lapack_int k, float* a, lapack_int lda,
2379                           const float* tau );
2380lapack_int LAPACKE_dorgqr( int matrix_order, lapack_int m, lapack_int n,
2381                           lapack_int k, double* a, lapack_int lda,
2382                           const double* tau );
2383
2384lapack_int LAPACKE_sorgrq( int matrix_order, lapack_int m, lapack_int n,
2385                           lapack_int k, float* a, lapack_int lda,
2386                           const float* tau );
2387lapack_int LAPACKE_dorgrq( int matrix_order, lapack_int m, lapack_int n,
2388                           lapack_int k, double* a, lapack_int lda,
2389                           const double* tau );
2390
2391lapack_int LAPACKE_sorgtr( int matrix_order, char uplo, lapack_int n, float* a,
2392                           lapack_int lda, const float* tau );
2393lapack_int LAPACKE_dorgtr( int matrix_order, char uplo, lapack_int n, double* a,
2394                           lapack_int lda, const double* tau );
2395
2396lapack_int LAPACKE_sormbr( int matrix_order, char vect, char side, char trans,
2397                           lapack_int m, lapack_int n, lapack_int k,
2398                           const float* a, lapack_int lda, const float* tau,
2399                           float* c, lapack_int ldc );
2400lapack_int LAPACKE_dormbr( int matrix_order, char vect, char side, char trans,
2401                           lapack_int m, lapack_int n, lapack_int k,
2402                           const double* a, lapack_int lda, const double* tau,
2403                           double* c, lapack_int ldc );
2404
2405lapack_int LAPACKE_sormhr( int matrix_order, char side, char trans,
2406                           lapack_int m, lapack_int n, lapack_int ilo,
2407                           lapack_int ihi, const float* a, lapack_int lda,
2408                           const float* tau, float* c, lapack_int ldc );
2409lapack_int LAPACKE_dormhr( int matrix_order, char side, char trans,
2410                           lapack_int m, lapack_int n, lapack_int ilo,
2411                           lapack_int ihi, const double* a, lapack_int lda,
2412                           const double* tau, double* c, lapack_int ldc );
2413
2414lapack_int LAPACKE_sormlq( int matrix_order, char side, char trans,
2415                           lapack_int m, lapack_int n, lapack_int k,
2416                           const float* a, lapack_int lda, const float* tau,
2417                           float* c, lapack_int ldc );
2418lapack_int LAPACKE_dormlq( int matrix_order, char side, char trans,
2419                           lapack_int m, lapack_int n, lapack_int k,
2420                           const double* a, lapack_int lda, const double* tau,
2421                           double* c, lapack_int ldc );
2422
2423lapack_int LAPACKE_sormql( int matrix_order, char side, char trans,
2424                           lapack_int m, lapack_int n, lapack_int k,
2425                           const float* a, lapack_int lda, const float* tau,
2426                           float* c, lapack_int ldc );
2427lapack_int LAPACKE_dormql( int matrix_order, char side, char trans,
2428                           lapack_int m, lapack_int n, lapack_int k,
2429                           const double* a, lapack_int lda, const double* tau,
2430                           double* c, lapack_int ldc );
2431
2432lapack_int LAPACKE_sormqr( int matrix_order, char side, char trans,
2433                           lapack_int m, lapack_int n, lapack_int k,
2434                           const float* a, lapack_int lda, const float* tau,
2435                           float* c, lapack_int ldc );
2436lapack_int LAPACKE_dormqr( int matrix_order, char side, char trans,
2437                           lapack_int m, lapack_int n, lapack_int k,
2438                           const double* a, lapack_int lda, const double* tau,
2439                           double* c, lapack_int ldc );
2440
2441lapack_int LAPACKE_sormrq( int matrix_order, char side, char trans,
2442                           lapack_int m, lapack_int n, lapack_int k,
2443                           const float* a, lapack_int lda, const float* tau,
2444                           float* c, lapack_int ldc );
2445lapack_int LAPACKE_dormrq( int matrix_order, char side, char trans,
2446                           lapack_int m, lapack_int n, lapack_int k,
2447                           const double* a, lapack_int lda, const double* tau,
2448                           double* c, lapack_int ldc );
2449
2450lapack_int LAPACKE_sormrz( int matrix_order, char side, char trans,
2451                           lapack_int m, lapack_int n, lapack_int k,
2452                           lapack_int l, const float* a, lapack_int lda,
2453                           const float* tau, float* c, lapack_int ldc );
2454lapack_int LAPACKE_dormrz( int matrix_order, char side, char trans,
2455                           lapack_int m, lapack_int n, lapack_int k,
2456                           lapack_int l, const double* a, lapack_int lda,
2457                           const double* tau, double* c, lapack_int ldc );
2458
2459lapack_int LAPACKE_sormtr( int matrix_order, char side, char uplo, char trans,
2460                           lapack_int m, lapack_int n, const float* a,
2461                           lapack_int lda, const float* tau, float* c,
2462                           lapack_int ldc );
2463lapack_int LAPACKE_dormtr( int matrix_order, char side, char uplo, char trans,
2464                           lapack_int m, lapack_int n, const double* a,
2465                           lapack_int lda, const double* tau, double* c,
2466                           lapack_int ldc );
2467
2468lapack_int LAPACKE_spbcon( int matrix_order, char uplo, lapack_int n,
2469                           lapack_int kd, const float* ab, lapack_int ldab,
2470                           float anorm, float* rcond );
2471lapack_int LAPACKE_dpbcon( int matrix_order, char uplo, lapack_int n,
2472                           lapack_int kd, const double* ab, lapack_int ldab,
2473                           double anorm, double* rcond );
2474lapack_int LAPACKE_cpbcon( int matrix_order, char uplo, lapack_int n,
2475                           lapack_int kd, const lapack_complex_float* ab,
2476                           lapack_int ldab, float anorm, float* rcond );
2477lapack_int LAPACKE_zpbcon( int matrix_order, char uplo, lapack_int n,
2478                           lapack_int kd, const lapack_complex_double* ab,
2479                           lapack_int ldab, double anorm, double* rcond );
2480
2481lapack_int LAPACKE_spbequ( int matrix_order, char uplo, lapack_int n,
2482                           lapack_int kd, const float* ab, lapack_int ldab,
2483                           float* s, float* scond, float* amax );
2484lapack_int LAPACKE_dpbequ( int matrix_order, char uplo, lapack_int n,
2485                           lapack_int kd, const double* ab, lapack_int ldab,
2486                           double* s, double* scond, double* amax );
2487lapack_int LAPACKE_cpbequ( int matrix_order, char uplo, lapack_int n,
2488                           lapack_int kd, const lapack_complex_float* ab,
2489                           lapack_int ldab, float* s, float* scond,
2490                           float* amax );
2491lapack_int LAPACKE_zpbequ( int matrix_order, char uplo, lapack_int n,
2492                           lapack_int kd, const lapack_complex_double* ab,
2493                           lapack_int ldab, double* s, double* scond,
2494                           double* amax );
2495
2496lapack_int LAPACKE_spbrfs( int matrix_order, char uplo, lapack_int n,
2497                           lapack_int kd, lapack_int nrhs, const float* ab,
2498                           lapack_int ldab, const float* afb, lapack_int ldafb,
2499                           const float* b, lapack_int ldb, float* x,
2500                           lapack_int ldx, float* ferr, float* berr );
2501lapack_int LAPACKE_dpbrfs( int matrix_order, char uplo, lapack_int n,
2502                           lapack_int kd, lapack_int nrhs, const double* ab,
2503                           lapack_int ldab, const double* afb, lapack_int ldafb,
2504                           const double* b, lapack_int ldb, double* x,
2505                           lapack_int ldx, double* ferr, double* berr );
2506lapack_int LAPACKE_cpbrfs( int matrix_order, char uplo, lapack_int n,
2507                           lapack_int kd, lapack_int nrhs,
2508                           const lapack_complex_float* ab, lapack_int ldab,
2509                           const lapack_complex_float* afb, lapack_int ldafb,
2510                           const lapack_complex_float* b, lapack_int ldb,
2511                           lapack_complex_float* x, lapack_int ldx, float* ferr,
2512                           float* berr );
2513lapack_int LAPACKE_zpbrfs( int matrix_order, char uplo, lapack_int n,
2514                           lapack_int kd, lapack_int nrhs,
2515                           const lapack_complex_double* ab, lapack_int ldab,
2516                           const lapack_complex_double* afb, lapack_int ldafb,
2517                           const lapack_complex_double* b, lapack_int ldb,
2518                           lapack_complex_double* x, lapack_int ldx,
2519                           double* ferr, double* berr );
2520
2521lapack_int LAPACKE_spbstf( int matrix_order, char uplo, lapack_int n,
2522                           lapack_int kb, float* bb, lapack_int ldbb );
2523lapack_int LAPACKE_dpbstf( int matrix_order, char uplo, lapack_int n,
2524                           lapack_int kb, double* bb, lapack_int ldbb );
2525lapack_int LAPACKE_cpbstf( int matrix_order, char uplo, lapack_int n,
2526                           lapack_int kb, lapack_complex_float* bb,
2527                           lapack_int ldbb );
2528lapack_int LAPACKE_zpbstf( int matrix_order, char uplo, lapack_int n,
2529                           lapack_int kb, lapack_complex_double* bb,
2530                           lapack_int ldbb );
2531
2532lapack_int LAPACKE_spbsv( int matrix_order, char uplo, lapack_int n,
2533                          lapack_int kd, lapack_int nrhs, float* ab,
2534                          lapack_int ldab, float* b, lapack_int ldb );
2535lapack_int LAPACKE_dpbsv( int matrix_order, char uplo, lapack_int n,
2536                          lapack_int kd, lapack_int nrhs, double* ab,
2537                          lapack_int ldab, double* b, lapack_int ldb );
2538lapack_int LAPACKE_cpbsv( int matrix_order, char uplo, lapack_int n,
2539                          lapack_int kd, lapack_int nrhs,
2540                          lapack_complex_float* ab, lapack_int ldab,
2541                          lapack_complex_float* b, lapack_int ldb );
2542lapack_int LAPACKE_zpbsv( int matrix_order, char uplo, lapack_int n,
2543                          lapack_int kd, lapack_int nrhs,
2544                          lapack_complex_double* ab, lapack_int ldab,
2545                          lapack_complex_double* b, lapack_int ldb );
2546
2547lapack_int LAPACKE_spbsvx( int matrix_order, char fact, char uplo, lapack_int n,
2548                           lapack_int kd, lapack_int nrhs, float* ab,
2549                           lapack_int ldab, float* afb, lapack_int ldafb,
2550                           char* equed, float* s, float* b, lapack_int ldb,
2551                           float* x, lapack_int ldx, float* rcond, float* ferr,
2552                           float* berr );
2553lapack_int LAPACKE_dpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
2554                           lapack_int kd, lapack_int nrhs, double* ab,
2555                           lapack_int ldab, double* afb, lapack_int ldafb,
2556                           char* equed, double* s, double* b, lapack_int ldb,
2557                           double* x, lapack_int ldx, double* rcond,
2558                           double* ferr, double* berr );
2559lapack_int LAPACKE_cpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
2560                           lapack_int kd, lapack_int nrhs,
2561                           lapack_complex_float* ab, lapack_int ldab,
2562                           lapack_complex_float* afb, lapack_int ldafb,
2563                           char* equed, float* s, lapack_complex_float* b,
2564                           lapack_int ldb, lapack_complex_float* x,
2565                           lapack_int ldx, float* rcond, float* ferr,
2566                           float* berr );
2567lapack_int LAPACKE_zpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
2568                           lapack_int kd, lapack_int nrhs,
2569                           lapack_complex_double* ab, lapack_int ldab,
2570                           lapack_complex_double* afb, lapack_int ldafb,
2571                           char* equed, double* s, lapack_complex_double* b,
2572                           lapack_int ldb, lapack_complex_double* x,
2573                           lapack_int ldx, double* rcond, double* ferr,
2574                           double* berr );
2575
2576lapack_int LAPACKE_spbtrf( int matrix_order, char uplo, lapack_int n,
2577                           lapack_int kd, float* ab, lapack_int ldab );
2578lapack_int LAPACKE_dpbtrf( int matrix_order, char uplo, lapack_int n,
2579                           lapack_int kd, double* ab, lapack_int ldab );
2580lapack_int LAPACKE_cpbtrf( int matrix_order, char uplo, lapack_int n,
2581                           lapack_int kd, lapack_complex_float* ab,
2582                           lapack_int ldab );
2583lapack_int LAPACKE_zpbtrf( int matrix_order, char uplo, lapack_int n,
2584                           lapack_int kd, lapack_complex_double* ab,
2585                           lapack_int ldab );
2586
2587lapack_int LAPACKE_spbtrs( int matrix_order, char uplo, lapack_int n,
2588                           lapack_int kd, lapack_int nrhs, const float* ab,
2589                           lapack_int ldab, float* b, lapack_int ldb );
2590lapack_int LAPACKE_dpbtrs( int matrix_order, char uplo, lapack_int n,
2591                           lapack_int kd, lapack_int nrhs, const double* ab,
2592                           lapack_int ldab, double* b, lapack_int ldb );
2593lapack_int LAPACKE_cpbtrs( int matrix_order, char uplo, lapack_int n,
2594                           lapack_int kd, lapack_int nrhs,
2595                           const lapack_complex_float* ab, lapack_int ldab,
2596                           lapack_complex_float* b, lapack_int ldb );
2597lapack_int LAPACKE_zpbtrs( int matrix_order, char uplo, lapack_int n,
2598                           lapack_int kd, lapack_int nrhs,
2599                           const lapack_complex_double* ab, lapack_int ldab,
2600                           lapack_complex_double* b, lapack_int ldb );
2601
2602lapack_int LAPACKE_spftrf( int matrix_order, char transr, char uplo,
2603                           lapack_int n, float* a );
2604lapack_int LAPACKE_dpftrf( int matrix_order, char transr, char uplo,
2605                           lapack_int n, double* a );
2606lapack_int LAPACKE_cpftrf( int matrix_order, char transr, char uplo,
2607                           lapack_int n, lapack_complex_float* a );
2608lapack_int LAPACKE_zpftrf( int matrix_order, char transr, char uplo,
2609                           lapack_int n, lapack_complex_double* a );
2610
2611lapack_int LAPACKE_spftri( int matrix_order, char transr, char uplo,
2612                           lapack_int n, float* a );
2613lapack_int LAPACKE_dpftri( int matrix_order, char transr, char uplo,
2614                           lapack_int n, double* a );
2615lapack_int LAPACKE_cpftri( int matrix_order, char transr, char uplo,
2616                           lapack_int n, lapack_complex_float* a );
2617lapack_int LAPACKE_zpftri( int matrix_order, char transr, char uplo,
2618                           lapack_int n, lapack_complex_double* a );
2619
2620lapack_int LAPACKE_spftrs( int matrix_order, char transr, char uplo,
2621                           lapack_int n, lapack_int nrhs, const float* a,
2622                           float* b, lapack_int ldb );
2623lapack_int LAPACKE_dpftrs( int matrix_order, char transr, char uplo,
2624                           lapack_int n, lapack_int nrhs, const double* a,
2625                           double* b, lapack_int ldb );
2626lapack_int LAPACKE_cpftrs( int matrix_order, char transr, char uplo,
2627                           lapack_int n, lapack_int nrhs,
2628                           const lapack_complex_float* a,
2629                           lapack_complex_float* b, lapack_int ldb );
2630lapack_int LAPACKE_zpftrs( int matrix_order, char transr, char uplo,
2631                           lapack_int n, lapack_int nrhs,
2632                           const lapack_complex_double* a,
2633                           lapack_complex_double* b, lapack_int ldb );
2634
2635lapack_int LAPACKE_spocon( int matrix_order, char uplo, lapack_int n,
2636                           const float* a, lapack_int lda, float anorm,
2637                           float* rcond );
2638lapack_int LAPACKE_dpocon( int matrix_order, char uplo, lapack_int n,
2639                           const double* a, lapack_int lda, double anorm,
2640                           double* rcond );
2641lapack_int LAPACKE_cpocon( int matrix_order, char uplo, lapack_int n,
2642                           const lapack_complex_float* a, lapack_int lda,
2643                           float anorm, float* rcond );
2644lapack_int LAPACKE_zpocon( int matrix_order, char uplo, lapack_int n,
2645                           const lapack_complex_double* a, lapack_int lda,
2646                           double anorm, double* rcond );
2647
2648lapack_int LAPACKE_spoequ( int matrix_order, lapack_int n, const float* a,
2649                           lapack_int lda, float* s, float* scond,
2650                           float* amax );
2651lapack_int LAPACKE_dpoequ( int matrix_order, lapack_int n, const double* a,
2652                           lapack_int lda, double* s, double* scond,
2653                           double* amax );
2654lapack_int LAPACKE_cpoequ( int matrix_order, lapack_int n,
2655                           const lapack_complex_float* a, lapack_int lda,
2656                           float* s, float* scond, float* amax );
2657lapack_int LAPACKE_zpoequ( int matrix_order, lapack_int n,
2658                           const lapack_complex_double* a, lapack_int lda,
2659                           double* s, double* scond, double* amax );
2660
2661lapack_int LAPACKE_spoequb( int matrix_order, lapack_int n, const float* a,
2662                            lapack_int lda, float* s, float* scond,
2663                            float* amax );
2664lapack_int LAPACKE_dpoequb( int matrix_order, lapack_int n, const double* a,
2665                            lapack_int lda, double* s, double* scond,
2666                            double* amax );
2667lapack_int LAPACKE_cpoequb( int matrix_order, lapack_int n,
2668                            const lapack_complex_float* a, lapack_int lda,
2669                            float* s, float* scond, float* amax );
2670lapack_int LAPACKE_zpoequb( int matrix_order, lapack_int n,
2671                            const lapack_complex_double* a, lapack_int lda,
2672                            double* s, double* scond, double* amax );
2673
2674lapack_int LAPACKE_sporfs( int matrix_order, char uplo, lapack_int n,
2675                           lapack_int nrhs, const float* a, lapack_int lda,
2676                           const float* af, lapack_int ldaf, const float* b,
2677                           lapack_int ldb, float* x, lapack_int ldx,
2678                           float* ferr, float* berr );
2679lapack_int LAPACKE_dporfs( int matrix_order, char uplo, lapack_int n,
2680                           lapack_int nrhs, const double* a, lapack_int lda,
2681                           const double* af, lapack_int ldaf, const double* b,
2682                           lapack_int ldb, double* x, lapack_int ldx,
2683                           double* ferr, double* berr );
2684lapack_int LAPACKE_cporfs( int matrix_order, char uplo, lapack_int n,
2685                           lapack_int nrhs, const lapack_complex_float* a,
2686                           lapack_int lda, const lapack_complex_float* af,
2687                           lapack_int ldaf, const lapack_complex_float* b,
2688                           lapack_int ldb, lapack_complex_float* x,
2689                           lapack_int ldx, float* ferr, float* berr );
2690lapack_int LAPACKE_zporfs( int matrix_order, char uplo, lapack_int n,
2691                           lapack_int nrhs, const lapack_complex_double* a,
2692                           lapack_int lda, const lapack_complex_double* af,
2693                           lapack_int ldaf, const lapack_complex_double* b,
2694                           lapack_int ldb, lapack_complex_double* x,
2695                           lapack_int ldx, double* ferr, double* berr );
2696
2697lapack_int LAPACKE_sporfsx( int matrix_order, char uplo, char equed,
2698                            lapack_int n, lapack_int nrhs, const float* a,
2699                            lapack_int lda, const float* af, lapack_int ldaf,
2700                            const float* s, const float* b, lapack_int ldb,
2701                            float* x, lapack_int ldx, float* rcond, float* berr,
2702                            lapack_int n_err_bnds, float* err_bnds_norm,
2703                            float* err_bnds_comp, lapack_int nparams,
2704                            float* params );
2705lapack_int LAPACKE_dporfsx( int matrix_order, char uplo, char equed,
2706                            lapack_int n, lapack_int nrhs, const double* a,
2707                            lapack_int lda, const double* af, lapack_int ldaf,
2708                            const double* s, const double* b, lapack_int ldb,
2709                            double* x, lapack_int ldx, double* rcond,
2710                            double* berr, lapack_int n_err_bnds,
2711                            double* err_bnds_norm, double* err_bnds_comp,
2712                            lapack_int nparams, double* params );
2713lapack_int LAPACKE_cporfsx( int matrix_order, char uplo, char equed,
2714                            lapack_int n, lapack_int nrhs,
2715                            const lapack_complex_float* a, lapack_int lda,
2716                            const lapack_complex_float* af, lapack_int ldaf,
2717                            const float* s, const lapack_complex_float* b,
2718                            lapack_int ldb, lapack_complex_float* x,
2719                            lapack_int ldx, float* rcond, float* berr,
2720                            lapack_int n_err_bnds, float* err_bnds_norm,
2721                            float* err_bnds_comp, lapack_int nparams,
2722                            float* params );
2723lapack_int LAPACKE_zporfsx( int matrix_order, char uplo, char equed,
2724                            lapack_int n, lapack_int nrhs,
2725                            const lapack_complex_double* a, lapack_int lda,
2726                            const lapack_complex_double* af, lapack_int ldaf,
2727                            const double* s, const lapack_complex_double* b,
2728                            lapack_int ldb, lapack_complex_double* x,
2729                            lapack_int ldx, double* rcond, double* berr,
2730                            lapack_int n_err_bnds, double* err_bnds_norm,
2731                            double* err_bnds_comp, lapack_int nparams,
2732                            double* params );
2733
2734lapack_int LAPACKE_sposv( int matrix_order, char uplo, lapack_int n,
2735                          lapack_int nrhs, float* a, lapack_int lda, float* b,
2736                          lapack_int ldb );
2737lapack_int LAPACKE_dposv( int matrix_order, char uplo, lapack_int n,
2738                          lapack_int nrhs, double* a, lapack_int lda, double* b,
2739                          lapack_int ldb );
2740lapack_int LAPACKE_cposv( int matrix_order, char uplo, lapack_int n,
2741                          lapack_int nrhs, lapack_complex_float* a,
2742                          lapack_int lda, lapack_complex_float* b,
2743                          lapack_int ldb );
2744lapack_int LAPACKE_zposv( int matrix_order, char uplo, lapack_int n,
2745                          lapack_int nrhs, lapack_complex_double* a,
2746                          lapack_int lda, lapack_complex_double* b,
2747                          lapack_int ldb );
2748lapack_int LAPACKE_dsposv( int matrix_order, char uplo, lapack_int n,
2749                           lapack_int nrhs, double* a, lapack_int lda,
2750                           double* b, lapack_int ldb, double* x, lapack_int ldx,
2751                           lapack_int* iter );
2752lapack_int LAPACKE_zcposv( int matrix_order, char uplo, lapack_int n,
2753                           lapack_int nrhs, lapack_complex_double* a,
2754                           lapack_int lda, lapack_complex_double* b,
2755                           lapack_int ldb, lapack_complex_double* x,
2756                           lapack_int ldx, lapack_int* iter );
2757
2758lapack_int LAPACKE_sposvx( int matrix_order, char fact, char uplo, lapack_int n,
2759                           lapack_int nrhs, float* a, lapack_int lda, float* af,
2760                           lapack_int ldaf, char* equed, float* s, float* b,
2761                           lapack_int ldb, float* x, lapack_int ldx,
2762                           float* rcond, float* ferr, float* berr );
2763lapack_int LAPACKE_dposvx( int matrix_order, char fact, char uplo, lapack_int n,
2764                           lapack_int nrhs, double* a, lapack_int lda,
2765                           double* af, lapack_int ldaf, char* equed, double* s,
2766                           double* b, lapack_int ldb, double* x, lapack_int ldx,
2767                           double* rcond, double* ferr, double* berr );
2768lapack_int LAPACKE_cposvx( int matrix_order, char fact, char uplo, lapack_int n,
2769                           lapack_int nrhs, lapack_complex_float* a,
2770                           lapack_int lda, lapack_complex_float* af,
2771                           lapack_int ldaf, char* equed, float* s,
2772                           lapack_complex_float* b, lapack_int ldb,
2773                           lapack_complex_float* x, lapack_int ldx,
2774                           float* rcond, float* ferr, float* berr );
2775lapack_int LAPACKE_zposvx( int matrix_order, char fact, char uplo, lapack_int n,
2776                           lapack_int nrhs, lapack_complex_double* a,
2777                           lapack_int lda, lapack_complex_double* af,
2778                           lapack_int ldaf, char* equed, double* s,
2779                           lapack_complex_double* b, lapack_int ldb,
2780                           lapack_complex_double* x, lapack_int ldx,
2781                           double* rcond, double* ferr, double* berr );
2782
2783lapack_int LAPACKE_sposvxx( int matrix_order, char fact, char uplo,
2784                            lapack_int n, lapack_int nrhs, float* a,
2785                            lapack_int lda, float* af, lapack_int ldaf,
2786                            char* equed, float* s, float* b, lapack_int ldb,
2787                            float* x, lapack_int ldx, float* rcond,
2788                            float* rpvgrw, float* berr, lapack_int n_err_bnds,
2789                            float* err_bnds_norm, float* err_bnds_comp,
2790                            lapack_int nparams, float* params );
2791lapack_int LAPACKE_dposvxx( int matrix_order, char fact, char uplo,
2792                            lapack_int n, lapack_int nrhs, double* a,
2793                            lapack_int lda, double* af, lapack_int ldaf,
2794                            char* equed, double* s, double* b, lapack_int ldb,
2795                            double* x, lapack_int ldx, double* rcond,
2796                            double* rpvgrw, double* berr, lapack_int n_err_bnds,
2797                            double* err_bnds_norm, double* err_bnds_comp,
2798                            lapack_int nparams, double* params );
2799lapack_int LAPACKE_cposvxx( int matrix_order, char fact, char uplo,
2800                            lapack_int n, lapack_int nrhs,
2801                            lapack_complex_float* a, lapack_int lda,
2802                            lapack_complex_float* af, lapack_int ldaf,
2803                            char* equed, float* s, lapack_complex_float* b,
2804                            lapack_int ldb, lapack_complex_float* x,
2805                            lapack_int ldx, float* rcond, float* rpvgrw,
2806                            float* berr, lapack_int n_err_bnds,
2807                            float* err_bnds_norm, float* err_bnds_comp,
2808                            lapack_int nparams, float* params );
2809lapack_int LAPACKE_zposvxx( int matrix_order, char fact, char uplo,
2810                            lapack_int n, lapack_int nrhs,
2811                            lapack_complex_double* a, lapack_int lda,
2812                            lapack_complex_double* af, lapack_int ldaf,
2813                            char* equed, double* s, lapack_complex_double* b,
2814                            lapack_int ldb, lapack_complex_double* x,
2815                            lapack_int ldx, double* rcond, double* rpvgrw,
2816                            double* berr, lapack_int n_err_bnds,
2817                            double* err_bnds_norm, double* err_bnds_comp,
2818                            lapack_int nparams, double* params );
2819
2820lapack_int LAPACKE_spotrf( int matrix_order, char uplo, lapack_int n, float* a,
2821                           lapack_int lda );
2822lapack_int LAPACKE_dpotrf( int matrix_order, char uplo, lapack_int n, double* a,
2823                           lapack_int lda );
2824lapack_int LAPACKE_cpotrf( int matrix_order, char uplo, lapack_int n,
2825                           lapack_complex_float* a, lapack_int lda );
2826lapack_int LAPACKE_zpotrf( int matrix_order, char uplo, lapack_int n,
2827                           lapack_complex_double* a, lapack_int lda );
2828
2829lapack_int LAPACKE_spotri( int matrix_order, char uplo, lapack_int n, float* a,
2830                           lapack_int lda );
2831lapack_int LAPACKE_dpotri( int matrix_order, char uplo, lapack_int n, double* a,
2832                           lapack_int lda );
2833lapack_int LAPACKE_cpotri( int matrix_order, char uplo, lapack_int n,
2834                           lapack_complex_float* a, lapack_int lda );
2835lapack_int LAPACKE_zpotri( int matrix_order, char uplo, lapack_int n,
2836                           lapack_complex_double* a, lapack_int lda );
2837
2838lapack_int LAPACKE_spotrs( int matrix_order, char uplo, lapack_int n,
2839                           lapack_int nrhs, const float* a, lapack_int lda,
2840                           float* b, lapack_int ldb );
2841lapack_int LAPACKE_dpotrs( int matrix_order, char uplo, lapack_int n,
2842                           lapack_int nrhs, const double* a, lapack_int lda,
2843                           double* b, lapack_int ldb );
2844lapack_int LAPACKE_cpotrs( int matrix_order, char uplo, lapack_int n,
2845                           lapack_int nrhs, const lapack_complex_float* a,
2846                           lapack_int lda, lapack_complex_float* b,
2847                           lapack_int ldb );
2848lapack_int LAPACKE_zpotrs( int matrix_order, char uplo, lapack_int n,
2849                           lapack_int nrhs, const lapack_complex_double* a,
2850                           lapack_int lda, lapack_complex_double* b,
2851                           lapack_int ldb );
2852
2853lapack_int LAPACKE_sppcon( int matrix_order, char uplo, lapack_int n,
2854                           const float* ap, float anorm, float* rcond );
2855lapack_int LAPACKE_dppcon( int matrix_order, char uplo, lapack_int n,
2856                           const double* ap, double anorm, double* rcond );
2857lapack_int LAPACKE_cppcon( int matrix_order, char uplo, lapack_int n,
2858                           const lapack_complex_float* ap, float anorm,
2859                           float* rcond );
2860lapack_int LAPACKE_zppcon( int matrix_order, char uplo, lapack_int n,
2861                           const lapack_complex_double* ap, double anorm,
2862                           double* rcond );
2863
2864lapack_int LAPACKE_sppequ( int matrix_order, char uplo, lapack_int n,
2865                           const float* ap, float* s, float* scond,
2866                           float* amax );
2867lapack_int LAPACKE_dppequ( int matrix_order, char uplo, lapack_int n,
2868                           const double* ap, double* s, double* scond,
2869                           double* amax );
2870lapack_int LAPACKE_cppequ( int matrix_order, char uplo, lapack_int n,
2871                           const lapack_complex_float* ap, float* s,
2872                           float* scond, float* amax );
2873lapack_int LAPACKE_zppequ( int matrix_order, char uplo, lapack_int n,
2874                           const lapack_complex_double* ap, double* s,
2875                           double* scond, double* amax );
2876
2877lapack_int LAPACKE_spprfs( int matrix_order, char uplo, lapack_int n,
2878                           lapack_int nrhs, const float* ap, const float* afp,
2879                           const float* b, lapack_int ldb, float* x,
2880                           lapack_int ldx, float* ferr, float* berr );
2881lapack_int LAPACKE_dpprfs( int matrix_order, char uplo, lapack_int n,
2882                           lapack_int nrhs, const double* ap, const double* afp,
2883                           const double* b, lapack_int ldb, double* x,
2884                           lapack_int ldx, double* ferr, double* berr );
2885lapack_int LAPACKE_cpprfs( int matrix_order, char uplo, lapack_int n,
2886                           lapack_int nrhs, const lapack_complex_float* ap,
2887                           const lapack_complex_float* afp,
2888                           const lapack_complex_float* b, lapack_int ldb,
2889                           lapack_complex_float* x, lapack_int ldx, float* ferr,
2890                           float* berr );
2891lapack_int LAPACKE_zpprfs( int matrix_order, char uplo, lapack_int n,
2892                           lapack_int nrhs, const lapack_complex_double* ap,
2893                           const lapack_complex_double* afp,
2894                           const lapack_complex_double* b, lapack_int ldb,
2895                           lapack_complex_double* x, lapack_int ldx,
2896                           double* ferr, double* berr );
2897
2898lapack_int LAPACKE_sppsv( int matrix_order, char uplo, lapack_int n,
2899                          lapack_int nrhs, float* ap, float* b,
2900                          lapack_int ldb );
2901lapack_int LAPACKE_dppsv( int matrix_order, char uplo, lapack_int n,
2902                          lapack_int nrhs, double* ap, double* b,
2903                          lapack_int ldb );
2904lapack_int LAPACKE_cppsv( int matrix_order, char uplo, lapack_int n,
2905                          lapack_int nrhs, lapack_complex_float* ap,
2906                          lapack_complex_float* b, lapack_int ldb );
2907lapack_int LAPACKE_zppsv( int matrix_order, char uplo, lapack_int n,
2908                          lapack_int nrhs, lapack_complex_double* ap,
2909                          lapack_complex_double* b, lapack_int ldb );
2910
2911lapack_int LAPACKE_sppsvx( int matrix_order, char fact, char uplo, lapack_int n,
2912                           lapack_int nrhs, float* ap, float* afp, char* equed,
2913                           float* s, float* b, lapack_int ldb, float* x,
2914                           lapack_int ldx, float* rcond, float* ferr,
2915                           float* berr );
2916lapack_int LAPACKE_dppsvx( int matrix_order, char fact, char uplo, lapack_int n,
2917                           lapack_int nrhs, double* ap, double* afp,
2918                           char* equed, double* s, double* b, lapack_int ldb,
2919                           double* x, lapack_int ldx, double* rcond,
2920                           double* ferr, double* berr );
2921lapack_int LAPACKE_cppsvx( int matrix_order, char fact, char uplo, lapack_int n,
2922                           lapack_int nrhs, lapack_complex_float* ap,
2923                           lapack_complex_float* afp, char* equed, float* s,
2924                           lapack_complex_float* b, lapack_int ldb,
2925                           lapack_complex_float* x, lapack_int ldx,
2926                           float* rcond, float* ferr, float* berr );
2927lapack_int LAPACKE_zppsvx( int matrix_order, char fact, char uplo, lapack_int n,
2928                           lapack_int nrhs, lapack_complex_double* ap,
2929                           lapack_complex_double* afp, char* equed, double* s,
2930                           lapack_complex_double* b, lapack_int ldb,
2931                           lapack_complex_double* x, lapack_int ldx,
2932                           double* rcond, double* ferr, double* berr );
2933
2934lapack_int LAPACKE_spptrf( int matrix_order, char uplo, lapack_int n,
2935                           float* ap );
2936lapack_int LAPACKE_dpptrf( int matrix_order, char uplo, lapack_int n,
2937                           double* ap );
2938lapack_int LAPACKE_cpptrf( int matrix_order, char uplo, lapack_int n,
2939                           lapack_complex_float* ap );
2940lapack_int LAPACKE_zpptrf( int matrix_order, char uplo, lapack_int n,
2941                           lapack_complex_double* ap );
2942
2943lapack_int LAPACKE_spptri( int matrix_order, char uplo, lapack_int n,
2944                           float* ap );
2945lapack_int LAPACKE_dpptri( int matrix_order, char uplo, lapack_int n,
2946                           double* ap );
2947lapack_int LAPACKE_cpptri( int matrix_order, char uplo, lapack_int n,
2948                           lapack_complex_float* ap );
2949lapack_int LAPACKE_zpptri( int matrix_order, char uplo, lapack_int n,
2950                           lapack_complex_double* ap );
2951
2952lapack_int LAPACKE_spptrs( int matrix_order, char uplo, lapack_int n,
2953                           lapack_int nrhs, const float* ap, float* b,
2954                           lapack_int ldb );
2955lapack_int LAPACKE_dpptrs( int matrix_order, char uplo, lapack_int n,
2956                           lapack_int nrhs, const double* ap, double* b,
2957                           lapack_int ldb );
2958lapack_int LAPACKE_cpptrs( int matrix_order, char uplo, lapack_int n,
2959                           lapack_int nrhs, const lapack_complex_float* ap,
2960                           lapack_complex_float* b, lapack_int ldb );
2961lapack_int LAPACKE_zpptrs( int matrix_order, char uplo, lapack_int n,
2962                           lapack_int nrhs, const lapack_complex_double* ap,
2963                           lapack_complex_double* b, lapack_int ldb );
2964
2965lapack_int LAPACKE_spstrf( int matrix_order, char uplo, lapack_int n, float* a,
2966                           lapack_int lda, lapack_int* piv, lapack_int* rank,
2967                           float tol );
2968lapack_int LAPACKE_dpstrf( int matrix_order, char uplo, lapack_int n, double* a,
2969                           lapack_int lda, lapack_int* piv, lapack_int* rank,
2970                           double tol );
2971lapack_int LAPACKE_cpstrf( int matrix_order, char uplo, lapack_int n,
2972                           lapack_complex_float* a, lapack_int lda,
2973                           lapack_int* piv, lapack_int* rank, float tol );
2974lapack_int LAPACKE_zpstrf( int matrix_order, char uplo, lapack_int n,
2975                           lapack_complex_double* a, lapack_int lda,
2976                           lapack_int* piv, lapack_int* rank, double tol );
2977
2978lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
2979                           float anorm, float* rcond );
2980lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
2981                           double anorm, double* rcond );
2982lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
2983                           const lapack_complex_float* e, float anorm,
2984                           float* rcond );
2985lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
2986                           const lapack_complex_double* e, double anorm,
2987                           double* rcond );
2988
2989lapack_int LAPACKE_spteqr( int matrix_order, char compz, lapack_int n, float* d,
2990                           float* e, float* z, lapack_int ldz );
2991lapack_int LAPACKE_dpteqr( int matrix_order, char compz, lapack_int n,
2992                           double* d, double* e, double* z, lapack_int ldz );
2993lapack_int LAPACKE_cpteqr( int matrix_order, char compz, lapack_int n, float* d,
2994                           float* e, lapack_complex_float* z, lapack_int ldz );
2995lapack_int LAPACKE_zpteqr( int matrix_order, char compz, lapack_int n,
2996                           double* d, double* e, lapack_complex_double* z,
2997                           lapack_int ldz );
2998
2999lapack_int LAPACKE_sptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
3000                           const float* d, const float* e, const float* df,
3001                           const float* ef, const float* b, lapack_int ldb,
3002                           float* x, lapack_int ldx, float* ferr, float* berr );
3003lapack_int LAPACKE_dptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
3004                           const double* d, const double* e, const double* df,
3005                           const double* ef, const double* b, lapack_int ldb,
3006                           double* x, lapack_int ldx, double* ferr,
3007                           double* berr );
3008lapack_int LAPACKE_cptrfs( int matrix_order, char uplo, lapack_int n,
3009                           lapack_int nrhs, const float* d,
3010                           const lapack_complex_float* e, const float* df,
3011                           const lapack_complex_float* ef,
3012                           const lapack_complex_float* b, lapack_int ldb,
3013                           lapack_complex_float* x, lapack_int ldx, float* ferr,
3014                           float* berr );
3015lapack_int LAPACKE_zptrfs( int matrix_order, char uplo, lapack_int n,
3016                           lapack_int nrhs, const double* d,
3017                           const lapack_complex_double* e, const double* df,
3018                           const lapack_complex_double* ef,
3019                           const lapack_complex_double* b, lapack_int ldb,
3020                           lapack_complex_double* x, lapack_int ldx,
3021                           double* ferr, double* berr );
3022
3023lapack_int LAPACKE_sptsv( int matrix_order, lapack_int n, lapack_int nrhs,
3024                          float* d, float* e, float* b, lapack_int ldb );
3025lapack_int LAPACKE_dptsv( int matrix_order, lapack_int n, lapack_int nrhs,
3026                          double* d, double* e, double* b, lapack_int ldb );
3027lapack_int LAPACKE_cptsv( int matrix_order, lapack_int n, lapack_int nrhs,
3028                          float* d, lapack_complex_float* e,
3029                          lapack_complex_float* b, lapack_int ldb );
3030lapack_int LAPACKE_zptsv( int matrix_order, lapack_int n, lapack_int nrhs,
3031                          double* d, lapack_complex_double* e,
3032                          lapack_complex_double* b, lapack_int ldb );
3033
3034lapack_int LAPACKE_sptsvx( int matrix_order, char fact, lapack_int n,
3035                           lapack_int nrhs, const float* d, const float* e,
3036                           float* df, float* ef, const float* b, lapack_int ldb,
3037                           float* x, lapack_int ldx, float* rcond, float* ferr,
3038                           float* berr );
3039lapack_int LAPACKE_dptsvx( int matrix_order, char fact, lapack_int n,
3040                           lapack_int nrhs, const double* d, const double* e,
3041                           double* df, double* ef, const double* b,
3042                           lapack_int ldb, double* x, lapack_int ldx,
3043                           double* rcond, double* ferr, double* berr );
3044lapack_int LAPACKE_cptsvx( int matrix_order, char fact, lapack_int n,
3045                           lapack_int nrhs, const float* d,
3046                           const lapack_complex_float* e, float* df,
3047                           lapack_complex_float* ef,
3048                           const lapack_complex_float* b, lapack_int ldb,
3049                           lapack_complex_float* x, lapack_int ldx,
3050                           float* rcond, float* ferr, float* berr );
3051lapack_int LAPACKE_zptsvx( int matrix_order, char fact, lapack_int n,
3052                           lapack_int nrhs, const double* d,
3053                           const lapack_complex_double* e, double* df,
3054                           lapack_complex_double* ef,
3055                           const lapack_complex_double* b, lapack_int ldb,
3056                           lapack_complex_double* x, lapack_int ldx,
3057                           double* rcond, double* ferr, double* berr );
3058
3059lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
3060lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
3061lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
3062lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
3063
3064lapack_int LAPACKE_spttrs( int matrix_order, lapack_int n, lapack_int nrhs,
3065                           const float* d, const float* e, float* b,
3066                           lapack_int ldb );
3067lapack_int LAPACKE_dpttrs( int matrix_order, lapack_int n, lapack_int nrhs,
3068                           const double* d, const double* e, double* b,
3069                           lapack_int ldb );
3070lapack_int LAPACKE_cpttrs( int matrix_order, char uplo, lapack_int n,
3071                           lapack_int nrhs, const float* d,
3072                           const lapack_complex_float* e,
3073                           lapack_complex_float* b, lapack_int ldb );
3074lapack_int LAPACKE_zpttrs( int matrix_order, char uplo, lapack_int n,
3075                           lapack_int nrhs, const double* d,
3076                           const lapack_complex_double* e,
3077                           lapack_complex_double* b, lapack_int ldb );
3078
3079lapack_int LAPACKE_ssbev( int matrix_order, char jobz, char uplo, lapack_int n,
3080                          lapack_int kd, float* ab, lapack_int ldab, float* w,
3081                          float* z, lapack_int ldz );
3082lapack_int LAPACKE_dsbev( int matrix_order, char jobz, char uplo, lapack_int n,
3083                          lapack_int kd, double* ab, lapack_int ldab, double* w,
3084                          double* z, lapack_int ldz );
3085
3086lapack_int LAPACKE_ssbevd( int matrix_order, char jobz, char uplo, lapack_int n,
3087                           lapack_int kd, float* ab, lapack_int ldab, float* w,
3088                           float* z, lapack_int ldz );
3089lapack_int LAPACKE_dsbevd( int matrix_order, char jobz, char uplo, lapack_int n,
3090                           lapack_int kd, double* ab, lapack_int ldab,
3091                           double* w, double* z, lapack_int ldz );
3092
3093lapack_int LAPACKE_ssbevx( int matrix_order, char jobz, char range, char uplo,
3094                           lapack_int n, lapack_int kd, float* ab,
3095                           lapack_int ldab, float* q, lapack_int ldq, float vl,
3096                           float vu, lapack_int il, lapack_int iu, float abstol,
3097                           lapack_int* m, float* w, float* z, lapack_int ldz,
3098                           lapack_int* ifail );
3099lapack_int LAPACKE_dsbevx( int matrix_order, char jobz, char range, char uplo,
3100                           lapack_int n, lapack_int kd, double* ab,
3101                           lapack_int ldab, double* q, lapack_int ldq,
3102                           double vl, double vu, lapack_int il, lapack_int iu,
3103                           double abstol, lapack_int* m, double* w, double* z,
3104                           lapack_int ldz, lapack_int* ifail );
3105
3106lapack_int LAPACKE_ssbgst( int matrix_order, char vect, char uplo, lapack_int n,
3107                           lapack_int ka, lapack_int kb, float* ab,
3108                           lapack_int ldab, const float* bb, lapack_int ldbb,
3109                           float* x, lapack_int ldx );
3110lapack_int LAPACKE_dsbgst( int matrix_order, char vect, char uplo, lapack_int n,
3111                           lapack_int ka, lapack_int kb, double* ab,
3112                           lapack_int ldab, const double* bb, lapack_int ldbb,
3113                           double* x, lapack_int ldx );
3114
3115lapack_int LAPACKE_ssbgv( int matrix_order, char jobz, char uplo, lapack_int n,
3116                          lapack_int ka, lapack_int kb, float* ab,
3117                          lapack_int ldab, float* bb, lapack_int ldbb, float* w,
3118                          float* z, lapack_int ldz );
3119lapack_int LAPACKE_dsbgv( int matrix_order, char jobz, char uplo, lapack_int n,
3120                          lapack_int ka, lapack_int kb, double* ab,
3121                          lapack_int ldab, double* bb, lapack_int ldbb,
3122                          double* w, double* z, lapack_int ldz );
3123
3124lapack_int LAPACKE_ssbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
3125                           lapack_int ka, lapack_int kb, float* ab,
3126                           lapack_int ldab, float* bb, lapack_int ldbb,
3127                           float* w, float* z, lapack_int ldz );
3128lapack_int LAPACKE_dsbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
3129                           lapack_int ka, lapack_int kb, double* ab,
3130                           lapack_int ldab, double* bb, lapack_int ldbb,
3131                           double* w, double* z, lapack_int ldz );
3132
3133lapack_int LAPACKE_ssbgvx( int matrix_order, char jobz, char range, char uplo,
3134                           lapack_int n, lapack_int ka, lapack_int kb,
3135                           float* ab, lapack_int ldab, float* bb,
3136                           lapack_int ldbb, float* q, lapack_int ldq, float vl,
3137                           float vu, lapack_int il, lapack_int iu, float abstol,
3138                           lapack_int* m, float* w, float* z, lapack_int ldz,
3139                           lapack_int* ifail );
3140lapack_int LAPACKE_dsbgvx( int matrix_order, char jobz, char range, char uplo,
3141                           lapack_int n, lapack_int ka, lapack_int kb,
3142                           double* ab, lapack_int ldab, double* bb,
3143                           lapack_int ldbb, double* q, lapack_int ldq,
3144                           double vl, double vu, lapack_int il, lapack_int iu,
3145                           double abstol, lapack_int* m, double* w, double* z,
3146                           lapack_int ldz, lapack_int* ifail );
3147
3148lapack_int LAPACKE_ssbtrd( int matrix_order, char vect, char uplo, lapack_int n,
3149                           lapack_int kd, float* ab, lapack_int ldab, float* d,
3150                           float* e, float* q, lapack_int ldq );
3151lapack_int LAPACKE_dsbtrd( int matrix_order, char vect, char uplo, lapack_int n,
3152                           lapack_int kd, double* ab, lapack_int ldab,
3153                           double* d, double* e, double* q, lapack_int ldq );
3154
3155lapack_int LAPACKE_ssfrk( int matrix_order, char transr, char uplo, char trans,
3156                          lapack_int n, lapack_int k, float alpha,
3157                          const float* a, lapack_int lda, float beta,
3158                          float* c );
3159lapack_int LAPACKE_dsfrk( int matrix_order, char transr, char uplo, char trans,
3160                          lapack_int n, lapack_int k, double alpha,
3161                          const double* a, lapack_int lda, double beta,
3162                          double* c );
3163
3164lapack_int LAPACKE_sspcon( int matrix_order, char uplo, lapack_int n,
3165                           const float* ap, const lapack_int* ipiv, float anorm,
3166                           float* rcond );
3167lapack_int LAPACKE_dspcon( int matrix_order, char uplo, lapack_int n,
3168                           const double* ap, const lapack_int* ipiv,
3169                           double anorm, double* rcond );
3170lapack_int LAPACKE_cspcon( int matrix_order, char uplo, lapack_int n,
3171                           const lapack_complex_float* ap,
3172                           const lapack_int* ipiv, float anorm, float* rcond );
3173lapack_int LAPACKE_zspcon( int matrix_order, char uplo, lapack_int n,
3174                           const lapack_complex_double* ap,
3175                           const lapack_int* ipiv, double anorm,
3176                           double* rcond );
3177
3178lapack_int LAPACKE_sspev( int matrix_order, char jobz, char uplo, lapack_int n,
3179                          float* ap, float* w, float* z, lapack_int ldz );
3180lapack_int LAPACKE_dspev( int matrix_order, char jobz, char uplo, lapack_int n,
3181                          double* ap, double* w, double* z, lapack_int ldz );
3182
3183lapack_int LAPACKE_sspevd( int matrix_order, char jobz, char uplo, lapack_int n,
3184                           float* ap, float* w, float* z, lapack_int ldz );
3185lapack_int LAPACKE_dspevd( int matrix_order, char jobz, char uplo, lapack_int n,
3186                           double* ap, double* w, double* z, lapack_int ldz );
3187
3188lapack_int LAPACKE_sspevx( int matrix_order, char jobz, char range, char uplo,
3189                           lapack_int n, float* ap, float vl, float vu,
3190                           lapack_int il, lapack_int iu, float abstol,
3191                           lapack_int* m, float* w, float* z, lapack_int ldz,
3192                           lapack_int* ifail );
3193lapack_int LAPACKE_dspevx( int matrix_order, char jobz, char range, char uplo,
3194                           lapack_int n, double* ap, double vl, double vu,
3195                           lapack_int il, lapack_int iu, double abstol,
3196                           lapack_int* m, double* w, double* z, lapack_int ldz,
3197                           lapack_int* ifail );
3198
3199lapack_int LAPACKE_sspgst( int matrix_order, lapack_int itype, char uplo,
3200                           lapack_int n, float* ap, const float* bp );
3201lapack_int LAPACKE_dspgst( int matrix_order, lapack_int itype, char uplo,
3202                           lapack_int n, double* ap, const double* bp );
3203
3204lapack_int LAPACKE_sspgv( int matrix_order, lapack_int itype, char jobz,
3205                          char uplo, lapack_int n, float* ap, float* bp,
3206                          float* w, float* z, lapack_int ldz );
3207lapack_int LAPACKE_dspgv( int matrix_order, lapack_int itype, char jobz,
3208                          char uplo, lapack_int n, double* ap, double* bp,
3209                          double* w, double* z, lapack_int ldz );
3210
3211lapack_int LAPACKE_sspgvd( int matrix_order, lapack_int itype, char jobz,
3212                           char uplo, lapack_int n, float* ap, float* bp,
3213                           float* w, float* z, lapack_int ldz );
3214lapack_int LAPACKE_dspgvd( int matrix_order, lapack_int itype, char jobz,
3215                           char uplo, lapack_int n, double* ap, double* bp,
3216                           double* w, double* z, lapack_int ldz );
3217
3218lapack_int LAPACKE_sspgvx( int matrix_order, lapack_int itype, char jobz,
3219                           char range, char uplo, lapack_int n, float* ap,
3220                           float* bp, float vl, float vu, lapack_int il,
3221                           lapack_int iu, float abstol, lapack_int* m, float* w,
3222                           float* z, lapack_int ldz, lapack_int* ifail );
3223lapack_int LAPACKE_dspgvx( int matrix_order, lapack_int itype, char jobz,
3224                           char range, char uplo, lapack_int n, double* ap,
3225                           double* bp, double vl, double vu, lapack_int il,
3226                           lapack_int iu, double abstol, lapack_int* m,
3227                           double* w, double* z, lapack_int ldz,
3228                           lapack_int* ifail );
3229
3230lapack_int LAPACKE_ssprfs( int matrix_order, char uplo, lapack_int n,
3231                           lapack_int nrhs, const float* ap, const float* afp,
3232                           const lapack_int* ipiv, const float* b,
3233                           lapack_int ldb, float* x, lapack_int ldx,
3234                           float* ferr, float* berr );
3235lapack_int LAPACKE_dsprfs( int matrix_order, char uplo, lapack_int n,
3236                           lapack_int nrhs, const double* ap, const double* afp,
3237                           const lapack_int* ipiv, const double* b,
3238                           lapack_int ldb, double* x, lapack_int ldx,
3239                           double* ferr, double* berr );
3240lapack_int LAPACKE_csprfs( int matrix_order, char uplo, lapack_int n,
3241                           lapack_int nrhs, const lapack_complex_float* ap,
3242                           const lapack_complex_float* afp,
3243                           const lapack_int* ipiv,
3244                           const lapack_complex_float* b, lapack_int ldb,
3245                           lapack_complex_float* x, lapack_int ldx, float* ferr,
3246                           float* berr );
3247lapack_int LAPACKE_zsprfs( int matrix_order, char uplo, lapack_int n,
3248                           lapack_int nrhs, const lapack_complex_double* ap,
3249                           const lapack_complex_double* afp,
3250                           const lapack_int* ipiv,
3251                           const lapack_complex_double* b, lapack_int ldb,
3252                           lapack_complex_double* x, lapack_int ldx,
3253                           double* ferr, double* berr );
3254
3255lapack_int LAPACKE_sspsv( int matrix_order, char uplo, lapack_int n,
3256                          lapack_int nrhs, float* ap, lapack_int* ipiv,
3257                          float* b, lapack_int ldb );
3258lapack_int LAPACKE_dspsv( int matrix_order, char uplo, lapack_int n,
3259                          lapack_int nrhs, double* ap, lapack_int* ipiv,
3260                          double* b, lapack_int ldb );
3261lapack_int LAPACKE_cspsv( int matrix_order, char uplo, lapack_int n,
3262                          lapack_int nrhs, lapack_complex_float* ap,
3263                          lapack_int* ipiv, lapack_complex_float* b,
3264                          lapack_int ldb );
3265lapack_int LAPACKE_zspsv( int matrix_order, char uplo, lapack_int n,
3266                          lapack_int nrhs, lapack_complex_double* ap,
3267                          lapack_int* ipiv, lapack_complex_double* b,
3268                          lapack_int ldb );
3269
3270lapack_int LAPACKE_sspsvx( int matrix_order, char fact, char uplo, lapack_int n,
3271                           lapack_int nrhs, const float* ap, float* afp,
3272                           lapack_int* ipiv, const float* b, lapack_int ldb,
3273                           float* x, lapack_int ldx, float* rcond, float* ferr,
3274                           float* berr );
3275lapack_int LAPACKE_dspsvx( int matrix_order, char fact, char uplo, lapack_int n,
3276                           lapack_int nrhs, const double* ap, double* afp,
3277                           lapack_int* ipiv, const double* b, lapack_int ldb,
3278                           double* x, lapack_int ldx, double* rcond,
3279                           double* ferr, double* berr );
3280lapack_int LAPACKE_cspsvx( int matrix_order, char fact, char uplo, lapack_int n,
3281                           lapack_int nrhs, const lapack_complex_float* ap,
3282                           lapack_complex_float* afp, lapack_int* ipiv,
3283                           const lapack_complex_float* b, lapack_int ldb,
3284                           lapack_complex_float* x, lapack_int ldx,
3285                           float* rcond, float* ferr, float* berr );
3286lapack_int LAPACKE_zspsvx( int matrix_order, char fact, char uplo, lapack_int n,
3287                           lapack_int nrhs, const lapack_complex_double* ap,
3288                           lapack_complex_double* afp, lapack_int* ipiv,
3289                           const lapack_complex_double* b, lapack_int ldb,
3290                           lapack_complex_double* x, lapack_int ldx,
3291                           double* rcond, double* ferr, double* berr );
3292
3293lapack_int LAPACKE_ssptrd( int matrix_order, char uplo, lapack_int n, float* ap,
3294                           float* d, float* e, float* tau );
3295lapack_int LAPACKE_dsptrd( int matrix_order, char uplo, lapack_int n,
3296                           double* ap, double* d, double* e, double* tau );
3297
3298lapack_int LAPACKE_ssptrf( int matrix_order, char uplo, lapack_int n, float* ap,
3299                           lapack_int* ipiv );
3300lapack_int LAPACKE_dsptrf( int matrix_order, char uplo, lapack_int n,
3301                           double* ap, lapack_int* ipiv );
3302lapack_int LAPACKE_csptrf( int matrix_order, char uplo, lapack_int n,
3303                           lapack_complex_float* ap, lapack_int* ipiv );
3304lapack_int LAPACKE_zsptrf( int matrix_order, char uplo, lapack_int n,
3305                           lapack_complex_double* ap, lapack_int* ipiv );
3306
3307lapack_int LAPACKE_ssptri( int matrix_order, char uplo, lapack_int n, float* ap,
3308                           const lapack_int* ipiv );
3309lapack_int LAPACKE_dsptri( int matrix_order, char uplo, lapack_int n,
3310                           double* ap, const lapack_int* ipiv );
3311lapack_int LAPACKE_csptri( int matrix_order, char uplo, lapack_int n,
3312                           lapack_complex_float* ap, const lapack_int* ipiv );
3313lapack_int LAPACKE_zsptri( int matrix_order, char uplo, lapack_int n,
3314                           lapack_complex_double* ap, const lapack_int* ipiv );
3315
3316lapack_int LAPACKE_ssptrs( int matrix_order, char uplo, lapack_int n,
3317                           lapack_int nrhs, const float* ap,
3318                           const lapack_int* ipiv, float* b, lapack_int ldb );
3319lapack_int LAPACKE_dsptrs( int matrix_order, char uplo, lapack_int n,
3320                           lapack_int nrhs, const double* ap,
3321                           const lapack_int* ipiv, double* b, lapack_int ldb );
3322lapack_int LAPACKE_csptrs( int matrix_order, char uplo, lapack_int n,
3323                           lapack_int nrhs, const lapack_complex_float* ap,
3324                           const lapack_int* ipiv, lapack_complex_float* b,
3325                           lapack_int ldb );
3326lapack_int LAPACKE_zsptrs( int matrix_order, char uplo, lapack_int n,
3327                           lapack_int nrhs, const lapack_complex_double* ap,
3328                           const lapack_int* ipiv, lapack_complex_double* b,
3329                           lapack_int ldb );
3330
3331lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
3332                           float vu, lapack_int il, lapack_int iu, float abstol,
3333                           const float* d, const float* e, lapack_int* m,
3334                           lapack_int* nsplit, float* w, lapack_int* iblock,
3335                           lapack_int* isplit );
3336lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
3337                           double vu, lapack_int il, lapack_int iu,
3338                           double abstol, const double* d, const double* e,
3339                           lapack_int* m, lapack_int* nsplit, double* w,
3340                           lapack_int* iblock, lapack_int* isplit );
3341
3342lapack_int LAPACKE_sstedc( int matrix_order, char compz, lapack_int n, float* d,
3343                           float* e, float* z, lapack_int ldz );
3344lapack_int LAPACKE_dstedc( int matrix_order, char compz, lapack_int n,
3345                           double* d, double* e, double* z, lapack_int ldz );
3346lapack_int LAPACKE_cstedc( int matrix_order, char compz, lapack_int n, float* d,
3347                           float* e, lapack_complex_float* z, lapack_int ldz );
3348lapack_int LAPACKE_zstedc( int matrix_order, char compz, lapack_int n,
3349                           double* d, double* e, lapack_complex_double* z,
3350                           lapack_int ldz );
3351
3352lapack_int LAPACKE_sstegr( int matrix_order, char jobz, char range,
3353                           lapack_int n, float* d, float* e, float vl, float vu,
3354                           lapack_int il, lapack_int iu, float abstol,
3355                           lapack_int* m, float* w, float* z, lapack_int ldz,
3356                           lapack_int* isuppz );
3357lapack_int LAPACKE_dstegr( int matrix_order, char jobz, char range,
3358                           lapack_int n, double* d, double* e, double vl,
3359                           double vu, lapack_int il, lapack_int iu,
3360                           double abstol, lapack_int* m, double* w, double* z,
3361                           lapack_int ldz, lapack_int* isuppz );
3362lapack_int LAPACKE_cstegr( int matrix_order, char jobz, char range,
3363                           lapack_int n, float* d, float* e, float vl, float vu,
3364                           lapack_int il, lapack_int iu, float abstol,
3365                           lapack_int* m, float* w, lapack_complex_float* z,
3366                           lapack_int ldz, lapack_int* isuppz );
3367lapack_int LAPACKE_zstegr( int matrix_order, char jobz, char range,
3368                           lapack_int n, double* d, double* e, double vl,
3369                           double vu, lapack_int il, lapack_int iu,
3370                           double abstol, lapack_int* m, double* w,
3371                           lapack_complex_double* z, lapack_int ldz,
3372                           lapack_int* isuppz );
3373
3374lapack_int LAPACKE_sstein( int matrix_order, lapack_int n, const float* d,
3375                           const float* e, lapack_int m, const float* w,
3376                           const lapack_int* iblock, const lapack_int* isplit,
3377                           float* z, lapack_int ldz, lapack_int* ifailv );
3378lapack_int LAPACKE_dstein( int matrix_order, lapack_int n, const double* d,
3379                           const double* e, lapack_int m, const double* w,
3380                           const lapack_int* iblock, const lapack_int* isplit,
3381                           double* z, lapack_int ldz, lapack_int* ifailv );
3382lapack_int LAPACKE_cstein( int matrix_order, lapack_int n, const float* d,
3383                           const float* e, lapack_int m, const float* w,
3384                           const lapack_int* iblock, const lapack_int* isplit,
3385                           lapack_complex_float* z, lapack_int ldz,
3386                           lapack_int* ifailv );
3387lapack_int LAPACKE_zstein( int matrix_order, lapack_int n, const double* d,
3388                           const double* e, lapack_int m, const double* w,
3389                           const lapack_int* iblock, const lapack_int* isplit,
3390                           lapack_complex_double* z, lapack_int ldz,
3391                           lapack_int* ifailv );
3392
3393lapack_int LAPACKE_sstemr( int matrix_order, char jobz, char range,
3394                           lapack_int n, float* d, float* e, float vl, float vu,
3395                           lapack_int il, lapack_int iu, lapack_int* m,
3396                           float* w, float* z, lapack_int ldz, lapack_int nzc,
3397                           lapack_int* isuppz, lapack_logical* tryrac );
3398lapack_int LAPACKE_dstemr( int matrix_order, char jobz, char range,
3399                           lapack_int n, double* d, double* e, double vl,
3400                           double vu, lapack_int il, lapack_int iu,
3401                           lapack_int* m, double* w, double* z, lapack_int ldz,
3402                           lapack_int nzc, lapack_int* isuppz,
3403                           lapack_logical* tryrac );
3404lapack_int LAPACKE_cstemr( int matrix_order, char jobz, char range,
3405                           lapack_int n, float* d, float* e, float vl, float vu,
3406                           lapack_int il, lapack_int iu, lapack_int* m,
3407                           float* w, lapack_complex_float* z, lapack_int ldz,
3408                           lapack_int nzc, lapack_int* isuppz,
3409                           lapack_logical* tryrac );
3410lapack_int LAPACKE_zstemr( int matrix_order, char jobz, char range,
3411                           lapack_int n, double* d, double* e, double vl,
3412                           double vu, lapack_int il, lapack_int iu,
3413                           lapack_int* m, double* w, lapack_complex_double* z,
3414                           lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
3415                           lapack_logical* tryrac );
3416
3417lapack_int LAPACKE_ssteqr( int matrix_order, char compz, lapack_int n, float* d,
3418                           float* e, float* z, lapack_int ldz );
3419lapack_int LAPACKE_dsteqr( int matrix_order, char compz, lapack_int n,
3420                           double* d, double* e, double* z, lapack_int ldz );
3421lapack_int LAPACKE_csteqr( int matrix_order, char compz, lapack_int n, float* d,
3422                           float* e, lapack_complex_float* z, lapack_int ldz );
3423lapack_int LAPACKE_zsteqr( int matrix_order, char compz, lapack_int n,
3424                           double* d, double* e, lapack_complex_double* z,
3425                           lapack_int ldz );
3426
3427lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
3428lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
3429
3430lapack_int LAPACKE_sstev( int matrix_order, char jobz, lapack_int n, float* d,
3431                          float* e, float* z, lapack_int ldz );
3432lapack_int LAPACKE_dstev( int matrix_order, char jobz, lapack_int n, double* d,
3433                          double* e, double* z, lapack_int ldz );
3434
3435lapack_int LAPACKE_sstevd( int matrix_order, char jobz, lapack_int n, float* d,
3436                           float* e, float* z, lapack_int ldz );
3437lapack_int LAPACKE_dstevd( int matrix_order, char jobz, lapack_int n, double* d,
3438                           double* e, double* z, lapack_int ldz );
3439
3440lapack_int LAPACKE_sstevr( int matrix_order, char jobz, char range,
3441                           lapack_int n, float* d, float* e, float vl, float vu,
3442                           lapack_int il, lapack_int iu, float abstol,
3443                           lapack_int* m, float* w, float* z, lapack_int ldz,
3444                           lapack_int* isuppz );
3445lapack_int LAPACKE_dstevr( int matrix_order, char jobz, char range,
3446                           lapack_int n, double* d, double* e, double vl,
3447                           double vu, lapack_int il, lapack_int iu,
3448                           double abstol, lapack_int* m, double* w, double* z,
3449                           lapack_int ldz, lapack_int* isuppz );
3450
3451lapack_int LAPACKE_sstevx( int matrix_order, char jobz, char range,
3452                           lapack_int n, float* d, float* e, float vl, float vu,
3453                           lapack_int il, lapack_int iu, float abstol,
3454                           lapack_int* m, float* w, float* z, lapack_int ldz,
3455                           lapack_int* ifail );
3456lapack_int LAPACKE_dstevx( int matrix_order, char jobz, char range,
3457                           lapack_int n, double* d, double* e, double vl,
3458                           double vu, lapack_int il, lapack_int iu,
3459                           double abstol, lapack_int* m, double* w, double* z,
3460                           lapack_int ldz, lapack_int* ifail );
3461
3462lapack_int LAPACKE_ssycon( int matrix_order, char uplo, lapack_int n,
3463                           const float* a, lapack_int lda,
3464                           const lapack_int* ipiv, float anorm, float* rcond );
3465lapack_int LAPACKE_dsycon( int matrix_order, char uplo, lapack_int n,
3466                           const double* a, lapack_int lda,
3467                           const lapack_int* ipiv, double anorm,
3468                           double* rcond );
3469lapack_int LAPACKE_csycon( int matrix_order, char uplo, lapack_int n,
3470                           const lapack_complex_float* a, lapack_int lda,
3471                           const lapack_int* ipiv, float anorm, float* rcond );
3472lapack_int LAPACKE_zsycon( int matrix_order, char uplo, lapack_int n,
3473                           const lapack_complex_double* a, lapack_int lda,
3474                           const lapack_int* ipiv, double anorm,
3475                           double* rcond );
3476
3477lapack_int LAPACKE_ssyequb( int matrix_order, char uplo, lapack_int n,
3478                            const float* a, lapack_int lda, float* s,
3479                            float* scond, float* amax );
3480lapack_int LAPACKE_dsyequb( int matrix_order, char uplo, lapack_int n,
3481                            const double* a, lapack_int lda, double* s,
3482                            double* scond, double* amax );
3483lapack_int LAPACKE_csyequb( int matrix_order, char uplo, lapack_int n,
3484                            const lapack_complex_float* a, lapack_int lda,
3485                            float* s, float* scond, float* amax );
3486lapack_int LAPACKE_zsyequb( int matrix_order, char uplo, lapack_int n,
3487                            const lapack_complex_double* a, lapack_int lda,
3488                            double* s, double* scond, double* amax );
3489
3490lapack_int LAPACKE_ssyev( int matrix_order, char jobz, char uplo, lapack_int n,
3491                          float* a, lapack_int lda, float* w );
3492lapack_int LAPACKE_dsyev( int matrix_order, char jobz, char uplo, lapack_int n,
3493                          double* a, lapack_int lda, double* w );
3494
3495lapack_int LAPACKE_ssyevd( int matrix_order, char jobz, char uplo, lapack_int n,
3496                           float* a, lapack_int lda, float* w );
3497lapack_int LAPACKE_dsyevd( int matrix_order, char jobz, char uplo, lapack_int n,
3498                           double* a, lapack_int lda, double* w );
3499
3500lapack_int LAPACKE_ssyevr( int matrix_order, char jobz, char range, char uplo,
3501                           lapack_int n, float* a, lapack_int lda, float vl,
3502                           float vu, lapack_int il, lapack_int iu, float abstol,
3503                           lapack_int* m, float* w, float* z, lapack_int ldz,
3504                           lapack_int* isuppz );
3505lapack_int LAPACKE_dsyevr( int matrix_order, char jobz, char range, char uplo,
3506                           lapack_int n, double* a, lapack_int lda, double vl,
3507                           double vu, lapack_int il, lapack_int iu,
3508                           double abstol, lapack_int* m, double* w, double* z,
3509                           lapack_int ldz, lapack_int* isuppz );
3510
3511lapack_int LAPACKE_ssyevx( int matrix_order, char jobz, char range, char uplo,
3512                           lapack_int n, float* a, lapack_int lda, float vl,
3513                           float vu, lapack_int il, lapack_int iu, float abstol,
3514                           lapack_int* m, float* w, float* z, lapack_int ldz,
3515                           lapack_int* ifail );
3516lapack_int LAPACKE_dsyevx( int matrix_order, char jobz, char range, char uplo,
3517                           lapack_int n, double* a, lapack_int lda, double vl,
3518                           double vu, lapack_int il, lapack_int iu,
3519                           double abstol, lapack_int* m, double* w, double* z,
3520                           lapack_int ldz, lapack_int* ifail );
3521
3522lapack_int LAPACKE_ssygst( int matrix_order, lapack_int itype, char uplo,
3523                           lapack_int n, float* a, lapack_int lda,
3524                           const float* b, lapack_int ldb );
3525lapack_int LAPACKE_dsygst( int matrix_order, lapack_int itype, char uplo,
3526                           lapack_int n, double* a, lapack_int lda,
3527                           const double* b, lapack_int ldb );
3528
3529lapack_int LAPACKE_ssygv( int matrix_order, lapack_int itype, char jobz,
3530                          char uplo, lapack_int n, float* a, lapack_int lda,
3531                          float* b, lapack_int ldb, float* w );
3532lapack_int LAPACKE_dsygv( int matrix_order, lapack_int itype, char jobz,
3533                          char uplo, lapack_int n, double* a, lapack_int lda,
3534                          double* b, lapack_int ldb, double* w );
3535
3536lapack_int LAPACKE_ssygvd( int matrix_order, lapack_int itype, char jobz,
3537                           char uplo, lapack_int n, float* a, lapack_int lda,
3538                           float* b, lapack_int ldb, float* w );
3539lapack_int LAPACKE_dsygvd( int matrix_order, lapack_int itype, char jobz,
3540                           char uplo, lapack_int n, double* a, lapack_int lda,
3541                           double* b, lapack_int ldb, double* w );
3542
3543lapack_int LAPACKE_ssygvx( int matrix_order, lapack_int itype, char jobz,
3544                           char range, char uplo, lapack_int n, float* a,
3545                           lapack_int lda, float* b, lapack_int ldb, float vl,
3546                           float vu, lapack_int il, lapack_int iu, float abstol,
3547                           lapack_int* m, float* w, float* z, lapack_int ldz,
3548                           lapack_int* ifail );
3549lapack_int LAPACKE_dsygvx( int matrix_order, lapack_int itype, char jobz,
3550                           char range, char uplo, lapack_int n, double* a,
3551                           lapack_int lda, double* b, lapack_int ldb, double vl,
3552                           double vu, lapack_int il, lapack_int iu,
3553                           double abstol, lapack_int* m, double* w, double* z,
3554                           lapack_int ldz, lapack_int* ifail );
3555
3556lapack_int LAPACKE_ssyrfs( int matrix_order, char uplo, lapack_int n,
3557                           lapack_int nrhs, const float* a, lapack_int lda,
3558                           const float* af, lapack_int ldaf,
3559                           const lapack_int* ipiv, const float* b,
3560                           lapack_int ldb, float* x, lapack_int ldx,
3561                           float* ferr, float* berr );
3562lapack_int LAPACKE_dsyrfs( int matrix_order, char uplo, lapack_int n,
3563                           lapack_int nrhs, const double* a, lapack_int lda,
3564                           const double* af, lapack_int ldaf,
3565                           const lapack_int* ipiv, const double* b,
3566                           lapack_int ldb, double* x, lapack_int ldx,
3567                           double* ferr, double* berr );
3568lapack_int LAPACKE_csyrfs( int matrix_order, char uplo, lapack_int n,
3569                           lapack_int nrhs, const lapack_complex_float* a,
3570                           lapack_int lda, const lapack_complex_float* af,
3571                           lapack_int ldaf, const lapack_int* ipiv,
3572                           const lapack_complex_float* b, lapack_int ldb,
3573                           lapack_complex_float* x, lapack_int ldx, float* ferr,
3574                           float* berr );
3575lapack_int LAPACKE_zsyrfs( int matrix_order, char uplo, lapack_int n,
3576                           lapack_int nrhs, const lapack_complex_double* a,
3577                           lapack_int lda, const lapack_complex_double* af,
3578                           lapack_int ldaf, const lapack_int* ipiv,
3579                           const lapack_complex_double* b, lapack_int ldb,
3580                           lapack_complex_double* x, lapack_int ldx,
3581                           double* ferr, double* berr );
3582
3583lapack_int LAPACKE_ssyrfsx( int matrix_order, char uplo, char equed,
3584                            lapack_int n, lapack_int nrhs, const float* a,
3585                            lapack_int lda, const float* af, lapack_int ldaf,
3586                            const lapack_int* ipiv, const float* s,
3587                            const float* b, lapack_int ldb, float* x,
3588                            lapack_int ldx, float* rcond, float* berr,
3589                            lapack_int n_err_bnds, float* err_bnds_norm,
3590                            float* err_bnds_comp, lapack_int nparams,
3591                            float* params );
3592lapack_int LAPACKE_dsyrfsx( int matrix_order, char uplo, char equed,
3593                            lapack_int n, lapack_int nrhs, const double* a,
3594                            lapack_int lda, const double* af, lapack_int ldaf,
3595                            const lapack_int* ipiv, const double* s,
3596                            const double* b, lapack_int ldb, double* x,
3597                            lapack_int ldx, double* rcond, double* berr,
3598                            lapack_int n_err_bnds, double* err_bnds_norm,
3599                            double* err_bnds_comp, lapack_int nparams,
3600                            double* params );
3601lapack_int LAPACKE_csyrfsx( int matrix_order, char uplo, char equed,
3602                            lapack_int n, lapack_int nrhs,
3603                            const lapack_complex_float* a, lapack_int lda,
3604                            const lapack_complex_float* af, lapack_int ldaf,
3605                            const lapack_int* ipiv, const float* s,
3606                            const lapack_complex_float* b, lapack_int ldb,
3607                            lapack_complex_float* x, lapack_int ldx,
3608                            float* rcond, float* berr, lapack_int n_err_bnds,
3609                            float* err_bnds_norm, float* err_bnds_comp,
3610                            lapack_int nparams, float* params );
3611lapack_int LAPACKE_zsyrfsx( int matrix_order, char uplo, char equed,
3612                            lapack_int n, lapack_int nrhs,
3613                            const lapack_complex_double* a, lapack_int lda,
3614                            const lapack_complex_double* af, lapack_int ldaf,
3615                            const lapack_int* ipiv, const double* s,
3616                            const lapack_complex_double* b, lapack_int ldb,
3617                            lapack_complex_double* x, lapack_int ldx,
3618                            double* rcond, double* berr, lapack_int n_err_bnds,
3619                            double* err_bnds_norm, double* err_bnds_comp,
3620                            lapack_int nparams, double* params );
3621
3622lapack_int LAPACKE_ssysv( int matrix_order, char uplo, lapack_int n,
3623                          lapack_int nrhs, float* a, lapack_int lda,
3624                          lapack_int* ipiv, float* b, lapack_int ldb );
3625lapack_int LAPACKE_dsysv( int matrix_order, char uplo, lapack_int n,
3626                          lapack_int nrhs, double* a, lapack_int lda,
3627                          lapack_int* ipiv, double* b, lapack_int ldb );
3628lapack_int LAPACKE_csysv( int matrix_order, char uplo, lapack_int n,
3629                          lapack_int nrhs, lapack_complex_float* a,
3630                          lapack_int lda, lapack_int* ipiv,
3631                          lapack_complex_float* b, lapack_int ldb );
3632lapack_int LAPACKE_zsysv( int matrix_order, char uplo, lapack_int n,
3633                          lapack_int nrhs, lapack_complex_double* a,
3634                          lapack_int lda, lapack_int* ipiv,
3635                          lapack_complex_double* b, lapack_int ldb );
3636
3637lapack_int LAPACKE_ssysvx( int matrix_order, char fact, char uplo, lapack_int n,
3638                           lapack_int nrhs, const float* a, lapack_int lda,
3639                           float* af, lapack_int ldaf, lapack_int* ipiv,
3640                           const float* b, lapack_int ldb, float* x,
3641                           lapack_int ldx, float* rcond, float* ferr,
3642                           float* berr );
3643lapack_int LAPACKE_dsysvx( int matrix_order, char fact, char uplo, lapack_int n,
3644                           lapack_int nrhs, const double* a, lapack_int lda,
3645                           double* af, lapack_int ldaf, lapack_int* ipiv,
3646                           const double* b, lapack_int ldb, double* x,
3647                           lapack_int ldx, double* rcond, double* ferr,
3648                           double* berr );
3649lapack_int LAPACKE_csysvx( int matrix_order, char fact, char uplo, lapack_int n,
3650                           lapack_int nrhs, const lapack_complex_float* a,
3651                           lapack_int lda, lapack_complex_float* af,
3652                           lapack_int ldaf, lapack_int* ipiv,
3653                           const lapack_complex_float* b, lapack_int ldb,
3654                           lapack_complex_float* x, lapack_int ldx,
3655                           float* rcond, float* ferr, float* berr );
3656lapack_int LAPACKE_zsysvx( int matrix_order, char fact, char uplo, lapack_int n,
3657                           lapack_int nrhs, const lapack_complex_double* a,
3658                           lapack_int lda, lapack_complex_double* af,
3659                           lapack_int ldaf, lapack_int* ipiv,
3660                           const lapack_complex_double* b, lapack_int ldb,
3661                           lapack_complex_double* x, lapack_int ldx,
3662                           double* rcond, double* ferr, double* berr );
3663
3664lapack_int LAPACKE_ssysvxx( int matrix_order, char fact, char uplo,
3665                            lapack_int n, lapack_int nrhs, float* a,
3666                            lapack_int lda, float* af, lapack_int ldaf,
3667                            lapack_int* ipiv, char* equed, float* s, float* b,
3668                            lapack_int ldb, float* x, lapack_int ldx,
3669                            float* rcond, float* rpvgrw, float* berr,
3670                            lapack_int n_err_bnds, float* err_bnds_norm,
3671                            float* err_bnds_comp, lapack_int nparams,
3672                            float* params );
3673lapack_int LAPACKE_dsysvxx( int matrix_order, char fact, char uplo,
3674                            lapack_int n, lapack_int nrhs, double* a,
3675                            lapack_int lda, double* af, lapack_int ldaf,
3676                            lapack_int* ipiv, char* equed, double* s, double* b,
3677                            lapack_int ldb, double* x, lapack_int ldx,
3678                            double* rcond, double* rpvgrw, double* berr,
3679                            lapack_int n_err_bnds, double* err_bnds_norm,
3680                            double* err_bnds_comp, lapack_int nparams,
3681                            double* params );
3682lapack_int LAPACKE_csysvxx( int matrix_order, char fact, char uplo,
3683                            lapack_int n, lapack_int nrhs,
3684                            lapack_complex_float* a, lapack_int lda,
3685                            lapack_complex_float* af, lapack_int ldaf,
3686                            lapack_int* ipiv, char* equed, float* s,
3687                            lapack_complex_float* b, lapack_int ldb,
3688                            lapack_complex_float* x, lapack_int ldx,
3689                            float* rcond, float* rpvgrw, float* berr,
3690                            lapack_int n_err_bnds, float* err_bnds_norm,
3691                            float* err_bnds_comp, lapack_int nparams,
3692                            float* params );
3693lapack_int LAPACKE_zsysvxx( int matrix_order, char fact, char uplo,
3694                            lapack_int n, lapack_int nrhs,
3695                            lapack_complex_double* a, lapack_int lda,
3696                            lapack_complex_double* af, lapack_int ldaf,
3697                            lapack_int* ipiv, char* equed, double* s,
3698                            lapack_complex_double* b, lapack_int ldb,
3699                            lapack_complex_double* x, lapack_int ldx,
3700                            double* rcond, double* rpvgrw, double* berr,
3701                            lapack_int n_err_bnds, double* err_bnds_norm,
3702                            double* err_bnds_comp, lapack_int nparams,
3703                            double* params );
3704
3705lapack_int LAPACKE_ssytrd( int matrix_order, char uplo, lapack_int n, float* a,
3706                           lapack_int lda, float* d, float* e, float* tau );
3707lapack_int LAPACKE_dsytrd( int matrix_order, char uplo, lapack_int n, double* a,
3708                           lapack_int lda, double* d, double* e, double* tau );
3709
3710lapack_int LAPACKE_ssytrf( int matrix_order, char uplo, lapack_int n, float* a,
3711                           lapack_int lda, lapack_int* ipiv );
3712lapack_int LAPACKE_dsytrf( int matrix_order, char uplo, lapack_int n, double* a,
3713                           lapack_int lda, lapack_int* ipiv );
3714lapack_int LAPACKE_csytrf( int matrix_order, char uplo, lapack_int n,
3715                           lapack_complex_float* a, lapack_int lda,
3716                           lapack_int* ipiv );
3717lapack_int LAPACKE_zsytrf( int matrix_order, char uplo, lapack_int n,
3718                           lapack_complex_double* a, lapack_int lda,
3719                           lapack_int* ipiv );
3720
3721lapack_int LAPACKE_ssytri( int matrix_order, char uplo, lapack_int n, float* a,
3722                           lapack_int lda, const lapack_int* ipiv );
3723lapack_int LAPACKE_dsytri( int matrix_order, char uplo, lapack_int n, double* a,
3724                           lapack_int lda, const lapack_int* ipiv );
3725lapack_int LAPACKE_csytri( int matrix_order, char uplo, lapack_int n,
3726                           lapack_complex_float* a, lapack_int lda,
3727                           const lapack_int* ipiv );
3728lapack_int LAPACKE_zsytri( int matrix_order, char uplo, lapack_int n,
3729                           lapack_complex_double* a, lapack_int lda,
3730                           const lapack_int* ipiv );
3731
3732lapack_int LAPACKE_ssytrs( int matrix_order, char uplo, lapack_int n,
3733                           lapack_int nrhs, const float* a, lapack_int lda,
3734                           const lapack_int* ipiv, float* b, lapack_int ldb );
3735lapack_int LAPACKE_dsytrs( int matrix_order, char uplo, lapack_int n,
3736                           lapack_int nrhs, const double* a, lapack_int lda,
3737                           const lapack_int* ipiv, double* b, lapack_int ldb );
3738lapack_int LAPACKE_csytrs( int matrix_order, char uplo, lapack_int n,
3739                           lapack_int nrhs, const lapack_complex_float* a,
3740                           lapack_int lda, const lapack_int* ipiv,
3741                           lapack_complex_float* b, lapack_int ldb );
3742lapack_int LAPACKE_zsytrs( int matrix_order, char uplo, lapack_int n,
3743                           lapack_int nrhs, const lapack_complex_double* a,
3744                           lapack_int lda, const lapack_int* ipiv,
3745                           lapack_complex_double* b, lapack_int ldb );
3746
3747lapack_int LAPACKE_stbcon( int matrix_order, char norm, char uplo, char diag,
3748                           lapack_int n, lapack_int kd, const float* ab,
3749                           lapack_int ldab, float* rcond );
3750lapack_int LAPACKE_dtbcon( int matrix_order, char norm, char uplo, char diag,
3751                           lapack_int n, lapack_int kd, const double* ab,
3752                           lapack_int ldab, double* rcond );
3753lapack_int LAPACKE_ctbcon( int matrix_order, char norm, char uplo, char diag,
3754                           lapack_int n, lapack_int kd,
3755                           const lapack_complex_float* ab, lapack_int ldab,
3756                           float* rcond );
3757lapack_int LAPACKE_ztbcon( int matrix_order, char norm, char uplo, char diag,
3758                           lapack_int n, lapack_int kd,
3759                           const lapack_complex_double* ab, lapack_int ldab,
3760                           double* rcond );
3761
3762lapack_int LAPACKE_stbrfs( int matrix_order, char uplo, char trans, char diag,
3763                           lapack_int n, lapack_int kd, lapack_int nrhs,
3764                           const float* ab, lapack_int ldab, const float* b,
3765                           lapack_int ldb, const float* x, lapack_int ldx,
3766                           float* ferr, float* berr );
3767lapack_int LAPACKE_dtbrfs( int matrix_order, char uplo, char trans, char diag,
3768                           lapack_int n, lapack_int kd, lapack_int nrhs,
3769                           const double* ab, lapack_int ldab, const double* b,
3770                           lapack_int ldb, const double* x, lapack_int ldx,
3771                           double* ferr, double* berr );
3772lapack_int LAPACKE_ctbrfs( int matrix_order, char uplo, char trans, char diag,
3773                           lapack_int n, lapack_int kd, lapack_int nrhs,
3774                           const lapack_complex_float* ab, lapack_int ldab,
3775                           const lapack_complex_float* b, lapack_int ldb,
3776                           const lapack_complex_float* x, lapack_int ldx,
3777                           float* ferr, float* berr );
3778lapack_int LAPACKE_ztbrfs( int matrix_order, char uplo, char trans, char diag,
3779                           lapack_int n, lapack_int kd, lapack_int nrhs,
3780                           const lapack_complex_double* ab, lapack_int ldab,
3781                           const lapack_complex_double* b, lapack_int ldb,
3782                           const lapack_complex_double* x, lapack_int ldx,
3783                           double* ferr, double* berr );
3784
3785lapack_int LAPACKE_stbtrs( int matrix_order, char uplo, char trans, char diag,
3786                           lapack_int n, lapack_int kd, lapack_int nrhs,
3787                           const float* ab, lapack_int ldab, float* b,
3788                           lapack_int ldb );
3789lapack_int LAPACKE_dtbtrs( int matrix_order, char uplo, char trans, char diag,
3790                           lapack_int n, lapack_int kd, lapack_int nrhs,
3791                           const double* ab, lapack_int ldab, double* b,
3792                           lapack_int ldb );
3793lapack_int LAPACKE_ctbtrs( int matrix_order, char uplo, char trans, char diag,
3794                           lapack_int n, lapack_int kd, lapack_int nrhs,
3795                           const lapack_complex_float* ab, lapack_int ldab,
3796                           lapack_complex_float* b, lapack_int ldb );
3797lapack_int LAPACKE_ztbtrs( int matrix_order, char uplo, char trans, char diag,
3798                           lapack_int n, lapack_int kd, lapack_int nrhs,
3799                           const lapack_complex_double* ab, lapack_int ldab,
3800                           lapack_complex_double* b, lapack_int ldb );
3801
3802lapack_int LAPACKE_stfsm( int matrix_order, char transr, char side, char uplo,
3803                          char trans, char diag, lapack_int m, lapack_int n,
3804                          float alpha, const float* a, float* b,
3805                          lapack_int ldb );
3806lapack_int LAPACKE_dtfsm( int matrix_order, char transr, char side, char uplo,
3807                          char trans, char diag, lapack_int m, lapack_int n,
3808                          double alpha, const double* a, double* b,
3809                          lapack_int ldb );
3810lapack_int LAPACKE_ctfsm( int matrix_order, char transr, char side, char uplo,
3811                          char trans, char diag, lapack_int m, lapack_int n,
3812                          lapack_complex_float alpha,
3813                          const lapack_complex_float* a,
3814                          lapack_complex_float* b, lapack_int ldb );
3815lapack_int LAPACKE_ztfsm( int matrix_order, char transr, char side, char uplo,
3816                          char trans, char diag, lapack_int m, lapack_int n,
3817                          lapack_complex_double alpha,
3818                          const lapack_complex_double* a,
3819                          lapack_complex_double* b, lapack_int ldb );
3820
3821lapack_int LAPACKE_stftri( int matrix_order, char transr, char uplo, char diag,
3822                           lapack_int n, float* a );
3823lapack_int LAPACKE_dtftri( int matrix_order, char transr, char uplo, char diag,
3824                           lapack_int n, double* a );
3825lapack_int LAPACKE_ctftri( int matrix_order, char transr, char uplo, char diag,
3826                           lapack_int n, lapack_complex_float* a );
3827lapack_int LAPACKE_ztftri( int matrix_order, char transr, char uplo, char diag,
3828                           lapack_int n, lapack_complex_double* a );
3829
3830lapack_int LAPACKE_stfttp( int matrix_order, char transr, char uplo,
3831                           lapack_int n, const float* arf, float* ap );
3832lapack_int LAPACKE_dtfttp( int matrix_order, char transr, char uplo,
3833                           lapack_int n, const double* arf, double* ap );
3834lapack_int LAPACKE_ctfttp( int matrix_order, char transr, char uplo,
3835                           lapack_int n, const lapack_complex_float* arf,
3836                           lapack_complex_float* ap );
3837lapack_int LAPACKE_ztfttp( int matrix_order, char transr, char uplo,
3838                           lapack_int n, const lapack_complex_double* arf,
3839                           lapack_complex_double* ap );
3840
3841lapack_int LAPACKE_stfttr( int matrix_order, char transr, char uplo,
3842                           lapack_int n, const float* arf, float* a,
3843                           lapack_int lda );
3844lapack_int LAPACKE_dtfttr( int matrix_order, char transr, char uplo,
3845                           lapack_int n, const double* arf, double* a,
3846                           lapack_int lda );
3847lapack_int LAPACKE_ctfttr( int matrix_order, char transr, char uplo,
3848                           lapack_int n, const lapack_complex_float* arf,
3849                           lapack_complex_float* a, lapack_int lda );
3850lapack_int LAPACKE_ztfttr( int matrix_order, char transr, char uplo,
3851                           lapack_int n, const lapack_complex_double* arf,
3852                           lapack_complex_double* a, lapack_int lda );
3853
3854lapack_int LAPACKE_stgevc( int matrix_order, char side, char howmny,
3855                           const lapack_logical* select, lapack_int n,
3856                           const float* s, lapack_int lds, const float* p,
3857                           lapack_int ldp, float* vl, lapack_int ldvl,
3858                           float* vr, lapack_int ldvr, lapack_int mm,
3859                           lapack_int* m );
3860lapack_int LAPACKE_dtgevc( int matrix_order, char side, char howmny,
3861                           const lapack_logical* select, lapack_int n,
3862                           const double* s, lapack_int lds, const double* p,
3863                           lapack_int ldp, double* vl, lapack_int ldvl,
3864                           double* vr, lapack_int ldvr, lapack_int mm,
3865                           lapack_int* m );
3866lapack_int LAPACKE_ctgevc( int matrix_order, char side, char howmny,
3867                           const lapack_logical* select, lapack_int n,
3868                           const lapack_complex_float* s, lapack_int lds,
3869                           const lapack_complex_float* p, lapack_int ldp,
3870                           lapack_complex_float* vl, lapack_int ldvl,
3871                           lapack_complex_float* vr, lapack_int ldvr,
3872                           lapack_int mm, lapack_int* m );
3873lapack_int LAPACKE_ztgevc( int matrix_order, char side, char howmny,
3874                           const lapack_logical* select, lapack_int n,
3875                           const lapack_complex_double* s, lapack_int lds,
3876                           const lapack_complex_double* p, lapack_int ldp,
3877                           lapack_complex_double* vl, lapack_int ldvl,
3878                           lapack_complex_double* vr, lapack_int ldvr,
3879                           lapack_int mm, lapack_int* m );
3880
3881lapack_int LAPACKE_stgexc( int matrix_order, lapack_logical wantq,
3882                           lapack_logical wantz, lapack_int n, float* a,
3883                           lapack_int lda, float* b, lapack_int ldb, float* q,
3884                           lapack_int ldq, float* z, lapack_int ldz,
3885                           lapack_int* ifst, lapack_int* ilst );
3886lapack_int LAPACKE_dtgexc( int matrix_order, lapack_logical wantq,
3887                           lapack_logical wantz, lapack_int n, double* a,
3888                           lapack_int lda, double* b, lapack_int ldb, double* q,
3889                           lapack_int ldq, double* z, lapack_int ldz,
3890                           lapack_int* ifst, lapack_int* ilst );
3891lapack_int LAPACKE_ctgexc( int matrix_order, lapack_logical wantq,
3892                           lapack_logical wantz, lapack_int n,
3893                           lapack_complex_float* a, lapack_int lda,
3894                           lapack_complex_float* b, lapack_int ldb,
3895                           lapack_complex_float* q, lapack_int ldq,
3896                           lapack_complex_float* z, lapack_int ldz,
3897                           lapack_int ifst, lapack_int ilst );
3898lapack_int LAPACKE_ztgexc( int matrix_order, lapack_logical wantq,
3899                           lapack_logical wantz, lapack_int n,
3900                           lapack_complex_double* a, lapack_int lda,
3901                           lapack_complex_double* b, lapack_int ldb,
3902                           lapack_complex_double* q, lapack_int ldq,
3903                           lapack_complex_double* z, lapack_int ldz,
3904                           lapack_int ifst, lapack_int ilst );
3905
3906lapack_int LAPACKE_stgsen( int matrix_order, lapack_int ijob,
3907                           lapack_logical wantq, lapack_logical wantz,
3908                           const lapack_logical* select, lapack_int n, float* a,
3909                           lapack_int lda, float* b, lapack_int ldb,
3910                           float* alphar, float* alphai, float* beta, float* q,
3911                           lapack_int ldq, float* z, lapack_int ldz,
3912                           lapack_int* m, float* pl, float* pr, float* dif );
3913lapack_int LAPACKE_dtgsen( int matrix_order, lapack_int ijob,
3914                           lapack_logical wantq, lapack_logical wantz,
3915                           const lapack_logical* select, lapack_int n,
3916                           double* a, lapack_int lda, double* b, lapack_int ldb,
3917                           double* alphar, double* alphai, double* beta,
3918                           double* q, lapack_int ldq, double* z, lapack_int ldz,
3919                           lapack_int* m, double* pl, double* pr, double* dif );
3920lapack_int LAPACKE_ctgsen( int matrix_order, lapack_int ijob,
3921                           lapack_logical wantq, lapack_logical wantz,
3922                           const lapack_logical* select, lapack_int n,
3923                           lapack_complex_float* a, lapack_int lda,
3924                           lapack_complex_float* b, lapack_int ldb,
3925                           lapack_complex_float* alpha,
3926                           lapack_complex_float* beta, lapack_complex_float* q,
3927                           lapack_int ldq, lapack_complex_float* z,
3928                           lapack_int ldz, lapack_int* m, float* pl, float* pr,
3929                           float* dif );
3930lapack_int LAPACKE_ztgsen( int matrix_order, lapack_int ijob,
3931                           lapack_logical wantq, lapack_logical wantz,
3932                           const lapack_logical* select, lapack_int n,
3933                           lapack_complex_double* a, lapack_int lda,
3934                           lapack_complex_double* b, lapack_int ldb,
3935                           lapack_complex_double* alpha,
3936                           lapack_complex_double* beta,
3937                           lapack_complex_double* q, lapack_int ldq,
3938                           lapack_complex_double* z, lapack_int ldz,
3939                           lapack_int* m, double* pl, double* pr, double* dif );
3940
3941lapack_int LAPACKE_stgsja( int matrix_order, char jobu, char jobv, char jobq,
3942                           lapack_int m, lapack_int p, lapack_int n,
3943                           lapack_int k, lapack_int l, float* a, lapack_int lda,
3944                           float* b, lapack_int ldb, float tola, float tolb,
3945                           float* alpha, float* beta, float* u, lapack_int ldu,
3946                           float* v, lapack_int ldv, float* q, lapack_int ldq,
3947                           lapack_int* ncycle );
3948lapack_int LAPACKE_dtgsja( int matrix_order, char jobu, char jobv, char jobq,
3949                           lapack_int m, lapack_int p, lapack_int n,
3950                           lapack_int k, lapack_int l, double* a,
3951                           lapack_int lda, double* b, lapack_int ldb,
3952                           double tola, double tolb, double* alpha,
3953                           double* beta, double* u, lapack_int ldu, double* v,
3954                           lapack_int ldv, double* q, lapack_int ldq,
3955                           lapack_int* ncycle );
3956lapack_int LAPACKE_ctgsja( int matrix_order, char jobu, char jobv, char jobq,
3957                           lapack_int m, lapack_int p, lapack_int n,
3958                           lapack_int k, lapack_int l, lapack_complex_float* a,
3959                           lapack_int lda, lapack_complex_float* b,
3960                           lapack_int ldb, float tola, float tolb, float* alpha,
3961                           float* beta, lapack_complex_float* u, lapack_int ldu,
3962                           lapack_complex_float* v, lapack_int ldv,
3963                           lapack_complex_float* q, lapack_int ldq,
3964                           lapack_int* ncycle );
3965lapack_int LAPACKE_ztgsja( int matrix_order, char jobu, char jobv, char jobq,
3966                           lapack_int m, lapack_int p, lapack_int n,
3967                           lapack_int k, lapack_int l, lapack_complex_double* a,
3968                           lapack_int lda, lapack_complex_double* b,
3969                           lapack_int ldb, double tola, double tolb,
3970                           double* alpha, double* beta,
3971                           lapack_complex_double* u, lapack_int ldu,
3972                           lapack_complex_double* v, lapack_int ldv,
3973                           lapack_complex_double* q, lapack_int ldq,
3974                           lapack_int* ncycle );
3975
3976lapack_int LAPACKE_stgsna( int matrix_order, char job, char howmny,
3977                           const lapack_logical* select, lapack_int n,
3978                           const float* a, lapack_int lda, const float* b,
3979                           lapack_int ldb, const float* vl, lapack_int ldvl,
3980                           const float* vr, lapack_int ldvr, float* s,
3981                           float* dif, lapack_int mm, lapack_int* m );
3982lapack_int LAPACKE_dtgsna( int matrix_order, char job, char howmny,
3983                           const lapack_logical* select, lapack_int n,
3984                           const double* a, lapack_int lda, const double* b,
3985                           lapack_int ldb, const double* vl, lapack_int ldvl,
3986                           const double* vr, lapack_int ldvr, double* s,
3987                           double* dif, lapack_int mm, lapack_int* m );
3988lapack_int LAPACKE_ctgsna( int matrix_order, char job, char howmny,
3989                           const lapack_logical* select, lapack_int n,
3990                           const lapack_complex_float* a, lapack_int lda,
3991                           const lapack_complex_float* b, lapack_int ldb,
3992                           const lapack_complex_float* vl, lapack_int ldvl,
3993                           const lapack_complex_float* vr, lapack_int ldvr,
3994                           float* s, float* dif, lapack_int mm, lapack_int* m );
3995lapack_int LAPACKE_ztgsna( int matrix_order, char job, char howmny,
3996                           const lapack_logical* select, lapack_int n,
3997                           const lapack_complex_double* a, lapack_int lda,
3998                           const lapack_complex_double* b, lapack_int ldb,
3999                           const lapack_complex_double* vl, lapack_int ldvl,
4000                           const lapack_complex_double* vr, lapack_int ldvr,
4001                           double* s, double* dif, lapack_int mm,
4002                           lapack_int* m );
4003
4004lapack_int LAPACKE_stgsyl( int matrix_order, char trans, lapack_int ijob,
4005                           lapack_int m, lapack_int n, const float* a,
4006                           lapack_int lda, const float* b, lapack_int ldb,
4007                           float* c, lapack_int ldc, const float* d,
4008                           lapack_int ldd, const float* e, lapack_int lde,
4009                           float* f, lapack_int ldf, float* scale, float* dif );
4010lapack_int LAPACKE_dtgsyl( int matrix_order, char trans, lapack_int ijob,
4011                           lapack_int m, lapack_int n, const double* a,
4012                           lapack_int lda, const double* b, lapack_int ldb,
4013                           double* c, lapack_int ldc, const double* d,
4014                           lapack_int ldd, const double* e, lapack_int lde,
4015                           double* f, lapack_int ldf, double* scale,
4016                           double* dif );
4017lapack_int LAPACKE_ctgsyl( int matrix_order, char trans, lapack_int ijob,
4018                           lapack_int m, lapack_int n,
4019                           const lapack_complex_float* a, lapack_int lda,
4020                           const lapack_complex_float* b, lapack_int ldb,
4021                           lapack_complex_float* c, lapack_int ldc,
4022                           const lapack_complex_float* d, lapack_int ldd,
4023                           const lapack_complex_float* e, lapack_int lde,
4024                           lapack_complex_float* f, lapack_int ldf,
4025                           float* scale, float* dif );
4026lapack_int LAPACKE_ztgsyl( int matrix_order, char trans, lapack_int ijob,
4027                           lapack_int m, lapack_int n,
4028                           const lapack_complex_double* a, lapack_int lda,
4029                           const lapack_complex_double* b, lapack_int ldb,
4030                           lapack_complex_double* c, lapack_int ldc,
4031                           const lapack_complex_double* d, lapack_int ldd,
4032                           const lapack_complex_double* e, lapack_int lde,
4033                           lapack_complex_double* f, lapack_int ldf,
4034                           double* scale, double* dif );
4035
4036lapack_int LAPACKE_stpcon( int matrix_order, char norm, char uplo, char diag,
4037                           lapack_int n, const float* ap, float* rcond );
4038lapack_int LAPACKE_dtpcon( int matrix_order, char norm, char uplo, char diag,
4039                           lapack_int n, const double* ap, double* rcond );
4040lapack_int LAPACKE_ctpcon( int matrix_order, char norm, char uplo, char diag,
4041                           lapack_int n, const lapack_complex_float* ap,
4042                           float* rcond );
4043lapack_int LAPACKE_ztpcon( int matrix_order, char norm, char uplo, char diag,
4044                           lapack_int n, const lapack_complex_double* ap,
4045                           double* rcond );
4046
4047lapack_int LAPACKE_stprfs( int matrix_order, char uplo, char trans, char diag,
4048                           lapack_int n, lapack_int nrhs, const float* ap,
4049                           const float* b, lapack_int ldb, const float* x,
4050                           lapack_int ldx, float* ferr, float* berr );
4051lapack_int LAPACKE_dtprfs( int matrix_order, char uplo, char trans, char diag,
4052                           lapack_int n, lapack_int nrhs, const double* ap,
4053                           const double* b, lapack_int ldb, const double* x,
4054                           lapack_int ldx, double* ferr, double* berr );
4055lapack_int LAPACKE_ctprfs( int matrix_order, char uplo, char trans, char diag,
4056                           lapack_int n, lapack_int nrhs,
4057                           const lapack_complex_float* ap,
4058                           const lapack_complex_float* b, lapack_int ldb,
4059                           const lapack_complex_float* x, lapack_int ldx,
4060                           float* ferr, float* berr );
4061lapack_int LAPACKE_ztprfs( int matrix_order, char uplo, char trans, char diag,
4062                           lapack_int n, lapack_int nrhs,
4063                           const lapack_complex_double* ap,
4064                           const lapack_complex_double* b, lapack_int ldb,
4065                           const lapack_complex_double* x, lapack_int ldx,
4066                           double* ferr, double* berr );
4067
4068lapack_int LAPACKE_stptri( int matrix_order, char uplo, char diag, lapack_int n,
4069                           float* ap );
4070lapack_int LAPACKE_dtptri( int matrix_order, char uplo, char diag, lapack_int n,
4071                           double* ap );
4072lapack_int LAPACKE_ctptri( int matrix_order, char uplo, char diag, lapack_int n,
4073                           lapack_complex_float* ap );
4074lapack_int LAPACKE_ztptri( int matrix_order, char uplo, char diag, lapack_int n,
4075                           lapack_complex_double* ap );
4076
4077lapack_int LAPACKE_stptrs( int matrix_order, char uplo, char trans, char diag,
4078                           lapack_int n, lapack_int nrhs, const float* ap,
4079                           float* b, lapack_int ldb );
4080lapack_int LAPACKE_dtptrs( int matrix_order, char uplo, char trans, char diag,
4081                           lapack_int n, lapack_int nrhs, const double* ap,
4082                           double* b, lapack_int ldb );
4083lapack_int LAPACKE_ctptrs( int matrix_order, char uplo, char trans, char diag,
4084                           lapack_int n, lapack_int nrhs,
4085                           const lapack_complex_float* ap,
4086                           lapack_complex_float* b, lapack_int ldb );
4087lapack_int LAPACKE_ztptrs( int matrix_order, char uplo, char trans, char diag,
4088                           lapack_int n, lapack_int nrhs,
4089                           const lapack_complex_double* ap,
4090                           lapack_complex_double* b, lapack_int ldb );
4091
4092lapack_int LAPACKE_stpttf( int matrix_order, char transr, char uplo,
4093                           lapack_int n, const float* ap, float* arf );
4094lapack_int LAPACKE_dtpttf( int matrix_order, char transr, char uplo,
4095                           lapack_int n, const double* ap, double* arf );
4096lapack_int LAPACKE_ctpttf( int matrix_order, char transr, char uplo,
4097                           lapack_int n, const lapack_complex_float* ap,
4098                           lapack_complex_float* arf );
4099lapack_int LAPACKE_ztpttf( int matrix_order, char transr, char uplo,
4100                           lapack_int n, const lapack_complex_double* ap,
4101                           lapack_complex_double* arf );
4102
4103lapack_int LAPACKE_stpttr( int matrix_order, char uplo, lapack_int n,
4104                           const float* ap, float* a, lapack_int lda );
4105lapack_int LAPACKE_dtpttr( int matrix_order, char uplo, lapack_int n,
4106                           const double* ap, double* a, lapack_int lda );
4107lapack_int LAPACKE_ctpttr( int matrix_order, char uplo, lapack_int n,
4108                           const lapack_complex_float* ap,
4109                           lapack_complex_float* a, lapack_int lda );
4110lapack_int LAPACKE_ztpttr( int matrix_order, char uplo, lapack_int n,
4111                           const lapack_complex_double* ap,
4112                           lapack_complex_double* a, lapack_int lda );
4113
4114lapack_int LAPACKE_strcon( int matrix_order, char norm, char uplo, char diag,
4115                           lapack_int n, const float* a, lapack_int lda,
4116                           float* rcond );
4117lapack_int LAPACKE_dtrcon( int matrix_order, char norm, char uplo, char diag,
4118                           lapack_int n, const double* a, lapack_int lda,
4119                           double* rcond );
4120lapack_int LAPACKE_ctrcon( int matrix_order, char norm, char uplo, char diag,
4121                           lapack_int n, const lapack_complex_float* a,
4122                           lapack_int lda, float* rcond );
4123lapack_int LAPACKE_ztrcon( int matrix_order, char norm, char uplo, char diag,
4124                           lapack_int n, const lapack_complex_double* a,
4125                           lapack_int lda, double* rcond );
4126
4127lapack_int LAPACKE_strevc( int matrix_order, char side, char howmny,
4128                           lapack_logical* select, lapack_int n, const float* t,
4129                           lapack_int ldt, float* vl, lapack_int ldvl,
4130                           float* vr, lapack_int ldvr, lapack_int mm,
4131                           lapack_int* m );
4132lapack_int LAPACKE_dtrevc( int matrix_order, char side, char howmny,
4133                           lapack_logical* select, lapack_int n,
4134                           const double* t, lapack_int ldt, double* vl,
4135                           lapack_int ldvl, double* vr, lapack_int ldvr,
4136                           lapack_int mm, lapack_int* m );
4137lapack_int LAPACKE_ctrevc( int matrix_order, char side, char howmny,
4138                           const lapack_logical* select, lapack_int n,
4139                           lapack_complex_float* t, lapack_int ldt,
4140                           lapack_complex_float* vl, lapack_int ldvl,
4141                           lapack_complex_float* vr, lapack_int ldvr,
4142                           lapack_int mm, lapack_int* m );
4143lapack_int LAPACKE_ztrevc( int matrix_order, char side, char howmny,
4144                           const lapack_logical* select, lapack_int n,
4145                           lapack_complex_double* t, lapack_int ldt,
4146                           lapack_complex_double* vl, lapack_int ldvl,
4147                           lapack_complex_double* vr, lapack_int ldvr,
4148                           lapack_int mm, lapack_int* m );
4149
4150lapack_int LAPACKE_strexc( int matrix_order, char compq, lapack_int n, float* t,
4151                           lapack_int ldt, float* q, lapack_int ldq,
4152                           lapack_int* ifst, lapack_int* ilst );
4153lapack_int LAPACKE_dtrexc( int matrix_order, char compq, lapack_int n,
4154                           double* t, lapack_int ldt, double* q, lapack_int ldq,
4155                           lapack_int* ifst, lapack_int* ilst );
4156lapack_int LAPACKE_ctrexc( int matrix_order, char compq, lapack_int n,
4157                           lapack_complex_float* t, lapack_int ldt,
4158                           lapack_complex_float* q, lapack_int ldq,
4159                           lapack_int ifst, lapack_int ilst );
4160lapack_int LAPACKE_ztrexc( int matrix_order, char compq, lapack_int n,
4161                           lapack_complex_double* t, lapack_int ldt,
4162                           lapack_complex_double* q, lapack_int ldq,
4163                           lapack_int ifst, lapack_int ilst );
4164
4165lapack_int LAPACKE_strrfs( int matrix_order, char uplo, char trans, char diag,
4166                           lapack_int n, lapack_int nrhs, const float* a,
4167                           lapack_int lda, const float* b, lapack_int ldb,
4168                           const float* x, lapack_int ldx, float* ferr,
4169                           float* berr );
4170lapack_int LAPACKE_dtrrfs( int matrix_order, char uplo, char trans, char diag,
4171                           lapack_int n, lapack_int nrhs, const double* a,
4172                           lapack_int lda, const double* b, lapack_int ldb,
4173                           const double* x, lapack_int ldx, double* ferr,
4174                           double* berr );
4175lapack_int LAPACKE_ctrrfs( int matrix_order, char uplo, char trans, char diag,
4176                           lapack_int n, lapack_int nrhs,
4177                           const lapack_complex_float* a, lapack_int lda,
4178                           const lapack_complex_float* b, lapack_int ldb,
4179                           const lapack_complex_float* x, lapack_int ldx,
4180                           float* ferr, float* berr );
4181lapack_int LAPACKE_ztrrfs( int matrix_order, char uplo, char trans, char diag,
4182                           lapack_int n, lapack_int nrhs,
4183                           const lapack_complex_double* a, lapack_int lda,
4184                           const lapack_complex_double* b, lapack_int ldb,
4185                           const lapack_complex_double* x, lapack_int ldx,
4186                           double* ferr, double* berr );
4187
4188lapack_int LAPACKE_strsen( int matrix_order, char job, char compq,
4189                           const lapack_logical* select, lapack_int n, float* t,
4190                           lapack_int ldt, float* q, lapack_int ldq, float* wr,
4191                           float* wi, lapack_int* m, float* s, float* sep );
4192lapack_int LAPACKE_dtrsen( int matrix_order, char job, char compq,
4193                           const lapack_logical* select, lapack_int n,
4194                           double* t, lapack_int ldt, double* q, lapack_int ldq,
4195                           double* wr, double* wi, lapack_int* m, double* s,
4196                           double* sep );
4197lapack_int LAPACKE_ctrsen( int matrix_order, char job, char compq,
4198                           const lapack_logical* select, lapack_int n,
4199                           lapack_complex_float* t, lapack_int ldt,
4200                           lapack_complex_float* q, lapack_int ldq,
4201                           lapack_complex_float* w, lapack_int* m, float* s,
4202                           float* sep );
4203lapack_int LAPACKE_ztrsen( int matrix_order, char job, char compq,
4204                           const lapack_logical* select, lapack_int n,
4205                           lapack_complex_double* t, lapack_int ldt,
4206                           lapack_complex_double* q, lapack_int ldq,
4207                           lapack_complex_double* w, lapack_int* m, double* s,
4208                           double* sep );
4209
4210lapack_int LAPACKE_strsna( int matrix_order, char job, char howmny,
4211                           const lapack_logical* select, lapack_int n,
4212                           const float* t, lapack_int ldt, const float* vl,
4213                           lapack_int ldvl, const float* vr, lapack_int ldvr,
4214                           float* s, float* sep, lapack_int mm, lapack_int* m );
4215lapack_int LAPACKE_dtrsna( int matrix_order, char job, char howmny,
4216                           const lapack_logical* select, lapack_int n,
4217                           const double* t, lapack_int ldt, const double* vl,
4218                           lapack_int ldvl, const double* vr, lapack_int ldvr,
4219                           double* s, double* sep, lapack_int mm,
4220                           lapack_int* m );
4221lapack_int LAPACKE_ctrsna( int matrix_order, char job, char howmny,
4222                           const lapack_logical* select, lapack_int n,
4223                           const lapack_complex_float* t, lapack_int ldt,
4224                           const lapack_complex_float* vl, lapack_int ldvl,
4225                           const lapack_complex_float* vr, lapack_int ldvr,
4226                           float* s, float* sep, lapack_int mm, lapack_int* m );
4227lapack_int LAPACKE_ztrsna( int matrix_order, char job, char howmny,
4228                           const lapack_logical* select, lapack_int n,
4229                           const lapack_complex_double* t, lapack_int ldt,
4230                           const lapack_complex_double* vl, lapack_int ldvl,
4231                           const lapack_complex_double* vr, lapack_int ldvr,
4232                           double* s, double* sep, lapack_int mm,
4233                           lapack_int* m );
4234
4235lapack_int LAPACKE_strsyl( int matrix_order, char trana, char tranb,
4236                           lapack_int isgn, lapack_int m, lapack_int n,
4237                           const float* a, lapack_int lda, const float* b,
4238                           lapack_int ldb, float* c, lapack_int ldc,
4239                           float* scale );
4240lapack_int LAPACKE_dtrsyl( int matrix_order, char trana, char tranb,
4241                           lapack_int isgn, lapack_int m, lapack_int n,
4242                           const double* a, lapack_int lda, const double* b,
4243                           lapack_int ldb, double* c, lapack_int ldc,
4244                           double* scale );
4245lapack_int LAPACKE_ctrsyl( int matrix_order, char trana, char tranb,
4246                           lapack_int isgn, lapack_int m, lapack_int n,
4247                           const lapack_complex_float* a, lapack_int lda,
4248                           const lapack_complex_float* b, lapack_int ldb,
4249                           lapack_complex_float* c, lapack_int ldc,
4250                           float* scale );
4251lapack_int LAPACKE_ztrsyl( int matrix_order, char trana, char tranb,
4252                           lapack_int isgn, lapack_int m, lapack_int n,
4253                           const lapack_complex_double* a, lapack_int lda,
4254                           const lapack_complex_double* b, lapack_int ldb,
4255                           lapack_complex_double* c, lapack_int ldc,
4256                           double* scale );
4257
4258lapack_int LAPACKE_strtri( int matrix_order, char uplo, char diag, lapack_int n,
4259                           float* a, lapack_int lda );
4260lapack_int LAPACKE_dtrtri( int matrix_order, char uplo, char diag, lapack_int n,
4261                           double* a, lapack_int lda );
4262lapack_int LAPACKE_ctrtri( int matrix_order, char uplo, char diag, lapack_int n,
4263                           lapack_complex_float* a, lapack_int lda );
4264lapack_int LAPACKE_ztrtri( int matrix_order, char uplo, char diag, lapack_int n,
4265                           lapack_complex_double* a, lapack_int lda );
4266
4267lapack_int LAPACKE_strtrs( int matrix_order, char uplo, char trans, char diag,
4268                           lapack_int n, lapack_int nrhs, const float* a,
4269                           lapack_int lda, float* b, lapack_int ldb );
4270lapack_int LAPACKE_dtrtrs( int matrix_order, char uplo, char trans, char diag,
4271                           lapack_int n, lapack_int nrhs, const double* a,
4272                           lapack_int lda, double* b, lapack_int ldb );
4273lapack_int LAPACKE_ctrtrs( int matrix_order, char uplo, char trans, char diag,
4274                           lapack_int n, lapack_int nrhs,
4275                           const lapack_complex_float* a, lapack_int lda,
4276                           lapack_complex_float* b, lapack_int ldb );
4277lapack_int LAPACKE_ztrtrs( int matrix_order, char uplo, char trans, char diag,
4278                           lapack_int n, lapack_int nrhs,
4279                           const lapack_complex_double* a, lapack_int lda,
4280                           lapack_complex_double* b, lapack_int ldb );
4281
4282lapack_int LAPACKE_strttf( int matrix_order, char transr, char uplo,
4283                           lapack_int n, const float* a, lapack_int lda,
4284                           float* arf );
4285lapack_int LAPACKE_dtrttf( int matrix_order, char transr, char uplo,
4286                           lapack_int n, const double* a, lapack_int lda,
4287                           double* arf );
4288lapack_int LAPACKE_ctrttf( int matrix_order, char transr, char uplo,
4289                           lapack_int n, const lapack_complex_float* a,
4290                           lapack_int lda, lapack_complex_float* arf );
4291lapack_int LAPACKE_ztrttf( int matrix_order, char transr, char uplo,
4292                           lapack_int n, const lapack_complex_double* a,
4293                           lapack_int lda, lapack_complex_double* arf );
4294
4295lapack_int LAPACKE_strttp( int matrix_order, char uplo, lapack_int n,
4296                           const float* a, lapack_int lda, float* ap );
4297lapack_int LAPACKE_dtrttp( int matrix_order, char uplo, lapack_int n,
4298                           const double* a, lapack_int lda, double* ap );
4299lapack_int LAPACKE_ctrttp( int matrix_order, char uplo, lapack_int n,
4300                           const lapack_complex_float* a, lapack_int lda,
4301                           lapack_complex_float* ap );
4302lapack_int LAPACKE_ztrttp( int matrix_order, char uplo, lapack_int n,
4303                           const lapack_complex_double* a, lapack_int lda,
4304                           lapack_complex_double* ap );
4305
4306lapack_int LAPACKE_stzrzf( int matrix_order, lapack_int m, lapack_int n,
4307                           float* a, lapack_int lda, float* tau );
4308lapack_int LAPACKE_dtzrzf( int matrix_order, lapack_int m, lapack_int n,
4309                           double* a, lapack_int lda, double* tau );
4310lapack_int LAPACKE_ctzrzf( int matrix_order, lapack_int m, lapack_int n,
4311                           lapack_complex_float* a, lapack_int lda,
4312                           lapack_complex_float* tau );
4313lapack_int LAPACKE_ztzrzf( int matrix_order, lapack_int m, lapack_int n,
4314                           lapack_complex_double* a, lapack_int lda,
4315                           lapack_complex_double* tau );
4316
4317lapack_int LAPACKE_cungbr( int matrix_order, char vect, lapack_int m,
4318                           lapack_int n, lapack_int k, lapack_complex_float* a,
4319                           lapack_int lda, const lapack_complex_float* tau );
4320lapack_int LAPACKE_zungbr( int matrix_order, char vect, lapack_int m,
4321                           lapack_int n, lapack_int k, lapack_complex_double* a,
4322                           lapack_int lda, const lapack_complex_double* tau );
4323
4324lapack_int LAPACKE_cunghr( int matrix_order, lapack_int n, lapack_int ilo,
4325                           lapack_int ihi, lapack_complex_float* a,
4326                           lapack_int lda, const lapack_complex_float* tau );
4327lapack_int LAPACKE_zunghr( int matrix_order, lapack_int n, lapack_int ilo,
4328                           lapack_int ihi, lapack_complex_double* a,
4329                           lapack_int lda, const lapack_complex_double* tau );
4330
4331lapack_int LAPACKE_cunglq( int matrix_order, lapack_int m, lapack_int n,
4332                           lapack_int k, lapack_complex_float* a,
4333                           lapack_int lda, const lapack_complex_float* tau );
4334lapack_int LAPACKE_zunglq( int matrix_order, lapack_int m, lapack_int n,
4335                           lapack_int k, lapack_complex_double* a,
4336                           lapack_int lda, const lapack_complex_double* tau );
4337
4338lapack_int LAPACKE_cungql( int matrix_order, lapack_int m, lapack_int n,
4339                           lapack_int k, lapack_complex_float* a,
4340                           lapack_int lda, const lapack_complex_float* tau );
4341lapack_int LAPACKE_zungql( int matrix_order, lapack_int m, lapack_int n,
4342                           lapack_int k, lapack_complex_double* a,
4343                           lapack_int lda, const lapack_complex_double* tau );
4344
4345lapack_int LAPACKE_cungqr( int matrix_order, lapack_int m, lapack_int n,
4346                           lapack_int k, lapack_complex_float* a,
4347                           lapack_int lda, const lapack_complex_float* tau );
4348lapack_int LAPACKE_zungqr( int matrix_order, lapack_int m, lapack_int n,
4349                           lapack_int k, lapack_complex_double* a,
4350                           lapack_int lda, const lapack_complex_double* tau );
4351
4352lapack_int LAPACKE_cungrq( int matrix_order, lapack_int m, lapack_int n,
4353                           lapack_int k, lapack_complex_float* a,
4354                           lapack_int lda, const lapack_complex_float* tau );
4355lapack_int LAPACKE_zungrq( int matrix_order, lapack_int m, lapack_int n,
4356                           lapack_int k, lapack_complex_double* a,
4357                           lapack_int lda, const lapack_complex_double* tau );
4358
4359lapack_int LAPACKE_cungtr( int matrix_order, char uplo, lapack_int n,
4360                           lapack_complex_float* a, lapack_int lda,
4361                           const lapack_complex_float* tau );
4362lapack_int LAPACKE_zungtr( int matrix_order, char uplo, lapack_int n,
4363                           lapack_complex_double* a, lapack_int lda,
4364                           const lapack_complex_double* tau );
4365
4366lapack_int LAPACKE_cunmbr( int matrix_order, char vect, char side, char trans,
4367                           lapack_int m, lapack_int n, lapack_int k,
4368                           const lapack_complex_float* a, lapack_int lda,
4369                           const lapack_complex_float* tau,
4370                           lapack_complex_float* c, lapack_int ldc );
4371lapack_int LAPACKE_zunmbr( int matrix_order, char vect, char side, char trans,
4372                           lapack_int m, lapack_int n, lapack_int k,
4373                           const lapack_complex_double* a, lapack_int lda,
4374                           const lapack_complex_double* tau,
4375                           lapack_complex_double* c, lapack_int ldc );
4376
4377lapack_int LAPACKE_cunmhr( int matrix_order, char side, char trans,
4378                           lapack_int m, lapack_int n, lapack_int ilo,
4379                           lapack_int ihi, const lapack_complex_float* a,
4380                           lapack_int lda, const lapack_complex_float* tau,
4381                           lapack_complex_float* c, lapack_int ldc );
4382lapack_int LAPACKE_zunmhr( int matrix_order, char side, char trans,
4383                           lapack_int m, lapack_int n, lapack_int ilo,
4384                           lapack_int ihi, const lapack_complex_double* a,
4385                           lapack_int lda, const lapack_complex_double* tau,
4386                           lapack_complex_double* c, lapack_int ldc );
4387
4388lapack_int LAPACKE_cunmlq( int matrix_order, char side, char trans,
4389                           lapack_int m, lapack_int n, lapack_int k,
4390                           const lapack_complex_float* a, lapack_int lda,
4391                           const lapack_complex_float* tau,
4392                           lapack_complex_float* c, lapack_int ldc );
4393lapack_int LAPACKE_zunmlq( int matrix_order, char side, char trans,
4394                           lapack_int m, lapack_int n, lapack_int k,
4395                           const lapack_complex_double* a, lapack_int lda,
4396                           const lapack_complex_double* tau,
4397                           lapack_complex_double* c, lapack_int ldc );
4398
4399lapack_int LAPACKE_cunmql( int matrix_order, char side, char trans,
4400                           lapack_int m, lapack_int n, lapack_int k,
4401                           const lapack_complex_float* a, lapack_int lda,
4402                           const lapack_complex_float* tau,
4403                           lapack_complex_float* c, lapack_int ldc );
4404lapack_int LAPACKE_zunmql( int matrix_order, char side, char trans,
4405                           lapack_int m, lapack_int n, lapack_int k,
4406                           const lapack_complex_double* a, lapack_int lda,
4407                           const lapack_complex_double* tau,
4408                           lapack_complex_double* c, lapack_int ldc );
4409
4410lapack_int LAPACKE_cunmqr( int matrix_order, char side, char trans,
4411                           lapack_int m, lapack_int n, lapack_int k,
4412                           const lapack_complex_float* a, lapack_int lda,
4413                           const lapack_complex_float* tau,
4414                           lapack_complex_float* c, lapack_int ldc );
4415lapack_int LAPACKE_zunmqr( int matrix_order, char side, char trans,
4416                           lapack_int m, lapack_int n, lapack_int k,
4417                           const lapack_complex_double* a, lapack_int lda,
4418                           const lapack_complex_double* tau,
4419                           lapack_complex_double* c, lapack_int ldc );
4420
4421lapack_int LAPACKE_cunmrq( int matrix_order, char side, char trans,
4422                           lapack_int m, lapack_int n, lapack_int k,
4423                           const lapack_complex_float* a, lapack_int lda,
4424                           const lapack_complex_float* tau,
4425                           lapack_complex_float* c, lapack_int ldc );
4426lapack_int LAPACKE_zunmrq( int matrix_order, char side, char trans,
4427                           lapack_int m, lapack_int n, lapack_int k,
4428                           const lapack_complex_double* a, lapack_int lda,
4429                           const lapack_complex_double* tau,
4430                           lapack_complex_double* c, lapack_int ldc );
4431
4432lapack_int LAPACKE_cunmrz( int matrix_order, char side, char trans,
4433                           lapack_int m, lapack_int n, lapack_int k,
4434                           lapack_int l, const lapack_complex_float* a,
4435                           lapack_int lda, const lapack_complex_float* tau,
4436                           lapack_complex_float* c, lapack_int ldc );
4437lapack_int LAPACKE_zunmrz( int matrix_order, char side, char trans,
4438                           lapack_int m, lapack_int n, lapack_int k,
4439                           lapack_int l, const lapack_complex_double* a,
4440                           lapack_int lda, const lapack_complex_double* tau,
4441                           lapack_complex_double* c, lapack_int ldc );
4442
4443lapack_int LAPACKE_cunmtr( int matrix_order, char side, char uplo, char trans,
4444                           lapack_int m, lapack_int n,
4445                           const lapack_complex_float* a, lapack_int lda,
4446                           const lapack_complex_float* tau,
4447                           lapack_complex_float* c, lapack_int ldc );
4448lapack_int LAPACKE_zunmtr( int matrix_order, char side, char uplo, char trans,
4449                           lapack_int m, lapack_int n,
4450                           const lapack_complex_double* a, lapack_int lda,
4451                           const lapack_complex_double* tau,
4452                           lapack_complex_double* c, lapack_int ldc );
4453
4454lapack_int LAPACKE_cupgtr( int matrix_order, char uplo, lapack_int n,
4455                           const lapack_complex_float* ap,
4456                           const lapack_complex_float* tau,
4457                           lapack_complex_float* q, lapack_int ldq );
4458lapack_int LAPACKE_zupgtr( int matrix_order, char uplo, lapack_int n,
4459                           const lapack_complex_double* ap,
4460                           const lapack_complex_double* tau,
4461                           lapack_complex_double* q, lapack_int ldq );
4462
4463lapack_int LAPACKE_cupmtr( int matrix_order, char side, char uplo, char trans,
4464                           lapack_int m, lapack_int n,
4465                           const lapack_complex_float* ap,
4466                           const lapack_complex_float* tau,
4467                           lapack_complex_float* c, lapack_int ldc );
4468lapack_int LAPACKE_zupmtr( int matrix_order, char side, char uplo, char trans,
4469                           lapack_int m, lapack_int n,
4470                           const lapack_complex_double* ap,
4471                           const lapack_complex_double* tau,
4472                           lapack_complex_double* c, lapack_int ldc );
4473
4474lapack_int LAPACKE_sbdsdc_work( int matrix_order, char uplo, char compq,
4475                                lapack_int n, float* d, float* e, float* u,
4476                                lapack_int ldu, float* vt, lapack_int ldvt,
4477                                float* q, lapack_int* iq, float* work,
4478                                lapack_int* iwork );
4479lapack_int LAPACKE_dbdsdc_work( int matrix_order, char uplo, char compq,
4480                                lapack_int n, double* d, double* e, double* u,
4481                                lapack_int ldu, double* vt, lapack_int ldvt,
4482                                double* q, lapack_int* iq, double* work,
4483                                lapack_int* iwork );
4484
4485lapack_int LAPACKE_sbdsqr_work( int matrix_order, char uplo, lapack_int n,
4486                                lapack_int ncvt, lapack_int nru, lapack_int ncc,
4487                                float* d, float* e, float* vt, lapack_int ldvt,
4488                                float* u, lapack_int ldu, float* c,
4489                                lapack_int ldc, float* work );
4490lapack_int LAPACKE_dbdsqr_work( int matrix_order, char uplo, lapack_int n,
4491                                lapack_int ncvt, lapack_int nru, lapack_int ncc,
4492                                double* d, double* e, double* vt,
4493                                lapack_int ldvt, double* u, lapack_int ldu,
4494                                double* c, lapack_int ldc, double* work );
4495lapack_int LAPACKE_cbdsqr_work( int matrix_order, char uplo, lapack_int n,
4496                                lapack_int ncvt, lapack_int nru, lapack_int ncc,
4497                                float* d, float* e, lapack_complex_float* vt,
4498                                lapack_int ldvt, lapack_complex_float* u,
4499                                lapack_int ldu, lapack_complex_float* c,
4500                                lapack_int ldc, float* work );
4501lapack_int LAPACKE_zbdsqr_work( int matrix_order, char uplo, lapack_int n,
4502                                lapack_int ncvt, lapack_int nru, lapack_int ncc,
4503                                double* d, double* e, lapack_complex_double* vt,
4504                                lapack_int ldvt, lapack_complex_double* u,
4505                                lapack_int ldu, lapack_complex_double* c,
4506                                lapack_int ldc, double* work );
4507
4508lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
4509                                const float* d, float* sep );
4510lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
4511                                const double* d, double* sep );
4512
4513lapack_int LAPACKE_sgbbrd_work( int matrix_order, char vect, lapack_int m,
4514                                lapack_int n, lapack_int ncc, lapack_int kl,
4515                                lapack_int ku, float* ab, lapack_int ldab,
4516                                float* d, float* e, float* q, lapack_int ldq,
4517                                float* pt, lapack_int ldpt, float* c,
4518                                lapack_int ldc, float* work );
4519lapack_int LAPACKE_dgbbrd_work( int matrix_order, char vect, lapack_int m,
4520                                lapack_int n, lapack_int ncc, lapack_int kl,
4521                                lapack_int ku, double* ab, lapack_int ldab,
4522                                double* d, double* e, double* q, lapack_int ldq,
4523                                double* pt, lapack_int ldpt, double* c,
4524                                lapack_int ldc, double* work );
4525lapack_int LAPACKE_cgbbrd_work( int matrix_order, char vect, lapack_int m,
4526                                lapack_int n, lapack_int ncc, lapack_int kl,
4527                                lapack_int ku, lapack_complex_float* ab,
4528                                lapack_int ldab, float* d, float* e,
4529                                lapack_complex_float* q, lapack_int ldq,
4530                                lapack_complex_float* pt, lapack_int ldpt,
4531                                lapack_complex_float* c, lapack_int ldc,
4532                                lapack_complex_float* work, float* rwork );
4533lapack_int LAPACKE_zgbbrd_work( int matrix_order, char vect, lapack_int m,
4534                                lapack_int n, lapack_int ncc, lapack_int kl,
4535                                lapack_int ku, lapack_complex_double* ab,
4536                                lapack_int ldab, double* d, double* e,
4537                                lapack_complex_double* q, lapack_int ldq,
4538                                lapack_complex_double* pt, lapack_int ldpt,
4539                                lapack_complex_double* c, lapack_int ldc,
4540                                lapack_complex_double* work, double* rwork );
4541
4542lapack_int LAPACKE_sgbcon_work( int matrix_order, char norm, lapack_int n,
4543                                lapack_int kl, lapack_int ku, const float* ab,
4544                                lapack_int ldab, const lapack_int* ipiv,
4545                                float anorm, float* rcond, float* work,
4546                                lapack_int* iwork );
4547lapack_int LAPACKE_dgbcon_work( int matrix_order, char norm, lapack_int n,
4548                                lapack_int kl, lapack_int ku, const double* ab,
4549                                lapack_int ldab, const lapack_int* ipiv,
4550                                double anorm, double* rcond, double* work,
4551                                lapack_int* iwork );
4552lapack_int LAPACKE_cgbcon_work( int matrix_order, char norm, lapack_int n,
4553                                lapack_int kl, lapack_int ku,
4554                                const lapack_complex_float* ab, lapack_int ldab,
4555                                const lapack_int* ipiv, float anorm,
4556                                float* rcond, lapack_complex_float* work,
4557                                float* rwork );
4558lapack_int LAPACKE_zgbcon_work( int matrix_order, char norm, lapack_int n,
4559                                lapack_int kl, lapack_int ku,
4560                                const lapack_complex_double* ab,
4561                                lapack_int ldab, const lapack_int* ipiv,
4562                                double anorm, double* rcond,
4563                                lapack_complex_double* work, double* rwork );
4564
4565lapack_int LAPACKE_sgbequ_work( int matrix_order, lapack_int m, lapack_int n,
4566                                lapack_int kl, lapack_int ku, const float* ab,
4567                                lapack_int ldab, float* r, float* c,
4568                                float* rowcnd, float* colcnd, float* amax );
4569lapack_int LAPACKE_dgbequ_work( int matrix_order, lapack_int m, lapack_int n,
4570                                lapack_int kl, lapack_int ku, const double* ab,
4571                                lapack_int ldab, double* r, double* c,
4572                                double* rowcnd, double* colcnd, double* amax );
4573lapack_int LAPACKE_cgbequ_work( int matrix_order, lapack_int m, lapack_int n,
4574                                lapack_int kl, lapack_int ku,
4575                                const lapack_complex_float* ab, lapack_int ldab,
4576                                float* r, float* c, float* rowcnd,
4577                                float* colcnd, float* amax );
4578lapack_int LAPACKE_zgbequ_work( int matrix_order, lapack_int m, lapack_int n,
4579                                lapack_int kl, lapack_int ku,
4580                                const lapack_complex_double* ab,
4581                                lapack_int ldab, double* r, double* c,
4582                                double* rowcnd, double* colcnd, double* amax );
4583
4584lapack_int LAPACKE_sgbequb_work( int matrix_order, lapack_int m, lapack_int n,
4585                                 lapack_int kl, lapack_int ku, const float* ab,
4586                                 lapack_int ldab, float* r, float* c,
4587                                 float* rowcnd, float* colcnd, float* amax );
4588lapack_int LAPACKE_dgbequb_work( int matrix_order, lapack_int m, lapack_int n,
4589                                 lapack_int kl, lapack_int ku, const double* ab,
4590                                 lapack_int ldab, double* r, double* c,
4591                                 double* rowcnd, double* colcnd, double* amax );
4592lapack_int LAPACKE_cgbequb_work( int matrix_order, lapack_int m, lapack_int n,
4593                                 lapack_int kl, lapack_int ku,
4594                                 const lapack_complex_float* ab,
4595                                 lapack_int ldab, float* r, float* c,
4596                                 float* rowcnd, float* colcnd, float* amax );
4597lapack_int LAPACKE_zgbequb_work( int matrix_order, lapack_int m, lapack_int n,
4598                                 lapack_int kl, lapack_int ku,
4599                                 const lapack_complex_double* ab,
4600                                 lapack_int ldab, double* r, double* c,
4601                                 double* rowcnd, double* colcnd, double* amax );
4602
4603lapack_int LAPACKE_sgbrfs_work( int matrix_order, char trans, lapack_int n,
4604                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4605                                const float* ab, lapack_int ldab,
4606                                const float* afb, lapack_int ldafb,
4607                                const lapack_int* ipiv, const float* b,
4608                                lapack_int ldb, float* x, lapack_int ldx,
4609                                float* ferr, float* berr, float* work,
4610                                lapack_int* iwork );
4611lapack_int LAPACKE_dgbrfs_work( int matrix_order, char trans, lapack_int n,
4612                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4613                                const double* ab, lapack_int ldab,
4614                                const double* afb, lapack_int ldafb,
4615                                const lapack_int* ipiv, const double* b,
4616                                lapack_int ldb, double* x, lapack_int ldx,
4617                                double* ferr, double* berr, double* work,
4618                                lapack_int* iwork );
4619lapack_int LAPACKE_cgbrfs_work( int matrix_order, char trans, lapack_int n,
4620                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4621                                const lapack_complex_float* ab, lapack_int ldab,
4622                                const lapack_complex_float* afb,
4623                                lapack_int ldafb, const lapack_int* ipiv,
4624                                const lapack_complex_float* b, lapack_int ldb,
4625                                lapack_complex_float* x, lapack_int ldx,
4626                                float* ferr, float* berr,
4627                                lapack_complex_float* work, float* rwork );
4628lapack_int LAPACKE_zgbrfs_work( int matrix_order, char trans, lapack_int n,
4629                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4630                                const lapack_complex_double* ab,
4631                                lapack_int ldab,
4632                                const lapack_complex_double* afb,
4633                                lapack_int ldafb, const lapack_int* ipiv,
4634                                const lapack_complex_double* b, lapack_int ldb,
4635                                lapack_complex_double* x, lapack_int ldx,
4636                                double* ferr, double* berr,
4637                                lapack_complex_double* work, double* rwork );
4638
4639lapack_int LAPACKE_sgbrfsx_work( int matrix_order, char trans, char equed,
4640                                 lapack_int n, lapack_int kl, lapack_int ku,
4641                                 lapack_int nrhs, const float* ab,
4642                                 lapack_int ldab, const float* afb,
4643                                 lapack_int ldafb, const lapack_int* ipiv,
4644                                 const float* r, const float* c, const float* b,
4645                                 lapack_int ldb, float* x, lapack_int ldx,
4646                                 float* rcond, float* berr,
4647                                 lapack_int n_err_bnds, float* err_bnds_norm,
4648                                 float* err_bnds_comp, lapack_int nparams,
4649                                 float* params, float* work,
4650                                 lapack_int* iwork );
4651lapack_int LAPACKE_dgbrfsx_work( int matrix_order, char trans, char equed,
4652                                 lapack_int n, lapack_int kl, lapack_int ku,
4653                                 lapack_int nrhs, const double* ab,
4654                                 lapack_int ldab, const double* afb,
4655                                 lapack_int ldafb, const lapack_int* ipiv,
4656                                 const double* r, const double* c,
4657                                 const double* b, lapack_int ldb, double* x,
4658                                 lapack_int ldx, double* rcond, double* berr,
4659                                 lapack_int n_err_bnds, double* err_bnds_norm,
4660                                 double* err_bnds_comp, lapack_int nparams,
4661                                 double* params, double* work,
4662                                 lapack_int* iwork );
4663lapack_int LAPACKE_cgbrfsx_work( int matrix_order, char trans, char equed,
4664                                 lapack_int n, lapack_int kl, lapack_int ku,
4665                                 lapack_int nrhs,
4666                                 const lapack_complex_float* ab,
4667                                 lapack_int ldab,
4668                                 const lapack_complex_float* afb,
4669                                 lapack_int ldafb, const lapack_int* ipiv,
4670                                 const float* r, const float* c,
4671                                 const lapack_complex_float* b, lapack_int ldb,
4672                                 lapack_complex_float* x, lapack_int ldx,
4673                                 float* rcond, float* berr,
4674                                 lapack_int n_err_bnds, float* err_bnds_norm,
4675                                 float* err_bnds_comp, lapack_int nparams,
4676                                 float* params, lapack_complex_float* work,
4677                                 float* rwork );
4678lapack_int LAPACKE_zgbrfsx_work( int matrix_order, char trans, char equed,
4679                                 lapack_int n, lapack_int kl, lapack_int ku,
4680                                 lapack_int nrhs,
4681                                 const lapack_complex_double* ab,
4682                                 lapack_int ldab,
4683                                 const lapack_complex_double* afb,
4684                                 lapack_int ldafb, const lapack_int* ipiv,
4685                                 const double* r, const double* c,
4686                                 const lapack_complex_double* b, lapack_int ldb,
4687                                 lapack_complex_double* x, lapack_int ldx,
4688                                 double* rcond, double* berr,
4689                                 lapack_int n_err_bnds, double* err_bnds_norm,
4690                                 double* err_bnds_comp, lapack_int nparams,
4691                                 double* params, lapack_complex_double* work,
4692                                 double* rwork );
4693
4694lapack_int LAPACKE_sgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
4695                               lapack_int ku, lapack_int nrhs, float* ab,
4696                               lapack_int ldab, lapack_int* ipiv, float* b,
4697                               lapack_int ldb );
4698lapack_int LAPACKE_dgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
4699                               lapack_int ku, lapack_int nrhs, double* ab,
4700                               lapack_int ldab, lapack_int* ipiv, double* b,
4701                               lapack_int ldb );
4702lapack_int LAPACKE_cgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
4703                               lapack_int ku, lapack_int nrhs,
4704                               lapack_complex_float* ab, lapack_int ldab,
4705                               lapack_int* ipiv, lapack_complex_float* b,
4706                               lapack_int ldb );
4707lapack_int LAPACKE_zgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
4708                               lapack_int ku, lapack_int nrhs,
4709                               lapack_complex_double* ab, lapack_int ldab,
4710                               lapack_int* ipiv, lapack_complex_double* b,
4711                               lapack_int ldb );
4712
4713lapack_int LAPACKE_sgbsvx_work( int matrix_order, char fact, char trans,
4714                                lapack_int n, lapack_int kl, lapack_int ku,
4715                                lapack_int nrhs, float* ab, lapack_int ldab,
4716                                float* afb, lapack_int ldafb, lapack_int* ipiv,
4717                                char* equed, float* r, float* c, float* b,
4718                                lapack_int ldb, float* x, lapack_int ldx,
4719                                float* rcond, float* ferr, float* berr,
4720                                float* work, lapack_int* iwork );
4721lapack_int LAPACKE_dgbsvx_work( int matrix_order, char fact, char trans,
4722                                lapack_int n, lapack_int kl, lapack_int ku,
4723                                lapack_int nrhs, double* ab, lapack_int ldab,
4724                                double* afb, lapack_int ldafb, lapack_int* ipiv,
4725                                char* equed, double* r, double* c, double* b,
4726                                lapack_int ldb, double* x, lapack_int ldx,
4727                                double* rcond, double* ferr, double* berr,
4728                                double* work, lapack_int* iwork );
4729lapack_int LAPACKE_cgbsvx_work( int matrix_order, char fact, char trans,
4730                                lapack_int n, lapack_int kl, lapack_int ku,
4731                                lapack_int nrhs, lapack_complex_float* ab,
4732                                lapack_int ldab, lapack_complex_float* afb,
4733                                lapack_int ldafb, lapack_int* ipiv, char* equed,
4734                                float* r, float* c, lapack_complex_float* b,
4735                                lapack_int ldb, lapack_complex_float* x,
4736                                lapack_int ldx, float* rcond, float* ferr,
4737                                float* berr, lapack_complex_float* work,
4738                                float* rwork );
4739lapack_int LAPACKE_zgbsvx_work( int matrix_order, char fact, char trans,
4740                                lapack_int n, lapack_int kl, lapack_int ku,
4741                                lapack_int nrhs, lapack_complex_double* ab,
4742                                lapack_int ldab, lapack_complex_double* afb,
4743                                lapack_int ldafb, lapack_int* ipiv, char* equed,
4744                                double* r, double* c, lapack_complex_double* b,
4745                                lapack_int ldb, lapack_complex_double* x,
4746                                lapack_int ldx, double* rcond, double* ferr,
4747                                double* berr, lapack_complex_double* work,
4748                                double* rwork );
4749
4750lapack_int LAPACKE_sgbsvxx_work( int matrix_order, char fact, char trans,
4751                                 lapack_int n, lapack_int kl, lapack_int ku,
4752                                 lapack_int nrhs, float* ab, lapack_int ldab,
4753                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
4754                                 char* equed, float* r, float* c, float* b,
4755                                 lapack_int ldb, float* x, lapack_int ldx,
4756                                 float* rcond, float* rpvgrw, float* berr,
4757                                 lapack_int n_err_bnds, float* err_bnds_norm,
4758                                 float* err_bnds_comp, lapack_int nparams,
4759                                 float* params, float* work,
4760                                 lapack_int* iwork );
4761lapack_int LAPACKE_dgbsvxx_work( int matrix_order, char fact, char trans,
4762                                 lapack_int n, lapack_int kl, lapack_int ku,
4763                                 lapack_int nrhs, double* ab, lapack_int ldab,
4764                                 double* afb, lapack_int ldafb,
4765                                 lapack_int* ipiv, char* equed, double* r,
4766                                 double* c, double* b, lapack_int ldb,
4767                                 double* x, lapack_int ldx, double* rcond,
4768                                 double* rpvgrw, double* berr,
4769                                 lapack_int n_err_bnds, double* err_bnds_norm,
4770                                 double* err_bnds_comp, lapack_int nparams,
4771                                 double* params, double* work,
4772                                 lapack_int* iwork );
4773lapack_int LAPACKE_cgbsvxx_work( int matrix_order, char fact, char trans,
4774                                 lapack_int n, lapack_int kl, lapack_int ku,
4775                                 lapack_int nrhs, lapack_complex_float* ab,
4776                                 lapack_int ldab, lapack_complex_float* afb,
4777                                 lapack_int ldafb, lapack_int* ipiv,
4778                                 char* equed, float* r, float* c,
4779                                 lapack_complex_float* b, lapack_int ldb,
4780                                 lapack_complex_float* x, lapack_int ldx,
4781                                 float* rcond, float* rpvgrw, float* berr,
4782                                 lapack_int n_err_bnds, float* err_bnds_norm,
4783                                 float* err_bnds_comp, lapack_int nparams,
4784                                 float* params, lapack_complex_float* work,
4785                                 float* rwork );
4786lapack_int LAPACKE_zgbsvxx_work( int matrix_order, char fact, char trans,
4787                                 lapack_int n, lapack_int kl, lapack_int ku,
4788                                 lapack_int nrhs, lapack_complex_double* ab,
4789                                 lapack_int ldab, lapack_complex_double* afb,
4790                                 lapack_int ldafb, lapack_int* ipiv,
4791                                 char* equed, double* r, double* c,
4792                                 lapack_complex_double* b, lapack_int ldb,
4793                                 lapack_complex_double* x, lapack_int ldx,
4794                                 double* rcond, double* rpvgrw, double* berr,
4795                                 lapack_int n_err_bnds, double* err_bnds_norm,
4796                                 double* err_bnds_comp, lapack_int nparams,
4797                                 double* params, lapack_complex_double* work,
4798                                 double* rwork );
4799
4800lapack_int LAPACKE_sgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
4801                                lapack_int kl, lapack_int ku, float* ab,
4802                                lapack_int ldab, lapack_int* ipiv );
4803lapack_int LAPACKE_dgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
4804                                lapack_int kl, lapack_int ku, double* ab,
4805                                lapack_int ldab, lapack_int* ipiv );
4806lapack_int LAPACKE_cgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
4807                                lapack_int kl, lapack_int ku,
4808                                lapack_complex_float* ab, lapack_int ldab,
4809                                lapack_int* ipiv );
4810lapack_int LAPACKE_zgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
4811                                lapack_int kl, lapack_int ku,
4812                                lapack_complex_double* ab, lapack_int ldab,
4813                                lapack_int* ipiv );
4814
4815lapack_int LAPACKE_sgbtrs_work( int matrix_order, char trans, lapack_int n,
4816                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4817                                const float* ab, lapack_int ldab,
4818                                const lapack_int* ipiv, float* b,
4819                                lapack_int ldb );
4820lapack_int LAPACKE_dgbtrs_work( int matrix_order, char trans, lapack_int n,
4821                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4822                                const double* ab, lapack_int ldab,
4823                                const lapack_int* ipiv, double* b,
4824                                lapack_int ldb );
4825lapack_int LAPACKE_cgbtrs_work( int matrix_order, char trans, lapack_int n,
4826                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4827                                const lapack_complex_float* ab, lapack_int ldab,
4828                                const lapack_int* ipiv, lapack_complex_float* b,
4829                                lapack_int ldb );
4830lapack_int LAPACKE_zgbtrs_work( int matrix_order, char trans, lapack_int n,
4831                                lapack_int kl, lapack_int ku, lapack_int nrhs,
4832                                const lapack_complex_double* ab,
4833                                lapack_int ldab, const lapack_int* ipiv,
4834                                lapack_complex_double* b, lapack_int ldb );
4835
4836lapack_int LAPACKE_sgebak_work( int matrix_order, char job, char side,
4837                                lapack_int n, lapack_int ilo, lapack_int ihi,
4838                                const float* scale, lapack_int m, float* v,
4839                                lapack_int ldv );
4840lapack_int LAPACKE_dgebak_work( int matrix_order, char job, char side,
4841                                lapack_int n, lapack_int ilo, lapack_int ihi,
4842                                const double* scale, lapack_int m, double* v,
4843                                lapack_int ldv );
4844lapack_int LAPACKE_cgebak_work( int matrix_order, char job, char side,
4845                                lapack_int n, lapack_int ilo, lapack_int ihi,
4846                                const float* scale, lapack_int m,
4847                                lapack_complex_float* v, lapack_int ldv );
4848lapack_int LAPACKE_zgebak_work( int matrix_order, char job, char side,
4849                                lapack_int n, lapack_int ilo, lapack_int ihi,
4850                                const double* scale, lapack_int m,
4851                                lapack_complex_double* v, lapack_int ldv );
4852
4853lapack_int LAPACKE_sgebal_work( int matrix_order, char job, lapack_int n,
4854                                float* a, lapack_int lda, lapack_int* ilo,
4855                                lapack_int* ihi, float* scale );
4856lapack_int LAPACKE_dgebal_work( int matrix_order, char job, lapack_int n,
4857                                double* a, lapack_int lda, lapack_int* ilo,
4858                                lapack_int* ihi, double* scale );
4859lapack_int LAPACKE_cgebal_work( int matrix_order, char job, lapack_int n,
4860                                lapack_complex_float* a, lapack_int lda,
4861                                lapack_int* ilo, lapack_int* ihi,
4862                                float* scale );
4863lapack_int LAPACKE_zgebal_work( int matrix_order, char job, lapack_int n,
4864                                lapack_complex_double* a, lapack_int lda,
4865                                lapack_int* ilo, lapack_int* ihi,
4866                                double* scale );
4867
4868lapack_int LAPACKE_sgebrd_work( int matrix_order, lapack_int m, lapack_int n,
4869                                float* a, lapack_int lda, float* d, float* e,
4870                                float* tauq, float* taup, float* work,
4871                                lapack_int lwork );
4872lapack_int LAPACKE_dgebrd_work( int matrix_order, lapack_int m, lapack_int n,
4873                                double* a, lapack_int lda, double* d, double* e,
4874                                double* tauq, double* taup, double* work,
4875                                lapack_int lwork );
4876lapack_int LAPACKE_cgebrd_work( int matrix_order, lapack_int m, lapack_int n,
4877                                lapack_complex_float* a, lapack_int lda,
4878                                float* d, float* e, lapack_complex_float* tauq,
4879                                lapack_complex_float* taup,
4880                                lapack_complex_float* work, lapack_int lwork );
4881lapack_int LAPACKE_zgebrd_work( int matrix_order, lapack_int m, lapack_int n,
4882                                lapack_complex_double* a, lapack_int lda,
4883                                double* d, double* e,
4884                                lapack_complex_double* tauq,
4885                                lapack_complex_double* taup,
4886                                lapack_complex_double* work, lapack_int lwork );
4887
4888lapack_int LAPACKE_sgecon_work( int matrix_order, char norm, lapack_int n,
4889                                const float* a, lapack_int lda, float anorm,
4890                                float* rcond, float* work, lapack_int* iwork );
4891lapack_int LAPACKE_dgecon_work( int matrix_order, char norm, lapack_int n,
4892                                const double* a, lapack_int lda, double anorm,
4893                                double* rcond, double* work,
4894                                lapack_int* iwork );
4895lapack_int LAPACKE_cgecon_work( int matrix_order, char norm, lapack_int n,
4896                                const lapack_complex_float* a, lapack_int lda,
4897                                float anorm, float* rcond,
4898                                lapack_complex_float* work, float* rwork );
4899lapack_int LAPACKE_zgecon_work( int matrix_order, char norm, lapack_int n,
4900                                const lapack_complex_double* a, lapack_int lda,
4901                                double anorm, double* rcond,
4902                                lapack_complex_double* work, double* rwork );
4903
4904lapack_int LAPACKE_sgeequ_work( int matrix_order, lapack_int m, lapack_int n,
4905                                const float* a, lapack_int lda, float* r,
4906                                float* c, float* rowcnd, float* colcnd,
4907                                float* amax );
4908lapack_int LAPACKE_dgeequ_work( int matrix_order, lapack_int m, lapack_int n,
4909                                const double* a, lapack_int lda, double* r,
4910                                double* c, double* rowcnd, double* colcnd,
4911                                double* amax );
4912lapack_int LAPACKE_cgeequ_work( int matrix_order, lapack_int m, lapack_int n,
4913                                const lapack_complex_float* a, lapack_int lda,
4914                                float* r, float* c, float* rowcnd,
4915                                float* colcnd, float* amax );
4916lapack_int LAPACKE_zgeequ_work( int matrix_order, lapack_int m, lapack_int n,
4917                                const lapack_complex_double* a, lapack_int lda,
4918                                double* r, double* c, double* rowcnd,
4919                                double* colcnd, double* amax );
4920
4921lapack_int LAPACKE_sgeequb_work( int matrix_order, lapack_int m, lapack_int n,
4922                                 const float* a, lapack_int lda, float* r,
4923                                 float* c, float* rowcnd, float* colcnd,
4924                                 float* amax );
4925lapack_int LAPACKE_dgeequb_work( int matrix_order, lapack_int m, lapack_int n,
4926                                 const double* a, lapack_int lda, double* r,
4927                                 double* c, double* rowcnd, double* colcnd,
4928                                 double* amax );
4929lapack_int LAPACKE_cgeequb_work( int matrix_order, lapack_int m, lapack_int n,
4930                                 const lapack_complex_float* a, lapack_int lda,
4931                                 float* r, float* c, float* rowcnd,
4932                                 float* colcnd, float* amax );
4933lapack_int LAPACKE_zgeequb_work( int matrix_order, lapack_int m, lapack_int n,
4934                                 const lapack_complex_double* a, lapack_int lda,
4935                                 double* r, double* c, double* rowcnd,
4936                                 double* colcnd, double* amax );
4937
4938lapack_int LAPACKE_sgees_work( int matrix_order, char jobvs, char sort,
4939                               LAPACK_S_SELECT2 select, lapack_int n, float* a,
4940                               lapack_int lda, lapack_int* sdim, float* wr,
4941                               float* wi, float* vs, lapack_int ldvs,
4942                               float* work, lapack_int lwork,
4943                               lapack_logical* bwork );
4944lapack_int LAPACKE_dgees_work( int matrix_order, char jobvs, char sort,
4945                               LAPACK_D_SELECT2 select, lapack_int n, double* a,
4946                               lapack_int lda, lapack_int* sdim, double* wr,
4947                               double* wi, double* vs, lapack_int ldvs,
4948                               double* work, lapack_int lwork,
4949                               lapack_logical* bwork );
4950lapack_int LAPACKE_cgees_work( int matrix_order, char jobvs, char sort,
4951                               LAPACK_C_SELECT1 select, lapack_int n,
4952                               lapack_complex_float* a, lapack_int lda,
4953                               lapack_int* sdim, lapack_complex_float* w,
4954                               lapack_complex_float* vs, lapack_int ldvs,
4955                               lapack_complex_float* work, lapack_int lwork,
4956                               float* rwork, lapack_logical* bwork );
4957lapack_int LAPACKE_zgees_work( int matrix_order, char jobvs, char sort,
4958                               LAPACK_Z_SELECT1 select, lapack_int n,
4959                               lapack_complex_double* a, lapack_int lda,
4960                               lapack_int* sdim, lapack_complex_double* w,
4961                               lapack_complex_double* vs, lapack_int ldvs,
4962                               lapack_complex_double* work, lapack_int lwork,
4963                               double* rwork, lapack_logical* bwork );
4964
4965lapack_int LAPACKE_sgeesx_work( int matrix_order, char jobvs, char sort,
4966                                LAPACK_S_SELECT2 select, char sense,
4967                                lapack_int n, float* a, lapack_int lda,
4968                                lapack_int* sdim, float* wr, float* wi,
4969                                float* vs, lapack_int ldvs, float* rconde,
4970                                float* rcondv, float* work, lapack_int lwork,
4971                                lapack_int* iwork, lapack_int liwork,
4972                                lapack_logical* bwork );
4973lapack_int LAPACKE_dgeesx_work( int matrix_order, char jobvs, char sort,
4974                                LAPACK_D_SELECT2 select, char sense,
4975                                lapack_int n, double* a, lapack_int lda,
4976                                lapack_int* sdim, double* wr, double* wi,
4977                                double* vs, lapack_int ldvs, double* rconde,
4978                                double* rcondv, double* work, lapack_int lwork,
4979                                lapack_int* iwork, lapack_int liwork,
4980                                lapack_logical* bwork );
4981lapack_int LAPACKE_cgeesx_work( int matrix_order, char jobvs, char sort,
4982                                LAPACK_C_SELECT1 select, char sense,
4983                                lapack_int n, lapack_complex_float* a,
4984                                lapack_int lda, lapack_int* sdim,
4985                                lapack_complex_float* w,
4986                                lapack_complex_float* vs, lapack_int ldvs,
4987                                float* rconde, float* rcondv,
4988                                lapack_complex_float* work, lapack_int lwork,
4989                                float* rwork, lapack_logical* bwork );
4990lapack_int LAPACKE_zgeesx_work( int matrix_order, char jobvs, char sort,
4991                                LAPACK_Z_SELECT1 select, char sense,
4992                                lapack_int n, lapack_complex_double* a,
4993                                lapack_int lda, lapack_int* sdim,
4994                                lapack_complex_double* w,
4995                                lapack_complex_double* vs, lapack_int ldvs,
4996                                double* rconde, double* rcondv,
4997                                lapack_complex_double* work, lapack_int lwork,
4998                                double* rwork, lapack_logical* bwork );
4999
5000lapack_int LAPACKE_sgeev_work( int matrix_order, char jobvl, char jobvr,
5001                               lapack_int n, float* a, lapack_int lda,
5002                               float* wr, float* wi, float* vl, lapack_int ldvl,
5003                               float* vr, lapack_int ldvr, float* work,
5004                               lapack_int lwork );
5005lapack_int LAPACKE_dgeev_work( int matrix_order, char jobvl, char jobvr,
5006                               lapack_int n, double* a, lapack_int lda,
5007                               double* wr, double* wi, double* vl,
5008                               lapack_int ldvl, double* vr, lapack_int ldvr,
5009                               double* work, lapack_int lwork );
5010lapack_int LAPACKE_cgeev_work( int matrix_order, char jobvl, char jobvr,
5011                               lapack_int n, lapack_complex_float* a,
5012                               lapack_int lda, lapack_complex_float* w,
5013                               lapack_complex_float* vl, lapack_int ldvl,
5014                               lapack_complex_float* vr, lapack_int ldvr,
5015                               lapack_complex_float* work, lapack_int lwork,
5016                               float* rwork );
5017lapack_int LAPACKE_zgeev_work( int matrix_order, char jobvl, char jobvr,
5018                               lapack_int n, lapack_complex_double* a,
5019                               lapack_int lda, lapack_complex_double* w,
5020                               lapack_complex_double* vl, lapack_int ldvl,
5021                               lapack_complex_double* vr, lapack_int ldvr,
5022                               lapack_complex_double* work, lapack_int lwork,
5023                               double* rwork );
5024
5025lapack_int LAPACKE_sgeevx_work( int matrix_order, char balanc, char jobvl,
5026                                char jobvr, char sense, lapack_int n, float* a,
5027                                lapack_int lda, float* wr, float* wi, float* vl,
5028                                lapack_int ldvl, float* vr, lapack_int ldvr,
5029                                lapack_int* ilo, lapack_int* ihi, float* scale,
5030                                float* abnrm, float* rconde, float* rcondv,
5031                                float* work, lapack_int lwork,
5032                                lapack_int* iwork );
5033lapack_int LAPACKE_dgeevx_work( int matrix_order, char balanc, char jobvl,
5034                                char jobvr, char sense, lapack_int n, double* a,
5035                                lapack_int lda, double* wr, double* wi,
5036                                double* vl, lapack_int ldvl, double* vr,
5037                                lapack_int ldvr, lapack_int* ilo,
5038                                lapack_int* ihi, double* scale, double* abnrm,
5039                                double* rconde, double* rcondv, double* work,
5040                                lapack_int lwork, lapack_int* iwork );
5041lapack_int LAPACKE_cgeevx_work( int matrix_order, char balanc, char jobvl,
5042                                char jobvr, char sense, lapack_int n,
5043                                lapack_complex_float* a, lapack_int lda,
5044                                lapack_complex_float* w,
5045                                lapack_complex_float* vl, lapack_int ldvl,
5046                                lapack_complex_float* vr, lapack_int ldvr,
5047                                lapack_int* ilo, lapack_int* ihi, float* scale,
5048                                float* abnrm, float* rconde, float* rcondv,
5049                                lapack_complex_float* work, lapack_int lwork,
5050                                float* rwork );
5051lapack_int LAPACKE_zgeevx_work( int matrix_order, char balanc, char jobvl,
5052                                char jobvr, char sense, lapack_int n,
5053                                lapack_complex_double* a, lapack_int lda,
5054                                lapack_complex_double* w,
5055                                lapack_complex_double* vl, lapack_int ldvl,
5056                                lapack_complex_double* vr, lapack_int ldvr,
5057                                lapack_int* ilo, lapack_int* ihi, double* scale,
5058                                double* abnrm, double* rconde, double* rcondv,
5059                                lapack_complex_double* work, lapack_int lwork,
5060                                double* rwork );
5061
5062lapack_int LAPACKE_sgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
5063                                lapack_int ihi, float* a, lapack_int lda,
5064                                float* tau, float* work, lapack_int lwork );
5065lapack_int LAPACKE_dgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
5066                                lapack_int ihi, double* a, lapack_int lda,
5067                                double* tau, double* work, lapack_int lwork );
5068lapack_int LAPACKE_cgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
5069                                lapack_int ihi, lapack_complex_float* a,
5070                                lapack_int lda, lapack_complex_float* tau,
5071                                lapack_complex_float* work, lapack_int lwork );
5072lapack_int LAPACKE_zgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
5073                                lapack_int ihi, lapack_complex_double* a,
5074                                lapack_int lda, lapack_complex_double* tau,
5075                                lapack_complex_double* work, lapack_int lwork );
5076
5077lapack_int LAPACKE_sgejsv_work( int matrix_order, char joba, char jobu,
5078                                char jobv, char jobr, char jobt, char jobp,
5079                                lapack_int m, lapack_int n, float* a,
5080                                lapack_int lda, float* sva, float* u,
5081                                lapack_int ldu, float* v, lapack_int ldv,
5082                                float* work, lapack_int lwork,
5083                                lapack_int* iwork );
5084lapack_int LAPACKE_dgejsv_work( int matrix_order, char joba, char jobu,
5085                                char jobv, char jobr, char jobt, char jobp,
5086                                lapack_int m, lapack_int n, double* a,
5087                                lapack_int lda, double* sva, double* u,
5088                                lapack_int ldu, double* v, lapack_int ldv,
5089                                double* work, lapack_int lwork,
5090                                lapack_int* iwork );
5091
5092lapack_int LAPACKE_sgelq2_work( int matrix_order, lapack_int m, lapack_int n,
5093                                float* a, lapack_int lda, float* tau,
5094                                float* work );
5095lapack_int LAPACKE_dgelq2_work( int matrix_order, lapack_int m, lapack_int n,
5096                                double* a, lapack_int lda, double* tau,
5097                                double* work );
5098lapack_int LAPACKE_cgelq2_work( int matrix_order, lapack_int m, lapack_int n,
5099                                lapack_complex_float* a, lapack_int lda,
5100                                lapack_complex_float* tau,
5101                                lapack_complex_float* work );
5102lapack_int LAPACKE_zgelq2_work( int matrix_order, lapack_int m, lapack_int n,
5103                                lapack_complex_double* a, lapack_int lda,
5104                                lapack_complex_double* tau,
5105                                lapack_complex_double* work );
5106
5107lapack_int LAPACKE_sgelqf_work( int matrix_order, lapack_int m, lapack_int n,
5108                                float* a, lapack_int lda, float* tau,
5109                                float* work, lapack_int lwork );
5110lapack_int LAPACKE_dgelqf_work( int matrix_order, lapack_int m, lapack_int n,
5111                                double* a, lapack_int lda, double* tau,
5112                                double* work, lapack_int lwork );
5113lapack_int LAPACKE_cgelqf_work( int matrix_order, lapack_int m, lapack_int n,
5114                                lapack_complex_float* a, lapack_int lda,
5115                                lapack_complex_float* tau,
5116                                lapack_complex_float* work, lapack_int lwork );
5117lapack_int LAPACKE_zgelqf_work( int matrix_order, lapack_int m, lapack_int n,
5118                                lapack_complex_double* a, lapack_int lda,
5119                                lapack_complex_double* tau,
5120                                lapack_complex_double* work, lapack_int lwork );
5121
5122lapack_int LAPACKE_sgels_work( int matrix_order, char trans, lapack_int m,
5123                               lapack_int n, lapack_int nrhs, float* a,
5124                               lapack_int lda, float* b, lapack_int ldb,
5125                               float* work, lapack_int lwork );
5126lapack_int LAPACKE_dgels_work( int matrix_order, char trans, lapack_int m,
5127                               lapack_int n, lapack_int nrhs, double* a,
5128                               lapack_int lda, double* b, lapack_int ldb,
5129                               double* work, lapack_int lwork );
5130lapack_int LAPACKE_cgels_work( int matrix_order, char trans, lapack_int m,
5131                               lapack_int n, lapack_int nrhs,
5132                               lapack_complex_float* a, lapack_int lda,
5133                               lapack_complex_float* b, lapack_int ldb,
5134                               lapack_complex_float* work, lapack_int lwork );
5135lapack_int LAPACKE_zgels_work( int matrix_order, char trans, lapack_int m,
5136                               lapack_int n, lapack_int nrhs,
5137                               lapack_complex_double* a, lapack_int lda,
5138                               lapack_complex_double* b, lapack_int ldb,
5139                               lapack_complex_double* work, lapack_int lwork );
5140
5141lapack_int LAPACKE_sgelsd_work( int matrix_order, lapack_int m, lapack_int n,
5142                                lapack_int nrhs, float* a, lapack_int lda,
5143                                float* b, lapack_int ldb, float* s, float rcond,
5144                                lapack_int* rank, float* work, lapack_int lwork,
5145                                lapack_int* iwork );
5146lapack_int LAPACKE_dgelsd_work( int matrix_order, lapack_int m, lapack_int n,
5147                                lapack_int nrhs, double* a, lapack_int lda,
5148                                double* b, lapack_int ldb, double* s,
5149                                double rcond, lapack_int* rank, double* work,
5150                                lapack_int lwork, lapack_int* iwork );
5151lapack_int LAPACKE_cgelsd_work( int matrix_order, lapack_int m, lapack_int n,
5152                                lapack_int nrhs, lapack_complex_float* a,
5153                                lapack_int lda, lapack_complex_float* b,
5154                                lapack_int ldb, float* s, float rcond,
5155                                lapack_int* rank, lapack_complex_float* work,
5156                                lapack_int lwork, float* rwork,
5157                                lapack_int* iwork );
5158lapack_int LAPACKE_zgelsd_work( int matrix_order, lapack_int m, lapack_int n,
5159                                lapack_int nrhs, lapack_complex_double* a,
5160                                lapack_int lda, lapack_complex_double* b,
5161                                lapack_int ldb, double* s, double rcond,
5162                                lapack_int* rank, lapack_complex_double* work,
5163                                lapack_int lwork, double* rwork,
5164                                lapack_int* iwork );
5165
5166lapack_int LAPACKE_sgelss_work( int matrix_order, lapack_int m, lapack_int n,
5167                                lapack_int nrhs, float* a, lapack_int lda,
5168                                float* b, lapack_int ldb, float* s, float rcond,
5169                                lapack_int* rank, float* work,
5170                                lapack_int lwork );
5171lapack_int LAPACKE_dgelss_work( int matrix_order, lapack_int m, lapack_int n,
5172                                lapack_int nrhs, double* a, lapack_int lda,
5173                                double* b, lapack_int ldb, double* s,
5174                                double rcond, lapack_int* rank, double* work,
5175                                lapack_int lwork );
5176lapack_int LAPACKE_cgelss_work( int matrix_order, lapack_int m, lapack_int n,
5177                                lapack_int nrhs, lapack_complex_float* a,
5178                                lapack_int lda, lapack_complex_float* b,
5179                                lapack_int ldb, float* s, float rcond,
5180                                lapack_int* rank, lapack_complex_float* work,
5181                                lapack_int lwork, float* rwork );
5182lapack_int LAPACKE_zgelss_work( int matrix_order, lapack_int m, lapack_int n,
5183                                lapack_int nrhs, lapack_complex_double* a,
5184                                lapack_int lda, lapack_complex_double* b,
5185                                lapack_int ldb, double* s, double rcond,
5186                                lapack_int* rank, lapack_complex_double* work,
5187                                lapack_int lwork, double* rwork );
5188
5189lapack_int LAPACKE_sgelsy_work( int matrix_order, lapack_int m, lapack_int n,
5190                                lapack_int nrhs, float* a, lapack_int lda,
5191                                float* b, lapack_int ldb, lapack_int* jpvt,
5192                                float rcond, lapack_int* rank, float* work,
5193                                lapack_int lwork );
5194lapack_int LAPACKE_dgelsy_work( int matrix_order, lapack_int m, lapack_int n,
5195                                lapack_int nrhs, double* a, lapack_int lda,
5196                                double* b, lapack_int ldb, lapack_int* jpvt,
5197                                double rcond, lapack_int* rank, double* work,
5198                                lapack_int lwork );
5199lapack_int LAPACKE_cgelsy_work( int matrix_order, lapack_int m, lapack_int n,
5200                                lapack_int nrhs, lapack_complex_float* a,
5201                                lapack_int lda, lapack_complex_float* b,
5202                                lapack_int ldb, lapack_int* jpvt, float rcond,
5203                                lapack_int* rank, lapack_complex_float* work,
5204                                lapack_int lwork, float* rwork );
5205lapack_int LAPACKE_zgelsy_work( int matrix_order, lapack_int m, lapack_int n,
5206                                lapack_int nrhs, lapack_complex_double* a,
5207                                lapack_int lda, lapack_complex_double* b,
5208                                lapack_int ldb, lapack_int* jpvt, double rcond,
5209                                lapack_int* rank, lapack_complex_double* work,
5210                                lapack_int lwork, double* rwork );
5211
5212lapack_int LAPACKE_sgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
5213                                float* a, lapack_int lda, float* tau,
5214                                float* work, lapack_int lwork );
5215lapack_int LAPACKE_dgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
5216                                double* a, lapack_int lda, double* tau,
5217                                double* work, lapack_int lwork );
5218lapack_int LAPACKE_cgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
5219                                lapack_complex_float* a, lapack_int lda,
5220                                lapack_complex_float* tau,
5221                                lapack_complex_float* work, lapack_int lwork );
5222lapack_int LAPACKE_zgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
5223                                lapack_complex_double* a, lapack_int lda,
5224                                lapack_complex_double* tau,
5225                                lapack_complex_double* work, lapack_int lwork );
5226
5227lapack_int LAPACKE_sgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
5228                                float* a, lapack_int lda, lapack_int* jpvt,
5229                                float* tau, float* work, lapack_int lwork );
5230lapack_int LAPACKE_dgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
5231                                double* a, lapack_int lda, lapack_int* jpvt,
5232                                double* tau, double* work, lapack_int lwork );
5233lapack_int LAPACKE_cgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
5234                                lapack_complex_float* a, lapack_int lda,
5235                                lapack_int* jpvt, lapack_complex_float* tau,
5236                                lapack_complex_float* work, lapack_int lwork,
5237                                float* rwork );
5238lapack_int LAPACKE_zgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
5239                                lapack_complex_double* a, lapack_int lda,
5240                                lapack_int* jpvt, lapack_complex_double* tau,
5241                                lapack_complex_double* work, lapack_int lwork,
5242                                double* rwork );
5243
5244lapack_int LAPACKE_sgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
5245                                float* a, lapack_int lda, lapack_int* jpvt,
5246                                float* tau, float* work );
5247lapack_int LAPACKE_dgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
5248                                double* a, lapack_int lda, lapack_int* jpvt,
5249                                double* tau, double* work );
5250lapack_int LAPACKE_cgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
5251                                lapack_complex_float* a, lapack_int lda,
5252                                lapack_int* jpvt, lapack_complex_float* tau,
5253                                lapack_complex_float* work, float* rwork );
5254lapack_int LAPACKE_zgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
5255                                lapack_complex_double* a, lapack_int lda,
5256                                lapack_int* jpvt, lapack_complex_double* tau,
5257                                lapack_complex_double* work, double* rwork );
5258
5259lapack_int LAPACKE_sgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
5260                                float* a, lapack_int lda, float* tau,
5261                                float* work );
5262lapack_int LAPACKE_dgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
5263                                double* a, lapack_int lda, double* tau,
5264                                double* work );
5265lapack_int LAPACKE_cgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
5266                                lapack_complex_float* a, lapack_int lda,
5267                                lapack_complex_float* tau,
5268                                lapack_complex_float* work );
5269lapack_int LAPACKE_zgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
5270                                lapack_complex_double* a, lapack_int lda,
5271                                lapack_complex_double* tau,
5272                                lapack_complex_double* work );
5273
5274lapack_int LAPACKE_sgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
5275                                float* a, lapack_int lda, float* tau,
5276                                float* work, lapack_int lwork );
5277lapack_int LAPACKE_dgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
5278                                double* a, lapack_int lda, double* tau,
5279                                double* work, lapack_int lwork );
5280lapack_int LAPACKE_cgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
5281                                lapack_complex_float* a, lapack_int lda,
5282                                lapack_complex_float* tau,
5283                                lapack_complex_float* work, lapack_int lwork );
5284lapack_int LAPACKE_zgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
5285                                lapack_complex_double* a, lapack_int lda,
5286                                lapack_complex_double* tau,
5287                                lapack_complex_double* work, lapack_int lwork );
5288
5289lapack_int LAPACKE_sgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
5290                                 float* a, lapack_int lda, float* tau,
5291                                 float* work, lapack_int lwork );
5292lapack_int LAPACKE_dgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
5293                                 double* a, lapack_int lda, double* tau,
5294                                 double* work, lapack_int lwork );
5295lapack_int LAPACKE_cgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
5296                                 lapack_complex_float* a, lapack_int lda,
5297                                 lapack_complex_float* tau,
5298                                 lapack_complex_float* work, lapack_int lwork );
5299lapack_int LAPACKE_zgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
5300                                 lapack_complex_double* a, lapack_int lda,
5301                                 lapack_complex_double* tau,
5302                                 lapack_complex_double* work,
5303                                 lapack_int lwork );
5304
5305lapack_int LAPACKE_sgerfs_work( int matrix_order, char trans, lapack_int n,
5306                                lapack_int nrhs, const float* a, lapack_int lda,
5307                                const float* af, lapack_int ldaf,
5308                                const lapack_int* ipiv, const float* b,
5309                                lapack_int ldb, float* x, lapack_int ldx,
5310                                float* ferr, float* berr, float* work,
5311                                lapack_int* iwork );
5312lapack_int LAPACKE_dgerfs_work( int matrix_order, char trans, lapack_int n,
5313                                lapack_int nrhs, const double* a,
5314                                lapack_int lda, const double* af,
5315                                lapack_int ldaf, const lapack_int* ipiv,
5316                                const double* b, lapack_int ldb, double* x,
5317                                lapack_int ldx, double* ferr, double* berr,
5318                                double* work, lapack_int* iwork );
5319lapack_int LAPACKE_cgerfs_work( int matrix_order, char trans, lapack_int n,
5320                                lapack_int nrhs, const lapack_complex_float* a,
5321                                lapack_int lda, const lapack_complex_float* af,
5322                                lapack_int ldaf, const lapack_int* ipiv,
5323                                const lapack_complex_float* b, lapack_int ldb,
5324                                lapack_complex_float* x, lapack_int ldx,
5325                                float* ferr, float* berr,
5326                                lapack_complex_float* work, float* rwork );
5327lapack_int LAPACKE_zgerfs_work( int matrix_order, char trans, lapack_int n,
5328                                lapack_int nrhs, const lapack_complex_double* a,
5329                                lapack_int lda, const lapack_complex_double* af,
5330                                lapack_int ldaf, const lapack_int* ipiv,
5331                                const lapack_complex_double* b, lapack_int ldb,
5332                                lapack_complex_double* x, lapack_int ldx,
5333                                double* ferr, double* berr,
5334                                lapack_complex_double* work, double* rwork );
5335
5336lapack_int LAPACKE_sgerfsx_work( int matrix_order, char trans, char equed,
5337                                 lapack_int n, lapack_int nrhs, const float* a,
5338                                 lapack_int lda, const float* af,
5339                                 lapack_int ldaf, const lapack_int* ipiv,
5340                                 const float* r, const float* c, const float* b,
5341                                 lapack_int ldb, float* x, lapack_int ldx,
5342                                 float* rcond, float* berr,
5343                                 lapack_int n_err_bnds, float* err_bnds_norm,
5344                                 float* err_bnds_comp, lapack_int nparams,
5345                                 float* params, float* work,
5346                                 lapack_int* iwork );
5347lapack_int LAPACKE_dgerfsx_work( int matrix_order, char trans, char equed,
5348                                 lapack_int n, lapack_int nrhs, const double* a,
5349                                 lapack_int lda, const double* af,
5350                                 lapack_int ldaf, const lapack_int* ipiv,
5351                                 const double* r, const double* c,
5352                                 const double* b, lapack_int ldb, double* x,
5353                                 lapack_int ldx, double* rcond, double* berr,
5354                                 lapack_int n_err_bnds, double* err_bnds_norm,
5355                                 double* err_bnds_comp, lapack_int nparams,
5356                                 double* params, double* work,
5357                                 lapack_int* iwork );
5358lapack_int LAPACKE_cgerfsx_work( int matrix_order, char trans, char equed,
5359                                 lapack_int n, lapack_int nrhs,
5360                                 const lapack_complex_float* a, lapack_int lda,
5361                                 const lapack_complex_float* af,
5362                                 lapack_int ldaf, const lapack_int* ipiv,
5363                                 const float* r, const float* c,
5364                                 const lapack_complex_float* b, lapack_int ldb,
5365                                 lapack_complex_float* x, lapack_int ldx,
5366                                 float* rcond, float* berr,
5367                                 lapack_int n_err_bnds, float* err_bnds_norm,
5368                                 float* err_bnds_comp, lapack_int nparams,
5369                                 float* params, lapack_complex_float* work,
5370                                 float* rwork );
5371lapack_int LAPACKE_zgerfsx_work( int matrix_order, char trans, char equed,
5372                                 lapack_int n, lapack_int nrhs,
5373                                 const lapack_complex_double* a, lapack_int lda,
5374                                 const lapack_complex_double* af,
5375                                 lapack_int ldaf, const lapack_int* ipiv,
5376                                 const double* r, const double* c,
5377                                 const lapack_complex_double* b, lapack_int ldb,
5378                                 lapack_complex_double* x, lapack_int ldx,
5379                                 double* rcond, double* berr,
5380                                 lapack_int n_err_bnds, double* err_bnds_norm,
5381                                 double* err_bnds_comp, lapack_int nparams,
5382                                 double* params, lapack_complex_double* work,
5383                                 double* rwork );
5384
5385lapack_int LAPACKE_sgerqf_work( int matrix_order, lapack_int m, lapack_int n,
5386                                float* a, lapack_int lda, float* tau,
5387                                float* work, lapack_int lwork );
5388lapack_int LAPACKE_dgerqf_work( int matrix_order, lapack_int m, lapack_int n,
5389                                double* a, lapack_int lda, double* tau,
5390                                double* work, lapack_int lwork );
5391lapack_int LAPACKE_cgerqf_work( int matrix_order, lapack_int m, lapack_int n,
5392                                lapack_complex_float* a, lapack_int lda,
5393                                lapack_complex_float* tau,
5394                                lapack_complex_float* work, lapack_int lwork );
5395lapack_int LAPACKE_zgerqf_work( int matrix_order, lapack_int m, lapack_int n,
5396                                lapack_complex_double* a, lapack_int lda,
5397                                lapack_complex_double* tau,
5398                                lapack_complex_double* work, lapack_int lwork );
5399
5400lapack_int LAPACKE_sgesdd_work( int matrix_order, char jobz, lapack_int m,
5401                                lapack_int n, float* a, lapack_int lda,
5402                                float* s, float* u, lapack_int ldu, float* vt,
5403                                lapack_int ldvt, float* work, lapack_int lwork,
5404                                lapack_int* iwork );
5405lapack_int LAPACKE_dgesdd_work( int matrix_order, char jobz, lapack_int m,
5406                                lapack_int n, double* a, lapack_int lda,
5407                                double* s, double* u, lapack_int ldu,
5408                                double* vt, lapack_int ldvt, double* work,
5409                                lapack_int lwork, lapack_int* iwork );
5410lapack_int LAPACKE_cgesdd_work( int matrix_order, char jobz, lapack_int m,
5411                                lapack_int n, lapack_complex_float* a,
5412                                lapack_int lda, float* s,
5413                                lapack_complex_float* u, lapack_int ldu,
5414                                lapack_complex_float* vt, lapack_int ldvt,
5415                                lapack_complex_float* work, lapack_int lwork,
5416                                float* rwork, lapack_int* iwork );
5417lapack_int LAPACKE_zgesdd_work( int matrix_order, char jobz, lapack_int m,
5418                                lapack_int n, lapack_complex_double* a,
5419                                lapack_int lda, double* s,
5420                                lapack_complex_double* u, lapack_int ldu,
5421                                lapack_complex_double* vt, lapack_int ldvt,
5422                                lapack_complex_double* work, lapack_int lwork,
5423                                double* rwork, lapack_int* iwork );
5424
5425lapack_int LAPACKE_sgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5426                               float* a, lapack_int lda, lapack_int* ipiv,
5427                               float* b, lapack_int ldb );
5428lapack_int LAPACKE_dgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5429                               double* a, lapack_int lda, lapack_int* ipiv,
5430                               double* b, lapack_int ldb );
5431lapack_int LAPACKE_cgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5432                               lapack_complex_float* a, lapack_int lda,
5433                               lapack_int* ipiv, lapack_complex_float* b,
5434                               lapack_int ldb );
5435lapack_int LAPACKE_zgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5436                               lapack_complex_double* a, lapack_int lda,
5437                               lapack_int* ipiv, lapack_complex_double* b,
5438                               lapack_int ldb );
5439lapack_int LAPACKE_dsgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5440                                double* a, lapack_int lda, lapack_int* ipiv,
5441                                double* b, lapack_int ldb, double* x,
5442                                lapack_int ldx, double* work, float* swork,
5443                                lapack_int* iter );
5444lapack_int LAPACKE_zcgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
5445                                lapack_complex_double* a, lapack_int lda,
5446                                lapack_int* ipiv, lapack_complex_double* b,
5447                                lapack_int ldb, lapack_complex_double* x,
5448                                lapack_int ldx, lapack_complex_double* work,
5449                                lapack_complex_float* swork, double* rwork,
5450                                lapack_int* iter );
5451
5452lapack_int LAPACKE_sgesvd_work( int matrix_order, char jobu, char jobvt,
5453                                lapack_int m, lapack_int n, float* a,
5454                                lapack_int lda, float* s, float* u,
5455                                lapack_int ldu, float* vt, lapack_int ldvt,
5456                                float* work, lapack_int lwork );
5457lapack_int LAPACKE_dgesvd_work( int matrix_order, char jobu, char jobvt,
5458                                lapack_int m, lapack_int n, double* a,
5459                                lapack_int lda, double* s, double* u,
5460                                lapack_int ldu, double* vt, lapack_int ldvt,
5461                                double* work, lapack_int lwork );
5462lapack_int LAPACKE_cgesvd_work( int matrix_order, char jobu, char jobvt,
5463                                lapack_int m, lapack_int n,
5464                                lapack_complex_float* a, lapack_int lda,
5465                                float* s, lapack_complex_float* u,
5466                                lapack_int ldu, lapack_complex_float* vt,
5467                                lapack_int ldvt, lapack_complex_float* work,
5468                                lapack_int lwork, float* rwork );
5469lapack_int LAPACKE_zgesvd_work( int matrix_order, char jobu, char jobvt,
5470                                lapack_int m, lapack_int n,
5471                                lapack_complex_double* a, lapack_int lda,
5472                                double* s, lapack_complex_double* u,
5473                                lapack_int ldu, lapack_complex_double* vt,
5474                                lapack_int ldvt, lapack_complex_double* work,
5475                                lapack_int lwork, double* rwork );
5476
5477lapack_int LAPACKE_sgesvj_work( int matrix_order, char joba, char jobu,
5478                                char jobv, lapack_int m, lapack_int n, float* a,
5479                                lapack_int lda, float* sva, lapack_int mv,
5480                                float* v, lapack_int ldv, float* work,
5481                                lapack_int lwork );
5482lapack_int LAPACKE_dgesvj_work( int matrix_order, char joba, char jobu,
5483                                char jobv, lapack_int m, lapack_int n,
5484                                double* a, lapack_int lda, double* sva,
5485                                lapack_int mv, double* v, lapack_int ldv,
5486                                double* work, lapack_int lwork );
5487
5488lapack_int LAPACKE_sgesvx_work( int matrix_order, char fact, char trans,
5489                                lapack_int n, lapack_int nrhs, float* a,
5490                                lapack_int lda, float* af, lapack_int ldaf,
5491                                lapack_int* ipiv, char* equed, float* r,
5492                                float* c, float* b, lapack_int ldb, float* x,
5493                                lapack_int ldx, float* rcond, float* ferr,
5494                                float* berr, float* work, lapack_int* iwork );
5495lapack_int LAPACKE_dgesvx_work( int matrix_order, char fact, char trans,
5496                                lapack_int n, lapack_int nrhs, double* a,
5497                                lapack_int lda, double* af, lapack_int ldaf,
5498                                lapack_int* ipiv, char* equed, double* r,
5499                                double* c, double* b, lapack_int ldb, double* x,
5500                                lapack_int ldx, double* rcond, double* ferr,
5501                                double* berr, double* work, lapack_int* iwork );
5502lapack_int LAPACKE_cgesvx_work( int matrix_order, char fact, char trans,
5503                                lapack_int n, lapack_int nrhs,
5504                                lapack_complex_float* a, lapack_int lda,
5505                                lapack_complex_float* af, lapack_int ldaf,
5506                                lapack_int* ipiv, char* equed, float* r,
5507                                float* c, lapack_complex_float* b,
5508                                lapack_int ldb, lapack_complex_float* x,
5509                                lapack_int ldx, float* rcond, float* ferr,
5510                                float* berr, lapack_complex_float* work,
5511                                float* rwork );
5512lapack_int LAPACKE_zgesvx_work( int matrix_order, char fact, char trans,
5513                                lapack_int n, lapack_int nrhs,
5514                                lapack_complex_double* a, lapack_int lda,
5515                                lapack_complex_double* af, lapack_int ldaf,
5516                                lapack_int* ipiv, char* equed, double* r,
5517                                double* c, lapack_complex_double* b,
5518                                lapack_int ldb, lapack_complex_double* x,
5519                                lapack_int ldx, double* rcond, double* ferr,
5520                                double* berr, lapack_complex_double* work,
5521                                double* rwork );
5522
5523lapack_int LAPACKE_sgesvxx_work( int matrix_order, char fact, char trans,
5524                                 lapack_int n, lapack_int nrhs, float* a,
5525                                 lapack_int lda, float* af, lapack_int ldaf,
5526                                 lapack_int* ipiv, char* equed, float* r,
5527                                 float* c, float* b, lapack_int ldb, float* x,
5528                                 lapack_int ldx, float* rcond, float* rpvgrw,
5529                                 float* berr, lapack_int n_err_bnds,
5530                                 float* err_bnds_norm, float* err_bnds_comp,
5531                                 lapack_int nparams, float* params, float* work,
5532                                 lapack_int* iwork );
5533lapack_int LAPACKE_dgesvxx_work( int matrix_order, char fact, char trans,
5534                                 lapack_int n, lapack_int nrhs, double* a,
5535                                 lapack_int lda, double* af, lapack_int ldaf,
5536                                 lapack_int* ipiv, char* equed, double* r,
5537                                 double* c, double* b, lapack_int ldb,
5538                                 double* x, lapack_int ldx, double* rcond,
5539                                 double* rpvgrw, double* berr,
5540                                 lapack_int n_err_bnds, double* err_bnds_norm,
5541                                 double* err_bnds_comp, lapack_int nparams,
5542                                 double* params, double* work,
5543                                 lapack_int* iwork );
5544lapack_int LAPACKE_cgesvxx_work( int matrix_order, char fact, char trans,
5545                                 lapack_int n, lapack_int nrhs,
5546                                 lapack_complex_float* a, lapack_int lda,
5547                                 lapack_complex_float* af, lapack_int ldaf,
5548                                 lapack_int* ipiv, char* equed, float* r,
5549                                 float* c, lapack_complex_float* b,
5550                                 lapack_int ldb, lapack_complex_float* x,
5551                                 lapack_int ldx, float* rcond, float* rpvgrw,
5552                                 float* berr, lapack_int n_err_bnds,
5553                                 float* err_bnds_norm, float* err_bnds_comp,
5554                                 lapack_int nparams, float* params,
5555                                 lapack_complex_float* work, float* rwork );
5556lapack_int LAPACKE_zgesvxx_work( int matrix_order, char fact, char trans,
5557                                 lapack_int n, lapack_int nrhs,
5558                                 lapack_complex_double* a, lapack_int lda,
5559                                 lapack_complex_double* af, lapack_int ldaf,
5560                                 lapack_int* ipiv, char* equed, double* r,
5561                                 double* c, lapack_complex_double* b,
5562                                 lapack_int ldb, lapack_complex_double* x,
5563                                 lapack_int ldx, double* rcond, double* rpvgrw,
5564                                 double* berr, lapack_int n_err_bnds,
5565                                 double* err_bnds_norm, double* err_bnds_comp,
5566                                 lapack_int nparams, double* params,
5567                                 lapack_complex_double* work, double* rwork );
5568
5569lapack_int LAPACKE_sgetf2_work( int matrix_order, lapack_int m, lapack_int n,
5570                                float* a, lapack_int lda, lapack_int* ipiv );
5571lapack_int LAPACKE_dgetf2_work( int matrix_order, lapack_int m, lapack_int n,
5572                                double* a, lapack_int lda, lapack_int* ipiv );
5573lapack_int LAPACKE_cgetf2_work( int matrix_order, lapack_int m, lapack_int n,
5574                                lapack_complex_float* a, lapack_int lda,
5575                                lapack_int* ipiv );
5576lapack_int LAPACKE_zgetf2_work( int matrix_order, lapack_int m, lapack_int n,
5577                                lapack_complex_double* a, lapack_int lda,
5578                                lapack_int* ipiv );
5579
5580lapack_int LAPACKE_sgetrf_work( int matrix_order, lapack_int m, lapack_int n,
5581                                float* a, lapack_int lda, lapack_int* ipiv );
5582lapack_int LAPACKE_dgetrf_work( int matrix_order, lapack_int m, lapack_int n,
5583                                double* a, lapack_int lda, lapack_int* ipiv );
5584lapack_int LAPACKE_cgetrf_work( int matrix_order, lapack_int m, lapack_int n,
5585                                lapack_complex_float* a, lapack_int lda,
5586                                lapack_int* ipiv );
5587lapack_int LAPACKE_zgetrf_work( int matrix_order, lapack_int m, lapack_int n,
5588                                lapack_complex_double* a, lapack_int lda,
5589                                lapack_int* ipiv );
5590
5591lapack_int LAPACKE_sgetri_work( int matrix_order, lapack_int n, float* a,
5592                                lapack_int lda, const lapack_int* ipiv,
5593                                float* work, lapack_int lwork );
5594lapack_int LAPACKE_dgetri_work( int matrix_order, lapack_int n, double* a,
5595                                lapack_int lda, const lapack_int* ipiv,
5596                                double* work, lapack_int lwork );
5597lapack_int LAPACKE_cgetri_work( int matrix_order, lapack_int n,
5598                                lapack_complex_float* a, lapack_int lda,
5599                                const lapack_int* ipiv,
5600                                lapack_complex_float* work, lapack_int lwork );
5601lapack_int LAPACKE_zgetri_work( int matrix_order, lapack_int n,
5602                                lapack_complex_double* a, lapack_int lda,
5603                                const lapack_int* ipiv,
5604                                lapack_complex_double* work, lapack_int lwork );
5605
5606lapack_int LAPACKE_sgetrs_work( int matrix_order, char trans, lapack_int n,
5607                                lapack_int nrhs, const float* a, lapack_int lda,
5608                                const lapack_int* ipiv, float* b,
5609                                lapack_int ldb );
5610lapack_int LAPACKE_dgetrs_work( int matrix_order, char trans, lapack_int n,
5611                                lapack_int nrhs, const double* a,
5612                                lapack_int lda, const lapack_int* ipiv,
5613                                double* b, lapack_int ldb );
5614lapack_int LAPACKE_cgetrs_work( int matrix_order, char trans, lapack_int n,
5615                                lapack_int nrhs, const lapack_complex_float* a,
5616                                lapack_int lda, const lapack_int* ipiv,
5617                                lapack_complex_float* b, lapack_int ldb );
5618lapack_int LAPACKE_zgetrs_work( int matrix_order, char trans, lapack_int n,
5619                                lapack_int nrhs, const lapack_complex_double* a,
5620                                lapack_int lda, const lapack_int* ipiv,
5621                                lapack_complex_double* b, lapack_int ldb );
5622
5623lapack_int LAPACKE_sggbak_work( int matrix_order, char job, char side,
5624                                lapack_int n, lapack_int ilo, lapack_int ihi,
5625                                const float* lscale, const float* rscale,
5626                                lapack_int m, float* v, lapack_int ldv );
5627lapack_int LAPACKE_dggbak_work( int matrix_order, char job, char side,
5628                                lapack_int n, lapack_int ilo, lapack_int ihi,
5629                                const double* lscale, const double* rscale,
5630                                lapack_int m, double* v, lapack_int ldv );
5631lapack_int LAPACKE_cggbak_work( int matrix_order, char job, char side,
5632                                lapack_int n, lapack_int ilo, lapack_int ihi,
5633                                const float* lscale, const float* rscale,
5634                                lapack_int m, lapack_complex_float* v,
5635                                lapack_int ldv );
5636lapack_int LAPACKE_zggbak_work( int matrix_order, char job, char side,
5637                                lapack_int n, lapack_int ilo, lapack_int ihi,
5638                                const double* lscale, const double* rscale,
5639                                lapack_int m, lapack_complex_double* v,
5640                                lapack_int ldv );
5641
5642lapack_int LAPACKE_sggbal_work( int matrix_order, char job, lapack_int n,
5643                                float* a, lapack_int lda, float* b,
5644                                lapack_int ldb, lapack_int* ilo,
5645                                lapack_int* ihi, float* lscale, float* rscale,
5646                                float* work );
5647lapack_int LAPACKE_dggbal_work( int matrix_order, char job, lapack_int n,
5648                                double* a, lapack_int lda, double* b,
5649                                lapack_int ldb, lapack_int* ilo,
5650                                lapack_int* ihi, double* lscale, double* rscale,
5651                                double* work );
5652lapack_int LAPACKE_cggbal_work( int matrix_order, char job, lapack_int n,
5653                                lapack_complex_float* a, lapack_int lda,
5654                                lapack_complex_float* b, lapack_int ldb,
5655                                lapack_int* ilo, lapack_int* ihi, float* lscale,
5656                                float* rscale, float* work );
5657lapack_int LAPACKE_zggbal_work( int matrix_order, char job, lapack_int n,
5658                                lapack_complex_double* a, lapack_int lda,
5659                                lapack_complex_double* b, lapack_int ldb,
5660                                lapack_int* ilo, lapack_int* ihi,
5661                                double* lscale, double* rscale, double* work );
5662
5663lapack_int LAPACKE_sgges_work( int matrix_order, char jobvsl, char jobvsr,
5664                               char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
5665                               float* a, lapack_int lda, float* b,
5666                               lapack_int ldb, lapack_int* sdim, float* alphar,
5667                               float* alphai, float* beta, float* vsl,
5668                               lapack_int ldvsl, float* vsr, lapack_int ldvsr,
5669                               float* work, lapack_int lwork,
5670                               lapack_logical* bwork );
5671lapack_int LAPACKE_dgges_work( int matrix_order, char jobvsl, char jobvsr,
5672                               char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
5673                               double* a, lapack_int lda, double* b,
5674                               lapack_int ldb, lapack_int* sdim, double* alphar,
5675                               double* alphai, double* beta, double* vsl,
5676                               lapack_int ldvsl, double* vsr, lapack_int ldvsr,
5677                               double* work, lapack_int lwork,
5678                               lapack_logical* bwork );
5679lapack_int LAPACKE_cgges_work( int matrix_order, char jobvsl, char jobvsr,
5680                               char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
5681                               lapack_complex_float* a, lapack_int lda,
5682                               lapack_complex_float* b, lapack_int ldb,
5683                               lapack_int* sdim, lapack_complex_float* alpha,
5684                               lapack_complex_float* beta,
5685                               lapack_complex_float* vsl, lapack_int ldvsl,
5686                               lapack_complex_float* vsr, lapack_int ldvsr,
5687                               lapack_complex_float* work, lapack_int lwork,
5688                               float* rwork, lapack_logical* bwork );
5689lapack_int LAPACKE_zgges_work( int matrix_order, char jobvsl, char jobvsr,
5690                               char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
5691                               lapack_complex_double* a, lapack_int lda,
5692                               lapack_complex_double* b, lapack_int ldb,
5693                               lapack_int* sdim, lapack_complex_double* alpha,
5694                               lapack_complex_double* beta,
5695                               lapack_complex_double* vsl, lapack_int ldvsl,
5696                               lapack_complex_double* vsr, lapack_int ldvsr,
5697                               lapack_complex_double* work, lapack_int lwork,
5698                               double* rwork, lapack_logical* bwork );
5699
5700lapack_int LAPACKE_sggesx_work( int matrix_order, char jobvsl, char jobvsr,
5701                                char sort, LAPACK_S_SELECT3 selctg, char sense,
5702                                lapack_int n, float* a, lapack_int lda,
5703                                float* b, lapack_int ldb, lapack_int* sdim,
5704                                float* alphar, float* alphai, float* beta,
5705                                float* vsl, lapack_int ldvsl, float* vsr,
5706                                lapack_int ldvsr, float* rconde, float* rcondv,
5707                                float* work, lapack_int lwork,
5708                                lapack_int* iwork, lapack_int liwork,
5709                                lapack_logical* bwork );
5710lapack_int LAPACKE_dggesx_work( int matrix_order, char jobvsl, char jobvsr,
5711                                char sort, LAPACK_D_SELECT3 selctg, char sense,
5712                                lapack_int n, double* a, lapack_int lda,
5713                                double* b, lapack_int ldb, lapack_int* sdim,
5714                                double* alphar, double* alphai, double* beta,
5715                                double* vsl, lapack_int ldvsl, double* vsr,
5716                                lapack_int ldvsr, double* rconde,
5717                                double* rcondv, double* work, lapack_int lwork,
5718                                lapack_int* iwork, lapack_int liwork,
5719                                lapack_logical* bwork );
5720lapack_int LAPACKE_cggesx_work( int matrix_order, char jobvsl, char jobvsr,
5721                                char sort, LAPACK_C_SELECT2 selctg, char sense,
5722                                lapack_int n, lapack_complex_float* a,
5723                                lapack_int lda, lapack_complex_float* b,
5724                                lapack_int ldb, lapack_int* sdim,
5725                                lapack_complex_float* alpha,
5726                                lapack_complex_float* beta,
5727                                lapack_complex_float* vsl, lapack_int ldvsl,
5728                                lapack_complex_float* vsr, lapack_int ldvsr,
5729                                float* rconde, float* rcondv,
5730                                lapack_complex_float* work, lapack_int lwork,
5731                                float* rwork, lapack_int* iwork,
5732                                lapack_int liwork, lapack_logical* bwork );
5733lapack_int LAPACKE_zggesx_work( int matrix_order, char jobvsl, char jobvsr,
5734                                char sort, LAPACK_Z_SELECT2 selctg, char sense,
5735                                lapack_int n, lapack_complex_double* a,
5736                                lapack_int lda, lapack_complex_double* b,
5737                                lapack_int ldb, lapack_int* sdim,
5738                                lapack_complex_double* alpha,
5739                                lapack_complex_double* beta,
5740                                lapack_complex_double* vsl, lapack_int ldvsl,
5741                                lapack_complex_double* vsr, lapack_int ldvsr,
5742                                double* rconde, double* rcondv,
5743                                lapack_complex_double* work, lapack_int lwork,
5744                                double* rwork, lapack_int* iwork,
5745                                lapack_int liwork, lapack_logical* bwork );
5746
5747lapack_int LAPACKE_sggev_work( int matrix_order, char jobvl, char jobvr,
5748                               lapack_int n, float* a, lapack_int lda, float* b,
5749                               lapack_int ldb, float* alphar, float* alphai,
5750                               float* beta, float* vl, lapack_int ldvl,
5751                               float* vr, lapack_int ldvr, float* work,
5752                               lapack_int lwork );
5753lapack_int LAPACKE_dggev_work( int matrix_order, char jobvl, char jobvr,
5754                               lapack_int n, double* a, lapack_int lda,
5755                               double* b, lapack_int ldb, double* alphar,
5756                               double* alphai, double* beta, double* vl,
5757                               lapack_int ldvl, double* vr, lapack_int ldvr,
5758                               double* work, lapack_int lwork );
5759lapack_int LAPACKE_cggev_work( int matrix_order, char jobvl, char jobvr,
5760                               lapack_int n, lapack_complex_float* a,
5761                               lapack_int lda, lapack_complex_float* b,
5762                               lapack_int ldb, lapack_complex_float* alpha,
5763                               lapack_complex_float* beta,
5764                               lapack_complex_float* vl, lapack_int ldvl,
5765                               lapack_complex_float* vr, lapack_int ldvr,
5766                               lapack_complex_float* work, lapack_int lwork,
5767                               float* rwork );
5768lapack_int LAPACKE_zggev_work( int matrix_order, char jobvl, char jobvr,
5769                               lapack_int n, lapack_complex_double* a,
5770                               lapack_int lda, lapack_complex_double* b,
5771                               lapack_int ldb, lapack_complex_double* alpha,
5772                               lapack_complex_double* beta,
5773                               lapack_complex_double* vl, lapack_int ldvl,
5774                               lapack_complex_double* vr, lapack_int ldvr,
5775                               lapack_complex_double* work, lapack_int lwork,
5776                               double* rwork );
5777
5778lapack_int LAPACKE_sggevx_work( int matrix_order, char balanc, char jobvl,
5779                                char jobvr, char sense, lapack_int n, float* a,
5780                                lapack_int lda, float* b, lapack_int ldb,
5781                                float* alphar, float* alphai, float* beta,
5782                                float* vl, lapack_int ldvl, float* vr,
5783                                lapack_int ldvr, lapack_int* ilo,
5784                                lapack_int* ihi, float* lscale, float* rscale,
5785                                float* abnrm, float* bbnrm, float* rconde,
5786                                float* rcondv, float* work, lapack_int lwork,
5787                                lapack_int* iwork, lapack_logical* bwork );
5788lapack_int LAPACKE_dggevx_work( int matrix_order, char balanc, char jobvl,
5789                                char jobvr, char sense, lapack_int n, double* a,
5790                                lapack_int lda, double* b, lapack_int ldb,
5791                                double* alphar, double* alphai, double* beta,
5792                                double* vl, lapack_int ldvl, double* vr,
5793                                lapack_int ldvr, lapack_int* ilo,
5794                                lapack_int* ihi, double* lscale, double* rscale,
5795                                double* abnrm, double* bbnrm, double* rconde,
5796                                double* rcondv, double* work, lapack_int lwork,
5797                                lapack_int* iwork, lapack_logical* bwork );
5798lapack_int LAPACKE_cggevx_work( int matrix_order, char balanc, char jobvl,
5799                                char jobvr, char sense, lapack_int n,
5800                                lapack_complex_float* a, lapack_int lda,
5801                                lapack_complex_float* b, lapack_int ldb,
5802                                lapack_complex_float* alpha,
5803                                lapack_complex_float* beta,
5804                                lapack_complex_float* vl, lapack_int ldvl,
5805                                lapack_complex_float* vr, lapack_int ldvr,
5806                                lapack_int* ilo, lapack_int* ihi, float* lscale,
5807                                float* rscale, float* abnrm, float* bbnrm,
5808                                float* rconde, float* rcondv,
5809                                lapack_complex_float* work, lapack_int lwork,
5810                                float* rwork, lapack_int* iwork,
5811                                lapack_logical* bwork );
5812lapack_int LAPACKE_zggevx_work( int matrix_order, char balanc, char jobvl,
5813                                char jobvr, char sense, lapack_int n,
5814                                lapack_complex_double* a, lapack_int lda,
5815                                lapack_complex_double* b, lapack_int ldb,
5816                                lapack_complex_double* alpha,
5817                                lapack_complex_double* beta,
5818                                lapack_complex_double* vl, lapack_int ldvl,
5819                                lapack_complex_double* vr, lapack_int ldvr,
5820                                lapack_int* ilo, lapack_int* ihi,
5821                                double* lscale, double* rscale, double* abnrm,
5822                                double* bbnrm, double* rconde, double* rcondv,
5823                                lapack_complex_double* work, lapack_int lwork,
5824                                double* rwork, lapack_int* iwork,
5825                                lapack_logical* bwork );
5826
5827lapack_int LAPACKE_sggglm_work( int matrix_order, lapack_int n, lapack_int m,
5828                                lapack_int p, float* a, lapack_int lda,
5829                                float* b, lapack_int ldb, float* d, float* x,
5830                                float* y, float* work, lapack_int lwork );
5831lapack_int LAPACKE_dggglm_work( int matrix_order, lapack_int n, lapack_int m,
5832                                lapack_int p, double* a, lapack_int lda,
5833                                double* b, lapack_int ldb, double* d, double* x,
5834                                double* y, double* work, lapack_int lwork );
5835lapack_int LAPACKE_cggglm_work( int matrix_order, lapack_int n, lapack_int m,
5836                                lapack_int p, lapack_complex_float* a,
5837                                lapack_int lda, lapack_complex_float* b,
5838                                lapack_int ldb, lapack_complex_float* d,
5839                                lapack_complex_float* x,
5840                                lapack_complex_float* y,
5841                                lapack_complex_float* work, lapack_int lwork );
5842lapack_int LAPACKE_zggglm_work( int matrix_order, lapack_int n, lapack_int m,
5843                                lapack_int p, lapack_complex_double* a,
5844                                lapack_int lda, lapack_complex_double* b,
5845                                lapack_int ldb, lapack_complex_double* d,
5846                                lapack_complex_double* x,
5847                                lapack_complex_double* y,
5848                                lapack_complex_double* work, lapack_int lwork );
5849
5850lapack_int LAPACKE_sgghrd_work( int matrix_order, char compq, char compz,
5851                                lapack_int n, lapack_int ilo, lapack_int ihi,
5852                                float* a, lapack_int lda, float* b,
5853                                lapack_int ldb, float* q, lapack_int ldq,
5854                                float* z, lapack_int ldz );
5855lapack_int LAPACKE_dgghrd_work( int matrix_order, char compq, char compz,
5856                                lapack_int n, lapack_int ilo, lapack_int ihi,
5857                                double* a, lapack_int lda, double* b,
5858                                lapack_int ldb, double* q, lapack_int ldq,
5859                                double* z, lapack_int ldz );
5860lapack_int LAPACKE_cgghrd_work( int matrix_order, char compq, char compz,
5861                                lapack_int n, lapack_int ilo, lapack_int ihi,
5862                                lapack_complex_float* a, lapack_int lda,
5863                                lapack_complex_float* b, lapack_int ldb,
5864                                lapack_complex_float* q, lapack_int ldq,
5865                                lapack_complex_float* z, lapack_int ldz );
5866lapack_int LAPACKE_zgghrd_work( int matrix_order, char compq, char compz,
5867                                lapack_int n, lapack_int ilo, lapack_int ihi,
5868                                lapack_complex_double* a, lapack_int lda,
5869                                lapack_complex_double* b, lapack_int ldb,
5870                                lapack_complex_double* q, lapack_int ldq,
5871                                lapack_complex_double* z, lapack_int ldz );
5872
5873lapack_int LAPACKE_sgglse_work( int matrix_order, lapack_int m, lapack_int n,
5874                                lapack_int p, float* a, lapack_int lda,
5875                                float* b, lapack_int ldb, float* c, float* d,
5876                                float* x, float* work, lapack_int lwork );
5877lapack_int LAPACKE_dgglse_work( int matrix_order, lapack_int m, lapack_int n,
5878                                lapack_int p, double* a, lapack_int lda,
5879                                double* b, lapack_int ldb, double* c, double* d,
5880                                double* x, double* work, lapack_int lwork );
5881lapack_int LAPACKE_cgglse_work( int matrix_order, lapack_int m, lapack_int n,
5882                                lapack_int p, lapack_complex_float* a,
5883                                lapack_int lda, lapack_complex_float* b,
5884                                lapack_int ldb, lapack_complex_float* c,
5885                                lapack_complex_float* d,
5886                                lapack_complex_float* x,
5887                                lapack_complex_float* work, lapack_int lwork );
5888lapack_int LAPACKE_zgglse_work( int matrix_order, lapack_int m, lapack_int n,
5889                                lapack_int p, lapack_complex_double* a,
5890                                lapack_int lda, lapack_complex_double* b,
5891                                lapack_int ldb, lapack_complex_double* c,
5892                                lapack_complex_double* d,
5893                                lapack_complex_double* x,
5894                                lapack_complex_double* work, lapack_int lwork );
5895
5896lapack_int LAPACKE_sggqrf_work( int matrix_order, lapack_int n, lapack_int m,
5897                                lapack_int p, float* a, lapack_int lda,
5898                                float* taua, float* b, lapack_int ldb,
5899                                float* taub, float* work, lapack_int lwork );
5900lapack_int LAPACKE_dggqrf_work( int matrix_order, lapack_int n, lapack_int m,
5901                                lapack_int p, double* a, lapack_int lda,
5902                                double* taua, double* b, lapack_int ldb,
5903                                double* taub, double* work, lapack_int lwork );
5904lapack_int LAPACKE_cggqrf_work( int matrix_order, lapack_int n, lapack_int m,
5905                                lapack_int p, lapack_complex_float* a,
5906                                lapack_int lda, lapack_complex_float* taua,
5907                                lapack_complex_float* b, lapack_int ldb,
5908                                lapack_complex_float* taub,
5909                                lapack_complex_float* work, lapack_int lwork );
5910lapack_int LAPACKE_zggqrf_work( int matrix_order, lapack_int n, lapack_int m,
5911                                lapack_int p, lapack_complex_double* a,
5912                                lapack_int lda, lapack_complex_double* taua,
5913                                lapack_complex_double* b, lapack_int ldb,
5914                                lapack_complex_double* taub,
5915                                lapack_complex_double* work, lapack_int lwork );
5916
5917lapack_int LAPACKE_sggrqf_work( int matrix_order, lapack_int m, lapack_int p,
5918                                lapack_int n, float* a, lapack_int lda,
5919                                float* taua, float* b, lapack_int ldb,
5920                                float* taub, float* work, lapack_int lwork );
5921lapack_int LAPACKE_dggrqf_work( int matrix_order, lapack_int m, lapack_int p,
5922                                lapack_int n, double* a, lapack_int lda,
5923                                double* taua, double* b, lapack_int ldb,
5924                                double* taub, double* work, lapack_int lwork );
5925lapack_int LAPACKE_cggrqf_work( int matrix_order, lapack_int m, lapack_int p,
5926                                lapack_int n, lapack_complex_float* a,
5927                                lapack_int lda, lapack_complex_float* taua,
5928                                lapack_complex_float* b, lapack_int ldb,
5929                                lapack_complex_float* taub,
5930                                lapack_complex_float* work, lapack_int lwork );
5931lapack_int LAPACKE_zggrqf_work( int matrix_order, lapack_int m, lapack_int p,
5932                                lapack_int n, lapack_complex_double* a,
5933                                lapack_int lda, lapack_complex_double* taua,
5934                                lapack_complex_double* b, lapack_int ldb,
5935                                lapack_complex_double* taub,
5936                                lapack_complex_double* work, lapack_int lwork );
5937
5938lapack_int LAPACKE_sggsvd_work( int matrix_order, char jobu, char jobv,
5939                                char jobq, lapack_int m, lapack_int n,
5940                                lapack_int p, lapack_int* k, lapack_int* l,
5941                                float* a, lapack_int lda, float* b,
5942                                lapack_int ldb, float* alpha, float* beta,
5943                                float* u, lapack_int ldu, float* v,
5944                                lapack_int ldv, float* q, lapack_int ldq,
5945                                float* work, lapack_int* iwork );
5946lapack_int LAPACKE_dggsvd_work( int matrix_order, char jobu, char jobv,
5947                                char jobq, lapack_int m, lapack_int n,
5948                                lapack_int p, lapack_int* k, lapack_int* l,
5949                                double* a, lapack_int lda, double* b,
5950                                lapack_int ldb, double* alpha, double* beta,
5951                                double* u, lapack_int ldu, double* v,
5952                                lapack_int ldv, double* q, lapack_int ldq,
5953                                double* work, lapack_int* iwork );
5954lapack_int LAPACKE_cggsvd_work( int matrix_order, char jobu, char jobv,
5955                                char jobq, lapack_int m, lapack_int n,
5956                                lapack_int p, lapack_int* k, lapack_int* l,
5957                                lapack_complex_float* a, lapack_int lda,
5958                                lapack_complex_float* b, lapack_int ldb,
5959                                float* alpha, float* beta,
5960                                lapack_complex_float* u, lapack_int ldu,
5961                                lapack_complex_float* v, lapack_int ldv,
5962                                lapack_complex_float* q, lapack_int ldq,
5963                                lapack_complex_float* work, float* rwork,
5964                                lapack_int* iwork );
5965lapack_int LAPACKE_zggsvd_work( int matrix_order, char jobu, char jobv,
5966                                char jobq, lapack_int m, lapack_int n,
5967                                lapack_int p, lapack_int* k, lapack_int* l,
5968                                lapack_complex_double* a, lapack_int lda,
5969                                lapack_complex_double* b, lapack_int ldb,
5970                                double* alpha, double* beta,
5971                                lapack_complex_double* u, lapack_int ldu,
5972                                lapack_complex_double* v, lapack_int ldv,
5973                                lapack_complex_double* q, lapack_int ldq,
5974                                lapack_complex_double* work, double* rwork,
5975                                lapack_int* iwork );
5976
5977lapack_int LAPACKE_sggsvp_work( int matrix_order, char jobu, char jobv,
5978                                char jobq, lapack_int m, lapack_int p,
5979                                lapack_int n, float* a, lapack_int lda,
5980                                float* b, lapack_int ldb, float tola,
5981                                float tolb, lapack_int* k, lapack_int* l,
5982                                float* u, lapack_int ldu, float* v,
5983                                lapack_int ldv, float* q, lapack_int ldq,
5984                                lapack_int* iwork, float* tau, float* work );
5985lapack_int LAPACKE_dggsvp_work( int matrix_order, char jobu, char jobv,
5986                                char jobq, lapack_int m, lapack_int p,
5987                                lapack_int n, double* a, lapack_int lda,
5988                                double* b, lapack_int ldb, double tola,
5989                                double tolb, lapack_int* k, lapack_int* l,
5990                                double* u, lapack_int ldu, double* v,
5991                                lapack_int ldv, double* q, lapack_int ldq,
5992                                lapack_int* iwork, double* tau, double* work );
5993lapack_int LAPACKE_cggsvp_work( int matrix_order, char jobu, char jobv,
5994                                char jobq, lapack_int m, lapack_int p,
5995                                lapack_int n, lapack_complex_float* a,
5996                                lapack_int lda, lapack_complex_float* b,
5997                                lapack_int ldb, float tola, float tolb,
5998                                lapack_int* k, lapack_int* l,
5999                                lapack_complex_float* u, lapack_int ldu,
6000                                lapack_complex_float* v, lapack_int ldv,
6001                                lapack_complex_float* q, lapack_int ldq,
6002                                lapack_int* iwork, float* rwork,
6003                                lapack_complex_float* tau,
6004                                lapack_complex_float* work );
6005lapack_int LAPACKE_zggsvp_work( int matrix_order, char jobu, char jobv,
6006                                char jobq, lapack_int m, lapack_int p,
6007                                lapack_int n, lapack_complex_double* a,
6008                                lapack_int lda, lapack_complex_double* b,
6009                                lapack_int ldb, double tola, double tolb,
6010                                lapack_int* k, lapack_int* l,
6011                                lapack_complex_double* u, lapack_int ldu,
6012                                lapack_complex_double* v, lapack_int ldv,
6013                                lapack_complex_double* q, lapack_int ldq,
6014                                lapack_int* iwork, double* rwork,
6015                                lapack_complex_double* tau,
6016                                lapack_complex_double* work );
6017
6018lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
6019                                const float* d, const float* du,
6020                                const float* du2, const lapack_int* ipiv,
6021                                float anorm, float* rcond, float* work,
6022                                lapack_int* iwork );
6023lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
6024                                const double* d, const double* du,
6025                                const double* du2, const lapack_int* ipiv,
6026                                double anorm, double* rcond, double* work,
6027                                lapack_int* iwork );
6028lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
6029                                const lapack_complex_float* dl,
6030                                const lapack_complex_float* d,
6031                                const lapack_complex_float* du,
6032                                const lapack_complex_float* du2,
6033                                const lapack_int* ipiv, float anorm,
6034                                float* rcond, lapack_complex_float* work );
6035lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
6036                                const lapack_complex_double* dl,
6037                                const lapack_complex_double* d,
6038                                const lapack_complex_double* du,
6039                                const lapack_complex_double* du2,
6040                                const lapack_int* ipiv, double anorm,
6041                                double* rcond, lapack_complex_double* work );
6042
6043lapack_int LAPACKE_sgtrfs_work( int matrix_order, char trans, lapack_int n,
6044                                lapack_int nrhs, const float* dl,
6045                                const float* d, const float* du,
6046                                const float* dlf, const float* df,
6047                                const float* duf, const float* du2,
6048                                const lapack_int* ipiv, const float* b,
6049                                lapack_int ldb, float* x, lapack_int ldx,
6050                                float* ferr, float* berr, float* work,
6051                                lapack_int* iwork );
6052lapack_int LAPACKE_dgtrfs_work( int matrix_order, char trans, lapack_int n,
6053                                lapack_int nrhs, const double* dl,
6054                                const double* d, const double* du,
6055                                const double* dlf, const double* df,
6056                                const double* duf, const double* du2,
6057                                const lapack_int* ipiv, const double* b,
6058                                lapack_int ldb, double* x, lapack_int ldx,
6059                                double* ferr, double* berr, double* work,
6060                                lapack_int* iwork );
6061lapack_int LAPACKE_cgtrfs_work( int matrix_order, char trans, lapack_int n,
6062                                lapack_int nrhs, const lapack_complex_float* dl,
6063                                const lapack_complex_float* d,
6064                                const lapack_complex_float* du,
6065                                const lapack_complex_float* dlf,
6066                                const lapack_complex_float* df,
6067                                const lapack_complex_float* duf,
6068                                const lapack_complex_float* du2,
6069                                const lapack_int* ipiv,
6070                                const lapack_complex_float* b, lapack_int ldb,
6071                                lapack_complex_float* x, lapack_int ldx,
6072                                float* ferr, float* berr,
6073                                lapack_complex_float* work, float* rwork );
6074lapack_int LAPACKE_zgtrfs_work( int matrix_order, char trans, lapack_int n,
6075                                lapack_int nrhs,
6076                                const lapack_complex_double* dl,
6077                                const lapack_complex_double* d,
6078                                const lapack_complex_double* du,
6079                                const lapack_complex_double* dlf,
6080                                const lapack_complex_double* df,
6081                                const lapack_complex_double* duf,
6082                                const lapack_complex_double* du2,
6083                                const lapack_int* ipiv,
6084                                const lapack_complex_double* b, lapack_int ldb,
6085                                lapack_complex_double* x, lapack_int ldx,
6086                                double* ferr, double* berr,
6087                                lapack_complex_double* work, double* rwork );
6088
6089lapack_int LAPACKE_sgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
6090                               float* dl, float* d, float* du, float* b,
6091                               lapack_int ldb );
6092lapack_int LAPACKE_dgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
6093                               double* dl, double* d, double* du, double* b,
6094                               lapack_int ldb );
6095lapack_int LAPACKE_cgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
6096                               lapack_complex_float* dl,
6097                               lapack_complex_float* d,
6098                               lapack_complex_float* du,
6099                               lapack_complex_float* b, lapack_int ldb );
6100lapack_int LAPACKE_zgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
6101                               lapack_complex_double* dl,
6102                               lapack_complex_double* d,
6103                               lapack_complex_double* du,
6104                               lapack_complex_double* b, lapack_int ldb );
6105
6106lapack_int LAPACKE_sgtsvx_work( int matrix_order, char fact, char trans,
6107                                lapack_int n, lapack_int nrhs, const float* dl,
6108                                const float* d, const float* du, float* dlf,
6109                                float* df, float* duf, float* du2,
6110                                lapack_int* ipiv, const float* b,
6111                                lapack_int ldb, float* x, lapack_int ldx,
6112                                float* rcond, float* ferr, float* berr,
6113                                float* work, lapack_int* iwork );
6114lapack_int LAPACKE_dgtsvx_work( int matrix_order, char fact, char trans,
6115                                lapack_int n, lapack_int nrhs, const double* dl,
6116                                const double* d, const double* du, double* dlf,
6117                                double* df, double* duf, double* du2,
6118                                lapack_int* ipiv, const double* b,
6119                                lapack_int ldb, double* x, lapack_int ldx,
6120                                double* rcond, double* ferr, double* berr,
6121                                double* work, lapack_int* iwork );
6122lapack_int LAPACKE_cgtsvx_work( int matrix_order, char fact, char trans,
6123                                lapack_int n, lapack_int nrhs,
6124                                const lapack_complex_float* dl,
6125                                const lapack_complex_float* d,
6126                                const lapack_complex_float* du,
6127                                lapack_complex_float* dlf,
6128                                lapack_complex_float* df,
6129                                lapack_complex_float* duf,
6130                                lapack_complex_float* du2, lapack_int* ipiv,
6131                                const lapack_complex_float* b, lapack_int ldb,
6132                                lapack_complex_float* x, lapack_int ldx,
6133                                float* rcond, float* ferr, float* berr,
6134                                lapack_complex_float* work, float* rwork );
6135lapack_int LAPACKE_zgtsvx_work( int matrix_order, char fact, char trans,
6136                                lapack_int n, lapack_int nrhs,
6137                                const lapack_complex_double* dl,
6138                                const lapack_complex_double* d,
6139                                const lapack_complex_double* du,
6140                                lapack_complex_double* dlf,
6141                                lapack_complex_double* df,
6142                                lapack_complex_double* duf,
6143                                lapack_complex_double* du2, lapack_int* ipiv,
6144                                const lapack_complex_double* b, lapack_int ldb,
6145                                lapack_complex_double* x, lapack_int ldx,
6146                                double* rcond, double* ferr, double* berr,
6147                                lapack_complex_double* work, double* rwork );
6148
6149lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
6150                                float* du2, lapack_int* ipiv );
6151lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
6152                                double* du2, lapack_int* ipiv );
6153lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
6154                                lapack_complex_float* d,
6155                                lapack_complex_float* du,
6156                                lapack_complex_float* du2, lapack_int* ipiv );
6157lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
6158                                lapack_complex_double* d,
6159                                lapack_complex_double* du,
6160                                lapack_complex_double* du2, lapack_int* ipiv );
6161
6162lapack_int LAPACKE_sgttrs_work( int matrix_order, char trans, lapack_int n,
6163                                lapack_int nrhs, const float* dl,
6164                                const float* d, const float* du,
6165                                const float* du2, const lapack_int* ipiv,
6166                                float* b, lapack_int ldb );
6167lapack_int LAPACKE_dgttrs_work( int matrix_order, char trans, lapack_int n,
6168                                lapack_int nrhs, const double* dl,
6169                                const double* d, const double* du,
6170                                const double* du2, const lapack_int* ipiv,
6171                                double* b, lapack_int ldb );
6172lapack_int LAPACKE_cgttrs_work( int matrix_order, char trans, lapack_int n,
6173                                lapack_int nrhs, const lapack_complex_float* dl,
6174                                const lapack_complex_float* d,
6175                                const lapack_complex_float* du,
6176                                const lapack_complex_float* du2,
6177                                const lapack_int* ipiv, lapack_complex_float* b,
6178                                lapack_int ldb );
6179lapack_int LAPACKE_zgttrs_work( int matrix_order, char trans, lapack_int n,
6180                                lapack_int nrhs,
6181                                const lapack_complex_double* dl,
6182                                const lapack_complex_double* d,
6183                                const lapack_complex_double* du,
6184                                const lapack_complex_double* du2,
6185                                const lapack_int* ipiv,
6186                                lapack_complex_double* b, lapack_int ldb );
6187
6188lapack_int LAPACKE_chbev_work( int matrix_order, char jobz, char uplo,
6189                               lapack_int n, lapack_int kd,
6190                               lapack_complex_float* ab, lapack_int ldab,
6191                               float* w, lapack_complex_float* z,
6192                               lapack_int ldz, lapack_complex_float* work,
6193                               float* rwork );
6194lapack_int LAPACKE_zhbev_work( int matrix_order, char jobz, char uplo,
6195                               lapack_int n, lapack_int kd,
6196                               lapack_complex_double* ab, lapack_int ldab,
6197                               double* w, lapack_complex_double* z,
6198                               lapack_int ldz, lapack_complex_double* work,
6199                               double* rwork );
6200
6201lapack_int LAPACKE_chbevd_work( int matrix_order, char jobz, char uplo,
6202                                lapack_int n, lapack_int kd,
6203                                lapack_complex_float* ab, lapack_int ldab,
6204                                float* w, lapack_complex_float* z,
6205                                lapack_int ldz, lapack_complex_float* work,
6206                                lapack_int lwork, float* rwork,
6207                                lapack_int lrwork, lapack_int* iwork,
6208                                lapack_int liwork );
6209lapack_int LAPACKE_zhbevd_work( int matrix_order, char jobz, char uplo,
6210                                lapack_int n, lapack_int kd,
6211                                lapack_complex_double* ab, lapack_int ldab,
6212                                double* w, lapack_complex_double* z,
6213                                lapack_int ldz, lapack_complex_double* work,
6214                                lapack_int lwork, double* rwork,
6215                                lapack_int lrwork, lapack_int* iwork,
6216                                lapack_int liwork );
6217
6218lapack_int LAPACKE_chbevx_work( int matrix_order, char jobz, char range,
6219                                char uplo, lapack_int n, lapack_int kd,
6220                                lapack_complex_float* ab, lapack_int ldab,
6221                                lapack_complex_float* q, lapack_int ldq,
6222                                float vl, float vu, lapack_int il,
6223                                lapack_int iu, float abstol, lapack_int* m,
6224                                float* w, lapack_complex_float* z,
6225                                lapack_int ldz, lapack_complex_float* work,
6226                                float* rwork, lapack_int* iwork,
6227                                lapack_int* ifail );
6228lapack_int LAPACKE_zhbevx_work( int matrix_order, char jobz, char range,
6229                                char uplo, lapack_int n, lapack_int kd,
6230                                lapack_complex_double* ab, lapack_int ldab,
6231                                lapack_complex_double* q, lapack_int ldq,
6232                                double vl, double vu, lapack_int il,
6233                                lapack_int iu, double abstol, lapack_int* m,
6234                                double* w, lapack_complex_double* z,
6235                                lapack_int ldz, lapack_complex_double* work,
6236                                double* rwork, lapack_int* iwork,
6237                                lapack_int* ifail );
6238
6239lapack_int LAPACKE_chbgst_work( int matrix_order, char vect, char uplo,
6240                                lapack_int n, lapack_int ka, lapack_int kb,
6241                                lapack_complex_float* ab, lapack_int ldab,
6242                                const lapack_complex_float* bb, lapack_int ldbb,
6243                                lapack_complex_float* x, lapack_int ldx,
6244                                lapack_complex_float* work, float* rwork );
6245lapack_int LAPACKE_zhbgst_work( int matrix_order, char vect, char uplo,
6246                                lapack_int n, lapack_int ka, lapack_int kb,
6247                                lapack_complex_double* ab, lapack_int ldab,
6248                                const lapack_complex_double* bb,
6249                                lapack_int ldbb, lapack_complex_double* x,
6250                                lapack_int ldx, lapack_complex_double* work,
6251                                double* rwork );
6252
6253lapack_int LAPACKE_chbgv_work( int matrix_order, char jobz, char uplo,
6254                               lapack_int n, lapack_int ka, lapack_int kb,
6255                               lapack_complex_float* ab, lapack_int ldab,
6256                               lapack_complex_float* bb, lapack_int ldbb,
6257                               float* w, lapack_complex_float* z,
6258                               lapack_int ldz, lapack_complex_float* work,
6259                               float* rwork );
6260lapack_int LAPACKE_zhbgv_work( int matrix_order, char jobz, char uplo,
6261                               lapack_int n, lapack_int ka, lapack_int kb,
6262                               lapack_complex_double* ab, lapack_int ldab,
6263                               lapack_complex_double* bb, lapack_int ldbb,
6264                               double* w, lapack_complex_double* z,
6265                               lapack_int ldz, lapack_complex_double* work,
6266                               double* rwork );
6267
6268lapack_int LAPACKE_chbgvd_work( int matrix_order, char jobz, char uplo,
6269                                lapack_int n, lapack_int ka, lapack_int kb,
6270                                lapack_complex_float* ab, lapack_int ldab,
6271                                lapack_complex_float* bb, lapack_int ldbb,
6272                                float* w, lapack_complex_float* z,
6273                                lapack_int ldz, lapack_complex_float* work,
6274                                lapack_int lwork, float* rwork,
6275                                lapack_int lrwork, lapack_int* iwork,
6276                                lapack_int liwork );
6277lapack_int LAPACKE_zhbgvd_work( int matrix_order, char jobz, char uplo,
6278                                lapack_int n, lapack_int ka, lapack_int kb,
6279                                lapack_complex_double* ab, lapack_int ldab,
6280                                lapack_complex_double* bb, lapack_int ldbb,
6281                                double* w, lapack_complex_double* z,
6282                                lapack_int ldz, lapack_complex_double* work,
6283                                lapack_int lwork, double* rwork,
6284                                lapack_int lrwork, lapack_int* iwork,
6285                                lapack_int liwork );
6286
6287lapack_int LAPACKE_chbgvx_work( int matrix_order, char jobz, char range,
6288                                char uplo, lapack_int n, lapack_int ka,
6289                                lapack_int kb, lapack_complex_float* ab,
6290                                lapack_int ldab, lapack_complex_float* bb,
6291                                lapack_int ldbb, lapack_complex_float* q,
6292                                lapack_int ldq, float vl, float vu,
6293                                lapack_int il, lapack_int iu, float abstol,
6294                                lapack_int* m, float* w,
6295                                lapack_complex_float* z, lapack_int ldz,
6296                                lapack_complex_float* work, float* rwork,
6297                                lapack_int* iwork, lapack_int* ifail );
6298lapack_int LAPACKE_zhbgvx_work( int matrix_order, char jobz, char range,
6299                                char uplo, lapack_int n, lapack_int ka,
6300                                lapack_int kb, lapack_complex_double* ab,
6301                                lapack_int ldab, lapack_complex_double* bb,
6302                                lapack_int ldbb, lapack_complex_double* q,
6303                                lapack_int ldq, double vl, double vu,
6304                                lapack_int il, lapack_int iu, double abstol,
6305                                lapack_int* m, double* w,
6306                                lapack_complex_double* z, lapack_int ldz,
6307                                lapack_complex_double* work, double* rwork,
6308                                lapack_int* iwork, lapack_int* ifail );
6309
6310lapack_int LAPACKE_chbtrd_work( int matrix_order, char vect, char uplo,
6311                                lapack_int n, lapack_int kd,
6312                                lapack_complex_float* ab, lapack_int ldab,
6313                                float* d, float* e, lapack_complex_float* q,
6314                                lapack_int ldq, lapack_complex_float* work );
6315lapack_int LAPACKE_zhbtrd_work( int matrix_order, char vect, char uplo,
6316                                lapack_int n, lapack_int kd,
6317                                lapack_complex_double* ab, lapack_int ldab,
6318                                double* d, double* e, lapack_complex_double* q,
6319                                lapack_int ldq, lapack_complex_double* work );
6320
6321lapack_int LAPACKE_checon_work( int matrix_order, char uplo, lapack_int n,
6322                                const lapack_complex_float* a, lapack_int lda,
6323                                const lapack_int* ipiv, float anorm,
6324                                float* rcond, lapack_complex_float* work );
6325lapack_int LAPACKE_zhecon_work( int matrix_order, char uplo, lapack_int n,
6326                                const lapack_complex_double* a, lapack_int lda,
6327                                const lapack_int* ipiv, double anorm,
6328                                double* rcond, lapack_complex_double* work );
6329
6330lapack_int LAPACKE_cheequb_work( int matrix_order, char uplo, lapack_int n,
6331                                 const lapack_complex_float* a, lapack_int lda,
6332                                 float* s, float* scond, float* amax,
6333                                 lapack_complex_float* work );
6334lapack_int LAPACKE_zheequb_work( int matrix_order, char uplo, lapack_int n,
6335                                 const lapack_complex_double* a, lapack_int lda,
6336                                 double* s, double* scond, double* amax,
6337                                 lapack_complex_double* work );
6338
6339lapack_int LAPACKE_cheev_work( int matrix_order, char jobz, char uplo,
6340                               lapack_int n, lapack_complex_float* a,
6341                               lapack_int lda, float* w,
6342                               lapack_complex_float* work, lapack_int lwork,
6343                               float* rwork );
6344lapack_int LAPACKE_zheev_work( int matrix_order, char jobz, char uplo,
6345                               lapack_int n, lapack_complex_double* a,
6346                               lapack_int lda, double* w,
6347                               lapack_complex_double* work, lapack_int lwork,
6348                               double* rwork );
6349
6350lapack_int LAPACKE_cheevd_work( int matrix_order, char jobz, char uplo,
6351                                lapack_int n, lapack_complex_float* a,
6352                                lapack_int lda, float* w,
6353                                lapack_complex_float* work, lapack_int lwork,
6354                                float* rwork, lapack_int lrwork,
6355                                lapack_int* iwork, lapack_int liwork );
6356lapack_int LAPACKE_zheevd_work( int matrix_order, char jobz, char uplo,
6357                                lapack_int n, lapack_complex_double* a,
6358                                lapack_int lda, double* w,
6359                                lapack_complex_double* work, lapack_int lwork,
6360                                double* rwork, lapack_int lrwork,
6361                                lapack_int* iwork, lapack_int liwork );
6362
6363lapack_int LAPACKE_cheevr_work( int matrix_order, char jobz, char range,
6364                                char uplo, lapack_int n,
6365                                lapack_complex_float* a, lapack_int lda,
6366                                float vl, float vu, lapack_int il,
6367                                lapack_int iu, float abstol, lapack_int* m,
6368                                float* w, lapack_complex_float* z,
6369                                lapack_int ldz, lapack_int* isuppz,
6370                                lapack_complex_float* work, lapack_int lwork,
6371                                float* rwork, lapack_int lrwork,
6372                                lapack_int* iwork, lapack_int liwork );
6373lapack_int LAPACKE_zheevr_work( int matrix_order, char jobz, char range,
6374                                char uplo, lapack_int n,
6375                                lapack_complex_double* a, lapack_int lda,
6376                                double vl, double vu, lapack_int il,
6377                                lapack_int iu, double abstol, lapack_int* m,
6378                                double* w, lapack_complex_double* z,
6379                                lapack_int ldz, lapack_int* isuppz,
6380                                lapack_complex_double* work, lapack_int lwork,
6381                                double* rwork, lapack_int lrwork,
6382                                lapack_int* iwork, lapack_int liwork );
6383
6384lapack_int LAPACKE_cheevx_work( int matrix_order, char jobz, char range,
6385                                char uplo, lapack_int n,
6386                                lapack_complex_float* a, lapack_int lda,
6387                                float vl, float vu, lapack_int il,
6388                                lapack_int iu, float abstol, lapack_int* m,
6389                                float* w, lapack_complex_float* z,
6390                                lapack_int ldz, lapack_complex_float* work,
6391                                lapack_int lwork, float* rwork,
6392                                lapack_int* iwork, lapack_int* ifail );
6393lapack_int LAPACKE_zheevx_work( int matrix_order, char jobz, char range,
6394                                char uplo, lapack_int n,
6395                                lapack_complex_double* a, lapack_int lda,
6396                                double vl, double vu, lapack_int il,
6397                                lapack_int iu, double abstol, lapack_int* m,
6398                                double* w, lapack_complex_double* z,
6399                                lapack_int ldz, lapack_complex_double* work,
6400                                lapack_int lwork, double* rwork,
6401                                lapack_int* iwork, lapack_int* ifail );
6402
6403lapack_int LAPACKE_chegst_work( int matrix_order, lapack_int itype, char uplo,
6404                                lapack_int n, lapack_complex_float* a,
6405                                lapack_int lda, const lapack_complex_float* b,
6406                                lapack_int ldb );
6407lapack_int LAPACKE_zhegst_work( int matrix_order, lapack_int itype, char uplo,
6408                                lapack_int n, lapack_complex_double* a,
6409                                lapack_int lda, const lapack_complex_double* b,
6410                                lapack_int ldb );
6411
6412lapack_int LAPACKE_chegv_work( int matrix_order, lapack_int itype, char jobz,
6413                               char uplo, lapack_int n, lapack_complex_float* a,
6414                               lapack_int lda, lapack_complex_float* b,
6415                               lapack_int ldb, float* w,
6416                               lapack_complex_float* work, lapack_int lwork,
6417                               float* rwork );
6418lapack_int LAPACKE_zhegv_work( int matrix_order, lapack_int itype, char jobz,
6419                               char uplo, lapack_int n,
6420                               lapack_complex_double* a, lapack_int lda,
6421                               lapack_complex_double* b, lapack_int ldb,
6422                               double* w, lapack_complex_double* work,
6423                               lapack_int lwork, double* rwork );
6424
6425lapack_int LAPACKE_chegvd_work( int matrix_order, lapack_int itype, char jobz,
6426                                char uplo, lapack_int n,
6427                                lapack_complex_float* a, lapack_int lda,
6428                                lapack_complex_float* b, lapack_int ldb,
6429                                float* w, lapack_complex_float* work,
6430                                lapack_int lwork, float* rwork,
6431                                lapack_int lrwork, lapack_int* iwork,
6432                                lapack_int liwork );
6433lapack_int LAPACKE_zhegvd_work( int matrix_order, lapack_int itype, char jobz,
6434                                char uplo, lapack_int n,
6435                                lapack_complex_double* a, lapack_int lda,
6436                                lapack_complex_double* b, lapack_int ldb,
6437                                double* w, lapack_complex_double* work,
6438                                lapack_int lwork, double* rwork,
6439                                lapack_int lrwork, lapack_int* iwork,
6440                                lapack_int liwork );
6441
6442lapack_int LAPACKE_chegvx_work( int matrix_order, lapack_int itype, char jobz,
6443                                char range, char uplo, lapack_int n,
6444                                lapack_complex_float* a, lapack_int lda,
6445                                lapack_complex_float* b, lapack_int ldb,
6446                                float vl, float vu, lapack_int il,
6447                                lapack_int iu, float abstol, lapack_int* m,
6448                                float* w, lapack_complex_float* z,
6449                                lapack_int ldz, lapack_complex_float* work,
6450                                lapack_int lwork, float* rwork,
6451                                lapack_int* iwork, lapack_int* ifail );
6452lapack_int LAPACKE_zhegvx_work( int matrix_order, lapack_int itype, char jobz,
6453                                char range, char uplo, lapack_int n,
6454                                lapack_complex_double* a, lapack_int lda,
6455                                lapack_complex_double* b, lapack_int ldb,
6456                                double vl, double vu, lapack_int il,
6457                                lapack_int iu, double abstol, lapack_int* m,
6458                                double* w, lapack_complex_double* z,
6459                                lapack_int ldz, lapack_complex_double* work,
6460                                lapack_int lwork, double* rwork,
6461                                lapack_int* iwork, lapack_int* ifail );
6462
6463lapack_int LAPACKE_cherfs_work( int matrix_order, char uplo, lapack_int n,
6464                                lapack_int nrhs, const lapack_complex_float* a,
6465                                lapack_int lda, const lapack_complex_float* af,
6466                                lapack_int ldaf, const lapack_int* ipiv,
6467                                const lapack_complex_float* b, lapack_int ldb,
6468                                lapack_complex_float* x, lapack_int ldx,
6469                                float* ferr, float* berr,
6470                                lapack_complex_float* work, float* rwork );
6471lapack_int LAPACKE_zherfs_work( int matrix_order, char uplo, lapack_int n,
6472                                lapack_int nrhs, const lapack_complex_double* a,
6473                                lapack_int lda, const lapack_complex_double* af,
6474                                lapack_int ldaf, const lapack_int* ipiv,
6475                                const lapack_complex_double* b, lapack_int ldb,
6476                                lapack_complex_double* x, lapack_int ldx,
6477                                double* ferr, double* berr,
6478                                lapack_complex_double* work, double* rwork );
6479
6480lapack_int LAPACKE_cherfsx_work( int matrix_order, char uplo, char equed,
6481                                 lapack_int n, lapack_int nrhs,
6482                                 const lapack_complex_float* a, lapack_int lda,
6483                                 const lapack_complex_float* af,
6484                                 lapack_int ldaf, const lapack_int* ipiv,
6485                                 const float* s, const lapack_complex_float* b,
6486                                 lapack_int ldb, lapack_complex_float* x,
6487                                 lapack_int ldx, float* rcond, float* berr,
6488                                 lapack_int n_err_bnds, float* err_bnds_norm,
6489                                 float* err_bnds_comp, lapack_int nparams,
6490                                 float* params, lapack_complex_float* work,
6491                                 float* rwork );
6492lapack_int LAPACKE_zherfsx_work( int matrix_order, char uplo, char equed,
6493                                 lapack_int n, lapack_int nrhs,
6494                                 const lapack_complex_double* a, lapack_int lda,
6495                                 const lapack_complex_double* af,
6496                                 lapack_int ldaf, const lapack_int* ipiv,
6497                                 const double* s,
6498                                 const lapack_complex_double* b, lapack_int ldb,
6499                                 lapack_complex_double* x, lapack_int ldx,
6500                                 double* rcond, double* berr,
6501                                 lapack_int n_err_bnds, double* err_bnds_norm,
6502                                 double* err_bnds_comp, lapack_int nparams,
6503                                 double* params, lapack_complex_double* work,
6504                                 double* rwork );
6505
6506lapack_int LAPACKE_chesv_work( int matrix_order, char uplo, lapack_int n,
6507                               lapack_int nrhs, lapack_complex_float* a,
6508                               lapack_int lda, lapack_int* ipiv,
6509                               lapack_complex_float* b, lapack_int ldb,
6510                               lapack_complex_float* work, lapack_int lwork );
6511lapack_int LAPACKE_zhesv_work( int matrix_order, char uplo, lapack_int n,
6512                               lapack_int nrhs, lapack_complex_double* a,
6513                               lapack_int lda, lapack_int* ipiv,
6514                               lapack_complex_double* b, lapack_int ldb,
6515                               lapack_complex_double* work, lapack_int lwork );
6516
6517lapack_int LAPACKE_chesvx_work( int matrix_order, char fact, char uplo,
6518                                lapack_int n, lapack_int nrhs,
6519                                const lapack_complex_float* a, lapack_int lda,
6520                                lapack_complex_float* af, lapack_int ldaf,
6521                                lapack_int* ipiv, const lapack_complex_float* b,
6522                                lapack_int ldb, lapack_complex_float* x,
6523                                lapack_int ldx, float* rcond, float* ferr,
6524                                float* berr, lapack_complex_float* work,
6525                                lapack_int lwork, float* rwork );
6526lapack_int LAPACKE_zhesvx_work( int matrix_order, char fact, char uplo,
6527                                lapack_int n, lapack_int nrhs,
6528                                const lapack_complex_double* a, lapack_int lda,
6529                                lapack_complex_double* af, lapack_int ldaf,
6530                                lapack_int* ipiv,
6531                                const lapack_complex_double* b, lapack_int ldb,
6532                                lapack_complex_double* x, lapack_int ldx,
6533                                double* rcond, double* ferr, double* berr,
6534                                lapack_complex_double* work, lapack_int lwork,
6535                                double* rwork );
6536
6537lapack_int LAPACKE_chesvxx_work( int matrix_order, char fact, char uplo,
6538                                 lapack_int n, lapack_int nrhs,
6539                                 lapack_complex_float* a, lapack_int lda,
6540                                 lapack_complex_float* af, lapack_int ldaf,
6541                                 lapack_int* ipiv, char* equed, float* s,
6542                                 lapack_complex_float* b, lapack_int ldb,
6543                                 lapack_complex_float* x, lapack_int ldx,
6544                                 float* rcond, float* rpvgrw, float* berr,
6545                                 lapack_int n_err_bnds, float* err_bnds_norm,
6546                                 float* err_bnds_comp, lapack_int nparams,
6547                                 float* params, lapack_complex_float* work,
6548                                 float* rwork );
6549lapack_int LAPACKE_zhesvxx_work( int matrix_order, char fact, char uplo,
6550                                 lapack_int n, lapack_int nrhs,
6551                                 lapack_complex_double* a, lapack_int lda,
6552                                 lapack_complex_double* af, lapack_int ldaf,
6553                                 lapack_int* ipiv, char* equed, double* s,
6554                                 lapack_complex_double* b, lapack_int ldb,
6555                                 lapack_complex_double* x, lapack_int ldx,
6556                                 double* rcond, double* rpvgrw, double* berr,
6557                                 lapack_int n_err_bnds, double* err_bnds_norm,
6558                                 double* err_bnds_comp, lapack_int nparams,
6559                                 double* params, lapack_complex_double* work,
6560                                 double* rwork );
6561
6562lapack_int LAPACKE_chetrd_work( int matrix_order, char uplo, lapack_int n,
6563                                lapack_complex_float* a, lapack_int lda,
6564                                float* d, float* e, lapack_complex_float* tau,
6565                                lapack_complex_float* work, lapack_int lwork );
6566lapack_int LAPACKE_zhetrd_work( int matrix_order, char uplo, lapack_int n,
6567                                lapack_complex_double* a, lapack_int lda,
6568                                double* d, double* e,
6569                                lapack_complex_double* tau,
6570                                lapack_complex_double* work, lapack_int lwork );
6571
6572lapack_int LAPACKE_chetrf_work( int matrix_order, char uplo, lapack_int n,
6573                                lapack_complex_float* a, lapack_int lda,
6574                                lapack_int* ipiv, lapack_complex_float* work,
6575                                lapack_int lwork );
6576lapack_int LAPACKE_zhetrf_work( int matrix_order, char uplo, lapack_int n,
6577                                lapack_complex_double* a, lapack_int lda,
6578                                lapack_int* ipiv, lapack_complex_double* work,
6579                                lapack_int lwork );
6580
6581lapack_int LAPACKE_chetri_work( int matrix_order, char uplo, lapack_int n,
6582                                lapack_complex_float* a, lapack_int lda,
6583                                const lapack_int* ipiv,
6584                                lapack_complex_float* work );
6585lapack_int LAPACKE_zhetri_work( int matrix_order, char uplo, lapack_int n,
6586                                lapack_complex_double* a, lapack_int lda,
6587                                const lapack_int* ipiv,
6588                                lapack_complex_double* work );
6589
6590lapack_int LAPACKE_chetrs_work( int matrix_order, char uplo, lapack_int n,
6591                                lapack_int nrhs, const lapack_complex_float* a,
6592                                lapack_int lda, const lapack_int* ipiv,
6593                                lapack_complex_float* b, lapack_int ldb );
6594lapack_int LAPACKE_zhetrs_work( int matrix_order, char uplo, lapack_int n,
6595                                lapack_int nrhs, const lapack_complex_double* a,
6596                                lapack_int lda, const lapack_int* ipiv,
6597                                lapack_complex_double* b, lapack_int ldb );
6598
6599lapack_int LAPACKE_chfrk_work( int matrix_order, char transr, char uplo,
6600                               char trans, lapack_int n, lapack_int k,
6601                               float alpha, const lapack_complex_float* a,
6602                               lapack_int lda, float beta,
6603                               lapack_complex_float* c );
6604lapack_int LAPACKE_zhfrk_work( int matrix_order, char transr, char uplo,
6605                               char trans, lapack_int n, lapack_int k,
6606                               double alpha, const lapack_complex_double* a,
6607                               lapack_int lda, double beta,
6608                               lapack_complex_double* c );
6609
6610lapack_int LAPACKE_shgeqz_work( int matrix_order, char job, char compq,
6611                                char compz, lapack_int n, lapack_int ilo,
6612                                lapack_int ihi, float* h, lapack_int ldh,
6613                                float* t, lapack_int ldt, float* alphar,
6614                                float* alphai, float* beta, float* q,
6615                                lapack_int ldq, float* z, lapack_int ldz,
6616                                float* work, lapack_int lwork );
6617lapack_int LAPACKE_dhgeqz_work( int matrix_order, char job, char compq,
6618                                char compz, lapack_int n, lapack_int ilo,
6619                                lapack_int ihi, double* h, lapack_int ldh,
6620                                double* t, lapack_int ldt, double* alphar,
6621                                double* alphai, double* beta, double* q,
6622                                lapack_int ldq, double* z, lapack_int ldz,
6623                                double* work, lapack_int lwork );
6624lapack_int LAPACKE_chgeqz_work( int matrix_order, char job, char compq,
6625                                char compz, lapack_int n, lapack_int ilo,
6626                                lapack_int ihi, lapack_complex_float* h,
6627                                lapack_int ldh, lapack_complex_float* t,
6628                                lapack_int ldt, lapack_complex_float* alpha,
6629                                lapack_complex_float* beta,
6630                                lapack_complex_float* q, lapack_int ldq,
6631                                lapack_complex_float* z, lapack_int ldz,
6632                                lapack_complex_float* work, lapack_int lwork,
6633                                float* rwork );
6634lapack_int LAPACKE_zhgeqz_work( int matrix_order, char job, char compq,
6635                                char compz, lapack_int n, lapack_int ilo,
6636                                lapack_int ihi, lapack_complex_double* h,
6637                                lapack_int ldh, lapack_complex_double* t,
6638                                lapack_int ldt, lapack_complex_double* alpha,
6639                                lapack_complex_double* beta,
6640                                lapack_complex_double* q, lapack_int ldq,
6641                                lapack_complex_double* z, lapack_int ldz,
6642                                lapack_complex_double* work, lapack_int lwork,
6643                                double* rwork );
6644
6645lapack_int LAPACKE_chpcon_work( int matrix_order, char uplo, lapack_int n,
6646                                const lapack_complex_float* ap,
6647                                const lapack_int* ipiv, float anorm,
6648                                float* rcond, lapack_complex_float* work );
6649lapack_int LAPACKE_zhpcon_work( int matrix_order, char uplo, lapack_int n,
6650                                const lapack_complex_double* ap,
6651                                const lapack_int* ipiv, double anorm,
6652                                double* rcond, lapack_complex_double* work );
6653
6654lapack_int LAPACKE_chpev_work( int matrix_order, char jobz, char uplo,
6655                               lapack_int n, lapack_complex_float* ap, float* w,
6656                               lapack_complex_float* z, lapack_int ldz,
6657                               lapack_complex_float* work, float* rwork );
6658lapack_int LAPACKE_zhpev_work( int matrix_order, char jobz, char uplo,
6659                               lapack_int n, lapack_complex_double* ap,
6660                               double* w, lapack_complex_double* z,
6661                               lapack_int ldz, lapack_complex_double* work,
6662                               double* rwork );
6663
6664lapack_int LAPACKE_chpevd_work( int matrix_order, char jobz, char uplo,
6665                                lapack_int n, lapack_complex_float* ap,
6666                                float* w, lapack_complex_float* z,
6667                                lapack_int ldz, lapack_complex_float* work,
6668                                lapack_int lwork, float* rwork,
6669                                lapack_int lrwork, lapack_int* iwork,
6670                                lapack_int liwork );
6671lapack_int LAPACKE_zhpevd_work( int matrix_order, char jobz, char uplo,
6672                                lapack_int n, lapack_complex_double* ap,
6673                                double* w, lapack_complex_double* z,
6674                                lapack_int ldz, lapack_complex_double* work,
6675                                lapack_int lwork, double* rwork,
6676                                lapack_int lrwork, lapack_int* iwork,
6677                                lapack_int liwork );
6678
6679lapack_int LAPACKE_chpevx_work( int matrix_order, char jobz, char range,
6680                                char uplo, lapack_int n,
6681                                lapack_complex_float* ap, float vl, float vu,
6682                                lapack_int il, lapack_int iu, float abstol,
6683                                lapack_int* m, float* w,
6684                                lapack_complex_float* z, lapack_int ldz,
6685                                lapack_complex_float* work, float* rwork,
6686                                lapack_int* iwork, lapack_int* ifail );
6687lapack_int LAPACKE_zhpevx_work( int matrix_order, char jobz, char range,
6688                                char uplo, lapack_int n,
6689                                lapack_complex_double* ap, double vl, double vu,
6690                                lapack_int il, lapack_int iu, double abstol,
6691                                lapack_int* m, double* w,
6692                                lapack_complex_double* z, lapack_int ldz,
6693                                lapack_complex_double* work, double* rwork,
6694                                lapack_int* iwork, lapack_int* ifail );
6695
6696lapack_int LAPACKE_chpgst_work( int matrix_order, lapack_int itype, char uplo,
6697                                lapack_int n, lapack_complex_float* ap,
6698                                const lapack_complex_float* bp );
6699lapack_int LAPACKE_zhpgst_work( int matrix_order, lapack_int itype, char uplo,
6700                                lapack_int n, lapack_complex_double* ap,
6701                                const lapack_complex_double* bp );
6702
6703lapack_int LAPACKE_chpgv_work( int matrix_order, lapack_int itype, char jobz,
6704                               char uplo, lapack_int n,
6705                               lapack_complex_float* ap,
6706                               lapack_complex_float* bp, float* w,
6707                               lapack_complex_float* z, lapack_int ldz,
6708                               lapack_complex_float* work, float* rwork );
6709lapack_int LAPACKE_zhpgv_work( int matrix_order, lapack_int itype, char jobz,
6710                               char uplo, lapack_int n,
6711                               lapack_complex_double* ap,
6712                               lapack_complex_double* bp, double* w,
6713                               lapack_complex_double* z, lapack_int ldz,
6714                               lapack_complex_double* work, double* rwork );
6715
6716lapack_int LAPACKE_chpgvd_work( int matrix_order, lapack_int itype, char jobz,
6717                                char uplo, lapack_int n,
6718                                lapack_complex_float* ap,
6719                                lapack_complex_float* bp, float* w,
6720                                lapack_complex_float* z, lapack_int ldz,
6721                                lapack_complex_float* work, lapack_int lwork,
6722                                float* rwork, lapack_int lrwork,
6723                                lapack_int* iwork, lapack_int liwork );
6724lapack_int LAPACKE_zhpgvd_work( int matrix_order, lapack_int itype, char jobz,
6725                                char uplo, lapack_int n,
6726                                lapack_complex_double* ap,
6727                                lapack_complex_double* bp, double* w,
6728                                lapack_complex_double* z, lapack_int ldz,
6729                                lapack_complex_double* work, lapack_int lwork,
6730                                double* rwork, lapack_int lrwork,
6731                                lapack_int* iwork, lapack_int liwork );
6732
6733lapack_int LAPACKE_chpgvx_work( int matrix_order, lapack_int itype, char jobz,
6734                                char range, char uplo, lapack_int n,
6735                                lapack_complex_float* ap,
6736                                lapack_complex_float* bp, float vl, float vu,
6737                                lapack_int il, lapack_int iu, float abstol,
6738                                lapack_int* m, float* w,
6739                                lapack_complex_float* z, lapack_int ldz,
6740                                lapack_complex_float* work, float* rwork,
6741                                lapack_int* iwork, lapack_int* ifail );
6742lapack_int LAPACKE_zhpgvx_work( int matrix_order, lapack_int itype, char jobz,
6743                                char range, char uplo, lapack_int n,
6744                                lapack_complex_double* ap,
6745                                lapack_complex_double* bp, double vl, double vu,
6746                                lapack_int il, lapack_int iu, double abstol,
6747                                lapack_int* m, double* w,
6748                                lapack_complex_double* z, lapack_int ldz,
6749                                lapack_complex_double* work, double* rwork,
6750                                lapack_int* iwork, lapack_int* ifail );
6751
6752lapack_int LAPACKE_chprfs_work( int matrix_order, char uplo, lapack_int n,
6753                                lapack_int nrhs, const lapack_complex_float* ap,
6754                                const lapack_complex_float* afp,
6755                                const lapack_int* ipiv,
6756                                const lapack_complex_float* b, lapack_int ldb,
6757                                lapack_complex_float* x, lapack_int ldx,
6758                                float* ferr, float* berr,
6759                                lapack_complex_float* work, float* rwork );
6760lapack_int LAPACKE_zhprfs_work( int matrix_order, char uplo, lapack_int n,
6761                                lapack_int nrhs,
6762                                const lapack_complex_double* ap,
6763                                const lapack_complex_double* afp,
6764                                const lapack_int* ipiv,
6765                                const lapack_complex_double* b, lapack_int ldb,
6766                                lapack_complex_double* x, lapack_int ldx,
6767                                double* ferr, double* berr,
6768                                lapack_complex_double* work, double* rwork );
6769
6770lapack_int LAPACKE_chpsv_work( int matrix_order, char uplo, lapack_int n,
6771                               lapack_int nrhs, lapack_complex_float* ap,
6772                               lapack_int* ipiv, lapack_complex_float* b,
6773                               lapack_int ldb );
6774lapack_int LAPACKE_zhpsv_work( int matrix_order, char uplo, lapack_int n,
6775                               lapack_int nrhs, lapack_complex_double* ap,
6776                               lapack_int* ipiv, lapack_complex_double* b,
6777                               lapack_int ldb );
6778
6779lapack_int LAPACKE_chpsvx_work( int matrix_order, char fact, char uplo,
6780                                lapack_int n, lapack_int nrhs,
6781                                const lapack_complex_float* ap,
6782                                lapack_complex_float* afp, lapack_int* ipiv,
6783                                const lapack_complex_float* b, lapack_int ldb,
6784                                lapack_complex_float* x, lapack_int ldx,
6785                                float* rcond, float* ferr, float* berr,
6786                                lapack_complex_float* work, float* rwork );
6787lapack_int LAPACKE_zhpsvx_work( int matrix_order, char fact, char uplo,
6788                                lapack_int n, lapack_int nrhs,
6789                                const lapack_complex_double* ap,
6790                                lapack_complex_double* afp, lapack_int* ipiv,
6791                                const lapack_complex_double* b, lapack_int ldb,
6792                                lapack_complex_double* x, lapack_int ldx,
6793                                double* rcond, double* ferr, double* berr,
6794                                lapack_complex_double* work, double* rwork );
6795
6796lapack_int LAPACKE_chptrd_work( int matrix_order, char uplo, lapack_int n,
6797                                lapack_complex_float* ap, float* d, float* e,
6798                                lapack_complex_float* tau );
6799lapack_int LAPACKE_zhptrd_work( int matrix_order, char uplo, lapack_int n,
6800                                lapack_complex_double* ap, double* d, double* e,
6801                                lapack_complex_double* tau );
6802
6803lapack_int LAPACKE_chptrf_work( int matrix_order, char uplo, lapack_int n,
6804                                lapack_complex_float* ap, lapack_int* ipiv );
6805lapack_int LAPACKE_zhptrf_work( int matrix_order, char uplo, lapack_int n,
6806                                lapack_complex_double* ap, lapack_int* ipiv );
6807
6808lapack_int LAPACKE_chptri_work( int matrix_order, char uplo, lapack_int n,
6809                                lapack_complex_float* ap,
6810                                const lapack_int* ipiv,
6811                                lapack_complex_float* work );
6812lapack_int LAPACKE_zhptri_work( int matrix_order, char uplo, lapack_int n,
6813                                lapack_complex_double* ap,
6814                                const lapack_int* ipiv,
6815                                lapack_complex_double* work );
6816
6817lapack_int LAPACKE_chptrs_work( int matrix_order, char uplo, lapack_int n,
6818                                lapack_int nrhs, const lapack_complex_float* ap,
6819                                const lapack_int* ipiv, lapack_complex_float* b,
6820                                lapack_int ldb );
6821lapack_int LAPACKE_zhptrs_work( int matrix_order, char uplo, lapack_int n,
6822                                lapack_int nrhs,
6823                                const lapack_complex_double* ap,
6824                                const lapack_int* ipiv,
6825                                lapack_complex_double* b, lapack_int ldb );
6826
6827lapack_int LAPACKE_shsein_work( int matrix_order, char job, char eigsrc,
6828                                char initv, lapack_logical* select,
6829                                lapack_int n, const float* h, lapack_int ldh,
6830                                float* wr, const float* wi, float* vl,
6831                                lapack_int ldvl, float* vr, lapack_int ldvr,
6832                                lapack_int mm, lapack_int* m, float* work,
6833                                lapack_int* ifaill, lapack_int* ifailr );
6834lapack_int LAPACKE_dhsein_work( int matrix_order, char job, char eigsrc,
6835                                char initv, lapack_logical* select,
6836                                lapack_int n, const double* h, lapack_int ldh,
6837                                double* wr, const double* wi, double* vl,
6838                                lapack_int ldvl, double* vr, lapack_int ldvr,
6839                                lapack_int mm, lapack_int* m, double* work,
6840                                lapack_int* ifaill, lapack_int* ifailr );
6841lapack_int LAPACKE_chsein_work( int matrix_order, char job, char eigsrc,
6842                                char initv, const lapack_logical* select,
6843                                lapack_int n, const lapack_complex_float* h,
6844                                lapack_int ldh, lapack_complex_float* w,
6845                                lapack_complex_float* vl, lapack_int ldvl,
6846                                lapack_complex_float* vr, lapack_int ldvr,
6847                                lapack_int mm, lapack_int* m,
6848                                lapack_complex_float* work, float* rwork,
6849                                lapack_int* ifaill, lapack_int* ifailr );
6850lapack_int LAPACKE_zhsein_work( int matrix_order, char job, char eigsrc,
6851                                char initv, const lapack_logical* select,
6852                                lapack_int n, const lapack_complex_double* h,
6853                                lapack_int ldh, lapack_complex_double* w,
6854                                lapack_complex_double* vl, lapack_int ldvl,
6855                                lapack_complex_double* vr, lapack_int ldvr,
6856                                lapack_int mm, lapack_int* m,
6857                                lapack_complex_double* work, double* rwork,
6858                                lapack_int* ifaill, lapack_int* ifailr );
6859
6860lapack_int LAPACKE_shseqr_work( int matrix_order, char job, char compz,
6861                                lapack_int n, lapack_int ilo, lapack_int ihi,
6862                                float* h, lapack_int ldh, float* wr, float* wi,
6863                                float* z, lapack_int ldz, float* work,
6864                                lapack_int lwork );
6865lapack_int LAPACKE_dhseqr_work( int matrix_order, char job, char compz,
6866                                lapack_int n, lapack_int ilo, lapack_int ihi,
6867                                double* h, lapack_int ldh, double* wr,
6868                                double* wi, double* z, lapack_int ldz,
6869                                double* work, lapack_int lwork );
6870lapack_int LAPACKE_chseqr_work( int matrix_order, char job, char compz,
6871                                lapack_int n, lapack_int ilo, lapack_int ihi,
6872                                lapack_complex_float* h, lapack_int ldh,
6873                                lapack_complex_float* w,
6874                                lapack_complex_float* z, lapack_int ldz,
6875                                lapack_complex_float* work, lapack_int lwork );
6876lapack_int LAPACKE_zhseqr_work( int matrix_order, char job, char compz,
6877                                lapack_int n, lapack_int ilo, lapack_int ihi,
6878                                lapack_complex_double* h, lapack_int ldh,
6879                                lapack_complex_double* w,
6880                                lapack_complex_double* z, lapack_int ldz,
6881                                lapack_complex_double* work, lapack_int lwork );
6882
6883lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
6884                                lapack_int incx );
6885lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
6886                                lapack_int incx );
6887
6888lapack_int LAPACKE_slacpy_work( int matrix_order, char uplo, lapack_int m,
6889                                lapack_int n, const float* a, lapack_int lda,
6890                                float* b, lapack_int ldb );
6891lapack_int LAPACKE_dlacpy_work( int matrix_order, char uplo, lapack_int m,
6892                                lapack_int n, const double* a, lapack_int lda,
6893                                double* b, lapack_int ldb );
6894lapack_int LAPACKE_clacpy_work( int matrix_order, char uplo, lapack_int m,
6895                                lapack_int n, const lapack_complex_float* a,
6896                                lapack_int lda, lapack_complex_float* b,
6897                                lapack_int ldb );
6898lapack_int LAPACKE_zlacpy_work( int matrix_order, char uplo, lapack_int m,
6899                                lapack_int n, const lapack_complex_double* a,
6900                                lapack_int lda, lapack_complex_double* b,
6901                                lapack_int ldb );
6902
6903lapack_int LAPACKE_zlag2c_work( int matrix_order, lapack_int m, lapack_int n,
6904                                const lapack_complex_double* a, lapack_int lda,
6905                                lapack_complex_float* sa, lapack_int ldsa );
6906
6907lapack_int LAPACKE_slag2d_work( int matrix_order, lapack_int m, lapack_int n,
6908                                const float* sa, lapack_int ldsa, double* a,
6909                                lapack_int lda );
6910
6911lapack_int LAPACKE_dlag2s_work( int matrix_order, lapack_int m, lapack_int n,
6912                                const double* a, lapack_int lda, float* sa,
6913                                lapack_int ldsa );
6914
6915lapack_int LAPACKE_clag2z_work( int matrix_order, lapack_int m, lapack_int n,
6916                                const lapack_complex_float* sa, lapack_int ldsa,
6917                                lapack_complex_double* a, lapack_int lda );
6918
6919lapack_int LAPACKE_slagge_work( int matrix_order, lapack_int m, lapack_int n,
6920                                lapack_int kl, lapack_int ku, const float* d,
6921                                float* a, lapack_int lda, lapack_int* iseed,
6922                                float* work );
6923lapack_int LAPACKE_dlagge_work( int matrix_order, lapack_int m, lapack_int n,
6924                                lapack_int kl, lapack_int ku, const double* d,
6925                                double* a, lapack_int lda, lapack_int* iseed,
6926                                double* work );
6927lapack_int LAPACKE_clagge_work( int matrix_order, lapack_int m, lapack_int n,
6928                                lapack_int kl, lapack_int ku, const float* d,
6929                                lapack_complex_float* a, lapack_int lda,
6930                                lapack_int* iseed, lapack_complex_float* work );
6931lapack_int LAPACKE_zlagge_work( int matrix_order, lapack_int m, lapack_int n,
6932                                lapack_int kl, lapack_int ku, const double* d,
6933                                lapack_complex_double* a, lapack_int lda,
6934                                lapack_int* iseed,
6935                                lapack_complex_double* work );
6936
6937lapack_int LAPACKE_claghe_work( int matrix_order, lapack_int n, lapack_int k,
6938                                const float* d, lapack_complex_float* a,
6939                                lapack_int lda, lapack_int* iseed,
6940                                lapack_complex_float* work );
6941lapack_int LAPACKE_zlaghe_work( int matrix_order, lapack_int n, lapack_int k,
6942                                const double* d, lapack_complex_double* a,
6943                                lapack_int lda, lapack_int* iseed,
6944                                lapack_complex_double* work );
6945
6946lapack_int LAPACKE_slagsy_work( int matrix_order, lapack_int n, lapack_int k,
6947                                const float* d, float* a, lapack_int lda,
6948                                lapack_int* iseed, float* work );
6949lapack_int LAPACKE_dlagsy_work( int matrix_order, lapack_int n, lapack_int k,
6950                                const double* d, double* a, lapack_int lda,
6951                                lapack_int* iseed, double* work );
6952lapack_int LAPACKE_clagsy_work( int matrix_order, lapack_int n, lapack_int k,
6953                                const float* d, lapack_complex_float* a,
6954                                lapack_int lda, lapack_int* iseed,
6955                                lapack_complex_float* work );
6956lapack_int LAPACKE_zlagsy_work( int matrix_order, lapack_int n, lapack_int k,
6957                                const double* d, lapack_complex_double* a,
6958                                lapack_int lda, lapack_int* iseed,
6959                                lapack_complex_double* work );
6960
6961lapack_int LAPACKE_slapmr_work( int matrix_order, lapack_logical forwrd,
6962                                lapack_int m, lapack_int n, float* x,
6963                                lapack_int ldx, lapack_int* k );
6964lapack_int LAPACKE_dlapmr_work( int matrix_order, lapack_logical forwrd,
6965                                lapack_int m, lapack_int n, double* x,
6966                                lapack_int ldx, lapack_int* k );
6967lapack_int LAPACKE_clapmr_work( int matrix_order, lapack_logical forwrd,
6968                                lapack_int m, lapack_int n,
6969                                lapack_complex_float* x, lapack_int ldx,
6970                                lapack_int* k );
6971lapack_int LAPACKE_zlapmr_work( int matrix_order, lapack_logical forwrd,
6972                                lapack_int m, lapack_int n,
6973                                lapack_complex_double* x, lapack_int ldx,
6974                                lapack_int* k );
6975
6976lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
6977                                 float* r );
6978lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
6979                                 double* r );
6980
6981lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
6982                                 float* sn );
6983lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
6984                                 double* sn );
6985
6986float LAPACKE_slapy2_work( float x, float y );
6987double LAPACKE_dlapy2_work( double x, double y );
6988
6989float LAPACKE_slapy3_work( float x, float y, float z );
6990double LAPACKE_dlapy3_work( double x, double y, double z );
6991
6992float LAPACKE_slamch_work( char cmach );
6993double LAPACKE_dlamch_work( char cmach );
6994
6995float LAPACKE_slange_work( int matrix_order, char norm, lapack_int m,
6996                                lapack_int n, const float* a, lapack_int lda,
6997                                float* work );
6998double LAPACKE_dlange_work( int matrix_order, char norm, lapack_int m,
6999                                lapack_int n, const double* a, lapack_int lda,
7000                                double* work );
7001float LAPACKE_clange_work( int matrix_order, char norm, lapack_int m,
7002                                lapack_int n, const lapack_complex_float* a,
7003                                lapack_int lda, float* work );
7004double LAPACKE_zlange_work( int matrix_order, char norm, lapack_int m,
7005                                lapack_int n, const lapack_complex_double* a,
7006                                lapack_int lda, double* work );
7007
7008float LAPACKE_clanhe_work( int matrix_order, char norm, char uplo,
7009                                lapack_int n, const lapack_complex_float* a,
7010                                lapack_int lda, float* work );
7011double LAPACKE_zlanhe_work( int matrix_order, char norm, char uplo,
7012                                lapack_int n, const lapack_complex_double* a,
7013                                lapack_int lda, double* work );
7014
7015float LAPACKE_slansy_work( int matrix_order, char norm, char uplo,
7016                                lapack_int n, const float* a, lapack_int lda,
7017                                float* work );
7018double LAPACKE_dlansy_work( int matrix_order, char norm, char uplo,
7019                                lapack_int n, const double* a, lapack_int lda,
7020                                double* work );
7021float LAPACKE_clansy_work( int matrix_order, char norm, char uplo,
7022                                lapack_int n, const lapack_complex_float* a,
7023                                lapack_int lda, float* work );
7024double LAPACKE_zlansy_work( int matrix_order, char norm, char uplo,
7025                                lapack_int n, const lapack_complex_double* a,
7026                                lapack_int lda, double* work );
7027
7028float LAPACKE_slantr_work( int matrix_order, char norm, char uplo,
7029                                char diag, lapack_int m, lapack_int n, const float* a,
7030                                lapack_int lda, float* work );
7031double LAPACKE_dlantr_work( int matrix_order, char norm, char uplo,
7032                                char diag, lapack_int m, lapack_int n,
7033                                const double* a, lapack_int lda, double* work );
7034float LAPACKE_clantr_work( int matrix_order, char norm, char uplo,
7035                                char diag, lapack_int m, lapack_int n,
7036                                const lapack_complex_float* a, lapack_int lda,
7037                                float* work );
7038double LAPACKE_zlantr_work( int matrix_order, char norm, char uplo,
7039                                char diag, lapack_int m, lapack_int n,
7040                                const lapack_complex_double* a, lapack_int lda,
7041                                double* work );
7042
7043lapack_int LAPACKE_slarfb_work( int matrix_order, char side, char trans,
7044                                char direct, char storev, lapack_int m,
7045                                lapack_int n, lapack_int k, const float* v,
7046                                lapack_int ldv, const float* t, lapack_int ldt,
7047                                float* c, lapack_int ldc, float* work,
7048                                lapack_int ldwork );
7049lapack_int LAPACKE_dlarfb_work( int matrix_order, char side, char trans,
7050                                char direct, char storev, lapack_int m,
7051                                lapack_int n, lapack_int k, const double* v,
7052                                lapack_int ldv, const double* t, lapack_int ldt,
7053                                double* c, lapack_int ldc, double* work,
7054                                lapack_int ldwork );
7055lapack_int LAPACKE_clarfb_work( int matrix_order, char side, char trans,
7056                                char direct, char storev, lapack_int m,
7057                                lapack_int n, lapack_int k,
7058                                const lapack_complex_float* v, lapack_int ldv,
7059                                const lapack_complex_float* t, lapack_int ldt,
7060                                lapack_complex_float* c, lapack_int ldc,
7061                                lapack_complex_float* work, lapack_int ldwork );
7062lapack_int LAPACKE_zlarfb_work( int matrix_order, char side, char trans,
7063                                char direct, char storev, lapack_int m,
7064                                lapack_int n, lapack_int k,
7065                                const lapack_complex_double* v, lapack_int ldv,
7066                                const lapack_complex_double* t, lapack_int ldt,
7067                                lapack_complex_double* c, lapack_int ldc,
7068                                lapack_complex_double* work,
7069                                lapack_int ldwork );
7070
7071lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
7072                                lapack_int incx, float* tau );
7073lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
7074                                lapack_int incx, double* tau );
7075lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
7076                                lapack_complex_float* x, lapack_int incx,
7077                                lapack_complex_float* tau );
7078lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
7079                                lapack_complex_double* x, lapack_int incx,
7080                                lapack_complex_double* tau );
7081
7082lapack_int LAPACKE_slarft_work( int matrix_order, char direct, char storev,
7083                                lapack_int n, lapack_int k, const float* v,
7084                                lapack_int ldv, const float* tau, float* t,
7085                                lapack_int ldt );
7086lapack_int LAPACKE_dlarft_work( int matrix_order, char direct, char storev,
7087                                lapack_int n, lapack_int k, const double* v,
7088                                lapack_int ldv, const double* tau, double* t,
7089                                lapack_int ldt );
7090lapack_int LAPACKE_clarft_work( int matrix_order, char direct, char storev,
7091                                lapack_int n, lapack_int k,
7092                                const lapack_complex_float* v, lapack_int ldv,
7093                                const lapack_complex_float* tau,
7094                                lapack_complex_float* t, lapack_int ldt );
7095lapack_int LAPACKE_zlarft_work( int matrix_order, char direct, char storev,
7096                                lapack_int n, lapack_int k,
7097                                const lapack_complex_double* v, lapack_int ldv,
7098                                const lapack_complex_double* tau,
7099                                lapack_complex_double* t, lapack_int ldt );
7100
7101lapack_int LAPACKE_slarfx_work( int matrix_order, char side, lapack_int m,
7102                                lapack_int n, const float* v, float tau,
7103                                float* c, lapack_int ldc, float* work );
7104lapack_int LAPACKE_dlarfx_work( int matrix_order, char side, lapack_int m,
7105                                lapack_int n, const double* v, double tau,
7106                                double* c, lapack_int ldc, double* work );
7107lapack_int LAPACKE_clarfx_work( int matrix_order, char side, lapack_int m,
7108                                lapack_int n, const lapack_complex_float* v,
7109                                lapack_complex_float tau,
7110                                lapack_complex_float* c, lapack_int ldc,
7111                                lapack_complex_float* work );
7112lapack_int LAPACKE_zlarfx_work( int matrix_order, char side, lapack_int m,
7113                                lapack_int n, const lapack_complex_double* v,
7114                                lapack_complex_double tau,
7115                                lapack_complex_double* c, lapack_int ldc,
7116                                lapack_complex_double* work );
7117
7118lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
7119                                lapack_int n, float* x );
7120lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
7121                                lapack_int n, double* x );
7122lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
7123                                lapack_int n, lapack_complex_float* x );
7124lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
7125                                lapack_int n, lapack_complex_double* x );
7126
7127lapack_int LAPACKE_slaset_work( int matrix_order, char uplo, lapack_int m,
7128                                lapack_int n, float alpha, float beta, float* a,
7129                                lapack_int lda );
7130lapack_int LAPACKE_dlaset_work( int matrix_order, char uplo, lapack_int m,
7131                                lapack_int n, double alpha, double beta,
7132                                double* a, lapack_int lda );
7133lapack_int LAPACKE_claset_work( int matrix_order, char uplo, lapack_int m,
7134                                lapack_int n, lapack_complex_float alpha,
7135                                lapack_complex_float beta,
7136                                lapack_complex_float* a, lapack_int lda );
7137lapack_int LAPACKE_zlaset_work( int matrix_order, char uplo, lapack_int m,
7138                                lapack_int n, lapack_complex_double alpha,
7139                                lapack_complex_double beta,
7140                                lapack_complex_double* a, lapack_int lda );
7141
7142lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
7143lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
7144
7145lapack_int LAPACKE_slaswp_work( int matrix_order, lapack_int n, float* a,
7146                                lapack_int lda, lapack_int k1, lapack_int k2,
7147                                const lapack_int* ipiv, lapack_int incx );
7148lapack_int LAPACKE_dlaswp_work( int matrix_order, lapack_int n, double* a,
7149                                lapack_int lda, lapack_int k1, lapack_int k2,
7150                                const lapack_int* ipiv, lapack_int incx );
7151lapack_int LAPACKE_claswp_work( int matrix_order, lapack_int n,
7152                                lapack_complex_float* a, lapack_int lda,
7153                                lapack_int k1, lapack_int k2,
7154                                const lapack_int* ipiv, lapack_int incx );
7155lapack_int LAPACKE_zlaswp_work( int matrix_order, lapack_int n,
7156                                lapack_complex_double* a, lapack_int lda,
7157                                lapack_int k1, lapack_int k2,
7158                                const lapack_int* ipiv, lapack_int incx );
7159
7160lapack_int LAPACKE_slatms_work( int matrix_order, lapack_int m, lapack_int n,
7161                                char dist, lapack_int* iseed, char sym,
7162                                float* d, lapack_int mode, float cond,
7163                                float dmax, lapack_int kl, lapack_int ku,
7164                                char pack, float* a, lapack_int lda,
7165                                float* work );
7166lapack_int LAPACKE_dlatms_work( int matrix_order, lapack_int m, lapack_int n,
7167                                char dist, lapack_int* iseed, char sym,
7168                                double* d, lapack_int mode, double cond,
7169                                double dmax, lapack_int kl, lapack_int ku,
7170                                char pack, double* a, lapack_int lda,
7171                                double* work );
7172lapack_int LAPACKE_clatms_work( int matrix_order, lapack_int m, lapack_int n,
7173                                char dist, lapack_int* iseed, char sym,
7174                                float* d, lapack_int mode, float cond,
7175                                float dmax, lapack_int kl, lapack_int ku,
7176                                char pack, lapack_complex_float* a,
7177                                lapack_int lda, lapack_complex_float* work );
7178lapack_int LAPACKE_zlatms_work( int matrix_order, lapack_int m, lapack_int n,
7179                                char dist, lapack_int* iseed, char sym,
7180                                double* d, lapack_int mode, double cond,
7181                                double dmax, lapack_int kl, lapack_int ku,
7182                                char pack, lapack_complex_double* a,
7183                                lapack_int lda, lapack_complex_double* work );
7184
7185lapack_int LAPACKE_slauum_work( int matrix_order, char uplo, lapack_int n,
7186                                float* a, lapack_int lda );
7187lapack_int LAPACKE_dlauum_work( int matrix_order, char uplo, lapack_int n,
7188                                double* a, lapack_int lda );
7189lapack_int LAPACKE_clauum_work( int matrix_order, char uplo, lapack_int n,
7190                                lapack_complex_float* a, lapack_int lda );
7191lapack_int LAPACKE_zlauum_work( int matrix_order, char uplo, lapack_int n,
7192                                lapack_complex_double* a, lapack_int lda );
7193
7194lapack_int LAPACKE_sopgtr_work( int matrix_order, char uplo, lapack_int n,
7195                                const float* ap, const float* tau, float* q,
7196                                lapack_int ldq, float* work );
7197lapack_int LAPACKE_dopgtr_work( int matrix_order, char uplo, lapack_int n,
7198                                const double* ap, const double* tau, double* q,
7199                                lapack_int ldq, double* work );
7200
7201lapack_int LAPACKE_sopmtr_work( int matrix_order, char side, char uplo,
7202                                char trans, lapack_int m, lapack_int n,
7203                                const float* ap, const float* tau, float* c,
7204                                lapack_int ldc, float* work );
7205lapack_int LAPACKE_dopmtr_work( int matrix_order, char side, char uplo,
7206                                char trans, lapack_int m, lapack_int n,
7207                                const double* ap, const double* tau, double* c,
7208                                lapack_int ldc, double* work );
7209
7210lapack_int LAPACKE_sorgbr_work( int matrix_order, char vect, lapack_int m,
7211                                lapack_int n, lapack_int k, float* a,
7212                                lapack_int lda, const float* tau, float* work,
7213                                lapack_int lwork );
7214lapack_int LAPACKE_dorgbr_work( int matrix_order, char vect, lapack_int m,
7215                                lapack_int n, lapack_int k, double* a,
7216                                lapack_int lda, const double* tau, double* work,
7217                                lapack_int lwork );
7218
7219lapack_int LAPACKE_sorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
7220                                lapack_int ihi, float* a, lapack_int lda,
7221                                const float* tau, float* work,
7222                                lapack_int lwork );
7223lapack_int LAPACKE_dorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
7224                                lapack_int ihi, double* a, lapack_int lda,
7225                                const double* tau, double* work,
7226                                lapack_int lwork );
7227
7228lapack_int LAPACKE_sorglq_work( int matrix_order, lapack_int m, lapack_int n,
7229                                lapack_int k, float* a, lapack_int lda,
7230                                const float* tau, float* work,
7231                                lapack_int lwork );
7232lapack_int LAPACKE_dorglq_work( int matrix_order, lapack_int m, lapack_int n,
7233                                lapack_int k, double* a, lapack_int lda,
7234                                const double* tau, double* work,
7235                                lapack_int lwork );
7236
7237lapack_int LAPACKE_sorgql_work( int matrix_order, lapack_int m, lapack_int n,
7238                                lapack_int k, float* a, lapack_int lda,
7239                                const float* tau, float* work,
7240                                lapack_int lwork );
7241lapack_int LAPACKE_dorgql_work( int matrix_order, lapack_int m, lapack_int n,
7242                                lapack_int k, double* a, lapack_int lda,
7243                                const double* tau, double* work,
7244                                lapack_int lwork );
7245
7246lapack_int LAPACKE_sorgqr_work( int matrix_order, lapack_int m, lapack_int n,
7247                                lapack_int k, float* a, lapack_int lda,
7248                                const float* tau, float* work,
7249                                lapack_int lwork );
7250lapack_int LAPACKE_dorgqr_work( int matrix_order, lapack_int m, lapack_int n,
7251                                lapack_int k, double* a, lapack_int lda,
7252                                const double* tau, double* work,
7253                                lapack_int lwork );
7254
7255lapack_int LAPACKE_sorgrq_work( int matrix_order, lapack_int m, lapack_int n,
7256                                lapack_int k, float* a, lapack_int lda,
7257                                const float* tau, float* work,
7258                                lapack_int lwork );
7259lapack_int LAPACKE_dorgrq_work( int matrix_order, lapack_int m, lapack_int n,
7260                                lapack_int k, double* a, lapack_int lda,
7261                                const double* tau, double* work,
7262                                lapack_int lwork );
7263
7264lapack_int LAPACKE_sorgtr_work( int matrix_order, char uplo, lapack_int n,
7265                                float* a, lapack_int lda, const float* tau,
7266                                float* work, lapack_int lwork );
7267lapack_int LAPACKE_dorgtr_work( int matrix_order, char uplo, lapack_int n,
7268                                double* a, lapack_int lda, const double* tau,
7269                                double* work, lapack_int lwork );
7270
7271lapack_int LAPACKE_sormbr_work( int matrix_order, char vect, char side,
7272                                char trans, lapack_int m, lapack_int n,
7273                                lapack_int k, const float* a, lapack_int lda,
7274                                const float* tau, float* c, lapack_int ldc,
7275                                float* work, lapack_int lwork );
7276lapack_int LAPACKE_dormbr_work( int matrix_order, char vect, char side,
7277                                char trans, lapack_int m, lapack_int n,
7278                                lapack_int k, const double* a, lapack_int lda,
7279                                const double* tau, double* c, lapack_int ldc,
7280                                double* work, lapack_int lwork );
7281
7282lapack_int LAPACKE_sormhr_work( int matrix_order, char side, char trans,
7283                                lapack_int m, lapack_int n, lapack_int ilo,
7284                                lapack_int ihi, const float* a, lapack_int lda,
7285                                const float* tau, float* c, lapack_int ldc,
7286                                float* work, lapack_int lwork );
7287lapack_int LAPACKE_dormhr_work( int matrix_order, char side, char trans,
7288                                lapack_int m, lapack_int n, lapack_int ilo,
7289                                lapack_int ihi, const double* a, lapack_int lda,
7290                                const double* tau, double* c, lapack_int ldc,
7291                                double* work, lapack_int lwork );
7292
7293lapack_int LAPACKE_sormlq_work( int matrix_order, char side, char trans,
7294                                lapack_int m, lapack_int n, lapack_int k,
7295                                const float* a, lapack_int lda,
7296                                const float* tau, float* c, lapack_int ldc,
7297                                float* work, lapack_int lwork );
7298lapack_int LAPACKE_dormlq_work( int matrix_order, char side, char trans,
7299                                lapack_int m, lapack_int n, lapack_int k,
7300                                const double* a, lapack_int lda,
7301                                const double* tau, double* c, lapack_int ldc,
7302                                double* work, lapack_int lwork );
7303
7304lapack_int LAPACKE_sormql_work( int matrix_order, char side, char trans,
7305                                lapack_int m, lapack_int n, lapack_int k,
7306                                const float* a, lapack_int lda,
7307                                const float* tau, float* c, lapack_int ldc,
7308                                float* work, lapack_int lwork );
7309lapack_int LAPACKE_dormql_work( int matrix_order, char side, char trans,
7310                                lapack_int m, lapack_int n, lapack_int k,
7311                                const double* a, lapack_int lda,
7312                                const double* tau, double* c, lapack_int ldc,
7313                                double* work, lapack_int lwork );
7314
7315lapack_int LAPACKE_sormqr_work( int matrix_order, char side, char trans,
7316                                lapack_int m, lapack_int n, lapack_int k,
7317                                const float* a, lapack_int lda,
7318                                const float* tau, float* c, lapack_int ldc,
7319                                float* work, lapack_int lwork );
7320lapack_int LAPACKE_dormqr_work( int matrix_order, char side, char trans,
7321                                lapack_int m, lapack_int n, lapack_int k,
7322                                const double* a, lapack_int lda,
7323                                const double* tau, double* c, lapack_int ldc,
7324                                double* work, lapack_int lwork );
7325
7326lapack_int LAPACKE_sormrq_work( int matrix_order, char side, char trans,
7327                                lapack_int m, lapack_int n, lapack_int k,
7328                                const float* a, lapack_int lda,
7329                                const float* tau, float* c, lapack_int ldc,
7330                                float* work, lapack_int lwork );
7331lapack_int LAPACKE_dormrq_work( int matrix_order, char side, char trans,
7332                                lapack_int m, lapack_int n, lapack_int k,
7333                                const double* a, lapack_int lda,
7334                                const double* tau, double* c, lapack_int ldc,
7335                                double* work, lapack_int lwork );
7336
7337lapack_int LAPACKE_sormrz_work( int matrix_order, char side, char trans,
7338                                lapack_int m, lapack_int n, lapack_int k,
7339                                lapack_int l, const float* a, lapack_int lda,
7340                                const float* tau, float* c, lapack_int ldc,
7341                                float* work, lapack_int lwork );
7342lapack_int LAPACKE_dormrz_work( int matrix_order, char side, char trans,
7343                                lapack_int m, lapack_int n, lapack_int k,
7344                                lapack_int l, const double* a, lapack_int lda,
7345                                const double* tau, double* c, lapack_int ldc,
7346                                double* work, lapack_int lwork );
7347
7348lapack_int LAPACKE_sormtr_work( int matrix_order, char side, char uplo,
7349                                char trans, lapack_int m, lapack_int n,
7350                                const float* a, lapack_int lda,
7351                                const float* tau, float* c, lapack_int ldc,
7352                                float* work, lapack_int lwork );
7353lapack_int LAPACKE_dormtr_work( int matrix_order, char side, char uplo,
7354                                char trans, lapack_int m, lapack_int n,
7355                                const double* a, lapack_int lda,
7356                                const double* tau, double* c, lapack_int ldc,
7357                                double* work, lapack_int lwork );
7358
7359lapack_int LAPACKE_spbcon_work( int matrix_order, char uplo, lapack_int n,
7360                                lapack_int kd, const float* ab, lapack_int ldab,
7361                                float anorm, float* rcond, float* work,
7362                                lapack_int* iwork );
7363lapack_int LAPACKE_dpbcon_work( int matrix_order, char uplo, lapack_int n,
7364                                lapack_int kd, const double* ab,
7365                                lapack_int ldab, double anorm, double* rcond,
7366                                double* work, lapack_int* iwork );
7367lapack_int LAPACKE_cpbcon_work( int matrix_order, char uplo, lapack_int n,
7368                                lapack_int kd, const lapack_complex_float* ab,
7369                                lapack_int ldab, float anorm, float* rcond,
7370                                lapack_complex_float* work, float* rwork );
7371lapack_int LAPACKE_zpbcon_work( int matrix_order, char uplo, lapack_int n,
7372                                lapack_int kd, const lapack_complex_double* ab,
7373                                lapack_int ldab, double anorm, double* rcond,
7374                                lapack_complex_double* work, double* rwork );
7375
7376lapack_int LAPACKE_spbequ_work( int matrix_order, char uplo, lapack_int n,
7377                                lapack_int kd, const float* ab, lapack_int ldab,
7378                                float* s, float* scond, float* amax );
7379lapack_int LAPACKE_dpbequ_work( int matrix_order, char uplo, lapack_int n,
7380                                lapack_int kd, const double* ab,
7381                                lapack_int ldab, double* s, double* scond,
7382                                double* amax );
7383lapack_int LAPACKE_cpbequ_work( int matrix_order, char uplo, lapack_int n,
7384                                lapack_int kd, const lapack_complex_float* ab,
7385                                lapack_int ldab, float* s, float* scond,
7386                                float* amax );
7387lapack_int LAPACKE_zpbequ_work( int matrix_order, char uplo, lapack_int n,
7388                                lapack_int kd, const lapack_complex_double* ab,
7389                                lapack_int ldab, double* s, double* scond,
7390                                double* amax );
7391
7392lapack_int LAPACKE_spbrfs_work( int matrix_order, char uplo, lapack_int n,
7393                                lapack_int kd, lapack_int nrhs, const float* ab,
7394                                lapack_int ldab, const float* afb,
7395                                lapack_int ldafb, const float* b,
7396                                lapack_int ldb, float* x, lapack_int ldx,
7397                                float* ferr, float* berr, float* work,
7398                                lapack_int* iwork );
7399lapack_int LAPACKE_dpbrfs_work( int matrix_order, char uplo, lapack_int n,
7400                                lapack_int kd, lapack_int nrhs,
7401                                const double* ab, lapack_int ldab,
7402                                const double* afb, lapack_int ldafb,
7403                                const double* b, lapack_int ldb, double* x,
7404                                lapack_int ldx, double* ferr, double* berr,
7405                                double* work, lapack_int* iwork );
7406lapack_int LAPACKE_cpbrfs_work( int matrix_order, char uplo, lapack_int n,
7407                                lapack_int kd, lapack_int nrhs,
7408                                const lapack_complex_float* ab, lapack_int ldab,
7409                                const lapack_complex_float* afb,
7410                                lapack_int ldafb, const lapack_complex_float* b,
7411                                lapack_int ldb, lapack_complex_float* x,
7412                                lapack_int ldx, float* ferr, float* berr,
7413                                lapack_complex_float* work, float* rwork );
7414lapack_int LAPACKE_zpbrfs_work( int matrix_order, char uplo, lapack_int n,
7415                                lapack_int kd, lapack_int nrhs,
7416                                const lapack_complex_double* ab,
7417                                lapack_int ldab,
7418                                const lapack_complex_double* afb,
7419                                lapack_int ldafb,
7420                                const lapack_complex_double* b, lapack_int ldb,
7421                                lapack_complex_double* x, lapack_int ldx,
7422                                double* ferr, double* berr,
7423                                lapack_complex_double* work, double* rwork );
7424
7425lapack_int LAPACKE_spbstf_work( int matrix_order, char uplo, lapack_int n,
7426                                lapack_int kb, float* bb, lapack_int ldbb );
7427lapack_int LAPACKE_dpbstf_work( int matrix_order, char uplo, lapack_int n,
7428                                lapack_int kb, double* bb, lapack_int ldbb );
7429lapack_int LAPACKE_cpbstf_work( int matrix_order, char uplo, lapack_int n,
7430                                lapack_int kb, lapack_complex_float* bb,
7431                                lapack_int ldbb );
7432lapack_int LAPACKE_zpbstf_work( int matrix_order, char uplo, lapack_int n,
7433                                lapack_int kb, lapack_complex_double* bb,
7434                                lapack_int ldbb );
7435
7436lapack_int LAPACKE_spbsv_work( int matrix_order, char uplo, lapack_int n,
7437                               lapack_int kd, lapack_int nrhs, float* ab,
7438                               lapack_int ldab, float* b, lapack_int ldb );
7439lapack_int LAPACKE_dpbsv_work( int matrix_order, char uplo, lapack_int n,
7440                               lapack_int kd, lapack_int nrhs, double* ab,
7441                               lapack_int ldab, double* b, lapack_int ldb );
7442lapack_int LAPACKE_cpbsv_work( int matrix_order, char uplo, lapack_int n,
7443                               lapack_int kd, lapack_int nrhs,
7444                               lapack_complex_float* ab, lapack_int ldab,
7445                               lapack_complex_float* b, lapack_int ldb );
7446lapack_int LAPACKE_zpbsv_work( int matrix_order, char uplo, lapack_int n,
7447                               lapack_int kd, lapack_int nrhs,
7448                               lapack_complex_double* ab, lapack_int ldab,
7449                               lapack_complex_double* b, lapack_int ldb );
7450
7451lapack_int LAPACKE_spbsvx_work( int matrix_order, char fact, char uplo,
7452                                lapack_int n, lapack_int kd, lapack_int nrhs,
7453                                float* ab, lapack_int ldab, float* afb,
7454                                lapack_int ldafb, char* equed, float* s,
7455                                float* b, lapack_int ldb, float* x,
7456                                lapack_int ldx, float* rcond, float* ferr,
7457                                float* berr, float* work, lapack_int* iwork );
7458lapack_int LAPACKE_dpbsvx_work( int matrix_order, char fact, char uplo,
7459                                lapack_int n, lapack_int kd, lapack_int nrhs,
7460                                double* ab, lapack_int ldab, double* afb,
7461                                lapack_int ldafb, char* equed, double* s,
7462                                double* b, lapack_int ldb, double* x,
7463                                lapack_int ldx, double* rcond, double* ferr,
7464                                double* berr, double* work, lapack_int* iwork );
7465lapack_int LAPACKE_cpbsvx_work( int matrix_order, char fact, char uplo,
7466                                lapack_int n, lapack_int kd, lapack_int nrhs,
7467                                lapack_complex_float* ab, lapack_int ldab,
7468                                lapack_complex_float* afb, lapack_int ldafb,
7469                                char* equed, float* s, lapack_complex_float* b,
7470                                lapack_int ldb, lapack_complex_float* x,
7471                                lapack_int ldx, float* rcond, float* ferr,
7472                                float* berr, lapack_complex_float* work,
7473                                float* rwork );
7474lapack_int LAPACKE_zpbsvx_work( int matrix_order, char fact, char uplo,
7475                                lapack_int n, lapack_int kd, lapack_int nrhs,
7476                                lapack_complex_double* ab, lapack_int ldab,
7477                                lapack_complex_double* afb, lapack_int ldafb,
7478                                char* equed, double* s,
7479                                lapack_complex_double* b, lapack_int ldb,
7480                                lapack_complex_double* x, lapack_int ldx,
7481                                double* rcond, double* ferr, double* berr,
7482                                lapack_complex_double* work, double* rwork );
7483
7484lapack_int LAPACKE_spbtrf_work( int matrix_order, char uplo, lapack_int n,
7485                                lapack_int kd, float* ab, lapack_int ldab );
7486lapack_int LAPACKE_dpbtrf_work( int matrix_order, char uplo, lapack_int n,
7487                                lapack_int kd, double* ab, lapack_int ldab );
7488lapack_int LAPACKE_cpbtrf_work( int matrix_order, char uplo, lapack_int n,
7489                                lapack_int kd, lapack_complex_float* ab,
7490                                lapack_int ldab );
7491lapack_int LAPACKE_zpbtrf_work( int matrix_order, char uplo, lapack_int n,
7492                                lapack_int kd, lapack_complex_double* ab,
7493                                lapack_int ldab );
7494
7495lapack_int LAPACKE_spbtrs_work( int matrix_order, char uplo, lapack_int n,
7496                                lapack_int kd, lapack_int nrhs, const float* ab,
7497                                lapack_int ldab, float* b, lapack_int ldb );
7498lapack_int LAPACKE_dpbtrs_work( int matrix_order, char uplo, lapack_int n,
7499                                lapack_int kd, lapack_int nrhs,
7500                                const double* ab, lapack_int ldab, double* b,
7501                                lapack_int ldb );
7502lapack_int LAPACKE_cpbtrs_work( int matrix_order, char uplo, lapack_int n,
7503                                lapack_int kd, lapack_int nrhs,
7504                                const lapack_complex_float* ab, lapack_int ldab,
7505                                lapack_complex_float* b, lapack_int ldb );
7506lapack_int LAPACKE_zpbtrs_work( int matrix_order, char uplo, lapack_int n,
7507                                lapack_int kd, lapack_int nrhs,
7508                                const lapack_complex_double* ab,
7509                                lapack_int ldab, lapack_complex_double* b,
7510                                lapack_int ldb );
7511
7512lapack_int LAPACKE_spftrf_work( int matrix_order, char transr, char uplo,
7513                                lapack_int n, float* a );
7514lapack_int LAPACKE_dpftrf_work( int matrix_order, char transr, char uplo,
7515                                lapack_int n, double* a );
7516lapack_int LAPACKE_cpftrf_work( int matrix_order, char transr, char uplo,
7517                                lapack_int n, lapack_complex_float* a );
7518lapack_int LAPACKE_zpftrf_work( int matrix_order, char transr, char uplo,
7519                                lapack_int n, lapack_complex_double* a );
7520
7521lapack_int LAPACKE_spftri_work( int matrix_order, char transr, char uplo,
7522                                lapack_int n, float* a );
7523lapack_int LAPACKE_dpftri_work( int matrix_order, char transr, char uplo,
7524                                lapack_int n, double* a );
7525lapack_int LAPACKE_cpftri_work( int matrix_order, char transr, char uplo,
7526                                lapack_int n, lapack_complex_float* a );
7527lapack_int LAPACKE_zpftri_work( int matrix_order, char transr, char uplo,
7528                                lapack_int n, lapack_complex_double* a );
7529
7530lapack_int LAPACKE_spftrs_work( int matrix_order, char transr, char uplo,
7531                                lapack_int n, lapack_int nrhs, const float* a,
7532                                float* b, lapack_int ldb );
7533lapack_int LAPACKE_dpftrs_work( int matrix_order, char transr, char uplo,
7534                                lapack_int n, lapack_int nrhs, const double* a,
7535                                double* b, lapack_int ldb );
7536lapack_int LAPACKE_cpftrs_work( int matrix_order, char transr, char uplo,
7537                                lapack_int n, lapack_int nrhs,
7538                                const lapack_complex_float* a,
7539                                lapack_complex_float* b, lapack_int ldb );
7540lapack_int LAPACKE_zpftrs_work( int matrix_order, char transr, char uplo,
7541                                lapack_int n, lapack_int nrhs,
7542                                const lapack_complex_double* a,
7543                                lapack_complex_double* b, lapack_int ldb );
7544
7545lapack_int LAPACKE_spocon_work( int matrix_order, char uplo, lapack_int n,
7546                                const float* a, lapack_int lda, float anorm,
7547                                float* rcond, float* work, lapack_int* iwork );
7548lapack_int LAPACKE_dpocon_work( int matrix_order, char uplo, lapack_int n,
7549                                const double* a, lapack_int lda, double anorm,
7550                                double* rcond, double* work,
7551                                lapack_int* iwork );
7552lapack_int LAPACKE_cpocon_work( int matrix_order, char uplo, lapack_int n,
7553                                const lapack_complex_float* a, lapack_int lda,
7554                                float anorm, float* rcond,
7555                                lapack_complex_float* work, float* rwork );
7556lapack_int LAPACKE_zpocon_work( int matrix_order, char uplo, lapack_int n,
7557                                const lapack_complex_double* a, lapack_int lda,
7558                                double anorm, double* rcond,
7559                                lapack_complex_double* work, double* rwork );
7560
7561lapack_int LAPACKE_spoequ_work( int matrix_order, lapack_int n, const float* a,
7562                                lapack_int lda, float* s, float* scond,
7563                                float* amax );
7564lapack_int LAPACKE_dpoequ_work( int matrix_order, lapack_int n, const double* a,
7565                                lapack_int lda, double* s, double* scond,
7566                                double* amax );
7567lapack_int LAPACKE_cpoequ_work( int matrix_order, lapack_int n,
7568                                const lapack_complex_float* a, lapack_int lda,
7569                                float* s, float* scond, float* amax );
7570lapack_int LAPACKE_zpoequ_work( int matrix_order, lapack_int n,
7571                                const lapack_complex_double* a, lapack_int lda,
7572                                double* s, double* scond, double* amax );
7573
7574lapack_int LAPACKE_spoequb_work( int matrix_order, lapack_int n, const float* a,
7575                                 lapack_int lda, float* s, float* scond,
7576                                 float* amax );
7577lapack_int LAPACKE_dpoequb_work( int matrix_order, lapack_int n,
7578                                 const double* a, lapack_int lda, double* s,
7579                                 double* scond, double* amax );
7580lapack_int LAPACKE_cpoequb_work( int matrix_order, lapack_int n,
7581                                 const lapack_complex_float* a, lapack_int lda,
7582                                 float* s, float* scond, float* amax );
7583lapack_int LAPACKE_zpoequb_work( int matrix_order, lapack_int n,
7584                                 const lapack_complex_double* a, lapack_int lda,
7585                                 double* s, double* scond, double* amax );
7586
7587lapack_int LAPACKE_sporfs_work( int matrix_order, char uplo, lapack_int n,
7588                                lapack_int nrhs, const float* a, lapack_int lda,
7589                                const float* af, lapack_int ldaf,
7590                                const float* b, lapack_int ldb, float* x,
7591                                lapack_int ldx, float* ferr, float* berr,
7592                                float* work, lapack_int* iwork );
7593lapack_int LAPACKE_dporfs_work( int matrix_order, char uplo, lapack_int n,
7594                                lapack_int nrhs, const double* a,
7595                                lapack_int lda, const double* af,
7596                                lapack_int ldaf, const double* b,
7597                                lapack_int ldb, double* x, lapack_int ldx,
7598                                double* ferr, double* berr, double* work,
7599                                lapack_int* iwork );
7600lapack_int LAPACKE_cporfs_work( int matrix_order, char uplo, lapack_int n,
7601                                lapack_int nrhs, const lapack_complex_float* a,
7602                                lapack_int lda, const lapack_complex_float* af,
7603                                lapack_int ldaf, const lapack_complex_float* b,
7604                                lapack_int ldb, lapack_complex_float* x,
7605                                lapack_int ldx, float* ferr, float* berr,
7606                                lapack_complex_float* work, float* rwork );
7607lapack_int LAPACKE_zporfs_work( int matrix_order, char uplo, lapack_int n,
7608                                lapack_int nrhs, const lapack_complex_double* a,
7609                                lapack_int lda, const lapack_complex_double* af,
7610                                lapack_int ldaf, const lapack_complex_double* b,
7611                                lapack_int ldb, lapack_complex_double* x,
7612                                lapack_int ldx, double* ferr, double* berr,
7613                                lapack_complex_double* work, double* rwork );
7614
7615lapack_int LAPACKE_sporfsx_work( int matrix_order, char uplo, char equed,
7616                                 lapack_int n, lapack_int nrhs, const float* a,
7617                                 lapack_int lda, const float* af,
7618                                 lapack_int ldaf, const float* s,
7619                                 const float* b, lapack_int ldb, float* x,
7620                                 lapack_int ldx, float* rcond, float* berr,
7621                                 lapack_int n_err_bnds, float* err_bnds_norm,
7622                                 float* err_bnds_comp, lapack_int nparams,
7623                                 float* params, float* work,
7624                                 lapack_int* iwork );
7625lapack_int LAPACKE_dporfsx_work( int matrix_order, char uplo, char equed,
7626                                 lapack_int n, lapack_int nrhs, const double* a,
7627                                 lapack_int lda, const double* af,
7628                                 lapack_int ldaf, const double* s,
7629                                 const double* b, lapack_int ldb, double* x,
7630                                 lapack_int ldx, double* rcond, double* berr,
7631                                 lapack_int n_err_bnds, double* err_bnds_norm,
7632                                 double* err_bnds_comp, lapack_int nparams,
7633                                 double* params, double* work,
7634                                 lapack_int* iwork );
7635lapack_int LAPACKE_cporfsx_work( int matrix_order, char uplo, char equed,
7636                                 lapack_int n, lapack_int nrhs,
7637                                 const lapack_complex_float* a, lapack_int lda,
7638                                 const lapack_complex_float* af,
7639                                 lapack_int ldaf, const float* s,
7640                                 const lapack_complex_float* b, lapack_int ldb,
7641                                 lapack_complex_float* x, lapack_int ldx,
7642                                 float* rcond, float* berr,
7643                                 lapack_int n_err_bnds, float* err_bnds_norm,
7644                                 float* err_bnds_comp, lapack_int nparams,
7645                                 float* params, lapack_complex_float* work,
7646                                 float* rwork );
7647lapack_int LAPACKE_zporfsx_work( int matrix_order, char uplo, char equed,
7648                                 lapack_int n, lapack_int nrhs,
7649                                 const lapack_complex_double* a, lapack_int lda,
7650                                 const lapack_complex_double* af,
7651                                 lapack_int ldaf, const double* s,
7652                                 const lapack_complex_double* b, lapack_int ldb,
7653                                 lapack_complex_double* x, lapack_int ldx,
7654                                 double* rcond, double* berr,
7655                                 lapack_int n_err_bnds, double* err_bnds_norm,
7656                                 double* err_bnds_comp, lapack_int nparams,
7657                                 double* params, lapack_complex_double* work,
7658                                 double* rwork );
7659
7660lapack_int LAPACKE_sposv_work( int matrix_order, char uplo, lapack_int n,
7661                               lapack_int nrhs, float* a, lapack_int lda,
7662                               float* b, lapack_int ldb );
7663lapack_int LAPACKE_dposv_work( int matrix_order, char uplo, lapack_int n,
7664                               lapack_int nrhs, double* a, lapack_int lda,
7665                               double* b, lapack_int ldb );
7666lapack_int LAPACKE_cposv_work( int matrix_order, char uplo, lapack_int n,
7667                               lapack_int nrhs, lapack_complex_float* a,
7668                               lapack_int lda, lapack_complex_float* b,
7669                               lapack_int ldb );
7670lapack_int LAPACKE_zposv_work( int matrix_order, char uplo, lapack_int n,
7671                               lapack_int nrhs, lapack_complex_double* a,
7672                               lapack_int lda, lapack_complex_double* b,
7673                               lapack_int ldb );
7674lapack_int LAPACKE_dsposv_work( int matrix_order, char uplo, lapack_int n,
7675                                lapack_int nrhs, double* a, lapack_int lda,
7676                                double* b, lapack_int ldb, double* x,
7677                                lapack_int ldx, double* work, float* swork,
7678                                lapack_int* iter );
7679lapack_int LAPACKE_zcposv_work( int matrix_order, char uplo, lapack_int n,
7680                                lapack_int nrhs, lapack_complex_double* a,
7681                                lapack_int lda, lapack_complex_double* b,
7682                                lapack_int ldb, lapack_complex_double* x,
7683                                lapack_int ldx, lapack_complex_double* work,
7684                                lapack_complex_float* swork, double* rwork,
7685                                lapack_int* iter );
7686
7687lapack_int LAPACKE_sposvx_work( int matrix_order, char fact, char uplo,
7688                                lapack_int n, lapack_int nrhs, float* a,
7689                                lapack_int lda, float* af, lapack_int ldaf,
7690                                char* equed, float* s, float* b, lapack_int ldb,
7691                                float* x, lapack_int ldx, float* rcond,
7692                                float* ferr, float* berr, float* work,
7693                                lapack_int* iwork );
7694lapack_int LAPACKE_dposvx_work( int matrix_order, char fact, char uplo,
7695                                lapack_int n, lapack_int nrhs, double* a,
7696                                lapack_int lda, double* af, lapack_int ldaf,
7697                                char* equed, double* s, double* b,
7698                                lapack_int ldb, double* x, lapack_int ldx,
7699                                double* rcond, double* ferr, double* berr,
7700                                double* work, lapack_int* iwork );
7701lapack_int LAPACKE_cposvx_work( int matrix_order, char fact, char uplo,
7702                                lapack_int n, lapack_int nrhs,
7703                                lapack_complex_float* a, lapack_int lda,
7704                                lapack_complex_float* af, lapack_int ldaf,
7705                                char* equed, float* s, lapack_complex_float* b,
7706                                lapack_int ldb, lapack_complex_float* x,
7707                                lapack_int ldx, float* rcond, float* ferr,
7708                                float* berr, lapack_complex_float* work,
7709                                float* rwork );
7710lapack_int LAPACKE_zposvx_work( int matrix_order, char fact, char uplo,
7711                                lapack_int n, lapack_int nrhs,
7712                                lapack_complex_double* a, lapack_int lda,
7713                                lapack_complex_double* af, lapack_int ldaf,
7714                                char* equed, double* s,
7715                                lapack_complex_double* b, lapack_int ldb,
7716                                lapack_complex_double* x, lapack_int ldx,
7717                                double* rcond, double* ferr, double* berr,
7718                                lapack_complex_double* work, double* rwork );
7719
7720lapack_int LAPACKE_sposvxx_work( int matrix_order, char fact, char uplo,
7721                                 lapack_int n, lapack_int nrhs, float* a,
7722                                 lapack_int lda, float* af, lapack_int ldaf,
7723                                 char* equed, float* s, float* b,
7724                                 lapack_int ldb, float* x, lapack_int ldx,
7725                                 float* rcond, float* rpvgrw, float* berr,
7726                                 lapack_int n_err_bnds, float* err_bnds_norm,
7727                                 float* err_bnds_comp, lapack_int nparams,
7728                                 float* params, float* work,
7729                                 lapack_int* iwork );
7730lapack_int LAPACKE_dposvxx_work( int matrix_order, char fact, char uplo,
7731                                 lapack_int n, lapack_int nrhs, double* a,
7732                                 lapack_int lda, double* af, lapack_int ldaf,
7733                                 char* equed, double* s, double* b,
7734                                 lapack_int ldb, double* x, lapack_int ldx,
7735                                 double* rcond, double* rpvgrw, double* berr,
7736                                 lapack_int n_err_bnds, double* err_bnds_norm,
7737                                 double* err_bnds_comp, lapack_int nparams,
7738                                 double* params, double* work,
7739                                 lapack_int* iwork );
7740lapack_int LAPACKE_cposvxx_work( int matrix_order, char fact, char uplo,
7741                                 lapack_int n, lapack_int nrhs,
7742                                 lapack_complex_float* a, lapack_int lda,
7743                                 lapack_complex_float* af, lapack_int ldaf,
7744                                 char* equed, float* s, lapack_complex_float* b,
7745                                 lapack_int ldb, lapack_complex_float* x,
7746                                 lapack_int ldx, float* rcond, float* rpvgrw,
7747                                 float* berr, lapack_int n_err_bnds,
7748                                 float* err_bnds_norm, float* err_bnds_comp,
7749                                 lapack_int nparams, float* params,
7750                                 lapack_complex_float* work, float* rwork );
7751lapack_int LAPACKE_zposvxx_work( int matrix_order, char fact, char uplo,
7752                                 lapack_int n, lapack_int nrhs,
7753                                 lapack_complex_double* a, lapack_int lda,
7754                                 lapack_complex_double* af, lapack_int ldaf,
7755                                 char* equed, double* s,
7756                                 lapack_complex_double* b, lapack_int ldb,
7757                                 lapack_complex_double* x, lapack_int ldx,
7758                                 double* rcond, double* rpvgrw, double* berr,
7759                                 lapack_int n_err_bnds, double* err_bnds_norm,
7760                                 double* err_bnds_comp, lapack_int nparams,
7761                                 double* params, lapack_complex_double* work,
7762                                 double* rwork );
7763
7764lapack_int LAPACKE_spotrf_work( int matrix_order, char uplo, lapack_int n,
7765                                float* a, lapack_int lda );
7766lapack_int LAPACKE_dpotrf_work( int matrix_order, char uplo, lapack_int n,
7767                                double* a, lapack_int lda );
7768lapack_int LAPACKE_cpotrf_work( int matrix_order, char uplo, lapack_int n,
7769                                lapack_complex_float* a, lapack_int lda );
7770lapack_int LAPACKE_zpotrf_work( int matrix_order, char uplo, lapack_int n,
7771                                lapack_complex_double* a, lapack_int lda );
7772
7773lapack_int LAPACKE_spotri_work( int matrix_order, char uplo, lapack_int n,
7774                                float* a, lapack_int lda );
7775lapack_int LAPACKE_dpotri_work( int matrix_order, char uplo, lapack_int n,
7776                                double* a, lapack_int lda );
7777lapack_int LAPACKE_cpotri_work( int matrix_order, char uplo, lapack_int n,
7778                                lapack_complex_float* a, lapack_int lda );
7779lapack_int LAPACKE_zpotri_work( int matrix_order, char uplo, lapack_int n,
7780                                lapack_complex_double* a, lapack_int lda );
7781
7782lapack_int LAPACKE_spotrs_work( int matrix_order, char uplo, lapack_int n,
7783                                lapack_int nrhs, const float* a, lapack_int lda,
7784                                float* b, lapack_int ldb );
7785lapack_int LAPACKE_dpotrs_work( int matrix_order, char uplo, lapack_int n,
7786                                lapack_int nrhs, const double* a,
7787                                lapack_int lda, double* b, lapack_int ldb );
7788lapack_int LAPACKE_cpotrs_work( int matrix_order, char uplo, lapack_int n,
7789                                lapack_int nrhs, const lapack_complex_float* a,
7790                                lapack_int lda, lapack_complex_float* b,
7791                                lapack_int ldb );
7792lapack_int LAPACKE_zpotrs_work( int matrix_order, char uplo, lapack_int n,
7793                                lapack_int nrhs, const lapack_complex_double* a,
7794                                lapack_int lda, lapack_complex_double* b,
7795                                lapack_int ldb );
7796
7797lapack_int LAPACKE_sppcon_work( int matrix_order, char uplo, lapack_int n,
7798                                const float* ap, float anorm, float* rcond,
7799                                float* work, lapack_int* iwork );
7800lapack_int LAPACKE_dppcon_work( int matrix_order, char uplo, lapack_int n,
7801                                const double* ap, double anorm, double* rcond,
7802                                double* work, lapack_int* iwork );
7803lapack_int LAPACKE_cppcon_work( int matrix_order, char uplo, lapack_int n,
7804                                const lapack_complex_float* ap, float anorm,
7805                                float* rcond, lapack_complex_float* work,
7806                                float* rwork );
7807lapack_int LAPACKE_zppcon_work( int matrix_order, char uplo, lapack_int n,
7808                                const lapack_complex_double* ap, double anorm,
7809                                double* rcond, lapack_complex_double* work,
7810                                double* rwork );
7811
7812lapack_int LAPACKE_sppequ_work( int matrix_order, char uplo, lapack_int n,
7813                                const float* ap, float* s, float* scond,
7814                                float* amax );
7815lapack_int LAPACKE_dppequ_work( int matrix_order, char uplo, lapack_int n,
7816                                const double* ap, double* s, double* scond,
7817                                double* amax );
7818lapack_int LAPACKE_cppequ_work( int matrix_order, char uplo, lapack_int n,
7819                                const lapack_complex_float* ap, float* s,
7820                                float* scond, float* amax );
7821lapack_int LAPACKE_zppequ_work( int matrix_order, char uplo, lapack_int n,
7822                                const lapack_complex_double* ap, double* s,
7823                                double* scond, double* amax );
7824
7825lapack_int LAPACKE_spprfs_work( int matrix_order, char uplo, lapack_int n,
7826                                lapack_int nrhs, const float* ap,
7827                                const float* afp, const float* b,
7828                                lapack_int ldb, float* x, lapack_int ldx,
7829                                float* ferr, float* berr, float* work,
7830                                lapack_int* iwork );
7831lapack_int LAPACKE_dpprfs_work( int matrix_order, char uplo, lapack_int n,
7832                                lapack_int nrhs, const double* ap,
7833                                const double* afp, const double* b,
7834                                lapack_int ldb, double* x, lapack_int ldx,
7835                                double* ferr, double* berr, double* work,
7836                                lapack_int* iwork );
7837lapack_int LAPACKE_cpprfs_work( int matrix_order, char uplo, lapack_int n,
7838                                lapack_int nrhs, const lapack_complex_float* ap,
7839                                const lapack_complex_float* afp,
7840                                const lapack_complex_float* b, lapack_int ldb,
7841                                lapack_complex_float* x, lapack_int ldx,
7842                                float* ferr, float* berr,
7843                                lapack_complex_float* work, float* rwork );
7844lapack_int LAPACKE_zpprfs_work( int matrix_order, char uplo, lapack_int n,
7845                                lapack_int nrhs,
7846                                const lapack_complex_double* ap,
7847                                const lapack_complex_double* afp,
7848                                const lapack_complex_double* b, lapack_int ldb,
7849                                lapack_complex_double* x, lapack_int ldx,
7850                                double* ferr, double* berr,
7851                                lapack_complex_double* work, double* rwork );
7852
7853lapack_int LAPACKE_sppsv_work( int matrix_order, char uplo, lapack_int n,
7854                               lapack_int nrhs, float* ap, float* b,
7855                               lapack_int ldb );
7856lapack_int LAPACKE_dppsv_work( int matrix_order, char uplo, lapack_int n,
7857                               lapack_int nrhs, double* ap, double* b,
7858                               lapack_int ldb );
7859lapack_int LAPACKE_cppsv_work( int matrix_order, char uplo, lapack_int n,
7860                               lapack_int nrhs, lapack_complex_float* ap,
7861                               lapack_complex_float* b, lapack_int ldb );
7862lapack_int LAPACKE_zppsv_work( int matrix_order, char uplo, lapack_int n,
7863                               lapack_int nrhs, lapack_complex_double* ap,
7864                               lapack_complex_double* b, lapack_int ldb );
7865
7866lapack_int LAPACKE_sppsvx_work( int matrix_order, char fact, char uplo,
7867                                lapack_int n, lapack_int nrhs, float* ap,
7868                                float* afp, char* equed, float* s, float* b,
7869                                lapack_int ldb, float* x, lapack_int ldx,
7870                                float* rcond, float* ferr, float* berr,
7871                                float* work, lapack_int* iwork );
7872lapack_int LAPACKE_dppsvx_work( int matrix_order, char fact, char uplo,
7873                                lapack_int n, lapack_int nrhs, double* ap,
7874                                double* afp, char* equed, double* s, double* b,
7875                                lapack_int ldb, double* x, lapack_int ldx,
7876                                double* rcond, double* ferr, double* berr,
7877                                double* work, lapack_int* iwork );
7878lapack_int LAPACKE_cppsvx_work( int matrix_order, char fact, char uplo,
7879                                lapack_int n, lapack_int nrhs,
7880                                lapack_complex_float* ap,
7881                                lapack_complex_float* afp, char* equed,
7882                                float* s, lapack_complex_float* b,
7883                                lapack_int ldb, lapack_complex_float* x,
7884                                lapack_int ldx, float* rcond, float* ferr,
7885                                float* berr, lapack_complex_float* work,
7886                                float* rwork );
7887lapack_int LAPACKE_zppsvx_work( int matrix_order, char fact, char uplo,
7888                                lapack_int n, lapack_int nrhs,
7889                                lapack_complex_double* ap,
7890                                lapack_complex_double* afp, char* equed,
7891                                double* s, lapack_complex_double* b,
7892                                lapack_int ldb, lapack_complex_double* x,
7893                                lapack_int ldx, double* rcond, double* ferr,
7894                                double* berr, lapack_complex_double* work,
7895                                double* rwork );
7896
7897lapack_int LAPACKE_spptrf_work( int matrix_order, char uplo, lapack_int n,
7898                                float* ap );
7899lapack_int LAPACKE_dpptrf_work( int matrix_order, char uplo, lapack_int n,
7900                                double* ap );
7901lapack_int LAPACKE_cpptrf_work( int matrix_order, char uplo, lapack_int n,
7902                                lapack_complex_float* ap );
7903lapack_int LAPACKE_zpptrf_work( int matrix_order, char uplo, lapack_int n,
7904                                lapack_complex_double* ap );
7905
7906lapack_int LAPACKE_spptri_work( int matrix_order, char uplo, lapack_int n,
7907                                float* ap );
7908lapack_int LAPACKE_dpptri_work( int matrix_order, char uplo, lapack_int n,
7909                                double* ap );
7910lapack_int LAPACKE_cpptri_work( int matrix_order, char uplo, lapack_int n,
7911                                lapack_complex_float* ap );
7912lapack_int LAPACKE_zpptri_work( int matrix_order, char uplo, lapack_int n,
7913                                lapack_complex_double* ap );
7914
7915lapack_int LAPACKE_spptrs_work( int matrix_order, char uplo, lapack_int n,
7916                                lapack_int nrhs, const float* ap, float* b,
7917                                lapack_int ldb );
7918lapack_int LAPACKE_dpptrs_work( int matrix_order, char uplo, lapack_int n,
7919                                lapack_int nrhs, const double* ap, double* b,
7920                                lapack_int ldb );
7921lapack_int LAPACKE_cpptrs_work( int matrix_order, char uplo, lapack_int n,
7922                                lapack_int nrhs, const lapack_complex_float* ap,
7923                                lapack_complex_float* b, lapack_int ldb );
7924lapack_int LAPACKE_zpptrs_work( int matrix_order, char uplo, lapack_int n,
7925                                lapack_int nrhs,
7926                                const lapack_complex_double* ap,
7927                                lapack_complex_double* b, lapack_int ldb );
7928
7929lapack_int LAPACKE_spstrf_work( int matrix_order, char uplo, lapack_int n,
7930                                float* a, lapack_int lda, lapack_int* piv,
7931                                lapack_int* rank, float tol, float* work );
7932lapack_int LAPACKE_dpstrf_work( int matrix_order, char uplo, lapack_int n,
7933                                double* a, lapack_int lda, lapack_int* piv,
7934                                lapack_int* rank, double tol, double* work );
7935lapack_int LAPACKE_cpstrf_work( int matrix_order, char uplo, lapack_int n,
7936                                lapack_complex_float* a, lapack_int lda,
7937                                lapack_int* piv, lapack_int* rank, float tol,
7938                                float* work );
7939lapack_int LAPACKE_zpstrf_work( int matrix_order, char uplo, lapack_int n,
7940                                lapack_complex_double* a, lapack_int lda,
7941                                lapack_int* piv, lapack_int* rank, double tol,
7942                                double* work );
7943
7944lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
7945                                float anorm, float* rcond, float* work );
7946lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
7947                                double anorm, double* rcond, double* work );
7948lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
7949                                const lapack_complex_float* e, float anorm,
7950                                float* rcond, float* work );
7951lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
7952                                const lapack_complex_double* e, double anorm,
7953                                double* rcond, double* work );
7954
7955lapack_int LAPACKE_spteqr_work( int matrix_order, char compz, lapack_int n,
7956                                float* d, float* e, float* z, lapack_int ldz,
7957                                float* work );
7958lapack_int LAPACKE_dpteqr_work( int matrix_order, char compz, lapack_int n,
7959                                double* d, double* e, double* z, lapack_int ldz,
7960                                double* work );
7961lapack_int LAPACKE_cpteqr_work( int matrix_order, char compz, lapack_int n,
7962                                float* d, float* e, lapack_complex_float* z,
7963                                lapack_int ldz, float* work );
7964lapack_int LAPACKE_zpteqr_work( int matrix_order, char compz, lapack_int n,
7965                                double* d, double* e, lapack_complex_double* z,
7966                                lapack_int ldz, double* work );
7967
7968lapack_int LAPACKE_sptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
7969                                const float* d, const float* e, const float* df,
7970                                const float* ef, const float* b, lapack_int ldb,
7971                                float* x, lapack_int ldx, float* ferr,
7972                                float* berr, float* work );
7973lapack_int LAPACKE_dptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
7974                                const double* d, const double* e,
7975                                const double* df, const double* ef,
7976                                const double* b, lapack_int ldb, double* x,
7977                                lapack_int ldx, double* ferr, double* berr,
7978                                double* work );
7979lapack_int LAPACKE_cptrfs_work( int matrix_order, char uplo, lapack_int n,
7980                                lapack_int nrhs, const float* d,
7981                                const lapack_complex_float* e, const float* df,
7982                                const lapack_complex_float* ef,
7983                                const lapack_complex_float* b, lapack_int ldb,
7984                                lapack_complex_float* x, lapack_int ldx,
7985                                float* ferr, float* berr,
7986                                lapack_complex_float* work, float* rwork );
7987lapack_int LAPACKE_zptrfs_work( int matrix_order, char uplo, lapack_int n,
7988                                lapack_int nrhs, const double* d,
7989                                const lapack_complex_double* e,
7990                                const double* df,
7991                                const lapack_complex_double* ef,
7992                                const lapack_complex_double* b, lapack_int ldb,
7993                                lapack_complex_double* x, lapack_int ldx,
7994                                double* ferr, double* berr,
7995                                lapack_complex_double* work, double* rwork );
7996
7997lapack_int LAPACKE_sptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
7998                               float* d, float* e, float* b, lapack_int ldb );
7999lapack_int LAPACKE_dptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
8000                               double* d, double* e, double* b,
8001                               lapack_int ldb );
8002lapack_int LAPACKE_cptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
8003                               float* d, lapack_complex_float* e,
8004                               lapack_complex_float* b, lapack_int ldb );
8005lapack_int LAPACKE_zptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
8006                               double* d, lapack_complex_double* e,
8007                               lapack_complex_double* b, lapack_int ldb );
8008
8009lapack_int LAPACKE_sptsvx_work( int matrix_order, char fact, lapack_int n,
8010                                lapack_int nrhs, const float* d, const float* e,
8011                                float* df, float* ef, const float* b,
8012                                lapack_int ldb, float* x, lapack_int ldx,
8013                                float* rcond, float* ferr, float* berr,
8014                                float* work );
8015lapack_int LAPACKE_dptsvx_work( int matrix_order, char fact, lapack_int n,
8016                                lapack_int nrhs, const double* d,
8017                                const double* e, double* df, double* ef,
8018                                const double* b, lapack_int ldb, double* x,
8019                                lapack_int ldx, double* rcond, double* ferr,
8020                                double* berr, double* work );
8021lapack_int LAPACKE_cptsvx_work( int matrix_order, char fact, lapack_int n,
8022                                lapack_int nrhs, const float* d,
8023                                const lapack_complex_float* e, float* df,
8024                                lapack_complex_float* ef,
8025                                const lapack_complex_float* b, lapack_int ldb,
8026                                lapack_complex_float* x, lapack_int ldx,
8027                                float* rcond, float* ferr, float* berr,
8028                                lapack_complex_float* work, float* rwork );
8029lapack_int LAPACKE_zptsvx_work( int matrix_order, char fact, lapack_int n,
8030                                lapack_int nrhs, const double* d,
8031                                const lapack_complex_double* e, double* df,
8032                                lapack_complex_double* ef,
8033                                const lapack_complex_double* b, lapack_int ldb,
8034                                lapack_complex_double* x, lapack_int ldx,
8035                                double* rcond, double* ferr, double* berr,
8036                                lapack_complex_double* work, double* rwork );
8037
8038lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
8039lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
8040lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
8041                                lapack_complex_float* e );
8042lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
8043                                lapack_complex_double* e );
8044
8045lapack_int LAPACKE_spttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
8046                                const float* d, const float* e, float* b,
8047                                lapack_int ldb );
8048lapack_int LAPACKE_dpttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
8049                                const double* d, const double* e, double* b,
8050                                lapack_int ldb );
8051lapack_int LAPACKE_cpttrs_work( int matrix_order, char uplo, lapack_int n,
8052                                lapack_int nrhs, const float* d,
8053                                const lapack_complex_float* e,
8054                                lapack_complex_float* b, lapack_int ldb );
8055lapack_int LAPACKE_zpttrs_work( int matrix_order, char uplo, lapack_int n,
8056                                lapack_int nrhs, const double* d,
8057                                const lapack_complex_double* e,
8058                                lapack_complex_double* b, lapack_int ldb );
8059
8060lapack_int LAPACKE_ssbev_work( int matrix_order, char jobz, char uplo,
8061                               lapack_int n, lapack_int kd, float* ab,
8062                               lapack_int ldab, float* w, float* z,
8063                               lapack_int ldz, float* work );
8064lapack_int LAPACKE_dsbev_work( int matrix_order, char jobz, char uplo,
8065                               lapack_int n, lapack_int kd, double* ab,
8066                               lapack_int ldab, double* w, double* z,
8067                               lapack_int ldz, double* work );
8068
8069lapack_int LAPACKE_ssbevd_work( int matrix_order, char jobz, char uplo,
8070                                lapack_int n, lapack_int kd, float* ab,
8071                                lapack_int ldab, float* w, float* z,
8072                                lapack_int ldz, float* work, lapack_int lwork,
8073                                lapack_int* iwork, lapack_int liwork );
8074lapack_int LAPACKE_dsbevd_work( int matrix_order, char jobz, char uplo,
8075                                lapack_int n, lapack_int kd, double* ab,
8076                                lapack_int ldab, double* w, double* z,
8077                                lapack_int ldz, double* work, lapack_int lwork,
8078                                lapack_int* iwork, lapack_int liwork );
8079
8080lapack_int LAPACKE_ssbevx_work( int matrix_order, char jobz, char range,
8081                                char uplo, lapack_int n, lapack_int kd,
8082                                float* ab, lapack_int ldab, float* q,
8083                                lapack_int ldq, float vl, float vu,
8084                                lapack_int il, lapack_int iu, float abstol,
8085                                lapack_int* m, float* w, float* z,
8086                                lapack_int ldz, float* work, lapack_int* iwork,
8087                                lapack_int* ifail );
8088lapack_int LAPACKE_dsbevx_work( int matrix_order, char jobz, char range,
8089                                char uplo, lapack_int n, lapack_int kd,
8090                                double* ab, lapack_int ldab, double* q,
8091                                lapack_int ldq, double vl, double vu,
8092                                lapack_int il, lapack_int iu, double abstol,
8093                                lapack_int* m, double* w, double* z,
8094                                lapack_int ldz, double* work, lapack_int* iwork,
8095                                lapack_int* ifail );
8096
8097lapack_int LAPACKE_ssbgst_work( int matrix_order, char vect, char uplo,
8098                                lapack_int n, lapack_int ka, lapack_int kb,
8099                                float* ab, lapack_int ldab, const float* bb,
8100                                lapack_int ldbb, float* x, lapack_int ldx,
8101                                float* work );
8102lapack_int LAPACKE_dsbgst_work( int matrix_order, char vect, char uplo,
8103                                lapack_int n, lapack_int ka, lapack_int kb,
8104                                double* ab, lapack_int ldab, const double* bb,
8105                                lapack_int ldbb, double* x, lapack_int ldx,
8106                                double* work );
8107
8108lapack_int LAPACKE_ssbgv_work( int matrix_order, char jobz, char uplo,
8109                               lapack_int n, lapack_int ka, lapack_int kb,
8110                               float* ab, lapack_int ldab, float* bb,
8111                               lapack_int ldbb, float* w, float* z,
8112                               lapack_int ldz, float* work );
8113lapack_int LAPACKE_dsbgv_work( int matrix_order, char jobz, char uplo,
8114                               lapack_int n, lapack_int ka, lapack_int kb,
8115                               double* ab, lapack_int ldab, double* bb,
8116                               lapack_int ldbb, double* w, double* z,
8117                               lapack_int ldz, double* work );
8118
8119lapack_int LAPACKE_ssbgvd_work( int matrix_order, char jobz, char uplo,
8120                                lapack_int n, lapack_int ka, lapack_int kb,
8121                                float* ab, lapack_int ldab, float* bb,
8122                                lapack_int ldbb, float* w, float* z,
8123                                lapack_int ldz, float* work, lapack_int lwork,
8124                                lapack_int* iwork, lapack_int liwork );
8125lapack_int LAPACKE_dsbgvd_work( int matrix_order, char jobz, char uplo,
8126                                lapack_int n, lapack_int ka, lapack_int kb,
8127                                double* ab, lapack_int ldab, double* bb,
8128                                lapack_int ldbb, double* w, double* z,
8129                                lapack_int ldz, double* work, lapack_int lwork,
8130                                lapack_int* iwork, lapack_int liwork );
8131
8132lapack_int LAPACKE_ssbgvx_work( int matrix_order, char jobz, char range,
8133                                char uplo, lapack_int n, lapack_int ka,
8134                                lapack_int kb, float* ab, lapack_int ldab,
8135                                float* bb, lapack_int ldbb, float* q,
8136                                lapack_int ldq, float vl, float vu,
8137                                lapack_int il, lapack_int iu, float abstol,
8138                                lapack_int* m, float* w, float* z,
8139                                lapack_int ldz, float* work, lapack_int* iwork,
8140                                lapack_int* ifail );
8141lapack_int LAPACKE_dsbgvx_work( int matrix_order, char jobz, char range,
8142                                char uplo, lapack_int n, lapack_int ka,
8143                                lapack_int kb, double* ab, lapack_int ldab,
8144                                double* bb, lapack_int ldbb, double* q,
8145                                lapack_int ldq, double vl, double vu,
8146                                lapack_int il, lapack_int iu, double abstol,
8147                                lapack_int* m, double* w, double* z,
8148                                lapack_int ldz, double* work, lapack_int* iwork,
8149                                lapack_int* ifail );
8150
8151lapack_int LAPACKE_ssbtrd_work( int matrix_order, char vect, char uplo,
8152                                lapack_int n, lapack_int kd, float* ab,
8153                                lapack_int ldab, float* d, float* e, float* q,
8154                                lapack_int ldq, float* work );
8155lapack_int LAPACKE_dsbtrd_work( int matrix_order, char vect, char uplo,
8156                                lapack_int n, lapack_int kd, double* ab,
8157                                lapack_int ldab, double* d, double* e,
8158                                double* q, lapack_int ldq, double* work );
8159
8160lapack_int LAPACKE_ssfrk_work( int matrix_order, char transr, char uplo,
8161                               char trans, lapack_int n, lapack_int k,
8162                               float alpha, const float* a, lapack_int lda,
8163                               float beta, float* c );
8164lapack_int LAPACKE_dsfrk_work( int matrix_order, char transr, char uplo,
8165                               char trans, lapack_int n, lapack_int k,
8166                               double alpha, const double* a, lapack_int lda,
8167                               double beta, double* c );
8168
8169lapack_int LAPACKE_sspcon_work( int matrix_order, char uplo, lapack_int n,
8170                                const float* ap, const lapack_int* ipiv,
8171                                float anorm, float* rcond, float* work,
8172                                lapack_int* iwork );
8173lapack_int LAPACKE_dspcon_work( int matrix_order, char uplo, lapack_int n,
8174                                const double* ap, const lapack_int* ipiv,
8175                                double anorm, double* rcond, double* work,
8176                                lapack_int* iwork );
8177lapack_int LAPACKE_cspcon_work( int matrix_order, char uplo, lapack_int n,
8178                                const lapack_complex_float* ap,
8179                                const lapack_int* ipiv, float anorm,
8180                                float* rcond, lapack_complex_float* work );
8181lapack_int LAPACKE_zspcon_work( int matrix_order, char uplo, lapack_int n,
8182                                const lapack_complex_double* ap,
8183                                const lapack_int* ipiv, double anorm,
8184                                double* rcond, lapack_complex_double* work );
8185
8186lapack_int LAPACKE_sspev_work( int matrix_order, char jobz, char uplo,
8187                               lapack_int n, float* ap, float* w, float* z,
8188                               lapack_int ldz, float* work );
8189lapack_int LAPACKE_dspev_work( int matrix_order, char jobz, char uplo,
8190                               lapack_int n, double* ap, double* w, double* z,
8191                               lapack_int ldz, double* work );
8192
8193lapack_int LAPACKE_sspevd_work( int matrix_order, char jobz, char uplo,
8194                                lapack_int n, float* ap, float* w, float* z,
8195                                lapack_int ldz, float* work, lapack_int lwork,
8196                                lapack_int* iwork, lapack_int liwork );
8197lapack_int LAPACKE_dspevd_work( int matrix_order, char jobz, char uplo,
8198                                lapack_int n, double* ap, double* w, double* z,
8199                                lapack_int ldz, double* work, lapack_int lwork,
8200                                lapack_int* iwork, lapack_int liwork );
8201
8202lapack_int LAPACKE_sspevx_work( int matrix_order, char jobz, char range,
8203                                char uplo, lapack_int n, float* ap, float vl,
8204                                float vu, lapack_int il, lapack_int iu,
8205                                float abstol, lapack_int* m, float* w, float* z,
8206                                lapack_int ldz, float* work, lapack_int* iwork,
8207                                lapack_int* ifail );
8208lapack_int LAPACKE_dspevx_work( int matrix_order, char jobz, char range,
8209                                char uplo, lapack_int n, double* ap, double vl,
8210                                double vu, lapack_int il, lapack_int iu,
8211                                double abstol, lapack_int* m, double* w,
8212                                double* z, lapack_int ldz, double* work,
8213                                lapack_int* iwork, lapack_int* ifail );
8214
8215lapack_int LAPACKE_sspgst_work( int matrix_order, lapack_int itype, char uplo,
8216                                lapack_int n, float* ap, const float* bp );
8217lapack_int LAPACKE_dspgst_work( int matrix_order, lapack_int itype, char uplo,
8218                                lapack_int n, double* ap, const double* bp );
8219
8220lapack_int LAPACKE_sspgv_work( int matrix_order, lapack_int itype, char jobz,
8221                               char uplo, lapack_int n, float* ap, float* bp,
8222                               float* w, float* z, lapack_int ldz,
8223                               float* work );
8224lapack_int LAPACKE_dspgv_work( int matrix_order, lapack_int itype, char jobz,
8225                               char uplo, lapack_int n, double* ap, double* bp,
8226                               double* w, double* z, lapack_int ldz,
8227                               double* work );
8228
8229lapack_int LAPACKE_sspgvd_work( int matrix_order, lapack_int itype, char jobz,
8230                                char uplo, lapack_int n, float* ap, float* bp,
8231                                float* w, float* z, lapack_int ldz, float* work,
8232                                lapack_int lwork, lapack_int* iwork,
8233                                lapack_int liwork );
8234lapack_int LAPACKE_dspgvd_work( int matrix_order, lapack_int itype, char jobz,
8235                                char uplo, lapack_int n, double* ap, double* bp,
8236                                double* w, double* z, lapack_int ldz,
8237                                double* work, lapack_int lwork,
8238                                lapack_int* iwork, lapack_int liwork );
8239
8240lapack_int LAPACKE_sspgvx_work( int matrix_order, lapack_int itype, char jobz,
8241                                char range, char uplo, lapack_int n, float* ap,
8242                                float* bp, float vl, float vu, lapack_int il,
8243                                lapack_int iu, float abstol, lapack_int* m,
8244                                float* w, float* z, lapack_int ldz, float* work,
8245                                lapack_int* iwork, lapack_int* ifail );
8246lapack_int LAPACKE_dspgvx_work( int matrix_order, lapack_int itype, char jobz,
8247                                char range, char uplo, lapack_int n, double* ap,
8248                                double* bp, double vl, double vu, lapack_int il,
8249                                lapack_int iu, double abstol, lapack_int* m,
8250                                double* w, double* z, lapack_int ldz,
8251                                double* work, lapack_int* iwork,
8252                                lapack_int* ifail );
8253
8254lapack_int LAPACKE_ssprfs_work( int matrix_order, char uplo, lapack_int n,
8255                                lapack_int nrhs, const float* ap,
8256                                const float* afp, const lapack_int* ipiv,
8257                                const float* b, lapack_int ldb, float* x,
8258                                lapack_int ldx, float* ferr, float* berr,
8259                                float* work, lapack_int* iwork );
8260lapack_int LAPACKE_dsprfs_work( int matrix_order, char uplo, lapack_int n,
8261                                lapack_int nrhs, const double* ap,
8262                                const double* afp, const lapack_int* ipiv,
8263                                const double* b, lapack_int ldb, double* x,
8264                                lapack_int ldx, double* ferr, double* berr,
8265                                double* work, lapack_int* iwork );
8266lapack_int LAPACKE_csprfs_work( int matrix_order, char uplo, lapack_int n,
8267                                lapack_int nrhs, const lapack_complex_float* ap,
8268                                const lapack_complex_float* afp,
8269                                const lapack_int* ipiv,
8270                                const lapack_complex_float* b, lapack_int ldb,
8271                                lapack_complex_float* x, lapack_int ldx,
8272                                float* ferr, float* berr,
8273                                lapack_complex_float* work, float* rwork );
8274lapack_int LAPACKE_zsprfs_work( int matrix_order, char uplo, lapack_int n,
8275                                lapack_int nrhs,
8276                                const lapack_complex_double* ap,
8277                                const lapack_complex_double* afp,
8278                                const lapack_int* ipiv,
8279                                const lapack_complex_double* b, lapack_int ldb,
8280                                lapack_complex_double* x, lapack_int ldx,
8281                                double* ferr, double* berr,
8282                                lapack_complex_double* work, double* rwork );
8283
8284lapack_int LAPACKE_sspsv_work( int matrix_order, char uplo, lapack_int n,
8285                               lapack_int nrhs, float* ap, lapack_int* ipiv,
8286                               float* b, lapack_int ldb );
8287lapack_int LAPACKE_dspsv_work( int matrix_order, char uplo, lapack_int n,
8288                               lapack_int nrhs, double* ap, lapack_int* ipiv,
8289                               double* b, lapack_int ldb );
8290lapack_int LAPACKE_cspsv_work( int matrix_order, char uplo, lapack_int n,
8291                               lapack_int nrhs, lapack_complex_float* ap,
8292                               lapack_int* ipiv, lapack_complex_float* b,
8293                               lapack_int ldb );
8294lapack_int LAPACKE_zspsv_work( int matrix_order, char uplo, lapack_int n,
8295                               lapack_int nrhs, lapack_complex_double* ap,
8296                               lapack_int* ipiv, lapack_complex_double* b,
8297                               lapack_int ldb );
8298
8299lapack_int LAPACKE_sspsvx_work( int matrix_order, char fact, char uplo,
8300                                lapack_int n, lapack_int nrhs, const float* ap,
8301                                float* afp, lapack_int* ipiv, const float* b,
8302                                lapack_int ldb, float* x, lapack_int ldx,
8303                                float* rcond, float* ferr, float* berr,
8304                                float* work, lapack_int* iwork );
8305lapack_int LAPACKE_dspsvx_work( int matrix_order, char fact, char uplo,
8306                                lapack_int n, lapack_int nrhs, const double* ap,
8307                                double* afp, lapack_int* ipiv, const double* b,
8308                                lapack_int ldb, double* x, lapack_int ldx,
8309                                double* rcond, double* ferr, double* berr,
8310                                double* work, lapack_int* iwork );
8311lapack_int LAPACKE_cspsvx_work( int matrix_order, char fact, char uplo,
8312                                lapack_int n, lapack_int nrhs,
8313                                const lapack_complex_float* ap,
8314                                lapack_complex_float* afp, lapack_int* ipiv,
8315                                const lapack_complex_float* b, lapack_int ldb,
8316                                lapack_complex_float* x, lapack_int ldx,
8317                                float* rcond, float* ferr, float* berr,
8318                                lapack_complex_float* work, float* rwork );
8319lapack_int LAPACKE_zspsvx_work( int matrix_order, char fact, char uplo,
8320                                lapack_int n, lapack_int nrhs,
8321                                const lapack_complex_double* ap,
8322                                lapack_complex_double* afp, lapack_int* ipiv,
8323                                const lapack_complex_double* b, lapack_int ldb,
8324                                lapack_complex_double* x, lapack_int ldx,
8325                                double* rcond, double* ferr, double* berr,
8326                                lapack_complex_double* work, double* rwork );
8327
8328lapack_int LAPACKE_ssptrd_work( int matrix_order, char uplo, lapack_int n,
8329                                float* ap, float* d, float* e, float* tau );
8330lapack_int LAPACKE_dsptrd_work( int matrix_order, char uplo, lapack_int n,
8331                                double* ap, double* d, double* e, double* tau );
8332
8333lapack_int LAPACKE_ssptrf_work( int matrix_order, char uplo, lapack_int n,
8334                                float* ap, lapack_int* ipiv );
8335lapack_int LAPACKE_dsptrf_work( int matrix_order, char uplo, lapack_int n,
8336                                double* ap, lapack_int* ipiv );
8337lapack_int LAPACKE_csptrf_work( int matrix_order, char uplo, lapack_int n,
8338                                lapack_complex_float* ap, lapack_int* ipiv );
8339lapack_int LAPACKE_zsptrf_work( int matrix_order, char uplo, lapack_int n,
8340                                lapack_complex_double* ap, lapack_int* ipiv );
8341
8342lapack_int LAPACKE_ssptri_work( int matrix_order, char uplo, lapack_int n,
8343                                float* ap, const lapack_int* ipiv,
8344                                float* work );
8345lapack_int LAPACKE_dsptri_work( int matrix_order, char uplo, lapack_int n,
8346                                double* ap, const lapack_int* ipiv,
8347                                double* work );
8348lapack_int LAPACKE_csptri_work( int matrix_order, char uplo, lapack_int n,
8349                                lapack_complex_float* ap,
8350                                const lapack_int* ipiv,
8351                                lapack_complex_float* work );
8352lapack_int LAPACKE_zsptri_work( int matrix_order, char uplo, lapack_int n,
8353                                lapack_complex_double* ap,
8354                                const lapack_int* ipiv,
8355                                lapack_complex_double* work );
8356
8357lapack_int LAPACKE_ssptrs_work( int matrix_order, char uplo, lapack_int n,
8358                                lapack_int nrhs, const float* ap,
8359                                const lapack_int* ipiv, float* b,
8360                                lapack_int ldb );
8361lapack_int LAPACKE_dsptrs_work( int matrix_order, char uplo, lapack_int n,
8362                                lapack_int nrhs, const double* ap,
8363                                const lapack_int* ipiv, double* b,
8364                                lapack_int ldb );
8365lapack_int LAPACKE_csptrs_work( int matrix_order, char uplo, lapack_int n,
8366                                lapack_int nrhs, const lapack_complex_float* ap,
8367                                const lapack_int* ipiv, lapack_complex_float* b,
8368                                lapack_int ldb );
8369lapack_int LAPACKE_zsptrs_work( int matrix_order, char uplo, lapack_int n,
8370                                lapack_int nrhs,
8371                                const lapack_complex_double* ap,
8372                                const lapack_int* ipiv,
8373                                lapack_complex_double* b, lapack_int ldb );
8374
8375lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
8376                                float vu, lapack_int il, lapack_int iu,
8377                                float abstol, const float* d, const float* e,
8378                                lapack_int* m, lapack_int* nsplit, float* w,
8379                                lapack_int* iblock, lapack_int* isplit,
8380                                float* work, lapack_int* iwork );
8381lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
8382                                double vu, lapack_int il, lapack_int iu,
8383                                double abstol, const double* d, const double* e,
8384                                lapack_int* m, lapack_int* nsplit, double* w,
8385                                lapack_int* iblock, lapack_int* isplit,
8386                                double* work, lapack_int* iwork );
8387
8388lapack_int LAPACKE_sstedc_work( int matrix_order, char compz, lapack_int n,
8389                                float* d, float* e, float* z, lapack_int ldz,
8390                                float* work, lapack_int lwork,
8391                                lapack_int* iwork, lapack_int liwork );
8392lapack_int LAPACKE_dstedc_work( int matrix_order, char compz, lapack_int n,
8393                                double* d, double* e, double* z, lapack_int ldz,
8394                                double* work, lapack_int lwork,
8395                                lapack_int* iwork, lapack_int liwork );
8396lapack_int LAPACKE_cstedc_work( int matrix_order, char compz, lapack_int n,
8397                                float* d, float* e, lapack_complex_float* z,
8398                                lapack_int ldz, lapack_complex_float* work,
8399                                lapack_int lwork, float* rwork,
8400                                lapack_int lrwork, lapack_int* iwork,
8401                                lapack_int liwork );
8402lapack_int LAPACKE_zstedc_work( int matrix_order, char compz, lapack_int n,
8403                                double* d, double* e, lapack_complex_double* z,
8404                                lapack_int ldz, lapack_complex_double* work,
8405                                lapack_int lwork, double* rwork,
8406                                lapack_int lrwork, lapack_int* iwork,
8407                                lapack_int liwork );
8408
8409lapack_int LAPACKE_sstegr_work( int matrix_order, char jobz, char range,
8410                                lapack_int n, float* d, float* e, float vl,
8411                                float vu, lapack_int il, lapack_int iu,
8412                                float abstol, lapack_int* m, float* w, float* z,
8413                                lapack_int ldz, lapack_int* isuppz, float* work,
8414                                lapack_int lwork, lapack_int* iwork,
8415                                lapack_int liwork );
8416lapack_int LAPACKE_dstegr_work( int matrix_order, char jobz, char range,
8417                                lapack_int n, double* d, double* e, double vl,
8418                                double vu, lapack_int il, lapack_int iu,
8419                                double abstol, lapack_int* m, double* w,
8420                                double* z, lapack_int ldz, lapack_int* isuppz,
8421                                double* work, lapack_int lwork,
8422                                lapack_int* iwork, lapack_int liwork );
8423lapack_int LAPACKE_cstegr_work( int matrix_order, char jobz, char range,
8424                                lapack_int n, float* d, float* e, float vl,
8425                                float vu, lapack_int il, lapack_int iu,
8426                                float abstol, lapack_int* m, float* w,
8427                                lapack_complex_float* z, lapack_int ldz,
8428                                lapack_int* isuppz, float* work,
8429                                lapack_int lwork, lapack_int* iwork,
8430                                lapack_int liwork );
8431lapack_int LAPACKE_zstegr_work( int matrix_order, char jobz, char range,
8432                                lapack_int n, double* d, double* e, double vl,
8433                                double vu, lapack_int il, lapack_int iu,
8434                                double abstol, lapack_int* m, double* w,
8435                                lapack_complex_double* z, lapack_int ldz,
8436                                lapack_int* isuppz, double* work,
8437                                lapack_int lwork, lapack_int* iwork,
8438                                lapack_int liwork );
8439
8440lapack_int LAPACKE_sstein_work( int matrix_order, lapack_int n, const float* d,
8441                                const float* e, lapack_int m, const float* w,
8442                                const lapack_int* iblock,
8443                                const lapack_int* isplit, float* z,
8444                                lapack_int ldz, float* work, lapack_int* iwork,
8445                                lapack_int* ifailv );
8446lapack_int LAPACKE_dstein_work( int matrix_order, lapack_int n, const double* d,
8447                                const double* e, lapack_int m, const double* w,
8448                                const lapack_int* iblock,
8449                                const lapack_int* isplit, double* z,
8450                                lapack_int ldz, double* work, lapack_int* iwork,
8451                                lapack_int* ifailv );
8452lapack_int LAPACKE_cstein_work( int matrix_order, lapack_int n, const float* d,
8453                                const float* e, lapack_int m, const float* w,
8454                                const lapack_int* iblock,
8455                                const lapack_int* isplit,
8456                                lapack_complex_float* z, lapack_int ldz,
8457                                float* work, lapack_int* iwork,
8458                                lapack_int* ifailv );
8459lapack_int LAPACKE_zstein_work( int matrix_order, lapack_int n, const double* d,
8460                                const double* e, lapack_int m, const double* w,
8461                                const lapack_int* iblock,
8462                                const lapack_int* isplit,
8463                                lapack_complex_double* z, lapack_int ldz,
8464                                double* work, lapack_int* iwork,
8465                                lapack_int* ifailv );
8466
8467lapack_int LAPACKE_sstemr_work( int matrix_order, char jobz, char range,
8468                                lapack_int n, float* d, float* e, float vl,
8469                                float vu, lapack_int il, lapack_int iu,
8470                                lapack_int* m, float* w, float* z,
8471                                lapack_int ldz, lapack_int nzc,
8472                                lapack_int* isuppz, lapack_logical* tryrac,
8473                                float* work, lapack_int lwork,
8474                                lapack_int* iwork, lapack_int liwork );
8475lapack_int LAPACKE_dstemr_work( int matrix_order, char jobz, char range,
8476                                lapack_int n, double* d, double* e, double vl,
8477                                double vu, lapack_int il, lapack_int iu,
8478                                lapack_int* m, double* w, double* z,
8479                                lapack_int ldz, lapack_int nzc,
8480                                lapack_int* isuppz, lapack_logical* tryrac,
8481                                double* work, lapack_int lwork,
8482                                lapack_int* iwork, lapack_int liwork );
8483lapack_int LAPACKE_cstemr_work( int matrix_order, char jobz, char range,
8484                                lapack_int n, float* d, float* e, float vl,
8485                                float vu, lapack_int il, lapack_int iu,
8486                                lapack_int* m, float* w,
8487                                lapack_complex_float* z, lapack_int ldz,
8488                                lapack_int nzc, lapack_int* isuppz,
8489                                lapack_logical* tryrac, float* work,
8490                                lapack_int lwork, lapack_int* iwork,
8491                                lapack_int liwork );
8492lapack_int LAPACKE_zstemr_work( int matrix_order, char jobz, char range,
8493                                lapack_int n, double* d, double* e, double vl,
8494                                double vu, lapack_int il, lapack_int iu,
8495                                lapack_int* m, double* w,
8496                                lapack_complex_double* z, lapack_int ldz,
8497                                lapack_int nzc, lapack_int* isuppz,
8498                                lapack_logical* tryrac, double* work,
8499                                lapack_int lwork, lapack_int* iwork,
8500                                lapack_int liwork );
8501
8502lapack_int LAPACKE_ssteqr_work( int matrix_order, char compz, lapack_int n,
8503                                float* d, float* e, float* z, lapack_int ldz,
8504                                float* work );
8505lapack_int LAPACKE_dsteqr_work( int matrix_order, char compz, lapack_int n,
8506                                double* d, double* e, double* z, lapack_int ldz,
8507                                double* work );
8508lapack_int LAPACKE_csteqr_work( int matrix_order, char compz, lapack_int n,
8509                                float* d, float* e, lapack_complex_float* z,
8510                                lapack_int ldz, float* work );
8511lapack_int LAPACKE_zsteqr_work( int matrix_order, char compz, lapack_int n,
8512                                double* d, double* e, lapack_complex_double* z,
8513                                lapack_int ldz, double* work );
8514
8515lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
8516lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
8517
8518lapack_int LAPACKE_sstev_work( int matrix_order, char jobz, lapack_int n,
8519                               float* d, float* e, float* z, lapack_int ldz,
8520                               float* work );
8521lapack_int LAPACKE_dstev_work( int matrix_order, char jobz, lapack_int n,
8522                               double* d, double* e, double* z, lapack_int ldz,
8523                               double* work );
8524
8525lapack_int LAPACKE_sstevd_work( int matrix_order, char jobz, lapack_int n,
8526                                float* d, float* e, float* z, lapack_int ldz,
8527                                float* work, lapack_int lwork,
8528                                lapack_int* iwork, lapack_int liwork );
8529lapack_int LAPACKE_dstevd_work( int matrix_order, char jobz, lapack_int n,
8530                                double* d, double* e, double* z, lapack_int ldz,
8531                                double* work, lapack_int lwork,
8532                                lapack_int* iwork, lapack_int liwork );
8533
8534lapack_int LAPACKE_sstevr_work( int matrix_order, char jobz, char range,
8535                                lapack_int n, float* d, float* e, float vl,
8536                                float vu, lapack_int il, lapack_int iu,
8537                                float abstol, lapack_int* m, float* w, float* z,
8538                                lapack_int ldz, lapack_int* isuppz, float* work,
8539                                lapack_int lwork, lapack_int* iwork,
8540                                lapack_int liwork );
8541lapack_int LAPACKE_dstevr_work( int matrix_order, char jobz, char range,
8542                                lapack_int n, double* d, double* e, double vl,
8543                                double vu, lapack_int il, lapack_int iu,
8544                                double abstol, lapack_int* m, double* w,
8545                                double* z, lapack_int ldz, lapack_int* isuppz,
8546                                double* work, lapack_int lwork,
8547                                lapack_int* iwork, lapack_int liwork );
8548
8549lapack_int LAPACKE_sstevx_work( int matrix_order, char jobz, char range,
8550                                lapack_int n, float* d, float* e, float vl,
8551                                float vu, lapack_int il, lapack_int iu,
8552                                float abstol, lapack_int* m, float* w, float* z,
8553                                lapack_int ldz, float* work, lapack_int* iwork,
8554                                lapack_int* ifail );
8555lapack_int LAPACKE_dstevx_work( int matrix_order, char jobz, char range,
8556                                lapack_int n, double* d, double* e, double vl,
8557                                double vu, lapack_int il, lapack_int iu,
8558                                double abstol, lapack_int* m, double* w,
8559                                double* z, lapack_int ldz, double* work,
8560                                lapack_int* iwork, lapack_int* ifail );
8561
8562lapack_int LAPACKE_ssycon_work( int matrix_order, char uplo, lapack_int n,
8563                                const float* a, lapack_int lda,
8564                                const lapack_int* ipiv, float anorm,
8565                                float* rcond, float* work, lapack_int* iwork );
8566lapack_int LAPACKE_dsycon_work( int matrix_order, char uplo, lapack_int n,
8567                                const double* a, lapack_int lda,
8568                                const lapack_int* ipiv, double anorm,
8569                                double* rcond, double* work,
8570                                lapack_int* iwork );
8571lapack_int LAPACKE_csycon_work( int matrix_order, char uplo, lapack_int n,
8572                                const lapack_complex_float* a, lapack_int lda,
8573                                const lapack_int* ipiv, float anorm,
8574                                float* rcond, lapack_complex_float* work );
8575lapack_int LAPACKE_zsycon_work( int matrix_order, char uplo, lapack_int n,
8576                                const lapack_complex_double* a, lapack_int lda,
8577                                const lapack_int* ipiv, double anorm,
8578                                double* rcond, lapack_complex_double* work );
8579
8580lapack_int LAPACKE_ssyequb_work( int matrix_order, char uplo, lapack_int n,
8581                                 const float* a, lapack_int lda, float* s,
8582                                 float* scond, float* amax, float* work );
8583lapack_int LAPACKE_dsyequb_work( int matrix_order, char uplo, lapack_int n,
8584                                 const double* a, lapack_int lda, double* s,
8585                                 double* scond, double* amax, double* work );
8586lapack_int LAPACKE_csyequb_work( int matrix_order, char uplo, lapack_int n,
8587                                 const lapack_complex_float* a, lapack_int lda,
8588                                 float* s, float* scond, float* amax,
8589                                 lapack_complex_float* work );
8590lapack_int LAPACKE_zsyequb_work( int matrix_order, char uplo, lapack_int n,
8591                                 const lapack_complex_double* a, lapack_int lda,
8592                                 double* s, double* scond, double* amax,
8593                                 lapack_complex_double* work );
8594
8595lapack_int LAPACKE_ssyev_work( int matrix_order, char jobz, char uplo,
8596                               lapack_int n, float* a, lapack_int lda, float* w,
8597                               float* work, lapack_int lwork );
8598lapack_int LAPACKE_dsyev_work( int matrix_order, char jobz, char uplo,
8599                               lapack_int n, double* a, lapack_int lda,
8600                               double* w, double* work, lapack_int lwork );
8601
8602lapack_int LAPACKE_ssyevd_work( int matrix_order, char jobz, char uplo,
8603                                lapack_int n, float* a, lapack_int lda,
8604                                float* w, float* work, lapack_int lwork,
8605                                lapack_int* iwork, lapack_int liwork );
8606lapack_int LAPACKE_dsyevd_work( int matrix_order, char jobz, char uplo,
8607                                lapack_int n, double* a, lapack_int lda,
8608                                double* w, double* work, lapack_int lwork,
8609                                lapack_int* iwork, lapack_int liwork );
8610
8611lapack_int LAPACKE_ssyevr_work( int matrix_order, char jobz, char range,
8612                                char uplo, lapack_int n, float* a,
8613                                lapack_int lda, float vl, float vu,
8614                                lapack_int il, lapack_int iu, float abstol,
8615                                lapack_int* m, float* w, float* z,
8616                                lapack_int ldz, lapack_int* isuppz, float* work,
8617                                lapack_int lwork, lapack_int* iwork,
8618                                lapack_int liwork );
8619lapack_int LAPACKE_dsyevr_work( int matrix_order, char jobz, char range,
8620                                char uplo, lapack_int n, double* a,
8621                                lapack_int lda, double vl, double vu,
8622                                lapack_int il, lapack_int iu, double abstol,
8623                                lapack_int* m, double* w, double* z,
8624                                lapack_int ldz, lapack_int* isuppz,
8625                                double* work, lapack_int lwork,
8626                                lapack_int* iwork, lapack_int liwork );
8627
8628lapack_int LAPACKE_ssyevx_work( int matrix_order, char jobz, char range,
8629                                char uplo, lapack_int n, float* a,
8630                                lapack_int lda, float vl, float vu,
8631                                lapack_int il, lapack_int iu, float abstol,
8632                                lapack_int* m, float* w, float* z,
8633                                lapack_int ldz, float* work, lapack_int lwork,
8634                                lapack_int* iwork, lapack_int* ifail );
8635lapack_int LAPACKE_dsyevx_work( int matrix_order, char jobz, char range,
8636                                char uplo, lapack_int n, double* a,
8637                                lapack_int lda, double vl, double vu,
8638                                lapack_int il, lapack_int iu, double abstol,
8639                                lapack_int* m, double* w, double* z,
8640                                lapack_int ldz, double* work, lapack_int lwork,
8641                                lapack_int* iwork, lapack_int* ifail );
8642
8643lapack_int LAPACKE_ssygst_work( int matrix_order, lapack_int itype, char uplo,
8644                                lapack_int n, float* a, lapack_int lda,
8645                                const float* b, lapack_int ldb );
8646lapack_int LAPACKE_dsygst_work( int matrix_order, lapack_int itype, char uplo,
8647                                lapack_int n, double* a, lapack_int lda,
8648                                const double* b, lapack_int ldb );
8649
8650lapack_int LAPACKE_ssygv_work( int matrix_order, lapack_int itype, char jobz,
8651                               char uplo, lapack_int n, float* a,
8652                               lapack_int lda, float* b, lapack_int ldb,
8653                               float* w, float* work, lapack_int lwork );
8654lapack_int LAPACKE_dsygv_work( int matrix_order, lapack_int itype, char jobz,
8655                               char uplo, lapack_int n, double* a,
8656                               lapack_int lda, double* b, lapack_int ldb,
8657                               double* w, double* work, lapack_int lwork );
8658
8659lapack_int LAPACKE_ssygvd_work( int matrix_order, lapack_int itype, char jobz,
8660                                char uplo, lapack_int n, float* a,
8661                                lapack_int lda, float* b, lapack_int ldb,
8662                                float* w, float* work, lapack_int lwork,
8663                                lapack_int* iwork, lapack_int liwork );
8664lapack_int LAPACKE_dsygvd_work( int matrix_order, lapack_int itype, char jobz,
8665                                char uplo, lapack_int n, double* a,
8666                                lapack_int lda, double* b, lapack_int ldb,
8667                                double* w, double* work, lapack_int lwork,
8668                                lapack_int* iwork, lapack_int liwork );
8669
8670lapack_int LAPACKE_ssygvx_work( int matrix_order, lapack_int itype, char jobz,
8671                                char range, char uplo, lapack_int n, float* a,
8672                                lapack_int lda, float* b, lapack_int ldb,
8673                                float vl, float vu, lapack_int il,
8674                                lapack_int iu, float abstol, lapack_int* m,
8675                                float* w, float* z, lapack_int ldz, float* work,
8676                                lapack_int lwork, lapack_int* iwork,
8677                                lapack_int* ifail );
8678lapack_int LAPACKE_dsygvx_work( int matrix_order, lapack_int itype, char jobz,
8679                                char range, char uplo, lapack_int n, double* a,
8680                                lapack_int lda, double* b, lapack_int ldb,
8681                                double vl, double vu, lapack_int il,
8682                                lapack_int iu, double abstol, lapack_int* m,
8683                                double* w, double* z, lapack_int ldz,
8684                                double* work, lapack_int lwork,
8685                                lapack_int* iwork, lapack_int* ifail );
8686
8687lapack_int LAPACKE_ssyrfs_work( int matrix_order, char uplo, lapack_int n,
8688                                lapack_int nrhs, const float* a, lapack_int lda,
8689                                const float* af, lapack_int ldaf,
8690                                const lapack_int* ipiv, const float* b,
8691                                lapack_int ldb, float* x, lapack_int ldx,
8692                                float* ferr, float* berr, float* work,
8693                                lapack_int* iwork );
8694lapack_int LAPACKE_dsyrfs_work( int matrix_order, char uplo, lapack_int n,
8695                                lapack_int nrhs, const double* a,
8696                                lapack_int lda, const double* af,
8697                                lapack_int ldaf, const lapack_int* ipiv,
8698                                const double* b, lapack_int ldb, double* x,
8699                                lapack_int ldx, double* ferr, double* berr,
8700                                double* work, lapack_int* iwork );
8701lapack_int LAPACKE_csyrfs_work( int matrix_order, char uplo, lapack_int n,
8702                                lapack_int nrhs, const lapack_complex_float* a,
8703                                lapack_int lda, const lapack_complex_float* af,
8704                                lapack_int ldaf, const lapack_int* ipiv,
8705                                const lapack_complex_float* b, lapack_int ldb,
8706                                lapack_complex_float* x, lapack_int ldx,
8707                                float* ferr, float* berr,
8708                                lapack_complex_float* work, float* rwork );
8709lapack_int LAPACKE_zsyrfs_work( int matrix_order, char uplo, lapack_int n,
8710                                lapack_int nrhs, const lapack_complex_double* a,
8711                                lapack_int lda, const lapack_complex_double* af,
8712                                lapack_int ldaf, const lapack_int* ipiv,
8713                                const lapack_complex_double* b, lapack_int ldb,
8714                                lapack_complex_double* x, lapack_int ldx,
8715                                double* ferr, double* berr,
8716                                lapack_complex_double* work, double* rwork );
8717
8718lapack_int LAPACKE_ssyrfsx_work( int matrix_order, char uplo, char equed,
8719                                 lapack_int n, lapack_int nrhs, const float* a,
8720                                 lapack_int lda, const float* af,
8721                                 lapack_int ldaf, const lapack_int* ipiv,
8722                                 const float* s, const float* b, lapack_int ldb,
8723                                 float* x, lapack_int ldx, float* rcond,
8724                                 float* berr, lapack_int n_err_bnds,
8725                                 float* err_bnds_norm, float* err_bnds_comp,
8726                                 lapack_int nparams, float* params, float* work,
8727                                 lapack_int* iwork );
8728lapack_int LAPACKE_dsyrfsx_work( int matrix_order, char uplo, char equed,
8729                                 lapack_int n, lapack_int nrhs, const double* a,
8730                                 lapack_int lda, const double* af,
8731                                 lapack_int ldaf, const lapack_int* ipiv,
8732                                 const double* s, const double* b,
8733                                 lapack_int ldb, double* x, lapack_int ldx,
8734                                 double* rcond, double* berr,
8735                                 lapack_int n_err_bnds, double* err_bnds_norm,
8736                                 double* err_bnds_comp, lapack_int nparams,
8737                                 double* params, double* work,
8738                                 lapack_int* iwork );
8739lapack_int LAPACKE_csyrfsx_work( int matrix_order, char uplo, char equed,
8740                                 lapack_int n, lapack_int nrhs,
8741                                 const lapack_complex_float* a, lapack_int lda,
8742                                 const lapack_complex_float* af,
8743                                 lapack_int ldaf, const lapack_int* ipiv,
8744                                 const float* s, const lapack_complex_float* b,
8745                                 lapack_int ldb, lapack_complex_float* x,
8746                                 lapack_int ldx, float* rcond, float* berr,
8747                                 lapack_int n_err_bnds, float* err_bnds_norm,
8748                                 float* err_bnds_comp, lapack_int nparams,
8749                                 float* params, lapack_complex_float* work,
8750                                 float* rwork );
8751lapack_int LAPACKE_zsyrfsx_work( int matrix_order, char uplo, char equed,
8752                                 lapack_int n, lapack_int nrhs,
8753                                 const lapack_complex_double* a, lapack_int lda,
8754                                 const lapack_complex_double* af,
8755                                 lapack_int ldaf, const lapack_int* ipiv,
8756                                 const double* s,
8757                                 const lapack_complex_double* b, lapack_int ldb,
8758                                 lapack_complex_double* x, lapack_int ldx,
8759                                 double* rcond, double* berr,
8760                                 lapack_int n_err_bnds, double* err_bnds_norm,
8761                                 double* err_bnds_comp, lapack_int nparams,
8762                                 double* params, lapack_complex_double* work,
8763                                 double* rwork );
8764
8765lapack_int LAPACKE_ssysv_work( int matrix_order, char uplo, lapack_int n,
8766                               lapack_int nrhs, float* a, lapack_int lda,
8767                               lapack_int* ipiv, float* b, lapack_int ldb,
8768                               float* work, lapack_int lwork );
8769lapack_int LAPACKE_dsysv_work( int matrix_order, char uplo, lapack_int n,
8770                               lapack_int nrhs, double* a, lapack_int lda,
8771                               lapack_int* ipiv, double* b, lapack_int ldb,
8772                               double* work, lapack_int lwork );
8773lapack_int LAPACKE_csysv_work( int matrix_order, char uplo, lapack_int n,
8774                               lapack_int nrhs, lapack_complex_float* a,
8775                               lapack_int lda, lapack_int* ipiv,
8776                               lapack_complex_float* b, lapack_int ldb,
8777                               lapack_complex_float* work, lapack_int lwork );
8778lapack_int LAPACKE_zsysv_work( int matrix_order, char uplo, lapack_int n,
8779                               lapack_int nrhs, lapack_complex_double* a,
8780                               lapack_int lda, lapack_int* ipiv,
8781                               lapack_complex_double* b, lapack_int ldb,
8782                               lapack_complex_double* work, lapack_int lwork );
8783
8784lapack_int LAPACKE_ssysvx_work( int matrix_order, char fact, char uplo,
8785                                lapack_int n, lapack_int nrhs, const float* a,
8786                                lapack_int lda, float* af, lapack_int ldaf,
8787                                lapack_int* ipiv, const float* b,
8788                                lapack_int ldb, float* x, lapack_int ldx,
8789                                float* rcond, float* ferr, float* berr,
8790                                float* work, lapack_int lwork,
8791                                lapack_int* iwork );
8792lapack_int LAPACKE_dsysvx_work( int matrix_order, char fact, char uplo,
8793                                lapack_int n, lapack_int nrhs, const double* a,
8794                                lapack_int lda, double* af, lapack_int ldaf,
8795                                lapack_int* ipiv, const double* b,
8796                                lapack_int ldb, double* x, lapack_int ldx,
8797                                double* rcond, double* ferr, double* berr,
8798                                double* work, lapack_int lwork,
8799                                lapack_int* iwork );
8800lapack_int LAPACKE_csysvx_work( int matrix_order, char fact, char uplo,
8801                                lapack_int n, lapack_int nrhs,
8802                                const lapack_complex_float* a, lapack_int lda,
8803                                lapack_complex_float* af, lapack_int ldaf,
8804                                lapack_int* ipiv, const lapack_complex_float* b,
8805                                lapack_int ldb, lapack_complex_float* x,
8806                                lapack_int ldx, float* rcond, float* ferr,
8807                                float* berr, lapack_complex_float* work,
8808                                lapack_int lwork, float* rwork );
8809lapack_int LAPACKE_zsysvx_work( int matrix_order, char fact, char uplo,
8810                                lapack_int n, lapack_int nrhs,
8811                                const lapack_complex_double* a, lapack_int lda,
8812                                lapack_complex_double* af, lapack_int ldaf,
8813                                lapack_int* ipiv,
8814                                const lapack_complex_double* b, lapack_int ldb,
8815                                lapack_complex_double* x, lapack_int ldx,
8816                                double* rcond, double* ferr, double* berr,
8817                                lapack_complex_double* work, lapack_int lwork,
8818                                double* rwork );
8819
8820lapack_int LAPACKE_ssysvxx_work( int matrix_order, char fact, char uplo,
8821                                 lapack_int n, lapack_int nrhs, float* a,
8822                                 lapack_int lda, float* af, lapack_int ldaf,
8823                                 lapack_int* ipiv, char* equed, float* s,
8824                                 float* b, lapack_int ldb, float* x,
8825                                 lapack_int ldx, float* rcond, float* rpvgrw,
8826                                 float* berr, lapack_int n_err_bnds,
8827                                 float* err_bnds_norm, float* err_bnds_comp,
8828                                 lapack_int nparams, float* params, float* work,
8829                                 lapack_int* iwork );
8830lapack_int LAPACKE_dsysvxx_work( int matrix_order, char fact, char uplo,
8831                                 lapack_int n, lapack_int nrhs, double* a,
8832                                 lapack_int lda, double* af, lapack_int ldaf,
8833                                 lapack_int* ipiv, char* equed, double* s,
8834                                 double* b, lapack_int ldb, double* x,
8835                                 lapack_int ldx, double* rcond, double* rpvgrw,
8836                                 double* berr, lapack_int n_err_bnds,
8837                                 double* err_bnds_norm, double* err_bnds_comp,
8838                                 lapack_int nparams, double* params,
8839                                 double* work, lapack_int* iwork );
8840lapack_int LAPACKE_csysvxx_work( int matrix_order, char fact, char uplo,
8841                                 lapack_int n, lapack_int nrhs,
8842                                 lapack_complex_float* a, lapack_int lda,
8843                                 lapack_complex_float* af, lapack_int ldaf,
8844                                 lapack_int* ipiv, char* equed, float* s,
8845                                 lapack_complex_float* b, lapack_int ldb,
8846                                 lapack_complex_float* x, lapack_int ldx,
8847                                 float* rcond, float* rpvgrw, float* berr,
8848                                 lapack_int n_err_bnds, float* err_bnds_norm,
8849                                 float* err_bnds_comp, lapack_int nparams,
8850                                 float* params, lapack_complex_float* work,
8851                                 float* rwork );
8852lapack_int LAPACKE_zsysvxx_work( int matrix_order, char fact, char uplo,
8853                                 lapack_int n, lapack_int nrhs,
8854                                 lapack_complex_double* a, lapack_int lda,
8855                                 lapack_complex_double* af, lapack_int ldaf,
8856                                 lapack_int* ipiv, char* equed, double* s,
8857                                 lapack_complex_double* b, lapack_int ldb,
8858                                 lapack_complex_double* x, lapack_int ldx,
8859                                 double* rcond, double* rpvgrw, double* berr,
8860                                 lapack_int n_err_bnds, double* err_bnds_norm,
8861                                 double* err_bnds_comp, lapack_int nparams,
8862                                 double* params, lapack_complex_double* work,
8863                                 double* rwork );
8864
8865lapack_int LAPACKE_ssytrd_work( int matrix_order, char uplo, lapack_int n,
8866                                float* a, lapack_int lda, float* d, float* e,
8867                                float* tau, float* work, lapack_int lwork );
8868lapack_int LAPACKE_dsytrd_work( int matrix_order, char uplo, lapack_int n,
8869                                double* a, lapack_int lda, double* d, double* e,
8870                                double* tau, double* work, lapack_int lwork );
8871
8872lapack_int LAPACKE_ssytrf_work( int matrix_order, char uplo, lapack_int n,
8873                                float* a, lapack_int lda, lapack_int* ipiv,
8874                                float* work, lapack_int lwork );
8875lapack_int LAPACKE_dsytrf_work( int matrix_order, char uplo, lapack_int n,
8876                                double* a, lapack_int lda, lapack_int* ipiv,
8877                                double* work, lapack_int lwork );
8878lapack_int LAPACKE_csytrf_work( int matrix_order, char uplo, lapack_int n,
8879                                lapack_complex_float* a, lapack_int lda,
8880                                lapack_int* ipiv, lapack_complex_float* work,
8881                                lapack_int lwork );
8882lapack_int LAPACKE_zsytrf_work( int matrix_order, char uplo, lapack_int n,
8883                                lapack_complex_double* a, lapack_int lda,
8884                                lapack_int* ipiv, lapack_complex_double* work,
8885                                lapack_int lwork );
8886
8887lapack_int LAPACKE_ssytri_work( int matrix_order, char uplo, lapack_int n,
8888                                float* a, lapack_int lda,
8889                                const lapack_int* ipiv, float* work );
8890lapack_int LAPACKE_dsytri_work( int matrix_order, char uplo, lapack_int n,
8891                                double* a, lapack_int lda,
8892                                const lapack_int* ipiv, double* work );
8893lapack_int LAPACKE_csytri_work( int matrix_order, char uplo, lapack_int n,
8894                                lapack_complex_float* a, lapack_int lda,
8895                                const lapack_int* ipiv,
8896                                lapack_complex_float* work );
8897lapack_int LAPACKE_zsytri_work( int matrix_order, char uplo, lapack_int n,
8898                                lapack_complex_double* a, lapack_int lda,
8899                                const lapack_int* ipiv,
8900                                lapack_complex_double* work );
8901
8902lapack_int LAPACKE_ssytrs_work( int matrix_order, char uplo, lapack_int n,
8903                                lapack_int nrhs, const float* a, lapack_int lda,
8904                                const lapack_int* ipiv, float* b,
8905                                lapack_int ldb );
8906lapack_int LAPACKE_dsytrs_work( int matrix_order, char uplo, lapack_int n,
8907                                lapack_int nrhs, const double* a,
8908                                lapack_int lda, const lapack_int* ipiv,
8909                                double* b, lapack_int ldb );
8910lapack_int LAPACKE_csytrs_work( int matrix_order, char uplo, lapack_int n,
8911                                lapack_int nrhs, const lapack_complex_float* a,
8912                                lapack_int lda, const lapack_int* ipiv,
8913                                lapack_complex_float* b, lapack_int ldb );
8914lapack_int LAPACKE_zsytrs_work( int matrix_order, char uplo, lapack_int n,
8915                                lapack_int nrhs, const lapack_complex_double* a,
8916                                lapack_int lda, const lapack_int* ipiv,
8917                                lapack_complex_double* b, lapack_int ldb );
8918
8919lapack_int LAPACKE_stbcon_work( int matrix_order, char norm, char uplo,
8920                                char diag, lapack_int n, lapack_int kd,
8921                                const float* ab, lapack_int ldab, float* rcond,
8922                                float* work, lapack_int* iwork );
8923lapack_int LAPACKE_dtbcon_work( int matrix_order, char norm, char uplo,
8924                                char diag, lapack_int n, lapack_int kd,
8925                                const double* ab, lapack_int ldab,
8926                                double* rcond, double* work,
8927                                lapack_int* iwork );
8928lapack_int LAPACKE_ctbcon_work( int matrix_order, char norm, char uplo,
8929                                char diag, lapack_int n, lapack_int kd,
8930                                const lapack_complex_float* ab, lapack_int ldab,
8931                                float* rcond, lapack_complex_float* work,
8932                                float* rwork );
8933lapack_int LAPACKE_ztbcon_work( int matrix_order, char norm, char uplo,
8934                                char diag, lapack_int n, lapack_int kd,
8935                                const lapack_complex_double* ab,
8936                                lapack_int ldab, double* rcond,
8937                                lapack_complex_double* work, double* rwork );
8938
8939lapack_int LAPACKE_stbrfs_work( int matrix_order, char uplo, char trans,
8940                                char diag, lapack_int n, lapack_int kd,
8941                                lapack_int nrhs, const float* ab,
8942                                lapack_int ldab, const float* b, lapack_int ldb,
8943                                const float* x, lapack_int ldx, float* ferr,
8944                                float* berr, float* work, lapack_int* iwork );
8945lapack_int LAPACKE_dtbrfs_work( int matrix_order, char uplo, char trans,
8946                                char diag, lapack_int n, lapack_int kd,
8947                                lapack_int nrhs, const double* ab,
8948                                lapack_int ldab, const double* b,
8949                                lapack_int ldb, const double* x, lapack_int ldx,
8950                                double* ferr, double* berr, double* work,
8951                                lapack_int* iwork );
8952lapack_int LAPACKE_ctbrfs_work( int matrix_order, char uplo, char trans,
8953                                char diag, lapack_int n, lapack_int kd,
8954                                lapack_int nrhs, const lapack_complex_float* ab,
8955                                lapack_int ldab, const lapack_complex_float* b,
8956                                lapack_int ldb, const lapack_complex_float* x,
8957                                lapack_int ldx, float* ferr, float* berr,
8958                                lapack_complex_float* work, float* rwork );
8959lapack_int LAPACKE_ztbrfs_work( int matrix_order, char uplo, char trans,
8960                                char diag, lapack_int n, lapack_int kd,
8961                                lapack_int nrhs,
8962                                const lapack_complex_double* ab,
8963                                lapack_int ldab, const lapack_complex_double* b,
8964                                lapack_int ldb, const lapack_complex_double* x,
8965                                lapack_int ldx, double* ferr, double* berr,
8966                                lapack_complex_double* work, double* rwork );
8967
8968lapack_int LAPACKE_stbtrs_work( int matrix_order, char uplo, char trans,
8969                                char diag, lapack_int n, lapack_int kd,
8970                                lapack_int nrhs, const float* ab,
8971                                lapack_int ldab, float* b, lapack_int ldb );
8972lapack_int LAPACKE_dtbtrs_work( int matrix_order, char uplo, char trans,
8973                                char diag, lapack_int n, lapack_int kd,
8974                                lapack_int nrhs, const double* ab,
8975                                lapack_int ldab, double* b, lapack_int ldb );
8976lapack_int LAPACKE_ctbtrs_work( int matrix_order, char uplo, char trans,
8977                                char diag, lapack_int n, lapack_int kd,
8978                                lapack_int nrhs, const lapack_complex_float* ab,
8979                                lapack_int ldab, lapack_complex_float* b,
8980                                lapack_int ldb );
8981lapack_int LAPACKE_ztbtrs_work( int matrix_order, char uplo, char trans,
8982                                char diag, lapack_int n, lapack_int kd,
8983                                lapack_int nrhs,
8984                                const lapack_complex_double* ab,
8985                                lapack_int ldab, lapack_complex_double* b,
8986                                lapack_int ldb );
8987
8988lapack_int LAPACKE_stfsm_work( int matrix_order, char transr, char side,
8989                               char uplo, char trans, char diag, lapack_int m,
8990                               lapack_int n, float alpha, const float* a,
8991                               float* b, lapack_int ldb );
8992lapack_int LAPACKE_dtfsm_work( int matrix_order, char transr, char side,
8993                               char uplo, char trans, char diag, lapack_int m,
8994                               lapack_int n, double alpha, const double* a,
8995                               double* b, lapack_int ldb );
8996lapack_int LAPACKE_ctfsm_work( int matrix_order, char transr, char side,
8997                               char uplo, char trans, char diag, lapack_int m,
8998                               lapack_int n, lapack_complex_float alpha,
8999                               const lapack_complex_float* a,
9000                               lapack_complex_float* b, lapack_int ldb );
9001lapack_int LAPACKE_ztfsm_work( int matrix_order, char transr, char side,
9002                               char uplo, char trans, char diag, lapack_int m,
9003                               lapack_int n, lapack_complex_double alpha,
9004                               const lapack_complex_double* a,
9005                               lapack_complex_double* b, lapack_int ldb );
9006
9007lapack_int LAPACKE_stftri_work( int matrix_order, char transr, char uplo,
9008                                char diag, lapack_int n, float* a );
9009lapack_int LAPACKE_dtftri_work( int matrix_order, char transr, char uplo,
9010                                char diag, lapack_int n, double* a );
9011lapack_int LAPACKE_ctftri_work( int matrix_order, char transr, char uplo,
9012                                char diag, lapack_int n,
9013                                lapack_complex_float* a );
9014lapack_int LAPACKE_ztftri_work( int matrix_order, char transr, char uplo,
9015                                char diag, lapack_int n,
9016                                lapack_complex_double* a );
9017
9018lapack_int LAPACKE_stfttp_work( int matrix_order, char transr, char uplo,
9019                                lapack_int n, const float* arf, float* ap );
9020lapack_int LAPACKE_dtfttp_work( int matrix_order, char transr, char uplo,
9021                                lapack_int n, const double* arf, double* ap );
9022lapack_int LAPACKE_ctfttp_work( int matrix_order, char transr, char uplo,
9023                                lapack_int n, const lapack_complex_float* arf,
9024                                lapack_complex_float* ap );
9025lapack_int LAPACKE_ztfttp_work( int matrix_order, char transr, char uplo,
9026                                lapack_int n, const lapack_complex_double* arf,
9027                                lapack_complex_double* ap );
9028
9029lapack_int LAPACKE_stfttr_work( int matrix_order, char transr, char uplo,
9030                                lapack_int n, const float* arf, float* a,
9031                                lapack_int lda );
9032lapack_int LAPACKE_dtfttr_work( int matrix_order, char transr, char uplo,
9033                                lapack_int n, const double* arf, double* a,
9034                                lapack_int lda );
9035lapack_int LAPACKE_ctfttr_work( int matrix_order, char transr, char uplo,
9036                                lapack_int n, const lapack_complex_float* arf,
9037                                lapack_complex_float* a, lapack_int lda );
9038lapack_int LAPACKE_ztfttr_work( int matrix_order, char transr, char uplo,
9039                                lapack_int n, const lapack_complex_double* arf,
9040                                lapack_complex_double* a, lapack_int lda );
9041
9042lapack_int LAPACKE_stgevc_work( int matrix_order, char side, char howmny,
9043                                const lapack_logical* select, lapack_int n,
9044                                const float* s, lapack_int lds, const float* p,
9045                                lapack_int ldp, float* vl, lapack_int ldvl,
9046                                float* vr, lapack_int ldvr, lapack_int mm,
9047                                lapack_int* m, float* work );
9048lapack_int LAPACKE_dtgevc_work( int matrix_order, char side, char howmny,
9049                                const lapack_logical* select, lapack_int n,
9050                                const double* s, lapack_int lds,
9051                                const double* p, lapack_int ldp, double* vl,
9052                                lapack_int ldvl, double* vr, lapack_int ldvr,
9053                                lapack_int mm, lapack_int* m, double* work );
9054lapack_int LAPACKE_ctgevc_work( int matrix_order, char side, char howmny,
9055                                const lapack_logical* select, lapack_int n,
9056                                const lapack_complex_float* s, lapack_int lds,
9057                                const lapack_complex_float* p, lapack_int ldp,
9058                                lapack_complex_float* vl, lapack_int ldvl,
9059                                lapack_complex_float* vr, lapack_int ldvr,
9060                                lapack_int mm, lapack_int* m,
9061                                lapack_complex_float* work, float* rwork );
9062lapack_int LAPACKE_ztgevc_work( int matrix_order, char side, char howmny,
9063                                const lapack_logical* select, lapack_int n,
9064                                const lapack_complex_double* s, lapack_int lds,
9065                                const lapack_complex_double* p, lapack_int ldp,
9066                                lapack_complex_double* vl, lapack_int ldvl,
9067                                lapack_complex_double* vr, lapack_int ldvr,
9068                                lapack_int mm, lapack_int* m,
9069                                lapack_complex_double* work, double* rwork );
9070
9071lapack_int LAPACKE_stgexc_work( int matrix_order, lapack_logical wantq,
9072                                lapack_logical wantz, lapack_int n, float* a,
9073                                lapack_int lda, float* b, lapack_int ldb,
9074                                float* q, lapack_int ldq, float* z,
9075                                lapack_int ldz, lapack_int* ifst,
9076                                lapack_int* ilst, float* work,
9077                                lapack_int lwork );
9078lapack_int LAPACKE_dtgexc_work( int matrix_order, lapack_logical wantq,
9079                                lapack_logical wantz, lapack_int n, double* a,
9080                                lapack_int lda, double* b, lapack_int ldb,
9081                                double* q, lapack_int ldq, double* z,
9082                                lapack_int ldz, lapack_int* ifst,
9083                                lapack_int* ilst, double* work,
9084                                lapack_int lwork );
9085lapack_int LAPACKE_ctgexc_work( int matrix_order, lapack_logical wantq,
9086                                lapack_logical wantz, lapack_int n,
9087                                lapack_complex_float* a, lapack_int lda,
9088                                lapack_complex_float* b, lapack_int ldb,
9089                                lapack_complex_float* q, lapack_int ldq,
9090                                lapack_complex_float* z, lapack_int ldz,
9091                                lapack_int ifst, lapack_int ilst );
9092lapack_int LAPACKE_ztgexc_work( int matrix_order, lapack_logical wantq,
9093                                lapack_logical wantz, lapack_int n,
9094                                lapack_complex_double* a, lapack_int lda,
9095                                lapack_complex_double* b, lapack_int ldb,
9096                                lapack_complex_double* q, lapack_int ldq,
9097                                lapack_complex_double* z, lapack_int ldz,
9098                                lapack_int ifst, lapack_int ilst );
9099
9100lapack_int LAPACKE_stgsen_work( int matrix_order, lapack_int ijob,
9101                                lapack_logical wantq, lapack_logical wantz,
9102                                const lapack_logical* select, lapack_int n,
9103                                float* a, lapack_int lda, float* b,
9104                                lapack_int ldb, float* alphar, float* alphai,
9105                                float* beta, float* q, lapack_int ldq, float* z,
9106                                lapack_int ldz, lapack_int* m, float* pl,
9107                                float* pr, float* dif, float* work,
9108                                lapack_int lwork, lapack_int* iwork,
9109                                lapack_int liwork );
9110lapack_int LAPACKE_dtgsen_work( int matrix_order, lapack_int ijob,
9111                                lapack_logical wantq, lapack_logical wantz,
9112                                const lapack_logical* select, lapack_int n,
9113                                double* a, lapack_int lda, double* b,
9114                                lapack_int ldb, double* alphar, double* alphai,
9115                                double* beta, double* q, lapack_int ldq,
9116                                double* z, lapack_int ldz, lapack_int* m,
9117                                double* pl, double* pr, double* dif,
9118                                double* work, lapack_int lwork,
9119                                lapack_int* iwork, lapack_int liwork );
9120lapack_int LAPACKE_ctgsen_work( int matrix_order, lapack_int ijob,
9121                                lapack_logical wantq, lapack_logical wantz,
9122                                const lapack_logical* select, lapack_int n,
9123                                lapack_complex_float* a, lapack_int lda,
9124                                lapack_complex_float* b, lapack_int ldb,
9125                                lapack_complex_float* alpha,
9126                                lapack_complex_float* beta,
9127                                lapack_complex_float* q, lapack_int ldq,
9128                                lapack_complex_float* z, lapack_int ldz,
9129                                lapack_int* m, float* pl, float* pr, float* dif,
9130                                lapack_complex_float* work, lapack_int lwork,
9131                                lapack_int* iwork, lapack_int liwork );
9132lapack_int LAPACKE_ztgsen_work( int matrix_order, lapack_int ijob,
9133                                lapack_logical wantq, lapack_logical wantz,
9134                                const lapack_logical* select, lapack_int n,
9135                                lapack_complex_double* a, lapack_int lda,
9136                                lapack_complex_double* b, lapack_int ldb,
9137                                lapack_complex_double* alpha,
9138                                lapack_complex_double* beta,
9139                                lapack_complex_double* q, lapack_int ldq,
9140                                lapack_complex_double* z, lapack_int ldz,
9141                                lapack_int* m, double* pl, double* pr,
9142                                double* dif, lapack_complex_double* work,
9143                                lapack_int lwork, lapack_int* iwork,
9144                                lapack_int liwork );
9145
9146lapack_int LAPACKE_stgsja_work( int matrix_order, char jobu, char jobv,
9147                                char jobq, lapack_int m, lapack_int p,
9148                                lapack_int n, lapack_int k, lapack_int l,
9149                                float* a, lapack_int lda, float* b,
9150                                lapack_int ldb, float tola, float tolb,
9151                                float* alpha, float* beta, float* u,
9152                                lapack_int ldu, float* v, lapack_int ldv,
9153                                float* q, lapack_int ldq, float* work,
9154                                lapack_int* ncycle );
9155lapack_int LAPACKE_dtgsja_work( int matrix_order, char jobu, char jobv,
9156                                char jobq, lapack_int m, lapack_int p,
9157                                lapack_int n, lapack_int k, lapack_int l,
9158                                double* a, lapack_int lda, double* b,
9159                                lapack_int ldb, double tola, double tolb,
9160                                double* alpha, double* beta, double* u,
9161                                lapack_int ldu, double* v, lapack_int ldv,
9162                                double* q, lapack_int ldq, double* work,
9163                                lapack_int* ncycle );
9164lapack_int LAPACKE_ctgsja_work( int matrix_order, char jobu, char jobv,
9165                                char jobq, lapack_int m, lapack_int p,
9166                                lapack_int n, lapack_int k, lapack_int l,
9167                                lapack_complex_float* a, lapack_int lda,
9168                                lapack_complex_float* b, lapack_int ldb,
9169                                float tola, float tolb, float* alpha,
9170                                float* beta, lapack_complex_float* u,
9171                                lapack_int ldu, lapack_complex_float* v,
9172                                lapack_int ldv, lapack_complex_float* q,
9173                                lapack_int ldq, lapack_complex_float* work,
9174                                lapack_int* ncycle );
9175lapack_int LAPACKE_ztgsja_work( int matrix_order, char jobu, char jobv,
9176                                char jobq, lapack_int m, lapack_int p,
9177                                lapack_int n, lapack_int k, lapack_int l,
9178                                lapack_complex_double* a, lapack_int lda,
9179                                lapack_complex_double* b, lapack_int ldb,
9180                                double tola, double tolb, double* alpha,
9181                                double* beta, lapack_complex_double* u,
9182                                lapack_int ldu, lapack_complex_double* v,
9183                                lapack_int ldv, lapack_complex_double* q,
9184                                lapack_int ldq, lapack_complex_double* work,
9185                                lapack_int* ncycle );
9186
9187lapack_int LAPACKE_stgsna_work( int matrix_order, char job, char howmny,
9188                                const lapack_logical* select, lapack_int n,
9189                                const float* a, lapack_int lda, const float* b,
9190                                lapack_int ldb, const float* vl,
9191                                lapack_int ldvl, const float* vr,
9192                                lapack_int ldvr, float* s, float* dif,
9193                                lapack_int mm, lapack_int* m, float* work,
9194                                lapack_int lwork, lapack_int* iwork );
9195lapack_int LAPACKE_dtgsna_work( int matrix_order, char job, char howmny,
9196                                const lapack_logical* select, lapack_int n,
9197                                const double* a, lapack_int lda,
9198                                const double* b, lapack_int ldb,
9199                                const double* vl, lapack_int ldvl,
9200                                const double* vr, lapack_int ldvr, double* s,
9201                                double* dif, lapack_int mm, lapack_int* m,
9202                                double* work, lapack_int lwork,
9203                                lapack_int* iwork );
9204lapack_int LAPACKE_ctgsna_work( int matrix_order, char job, char howmny,
9205                                const lapack_logical* select, lapack_int n,
9206                                const lapack_complex_float* a, lapack_int lda,
9207                                const lapack_complex_float* b, lapack_int ldb,
9208                                const lapack_complex_float* vl, lapack_int ldvl,
9209                                const lapack_complex_float* vr, lapack_int ldvr,
9210                                float* s, float* dif, lapack_int mm,
9211                                lapack_int* m, lapack_complex_float* work,
9212                                lapack_int lwork, lapack_int* iwork );
9213lapack_int LAPACKE_ztgsna_work( int matrix_order, char job, char howmny,
9214                                const lapack_logical* select, lapack_int n,
9215                                const lapack_complex_double* a, lapack_int lda,
9216                                const lapack_complex_double* b, lapack_int ldb,
9217                                const lapack_complex_double* vl,
9218                                lapack_int ldvl,
9219                                const lapack_complex_double* vr,
9220                                lapack_int ldvr, double* s, double* dif,
9221                                lapack_int mm, lapack_int* m,
9222                                lapack_complex_double* work, lapack_int lwork,
9223                                lapack_int* iwork );
9224
9225lapack_int LAPACKE_stgsyl_work( int matrix_order, char trans, lapack_int ijob,
9226                                lapack_int m, lapack_int n, const float* a,
9227                                lapack_int lda, const float* b, lapack_int ldb,
9228                                float* c, lapack_int ldc, const float* d,
9229                                lapack_int ldd, const float* e, lapack_int lde,
9230                                float* f, lapack_int ldf, float* scale,
9231                                float* dif, float* work, lapack_int lwork,
9232                                lapack_int* iwork );
9233lapack_int LAPACKE_dtgsyl_work( int matrix_order, char trans, lapack_int ijob,
9234                                lapack_int m, lapack_int n, const double* a,
9235                                lapack_int lda, const double* b, lapack_int ldb,
9236                                double* c, lapack_int ldc, const double* d,
9237                                lapack_int ldd, const double* e, lapack_int lde,
9238                                double* f, lapack_int ldf, double* scale,
9239                                double* dif, double* work, lapack_int lwork,
9240                                lapack_int* iwork );
9241lapack_int LAPACKE_ctgsyl_work( int matrix_order, char trans, lapack_int ijob,
9242                                lapack_int m, lapack_int n,
9243                                const lapack_complex_float* a, lapack_int lda,
9244                                const lapack_complex_float* b, lapack_int ldb,
9245                                lapack_complex_float* c, lapack_int ldc,
9246                                const lapack_complex_float* d, lapack_int ldd,
9247                                const lapack_complex_float* e, lapack_int lde,
9248                                lapack_complex_float* f, lapack_int ldf,
9249                                float* scale, float* dif,
9250                                lapack_complex_float* work, lapack_int lwork,
9251                                lapack_int* iwork );
9252lapack_int LAPACKE_ztgsyl_work( int matrix_order, char trans, lapack_int ijob,
9253                                lapack_int m, lapack_int n,
9254                                const lapack_complex_double* a, lapack_int lda,
9255                                const lapack_complex_double* b, lapack_int ldb,
9256                                lapack_complex_double* c, lapack_int ldc,
9257                                const lapack_complex_double* d, lapack_int ldd,
9258                                const lapack_complex_double* e, lapack_int lde,
9259                                lapack_complex_double* f, lapack_int ldf,
9260                                double* scale, double* dif,
9261                                lapack_complex_double* work, lapack_int lwork,
9262                                lapack_int* iwork );
9263
9264lapack_int LAPACKE_stpcon_work( int matrix_order, char norm, char uplo,
9265                                char diag, lapack_int n, const float* ap,
9266                                float* rcond, float* work, lapack_int* iwork );
9267lapack_int LAPACKE_dtpcon_work( int matrix_order, char norm, char uplo,
9268                                char diag, lapack_int n, const double* ap,
9269                                double* rcond, double* work,
9270                                lapack_int* iwork );
9271lapack_int LAPACKE_ctpcon_work( int matrix_order, char norm, char uplo,
9272                                char diag, lapack_int n,
9273                                const lapack_complex_float* ap, float* rcond,
9274                                lapack_complex_float* work, float* rwork );
9275lapack_int LAPACKE_ztpcon_work( int matrix_order, char norm, char uplo,
9276                                char diag, lapack_int n,
9277                                const lapack_complex_double* ap, double* rcond,
9278                                lapack_complex_double* work, double* rwork );
9279
9280lapack_int LAPACKE_stprfs_work( int matrix_order, char uplo, char trans,
9281                                char diag, lapack_int n, lapack_int nrhs,
9282                                const float* ap, const float* b, lapack_int ldb,
9283                                const float* x, lapack_int ldx, float* ferr,
9284                                float* berr, float* work, lapack_int* iwork );
9285lapack_int LAPACKE_dtprfs_work( int matrix_order, char uplo, char trans,
9286                                char diag, lapack_int n, lapack_int nrhs,
9287                                const double* ap, const double* b,
9288                                lapack_int ldb, const double* x, lapack_int ldx,
9289                                double* ferr, double* berr, double* work,
9290                                lapack_int* iwork );
9291lapack_int LAPACKE_ctprfs_work( int matrix_order, char uplo, char trans,
9292                                char diag, lapack_int n, lapack_int nrhs,
9293                                const lapack_complex_float* ap,
9294                                const lapack_complex_float* b, lapack_int ldb,
9295                                const lapack_complex_float* x, lapack_int ldx,
9296                                float* ferr, float* berr,
9297                                lapack_complex_float* work, float* rwork );
9298lapack_int LAPACKE_ztprfs_work( int matrix_order, char uplo, char trans,
9299                                char diag, lapack_int n, lapack_int nrhs,
9300                                const lapack_complex_double* ap,
9301                                const lapack_complex_double* b, lapack_int ldb,
9302                                const lapack_complex_double* x, lapack_int ldx,
9303                                double* ferr, double* berr,
9304                                lapack_complex_double* work, double* rwork );
9305
9306lapack_int LAPACKE_stptri_work( int matrix_order, char uplo, char diag,
9307                                lapack_int n, float* ap );
9308lapack_int LAPACKE_dtptri_work( int matrix_order, char uplo, char diag,
9309                                lapack_int n, double* ap );
9310lapack_int LAPACKE_ctptri_work( int matrix_order, char uplo, char diag,
9311                                lapack_int n, lapack_complex_float* ap );
9312lapack_int LAPACKE_ztptri_work( int matrix_order, char uplo, char diag,
9313                                lapack_int n, lapack_complex_double* ap );
9314
9315lapack_int LAPACKE_stptrs_work( int matrix_order, char uplo, char trans,
9316                                char diag, lapack_int n, lapack_int nrhs,
9317                                const float* ap, float* b, lapack_int ldb );
9318lapack_int LAPACKE_dtptrs_work( int matrix_order, char uplo, char trans,
9319                                char diag, lapack_int n, lapack_int nrhs,
9320                                const double* ap, double* b, lapack_int ldb );
9321lapack_int LAPACKE_ctptrs_work( int matrix_order, char uplo, char trans,
9322                                char diag, lapack_int n, lapack_int nrhs,
9323                                const lapack_complex_float* ap,
9324                                lapack_complex_float* b, lapack_int ldb );
9325lapack_int LAPACKE_ztptrs_work( int matrix_order, char uplo, char trans,
9326                                char diag, lapack_int n, lapack_int nrhs,
9327                                const lapack_complex_double* ap,
9328                                lapack_complex_double* b, lapack_int ldb );
9329
9330lapack_int LAPACKE_stpttf_work( int matrix_order, char transr, char uplo,
9331                                lapack_int n, const float* ap, float* arf );
9332lapack_int LAPACKE_dtpttf_work( int matrix_order, char transr, char uplo,
9333                                lapack_int n, const double* ap, double* arf );
9334lapack_int LAPACKE_ctpttf_work( int matrix_order, char transr, char uplo,
9335                                lapack_int n, const lapack_complex_float* ap,
9336                                lapack_complex_float* arf );
9337lapack_int LAPACKE_ztpttf_work( int matrix_order, char transr, char uplo,
9338                                lapack_int n, const lapack_complex_double* ap,
9339                                lapack_complex_double* arf );
9340
9341lapack_int LAPACKE_stpttr_work( int matrix_order, char uplo, lapack_int n,
9342                                const float* ap, float* a, lapack_int lda );
9343lapack_int LAPACKE_dtpttr_work( int matrix_order, char uplo, lapack_int n,
9344                                const double* ap, double* a, lapack_int lda );
9345lapack_int LAPACKE_ctpttr_work( int matrix_order, char uplo, lapack_int n,
9346                                const lapack_complex_float* ap,
9347                                lapack_complex_float* a, lapack_int lda );
9348lapack_int LAPACKE_ztpttr_work( int matrix_order, char uplo, lapack_int n,
9349                                const lapack_complex_double* ap,
9350                                lapack_complex_double* a, lapack_int lda );
9351
9352lapack_int LAPACKE_strcon_work( int matrix_order, char norm, char uplo,
9353                                char diag, lapack_int n, const float* a,
9354                                lapack_int lda, float* rcond, float* work,
9355                                lapack_int* iwork );
9356lapack_int LAPACKE_dtrcon_work( int matrix_order, char norm, char uplo,
9357                                char diag, lapack_int n, const double* a,
9358                                lapack_int lda, double* rcond, double* work,
9359                                lapack_int* iwork );
9360lapack_int LAPACKE_ctrcon_work( int matrix_order, char norm, char uplo,
9361                                char diag, lapack_int n,
9362                                const lapack_complex_float* a, lapack_int lda,
9363                                float* rcond, lapack_complex_float* work,
9364                                float* rwork );
9365lapack_int LAPACKE_ztrcon_work( int matrix_order, char norm, char uplo,
9366                                char diag, lapack_int n,
9367                                const lapack_complex_double* a, lapack_int lda,
9368                                double* rcond, lapack_complex_double* work,
9369                                double* rwork );
9370
9371lapack_int LAPACKE_strevc_work( int matrix_order, char side, char howmny,
9372                                lapack_logical* select, lapack_int n,
9373                                const float* t, lapack_int ldt, float* vl,
9374                                lapack_int ldvl, float* vr, lapack_int ldvr,
9375                                lapack_int mm, lapack_int* m, float* work );
9376lapack_int LAPACKE_dtrevc_work( int matrix_order, char side, char howmny,
9377                                lapack_logical* select, lapack_int n,
9378                                const double* t, lapack_int ldt, double* vl,
9379                                lapack_int ldvl, double* vr, lapack_int ldvr,
9380                                lapack_int mm, lapack_int* m, double* work );
9381lapack_int LAPACKE_ctrevc_work( int matrix_order, char side, char howmny,
9382                                const lapack_logical* select, lapack_int n,
9383                                lapack_complex_float* t, lapack_int ldt,
9384                                lapack_complex_float* vl, lapack_int ldvl,
9385                                lapack_complex_float* vr, lapack_int ldvr,
9386                                lapack_int mm, lapack_int* m,
9387                                lapack_complex_float* work, float* rwork );
9388lapack_int LAPACKE_ztrevc_work( int matrix_order, char side, char howmny,
9389                                const lapack_logical* select, lapack_int n,
9390                                lapack_complex_double* t, lapack_int ldt,
9391                                lapack_complex_double* vl, lapack_int ldvl,
9392                                lapack_complex_double* vr, lapack_int ldvr,
9393                                lapack_int mm, lapack_int* m,
9394                                lapack_complex_double* work, double* rwork );
9395
9396lapack_int LAPACKE_strexc_work( int matrix_order, char compq, lapack_int n,
9397                                float* t, lapack_int ldt, float* q,
9398                                lapack_int ldq, lapack_int* ifst,
9399                                lapack_int* ilst, float* work );
9400lapack_int LAPACKE_dtrexc_work( int matrix_order, char compq, lapack_int n,
9401                                double* t, lapack_int ldt, double* q,
9402                                lapack_int ldq, lapack_int* ifst,
9403                                lapack_int* ilst, double* work );
9404lapack_int LAPACKE_ctrexc_work( int matrix_order, char compq, lapack_int n,
9405                                lapack_complex_float* t, lapack_int ldt,
9406                                lapack_complex_float* q, lapack_int ldq,
9407                                lapack_int ifst, lapack_int ilst );
9408lapack_int LAPACKE_ztrexc_work( int matrix_order, char compq, lapack_int n,
9409                                lapack_complex_double* t, lapack_int ldt,
9410                                lapack_complex_double* q, lapack_int ldq,
9411                                lapack_int ifst, lapack_int ilst );
9412
9413lapack_int LAPACKE_strrfs_work( int matrix_order, char uplo, char trans,
9414                                char diag, lapack_int n, lapack_int nrhs,
9415                                const float* a, lapack_int lda, const float* b,
9416                                lapack_int ldb, const float* x, lapack_int ldx,
9417                                float* ferr, float* berr, float* work,
9418                                lapack_int* iwork );
9419lapack_int LAPACKE_dtrrfs_work( int matrix_order, char uplo, char trans,
9420                                char diag, lapack_int n, lapack_int nrhs,
9421                                const double* a, lapack_int lda,
9422                                const double* b, lapack_int ldb,
9423                                const double* x, lapack_int ldx, double* ferr,
9424                                double* berr, double* work, lapack_int* iwork );
9425lapack_int LAPACKE_ctrrfs_work( int matrix_order, char uplo, char trans,
9426                                char diag, lapack_int n, lapack_int nrhs,
9427                                const lapack_complex_float* a, lapack_int lda,
9428                                const lapack_complex_float* b, lapack_int ldb,
9429                                const lapack_complex_float* x, lapack_int ldx,
9430                                float* ferr, float* berr,
9431                                lapack_complex_float* work, float* rwork );
9432lapack_int LAPACKE_ztrrfs_work( int matrix_order, char uplo, char trans,
9433                                char diag, lapack_int n, lapack_int nrhs,
9434                                const lapack_complex_double* a, lapack_int lda,
9435                                const lapack_complex_double* b, lapack_int ldb,
9436                                const lapack_complex_double* x, lapack_int ldx,
9437                                double* ferr, double* berr,
9438                                lapack_complex_double* work, double* rwork );
9439
9440lapack_int LAPACKE_strsen_work( int matrix_order, char job, char compq,
9441                                const lapack_logical* select, lapack_int n,
9442                                float* t, lapack_int ldt, float* q,
9443                                lapack_int ldq, float* wr, float* wi,
9444                                lapack_int* m, float* s, float* sep,
9445                                float* work, lapack_int lwork,
9446                                lapack_int* iwork, lapack_int liwork );
9447lapack_int LAPACKE_dtrsen_work( int matrix_order, char job, char compq,
9448                                const lapack_logical* select, lapack_int n,
9449                                double* t, lapack_int ldt, double* q,
9450                                lapack_int ldq, double* wr, double* wi,
9451                                lapack_int* m, double* s, double* sep,
9452                                double* work, lapack_int lwork,
9453                                lapack_int* iwork, lapack_int liwork );
9454lapack_int LAPACKE_ctrsen_work( int matrix_order, char job, char compq,
9455                                const lapack_logical* select, lapack_int n,
9456                                lapack_complex_float* t, lapack_int ldt,
9457                                lapack_complex_float* q, lapack_int ldq,
9458                                lapack_complex_float* w, lapack_int* m,
9459                                float* s, float* sep,
9460                                lapack_complex_float* work, lapack_int lwork );
9461lapack_int LAPACKE_ztrsen_work( int matrix_order, char job, char compq,
9462                                const lapack_logical* select, lapack_int n,
9463                                lapack_complex_double* t, lapack_int ldt,
9464                                lapack_complex_double* q, lapack_int ldq,
9465                                lapack_complex_double* w, lapack_int* m,
9466                                double* s, double* sep,
9467                                lapack_complex_double* work, lapack_int lwork );
9468
9469lapack_int LAPACKE_strsna_work( int matrix_order, char job, char howmny,
9470                                const lapack_logical* select, lapack_int n,
9471                                const float* t, lapack_int ldt, const float* vl,
9472                                lapack_int ldvl, const float* vr,
9473                                lapack_int ldvr, float* s, float* sep,
9474                                lapack_int mm, lapack_int* m, float* work,
9475                                lapack_int ldwork, lapack_int* iwork );
9476lapack_int LAPACKE_dtrsna_work( int matrix_order, char job, char howmny,
9477                                const lapack_logical* select, lapack_int n,
9478                                const double* t, lapack_int ldt,
9479                                const double* vl, lapack_int ldvl,
9480                                const double* vr, lapack_int ldvr, double* s,
9481                                double* sep, lapack_int mm, lapack_int* m,
9482                                double* work, lapack_int ldwork,
9483                                lapack_int* iwork );
9484lapack_int LAPACKE_ctrsna_work( int matrix_order, char job, char howmny,
9485                                const lapack_logical* select, lapack_int n,
9486                                const lapack_complex_float* t, lapack_int ldt,
9487                                const lapack_complex_float* vl, lapack_int ldvl,
9488                                const lapack_complex_float* vr, lapack_int ldvr,
9489                                float* s, float* sep, lapack_int mm,
9490                                lapack_int* m, lapack_complex_float* work,
9491                                lapack_int ldwork, float* rwork );
9492lapack_int LAPACKE_ztrsna_work( int matrix_order, char job, char howmny,
9493                                const lapack_logical* select, lapack_int n,
9494                                const lapack_complex_double* t, lapack_int ldt,
9495                                const lapack_complex_double* vl,
9496                                lapack_int ldvl,
9497                                const lapack_complex_double* vr,
9498                                lapack_int ldvr, double* s, double* sep,
9499                                lapack_int mm, lapack_int* m,
9500                                lapack_complex_double* work, lapack_int ldwork,
9501                                double* rwork );
9502
9503lapack_int LAPACKE_strsyl_work( int matrix_order, char trana, char tranb,
9504                                lapack_int isgn, lapack_int m, lapack_int n,
9505                                const float* a, lapack_int lda, const float* b,
9506                                lapack_int ldb, float* c, lapack_int ldc,
9507                                float* scale );
9508lapack_int LAPACKE_dtrsyl_work( int matrix_order, char trana, char tranb,
9509                                lapack_int isgn, lapack_int m, lapack_int n,
9510                                const double* a, lapack_int lda,
9511                                const double* b, lapack_int ldb, double* c,
9512                                lapack_int ldc, double* scale );
9513lapack_int LAPACKE_ctrsyl_work( int matrix_order, char trana, char tranb,
9514                                lapack_int isgn, lapack_int m, lapack_int n,
9515                                const lapack_complex_float* a, lapack_int lda,
9516                                const lapack_complex_float* b, lapack_int ldb,
9517                                lapack_complex_float* c, lapack_int ldc,
9518                                float* scale );
9519lapack_int LAPACKE_ztrsyl_work( int matrix_order, char trana, char tranb,
9520                                lapack_int isgn, lapack_int m, lapack_int n,
9521                                const lapack_complex_double* a, lapack_int lda,
9522                                const lapack_complex_double* b, lapack_int ldb,
9523                                lapack_complex_double* c, lapack_int ldc,
9524                                double* scale );
9525
9526lapack_int LAPACKE_strtri_work( int matrix_order, char uplo, char diag,
9527                                lapack_int n, float* a, lapack_int lda );
9528lapack_int LAPACKE_dtrtri_work( int matrix_order, char uplo, char diag,
9529                                lapack_int n, double* a, lapack_int lda );
9530lapack_int LAPACKE_ctrtri_work( int matrix_order, char uplo, char diag,
9531                                lapack_int n, lapack_complex_float* a,
9532                                lapack_int lda );
9533lapack_int LAPACKE_ztrtri_work( int matrix_order, char uplo, char diag,
9534                                lapack_int n, lapack_complex_double* a,
9535                                lapack_int lda );
9536
9537lapack_int LAPACKE_strtrs_work( int matrix_order, char uplo, char trans,
9538                                char diag, lapack_int n, lapack_int nrhs,
9539                                const float* a, lapack_int lda, float* b,
9540                                lapack_int ldb );
9541lapack_int LAPACKE_dtrtrs_work( int matrix_order, char uplo, char trans,
9542                                char diag, lapack_int n, lapack_int nrhs,
9543                                const double* a, lapack_int lda, double* b,
9544                                lapack_int ldb );
9545lapack_int LAPACKE_ctrtrs_work( int matrix_order, char uplo, char trans,
9546                                char diag, lapack_int n, lapack_int nrhs,
9547                                const lapack_complex_float* a, lapack_int lda,
9548                                lapack_complex_float* b, lapack_int ldb );
9549lapack_int LAPACKE_ztrtrs_work( int matrix_order, char uplo, char trans,
9550                                char diag, lapack_int n, lapack_int nrhs,
9551                                const lapack_complex_double* a, lapack_int lda,
9552                                lapack_complex_double* b, lapack_int ldb );
9553
9554lapack_int LAPACKE_strttf_work( int matrix_order, char transr, char uplo,
9555                                lapack_int n, const float* a, lapack_int lda,
9556                                float* arf );
9557lapack_int LAPACKE_dtrttf_work( int matrix_order, char transr, char uplo,
9558                                lapack_int n, const double* a, lapack_int lda,
9559                                double* arf );
9560lapack_int LAPACKE_ctrttf_work( int matrix_order, char transr, char uplo,
9561                                lapack_int n, const lapack_complex_float* a,
9562                                lapack_int lda, lapack_complex_float* arf );
9563lapack_int LAPACKE_ztrttf_work( int matrix_order, char transr, char uplo,
9564                                lapack_int n, const lapack_complex_double* a,
9565                                lapack_int lda, lapack_complex_double* arf );
9566
9567lapack_int LAPACKE_strttp_work( int matrix_order, char uplo, lapack_int n,
9568                                const float* a, lapack_int lda, float* ap );
9569lapack_int LAPACKE_dtrttp_work( int matrix_order, char uplo, lapack_int n,
9570                                const double* a, lapack_int lda, double* ap );
9571lapack_int LAPACKE_ctrttp_work( int matrix_order, char uplo, lapack_int n,
9572                                const lapack_complex_float* a, lapack_int lda,
9573                                lapack_complex_float* ap );
9574lapack_int LAPACKE_ztrttp_work( int matrix_order, char uplo, lapack_int n,
9575                                const lapack_complex_double* a, lapack_int lda,
9576                                lapack_complex_double* ap );
9577
9578lapack_int LAPACKE_stzrzf_work( int matrix_order, lapack_int m, lapack_int n,
9579                                float* a, lapack_int lda, float* tau,
9580                                float* work, lapack_int lwork );
9581lapack_int LAPACKE_dtzrzf_work( int matrix_order, lapack_int m, lapack_int n,
9582                                double* a, lapack_int lda, double* tau,
9583                                double* work, lapack_int lwork );
9584lapack_int LAPACKE_ctzrzf_work( int matrix_order, lapack_int m, lapack_int n,
9585                                lapack_complex_float* a, lapack_int lda,
9586                                lapack_complex_float* tau,
9587                                lapack_complex_float* work, lapack_int lwork );
9588lapack_int LAPACKE_ztzrzf_work( int matrix_order, lapack_int m, lapack_int n,
9589                                lapack_complex_double* a, lapack_int lda,
9590                                lapack_complex_double* tau,
9591                                lapack_complex_double* work, lapack_int lwork );
9592
9593lapack_int LAPACKE_cungbr_work( int matrix_order, char vect, lapack_int m,
9594                                lapack_int n, lapack_int k,
9595                                lapack_complex_float* a, lapack_int lda,
9596                                const lapack_complex_float* tau,
9597                                lapack_complex_float* work, lapack_int lwork );
9598lapack_int LAPACKE_zungbr_work( int matrix_order, char vect, lapack_int m,
9599                                lapack_int n, lapack_int k,
9600                                lapack_complex_double* a, lapack_int lda,
9601                                const lapack_complex_double* tau,
9602                                lapack_complex_double* work, lapack_int lwork );
9603
9604lapack_int LAPACKE_cunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
9605                                lapack_int ihi, lapack_complex_float* a,
9606                                lapack_int lda, const lapack_complex_float* tau,
9607                                lapack_complex_float* work, lapack_int lwork );
9608lapack_int LAPACKE_zunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
9609                                lapack_int ihi, lapack_complex_double* a,
9610                                lapack_int lda,
9611                                const lapack_complex_double* tau,
9612                                lapack_complex_double* work, lapack_int lwork );
9613
9614lapack_int LAPACKE_cunglq_work( int matrix_order, lapack_int m, lapack_int n,
9615                                lapack_int k, lapack_complex_float* a,
9616                                lapack_int lda, const lapack_complex_float* tau,
9617                                lapack_complex_float* work, lapack_int lwork );
9618lapack_int LAPACKE_zunglq_work( int matrix_order, lapack_int m, lapack_int n,
9619                                lapack_int k, lapack_complex_double* a,
9620                                lapack_int lda,
9621                                const lapack_complex_double* tau,
9622                                lapack_complex_double* work, lapack_int lwork );
9623
9624lapack_int LAPACKE_cungql_work( int matrix_order, lapack_int m, lapack_int n,
9625                                lapack_int k, lapack_complex_float* a,
9626                                lapack_int lda, const lapack_complex_float* tau,
9627                                lapack_complex_float* work, lapack_int lwork );
9628lapack_int LAPACKE_zungql_work( int matrix_order, lapack_int m, lapack_int n,
9629                                lapack_int k, lapack_complex_double* a,
9630                                lapack_int lda,
9631                                const lapack_complex_double* tau,
9632                                lapack_complex_double* work, lapack_int lwork );
9633
9634lapack_int LAPACKE_cungqr_work( int matrix_order, lapack_int m, lapack_int n,
9635                                lapack_int k, lapack_complex_float* a,
9636                                lapack_int lda, const lapack_complex_float* tau,
9637                                lapack_complex_float* work, lapack_int lwork );
9638lapack_int LAPACKE_zungqr_work( int matrix_order, lapack_int m, lapack_int n,
9639                                lapack_int k, lapack_complex_double* a,
9640                                lapack_int lda,
9641                                const lapack_complex_double* tau,
9642                                lapack_complex_double* work, lapack_int lwork );
9643
9644lapack_int LAPACKE_cungrq_work( int matrix_order, lapack_int m, lapack_int n,
9645                                lapack_int k, lapack_complex_float* a,
9646                                lapack_int lda, const lapack_complex_float* tau,
9647                                lapack_complex_float* work, lapack_int lwork );
9648lapack_int LAPACKE_zungrq_work( int matrix_order, lapack_int m, lapack_int n,
9649                                lapack_int k, lapack_complex_double* a,
9650                                lapack_int lda,
9651                                const lapack_complex_double* tau,
9652                                lapack_complex_double* work, lapack_int lwork );
9653
9654lapack_int LAPACKE_cungtr_work( int matrix_order, char uplo, lapack_int n,
9655                                lapack_complex_float* a, lapack_int lda,
9656                                const lapack_complex_float* tau,
9657                                lapack_complex_float* work, lapack_int lwork );
9658lapack_int LAPACKE_zungtr_work( int matrix_order, char uplo, lapack_int n,
9659                                lapack_complex_double* a, lapack_int lda,
9660                                const lapack_complex_double* tau,
9661                                lapack_complex_double* work, lapack_int lwork );
9662
9663lapack_int LAPACKE_cunmbr_work( int matrix_order, char vect, char side,
9664                                char trans, lapack_int m, lapack_int n,
9665                                lapack_int k, const lapack_complex_float* a,
9666                                lapack_int lda, const lapack_complex_float* tau,
9667                                lapack_complex_float* c, lapack_int ldc,
9668                                lapack_complex_float* work, lapack_int lwork );
9669lapack_int LAPACKE_zunmbr_work( int matrix_order, char vect, char side,
9670                                char trans, lapack_int m, lapack_int n,
9671                                lapack_int k, const lapack_complex_double* a,
9672                                lapack_int lda,
9673                                const lapack_complex_double* tau,
9674                                lapack_complex_double* c, lapack_int ldc,
9675                                lapack_complex_double* work, lapack_int lwork );
9676
9677lapack_int LAPACKE_cunmhr_work( int matrix_order, char side, char trans,
9678                                lapack_int m, lapack_int n, lapack_int ilo,
9679                                lapack_int ihi, const lapack_complex_float* a,
9680                                lapack_int lda, const lapack_complex_float* tau,
9681                                lapack_complex_float* c, lapack_int ldc,
9682                                lapack_complex_float* work, lapack_int lwork );
9683lapack_int LAPACKE_zunmhr_work( int matrix_order, char side, char trans,
9684                                lapack_int m, lapack_int n, lapack_int ilo,
9685                                lapack_int ihi, const lapack_complex_double* a,
9686                                lapack_int lda,
9687                                const lapack_complex_double* tau,
9688                                lapack_complex_double* c, lapack_int ldc,
9689                                lapack_complex_double* work, lapack_int lwork );
9690
9691lapack_int LAPACKE_cunmlq_work( int matrix_order, char side, char trans,
9692                                lapack_int m, lapack_int n, lapack_int k,
9693                                const lapack_complex_float* a, lapack_int lda,
9694                                const lapack_complex_float* tau,
9695                                lapack_complex_float* c, lapack_int ldc,
9696                                lapack_complex_float* work, lapack_int lwork );
9697lapack_int LAPACKE_zunmlq_work( int matrix_order, char side, char trans,
9698                                lapack_int m, lapack_int n, lapack_int k,
9699                                const lapack_complex_double* a, lapack_int lda,
9700                                const lapack_complex_double* tau,
9701                                lapack_complex_double* c, lapack_int ldc,
9702                                lapack_complex_double* work, lapack_int lwork );
9703
9704lapack_int LAPACKE_cunmql_work( int matrix_order, char side, char trans,
9705                                lapack_int m, lapack_int n, lapack_int k,
9706                                const lapack_complex_float* a, lapack_int lda,
9707                                const lapack_complex_float* tau,
9708                                lapack_complex_float* c, lapack_int ldc,
9709                                lapack_complex_float* work, lapack_int lwork );
9710lapack_int LAPACKE_zunmql_work( int matrix_order, char side, char trans,
9711                                lapack_int m, lapack_int n, lapack_int k,
9712                                const lapack_complex_double* a, lapack_int lda,
9713                                const lapack_complex_double* tau,
9714                                lapack_complex_double* c, lapack_int ldc,
9715                                lapack_complex_double* work, lapack_int lwork );
9716
9717lapack_int LAPACKE_cunmqr_work( int matrix_order, char side, char trans,
9718                                lapack_int m, lapack_int n, lapack_int k,
9719                                const lapack_complex_float* a, lapack_int lda,
9720                                const lapack_complex_float* tau,
9721                                lapack_complex_float* c, lapack_int ldc,
9722                                lapack_complex_float* work, lapack_int lwork );
9723lapack_int LAPACKE_zunmqr_work( int matrix_order, char side, char trans,
9724                                lapack_int m, lapack_int n, lapack_int k,
9725                                const lapack_complex_double* a, lapack_int lda,
9726                                const lapack_complex_double* tau,
9727                                lapack_complex_double* c, lapack_int ldc,
9728                                lapack_complex_double* work, lapack_int lwork );
9729
9730lapack_int LAPACKE_cunmrq_work( int matrix_order, char side, char trans,
9731                                lapack_int m, lapack_int n, lapack_int k,
9732                                const lapack_complex_float* a, lapack_int lda,
9733                                const lapack_complex_float* tau,
9734                                lapack_complex_float* c, lapack_int ldc,
9735                                lapack_complex_float* work, lapack_int lwork );
9736lapack_int LAPACKE_zunmrq_work( int matrix_order, char side, char trans,
9737                                lapack_int m, lapack_int n, lapack_int k,
9738                                const lapack_complex_double* a, lapack_int lda,
9739                                const lapack_complex_double* tau,
9740                                lapack_complex_double* c, lapack_int ldc,
9741                                lapack_complex_double* work, lapack_int lwork );
9742
9743lapack_int LAPACKE_cunmrz_work( int matrix_order, char side, char trans,
9744                                lapack_int m, lapack_int n, lapack_int k,
9745                                lapack_int l, const lapack_complex_float* a,
9746                                lapack_int lda, const lapack_complex_float* tau,
9747                                lapack_complex_float* c, lapack_int ldc,
9748                                lapack_complex_float* work, lapack_int lwork );
9749lapack_int LAPACKE_zunmrz_work( int matrix_order, char side, char trans,
9750                                lapack_int m, lapack_int n, lapack_int k,
9751                                lapack_int l, const lapack_complex_double* a,
9752                                lapack_int lda,
9753                                const lapack_complex_double* tau,
9754                                lapack_complex_double* c, lapack_int ldc,
9755                                lapack_complex_double* work, lapack_int lwork );
9756
9757lapack_int LAPACKE_cunmtr_work( int matrix_order, char side, char uplo,
9758                                char trans, lapack_int m, lapack_int n,
9759                                const lapack_complex_float* a, lapack_int lda,
9760                                const lapack_complex_float* tau,
9761                                lapack_complex_float* c, lapack_int ldc,
9762                                lapack_complex_float* work, lapack_int lwork );
9763lapack_int LAPACKE_zunmtr_work( int matrix_order, char side, char uplo,
9764                                char trans, lapack_int m, lapack_int n,
9765                                const lapack_complex_double* a, lapack_int lda,
9766                                const lapack_complex_double* tau,
9767                                lapack_complex_double* c, lapack_int ldc,
9768                                lapack_complex_double* work, lapack_int lwork );
9769
9770lapack_int LAPACKE_cupgtr_work( int matrix_order, char uplo, lapack_int n,
9771                                const lapack_complex_float* ap,
9772                                const lapack_complex_float* tau,
9773                                lapack_complex_float* q, lapack_int ldq,
9774                                lapack_complex_float* work );
9775lapack_int LAPACKE_zupgtr_work( int matrix_order, char uplo, lapack_int n,
9776                                const lapack_complex_double* ap,
9777                                const lapack_complex_double* tau,
9778                                lapack_complex_double* q, lapack_int ldq,
9779                                lapack_complex_double* work );
9780
9781lapack_int LAPACKE_cupmtr_work( int matrix_order, char side, char uplo,
9782                                char trans, lapack_int m, lapack_int n,
9783                                const lapack_complex_float* ap,
9784                                const lapack_complex_float* tau,
9785                                lapack_complex_float* c, lapack_int ldc,
9786                                lapack_complex_float* work );
9787lapack_int LAPACKE_zupmtr_work( int matrix_order, char side, char uplo,
9788                                char trans, lapack_int m, lapack_int n,
9789                                const lapack_complex_double* ap,
9790                                const lapack_complex_double* tau,
9791                                lapack_complex_double* c, lapack_int ldc,
9792                                lapack_complex_double* work );
9793
9794lapack_int LAPACKE_claghe( int matrix_order, lapack_int n, lapack_int k,
9795                           const float* d, lapack_complex_float* a,
9796                           lapack_int lda, lapack_int* iseed );
9797lapack_int LAPACKE_zlaghe( int matrix_order, lapack_int n, lapack_int k,
9798                           const double* d, lapack_complex_double* a,
9799                           lapack_int lda, lapack_int* iseed );
9800
9801lapack_int LAPACKE_slagsy( int matrix_order, lapack_int n, lapack_int k,
9802                           const float* d, float* a, lapack_int lda,
9803                           lapack_int* iseed );
9804lapack_int LAPACKE_dlagsy( int matrix_order, lapack_int n, lapack_int k,
9805                           const double* d, double* a, lapack_int lda,
9806                           lapack_int* iseed );
9807lapack_int LAPACKE_clagsy( int matrix_order, lapack_int n, lapack_int k,
9808                           const float* d, lapack_complex_float* a,
9809                           lapack_int lda, lapack_int* iseed );
9810lapack_int LAPACKE_zlagsy( int matrix_order, lapack_int n, lapack_int k,
9811                           const double* d, lapack_complex_double* a,
9812                           lapack_int lda, lapack_int* iseed );
9813
9814lapack_int LAPACKE_slapmr( int matrix_order, lapack_logical forwrd,
9815                           lapack_int m, lapack_int n, float* x, lapack_int ldx,
9816                           lapack_int* k );
9817lapack_int LAPACKE_dlapmr( int matrix_order, lapack_logical forwrd,
9818                           lapack_int m, lapack_int n, double* x,
9819                           lapack_int ldx, lapack_int* k );
9820lapack_int LAPACKE_clapmr( int matrix_order, lapack_logical forwrd,
9821                           lapack_int m, lapack_int n, lapack_complex_float* x,
9822                           lapack_int ldx, lapack_int* k );
9823lapack_int LAPACKE_zlapmr( int matrix_order, lapack_logical forwrd,
9824                           lapack_int m, lapack_int n, lapack_complex_double* x,
9825                           lapack_int ldx, lapack_int* k );
9826
9827
9828float LAPACKE_slapy2( float x, float y );
9829double LAPACKE_dlapy2( double x, double y );
9830
9831float LAPACKE_slapy3( float x, float y, float z );
9832double LAPACKE_dlapy3( double x, double y, double z );
9833
9834lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
9835lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
9836                            double* r );
9837
9838lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
9839                            float* sn );
9840lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
9841                            double* sn );
9842
9843
9844//LAPACK 3.3.0
9845lapack_int LAPACKE_cbbcsd( int matrix_order, char jobu1, char jobu2,
9846                           char jobv1t, char jobv2t, char trans, lapack_int m,
9847                           lapack_int p, lapack_int q, float* theta, float* phi,
9848                           lapack_complex_float* u1, lapack_int ldu1,
9849                           lapack_complex_float* u2, lapack_int ldu2,
9850                           lapack_complex_float* v1t, lapack_int ldv1t,
9851                           lapack_complex_float* v2t, lapack_int ldv2t,
9852                           float* b11d, float* b11e, float* b12d, float* b12e,
9853                           float* b21d, float* b21e, float* b22d, float* b22e );
9854lapack_int LAPACKE_cbbcsd_work( int matrix_order, char jobu1, char jobu2,
9855                                char jobv1t, char jobv2t, char trans,
9856                                lapack_int m, lapack_int p, lapack_int q,
9857                                float* theta, float* phi,
9858                                lapack_complex_float* u1, lapack_int ldu1,
9859                                lapack_complex_float* u2, lapack_int ldu2,
9860                                lapack_complex_float* v1t, lapack_int ldv1t,
9861                                lapack_complex_float* v2t, lapack_int ldv2t,
9862                                float* b11d, float* b11e, float* b12d,
9863                                float* b12e, float* b21d, float* b21e,
9864                                float* b22d, float* b22e, float* rwork,
9865                                lapack_int lrwork );
9866lapack_int LAPACKE_cheswapr( int matrix_order, char uplo, lapack_int n,
9867                             lapack_complex_float* a, lapack_int i1,
9868                             lapack_int i2 );
9869lapack_int LAPACKE_cheswapr_work( int matrix_order, char uplo, lapack_int n,
9870                                  lapack_complex_float* a, lapack_int i1,
9871                                  lapack_int i2 );
9872lapack_int LAPACKE_chetri2( int matrix_order, char uplo, lapack_int n,
9873                            lapack_complex_float* a, lapack_int lda,
9874                            const lapack_int* ipiv );
9875lapack_int LAPACKE_chetri2_work( int matrix_order, char uplo, lapack_int n,
9876                                 lapack_complex_float* a, lapack_int lda,
9877                                 const lapack_int* ipiv,
9878                                 lapack_complex_float* work, lapack_int lwork );
9879lapack_int LAPACKE_chetri2x( int matrix_order, char uplo, lapack_int n,
9880                             lapack_complex_float* a, lapack_int lda,
9881                             const lapack_int* ipiv, lapack_int nb );
9882lapack_int LAPACKE_chetri2x_work( int matrix_order, char uplo, lapack_int n,
9883                                  lapack_complex_float* a, lapack_int lda,
9884                                  const lapack_int* ipiv,
9885                                  lapack_complex_float* work, lapack_int nb );
9886lapack_int LAPACKE_chetrs2( int matrix_order, char uplo, lapack_int n,
9887                            lapack_int nrhs, const lapack_complex_float* a,
9888                            lapack_int lda, const lapack_int* ipiv,
9889                            lapack_complex_float* b, lapack_int ldb );
9890lapack_int LAPACKE_chetrs2_work( int matrix_order, char uplo, lapack_int n,
9891                                 lapack_int nrhs, const lapack_complex_float* a,
9892                                 lapack_int lda, const lapack_int* ipiv,
9893                                 lapack_complex_float* b, lapack_int ldb,
9894                                 lapack_complex_float* work );
9895lapack_int LAPACKE_csyconv( int matrix_order, char uplo, char way, lapack_int n,
9896                            lapack_complex_float* a, lapack_int lda,
9897                            const lapack_int* ipiv );
9898lapack_int LAPACKE_csyconv_work( int matrix_order, char uplo, char way,
9899                                 lapack_int n, lapack_complex_float* a,
9900                                 lapack_int lda, const lapack_int* ipiv,
9901                                 lapack_complex_float* work );
9902lapack_int LAPACKE_csyswapr( int matrix_order, char uplo, lapack_int n,
9903                             lapack_complex_float* a, lapack_int i1,
9904                             lapack_int i2 );
9905lapack_int LAPACKE_csyswapr_work( int matrix_order, char uplo, lapack_int n,
9906                                  lapack_complex_float* a, lapack_int i1,
9907                                  lapack_int i2 );
9908lapack_int LAPACKE_csytri2( int matrix_order, char uplo, lapack_int n,
9909                            lapack_complex_float* a, lapack_int lda,
9910                            const lapack_int* ipiv );
9911lapack_int LAPACKE_csytri2_work( int matrix_order, char uplo, lapack_int n,
9912                                 lapack_complex_float* a, lapack_int lda,
9913                                 const lapack_int* ipiv,
9914                                 lapack_complex_float* work, lapack_int lwork );
9915lapack_int LAPACKE_csytri2x( int matrix_order, char uplo, lapack_int n,
9916                             lapack_complex_float* a, lapack_int lda,
9917                             const lapack_int* ipiv, lapack_int nb );
9918lapack_int LAPACKE_csytri2x_work( int matrix_order, char uplo, lapack_int n,
9919                                  lapack_complex_float* a, lapack_int lda,
9920                                  const lapack_int* ipiv,
9921                                  lapack_complex_float* work, lapack_int nb );
9922lapack_int LAPACKE_csytrs2( int matrix_order, char uplo, lapack_int n,
9923                            lapack_int nrhs, const lapack_complex_float* a,
9924                            lapack_int lda, const lapack_int* ipiv,
9925                            lapack_complex_float* b, lapack_int ldb );
9926lapack_int LAPACKE_csytrs2_work( int matrix_order, char uplo, lapack_int n,
9927                                 lapack_int nrhs, const lapack_complex_float* a,
9928                                 lapack_int lda, const lapack_int* ipiv,
9929                                 lapack_complex_float* b, lapack_int ldb,
9930                                 lapack_complex_float* work );
9931lapack_int LAPACKE_cunbdb( int matrix_order, char trans, char signs,
9932                           lapack_int m, lapack_int p, lapack_int q,
9933                           lapack_complex_float* x11, lapack_int ldx11,
9934                           lapack_complex_float* x12, lapack_int ldx12,
9935                           lapack_complex_float* x21, lapack_int ldx21,
9936                           lapack_complex_float* x22, lapack_int ldx22,
9937                           float* theta, float* phi,
9938                           lapack_complex_float* taup1,
9939                           lapack_complex_float* taup2,
9940                           lapack_complex_float* tauq1,
9941                           lapack_complex_float* tauq2 );
9942lapack_int LAPACKE_cunbdb_work( int matrix_order, char trans, char signs,
9943                                lapack_int m, lapack_int p, lapack_int q,
9944                                lapack_complex_float* x11, lapack_int ldx11,
9945                                lapack_complex_float* x12, lapack_int ldx12,
9946                                lapack_complex_float* x21, lapack_int ldx21,
9947                                lapack_complex_float* x22, lapack_int ldx22,
9948                                float* theta, float* phi,
9949                                lapack_complex_float* taup1,
9950                                lapack_complex_float* taup2,
9951                                lapack_complex_float* tauq1,
9952                                lapack_complex_float* tauq2,
9953                                lapack_complex_float* work, lapack_int lwork );
9954lapack_int LAPACKE_cuncsd( int matrix_order, char jobu1, char jobu2,
9955                           char jobv1t, char jobv2t, char trans, char signs,
9956                           lapack_int m, lapack_int p, lapack_int q,
9957                           lapack_complex_float* x11, lapack_int ldx11,
9958                           lapack_complex_float* x12, lapack_int ldx12,
9959                           lapack_complex_float* x21, lapack_int ldx21,
9960                           lapack_complex_float* x22, lapack_int ldx22,
9961                           float* theta, lapack_complex_float* u1,
9962                           lapack_int ldu1, lapack_complex_float* u2,
9963                           lapack_int ldu2, lapack_complex_float* v1t,
9964                           lapack_int ldv1t, lapack_complex_float* v2t,
9965                           lapack_int ldv2t );
9966lapack_int LAPACKE_cuncsd_work( int matrix_order, char jobu1, char jobu2,
9967                                char jobv1t, char jobv2t, char trans,
9968                                char signs, lapack_int m, lapack_int p,
9969                                lapack_int q, lapack_complex_float* x11,
9970                                lapack_int ldx11, lapack_complex_float* x12,
9971                                lapack_int ldx12, lapack_complex_float* x21,
9972                                lapack_int ldx21, lapack_complex_float* x22,
9973                                lapack_int ldx22, float* theta,
9974                                lapack_complex_float* u1, lapack_int ldu1,
9975                                lapack_complex_float* u2, lapack_int ldu2,
9976                                lapack_complex_float* v1t, lapack_int ldv1t,
9977                                lapack_complex_float* v2t, lapack_int ldv2t,
9978                                lapack_complex_float* work, lapack_int lwork,
9979                                float* rwork, lapack_int lrwork,
9980                                lapack_int* iwork );
9981lapack_int LAPACKE_dbbcsd( int matrix_order, char jobu1, char jobu2,
9982                           char jobv1t, char jobv2t, char trans, lapack_int m,
9983                           lapack_int p, lapack_int q, double* theta,
9984                           double* phi, double* u1, lapack_int ldu1, double* u2,
9985                           lapack_int ldu2, double* v1t, lapack_int ldv1t,
9986                           double* v2t, lapack_int ldv2t, double* b11d,
9987                           double* b11e, double* b12d, double* b12e,
9988                           double* b21d, double* b21e, double* b22d,
9989                           double* b22e );
9990lapack_int LAPACKE_dbbcsd_work( int matrix_order, char jobu1, char jobu2,
9991                                char jobv1t, char jobv2t, char trans,
9992                                lapack_int m, lapack_int p, lapack_int q,
9993                                double* theta, double* phi, double* u1,
9994                                lapack_int ldu1, double* u2, lapack_int ldu2,
9995                                double* v1t, lapack_int ldv1t, double* v2t,
9996                                lapack_int ldv2t, double* b11d, double* b11e,
9997                                double* b12d, double* b12e, double* b21d,
9998                                double* b21e, double* b22d, double* b22e,
9999                                double* work, lapack_int lwork );
10000lapack_int LAPACKE_dorbdb( int matrix_order, char trans, char signs,
10001                           lapack_int m, lapack_int p, lapack_int q,
10002                           double* x11, lapack_int ldx11, double* x12,
10003                           lapack_int ldx12, double* x21, lapack_int ldx21,
10004                           double* x22, lapack_int ldx22, double* theta,
10005                           double* phi, double* taup1, double* taup2,
10006                           double* tauq1, double* tauq2 );
10007lapack_int LAPACKE_dorbdb_work( int matrix_order, char trans, char signs,
10008                                lapack_int m, lapack_int p, lapack_int q,
10009                                double* x11, lapack_int ldx11, double* x12,
10010                                lapack_int ldx12, double* x21, lapack_int ldx21,
10011                                double* x22, lapack_int ldx22, double* theta,
10012                                double* phi, double* taup1, double* taup2,
10013                                double* tauq1, double* tauq2, double* work,
10014                                lapack_int lwork );
10015lapack_int LAPACKE_dorcsd( int matrix_order, char jobu1, char jobu2,
10016                           char jobv1t, char jobv2t, char trans, char signs,
10017                           lapack_int m, lapack_int p, lapack_int q,
10018                           double* x11, lapack_int ldx11, double* x12,
10019                           lapack_int ldx12, double* x21, lapack_int ldx21,
10020                           double* x22, lapack_int ldx22, double* theta,
10021                           double* u1, lapack_int ldu1, double* u2,
10022                           lapack_int ldu2, double* v1t, lapack_int ldv1t,
10023                           double* v2t, lapack_int ldv2t );
10024lapack_int LAPACKE_dorcsd_work( int matrix_order, char jobu1, char jobu2,
10025                                char jobv1t, char jobv2t, char trans,
10026                                char signs, lapack_int m, lapack_int p,
10027                                lapack_int q, double* x11, lapack_int ldx11,
10028                                double* x12, lapack_int ldx12, double* x21,
10029                                lapack_int ldx21, double* x22, lapack_int ldx22,
10030                                double* theta, double* u1, lapack_int ldu1,
10031                                double* u2, lapack_int ldu2, double* v1t,
10032                                lapack_int ldv1t, double* v2t, lapack_int ldv2t,
10033                                double* work, lapack_int lwork,
10034                                lapack_int* iwork );
10035lapack_int LAPACKE_dsyconv( int matrix_order, char uplo, char way, lapack_int n,
10036                            double* a, lapack_int lda, const lapack_int* ipiv );
10037lapack_int LAPACKE_dsyconv_work( int matrix_order, char uplo, char way,
10038                                 lapack_int n, double* a, lapack_int lda,
10039                                 const lapack_int* ipiv, double* work );
10040lapack_int LAPACKE_dsyswapr( int matrix_order, char uplo, lapack_int n,
10041                             double* a, lapack_int i1, lapack_int i2 );
10042lapack_int LAPACKE_dsyswapr_work( int matrix_order, char uplo, lapack_int n,
10043                                  double* a, lapack_int i1, lapack_int i2 );
10044lapack_int LAPACKE_dsytri2( int matrix_order, char uplo, lapack_int n,
10045                            double* a, lapack_int lda, const lapack_int* ipiv );
10046lapack_int LAPACKE_dsytri2_work( int matrix_order, char uplo, lapack_int n,
10047                                 double* a, lapack_int lda,
10048                                 const lapack_int* ipiv,
10049                                 lapack_complex_double* work, lapack_int lwork );
10050lapack_int LAPACKE_dsytri2x( int matrix_order, char uplo, lapack_int n,
10051                             double* a, lapack_int lda, const lapack_int* ipiv,
10052                             lapack_int nb );
10053lapack_int LAPACKE_dsytri2x_work( int matrix_order, char uplo, lapack_int n,
10054                                  double* a, lapack_int lda,
10055                                  const lapack_int* ipiv, double* work,
10056                                  lapack_int nb );
10057lapack_int LAPACKE_dsytrs2( int matrix_order, char uplo, lapack_int n,
10058                            lapack_int nrhs, const double* a, lapack_int lda,
10059                            const lapack_int* ipiv, double* b, lapack_int ldb );
10060lapack_int LAPACKE_dsytrs2_work( int matrix_order, char uplo, lapack_int n,
10061                                 lapack_int nrhs, const double* a,
10062                                 lapack_int lda, const lapack_int* ipiv,
10063                                 double* b, lapack_int ldb, double* work );
10064lapack_int LAPACKE_sbbcsd( int matrix_order, char jobu1, char jobu2,
10065                           char jobv1t, char jobv2t, char trans, lapack_int m,
10066                           lapack_int p, lapack_int q, float* theta, float* phi,
10067                           float* u1, lapack_int ldu1, float* u2,
10068                           lapack_int ldu2, float* v1t, lapack_int ldv1t,
10069                           float* v2t, lapack_int ldv2t, float* b11d,
10070                           float* b11e, float* b12d, float* b12e, float* b21d,
10071                           float* b21e, float* b22d, float* b22e );
10072lapack_int LAPACKE_sbbcsd_work( int matrix_order, char jobu1, char jobu2,
10073                                char jobv1t, char jobv2t, char trans,
10074                                lapack_int m, lapack_int p, lapack_int q,
10075                                float* theta, float* phi, float* u1,
10076                                lapack_int ldu1, float* u2, lapack_int ldu2,
10077                                float* v1t, lapack_int ldv1t, float* v2t,
10078                                lapack_int ldv2t, float* b11d, float* b11e,
10079                                float* b12d, float* b12e, float* b21d,
10080                                float* b21e, float* b22d, float* b22e,
10081                                float* work, lapack_int lwork );
10082lapack_int LAPACKE_sorbdb( int matrix_order, char trans, char signs,
10083                           lapack_int m, lapack_int p, lapack_int q, float* x11,
10084                           lapack_int ldx11, float* x12, lapack_int ldx12,
10085                           float* x21, lapack_int ldx21, float* x22,
10086                           lapack_int ldx22, float* theta, float* phi,
10087                           float* taup1, float* taup2, float* tauq1,
10088                           float* tauq2 );
10089lapack_int LAPACKE_sorbdb_work( int matrix_order, char trans, char signs,
10090                                lapack_int m, lapack_int p, lapack_int q,
10091                                float* x11, lapack_int ldx11, float* x12,
10092                                lapack_int ldx12, float* x21, lapack_int ldx21,
10093                                float* x22, lapack_int ldx22, float* theta,
10094                                float* phi, float* taup1, float* taup2,
10095                                float* tauq1, float* tauq2, float* work,
10096                                lapack_int lwork );
10097lapack_int LAPACKE_sorcsd( int matrix_order, char jobu1, char jobu2,
10098                           char jobv1t, char jobv2t, char trans, char signs,
10099                           lapack_int m, lapack_int p, lapack_int q, float* x11,
10100                           lapack_int ldx11, float* x12, lapack_int ldx12,
10101                           float* x21, lapack_int ldx21, float* x22,
10102                           lapack_int ldx22, float* theta, float* u1,
10103                           lapack_int ldu1, float* u2, lapack_int ldu2,
10104                           float* v1t, lapack_int ldv1t, float* v2t,
10105                           lapack_int ldv2t );
10106lapack_int LAPACKE_sorcsd_work( int matrix_order, char jobu1, char jobu2,
10107                                char jobv1t, char jobv2t, char trans,
10108                                char signs, lapack_int m, lapack_int p,
10109                                lapack_int q, float* x11, lapack_int ldx11,
10110                                float* x12, lapack_int ldx12, float* x21,
10111                                lapack_int ldx21, float* x22, lapack_int ldx22,
10112                                float* theta, float* u1, lapack_int ldu1,
10113                                float* u2, lapack_int ldu2, float* v1t,
10114                                lapack_int ldv1t, float* v2t, lapack_int ldv2t,
10115                                float* work, lapack_int lwork,
10116                                lapack_int* iwork );
10117lapack_int LAPACKE_ssyconv( int matrix_order, char uplo, char way, lapack_int n,
10118                            float* a, lapack_int lda, const lapack_int* ipiv );
10119lapack_int LAPACKE_ssyconv_work( int matrix_order, char uplo, char way,
10120                                 lapack_int n, float* a, lapack_int lda,
10121                                 const lapack_int* ipiv, float* work );
10122lapack_int LAPACKE_ssyswapr( int matrix_order, char uplo, lapack_int n,
10123                             float* a, lapack_int i1, lapack_int i2 );
10124lapack_int LAPACKE_ssyswapr_work( int matrix_order, char uplo, lapack_int n,
10125                                  float* a, lapack_int i1, lapack_int i2 );
10126lapack_int LAPACKE_ssytri2( int matrix_order, char uplo, lapack_int n, float* a,
10127                            lapack_int lda, const lapack_int* ipiv );
10128lapack_int LAPACKE_ssytri2_work( int matrix_order, char uplo, lapack_int n,
10129                                 float* a, lapack_int lda,
10130                                 const lapack_int* ipiv,
10131                                 lapack_complex_float* work, lapack_int lwork );
10132lapack_int LAPACKE_ssytri2x( int matrix_order, char uplo, lapack_int n,
10133                             float* a, lapack_int lda, const lapack_int* ipiv,
10134                             lapack_int nb );
10135lapack_int LAPACKE_ssytri2x_work( int matrix_order, char uplo, lapack_int n,
10136                                  float* a, lapack_int lda,
10137                                  const lapack_int* ipiv, float* work,
10138                                  lapack_int nb );
10139lapack_int LAPACKE_ssytrs2( int matrix_order, char uplo, lapack_int n,
10140                            lapack_int nrhs, const float* a, lapack_int lda,
10141                            const lapack_int* ipiv, float* b, lapack_int ldb );
10142lapack_int LAPACKE_ssytrs2_work( int matrix_order, char uplo, lapack_int n,
10143                                 lapack_int nrhs, const float* a,
10144                                 lapack_int lda, const lapack_int* ipiv,
10145                                 float* b, lapack_int ldb, float* work );
10146lapack_int LAPACKE_zbbcsd( int matrix_order, char jobu1, char jobu2,
10147                           char jobv1t, char jobv2t, char trans, lapack_int m,
10148                           lapack_int p, lapack_int q, double* theta,
10149                           double* phi, lapack_complex_double* u1,
10150                           lapack_int ldu1, lapack_complex_double* u2,
10151                           lapack_int ldu2, lapack_complex_double* v1t,
10152                           lapack_int ldv1t, lapack_complex_double* v2t,
10153                           lapack_int ldv2t, double* b11d, double* b11e,
10154                           double* b12d, double* b12e, double* b21d,
10155                           double* b21e, double* b22d, double* b22e );
10156lapack_int LAPACKE_zbbcsd_work( int matrix_order, char jobu1, char jobu2,
10157                                char jobv1t, char jobv2t, char trans,
10158                                lapack_int m, lapack_int p, lapack_int q,
10159                                double* theta, double* phi,
10160                                lapack_complex_double* u1, lapack_int ldu1,
10161                                lapack_complex_double* u2, lapack_int ldu2,
10162                                lapack_complex_double* v1t, lapack_int ldv1t,
10163                                lapack_complex_double* v2t, lapack_int ldv2t,
10164                                double* b11d, double* b11e, double* b12d,
10165                                double* b12e, double* b21d, double* b21e,
10166                                double* b22d, double* b22e, double* rwork,
10167                                lapack_int lrwork );
10168lapack_int LAPACKE_zheswapr( int matrix_order, char uplo, lapack_int n,
10169                             lapack_complex_double* a, lapack_int i1,
10170                             lapack_int i2 );
10171lapack_int LAPACKE_zheswapr_work( int matrix_order, char uplo, lapack_int n,
10172                                  lapack_complex_double* a, lapack_int i1,
10173                                  lapack_int i2 );
10174lapack_int LAPACKE_zhetri2( int matrix_order, char uplo, lapack_int n,
10175                            lapack_complex_double* a, lapack_int lda,
10176                            const lapack_int* ipiv );
10177lapack_int LAPACKE_zhetri2_work( int matrix_order, char uplo, lapack_int n,
10178                                 lapack_complex_double* a, lapack_int lda,
10179                                 const lapack_int* ipiv,
10180                                 lapack_complex_double* work, lapack_int lwork );
10181lapack_int LAPACKE_zhetri2x( int matrix_order, char uplo, lapack_int n,
10182                             lapack_complex_double* a, lapack_int lda,
10183                             const lapack_int* ipiv, lapack_int nb );
10184lapack_int LAPACKE_zhetri2x_work( int matrix_order, char uplo, lapack_int n,
10185                                  lapack_complex_double* a, lapack_int lda,
10186                                  const lapack_int* ipiv,
10187                                  lapack_complex_double* work, lapack_int nb );
10188lapack_int LAPACKE_zhetrs2( int matrix_order, char uplo, lapack_int n,
10189                            lapack_int nrhs, const lapack_complex_double* a,
10190                            lapack_int lda, const lapack_int* ipiv,
10191                            lapack_complex_double* b, lapack_int ldb );
10192lapack_int LAPACKE_zhetrs2_work( int matrix_order, char uplo, lapack_int n,
10193                                 lapack_int nrhs, const lapack_complex_double* a,
10194                                 lapack_int lda, const lapack_int* ipiv,
10195                                 lapack_complex_double* b, lapack_int ldb,
10196                                 lapack_complex_double* work );
10197lapack_int LAPACKE_zsyconv( int matrix_order, char uplo, char way, lapack_int n,
10198                            lapack_complex_double* a, lapack_int lda,
10199                            const lapack_int* ipiv );
10200lapack_int LAPACKE_zsyconv_work( int matrix_order, char uplo, char way,
10201                                 lapack_int n, lapack_complex_double* a,
10202                                 lapack_int lda, const lapack_int* ipiv,
10203                                 lapack_complex_double* work );
10204lapack_int LAPACKE_zsyswapr( int matrix_order, char uplo, lapack_int n,
10205                             lapack_complex_double* a, lapack_int i1,
10206                             lapack_int i2 );
10207lapack_int LAPACKE_zsyswapr_work( int matrix_order, char uplo, lapack_int n,
10208                                  lapack_complex_double* a, lapack_int i1,
10209                                  lapack_int i2 );
10210lapack_int LAPACKE_zsytri2( int matrix_order, char uplo, lapack_int n,
10211                            lapack_complex_double* a, lapack_int lda,
10212                            const lapack_int* ipiv );
10213lapack_int LAPACKE_zsytri2_work( int matrix_order, char uplo, lapack_int n,
10214                                 lapack_complex_double* a, lapack_int lda,
10215                                 const lapack_int* ipiv,
10216                                 lapack_complex_double* work, lapack_int lwork );
10217lapack_int LAPACKE_zsytri2x( int matrix_order, char uplo, lapack_int n,
10218                             lapack_complex_double* a, lapack_int lda,
10219                             const lapack_int* ipiv, lapack_int nb );
10220lapack_int LAPACKE_zsytri2x_work( int matrix_order, char uplo, lapack_int n,
10221                                  lapack_complex_double* a, lapack_int lda,
10222                                  const lapack_int* ipiv,
10223                                  lapack_complex_double* work, lapack_int nb );
10224lapack_int LAPACKE_zsytrs2( int matrix_order, char uplo, lapack_int n,
10225                            lapack_int nrhs, const lapack_complex_double* a,
10226                            lapack_int lda, const lapack_int* ipiv,
10227                            lapack_complex_double* b, lapack_int ldb );
10228lapack_int LAPACKE_zsytrs2_work( int matrix_order, char uplo, lapack_int n,
10229                                 lapack_int nrhs, const lapack_complex_double* a,
10230                                 lapack_int lda, const lapack_int* ipiv,
10231                                 lapack_complex_double* b, lapack_int ldb,
10232                                 lapack_complex_double* work );
10233lapack_int LAPACKE_zunbdb( int matrix_order, char trans, char signs,
10234                           lapack_int m, lapack_int p, lapack_int q,
10235                           lapack_complex_double* x11, lapack_int ldx11,
10236                           lapack_complex_double* x12, lapack_int ldx12,
10237                           lapack_complex_double* x21, lapack_int ldx21,
10238                           lapack_complex_double* x22, lapack_int ldx22,
10239                           double* theta, double* phi,
10240                           lapack_complex_double* taup1,
10241                           lapack_complex_double* taup2,
10242                           lapack_complex_double* tauq1,
10243                           lapack_complex_double* tauq2 );
10244lapack_int LAPACKE_zunbdb_work( int matrix_order, char trans, char signs,
10245                                lapack_int m, lapack_int p, lapack_int q,
10246                                lapack_complex_double* x11, lapack_int ldx11,
10247                                lapack_complex_double* x12, lapack_int ldx12,
10248                                lapack_complex_double* x21, lapack_int ldx21,
10249                                lapack_complex_double* x22, lapack_int ldx22,
10250                                double* theta, double* phi,
10251                                lapack_complex_double* taup1,
10252                                lapack_complex_double* taup2,
10253                                lapack_complex_double* tauq1,
10254                                lapack_complex_double* tauq2,
10255                                lapack_complex_double* work, lapack_int lwork );
10256lapack_int LAPACKE_zuncsd( int matrix_order, char jobu1, char jobu2,
10257                           char jobv1t, char jobv2t, char trans, char signs,
10258                           lapack_int m, lapack_int p, lapack_int q,
10259                           lapack_complex_double* x11, lapack_int ldx11,
10260                           lapack_complex_double* x12, lapack_int ldx12,
10261                           lapack_complex_double* x21, lapack_int ldx21,
10262                           lapack_complex_double* x22, lapack_int ldx22,
10263                           double* theta, lapack_complex_double* u1,
10264                           lapack_int ldu1, lapack_complex_double* u2,
10265                           lapack_int ldu2, lapack_complex_double* v1t,
10266                           lapack_int ldv1t, lapack_complex_double* v2t,
10267                           lapack_int ldv2t );
10268lapack_int LAPACKE_zuncsd_work( int matrix_order, char jobu1, char jobu2,
10269                                char jobv1t, char jobv2t, char trans,
10270                                char signs, lapack_int m, lapack_int p,
10271                                lapack_int q, lapack_complex_double* x11,
10272                                lapack_int ldx11, lapack_complex_double* x12,
10273                                lapack_int ldx12, lapack_complex_double* x21,
10274                                lapack_int ldx21, lapack_complex_double* x22,
10275                                lapack_int ldx22, double* theta,
10276                                lapack_complex_double* u1, lapack_int ldu1,
10277                                lapack_complex_double* u2, lapack_int ldu2,
10278                                lapack_complex_double* v1t, lapack_int ldv1t,
10279                                lapack_complex_double* v2t, lapack_int ldv2t,
10280                                lapack_complex_double* work, lapack_int lwork,
10281                                double* rwork, lapack_int lrwork,
10282                                lapack_int* iwork );
10283//LAPACK 3.4.0
10284lapack_int LAPACKE_sgemqrt( int matrix_order, char side, char trans,
10285                            lapack_int m, lapack_int n, lapack_int k,
10286                            lapack_int nb, const float* v, lapack_int ldv,
10287                            const float* t, lapack_int ldt, float* c,
10288                            lapack_int ldc );
10289lapack_int LAPACKE_dgemqrt( int matrix_order, char side, char trans,
10290                            lapack_int m, lapack_int n, lapack_int k,
10291                            lapack_int nb, const double* v, lapack_int ldv,
10292                            const double* t, lapack_int ldt, double* c,
10293                            lapack_int ldc );
10294lapack_int LAPACKE_cgemqrt( int matrix_order, char side, char trans,
10295                            lapack_int m, lapack_int n, lapack_int k,
10296                            lapack_int nb, const lapack_complex_float* v,
10297                            lapack_int ldv, const lapack_complex_float* t,
10298                            lapack_int ldt, lapack_complex_float* c,
10299                            lapack_int ldc );
10300lapack_int LAPACKE_zgemqrt( int matrix_order, char side, char trans,
10301                            lapack_int m, lapack_int n, lapack_int k,
10302                            lapack_int nb, const lapack_complex_double* v,
10303                            lapack_int ldv, const lapack_complex_double* t,
10304                            lapack_int ldt, lapack_complex_double* c,
10305                            lapack_int ldc );
10306
10307lapack_int LAPACKE_sgeqrt( int matrix_order, lapack_int m, lapack_int n,
10308                           lapack_int nb, float* a, lapack_int lda, float* t,
10309                           lapack_int ldt );
10310lapack_int LAPACKE_dgeqrt( int matrix_order, lapack_int m, lapack_int n,
10311                           lapack_int nb, double* a, lapack_int lda, double* t,
10312                           lapack_int ldt );
10313lapack_int LAPACKE_cgeqrt( int matrix_order, lapack_int m, lapack_int n,
10314                           lapack_int nb, lapack_complex_float* a,
10315                           lapack_int lda, lapack_complex_float* t,
10316                           lapack_int ldt );
10317lapack_int LAPACKE_zgeqrt( int matrix_order, lapack_int m, lapack_int n,
10318                           lapack_int nb, lapack_complex_double* a,
10319                           lapack_int lda, lapack_complex_double* t,
10320                           lapack_int ldt );
10321
10322lapack_int LAPACKE_sgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10323                            float* a, lapack_int lda, float* t,
10324                            lapack_int ldt );
10325lapack_int LAPACKE_dgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10326                            double* a, lapack_int lda, double* t,
10327                            lapack_int ldt );
10328lapack_int LAPACKE_cgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10329                            lapack_complex_float* a, lapack_int lda,
10330                            lapack_complex_float* t, lapack_int ldt );
10331lapack_int LAPACKE_zgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10332                            lapack_complex_double* a, lapack_int lda,
10333                            lapack_complex_double* t, lapack_int ldt );
10334
10335lapack_int LAPACKE_sgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10336                            float* a, lapack_int lda, float* t,
10337                            lapack_int ldt );
10338lapack_int LAPACKE_dgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10339                            double* a, lapack_int lda, double* t,
10340                            lapack_int ldt );
10341lapack_int LAPACKE_cgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10342                            lapack_complex_float* a, lapack_int lda,
10343                            lapack_complex_float* t, lapack_int ldt );
10344lapack_int LAPACKE_zgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10345                            lapack_complex_double* a, lapack_int lda,
10346                            lapack_complex_double* t, lapack_int ldt );
10347
10348lapack_int LAPACKE_stpmqrt( int matrix_order, char side, char trans,
10349                            lapack_int m, lapack_int n, lapack_int k,
10350                            lapack_int l, lapack_int nb, const float* v,
10351                            lapack_int ldv, const float* t, lapack_int ldt,
10352                            float* a, lapack_int lda, float* b,
10353                            lapack_int ldb );
10354lapack_int LAPACKE_dtpmqrt( int matrix_order, char side, char trans,
10355                            lapack_int m, lapack_int n, lapack_int k,
10356                            lapack_int l, lapack_int nb, const double* v,
10357                            lapack_int ldv, const double* t, lapack_int ldt,
10358                            double* a, lapack_int lda, double* b,
10359                            lapack_int ldb );
10360lapack_int LAPACKE_ctpmqrt( int matrix_order, char side, char trans,
10361                            lapack_int m, lapack_int n, lapack_int k,
10362                            lapack_int l, lapack_int nb,
10363                            const lapack_complex_float* v, lapack_int ldv,
10364                            const lapack_complex_float* t, lapack_int ldt,
10365                            lapack_complex_float* a, lapack_int lda,
10366                            lapack_complex_float* b, lapack_int ldb );
10367lapack_int LAPACKE_ztpmqrt( int matrix_order, char side, char trans,
10368                            lapack_int m, lapack_int n, lapack_int k,
10369                            lapack_int l, lapack_int nb,
10370                            const lapack_complex_double* v, lapack_int ldv,
10371                            const lapack_complex_double* t, lapack_int ldt,
10372                            lapack_complex_double* a, lapack_int lda,
10373                            lapack_complex_double* b, lapack_int ldb );
10374
10375lapack_int LAPACKE_dtpqrt( int matrix_order, lapack_int m, lapack_int n,
10376                           lapack_int l, lapack_int nb, double* a,
10377                           lapack_int lda, double* b, lapack_int ldb, double* t,
10378                           lapack_int ldt );
10379lapack_int LAPACKE_ctpqrt( int matrix_order, lapack_int m, lapack_int n,
10380                           lapack_int l, lapack_int nb, lapack_complex_float* a,
10381                           lapack_int lda, lapack_complex_float* t,
10382                           lapack_complex_float* b, lapack_int ldb,
10383                           lapack_int ldt );
10384lapack_int LAPACKE_ztpqrt( int matrix_order, lapack_int m, lapack_int n,
10385                           lapack_int l, lapack_int nb,
10386                           lapack_complex_double* a, lapack_int lda,
10387                           lapack_complex_double* b, lapack_int ldb,
10388                           lapack_complex_double* t, lapack_int ldt );
10389
10390lapack_int LAPACKE_stpqrt2( int matrix_order, lapack_int m, lapack_int n,
10391                            float* a, lapack_int lda, float* b, lapack_int ldb,
10392                            float* t, lapack_int ldt );
10393lapack_int LAPACKE_dtpqrt2( int matrix_order, lapack_int m, lapack_int n,
10394                            double* a, lapack_int lda, double* b,
10395                            lapack_int ldb, double* t, lapack_int ldt );
10396lapack_int LAPACKE_ctpqrt2( int matrix_order, lapack_int m, lapack_int n,
10397                            lapack_complex_float* a, lapack_int lda,
10398                            lapack_complex_float* b, lapack_int ldb,
10399                            lapack_complex_float* t, lapack_int ldt );
10400lapack_int LAPACKE_ztpqrt2( int matrix_order, lapack_int m, lapack_int n,
10401                            lapack_complex_double* a, lapack_int lda,
10402                            lapack_complex_double* b, lapack_int ldb,
10403                            lapack_complex_double* t, lapack_int ldt );
10404
10405lapack_int LAPACKE_stprfb( int matrix_order, char side, char trans, char direct,
10406                           char storev, lapack_int m, lapack_int n,
10407                           lapack_int k, lapack_int l, const float* v,
10408                           lapack_int ldv, const float* t, lapack_int ldt,
10409                           float* a, lapack_int lda, float* b, lapack_int ldb,
10410                           lapack_int myldwork );
10411lapack_int LAPACKE_dtprfb( int matrix_order, char side, char trans, char direct,
10412                           char storev, lapack_int m, lapack_int n,
10413                           lapack_int k, lapack_int l, const double* v,
10414                           lapack_int ldv, const double* t, lapack_int ldt,
10415                           double* a, lapack_int lda, double* b, lapack_int ldb,
10416                           lapack_int myldwork );
10417lapack_int LAPACKE_ctprfb( int matrix_order, char side, char trans, char direct,
10418                           char storev, lapack_int m, lapack_int n,
10419                           lapack_int k, lapack_int l,
10420                           const lapack_complex_float* v, lapack_int ldv,
10421                           const lapack_complex_float* t, lapack_int ldt,
10422                           lapack_complex_float* a, lapack_int lda,
10423                           lapack_complex_float* b, lapack_int ldb,
10424                           lapack_int myldwork );
10425lapack_int LAPACKE_ztprfb( int matrix_order, char side, char trans, char direct,
10426                           char storev, lapack_int m, lapack_int n,
10427                           lapack_int k, lapack_int l,
10428                           const lapack_complex_double* v, lapack_int ldv,
10429                           const lapack_complex_double* t, lapack_int ldt,
10430                           lapack_complex_double* a, lapack_int lda,
10431                           lapack_complex_double* b, lapack_int ldb,
10432                           lapack_int myldwork );
10433
10434lapack_int LAPACKE_sgemqrt_work( int matrix_order, char side, char trans,
10435                                 lapack_int m, lapack_int n, lapack_int k,
10436                                 lapack_int nb, const float* v, lapack_int ldv,
10437                                 const float* t, lapack_int ldt, float* c,
10438                                 lapack_int ldc, float* work );
10439lapack_int LAPACKE_dgemqrt_work( int matrix_order, char side, char trans,
10440                                 lapack_int m, lapack_int n, lapack_int k,
10441                                 lapack_int nb, const double* v, lapack_int ldv,
10442                                 const double* t, lapack_int ldt, double* c,
10443                                 lapack_int ldc, double* work );
10444lapack_int LAPACKE_cgemqrt_work( int matrix_order, char side, char trans,
10445                                 lapack_int m, lapack_int n, lapack_int k,
10446                                 lapack_int nb, const lapack_complex_float* v,
10447                                 lapack_int ldv, const lapack_complex_float* t,
10448                                 lapack_int ldt, lapack_complex_float* c,
10449                                 lapack_int ldc, lapack_complex_float* work );
10450lapack_int LAPACKE_zgemqrt_work( int matrix_order, char side, char trans,
10451                                 lapack_int m, lapack_int n, lapack_int k,
10452                                 lapack_int nb, const lapack_complex_double* v,
10453                                 lapack_int ldv, const lapack_complex_double* t,
10454                                 lapack_int ldt, lapack_complex_double* c,
10455                                 lapack_int ldc, lapack_complex_double* work );
10456
10457lapack_int LAPACKE_sgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10458                                lapack_int nb, float* a, lapack_int lda,
10459                                float* t, lapack_int ldt, float* work );
10460lapack_int LAPACKE_dgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10461                                lapack_int nb, double* a, lapack_int lda,
10462                                double* t, lapack_int ldt, double* work );
10463lapack_int LAPACKE_cgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10464                                lapack_int nb, lapack_complex_float* a,
10465                                lapack_int lda, lapack_complex_float* t,
10466                                lapack_int ldt, lapack_complex_float* work );
10467lapack_int LAPACKE_zgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10468                                lapack_int nb, lapack_complex_double* a,
10469                                lapack_int lda, lapack_complex_double* t,
10470                                lapack_int ldt, lapack_complex_double* work );
10471
10472lapack_int LAPACKE_sgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10473                                 float* a, lapack_int lda, float* t,
10474                                 lapack_int ldt );
10475lapack_int LAPACKE_dgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10476                                 double* a, lapack_int lda, double* t,
10477                                 lapack_int ldt );
10478lapack_int LAPACKE_cgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10479                                 lapack_complex_float* a, lapack_int lda,
10480                                 lapack_complex_float* t, lapack_int ldt );
10481lapack_int LAPACKE_zgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10482                                 lapack_complex_double* a, lapack_int lda,
10483                                 lapack_complex_double* t, lapack_int ldt );
10484
10485lapack_int LAPACKE_sgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10486                                 float* a, lapack_int lda, float* t,
10487                                 lapack_int ldt );
10488lapack_int LAPACKE_dgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10489                                 double* a, lapack_int lda, double* t,
10490                                 lapack_int ldt );
10491lapack_int LAPACKE_cgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10492                                 lapack_complex_float* a, lapack_int lda,
10493                                 lapack_complex_float* t, lapack_int ldt );
10494lapack_int LAPACKE_zgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10495                                 lapack_complex_double* a, lapack_int lda,
10496                                 lapack_complex_double* t, lapack_int ldt );
10497
10498lapack_int LAPACKE_stpmqrt_work( int matrix_order, char side, char trans,
10499                                 lapack_int m, lapack_int n, lapack_int k,
10500                                 lapack_int l, lapack_int nb, const float* v,
10501                                 lapack_int ldv, const float* t, lapack_int ldt,
10502                                 float* a, lapack_int lda, float* b,
10503                                 lapack_int ldb, float* work );
10504lapack_int LAPACKE_dtpmqrt_work( int matrix_order, char side, char trans,
10505                                 lapack_int m, lapack_int n, lapack_int k,
10506                                 lapack_int l, lapack_int nb, const double* v,
10507                                 lapack_int ldv, const double* t,
10508                                 lapack_int ldt, double* a, lapack_int lda,
10509                                 double* b, lapack_int ldb, double* work );
10510lapack_int LAPACKE_ctpmqrt_work( int matrix_order, char side, char trans,
10511                                 lapack_int m, lapack_int n, lapack_int k,
10512                                 lapack_int l, lapack_int nb,
10513                                 const lapack_complex_float* v, lapack_int ldv,
10514                                 const lapack_complex_float* t, lapack_int ldt,
10515                                 lapack_complex_float* a, lapack_int lda,
10516                                 lapack_complex_float* b, lapack_int ldb,
10517                                 lapack_complex_float* work );
10518lapack_int LAPACKE_ztpmqrt_work( int matrix_order, char side, char trans,
10519                                 lapack_int m, lapack_int n, lapack_int k,
10520                                 lapack_int l, lapack_int nb,
10521                                 const lapack_complex_double* v, lapack_int ldv,
10522                                 const lapack_complex_double* t, lapack_int ldt,
10523                                 lapack_complex_double* a, lapack_int lda,
10524                                 lapack_complex_double* b, lapack_int ldb,
10525                                 lapack_complex_double* work );
10526
10527lapack_int LAPACKE_dtpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10528                                lapack_int l, lapack_int nb, double* a,
10529                                lapack_int lda, double* b, lapack_int ldb,
10530                                double* t, lapack_int ldt, double* work );
10531lapack_int LAPACKE_ctpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10532                                lapack_int l, lapack_int nb,
10533                                lapack_complex_float* a, lapack_int lda,
10534                                lapack_complex_float* t,
10535                                lapack_complex_float* b, lapack_int ldb,
10536                                lapack_int ldt, lapack_complex_float* work );
10537lapack_int LAPACKE_ztpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10538                                lapack_int l, lapack_int nb,
10539                                lapack_complex_double* a, lapack_int lda,
10540                                lapack_complex_double* b, lapack_int ldb,
10541                                lapack_complex_double* t, lapack_int ldt,
10542                                lapack_complex_double* work );
10543
10544lapack_int LAPACKE_stpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10545                                 float* a, lapack_int lda, float* b,
10546                                 lapack_int ldb, float* t, lapack_int ldt );
10547lapack_int LAPACKE_dtpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10548                                 double* a, lapack_int lda, double* b,
10549                                 lapack_int ldb, double* t, lapack_int ldt );
10550lapack_int LAPACKE_ctpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10551                                 lapack_complex_float* a, lapack_int lda,
10552                                 lapack_complex_float* b, lapack_int ldb,
10553                                 lapack_complex_float* t, lapack_int ldt );
10554lapack_int LAPACKE_ztpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10555                                 lapack_complex_double* a, lapack_int lda,
10556                                 lapack_complex_double* b, lapack_int ldb,
10557                                 lapack_complex_double* t, lapack_int ldt );
10558
10559lapack_int LAPACKE_stprfb_work( int matrix_order, char side, char trans,
10560                                char direct, char storev, lapack_int m,
10561                                lapack_int n, lapack_int k, lapack_int l,
10562                                const float* v, lapack_int ldv, const float* t,
10563                                lapack_int ldt, float* a, lapack_int lda,
10564                                float* b, lapack_int ldb, const float* mywork,
10565                                lapack_int myldwork );
10566lapack_int LAPACKE_dtprfb_work( int matrix_order, char side, char trans,
10567                                char direct, char storev, lapack_int m,
10568                                lapack_int n, lapack_int k, lapack_int l,
10569                                const double* v, lapack_int ldv,
10570                                const double* t, lapack_int ldt, double* a,
10571                                lapack_int lda, double* b, lapack_int ldb,
10572                                const double* mywork, lapack_int myldwork );
10573lapack_int LAPACKE_ctprfb_work( int matrix_order, char side, char trans,
10574                                char direct, char storev, lapack_int m,
10575                                lapack_int n, lapack_int k, lapack_int l,
10576                                const lapack_complex_float* v, lapack_int ldv,
10577                                const lapack_complex_float* t, lapack_int ldt,
10578                                lapack_complex_float* a, lapack_int lda,
10579                                lapack_complex_float* b, lapack_int ldb,
10580                                const float* mywork, lapack_int myldwork );
10581lapack_int LAPACKE_ztprfb_work( int matrix_order, char side, char trans,
10582                                char direct, char storev, lapack_int m,
10583                                lapack_int n, lapack_int k, lapack_int l,
10584                                const lapack_complex_double* v, lapack_int ldv,
10585                                const lapack_complex_double* t, lapack_int ldt,
10586                                lapack_complex_double* a, lapack_int lda,
10587                                lapack_complex_double* b, lapack_int ldb,
10588                                const double* mywork, lapack_int myldwork );
10589//LAPACK 3.X.X
10590lapack_int LAPACKE_csyr( int matrix_order, char uplo, lapack_int n,
10591                             lapack_complex_float alpha,
10592                             const lapack_complex_float* x, lapack_int incx,
10593                             lapack_complex_float* a, lapack_int lda );
10594lapack_int LAPACKE_zsyr( int matrix_order, char uplo, lapack_int n,
10595                             lapack_complex_double alpha,
10596                             const lapack_complex_double* x, lapack_int incx,
10597                             lapack_complex_double* a, lapack_int lda );
10598
10599lapack_int LAPACKE_csyr_work( int matrix_order, char uplo, lapack_int n,
10600                                  lapack_complex_float alpha,
10601                                  const lapack_complex_float* x,
10602                                  lapack_int incx, lapack_complex_float* a,
10603                                  lapack_int lda );
10604lapack_int LAPACKE_zsyr_work( int matrix_order, char uplo, lapack_int n,
10605                                  lapack_complex_double alpha,
10606                                  const lapack_complex_double* x,
10607                                  lapack_int incx, lapack_complex_double* a,
10608                                  lapack_int lda );
10609
10610
10611
10612#define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
10613#define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
10614#define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
10615#define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
10616#define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
10617#define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
10618#define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
10619#define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
10620#define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
10621#define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
10622#define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
10623#define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
10624#define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
10625#define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
10626#define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
10627#define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
10628#define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
10629#define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
10630#define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
10631#define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
10632#define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
10633#define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
10634#define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
10635#define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
10636#define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
10637#define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
10638#define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
10639#define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
10640#define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
10641#define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
10642#define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
10643#define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
10644#define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
10645#define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
10646#define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
10647#define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
10648#define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
10649#define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
10650#define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
10651#define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
10652#define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
10653#define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
10654#define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
10655#define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
10656#define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
10657#define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
10658#define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
10659#define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
10660#define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
10661#define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
10662#define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
10663#define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
10664#define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
10665#define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
10666#define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
10667#define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
10668#define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
10669#define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
10670#define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
10671#define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
10672#define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
10673#define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
10674#define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
10675#define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
10676#define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
10677#define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
10678#define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
10679#define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
10680#define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
10681#define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
10682#define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
10683#define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
10684#define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
10685#define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
10686#define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
10687#define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
10688#define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
10689#define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
10690#define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
10691#define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
10692#define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
10693#define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
10694#define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
10695#define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
10696#define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
10697#define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
10698#define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
10699#define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
10700#define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
10701#define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
10702#define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
10703#define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
10704#define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
10705#define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
10706#define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
10707#define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
10708#define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
10709#define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
10710#define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
10711#define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
10712#define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
10713#define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
10714#define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
10715#define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
10716#define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
10717#define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
10718#define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
10719#define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
10720#define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
10721#define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
10722#define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
10723#define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
10724#define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
10725#define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
10726#define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
10727#define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
10728#define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
10729#define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
10730#define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
10731#define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
10732#define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
10733#define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
10734#define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
10735#define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
10736#define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
10737#define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
10738#define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
10739#define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
10740#define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
10741#define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
10742#define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
10743#define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
10744#define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
10745#define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
10746#define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
10747#define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
10748#define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
10749#define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
10750#define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
10751#define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
10752#define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
10753#define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
10754#define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
10755#define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
10756#define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
10757#define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
10758#define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
10759#define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
10760#define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
10761#define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
10762#define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
10763#define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
10764#define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
10765#define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
10766#define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
10767#define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
10768#define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
10769#define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
10770#define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
10771#define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
10772#define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
10773#define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
10774#define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
10775#define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
10776#define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
10777#define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
10778#define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
10779#define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
10780#define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
10781#define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
10782#define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
10783#define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
10784#define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
10785#define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
10786#define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
10787#define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
10788#define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
10789#define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
10790#define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
10791#define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
10792#define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
10793#define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
10794#define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
10795#define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
10796#define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
10797#define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
10798#define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
10799#define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
10800#define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
10801#define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
10802#define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
10803#define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
10804#define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
10805#define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
10806#define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
10807#define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
10808#define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
10809#define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
10810#define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
10811#define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
10812#define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
10813#define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
10814#define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
10815#define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
10816#define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
10817#define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
10818#define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
10819#define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
10820#define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
10821#define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
10822#define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
10823#define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
10824#define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
10825#define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
10826#define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
10827#define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
10828#define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
10829#define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
10830#define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
10831#define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
10832#define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
10833#define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
10834#define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
10835#define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
10836#define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
10837#define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
10838#define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
10839#define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
10840#define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
10841#define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
10842#define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
10843#define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
10844#define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
10845#define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
10846#define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
10847#define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
10848#define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
10849#define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
10850#define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
10851#define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
10852#define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
10853#define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
10854#define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
10855#define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
10856#define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
10857#define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
10858#define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
10859#define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
10860#define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
10861#define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
10862#define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
10863#define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
10864#define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
10865#define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
10866#define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
10867#define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
10868#define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
10869#define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
10870#define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
10871#define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
10872#define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
10873#define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
10874#define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
10875#define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
10876#define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
10877#define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
10878#define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
10879#define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
10880#define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
10881#define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
10882#define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
10883#define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
10884#define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
10885#define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
10886#define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
10887#define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
10888#define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
10889#define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
10890#define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
10891#define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
10892#define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
10893#define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
10894#define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
10895#define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
10896#define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
10897#define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
10898#define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
10899#define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
10900#define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
10901#define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
10902#define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
10903#define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
10904#define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
10905#define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
10906#define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
10907#define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
10908#define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
10909#define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
10910#define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
10911#define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
10912#define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
10913#define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
10914#define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
10915#define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
10916#define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
10917#define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
10918#define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
10919#define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
10920#define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
10921#define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
10922#define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
10923#define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
10924#define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
10925#define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
10926#define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
10927#define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
10928#define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
10929#define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
10930#define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
10931#define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
10932#define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
10933#define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
10934#define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
10935#define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
10936#define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
10937#define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
10938#define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
10939#define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
10940#define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
10941#define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
10942#define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
10943#define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
10944#define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
10945#define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
10946#define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
10947#define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
10948#define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
10949#define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
10950#define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
10951#define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
10952#define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
10953#define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
10954#define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
10955#define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
10956#define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
10957#define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
10958#define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
10959#define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
10960#define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
10961#define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
10962#define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
10963#define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
10964#define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
10965#define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
10966#define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
10967#define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
10968#define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
10969#define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
10970#define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
10971#define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
10972#define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
10973#define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
10974#define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
10975#define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
10976#define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
10977#define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
10978#define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
10979#define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
10980#define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
10981#define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
10982#define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
10983#define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
10984#define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
10985#define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
10986#define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
10987#define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
10988#define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
10989#define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
10990#define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
10991#define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
10992#define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
10993#define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
10994#define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
10995#define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
10996#define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
10997#define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
10998#define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
10999#define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
11000#define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
11001#define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
11002#define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
11003#define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
11004#define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
11005#define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
11006#define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
11007#define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
11008#define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
11009#define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
11010#define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
11011#define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
11012#define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
11013#define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
11014#define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
11015#define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
11016#define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
11017#define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
11018#define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
11019#define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
11020#define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
11021#define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
11022#define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
11023#define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
11024#define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
11025#define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
11026#define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
11027#define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
11028#define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
11029#define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
11030#define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
11031#define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
11032#define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
11033#define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
11034#define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
11035#define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
11036#define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
11037#define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
11038#define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
11039#define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
11040#define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
11041#define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
11042#define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
11043#define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
11044#define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
11045#define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
11046#define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
11047#define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
11048#define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
11049#define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
11050#define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
11051#define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
11052#define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
11053#define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
11054#define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
11055#define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
11056#define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
11057#define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
11058#define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
11059#define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
11060#define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
11061#define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
11062#define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
11063#define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
11064#define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
11065#define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
11066#define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
11067#define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
11068#define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
11069#define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
11070#define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
11071#define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
11072#define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
11073#define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
11074#define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
11075#define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
11076#define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
11077#define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
11078#define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
11079#define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
11080#define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
11081#define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
11082#define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
11083#define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
11084#define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
11085#define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
11086#define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
11087#define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
11088#define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
11089#define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
11090#define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
11091#define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
11092#define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
11093#define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
11094#define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
11095#define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
11096#define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
11097#define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
11098#define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
11099#define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
11100#define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
11101#define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
11102#define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
11103#define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
11104#define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
11105#define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
11106#define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
11107#define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
11108#define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
11109#define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
11110#define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
11111#define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
11112#define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
11113#define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
11114#define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
11115#define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
11116#define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
11117#define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
11118#define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
11119#define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
11120#define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
11121#define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
11122#define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
11123#define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
11124#define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
11125#define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
11126#define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
11127#define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
11128#define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
11129#define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
11130#define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
11131#define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
11132#define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
11133#define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
11134#define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
11135#define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
11136#define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
11137#define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
11138#define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
11139#define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
11140#define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
11141#define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
11142#define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
11143#define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
11144#define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
11145#define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
11146#define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
11147#define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
11148#define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
11149#define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
11150#define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
11151#define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
11152#define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
11153#define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
11154#define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
11155#define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
11156#define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
11157#define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
11158#define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
11159#define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
11160#define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
11161#define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
11162#define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
11163#define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
11164#define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
11165#define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
11166#define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
11167#define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
11168#define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
11169#define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
11170#define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
11171#define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
11172#define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
11173#define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
11174#define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
11175#define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
11176#define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
11177#define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
11178#define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
11179#define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
11180#define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
11181#define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
11182#define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
11183#define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
11184#define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
11185#define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
11186#define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
11187#define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
11188#define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
11189#define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
11190#define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
11191#define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
11192#define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
11193#define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
11194#define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
11195#define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
11196#define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
11197#define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
11198#define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
11199#define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
11200#define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
11201#define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
11202#define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
11203#define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
11204#define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
11205#define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
11206#define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
11207#define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
11208#define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
11209#define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
11210#define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
11211#define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
11212#define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
11213#define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
11214#define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
11215#define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
11216#define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
11217#define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
11218#define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
11219#define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
11220#define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
11221#define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
11222#define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
11223#define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
11224#define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
11225#define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
11226#define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
11227#define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
11228#define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
11229#define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
11230#define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
11231#define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
11232#define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
11233#define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
11234#define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
11235#define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
11236#define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
11237#define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
11238#define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
11239#define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
11240#define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
11241#define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
11242#define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
11243#define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
11244#define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
11245#define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
11246#define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
11247#define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
11248#define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
11249#define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
11250#define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
11251#define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
11252#define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
11253#define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
11254#define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
11255#define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
11256#define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
11257#define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
11258#define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
11259#define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
11260#define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
11261#define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
11262#define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
11263#define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
11264#define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
11265#define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
11266#define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
11267#define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
11268#define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
11269#define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
11270#define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
11271#define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
11272#define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
11273#define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
11274#define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
11275#define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
11276#define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
11277#define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
11278#define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
11279#define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
11280#define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
11281#define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
11282#define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
11283#define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
11284#define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
11285#define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
11286#define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
11287#define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
11288#define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
11289#define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
11290#define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
11291#define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
11292#define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
11293#define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
11294#define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
11295#define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
11296#define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
11297#define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
11298#define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
11299#define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
11300#define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
11301#define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
11302#define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
11303#define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
11304#define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
11305#define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
11306#define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
11307#define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
11308#define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
11309#define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
11310#define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
11311#define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
11312#define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
11313#define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
11314#define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
11315#define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
11316#define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
11317#define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
11318#define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
11319#define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
11320#define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
11321#define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
11322#define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
11323#define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
11324#define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
11325#define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
11326#define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
11327#define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
11328#define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
11329#define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
11330#define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
11331#define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
11332#define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
11333#define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
11334#define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
11335#define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
11336#define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
11337#define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
11338#define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
11339#define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
11340#define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
11341#define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
11342#define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
11343#define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
11344#define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
11345#define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
11346#define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
11347#define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
11348#define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
11349#define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
11350#define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
11351#define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
11352#define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
11353#define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
11354#define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
11355#define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
11356#define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
11357#define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
11358#define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
11359#define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
11360#define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
11361#define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
11362#define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
11363#define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
11364#define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
11365#define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
11366#define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
11367#define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
11368#define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
11369#define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
11370#define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
11371#define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
11372#define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
11373#define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
11374#define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
11375#define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
11376#define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
11377#define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
11378#define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
11379#define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
11380#define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
11381#define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
11382#define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
11383#define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
11384#define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
11385#define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
11386#define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
11387#define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
11388#define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
11389#define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
11390#define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
11391#define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
11392#define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
11393#define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
11394#define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
11395#define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
11396#define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
11397#define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
11398#define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
11399#define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
11400#define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
11401#define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
11402#define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
11403#define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
11404#define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
11405#define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
11406#define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
11407#define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
11408#define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
11409#define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
11410#define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
11411#define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
11412#define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
11413#define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
11414#define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
11415#define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
11416#define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
11417#define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
11418#define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
11419#define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
11420#define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
11421#define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
11422#define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
11423#define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
11424#define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
11425#define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
11426#define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
11427#define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
11428#define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
11429#define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
11430#define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
11431#define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
11432#define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
11433#define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
11434#define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
11435#define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
11436#define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
11437#define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
11438#define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
11439#define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
11440#define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
11441#define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
11442#define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
11443#define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
11444#define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
11445#define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
11446#define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
11447#define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
11448#define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
11449#define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
11450#define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
11451#define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
11452#define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
11453#define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
11454#define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
11455#define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
11456#define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
11457#define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
11458#define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
11459#define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
11460#define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
11461#define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
11462#define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
11463#define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
11464#define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
11465#define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
11466#define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
11467#define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
11468#define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
11469#define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
11470#define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
11471#define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
11472#define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
11473#define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
11474#define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
11475#define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
11476#define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
11477#define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
11478#define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
11479#define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
11480#define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
11481#define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
11482#define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
11483#define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
11484#define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
11485#define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
11486#define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
11487#define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
11488#define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
11489#define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
11490#define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
11491#define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
11492#define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
11493#define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
11494#define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
11495#define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
11496#define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
11497#define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
11498#define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
11499#define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
11500#define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
11501#define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
11502#define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
11503#define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
11504#define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
11505#define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
11506#define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
11507#define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
11508#define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
11509#define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
11510#define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
11511#define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
11512#define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
11513#define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
11514#define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
11515#define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
11516#define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
11517#define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
11518#define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
11519#define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
11520#define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
11521#define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
11522#define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
11523#define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
11524#define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
11525#define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
11526#define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
11527#define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
11528#define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
11529#define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
11530#define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
11531#define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
11532#define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
11533#define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
11534#define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
11535#define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
11536#define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
11537#define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
11538#define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
11539#define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
11540#define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
11541#define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
11542#define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
11543#define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
11544#define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
11545#define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
11546#define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
11547#define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
11548#define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
11549#define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
11550#define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
11551#define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
11552#define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
11553#define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
11554#define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
11555#define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
11556#define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
11557#define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
11558#define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
11559#define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
11560#define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
11561#define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
11562#define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
11563#define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
11564#define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
11565#define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
11566#define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
11567#define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
11568// LAPACK 3.3.0
11569#define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
11570#define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
11571#define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
11572#define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
11573#define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
11574#define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
11575#define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
11576#define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
11577#define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
11578#define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
11579#define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
11580#define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
11581#define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
11582#define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
11583#define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
11584#define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
11585#define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
11586#define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
11587#define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
11588#define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
11589#define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
11590#define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
11591#define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
11592#define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
11593#define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
11594#define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
11595#define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
11596#define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
11597#define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
11598#define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
11599#define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
11600#define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
11601#define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
11602#define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
11603#define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
11604#define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
11605#define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
11606#define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
11607#define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
11608#define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
11609// LAPACK 3.4.0
11610#define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
11611#define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
11612#define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
11613#define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
11614#define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
11615#define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
11616#define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
11617#define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
11618#define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
11619#define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
11620#define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
11621#define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
11622#define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
11623#define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
11624#define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
11625#define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
11626#define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
11627#define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
11628#define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
11629#define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
11630#define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
11631#define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
11632#define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
11633#define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
11634#define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
11635#define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
11636#define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
11637#define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
11638#define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
11639#define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
11640#define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
11641// LAPACK 3.X.X
11642#define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
11643#define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
11644
11645
11646void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11647                    lapack_int* ipiv, lapack_int *info );
11648void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11649                    lapack_int* ipiv, lapack_int *info );
11650void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11651                    lapack_int* lda, lapack_int* ipiv, lapack_int *info );
11652void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11653                    lapack_int* lda, lapack_int* ipiv, lapack_int *info );
11654void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11655                    lapack_int* ku, float* ab, lapack_int* ldab,
11656                    lapack_int* ipiv, lapack_int *info );
11657void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11658                    lapack_int* ku, double* ab, lapack_int* ldab,
11659                    lapack_int* ipiv, lapack_int *info );
11660void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11661                    lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
11662                    lapack_int* ipiv, lapack_int *info );
11663void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11664                    lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
11665                    lapack_int* ipiv, lapack_int *info );
11666void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
11667                    lapack_int* ipiv, lapack_int *info );
11668void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
11669                    double* du2, lapack_int* ipiv, lapack_int *info );
11670void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
11671                    lapack_complex_float* d, lapack_complex_float* du,
11672                    lapack_complex_float* du2, lapack_int* ipiv,
11673                    lapack_int *info );
11674void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
11675                    lapack_complex_double* d, lapack_complex_double* du,
11676                    lapack_complex_double* du2, lapack_int* ipiv,
11677                    lapack_int *info );
11678void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11679                    lapack_int *info );
11680void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11681                    lapack_int *info );
11682void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11683                    lapack_int* lda, lapack_int *info );
11684void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11685                    lapack_int* lda, lapack_int *info );
11686void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11687                    lapack_int* piv, lapack_int* rank, double* tol,
11688                    double* work, lapack_int *info );
11689void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11690                    lapack_int* piv, lapack_int* rank, float* tol, float* work,
11691                    lapack_int *info );
11692void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11693                    lapack_int* lda, lapack_int* piv, lapack_int* rank,
11694                    double* tol, double* work, lapack_int *info );
11695void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11696                    lapack_int* lda, lapack_int* piv, lapack_int* rank,
11697                    float* tol, float* work, lapack_int *info );
11698void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
11699                    lapack_int *info );
11700void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
11701                    lapack_int *info );
11702void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
11703                    lapack_complex_double* a, lapack_int *info );
11704void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
11705                    lapack_complex_float* a, lapack_int *info );
11706void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
11707void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
11708void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11709                    lapack_int *info );
11710void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11711                    lapack_int *info );
11712void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
11713                    lapack_int* ldab, lapack_int *info );
11714void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
11715                    lapack_int* ldab, lapack_int *info );
11716void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
11717                    lapack_complex_float* ab, lapack_int* ldab,
11718                    lapack_int *info );
11719void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
11720                    lapack_complex_double* ab, lapack_int* ldab,
11721                    lapack_int *info );
11722void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
11723void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
11724void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
11725                    lapack_int *info );
11726void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
11727                    lapack_int *info );
11728void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11729                    lapack_int* ipiv, float* work, lapack_int* lwork,
11730                    lapack_int *info );
11731void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11732                    lapack_int* ipiv, double* work, lapack_int* lwork,
11733                    lapack_int *info );
11734void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11735                    lapack_int* lda, lapack_int* ipiv,
11736                    lapack_complex_float* work, lapack_int* lwork,
11737                    lapack_int *info );
11738void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11739                    lapack_int* lda, lapack_int* ipiv,
11740                    lapack_complex_double* work, lapack_int* lwork,
11741                    lapack_int *info );
11742void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11743                    lapack_int* lda, lapack_int* ipiv,
11744                    lapack_complex_float* work, lapack_int* lwork,
11745                    lapack_int *info );
11746void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11747                    lapack_int* lda, lapack_int* ipiv,
11748                    lapack_complex_double* work, lapack_int* lwork,
11749                    lapack_int *info );
11750void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
11751                    lapack_int *info );
11752void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
11753                    lapack_int *info );
11754void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11755                    lapack_int* ipiv, lapack_int *info );
11756void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11757                    lapack_int* ipiv, lapack_int *info );
11758void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11759                    lapack_int* ipiv, lapack_int *info );
11760void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11761                    lapack_int* ipiv, lapack_int *info );
11762void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11763                    const float* a, lapack_int* lda, const lapack_int* ipiv,
11764                    float* b, lapack_int* ldb, lapack_int *info );
11765void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11766                    const double* a, lapack_int* lda, const lapack_int* ipiv,
11767                    double* b, lapack_int* ldb, lapack_int *info );
11768void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11769                    const lapack_complex_float* a, lapack_int* lda,
11770                    const lapack_int* ipiv, lapack_complex_float* b,
11771                    lapack_int* ldb, lapack_int *info );
11772void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11773                    const lapack_complex_double* a, lapack_int* lda,
11774                    const lapack_int* ipiv, lapack_complex_double* b,
11775                    lapack_int* ldb, lapack_int *info );
11776void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11777                    lapack_int* nrhs, const float* ab, lapack_int* ldab,
11778                    const lapack_int* ipiv, float* b, lapack_int* ldb,
11779                    lapack_int *info );
11780void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11781                    lapack_int* nrhs, const double* ab, lapack_int* ldab,
11782                    const lapack_int* ipiv, double* b, lapack_int* ldb,
11783                    lapack_int *info );
11784void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11785                    lapack_int* nrhs, const lapack_complex_float* ab,
11786                    lapack_int* ldab, const lapack_int* ipiv,
11787                    lapack_complex_float* b, lapack_int* ldb,
11788                    lapack_int *info );
11789void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11790                    lapack_int* nrhs, const lapack_complex_double* ab,
11791                    lapack_int* ldab, const lapack_int* ipiv,
11792                    lapack_complex_double* b, lapack_int* ldb,
11793                    lapack_int *info );
11794void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11795                    const float* dl, const float* d, const float* du,
11796                    const float* du2, const lapack_int* ipiv, float* b,
11797                    lapack_int* ldb, lapack_int *info );
11798void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11799                    const double* dl, const double* d, const double* du,
11800                    const double* du2, const lapack_int* ipiv, double* b,
11801                    lapack_int* ldb, lapack_int *info );
11802void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11803                    const lapack_complex_float* dl,
11804                    const lapack_complex_float* d,
11805                    const lapack_complex_float* du,
11806                    const lapack_complex_float* du2, const lapack_int* ipiv,
11807                    lapack_complex_float* b, lapack_int* ldb,
11808                    lapack_int *info );
11809void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11810                    const lapack_complex_double* dl,
11811                    const lapack_complex_double* d,
11812                    const lapack_complex_double* du,
11813                    const lapack_complex_double* du2, const lapack_int* ipiv,
11814                    lapack_complex_double* b, lapack_int* ldb,
11815                    lapack_int *info );
11816void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
11817                    lapack_int* lda, float* b, lapack_int* ldb,
11818                    lapack_int *info );
11819void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11820                    const double* a, lapack_int* lda, double* b,
11821                    lapack_int* ldb, lapack_int *info );
11822void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11823                    const lapack_complex_float* a, lapack_int* lda,
11824                    lapack_complex_float* b, lapack_int* ldb,
11825                    lapack_int *info );
11826void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11827                    const lapack_complex_double* a, lapack_int* lda,
11828                    lapack_complex_double* b, lapack_int* ldb,
11829                    lapack_int *info );
11830void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11831                    const double* a, double* b, lapack_int* ldb,
11832                    lapack_int *info );
11833void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11834                    const float* a, float* b, lapack_int* ldb,
11835                    lapack_int *info );
11836void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11837                    const lapack_complex_double* a, lapack_complex_double* b,
11838                    lapack_int* ldb, lapack_int *info );
11839void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11840                    const lapack_complex_float* a, lapack_complex_float* b,
11841                    lapack_int* ldb, lapack_int *info );
11842void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11843                    const float* ap, float* b, lapack_int* ldb,
11844                    lapack_int *info );
11845void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11846                    const double* ap, double* b, lapack_int* ldb,
11847                    lapack_int *info );
11848void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11849                    const lapack_complex_float* ap, lapack_complex_float* b,
11850                    lapack_int* ldb, lapack_int *info );
11851void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11852                    const lapack_complex_double* ap, lapack_complex_double* b,
11853                    lapack_int* ldb, lapack_int *info );
11854void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11855                    const float* ab, lapack_int* ldab, float* b,
11856                    lapack_int* ldb, lapack_int *info );
11857void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11858                    const double* ab, lapack_int* ldab, double* b,
11859                    lapack_int* ldb, lapack_int *info );
11860void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11861                    const lapack_complex_float* ab, lapack_int* ldab,
11862                    lapack_complex_float* b, lapack_int* ldb,
11863                    lapack_int *info );
11864void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11865                    const lapack_complex_double* ab, lapack_int* ldab,
11866                    lapack_complex_double* b, lapack_int* ldb,
11867                    lapack_int *info );
11868void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
11869                    const float* e, float* b, lapack_int* ldb,
11870                    lapack_int *info );
11871void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
11872                    const double* e, double* b, lapack_int* ldb,
11873                    lapack_int *info );
11874void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
11875                    const lapack_complex_float* e, lapack_complex_float* b,
11876                    lapack_int* ldb, lapack_int *info );
11877void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11878                    const double* d, const lapack_complex_double* e,
11879                    lapack_complex_double* b, lapack_int* ldb,
11880                    lapack_int *info );
11881void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
11882                    lapack_int* lda, const lapack_int* ipiv, float* b,
11883                    lapack_int* ldb, lapack_int *info );
11884void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11885                    const double* a, lapack_int* lda, const lapack_int* ipiv,
11886                    double* b, lapack_int* ldb, lapack_int *info );
11887void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11888                    const lapack_complex_float* a, lapack_int* lda,
11889                    const lapack_int* ipiv, lapack_complex_float* b,
11890                    lapack_int* ldb, lapack_int *info );
11891void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11892                    const lapack_complex_double* a, lapack_int* lda,
11893                    const lapack_int* ipiv, lapack_complex_double* b,
11894                    lapack_int* ldb, lapack_int *info );
11895void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11896                    const lapack_complex_float* a, lapack_int* lda,
11897                    const lapack_int* ipiv, lapack_complex_float* b,
11898                    lapack_int* ldb, lapack_int *info );
11899void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11900                    const lapack_complex_double* a, lapack_int* lda,
11901                    const lapack_int* ipiv, lapack_complex_double* b,
11902                    lapack_int* ldb, lapack_int *info );
11903void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11904                    const float* ap, const lapack_int* ipiv, float* b,
11905                    lapack_int* ldb, lapack_int *info );
11906void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11907                    const double* ap, const lapack_int* ipiv, double* b,
11908                    lapack_int* ldb, lapack_int *info );
11909void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11910                    const lapack_complex_float* ap, const lapack_int* ipiv,
11911                    lapack_complex_float* b, lapack_int* ldb,
11912                    lapack_int *info );
11913void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11914                    const lapack_complex_double* ap, const lapack_int* ipiv,
11915                    lapack_complex_double* b, lapack_int* ldb,
11916                    lapack_int *info );
11917void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11918                    const lapack_complex_float* ap, const lapack_int* ipiv,
11919                    lapack_complex_float* b, lapack_int* ldb,
11920                    lapack_int *info );
11921void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11922                    const lapack_complex_double* ap, const lapack_int* ipiv,
11923                    lapack_complex_double* b, lapack_int* ldb,
11924                    lapack_int *info );
11925void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11926                    lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
11927                    lapack_int* ldb, lapack_int *info );
11928void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11929                    lapack_int* nrhs, const double* a, lapack_int* lda,
11930                    double* b, lapack_int* ldb, lapack_int *info );
11931void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11932                    lapack_int* nrhs, const lapack_complex_float* a,
11933                    lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
11934                    lapack_int *info );
11935void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11936                    lapack_int* nrhs, const lapack_complex_double* a,
11937                    lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
11938                    lapack_int *info );
11939void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11940                    lapack_int* nrhs, const float* ap, float* b,
11941                    lapack_int* ldb, lapack_int *info );
11942void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11943                    lapack_int* nrhs, const double* ap, double* b,
11944                    lapack_int* ldb, lapack_int *info );
11945void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11946                    lapack_int* nrhs, const lapack_complex_float* ap,
11947                    lapack_complex_float* b, lapack_int* ldb,
11948                    lapack_int *info );
11949void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11950                    lapack_int* nrhs, const lapack_complex_double* ap,
11951                    lapack_complex_double* b, lapack_int* ldb,
11952                    lapack_int *info );
11953void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11954                    lapack_int* kd, lapack_int* nrhs, const float* ab,
11955                    lapack_int* ldab, float* b, lapack_int* ldb,
11956                    lapack_int *info );
11957void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11958                    lapack_int* kd, lapack_int* nrhs, const double* ab,
11959                    lapack_int* ldab, double* b, lapack_int* ldb,
11960                    lapack_int *info );
11961void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11962                    lapack_int* kd, lapack_int* nrhs,
11963                    const lapack_complex_float* ab, lapack_int* ldab,
11964                    lapack_complex_float* b, lapack_int* ldb,
11965                    lapack_int *info );
11966void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11967                    lapack_int* kd, lapack_int* nrhs,
11968                    const lapack_complex_double* ab, lapack_int* ldab,
11969                    lapack_complex_double* b, lapack_int* ldb,
11970                    lapack_int *info );
11971void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
11972                    float* anorm, float* rcond, float* work, lapack_int* iwork,
11973                    lapack_int *info );
11974void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
11975                    double* anorm, double* rcond, double* work,
11976                    lapack_int* iwork, lapack_int *info );
11977void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
11978                    lapack_int* lda, float* anorm, float* rcond,
11979                    lapack_complex_float* work, float* rwork,
11980                    lapack_int *info );
11981void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
11982                    lapack_int* lda, double* anorm, double* rcond,
11983                    lapack_complex_double* work, double* rwork,
11984                    lapack_int *info );
11985void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11986                    const float* ab, lapack_int* ldab, const lapack_int* ipiv,
11987                    float* anorm, float* rcond, float* work, lapack_int* iwork,
11988                    lapack_int *info );
11989void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11990                    const double* ab, lapack_int* ldab, const lapack_int* ipiv,
11991                    double* anorm, double* rcond, double* work,
11992                    lapack_int* iwork, lapack_int *info );
11993void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11994                    const lapack_complex_float* ab, lapack_int* ldab,
11995                    const lapack_int* ipiv, float* anorm, float* rcond,
11996                    lapack_complex_float* work, float* rwork,
11997                    lapack_int *info );
11998void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11999                    const lapack_complex_double* ab, lapack_int* ldab,
12000                    const lapack_int* ipiv, double* anorm, double* rcond,
12001                    lapack_complex_double* work, double* rwork,
12002                    lapack_int *info );
12003void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
12004                    const float* du, const float* du2, const lapack_int* ipiv,
12005                    float* anorm, float* rcond, float* work, lapack_int* iwork,
12006                    lapack_int *info );
12007void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
12008                    const double* d, const double* du, const double* du2,
12009                    const lapack_int* ipiv, double* anorm, double* rcond,
12010                    double* work, lapack_int* iwork, lapack_int *info );
12011void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
12012                    const lapack_complex_float* d,
12013                    const lapack_complex_float* du,
12014                    const lapack_complex_float* du2, const lapack_int* ipiv,
12015                    float* anorm, float* rcond, lapack_complex_float* work,
12016                    lapack_int *info );
12017void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
12018                    const lapack_complex_double* d,
12019                    const lapack_complex_double* du,
12020                    const lapack_complex_double* du2, const lapack_int* ipiv,
12021                    double* anorm, double* rcond, lapack_complex_double* work,
12022                    lapack_int *info );
12023void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12024                    float* anorm, float* rcond, float* work, lapack_int* iwork,
12025                    lapack_int *info );
12026void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
12027                    double* anorm, double* rcond, double* work,
12028                    lapack_int* iwork, lapack_int *info );
12029void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12030                    lapack_int* lda, float* anorm, float* rcond,
12031                    lapack_complex_float* work, float* rwork,
12032                    lapack_int *info );
12033void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12034                    lapack_int* lda, double* anorm, double* rcond,
12035                    lapack_complex_double* work, double* rwork,
12036                    lapack_int *info );
12037void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
12038                    float* rcond, float* work, lapack_int* iwork,
12039                    lapack_int *info );
12040void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
12041                    double* rcond, double* work, lapack_int* iwork,
12042                    lapack_int *info );
12043void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12044                    float* anorm, float* rcond, lapack_complex_float* work,
12045                    float* rwork, lapack_int *info );
12046void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12047                    double* anorm, double* rcond, lapack_complex_double* work,
12048                    double* rwork, lapack_int *info );
12049void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
12050                    lapack_int* ldab, float* anorm, float* rcond, float* work,
12051                    lapack_int* iwork, lapack_int *info );
12052void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
12053                    lapack_int* ldab, double* anorm, double* rcond,
12054                    double* work, lapack_int* iwork, lapack_int *info );
12055void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
12056                    const lapack_complex_float* ab, lapack_int* ldab,
12057                    float* anorm, float* rcond, lapack_complex_float* work,
12058                    float* rwork, lapack_int *info );
12059void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
12060                    const lapack_complex_double* ab, lapack_int* ldab,
12061                    double* anorm, double* rcond, lapack_complex_double* work,
12062                    double* rwork, lapack_int *info );
12063void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
12064                    float* rcond, float* work, lapack_int *info );
12065void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
12066                    double* anorm, double* rcond, double* work,
12067                    lapack_int *info );
12068void LAPACK_cptcon( lapack_int* n, const float* d,
12069                    const lapack_complex_float* e, float* anorm, float* rcond,
12070                    float* work, lapack_int *info );
12071void LAPACK_zptcon( lapack_int* n, const double* d,
12072                    const lapack_complex_double* e, double* anorm,
12073                    double* rcond, double* work, lapack_int *info );
12074void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12075                    const lapack_int* ipiv, float* anorm, float* rcond,
12076                    float* work, lapack_int* iwork, lapack_int *info );
12077void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
12078                    const lapack_int* ipiv, double* anorm, double* rcond,
12079                    double* work, lapack_int* iwork, lapack_int *info );
12080void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12081                    lapack_int* lda, const lapack_int* ipiv, float* anorm,
12082                    float* rcond, lapack_complex_float* work,
12083                    lapack_int *info );
12084void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12085                    lapack_int* lda, const lapack_int* ipiv, double* anorm,
12086                    double* rcond, lapack_complex_double* work,
12087                    lapack_int *info );
12088void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12089                    lapack_int* lda, const lapack_int* ipiv, float* anorm,
12090                    float* rcond, lapack_complex_float* work,
12091                    lapack_int *info );
12092void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12093                    lapack_int* lda, const lapack_int* ipiv, double* anorm,
12094                    double* rcond, lapack_complex_double* work,
12095                    lapack_int *info );
12096void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
12097                    const lapack_int* ipiv, float* anorm, float* rcond,
12098                    float* work, lapack_int* iwork, lapack_int *info );
12099void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
12100                    const lapack_int* ipiv, double* anorm, double* rcond,
12101                    double* work, lapack_int* iwork, lapack_int *info );
12102void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12103                    const lapack_int* ipiv, float* anorm, float* rcond,
12104                    lapack_complex_float* work, lapack_int *info );
12105void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12106                    const lapack_int* ipiv, double* anorm, double* rcond,
12107                    lapack_complex_double* work, lapack_int *info );
12108void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12109                    const lapack_int* ipiv, float* anorm, float* rcond,
12110                    lapack_complex_float* work, lapack_int *info );
12111void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12112                    const lapack_int* ipiv, double* anorm, double* rcond,
12113                    lapack_complex_double* work, lapack_int *info );
12114void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
12115                    const float* a, lapack_int* lda, float* rcond, float* work,
12116                    lapack_int* iwork, lapack_int *info );
12117void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12118                    const double* a, lapack_int* lda, double* rcond,
12119                    double* work, lapack_int* iwork, lapack_int *info );
12120void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12121                    const lapack_complex_float* a, lapack_int* lda,
12122                    float* rcond, lapack_complex_float* work, float* rwork,
12123                    lapack_int *info );
12124void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12125                    const lapack_complex_double* a, lapack_int* lda,
12126                    double* rcond, lapack_complex_double* work, double* rwork,
12127                    lapack_int *info );
12128void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12129                    const float* ap, float* rcond, float* work,
12130                    lapack_int* iwork, lapack_int *info );
12131void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12132                    const double* ap, double* rcond, double* work,
12133                    lapack_int* iwork, lapack_int *info );
12134void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12135                    const lapack_complex_float* ap, float* rcond,
12136                    lapack_complex_float* work, float* rwork,
12137                    lapack_int *info );
12138void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12139                    const lapack_complex_double* ap, double* rcond,
12140                    lapack_complex_double* work, double* rwork,
12141                    lapack_int *info );
12142void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12143                    lapack_int* kd, const float* ab, lapack_int* ldab,
12144                    float* rcond, float* work, lapack_int* iwork,
12145                    lapack_int *info );
12146void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12147                    lapack_int* kd, const double* ab, lapack_int* ldab,
12148                    double* rcond, double* work, lapack_int* iwork,
12149                    lapack_int *info );
12150void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12151                    lapack_int* kd, const lapack_complex_float* ab,
12152                    lapack_int* ldab, float* rcond, lapack_complex_float* work,
12153                    float* rwork, lapack_int *info );
12154void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12155                    lapack_int* kd, const lapack_complex_double* ab,
12156                    lapack_int* ldab, double* rcond,
12157                    lapack_complex_double* work, double* rwork,
12158                    lapack_int *info );
12159void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12160                    const float* a, lapack_int* lda, const float* af,
12161                    lapack_int* ldaf, const lapack_int* ipiv, const float* b,
12162                    lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12163                    float* berr, float* work, lapack_int* iwork,
12164                    lapack_int *info );
12165void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12166                    const double* a, lapack_int* lda, const double* af,
12167                    lapack_int* ldaf, const lapack_int* ipiv, const double* b,
12168                    lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12169                    double* berr, double* work, lapack_int* iwork,
12170                    lapack_int *info );
12171void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12172                    const lapack_complex_float* a, lapack_int* lda,
12173                    const lapack_complex_float* af, lapack_int* ldaf,
12174                    const lapack_int* ipiv, const lapack_complex_float* b,
12175                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12176                    float* ferr, float* berr, lapack_complex_float* work,
12177                    float* rwork, lapack_int *info );
12178void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12179                    const lapack_complex_double* a, lapack_int* lda,
12180                    const lapack_complex_double* af, lapack_int* ldaf,
12181                    const lapack_int* ipiv, const lapack_complex_double* b,
12182                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12183                    double* ferr, double* berr, lapack_complex_double* work,
12184                    double* rwork, lapack_int *info );
12185void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12186                     const double* a, lapack_int* lda, const double* af,
12187                     lapack_int* ldaf, const lapack_int* ipiv, const double* r,
12188                     const double* c, const double* b, lapack_int* ldb,
12189                     double* x, lapack_int* ldx, double* rcond, double* berr,
12190                     lapack_int* n_err_bnds, double* err_bnds_norm,
12191                     double* err_bnds_comp, lapack_int* nparams, double* params,
12192                     double* work, lapack_int* iwork, lapack_int *info );
12193void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12194                     const float* a, lapack_int* lda, const float* af,
12195                     lapack_int* ldaf, const lapack_int* ipiv, const float* r,
12196                     const float* c, const float* b, lapack_int* ldb, float* x,
12197                     lapack_int* ldx, float* rcond, float* berr,
12198                     lapack_int* n_err_bnds, float* err_bnds_norm,
12199                     float* err_bnds_comp, lapack_int* nparams, float* params,
12200                     float* work, lapack_int* iwork, lapack_int *info );
12201void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12202                     const lapack_complex_double* a, lapack_int* lda,
12203                     const lapack_complex_double* af, lapack_int* ldaf,
12204                     const lapack_int* ipiv, const double* r, const double* c,
12205                     const lapack_complex_double* b, lapack_int* ldb,
12206                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12207                     double* berr, lapack_int* n_err_bnds,
12208                     double* err_bnds_norm, double* err_bnds_comp,
12209                     lapack_int* nparams, double* params,
12210                     lapack_complex_double* work, double* rwork,
12211                     lapack_int *info );
12212void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12213                     const lapack_complex_float* a, lapack_int* lda,
12214                     const lapack_complex_float* af, lapack_int* ldaf,
12215                     const lapack_int* ipiv, const float* r, const float* c,
12216                     const lapack_complex_float* b, lapack_int* ldb,
12217                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12218                     float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12219                     float* err_bnds_comp, lapack_int* nparams, float* params,
12220                     lapack_complex_float* work, float* rwork,
12221                     lapack_int *info );
12222void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12223                    lapack_int* nrhs, const float* ab, lapack_int* ldab,
12224                    const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
12225                    const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12226                    float* ferr, float* berr, float* work, lapack_int* iwork,
12227                    lapack_int *info );
12228void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12229                    lapack_int* nrhs, const double* ab, lapack_int* ldab,
12230                    const double* afb, lapack_int* ldafb,
12231                    const lapack_int* ipiv, const double* b, lapack_int* ldb,
12232                    double* x, lapack_int* ldx, double* ferr, double* berr,
12233                    double* work, lapack_int* iwork, lapack_int *info );
12234void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12235                    lapack_int* nrhs, const lapack_complex_float* ab,
12236                    lapack_int* ldab, const lapack_complex_float* afb,
12237                    lapack_int* ldafb, const lapack_int* ipiv,
12238                    const lapack_complex_float* b, lapack_int* ldb,
12239                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12240                    float* berr, lapack_complex_float* work, float* rwork,
12241                    lapack_int *info );
12242void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12243                    lapack_int* nrhs, const lapack_complex_double* ab,
12244                    lapack_int* ldab, const lapack_complex_double* afb,
12245                    lapack_int* ldafb, const lapack_int* ipiv,
12246                    const lapack_complex_double* b, lapack_int* ldb,
12247                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12248                    double* berr, lapack_complex_double* work, double* rwork,
12249                    lapack_int *info );
12250void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12251                     lapack_int* ku, lapack_int* nrhs, const double* ab,
12252                     lapack_int* ldab, const double* afb, lapack_int* ldafb,
12253                     const lapack_int* ipiv, const double* r, const double* c,
12254                     const double* b, lapack_int* ldb, double* x,
12255                     lapack_int* ldx, double* rcond, double* berr,
12256                     lapack_int* n_err_bnds, double* err_bnds_norm,
12257                     double* err_bnds_comp, lapack_int* nparams, double* params,
12258                     double* work, lapack_int* iwork, lapack_int *info );
12259void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12260                     lapack_int* ku, lapack_int* nrhs, const float* ab,
12261                     lapack_int* ldab, const float* afb, lapack_int* ldafb,
12262                     const lapack_int* ipiv, const float* r, const float* c,
12263                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12264                     float* rcond, float* berr, lapack_int* n_err_bnds,
12265                     float* err_bnds_norm, float* err_bnds_comp,
12266                     lapack_int* nparams, float* params, float* work,
12267                     lapack_int* iwork, lapack_int *info );
12268void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12269                     lapack_int* ku, lapack_int* nrhs,
12270                     const lapack_complex_double* ab, lapack_int* ldab,
12271                     const lapack_complex_double* afb, lapack_int* ldafb,
12272                     const lapack_int* ipiv, const double* r, const double* c,
12273                     const lapack_complex_double* b, lapack_int* ldb,
12274                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12275                     double* berr, lapack_int* n_err_bnds,
12276                     double* err_bnds_norm, double* err_bnds_comp,
12277                     lapack_int* nparams, double* params,
12278                     lapack_complex_double* work, double* rwork,
12279                     lapack_int *info );
12280void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12281                     lapack_int* ku, lapack_int* nrhs,
12282                     const lapack_complex_float* ab, lapack_int* ldab,
12283                     const lapack_complex_float* afb, lapack_int* ldafb,
12284                     const lapack_int* ipiv, const float* r, const float* c,
12285                     const lapack_complex_float* b, lapack_int* ldb,
12286                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12287                     float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12288                     float* err_bnds_comp, lapack_int* nparams, float* params,
12289                     lapack_complex_float* work, float* rwork,
12290                     lapack_int *info );
12291void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12292                    const float* dl, const float* d, const float* du,
12293                    const float* dlf, const float* df, const float* duf,
12294                    const float* du2, const lapack_int* ipiv, const float* b,
12295                    lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12296                    float* berr, float* work, lapack_int* iwork,
12297                    lapack_int *info );
12298void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12299                    const double* dl, const double* d, const double* du,
12300                    const double* dlf, const double* df, const double* duf,
12301                    const double* du2, const lapack_int* ipiv, const double* b,
12302                    lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12303                    double* berr, double* work, lapack_int* iwork,
12304                    lapack_int *info );
12305void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12306                    const lapack_complex_float* dl,
12307                    const lapack_complex_float* d,
12308                    const lapack_complex_float* du,
12309                    const lapack_complex_float* dlf,
12310                    const lapack_complex_float* df,
12311                    const lapack_complex_float* duf,
12312                    const lapack_complex_float* du2, const lapack_int* ipiv,
12313                    const lapack_complex_float* b, lapack_int* ldb,
12314                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12315                    float* berr, lapack_complex_float* work, float* rwork,
12316                    lapack_int *info );
12317void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12318                    const lapack_complex_double* dl,
12319                    const lapack_complex_double* d,
12320                    const lapack_complex_double* du,
12321                    const lapack_complex_double* dlf,
12322                    const lapack_complex_double* df,
12323                    const lapack_complex_double* duf,
12324                    const lapack_complex_double* du2, const lapack_int* ipiv,
12325                    const lapack_complex_double* b, lapack_int* ldb,
12326                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12327                    double* berr, lapack_complex_double* work, double* rwork,
12328                    lapack_int *info );
12329void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
12330                    lapack_int* lda, const float* af, lapack_int* ldaf,
12331                    const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12332                    float* ferr, float* berr, float* work, lapack_int* iwork,
12333                    lapack_int *info );
12334void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12335                    const double* a, lapack_int* lda, const double* af,
12336                    lapack_int* ldaf, const double* b, lapack_int* ldb,
12337                    double* x, lapack_int* ldx, double* ferr, double* berr,
12338                    double* work, lapack_int* iwork, lapack_int *info );
12339void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12340                    const lapack_complex_float* a, lapack_int* lda,
12341                    const lapack_complex_float* af, lapack_int* ldaf,
12342                    const lapack_complex_float* b, lapack_int* ldb,
12343                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12344                    float* berr, lapack_complex_float* work, float* rwork,
12345                    lapack_int *info );
12346void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12347                    const lapack_complex_double* a, lapack_int* lda,
12348                    const lapack_complex_double* af, lapack_int* ldaf,
12349                    const lapack_complex_double* b, lapack_int* ldb,
12350                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12351                    double* berr, lapack_complex_double* work, double* rwork,
12352                    lapack_int *info );
12353void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12354                     const double* a, lapack_int* lda, const double* af,
12355                     lapack_int* ldaf, const double* s, const double* b,
12356                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
12357                     double* berr, lapack_int* n_err_bnds,
12358                     double* err_bnds_norm, double* err_bnds_comp,
12359                     lapack_int* nparams, double* params, double* work,
12360                     lapack_int* iwork, lapack_int *info );
12361void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12362                     const float* a, lapack_int* lda, const float* af,
12363                     lapack_int* ldaf, const float* s, const float* b,
12364                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12365                     float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12366                     float* err_bnds_comp, lapack_int* nparams, float* params,
12367                     float* work, lapack_int* iwork, lapack_int *info );
12368void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12369                     const lapack_complex_double* a, lapack_int* lda,
12370                     const lapack_complex_double* af, lapack_int* ldaf,
12371                     const double* s, const lapack_complex_double* b,
12372                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12373                     double* rcond, double* berr, lapack_int* n_err_bnds,
12374                     double* err_bnds_norm, double* err_bnds_comp,
12375                     lapack_int* nparams, double* params,
12376                     lapack_complex_double* work, double* rwork,
12377                     lapack_int *info );
12378void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12379                     const lapack_complex_float* a, lapack_int* lda,
12380                     const lapack_complex_float* af, lapack_int* ldaf,
12381                     const float* s, const lapack_complex_float* b,
12382                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12383                     float* rcond, float* berr, lapack_int* n_err_bnds,
12384                     float* err_bnds_norm, float* err_bnds_comp,
12385                     lapack_int* nparams, float* params,
12386                     lapack_complex_float* work, float* rwork,
12387                     lapack_int *info );
12388void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12389                    const float* ap, const float* afp, const float* b,
12390                    lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12391                    float* berr, float* work, lapack_int* iwork,
12392                    lapack_int *info );
12393void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12394                    const double* ap, const double* afp, const double* b,
12395                    lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12396                    double* berr, double* work, lapack_int* iwork,
12397                    lapack_int *info );
12398void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12399                    const lapack_complex_float* ap,
12400                    const lapack_complex_float* afp,
12401                    const lapack_complex_float* b, lapack_int* ldb,
12402                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12403                    float* berr, lapack_complex_float* work, float* rwork,
12404                    lapack_int *info );
12405void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12406                    const lapack_complex_double* ap,
12407                    const lapack_complex_double* afp,
12408                    const lapack_complex_double* b, lapack_int* ldb,
12409                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12410                    double* berr, lapack_complex_double* work, double* rwork,
12411                    lapack_int *info );
12412void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12413                    const float* ab, lapack_int* ldab, const float* afb,
12414                    lapack_int* ldafb, const float* b, lapack_int* ldb,
12415                    float* x, lapack_int* ldx, float* ferr, float* berr,
12416                    float* work, lapack_int* iwork, lapack_int *info );
12417void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12418                    const double* ab, lapack_int* ldab, const double* afb,
12419                    lapack_int* ldafb, const double* b, lapack_int* ldb,
12420                    double* x, lapack_int* ldx, double* ferr, double* berr,
12421                    double* work, lapack_int* iwork, lapack_int *info );
12422void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12423                    const lapack_complex_float* ab, lapack_int* ldab,
12424                    const lapack_complex_float* afb, lapack_int* ldafb,
12425                    const lapack_complex_float* b, lapack_int* ldb,
12426                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12427                    float* berr, lapack_complex_float* work, float* rwork,
12428                    lapack_int *info );
12429void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12430                    const lapack_complex_double* ab, lapack_int* ldab,
12431                    const lapack_complex_double* afb, lapack_int* ldafb,
12432                    const lapack_complex_double* b, lapack_int* ldb,
12433                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12434                    double* berr, lapack_complex_double* work, double* rwork,
12435                    lapack_int *info );
12436void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
12437                    const float* e, const float* df, const float* ef,
12438                    const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12439                    float* ferr, float* berr, float* work, lapack_int *info );
12440void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
12441                    const double* e, const double* df, const double* ef,
12442                    const double* b, lapack_int* ldb, double* x,
12443                    lapack_int* ldx, double* ferr, double* berr, double* work,
12444                    lapack_int *info );
12445void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
12446                    const lapack_complex_float* e, const float* df,
12447                    const lapack_complex_float* ef,
12448                    const lapack_complex_float* b, lapack_int* ldb,
12449                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12450                    float* berr, lapack_complex_float* work, float* rwork,
12451                    lapack_int *info );
12452void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12453                    const double* d, const lapack_complex_double* e,
12454                    const double* df, const lapack_complex_double* ef,
12455                    const lapack_complex_double* b, lapack_int* ldb,
12456                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12457                    double* berr, lapack_complex_double* work, double* rwork,
12458                    lapack_int *info );
12459void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
12460                    lapack_int* lda, const float* af, lapack_int* ldaf,
12461                    const lapack_int* ipiv, const float* b, lapack_int* ldb,
12462                    float* x, lapack_int* ldx, float* ferr, float* berr,
12463                    float* work, lapack_int* iwork, lapack_int *info );
12464void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12465                    const double* a, lapack_int* lda, const double* af,
12466                    lapack_int* ldaf, const lapack_int* ipiv, const double* b,
12467                    lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12468                    double* berr, double* work, lapack_int* iwork,
12469                    lapack_int *info );
12470void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12471                    const lapack_complex_float* a, lapack_int* lda,
12472                    const lapack_complex_float* af, lapack_int* ldaf,
12473                    const lapack_int* ipiv, const lapack_complex_float* b,
12474                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12475                    float* ferr, float* berr, lapack_complex_float* work,
12476                    float* rwork, lapack_int *info );
12477void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12478                    const lapack_complex_double* a, lapack_int* lda,
12479                    const lapack_complex_double* af, lapack_int* ldaf,
12480                    const lapack_int* ipiv, const lapack_complex_double* b,
12481                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12482                    double* ferr, double* berr, lapack_complex_double* work,
12483                    double* rwork, lapack_int *info );
12484void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12485                     const double* a, lapack_int* lda, const double* af,
12486                     lapack_int* ldaf, const lapack_int* ipiv, const double* s,
12487                     const double* b, lapack_int* ldb, double* x,
12488                     lapack_int* ldx, double* rcond, double* berr,
12489                     lapack_int* n_err_bnds, double* err_bnds_norm,
12490                     double* err_bnds_comp, lapack_int* nparams, double* params,
12491                     double* work, lapack_int* iwork, lapack_int *info );
12492void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12493                     const float* a, lapack_int* lda, const float* af,
12494                     lapack_int* ldaf, const lapack_int* ipiv, const float* s,
12495                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12496                     float* rcond, float* berr, lapack_int* n_err_bnds,
12497                     float* err_bnds_norm, float* err_bnds_comp,
12498                     lapack_int* nparams, float* params, float* work,
12499                     lapack_int* iwork, lapack_int *info );
12500void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12501                     const lapack_complex_double* a, lapack_int* lda,
12502                     const lapack_complex_double* af, lapack_int* ldaf,
12503                     const lapack_int* ipiv, const double* s,
12504                     const lapack_complex_double* b, lapack_int* ldb,
12505                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12506                     double* berr, lapack_int* n_err_bnds,
12507                     double* err_bnds_norm, double* err_bnds_comp,
12508                     lapack_int* nparams, double* params,
12509                     lapack_complex_double* work, double* rwork,
12510                     lapack_int *info );
12511void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12512                     const lapack_complex_float* a, lapack_int* lda,
12513                     const lapack_complex_float* af, lapack_int* ldaf,
12514                     const lapack_int* ipiv, const float* s,
12515                     const lapack_complex_float* b, lapack_int* ldb,
12516                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12517                     float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12518                     float* err_bnds_comp, lapack_int* nparams, float* params,
12519                     lapack_complex_float* work, float* rwork,
12520                     lapack_int *info );
12521void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12522                    const lapack_complex_float* a, lapack_int* lda,
12523                    const lapack_complex_float* af, lapack_int* ldaf,
12524                    const lapack_int* ipiv, const lapack_complex_float* b,
12525                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12526                    float* ferr, float* berr, lapack_complex_float* work,
12527                    float* rwork, lapack_int *info );
12528void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12529                    const lapack_complex_double* a, lapack_int* lda,
12530                    const lapack_complex_double* af, lapack_int* ldaf,
12531                    const lapack_int* ipiv, const lapack_complex_double* b,
12532                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12533                    double* ferr, double* berr, lapack_complex_double* work,
12534                    double* rwork, lapack_int *info );
12535void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12536                     const lapack_complex_double* a, lapack_int* lda,
12537                     const lapack_complex_double* af, lapack_int* ldaf,
12538                     const lapack_int* ipiv, const double* s,
12539                     const lapack_complex_double* b, lapack_int* ldb,
12540                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12541                     double* berr, lapack_int* n_err_bnds,
12542                     double* err_bnds_norm, double* err_bnds_comp,
12543                     lapack_int* nparams, double* params,
12544                     lapack_complex_double* work, double* rwork,
12545                     lapack_int *info );
12546void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12547                     const lapack_complex_float* a, lapack_int* lda,
12548                     const lapack_complex_float* af, lapack_int* ldaf,
12549                     const lapack_int* ipiv, const float* s,
12550                     const lapack_complex_float* b, lapack_int* ldb,
12551                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12552                     float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12553                     float* err_bnds_comp, lapack_int* nparams, float* params,
12554                     lapack_complex_float* work, float* rwork,
12555                     lapack_int *info );
12556void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12557                    const float* ap, const float* afp, const lapack_int* ipiv,
12558                    const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12559                    float* ferr, float* berr, float* work, lapack_int* iwork,
12560                    lapack_int *info );
12561void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12562                    const double* ap, const double* afp, const lapack_int* ipiv,
12563                    const double* b, lapack_int* ldb, double* x,
12564                    lapack_int* ldx, double* ferr, double* berr, double* work,
12565                    lapack_int* iwork, lapack_int *info );
12566void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12567                    const lapack_complex_float* ap,
12568                    const lapack_complex_float* afp, const lapack_int* ipiv,
12569                    const lapack_complex_float* b, lapack_int* ldb,
12570                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12571                    float* berr, lapack_complex_float* work, float* rwork,
12572                    lapack_int *info );
12573void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12574                    const lapack_complex_double* ap,
12575                    const lapack_complex_double* afp, const lapack_int* ipiv,
12576                    const lapack_complex_double* b, lapack_int* ldb,
12577                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12578                    double* berr, lapack_complex_double* work, double* rwork,
12579                    lapack_int *info );
12580void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12581                    const lapack_complex_float* ap,
12582                    const lapack_complex_float* afp, const lapack_int* ipiv,
12583                    const lapack_complex_float* b, lapack_int* ldb,
12584                    lapack_complex_float* x, lapack_int* ldx, float* ferr,
12585                    float* berr, lapack_complex_float* work, float* rwork,
12586                    lapack_int *info );
12587void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12588                    const lapack_complex_double* ap,
12589                    const lapack_complex_double* afp, const lapack_int* ipiv,
12590                    const lapack_complex_double* b, lapack_int* ldb,
12591                    lapack_complex_double* x, lapack_int* ldx, double* ferr,
12592                    double* berr, lapack_complex_double* work, double* rwork,
12593                    lapack_int *info );
12594void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12595                    lapack_int* nrhs, const float* a, lapack_int* lda,
12596                    const float* b, lapack_int* ldb, const float* x,
12597                    lapack_int* ldx, float* ferr, float* berr, float* work,
12598                    lapack_int* iwork, lapack_int *info );
12599void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12600                    lapack_int* nrhs, const double* a, lapack_int* lda,
12601                    const double* b, lapack_int* ldb, const double* x,
12602                    lapack_int* ldx, double* ferr, double* berr, double* work,
12603                    lapack_int* iwork, lapack_int *info );
12604void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12605                    lapack_int* nrhs, const lapack_complex_float* a,
12606                    lapack_int* lda, const lapack_complex_float* b,
12607                    lapack_int* ldb, const lapack_complex_float* x,
12608                    lapack_int* ldx, float* ferr, float* berr,
12609                    lapack_complex_float* work, float* rwork,
12610                    lapack_int *info );
12611void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12612                    lapack_int* nrhs, const lapack_complex_double* a,
12613                    lapack_int* lda, const lapack_complex_double* b,
12614                    lapack_int* ldb, const lapack_complex_double* x,
12615                    lapack_int* ldx, double* ferr, double* berr,
12616                    lapack_complex_double* work, double* rwork,
12617                    lapack_int *info );
12618void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12619                    lapack_int* nrhs, const float* ap, const float* b,
12620                    lapack_int* ldb, const float* x, lapack_int* ldx,
12621                    float* ferr, float* berr, float* work, lapack_int* iwork,
12622                    lapack_int *info );
12623void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12624                    lapack_int* nrhs, const double* ap, const double* b,
12625                    lapack_int* ldb, const double* x, lapack_int* ldx,
12626                    double* ferr, double* berr, double* work, lapack_int* iwork,
12627                    lapack_int *info );
12628void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12629                    lapack_int* nrhs, const lapack_complex_float* ap,
12630                    const lapack_complex_float* b, lapack_int* ldb,
12631                    const lapack_complex_float* x, lapack_int* ldx, float* ferr,
12632                    float* berr, lapack_complex_float* work, float* rwork,
12633                    lapack_int *info );
12634void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12635                    lapack_int* nrhs, const lapack_complex_double* ap,
12636                    const lapack_complex_double* b, lapack_int* ldb,
12637                    const lapack_complex_double* x, lapack_int* ldx,
12638                    double* ferr, double* berr, lapack_complex_double* work,
12639                    double* rwork, lapack_int *info );
12640void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12641                    lapack_int* kd, lapack_int* nrhs, const float* ab,
12642                    lapack_int* ldab, const float* b, lapack_int* ldb,
12643                    const float* x, lapack_int* ldx, float* ferr, float* berr,
12644                    float* work, lapack_int* iwork, lapack_int *info );
12645void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12646                    lapack_int* kd, lapack_int* nrhs, const double* ab,
12647                    lapack_int* ldab, const double* b, lapack_int* ldb,
12648                    const double* x, lapack_int* ldx, double* ferr,
12649                    double* berr, double* work, lapack_int* iwork,
12650                    lapack_int *info );
12651void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12652                    lapack_int* kd, lapack_int* nrhs,
12653                    const lapack_complex_float* ab, lapack_int* ldab,
12654                    const lapack_complex_float* b, lapack_int* ldb,
12655                    const lapack_complex_float* x, lapack_int* ldx, float* ferr,
12656                    float* berr, lapack_complex_float* work, float* rwork,
12657                    lapack_int *info );
12658void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12659                    lapack_int* kd, lapack_int* nrhs,
12660                    const lapack_complex_double* ab, lapack_int* ldab,
12661                    const lapack_complex_double* b, lapack_int* ldb,
12662                    const lapack_complex_double* x, lapack_int* ldx,
12663                    double* ferr, double* berr, lapack_complex_double* work,
12664                    double* rwork, lapack_int *info );
12665void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
12666                    const lapack_int* ipiv, float* work, lapack_int* lwork,
12667                    lapack_int *info );
12668void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
12669                    const lapack_int* ipiv, double* work, lapack_int* lwork,
12670                    lapack_int *info );
12671void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
12672                    const lapack_int* ipiv, lapack_complex_float* work,
12673                    lapack_int* lwork, lapack_int *info );
12674void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
12675                    const lapack_int* ipiv, lapack_complex_double* work,
12676                    lapack_int* lwork, lapack_int *info );
12677void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12678                    lapack_int *info );
12679void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12680                    lapack_int *info );
12681void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
12682                    lapack_int* lda, lapack_int *info );
12683void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
12684                    lapack_int* lda, lapack_int *info );
12685void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
12686                    lapack_int *info );
12687void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
12688                    lapack_int *info );
12689void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
12690                    lapack_complex_double* a, lapack_int *info );
12691void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
12692                    lapack_complex_float* a, lapack_int *info );
12693void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
12694void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
12695void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12696                    lapack_int *info );
12697void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12698                    lapack_int *info );
12699void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12700                    const lapack_int* ipiv, float* work, lapack_int *info );
12701void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12702                    const lapack_int* ipiv, double* work, lapack_int *info );
12703void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
12704                    lapack_int* lda, const lapack_int* ipiv,
12705                    lapack_complex_float* work, lapack_int *info );
12706void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
12707                    lapack_int* lda, const lapack_int* ipiv,
12708                    lapack_complex_double* work, lapack_int *info );
12709void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
12710                    lapack_int* lda, const lapack_int* ipiv,
12711                    lapack_complex_float* work, lapack_int *info );
12712void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
12713                    lapack_int* lda, const lapack_int* ipiv,
12714                    lapack_complex_double* work, lapack_int *info );
12715void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
12716                    const lapack_int* ipiv, float* work, lapack_int *info );
12717void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
12718                    const lapack_int* ipiv, double* work, lapack_int *info );
12719void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12720                    const lapack_int* ipiv, lapack_complex_float* work,
12721                    lapack_int *info );
12722void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12723                    const lapack_int* ipiv, lapack_complex_double* work,
12724                    lapack_int *info );
12725void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12726                    const lapack_int* ipiv, lapack_complex_float* work,
12727                    lapack_int *info );
12728void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12729                    const lapack_int* ipiv, lapack_complex_double* work,
12730                    lapack_int *info );
12731void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
12732                    lapack_int* lda, lapack_int *info );
12733void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
12734                    lapack_int* lda, lapack_int *info );
12735void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
12736                    lapack_complex_float* a, lapack_int* lda,
12737                    lapack_int *info );
12738void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
12739                    lapack_complex_double* a, lapack_int* lda,
12740                    lapack_int *info );
12741void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
12742                    double* a, lapack_int *info );
12743void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
12744                    float* a, lapack_int *info );
12745void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
12746                    lapack_complex_double* a, lapack_int *info );
12747void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
12748                    lapack_complex_float* a, lapack_int *info );
12749void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
12750                    lapack_int *info );
12751void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
12752                    lapack_int *info );
12753void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
12754                    lapack_complex_float* ap, lapack_int *info );
12755void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
12756                    lapack_complex_double* ap, lapack_int *info );
12757void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
12758                    lapack_int* lda, float* r, float* c, float* rowcnd,
12759                    float* colcnd, float* amax, lapack_int *info );
12760void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
12761                    lapack_int* lda, double* r, double* c, double* rowcnd,
12762                    double* colcnd, double* amax, lapack_int *info );
12763void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
12764                    lapack_int* lda, float* r, float* c, float* rowcnd,
12765                    float* colcnd, float* amax, lapack_int *info );
12766void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
12767                    const lapack_complex_double* a, lapack_int* lda, double* r,
12768                    double* c, double* rowcnd, double* colcnd, double* amax,
12769                    lapack_int *info );
12770void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
12771                     lapack_int* lda, double* r, double* c, double* rowcnd,
12772                     double* colcnd, double* amax, lapack_int *info );
12773void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
12774                     lapack_int* lda, float* r, float* c, float* rowcnd,
12775                     float* colcnd, float* amax, lapack_int *info );
12776void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
12777                     const lapack_complex_double* a, lapack_int* lda, double* r,
12778                     double* c, double* rowcnd, double* colcnd, double* amax,
12779                     lapack_int *info );
12780void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
12781                     const lapack_complex_float* a, lapack_int* lda, float* r,
12782                     float* c, float* rowcnd, float* colcnd, float* amax,
12783                     lapack_int *info );
12784void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12785                    lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
12786                    float* c, float* rowcnd, float* colcnd, float* amax,
12787                    lapack_int *info );
12788void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12789                    lapack_int* ku, const double* ab, lapack_int* ldab,
12790                    double* r, double* c, double* rowcnd, double* colcnd,
12791                    double* amax, lapack_int *info );
12792void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12793                    lapack_int* ku, const lapack_complex_float* ab,
12794                    lapack_int* ldab, float* r, float* c, float* rowcnd,
12795                    float* colcnd, float* amax, lapack_int *info );
12796void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12797                    lapack_int* ku, const lapack_complex_double* ab,
12798                    lapack_int* ldab, double* r, double* c, double* rowcnd,
12799                    double* colcnd, double* amax, lapack_int *info );
12800void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12801                     lapack_int* ku, const double* ab, lapack_int* ldab,
12802                     double* r, double* c, double* rowcnd, double* colcnd,
12803                     double* amax, lapack_int *info );
12804void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12805                     lapack_int* ku, const float* ab, lapack_int* ldab,
12806                     float* r, float* c, float* rowcnd, float* colcnd,
12807                     float* amax, lapack_int *info );
12808void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12809                     lapack_int* ku, const lapack_complex_double* ab,
12810                     lapack_int* ldab, double* r, double* c, double* rowcnd,
12811                     double* colcnd, double* amax, lapack_int *info );
12812void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12813                     lapack_int* ku, const lapack_complex_float* ab,
12814                     lapack_int* ldab, float* r, float* c, float* rowcnd,
12815                     float* colcnd, float* amax, lapack_int *info );
12816void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
12817                    float* scond, float* amax, lapack_int *info );
12818void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
12819                    double* scond, double* amax, lapack_int *info );
12820void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
12821                    lapack_int* lda, float* s, float* scond, float* amax,
12822                    lapack_int *info );
12823void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
12824                    lapack_int* lda, double* s, double* scond, double* amax,
12825                    lapack_int *info );
12826void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
12827                     double* scond, double* amax, lapack_int *info );
12828void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
12829                     float* scond, float* amax, lapack_int *info );
12830void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
12831                     lapack_int* lda, double* s, double* scond, double* amax,
12832                     lapack_int *info );
12833void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
12834                     lapack_int* lda, float* s, float* scond, float* amax,
12835                     lapack_int *info );
12836void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
12837                    float* scond, float* amax, lapack_int *info );
12838void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
12839                    double* scond, double* amax, lapack_int *info );
12840void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12841                    float* s, float* scond, float* amax, lapack_int *info );
12842void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12843                    double* s, double* scond, double* amax, lapack_int *info );
12844void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
12845                    lapack_int* ldab, float* s, float* scond, float* amax,
12846                    lapack_int *info );
12847void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
12848                    lapack_int* ldab, double* s, double* scond, double* amax,
12849                    lapack_int *info );
12850void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
12851                    const lapack_complex_float* ab, lapack_int* ldab, float* s,
12852                    float* scond, float* amax, lapack_int *info );
12853void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
12854                    const lapack_complex_double* ab, lapack_int* ldab,
12855                    double* s, double* scond, double* amax, lapack_int *info );
12856void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
12857                     lapack_int* lda, double* s, double* scond, double* amax,
12858                     double* work, lapack_int *info );
12859void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12860                     float* s, float* scond, float* amax, float* work,
12861                     lapack_int *info );
12862void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
12863                     lapack_int* lda, double* s, double* scond, double* amax,
12864                     lapack_complex_double* work, lapack_int *info );
12865void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
12866                     lapack_int* lda, float* s, float* scond, float* amax,
12867                     lapack_complex_float* work, lapack_int *info );
12868void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
12869                     lapack_int* lda, double* s, double* scond, double* amax,
12870                     lapack_complex_double* work, lapack_int *info );
12871void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
12872                     lapack_int* lda, float* s, float* scond, float* amax,
12873                     lapack_complex_float* work, lapack_int *info );
12874void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
12875                   lapack_int* ipiv, float* b, lapack_int* ldb,
12876                   lapack_int *info );
12877void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
12878                   lapack_int* ipiv, double* b, lapack_int* ldb,
12879                   lapack_int *info );
12880void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
12881                   lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
12882                   lapack_int* ldb, lapack_int *info );
12883void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
12884                   lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
12885                   lapack_int* ldb, lapack_int *info );
12886void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
12887                    lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
12888                    lapack_int* ldx, double* work, float* swork,
12889                    lapack_int* iter, lapack_int *info );
12890void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
12891                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
12892                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12893                    lapack_complex_double* work, lapack_complex_float* swork,
12894                    double* rwork, lapack_int* iter, lapack_int *info );
12895void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12896                    float* a, lapack_int* lda, float* af, lapack_int* ldaf,
12897                    lapack_int* ipiv, char* equed, float* r, float* c, float* b,
12898                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12899                    float* ferr, float* berr, float* work, lapack_int* iwork,
12900                    lapack_int *info );
12901void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12902                    double* a, lapack_int* lda, double* af, lapack_int* ldaf,
12903                    lapack_int* ipiv, char* equed, double* r, double* c,
12904                    double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12905                    double* rcond, double* ferr, double* berr, double* work,
12906                    lapack_int* iwork, lapack_int *info );
12907void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12908                    lapack_complex_float* a, lapack_int* lda,
12909                    lapack_complex_float* af, lapack_int* ldaf,
12910                    lapack_int* ipiv, char* equed, float* r, float* c,
12911                    lapack_complex_float* b, lapack_int* ldb,
12912                    lapack_complex_float* x, lapack_int* ldx, float* rcond,
12913                    float* ferr, float* berr, lapack_complex_float* work,
12914                    float* rwork, lapack_int *info );
12915void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12916                    lapack_complex_double* a, lapack_int* lda,
12917                    lapack_complex_double* af, lapack_int* ldaf,
12918                    lapack_int* ipiv, char* equed, double* r, double* c,
12919                    lapack_complex_double* b, lapack_int* ldb,
12920                    lapack_complex_double* x, lapack_int* ldx, double* rcond,
12921                    double* ferr, double* berr, lapack_complex_double* work,
12922                    double* rwork, lapack_int *info );
12923void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12924                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
12925                     lapack_int* ipiv, char* equed, double* r, double* c,
12926                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12927                     double* rcond, double* rpvgrw, double* berr,
12928                     lapack_int* n_err_bnds, double* err_bnds_norm,
12929                     double* err_bnds_comp, lapack_int* nparams, double* params,
12930                     double* work, lapack_int* iwork, lapack_int *info );
12931void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12932                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
12933                     lapack_int* ipiv, char* equed, float* r, float* c,
12934                     float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12935                     float* rcond, float* rpvgrw, float* berr,
12936                     lapack_int* n_err_bnds, float* err_bnds_norm,
12937                     float* err_bnds_comp, lapack_int* nparams, float* params,
12938                     float* work, lapack_int* iwork, lapack_int *info );
12939void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12940                     lapack_complex_double* a, lapack_int* lda,
12941                     lapack_complex_double* af, lapack_int* ldaf,
12942                     lapack_int* ipiv, char* equed, double* r, double* c,
12943                     lapack_complex_double* b, lapack_int* ldb,
12944                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12945                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
12946                     double* err_bnds_norm, double* err_bnds_comp,
12947                     lapack_int* nparams, double* params,
12948                     lapack_complex_double* work, double* rwork,
12949                     lapack_int *info );
12950void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12951                     lapack_complex_float* a, lapack_int* lda,
12952                     lapack_complex_float* af, lapack_int* ldaf,
12953                     lapack_int* ipiv, char* equed, float* r, float* c,
12954                     lapack_complex_float* b, lapack_int* ldb,
12955                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12956                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
12957                     float* err_bnds_norm, float* err_bnds_comp,
12958                     lapack_int* nparams, float* params,
12959                     lapack_complex_float* work, float* rwork,
12960                     lapack_int *info );
12961void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12962                   lapack_int* nrhs, float* ab, lapack_int* ldab,
12963                   lapack_int* ipiv, float* b, lapack_int* ldb,
12964                   lapack_int *info );
12965void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12966                   lapack_int* nrhs, double* ab, lapack_int* ldab,
12967                   lapack_int* ipiv, double* b, lapack_int* ldb,
12968                   lapack_int *info );
12969void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12970                   lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
12971                   lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
12972                   lapack_int *info );
12973void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12974                   lapack_int* nrhs, lapack_complex_double* ab,
12975                   lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
12976                   lapack_int* ldb, lapack_int *info );
12977void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12978                    lapack_int* ku, lapack_int* nrhs, float* ab,
12979                    lapack_int* ldab, float* afb, lapack_int* ldafb,
12980                    lapack_int* ipiv, char* equed, float* r, float* c, float* b,
12981                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12982                    float* ferr, float* berr, float* work, lapack_int* iwork,
12983                    lapack_int *info );
12984void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12985                    lapack_int* ku, lapack_int* nrhs, double* ab,
12986                    lapack_int* ldab, double* afb, lapack_int* ldafb,
12987                    lapack_int* ipiv, char* equed, double* r, double* c,
12988                    double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12989                    double* rcond, double* ferr, double* berr, double* work,
12990                    lapack_int* iwork, lapack_int *info );
12991void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12992                    lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
12993                    lapack_int* ldab, lapack_complex_float* afb,
12994                    lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
12995                    float* c, lapack_complex_float* b, lapack_int* ldb,
12996                    lapack_complex_float* x, lapack_int* ldx, float* rcond,
12997                    float* ferr, float* berr, lapack_complex_float* work,
12998                    float* rwork, lapack_int *info );
12999void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13000                    lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
13001                    lapack_int* ldab, lapack_complex_double* afb,
13002                    lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
13003                    double* c, lapack_complex_double* b, lapack_int* ldb,
13004                    lapack_complex_double* x, lapack_int* ldx, double* rcond,
13005                    double* ferr, double* berr, lapack_complex_double* work,
13006                    double* rwork, lapack_int *info );
13007void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13008                     lapack_int* ku, lapack_int* nrhs, double* ab,
13009                     lapack_int* ldab, double* afb, lapack_int* ldafb,
13010                     lapack_int* ipiv, char* equed, double* r, double* c,
13011                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
13012                     double* rcond, double* rpvgrw, double* berr,
13013                     lapack_int* n_err_bnds, double* err_bnds_norm,
13014                     double* err_bnds_comp, lapack_int* nparams, double* params,
13015                     double* work, lapack_int* iwork, lapack_int *info );
13016void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13017                     lapack_int* ku, lapack_int* nrhs, float* ab,
13018                     lapack_int* ldab, float* afb, lapack_int* ldafb,
13019                     lapack_int* ipiv, char* equed, float* r, float* c,
13020                     float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13021                     float* rcond, float* rpvgrw, float* berr,
13022                     lapack_int* n_err_bnds, float* err_bnds_norm,
13023                     float* err_bnds_comp, lapack_int* nparams, float* params,
13024                     float* work, lapack_int* iwork, lapack_int *info );
13025void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13026                     lapack_int* ku, lapack_int* nrhs,
13027                     lapack_complex_double* ab, lapack_int* ldab,
13028                     lapack_complex_double* afb, lapack_int* ldafb,
13029                     lapack_int* ipiv, char* equed, double* r, double* c,
13030                     lapack_complex_double* b, lapack_int* ldb,
13031                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13032                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13033                     double* err_bnds_norm, double* err_bnds_comp,
13034                     lapack_int* nparams, double* params,
13035                     lapack_complex_double* work, double* rwork,
13036                     lapack_int *info );
13037void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13038                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
13039                     lapack_int* ldab, lapack_complex_float* afb,
13040                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
13041                     float* c, lapack_complex_float* b, lapack_int* ldb,
13042                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13043                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13044                     float* err_bnds_norm, float* err_bnds_comp,
13045                     lapack_int* nparams, float* params,
13046                     lapack_complex_float* work, float* rwork,
13047                     lapack_int *info );
13048void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
13049                   float* du, float* b, lapack_int* ldb, lapack_int *info );
13050void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
13051                   double* du, double* b, lapack_int* ldb, lapack_int *info );
13052void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
13053                   lapack_complex_float* d, lapack_complex_float* du,
13054                   lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13055void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
13056                   lapack_complex_double* d, lapack_complex_double* du,
13057                   lapack_complex_double* b, lapack_int* ldb,
13058                   lapack_int *info );
13059void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13060                    const float* dl, const float* d, const float* du,
13061                    float* dlf, float* df, float* duf, float* du2,
13062                    lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
13063                    lapack_int* ldx, float* rcond, float* ferr, float* berr,
13064                    float* work, lapack_int* iwork, lapack_int *info );
13065void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13066                    const double* dl, const double* d, const double* du,
13067                    double* dlf, double* df, double* duf, double* du2,
13068                    lapack_int* ipiv, const double* b, lapack_int* ldb,
13069                    double* x, lapack_int* ldx, double* rcond, double* ferr,
13070                    double* berr, double* work, lapack_int* iwork,
13071                    lapack_int *info );
13072void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13073                    const lapack_complex_float* dl,
13074                    const lapack_complex_float* d,
13075                    const lapack_complex_float* du, lapack_complex_float* dlf,
13076                    lapack_complex_float* df, lapack_complex_float* duf,
13077                    lapack_complex_float* du2, lapack_int* ipiv,
13078                    const lapack_complex_float* b, lapack_int* ldb,
13079                    lapack_complex_float* x, lapack_int* ldx, float* rcond,
13080                    float* ferr, float* berr, lapack_complex_float* work,
13081                    float* rwork, lapack_int *info );
13082void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13083                    const lapack_complex_double* dl,
13084                    const lapack_complex_double* d,
13085                    const lapack_complex_double* du, lapack_complex_double* dlf,
13086                    lapack_complex_double* df, lapack_complex_double* duf,
13087                    lapack_complex_double* du2, lapack_int* ipiv,
13088                    const lapack_complex_double* b, lapack_int* ldb,
13089                    lapack_complex_double* x, lapack_int* ldx, double* rcond,
13090                    double* ferr, double* berr, lapack_complex_double* work,
13091                    double* rwork, lapack_int *info );
13092void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
13093                   lapack_int* lda, float* b, lapack_int* ldb,
13094                   lapack_int *info );
13095void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13096                   lapack_int* lda, double* b, lapack_int* ldb,
13097                   lapack_int *info );
13098void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13099                   lapack_complex_float* a, lapack_int* lda,
13100                   lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13101void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13102                   lapack_complex_double* a, lapack_int* lda,
13103                   lapack_complex_double* b, lapack_int* ldb,
13104                   lapack_int *info );
13105void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13106                    lapack_int* lda, double* b, lapack_int* ldb, double* x,
13107                    lapack_int* ldx, double* work, float* swork,
13108                    lapack_int* iter, lapack_int *info );
13109void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13110                    lapack_complex_double* a, lapack_int* lda,
13111                    lapack_complex_double* b, lapack_int* ldb,
13112                    lapack_complex_double* x, lapack_int* ldx,
13113                    lapack_complex_double* work, lapack_complex_float* swork,
13114                    double* rwork, lapack_int* iter, lapack_int *info );
13115void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13116                    float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13117                    char* equed, float* s, float* b, lapack_int* ldb, float* x,
13118                    lapack_int* ldx, float* rcond, float* ferr, float* berr,
13119                    float* work, lapack_int* iwork, lapack_int *info );
13120void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13121                    double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13122                    char* equed, double* s, double* b, lapack_int* ldb,
13123                    double* x, lapack_int* ldx, double* rcond, double* ferr,
13124                    double* berr, double* work, lapack_int* iwork,
13125                    lapack_int *info );
13126void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13127                    lapack_complex_float* a, lapack_int* lda,
13128                    lapack_complex_float* af, lapack_int* ldaf, char* equed,
13129                    float* s, lapack_complex_float* b, lapack_int* ldb,
13130                    lapack_complex_float* x, lapack_int* ldx, float* rcond,
13131                    float* ferr, float* berr, lapack_complex_float* work,
13132                    float* rwork, lapack_int *info );
13133void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13134                    lapack_complex_double* a, lapack_int* lda,
13135                    lapack_complex_double* af, lapack_int* ldaf, char* equed,
13136                    double* s, lapack_complex_double* b, lapack_int* ldb,
13137                    lapack_complex_double* x, lapack_int* ldx, double* rcond,
13138                    double* ferr, double* berr, lapack_complex_double* work,
13139                    double* rwork, lapack_int *info );
13140void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13141                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13142                     char* equed, double* s, double* b, lapack_int* ldb,
13143                     double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
13144                     double* berr, lapack_int* n_err_bnds,
13145                     double* err_bnds_norm, double* err_bnds_comp,
13146                     lapack_int* nparams, double* params, double* work,
13147                     lapack_int* iwork, lapack_int *info );
13148void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13149                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13150                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
13151                     lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
13152                     lapack_int* n_err_bnds, float* err_bnds_norm,
13153                     float* err_bnds_comp, lapack_int* nparams, float* params,
13154                     float* work, lapack_int* iwork, lapack_int *info );
13155void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13156                     lapack_complex_double* a, lapack_int* lda,
13157                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
13158                     double* s, lapack_complex_double* b, lapack_int* ldb,
13159                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13160                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13161                     double* err_bnds_norm, double* err_bnds_comp,
13162                     lapack_int* nparams, double* params,
13163                     lapack_complex_double* work, double* rwork,
13164                     lapack_int *info );
13165void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13166                     lapack_complex_float* a, lapack_int* lda,
13167                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
13168                     float* s, lapack_complex_float* b, lapack_int* ldb,
13169                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13170                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13171                     float* err_bnds_norm, float* err_bnds_comp,
13172                     lapack_int* nparams, float* params,
13173                     lapack_complex_float* work, float* rwork,
13174                     lapack_int *info );
13175void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
13176                   float* b, lapack_int* ldb, lapack_int *info );
13177void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
13178                   double* b, lapack_int* ldb, lapack_int *info );
13179void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13180                   lapack_complex_float* ap, lapack_complex_float* b,
13181                   lapack_int* ldb, lapack_int *info );
13182void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13183                   lapack_complex_double* ap, lapack_complex_double* b,
13184                   lapack_int* ldb, lapack_int *info );
13185void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13186                    float* ap, float* afp, char* equed, float* s, float* b,
13187                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13188                    float* ferr, float* berr, float* work, lapack_int* iwork,
13189                    lapack_int *info );
13190void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13191                    double* ap, double* afp, char* equed, double* s, double* b,
13192                    lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13193                    double* ferr, double* berr, double* work, lapack_int* iwork,
13194                    lapack_int *info );
13195void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13196                    lapack_complex_float* ap, lapack_complex_float* afp,
13197                    char* equed, float* s, lapack_complex_float* b,
13198                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13199                    float* rcond, float* ferr, float* berr,
13200                    lapack_complex_float* work, float* rwork,
13201                    lapack_int *info );
13202void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13203                    lapack_complex_double* ap, lapack_complex_double* afp,
13204                    char* equed, double* s, lapack_complex_double* b,
13205                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13206                    double* rcond, double* ferr, double* berr,
13207                    lapack_complex_double* work, double* rwork,
13208                    lapack_int *info );
13209void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13210                   float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
13211                   lapack_int *info );
13212void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13213                   double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
13214                   lapack_int *info );
13215void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13216                   lapack_complex_float* ab, lapack_int* ldab,
13217                   lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13218void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13219                   lapack_complex_double* ab, lapack_int* ldab,
13220                   lapack_complex_double* b, lapack_int* ldb,
13221                   lapack_int *info );
13222void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13223                    lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
13224                    lapack_int* ldafb, char* equed, float* s, float* b,
13225                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13226                    float* ferr, float* berr, float* work, lapack_int* iwork,
13227                    lapack_int *info );
13228void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13229                    lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
13230                    lapack_int* ldafb, char* equed, double* s, double* b,
13231                    lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13232                    double* ferr, double* berr, double* work, lapack_int* iwork,
13233                    lapack_int *info );
13234void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13235                    lapack_int* nrhs, lapack_complex_float* ab,
13236                    lapack_int* ldab, lapack_complex_float* afb,
13237                    lapack_int* ldafb, char* equed, float* s,
13238                    lapack_complex_float* b, lapack_int* ldb,
13239                    lapack_complex_float* x, lapack_int* ldx, float* rcond,
13240                    float* ferr, float* berr, lapack_complex_float* work,
13241                    float* rwork, lapack_int *info );
13242void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13243                    lapack_int* nrhs, lapack_complex_double* ab,
13244                    lapack_int* ldab, lapack_complex_double* afb,
13245                    lapack_int* ldafb, char* equed, double* s,
13246                    lapack_complex_double* b, lapack_int* ldb,
13247                    lapack_complex_double* x, lapack_int* ldx, double* rcond,
13248                    double* ferr, double* berr, lapack_complex_double* work,
13249                    double* rwork, lapack_int *info );
13250void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
13251                   float* b, lapack_int* ldb, lapack_int *info );
13252void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
13253                   double* b, lapack_int* ldb, lapack_int *info );
13254void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
13255                   lapack_complex_float* e, lapack_complex_float* b,
13256                   lapack_int* ldb, lapack_int *info );
13257void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
13258                   lapack_complex_double* e, lapack_complex_double* b,
13259                   lapack_int* ldb, lapack_int *info );
13260void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
13261                    const float* e, float* df, float* ef, const float* b,
13262                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13263                    float* ferr, float* berr, float* work, lapack_int *info );
13264void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
13265                    const double* d, const double* e, double* df, double* ef,
13266                    const double* b, lapack_int* ldb, double* x,
13267                    lapack_int* ldx, double* rcond, double* ferr, double* berr,
13268                    double* work, lapack_int *info );
13269void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
13270                    const lapack_complex_float* e, float* df,
13271                    lapack_complex_float* ef, const lapack_complex_float* b,
13272                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13273                    float* rcond, float* ferr, float* berr,
13274                    lapack_complex_float* work, float* rwork,
13275                    lapack_int *info );
13276void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
13277                    const double* d, const lapack_complex_double* e, double* df,
13278                    lapack_complex_double* ef, const lapack_complex_double* b,
13279                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13280                    double* rcond, double* ferr, double* berr,
13281                    lapack_complex_double* work, double* rwork,
13282                    lapack_int *info );
13283void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
13284                   lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
13285                   float* work, lapack_int* lwork, lapack_int *info );
13286void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13287                   lapack_int* lda, lapack_int* ipiv, double* b,
13288                   lapack_int* ldb, double* work, lapack_int* lwork,
13289                   lapack_int *info );
13290void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
13291                   lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
13292                   lapack_complex_float* b, lapack_int* ldb,
13293                   lapack_complex_float* work, lapack_int* lwork,
13294                   lapack_int *info );
13295void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
13296                   lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
13297                   lapack_complex_double* b, lapack_int* ldb,
13298                   lapack_complex_double* work, lapack_int* lwork,
13299                   lapack_int *info );
13300void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13301                    const float* a, lapack_int* lda, float* af,
13302                    lapack_int* ldaf, lapack_int* ipiv, const float* b,
13303                    lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13304                    float* ferr, float* berr, float* work, lapack_int* lwork,
13305                    lapack_int* iwork, lapack_int *info );
13306void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13307                    const double* a, lapack_int* lda, double* af,
13308                    lapack_int* ldaf, lapack_int* ipiv, const double* b,
13309                    lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13310                    double* ferr, double* berr, double* work, lapack_int* lwork,
13311                    lapack_int* iwork, lapack_int *info );
13312void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13313                    const lapack_complex_float* a, lapack_int* lda,
13314                    lapack_complex_float* af, lapack_int* ldaf,
13315                    lapack_int* ipiv, const lapack_complex_float* b,
13316                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13317                    float* rcond, float* ferr, float* berr,
13318                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13319                    lapack_int *info );
13320void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13321                    const lapack_complex_double* a, lapack_int* lda,
13322                    lapack_complex_double* af, lapack_int* ldaf,
13323                    lapack_int* ipiv, const lapack_complex_double* b,
13324                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13325                    double* rcond, double* ferr, double* berr,
13326                    lapack_complex_double* work, lapack_int* lwork,
13327                    double* rwork, lapack_int *info );
13328void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13329                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13330                     lapack_int* ipiv, char* equed, double* s, double* b,
13331                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13332                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13333                     double* err_bnds_norm, double* err_bnds_comp,
13334                     lapack_int* nparams, double* params, double* work,
13335                     lapack_int* iwork, lapack_int *info );
13336void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13337                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13338                     lapack_int* ipiv, char* equed, float* s, float* b,
13339                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13340                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13341                     float* err_bnds_norm, float* err_bnds_comp,
13342                     lapack_int* nparams, float* params, float* work,
13343                     lapack_int* iwork, lapack_int *info );
13344void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13345                     lapack_complex_double* a, lapack_int* lda,
13346                     lapack_complex_double* af, lapack_int* ldaf,
13347                     lapack_int* ipiv, char* equed, double* s,
13348                     lapack_complex_double* b, lapack_int* ldb,
13349                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13350                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13351                     double* err_bnds_norm, double* err_bnds_comp,
13352                     lapack_int* nparams, double* params,
13353                     lapack_complex_double* work, double* rwork,
13354                     lapack_int *info );
13355void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13356                     lapack_complex_float* a, lapack_int* lda,
13357                     lapack_complex_float* af, lapack_int* ldaf,
13358                     lapack_int* ipiv, char* equed, float* s,
13359                     lapack_complex_float* b, lapack_int* ldb,
13360                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13361                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13362                     float* err_bnds_norm, float* err_bnds_comp,
13363                     lapack_int* nparams, float* params,
13364                     lapack_complex_float* work, float* rwork,
13365                     lapack_int *info );
13366void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
13367                   lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
13368                   lapack_complex_float* b, lapack_int* ldb,
13369                   lapack_complex_float* work, lapack_int* lwork,
13370                   lapack_int *info );
13371void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
13372                   lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
13373                   lapack_complex_double* b, lapack_int* ldb,
13374                   lapack_complex_double* work, lapack_int* lwork,
13375                   lapack_int *info );
13376void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13377                    const lapack_complex_float* a, lapack_int* lda,
13378                    lapack_complex_float* af, lapack_int* ldaf,
13379                    lapack_int* ipiv, const lapack_complex_float* b,
13380                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13381                    float* rcond, float* ferr, float* berr,
13382                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13383                    lapack_int *info );
13384void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13385                    const lapack_complex_double* a, lapack_int* lda,
13386                    lapack_complex_double* af, lapack_int* ldaf,
13387                    lapack_int* ipiv, const lapack_complex_double* b,
13388                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13389                    double* rcond, double* ferr, double* berr,
13390                    lapack_complex_double* work, lapack_int* lwork,
13391                    double* rwork, lapack_int *info );
13392void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13393                     lapack_complex_double* a, lapack_int* lda,
13394                     lapack_complex_double* af, lapack_int* ldaf,
13395                     lapack_int* ipiv, char* equed, double* s,
13396                     lapack_complex_double* b, lapack_int* ldb,
13397                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13398                     double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13399                     double* err_bnds_norm, double* err_bnds_comp,
13400                     lapack_int* nparams, double* params,
13401                     lapack_complex_double* work, double* rwork,
13402                     lapack_int *info );
13403void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13404                     lapack_complex_float* a, lapack_int* lda,
13405                     lapack_complex_float* af, lapack_int* ldaf,
13406                     lapack_int* ipiv, char* equed, float* s,
13407                     lapack_complex_float* b, lapack_int* ldb,
13408                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13409                     float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13410                     float* err_bnds_norm, float* err_bnds_comp,
13411                     lapack_int* nparams, float* params,
13412                     lapack_complex_float* work, float* rwork,
13413                     lapack_int *info );
13414void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
13415                   lapack_int* ipiv, float* b, lapack_int* ldb,
13416                   lapack_int *info );
13417void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
13418                   lapack_int* ipiv, double* b, lapack_int* ldb,
13419                   lapack_int *info );
13420void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13421                   lapack_complex_float* ap, lapack_int* ipiv,
13422                   lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13423void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13424                   lapack_complex_double* ap, lapack_int* ipiv,
13425                   lapack_complex_double* b, lapack_int* ldb,
13426                   lapack_int *info );
13427void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13428                    const float* ap, float* afp, lapack_int* ipiv,
13429                    const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13430                    float* rcond, float* ferr, float* berr, float* work,
13431                    lapack_int* iwork, lapack_int *info );
13432void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13433                    const double* ap, double* afp, lapack_int* ipiv,
13434                    const double* b, lapack_int* ldb, double* x,
13435                    lapack_int* ldx, double* rcond, double* ferr, double* berr,
13436                    double* work, lapack_int* iwork, lapack_int *info );
13437void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13438                    const lapack_complex_float* ap, lapack_complex_float* afp,
13439                    lapack_int* ipiv, const lapack_complex_float* b,
13440                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13441                    float* rcond, float* ferr, float* berr,
13442                    lapack_complex_float* work, float* rwork,
13443                    lapack_int *info );
13444void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13445                    const lapack_complex_double* ap, lapack_complex_double* afp,
13446                    lapack_int* ipiv, const lapack_complex_double* b,
13447                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13448                    double* rcond, double* ferr, double* berr,
13449                    lapack_complex_double* work, double* rwork,
13450                    lapack_int *info );
13451void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13452                   lapack_complex_float* ap, lapack_int* ipiv,
13453                   lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13454void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13455                   lapack_complex_double* ap, lapack_int* ipiv,
13456                   lapack_complex_double* b, lapack_int* ldb,
13457                   lapack_int *info );
13458void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13459                    const lapack_complex_float* ap, lapack_complex_float* afp,
13460                    lapack_int* ipiv, const lapack_complex_float* b,
13461                    lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13462                    float* rcond, float* ferr, float* berr,
13463                    lapack_complex_float* work, float* rwork,
13464                    lapack_int *info );
13465void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13466                    const lapack_complex_double* ap, lapack_complex_double* afp,
13467                    lapack_int* ipiv, const lapack_complex_double* b,
13468                    lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13469                    double* rcond, double* ferr, double* berr,
13470                    lapack_complex_double* work, double* rwork,
13471                    lapack_int *info );
13472void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13473                    float* tau, float* work, lapack_int* lwork,
13474                    lapack_int *info );
13475void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13476                    double* tau, double* work, lapack_int* lwork,
13477                    lapack_int *info );
13478void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13479                    lapack_int* lda, lapack_complex_float* tau,
13480                    lapack_complex_float* work, lapack_int* lwork,
13481                    lapack_int *info );
13482void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13483                    lapack_int* lda, lapack_complex_double* tau,
13484                    lapack_complex_double* work, lapack_int* lwork,
13485                    lapack_int *info );
13486void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13487                    lapack_int* jpvt, float* tau, float* work,
13488                    lapack_int *info );
13489void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13490                    lapack_int* jpvt, double* tau, double* work,
13491                    lapack_int *info );
13492void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13493                    lapack_int* lda, lapack_int* jpvt,
13494                    lapack_complex_float* tau, lapack_complex_float* work,
13495                    float* rwork, lapack_int *info );
13496void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13497                    lapack_int* lda, lapack_int* jpvt,
13498                    lapack_complex_double* tau, lapack_complex_double* work,
13499                    double* rwork, lapack_int *info );
13500void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13501                    lapack_int* jpvt, float* tau, float* work,
13502                    lapack_int* lwork, lapack_int *info );
13503void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13504                    lapack_int* jpvt, double* tau, double* work,
13505                    lapack_int* lwork, lapack_int *info );
13506void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13507                    lapack_int* lda, lapack_int* jpvt,
13508                    lapack_complex_float* tau, lapack_complex_float* work,
13509                    lapack_int* lwork, float* rwork, lapack_int *info );
13510void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13511                    lapack_int* lda, lapack_int* jpvt,
13512                    lapack_complex_double* tau, lapack_complex_double* work,
13513                    lapack_int* lwork, double* rwork, lapack_int *info );
13514void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13515                    lapack_int* lda, const float* tau, float* work,
13516                    lapack_int* lwork, lapack_int *info );
13517void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13518                    lapack_int* lda, const double* tau, double* work,
13519                    lapack_int* lwork, lapack_int *info );
13520void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13521                    lapack_int* k, const float* a, lapack_int* lda,
13522                    const float* tau, float* c, lapack_int* ldc, float* work,
13523                    lapack_int* lwork, lapack_int *info );
13524void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13525                    lapack_int* k, const double* a, lapack_int* lda,
13526                    const double* tau, double* c, lapack_int* ldc, double* work,
13527                    lapack_int* lwork, lapack_int *info );
13528void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
13529                    lapack_complex_float* a, lapack_int* lda,
13530                    const lapack_complex_float* tau, lapack_complex_float* work,
13531                    lapack_int* lwork, lapack_int *info );
13532void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
13533                    lapack_complex_double* a, lapack_int* lda,
13534                    const lapack_complex_double* tau,
13535                    lapack_complex_double* work, lapack_int* lwork,
13536                    lapack_int *info );
13537void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13538                    lapack_int* k, const lapack_complex_float* a,
13539                    lapack_int* lda, const lapack_complex_float* tau,
13540                    lapack_complex_float* c, lapack_int* ldc,
13541                    lapack_complex_float* work, lapack_int* lwork,
13542                    lapack_int *info );
13543void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13544                    lapack_int* k, const lapack_complex_double* a,
13545                    lapack_int* lda, const lapack_complex_double* tau,
13546                    lapack_complex_double* c, lapack_int* ldc,
13547                    lapack_complex_double* work, lapack_int* lwork,
13548                    lapack_int *info );
13549void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13550                    float* tau, float* work, lapack_int* lwork,
13551                    lapack_int *info );
13552void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13553                    double* tau, double* work, lapack_int* lwork,
13554                    lapack_int *info );
13555void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13556                    lapack_int* lda, lapack_complex_float* tau,
13557                    lapack_complex_float* work, lapack_int* lwork,
13558                    lapack_int *info );
13559void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13560                    lapack_int* lda, lapack_complex_double* tau,
13561                    lapack_complex_double* work, lapack_int* lwork,
13562                    lapack_int *info );
13563void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13564                    lapack_int* lda, const float* tau, float* work,
13565                    lapack_int* lwork, lapack_int *info );
13566void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13567                    lapack_int* lda, const double* tau, double* work,
13568                    lapack_int* lwork, lapack_int *info );
13569void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13570                    lapack_int* k, const float* a, lapack_int* lda,
13571                    const float* tau, float* c, lapack_int* ldc, float* work,
13572                    lapack_int* lwork, lapack_int *info );
13573void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13574                    lapack_int* k, const double* a, lapack_int* lda,
13575                    const double* tau, double* c, lapack_int* ldc, double* work,
13576                    lapack_int* lwork, lapack_int *info );
13577void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
13578                    lapack_complex_float* a, lapack_int* lda,
13579                    const lapack_complex_float* tau, lapack_complex_float* work,
13580                    lapack_int* lwork, lapack_int *info );
13581void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
13582                    lapack_complex_double* a, lapack_int* lda,
13583                    const lapack_complex_double* tau,
13584                    lapack_complex_double* work, lapack_int* lwork,
13585                    lapack_int *info );
13586void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13587                    lapack_int* k, const lapack_complex_float* a,
13588                    lapack_int* lda, const lapack_complex_float* tau,
13589                    lapack_complex_float* c, lapack_int* ldc,
13590                    lapack_complex_float* work, lapack_int* lwork,
13591                    lapack_int *info );
13592void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13593                    lapack_int* k, const lapack_complex_double* a,
13594                    lapack_int* lda, const lapack_complex_double* tau,
13595                    lapack_complex_double* c, lapack_int* ldc,
13596                    lapack_complex_double* work, lapack_int* lwork,
13597                    lapack_int *info );
13598void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13599                    float* tau, float* work, lapack_int* lwork,
13600                    lapack_int *info );
13601void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13602                    double* tau, double* work, lapack_int* lwork,
13603                    lapack_int *info );
13604void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13605                    lapack_int* lda, lapack_complex_float* tau,
13606                    lapack_complex_float* work, lapack_int* lwork,
13607                    lapack_int *info );
13608void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13609                    lapack_int* lda, lapack_complex_double* tau,
13610                    lapack_complex_double* work, lapack_int* lwork,
13611                    lapack_int *info );
13612void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13613                    lapack_int* lda, const float* tau, float* work,
13614                    lapack_int* lwork, lapack_int *info );
13615void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13616                    lapack_int* lda, const double* tau, double* work,
13617                    lapack_int* lwork, lapack_int *info );
13618void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
13619                    lapack_complex_float* a, lapack_int* lda,
13620                    const lapack_complex_float* tau, lapack_complex_float* work,
13621                    lapack_int* lwork, lapack_int *info );
13622void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
13623                    lapack_complex_double* a, lapack_int* lda,
13624                    const lapack_complex_double* tau,
13625                    lapack_complex_double* work, lapack_int* lwork,
13626                    lapack_int *info );
13627void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
13628                    lapack_int* k, const float* a, lapack_int* lda,
13629                    const float* tau, float* c, lapack_int* ldc, float* work,
13630                    lapack_int* lwork, lapack_int *info );
13631void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
13632                    lapack_int* k, const double* a, lapack_int* lda,
13633                    const double* tau, double* c, lapack_int* ldc, double* work,
13634                    lapack_int* lwork, lapack_int *info );
13635void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
13636                    lapack_int* k, const lapack_complex_float* a,
13637                    lapack_int* lda, const lapack_complex_float* tau,
13638                    lapack_complex_float* c, lapack_int* ldc,
13639                    lapack_complex_float* work, lapack_int* lwork,
13640                    lapack_int *info );
13641void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
13642                    lapack_int* k, const lapack_complex_double* a,
13643                    lapack_int* lda, const lapack_complex_double* tau,
13644                    lapack_complex_double* c, lapack_int* ldc,
13645                    lapack_complex_double* work, lapack_int* lwork,
13646                    lapack_int *info );
13647void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13648                    float* tau, float* work, lapack_int* lwork,
13649                    lapack_int *info );
13650void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13651                    double* tau, double* work, lapack_int* lwork,
13652                    lapack_int *info );
13653void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13654                    lapack_int* lda, lapack_complex_float* tau,
13655                    lapack_complex_float* work, lapack_int* lwork,
13656                    lapack_int *info );
13657void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13658                    lapack_int* lda, lapack_complex_double* tau,
13659                    lapack_complex_double* work, lapack_int* lwork,
13660                    lapack_int *info );
13661void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13662                    lapack_int* lda, const float* tau, float* work,
13663                    lapack_int* lwork, lapack_int *info );
13664void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13665                    lapack_int* lda, const double* tau, double* work,
13666                    lapack_int* lwork, lapack_int *info );
13667void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
13668                    lapack_complex_float* a, lapack_int* lda,
13669                    const lapack_complex_float* tau, lapack_complex_float* work,
13670                    lapack_int* lwork, lapack_int *info );
13671void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
13672                    lapack_complex_double* a, lapack_int* lda,
13673                    const lapack_complex_double* tau,
13674                    lapack_complex_double* work, lapack_int* lwork,
13675                    lapack_int *info );
13676void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13677                    lapack_int* k, const float* a, lapack_int* lda,
13678                    const float* tau, float* c, lapack_int* ldc, float* work,
13679                    lapack_int* lwork, lapack_int *info );
13680void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13681                    lapack_int* k, const double* a, lapack_int* lda,
13682                    const double* tau, double* c, lapack_int* ldc, double* work,
13683                    lapack_int* lwork, lapack_int *info );
13684void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13685                    lapack_int* k, const lapack_complex_float* a,
13686                    lapack_int* lda, const lapack_complex_float* tau,
13687                    lapack_complex_float* c, lapack_int* ldc,
13688                    lapack_complex_float* work, lapack_int* lwork,
13689                    lapack_int *info );
13690void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13691                    lapack_int* k, const lapack_complex_double* a,
13692                    lapack_int* lda, const lapack_complex_double* tau,
13693                    lapack_complex_double* c, lapack_int* ldc,
13694                    lapack_complex_double* work, lapack_int* lwork,
13695                    lapack_int *info );
13696void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13697                    float* tau, float* work, lapack_int* lwork,
13698                    lapack_int *info );
13699void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13700                    double* tau, double* work, lapack_int* lwork,
13701                    lapack_int *info );
13702void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13703                    lapack_int* lda, lapack_complex_float* tau,
13704                    lapack_complex_float* work, lapack_int* lwork,
13705                    lapack_int *info );
13706void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13707                    lapack_int* lda, lapack_complex_double* tau,
13708                    lapack_complex_double* work, lapack_int* lwork,
13709                    lapack_int *info );
13710void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13711                    lapack_int* k, lapack_int* l, const float* a,
13712                    lapack_int* lda, const float* tau, float* c,
13713                    lapack_int* ldc, float* work, lapack_int* lwork,
13714                    lapack_int *info );
13715void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13716                    lapack_int* k, lapack_int* l, const double* a,
13717                    lapack_int* lda, const double* tau, double* c,
13718                    lapack_int* ldc, double* work, lapack_int* lwork,
13719                    lapack_int *info );
13720void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13721                    lapack_int* k, lapack_int* l, const lapack_complex_float* a,
13722                    lapack_int* lda, const lapack_complex_float* tau,
13723                    lapack_complex_float* c, lapack_int* ldc,
13724                    lapack_complex_float* work, lapack_int* lwork,
13725                    lapack_int *info );
13726void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13727                    lapack_int* k, lapack_int* l,
13728                    const lapack_complex_double* a, lapack_int* lda,
13729                    const lapack_complex_double* tau, lapack_complex_double* c,
13730                    lapack_int* ldc, lapack_complex_double* work,
13731                    lapack_int* lwork, lapack_int *info );
13732void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
13733                    lapack_int* lda, float* taua, float* b, lapack_int* ldb,
13734                    float* taub, float* work, lapack_int* lwork,
13735                    lapack_int *info );
13736void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
13737                    lapack_int* lda, double* taua, double* b, lapack_int* ldb,
13738                    double* taub, double* work, lapack_int* lwork,
13739                    lapack_int *info );
13740void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
13741                    lapack_complex_float* a, lapack_int* lda,
13742                    lapack_complex_float* taua, lapack_complex_float* b,
13743                    lapack_int* ldb, lapack_complex_float* taub,
13744                    lapack_complex_float* work, lapack_int* lwork,
13745                    lapack_int *info );
13746void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
13747                    lapack_complex_double* a, lapack_int* lda,
13748                    lapack_complex_double* taua, lapack_complex_double* b,
13749                    lapack_int* ldb, lapack_complex_double* taub,
13750                    lapack_complex_double* work, lapack_int* lwork,
13751                    lapack_int *info );
13752void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
13753                    lapack_int* lda, float* taua, float* b, lapack_int* ldb,
13754                    float* taub, float* work, lapack_int* lwork,
13755                    lapack_int *info );
13756void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
13757                    lapack_int* lda, double* taua, double* b, lapack_int* ldb,
13758                    double* taub, double* work, lapack_int* lwork,
13759                    lapack_int *info );
13760void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
13761                    lapack_complex_float* a, lapack_int* lda,
13762                    lapack_complex_float* taua, lapack_complex_float* b,
13763                    lapack_int* ldb, lapack_complex_float* taub,
13764                    lapack_complex_float* work, lapack_int* lwork,
13765                    lapack_int *info );
13766void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
13767                    lapack_complex_double* a, lapack_int* lda,
13768                    lapack_complex_double* taua, lapack_complex_double* b,
13769                    lapack_int* ldb, lapack_complex_double* taub,
13770                    lapack_complex_double* work, lapack_int* lwork,
13771                    lapack_int *info );
13772void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13773                    float* d, float* e, float* tauq, float* taup, float* work,
13774                    lapack_int* lwork, lapack_int *info );
13775void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13776                    double* d, double* e, double* tauq, double* taup,
13777                    double* work, lapack_int* lwork, lapack_int *info );
13778void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13779                    lapack_int* lda, float* d, float* e,
13780                    lapack_complex_float* tauq, lapack_complex_float* taup,
13781                    lapack_complex_float* work, lapack_int* lwork,
13782                    lapack_int *info );
13783void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13784                    lapack_int* lda, double* d, double* e,
13785                    lapack_complex_double* tauq, lapack_complex_double* taup,
13786                    lapack_complex_double* work, lapack_int* lwork,
13787                    lapack_int *info );
13788void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13789                    lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
13790                    float* d, float* e, float* q, lapack_int* ldq, float* pt,
13791                    lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
13792                    lapack_int *info );
13793void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13794                    lapack_int* kl, lapack_int* ku, double* ab,
13795                    lapack_int* ldab, double* d, double* e, double* q,
13796                    lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
13797                    lapack_int* ldc, double* work, lapack_int *info );
13798void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13799                    lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
13800                    lapack_int* ldab, float* d, float* e,
13801                    lapack_complex_float* q, lapack_int* ldq,
13802                    lapack_complex_float* pt, lapack_int* ldpt,
13803                    lapack_complex_float* c, lapack_int* ldc,
13804                    lapack_complex_float* work, float* rwork,
13805                    lapack_int *info );
13806void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13807                    lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
13808                    lapack_int* ldab, double* d, double* e,
13809                    lapack_complex_double* q, lapack_int* ldq,
13810                    lapack_complex_double* pt, lapack_int* ldpt,
13811                    lapack_complex_double* c, lapack_int* ldc,
13812                    lapack_complex_double* work, double* rwork,
13813                    lapack_int *info );
13814void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13815                    float* a, lapack_int* lda, const float* tau, float* work,
13816                    lapack_int* lwork, lapack_int *info );
13817void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13818                    double* a, lapack_int* lda, const double* tau, double* work,
13819                    lapack_int* lwork, lapack_int *info );
13820void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
13821                    lapack_int* n, lapack_int* k, const float* a,
13822                    lapack_int* lda, const float* tau, float* c,
13823                    lapack_int* ldc, float* work, lapack_int* lwork,
13824                    lapack_int *info );
13825void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
13826                    lapack_int* n, lapack_int* k, const double* a,
13827                    lapack_int* lda, const double* tau, double* c,
13828                    lapack_int* ldc, double* work, lapack_int* lwork,
13829                    lapack_int *info );
13830void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13831                    lapack_complex_float* a, lapack_int* lda,
13832                    const lapack_complex_float* tau, lapack_complex_float* work,
13833                    lapack_int* lwork, lapack_int *info );
13834void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13835                    lapack_complex_double* a, lapack_int* lda,
13836                    const lapack_complex_double* tau,
13837                    lapack_complex_double* work, lapack_int* lwork,
13838                    lapack_int *info );
13839void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
13840                    lapack_int* n, lapack_int* k, const lapack_complex_float* a,
13841                    lapack_int* lda, const lapack_complex_float* tau,
13842                    lapack_complex_float* c, lapack_int* ldc,
13843                    lapack_complex_float* work, lapack_int* lwork,
13844                    lapack_int *info );
13845void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
13846                    lapack_int* n, lapack_int* k,
13847                    const lapack_complex_double* a, lapack_int* lda,
13848                    const lapack_complex_double* tau, lapack_complex_double* c,
13849                    lapack_int* ldc, lapack_complex_double* work,
13850                    lapack_int* lwork, lapack_int *info );
13851void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13852                    lapack_int* nru, lapack_int* ncc, float* d, float* e,
13853                    float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
13854                    float* c, lapack_int* ldc, float* work, lapack_int *info );
13855void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13856                    lapack_int* nru, lapack_int* ncc, double* d, double* e,
13857                    double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
13858                    double* c, lapack_int* ldc, double* work,
13859                    lapack_int *info );
13860void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13861                    lapack_int* nru, lapack_int* ncc, float* d, float* e,
13862                    lapack_complex_float* vt, lapack_int* ldvt,
13863                    lapack_complex_float* u, lapack_int* ldu,
13864                    lapack_complex_float* c, lapack_int* ldc, float* work,
13865                    lapack_int *info );
13866void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13867                    lapack_int* nru, lapack_int* ncc, double* d, double* e,
13868                    lapack_complex_double* vt, lapack_int* ldvt,
13869                    lapack_complex_double* u, lapack_int* ldu,
13870                    lapack_complex_double* c, lapack_int* ldc, double* work,
13871                    lapack_int *info );
13872void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
13873                    float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
13874                    float* q, lapack_int* iq, float* work, lapack_int* iwork,
13875                    lapack_int *info );
13876void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
13877                    double* e, double* u, lapack_int* ldu, double* vt,
13878                    lapack_int* ldvt, double* q, lapack_int* iq, double* work,
13879                    lapack_int* iwork, lapack_int *info );
13880void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13881                    float* d, float* e, float* tau, float* work,
13882                    lapack_int* lwork, lapack_int *info );
13883void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13884                    double* d, double* e, double* tau, double* work,
13885                    lapack_int* lwork, lapack_int *info );
13886void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13887                    const float* tau, float* work, lapack_int* lwork,
13888                    lapack_int *info );
13889void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13890                    const double* tau, double* work, lapack_int* lwork,
13891                    lapack_int *info );
13892void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
13893                    lapack_int* n, const float* a, lapack_int* lda,
13894                    const float* tau, float* c, lapack_int* ldc, float* work,
13895                    lapack_int* lwork, lapack_int *info );
13896void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
13897                    lapack_int* n, const double* a, lapack_int* lda,
13898                    const double* tau, double* c, lapack_int* ldc, double* work,
13899                    lapack_int* lwork, lapack_int *info );
13900void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
13901                    lapack_int* lda, float* d, float* e,
13902                    lapack_complex_float* tau, lapack_complex_float* work,
13903                    lapack_int* lwork, lapack_int *info );
13904void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
13905                    lapack_int* lda, double* d, double* e,
13906                    lapack_complex_double* tau, lapack_complex_double* work,
13907                    lapack_int* lwork, lapack_int *info );
13908void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
13909                    lapack_int* lda, const lapack_complex_float* tau,
13910                    lapack_complex_float* work, lapack_int* lwork,
13911                    lapack_int *info );
13912void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
13913                    lapack_int* lda, const lapack_complex_double* tau,
13914                    lapack_complex_double* work, lapack_int* lwork,
13915                    lapack_int *info );
13916void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
13917                    lapack_int* n, const lapack_complex_float* a,
13918                    lapack_int* lda, const lapack_complex_float* tau,
13919                    lapack_complex_float* c, lapack_int* ldc,
13920                    lapack_complex_float* work, lapack_int* lwork,
13921                    lapack_int *info );
13922void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
13923                    lapack_int* n, const lapack_complex_double* a,
13924                    lapack_int* lda, const lapack_complex_double* tau,
13925                    lapack_complex_double* c, lapack_int* ldc,
13926                    lapack_complex_double* work, lapack_int* lwork,
13927                    lapack_int *info );
13928void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
13929                    float* tau, lapack_int *info );
13930void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
13931                    double* tau, lapack_int *info );
13932void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
13933                    const float* tau, float* q, lapack_int* ldq, float* work,
13934                    lapack_int *info );
13935void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
13936                    const double* tau, double* q, lapack_int* ldq, double* work,
13937                    lapack_int *info );
13938void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
13939                    lapack_int* n, const float* ap, const float* tau, float* c,
13940                    lapack_int* ldc, float* work, lapack_int *info );
13941void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
13942                    lapack_int* n, const double* ap, const double* tau,
13943                    double* c, lapack_int* ldc, double* work,
13944                    lapack_int *info );
13945void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
13946                    float* d, float* e, lapack_complex_float* tau,
13947                    lapack_int *info );
13948void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
13949                    double* d, double* e, lapack_complex_double* tau,
13950                    lapack_int *info );
13951void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
13952                    const lapack_complex_float* tau, lapack_complex_float* q,
13953                    lapack_int* ldq, lapack_complex_float* work,
13954                    lapack_int *info );
13955void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
13956                    const lapack_complex_double* tau, lapack_complex_double* q,
13957                    lapack_int* ldq, lapack_complex_double* work,
13958                    lapack_int *info );
13959void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
13960                    lapack_int* n, const lapack_complex_float* ap,
13961                    const lapack_complex_float* tau, lapack_complex_float* c,
13962                    lapack_int* ldc, lapack_complex_float* work,
13963                    lapack_int *info );
13964void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
13965                    lapack_int* n, const lapack_complex_double* ap,
13966                    const lapack_complex_double* tau, lapack_complex_double* c,
13967                    lapack_int* ldc, lapack_complex_double* work,
13968                    lapack_int *info );
13969void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13970                    float* ab, lapack_int* ldab, float* d, float* e, float* q,
13971                    lapack_int* ldq, float* work, lapack_int *info );
13972void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13973                    double* ab, lapack_int* ldab, double* d, double* e,
13974                    double* q, lapack_int* ldq, double* work,
13975                    lapack_int *info );
13976void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13977                    lapack_complex_float* ab, lapack_int* ldab, float* d,
13978                    float* e, lapack_complex_float* q, lapack_int* ldq,
13979                    lapack_complex_float* work, lapack_int *info );
13980void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13981                    lapack_complex_double* ab, lapack_int* ldab, double* d,
13982                    double* e, lapack_complex_double* q, lapack_int* ldq,
13983                    lapack_complex_double* work, lapack_int *info );
13984void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
13985void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
13986void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
13987                    lapack_int* ldz, float* work, lapack_int *info );
13988void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
13989                    lapack_int* ldz, double* work, lapack_int *info );
13990void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
13991                    lapack_complex_float* z, lapack_int* ldz, float* work,
13992                    lapack_int *info );
13993void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
13994                    lapack_complex_double* z, lapack_int* ldz, double* work,
13995                    lapack_int *info );
13996void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
13997                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
13998                    lapack_int* m, float* w, float* z, lapack_int* ldz,
13999                    lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
14000                    float* work, lapack_int* lwork, lapack_int* iwork,
14001                    lapack_int* liwork, lapack_int *info );
14002void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
14003                    double* e, double* vl, double* vu, lapack_int* il,
14004                    lapack_int* iu, lapack_int* m, double* w, double* z,
14005                    lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
14006                    lapack_logical* tryrac, double* work, lapack_int* lwork,
14007                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14008void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14009                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
14010                    lapack_int* m, float* w, lapack_complex_float* z,
14011                    lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
14012                    lapack_logical* tryrac, float* work, lapack_int* lwork,
14013                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14014void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
14015                    double* e, double* vl, double* vu, lapack_int* il,
14016                    lapack_int* iu, lapack_int* m, double* w,
14017                    lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
14018                    lapack_int* isuppz, lapack_logical* tryrac, double* work,
14019                    lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14020                    lapack_int *info );
14021void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
14022                    lapack_int* ldz, float* work, lapack_int* lwork,
14023                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14024void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
14025                    lapack_int* ldz, double* work, lapack_int* lwork,
14026                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14027void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
14028                    lapack_complex_float* z, lapack_int* ldz,
14029                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14030                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14031                    lapack_int *info );
14032void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
14033                    lapack_complex_double* z, lapack_int* ldz,
14034                    lapack_complex_double* work, lapack_int* lwork,
14035                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
14036                    lapack_int* liwork, lapack_int *info );
14037void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14038                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
14039                    float* abstol, lapack_int* m, float* w, float* z,
14040                    lapack_int* ldz, lapack_int* isuppz, float* work,
14041                    lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14042                    lapack_int *info );
14043void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
14044                    double* e, double* vl, double* vu, lapack_int* il,
14045                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
14046                    double* z, lapack_int* ldz, lapack_int* isuppz,
14047                    double* work, lapack_int* lwork, lapack_int* iwork,
14048                    lapack_int* liwork, lapack_int *info );
14049void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14050                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
14051                    float* abstol, lapack_int* m, float* w,
14052                    lapack_complex_float* z, lapack_int* ldz,
14053                    lapack_int* isuppz, float* work, lapack_int* lwork,
14054                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14055void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
14056                    double* e, double* vl, double* vu, lapack_int* il,
14057                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
14058                    lapack_complex_double* z, lapack_int* ldz,
14059                    lapack_int* isuppz, double* work, lapack_int* lwork,
14060                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14061void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
14062                    lapack_int* ldz, float* work, lapack_int *info );
14063void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
14064                    lapack_int* ldz, double* work, lapack_int *info );
14065void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
14066                    lapack_complex_float* z, lapack_int* ldz, float* work,
14067                    lapack_int *info );
14068void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
14069                    lapack_complex_double* z, lapack_int* ldz, double* work,
14070                    lapack_int *info );
14071void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
14072                    float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14073                    const float* d, const float* e, lapack_int* m,
14074                    lapack_int* nsplit, float* w, lapack_int* iblock,
14075                    lapack_int* isplit, float* work, lapack_int* iwork,
14076                    lapack_int *info );
14077void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
14078                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14079                    const double* d, const double* e, lapack_int* m,
14080                    lapack_int* nsplit, double* w, lapack_int* iblock,
14081                    lapack_int* isplit, double* work, lapack_int* iwork,
14082                    lapack_int *info );
14083void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
14084                    lapack_int* m, const float* w, const lapack_int* iblock,
14085                    const lapack_int* isplit, float* z, lapack_int* ldz,
14086                    float* work, lapack_int* iwork, lapack_int* ifailv,
14087                    lapack_int *info );
14088void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
14089                    lapack_int* m, const double* w, const lapack_int* iblock,
14090                    const lapack_int* isplit, double* z, lapack_int* ldz,
14091                    double* work, lapack_int* iwork, lapack_int* ifailv,
14092                    lapack_int *info );
14093void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
14094                    lapack_int* m, const float* w, const lapack_int* iblock,
14095                    const lapack_int* isplit, lapack_complex_float* z,
14096                    lapack_int* ldz, float* work, lapack_int* iwork,
14097                    lapack_int* ifailv, lapack_int *info );
14098void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
14099                    lapack_int* m, const double* w, const lapack_int* iblock,
14100                    const lapack_int* isplit, lapack_complex_double* z,
14101                    lapack_int* ldz, double* work, lapack_int* iwork,
14102                    lapack_int* ifailv, lapack_int *info );
14103void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
14104                    float* sep, lapack_int *info );
14105void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
14106                    double* sep, lapack_int *info );
14107void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
14108                    lapack_int* lda, const float* b, lapack_int* ldb,
14109                    lapack_int *info );
14110void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
14111                    lapack_int* lda, const double* b, lapack_int* ldb,
14112                    lapack_int *info );
14113void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
14114                    lapack_complex_float* a, lapack_int* lda,
14115                    const lapack_complex_float* b, lapack_int* ldb,
14116                    lapack_int *info );
14117void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
14118                    lapack_complex_double* a, lapack_int* lda,
14119                    const lapack_complex_double* b, lapack_int* ldb,
14120                    lapack_int *info );
14121void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
14122                    const float* bp, lapack_int *info );
14123void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
14124                    const double* bp, lapack_int *info );
14125void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
14126                    lapack_complex_float* ap, const lapack_complex_float* bp,
14127                    lapack_int *info );
14128void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
14129                    lapack_complex_double* ap, const lapack_complex_double* bp,
14130                    lapack_int *info );
14131void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14132                    lapack_int* kb, float* ab, lapack_int* ldab,
14133                    const float* bb, lapack_int* ldbb, float* x,
14134                    lapack_int* ldx, float* work, lapack_int *info );
14135void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14136                    lapack_int* kb, double* ab, lapack_int* ldab,
14137                    const double* bb, lapack_int* ldbb, double* x,
14138                    lapack_int* ldx, double* work, lapack_int *info );
14139void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14140                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
14141                    const lapack_complex_float* bb, lapack_int* ldbb,
14142                    lapack_complex_float* x, lapack_int* ldx,
14143                    lapack_complex_float* work, float* rwork,
14144                    lapack_int *info );
14145void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14146                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
14147                    const lapack_complex_double* bb, lapack_int* ldbb,
14148                    lapack_complex_double* x, lapack_int* ldx,
14149                    lapack_complex_double* work, double* rwork,
14150                    lapack_int *info );
14151void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
14152                    lapack_int* ldbb, lapack_int *info );
14153void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
14154                    lapack_int* ldbb, lapack_int *info );
14155void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
14156                    lapack_complex_float* bb, lapack_int* ldbb,
14157                    lapack_int *info );
14158void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
14159                    lapack_complex_double* bb, lapack_int* ldbb,
14160                    lapack_int *info );
14161void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
14162                    lapack_int* lda, float* tau, float* work, lapack_int* lwork,
14163                    lapack_int *info );
14164void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
14165                    lapack_int* lda, double* tau, double* work,
14166                    lapack_int* lwork, lapack_int *info );
14167void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14168                    lapack_complex_float* a, lapack_int* lda,
14169                    lapack_complex_float* tau, lapack_complex_float* work,
14170                    lapack_int* lwork, lapack_int *info );
14171void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14172                    lapack_complex_double* a, lapack_int* lda,
14173                    lapack_complex_double* tau, lapack_complex_double* work,
14174                    lapack_int* lwork, lapack_int *info );
14175void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
14176                    lapack_int* lda, const float* tau, float* work,
14177                    lapack_int* lwork, lapack_int *info );
14178void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
14179                    lapack_int* lda, const double* tau, double* work,
14180                    lapack_int* lwork, lapack_int *info );
14181void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14182                    lapack_int* ilo, lapack_int* ihi, const float* a,
14183                    lapack_int* lda, const float* tau, float* c,
14184                    lapack_int* ldc, float* work, lapack_int* lwork,
14185                    lapack_int *info );
14186void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14187                    lapack_int* ilo, lapack_int* ihi, const double* a,
14188                    lapack_int* lda, const double* tau, double* c,
14189                    lapack_int* ldc, double* work, lapack_int* lwork,
14190                    lapack_int *info );
14191void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14192                    lapack_complex_float* a, lapack_int* lda,
14193                    const lapack_complex_float* tau, lapack_complex_float* work,
14194                    lapack_int* lwork, lapack_int *info );
14195void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14196                    lapack_complex_double* a, lapack_int* lda,
14197                    const lapack_complex_double* tau,
14198                    lapack_complex_double* work, lapack_int* lwork,
14199                    lapack_int *info );
14200void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14201                    lapack_int* ilo, lapack_int* ihi,
14202                    const lapack_complex_float* a, lapack_int* lda,
14203                    const lapack_complex_float* tau, lapack_complex_float* c,
14204                    lapack_int* ldc, lapack_complex_float* work,
14205                    lapack_int* lwork, lapack_int *info );
14206void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14207                    lapack_int* ilo, lapack_int* ihi,
14208                    const lapack_complex_double* a, lapack_int* lda,
14209                    const lapack_complex_double* tau, lapack_complex_double* c,
14210                    lapack_int* ldc, lapack_complex_double* work,
14211                    lapack_int* lwork, lapack_int *info );
14212void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
14213                    lapack_int* ilo, lapack_int* ihi, float* scale,
14214                    lapack_int *info );
14215void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
14216                    lapack_int* ilo, lapack_int* ihi, double* scale,
14217                    lapack_int *info );
14218void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
14219                    lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
14220                    float* scale, lapack_int *info );
14221void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
14222                    lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
14223                    double* scale, lapack_int *info );
14224void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14225                    lapack_int* ihi, const float* scale, lapack_int* m,
14226                    float* v, lapack_int* ldv, lapack_int *info );
14227void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14228                    lapack_int* ihi, const double* scale, lapack_int* m,
14229                    double* v, lapack_int* ldv, lapack_int *info );
14230void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14231                    lapack_int* ihi, const float* scale, lapack_int* m,
14232                    lapack_complex_float* v, lapack_int* ldv,
14233                    lapack_int *info );
14234void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14235                    lapack_int* ihi, const double* scale, lapack_int* m,
14236                    lapack_complex_double* v, lapack_int* ldv,
14237                    lapack_int *info );
14238void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14239                    lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
14240                    float* wi, float* z, lapack_int* ldz, float* work,
14241                    lapack_int* lwork, lapack_int *info );
14242void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14243                    lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
14244                    double* wi, double* z, lapack_int* ldz, double* work,
14245                    lapack_int* lwork, lapack_int *info );
14246void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14247                    lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
14248                    lapack_complex_float* w, lapack_complex_float* z,
14249                    lapack_int* ldz, lapack_complex_float* work,
14250                    lapack_int* lwork, lapack_int *info );
14251void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14252                    lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
14253                    lapack_complex_double* w, lapack_complex_double* z,
14254                    lapack_int* ldz, lapack_complex_double* work,
14255                    lapack_int* lwork, lapack_int *info );
14256void LAPACK_shsein( char* job, char* eigsrc, char* initv,
14257                    lapack_logical* select, lapack_int* n, const float* h,
14258                    lapack_int* ldh, float* wr, const float* wi, float* vl,
14259                    lapack_int* ldvl, float* vr, lapack_int* ldvr,
14260                    lapack_int* mm, lapack_int* m, float* work,
14261                    lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14262void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
14263                    lapack_logical* select, lapack_int* n, const double* h,
14264                    lapack_int* ldh, double* wr, const double* wi, double* vl,
14265                    lapack_int* ldvl, double* vr, lapack_int* ldvr,
14266                    lapack_int* mm, lapack_int* m, double* work,
14267                    lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14268void LAPACK_chsein( char* job, char* eigsrc, char* initv,
14269                    const lapack_logical* select, lapack_int* n,
14270                    const lapack_complex_float* h, lapack_int* ldh,
14271                    lapack_complex_float* w, lapack_complex_float* vl,
14272                    lapack_int* ldvl, lapack_complex_float* vr,
14273                    lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14274                    lapack_complex_float* work, float* rwork,
14275                    lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14276void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
14277                    const lapack_logical* select, lapack_int* n,
14278                    const lapack_complex_double* h, lapack_int* ldh,
14279                    lapack_complex_double* w, lapack_complex_double* vl,
14280                    lapack_int* ldvl, lapack_complex_double* vr,
14281                    lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14282                    lapack_complex_double* work, double* rwork,
14283                    lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14284void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
14285                    lapack_int* n, const float* t, lapack_int* ldt, float* vl,
14286                    lapack_int* ldvl, float* vr, lapack_int* ldvr,
14287                    lapack_int* mm, lapack_int* m, float* work,
14288                    lapack_int *info );
14289void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
14290                    lapack_int* n, const double* t, lapack_int* ldt, double* vl,
14291                    lapack_int* ldvl, double* vr, lapack_int* ldvr,
14292                    lapack_int* mm, lapack_int* m, double* work,
14293                    lapack_int *info );
14294void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
14295                    lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
14296                    lapack_complex_float* vl, lapack_int* ldvl,
14297                    lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
14298                    lapack_int* m, lapack_complex_float* work, float* rwork,
14299                    lapack_int *info );
14300void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
14301                    lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
14302                    lapack_complex_double* vl, lapack_int* ldvl,
14303                    lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
14304                    lapack_int* m, lapack_complex_double* work, double* rwork,
14305                    lapack_int *info );
14306void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
14307                    lapack_int* n, const float* t, lapack_int* ldt,
14308                    const float* vl, lapack_int* ldvl, const float* vr,
14309                    lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
14310                    lapack_int* m, float* work, lapack_int* ldwork,
14311                    lapack_int* iwork, lapack_int *info );
14312void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
14313                    lapack_int* n, const double* t, lapack_int* ldt,
14314                    const double* vl, lapack_int* ldvl, const double* vr,
14315                    lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
14316                    lapack_int* m, double* work, lapack_int* ldwork,
14317                    lapack_int* iwork, lapack_int *info );
14318void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
14319                    lapack_int* n, const lapack_complex_float* t,
14320                    lapack_int* ldt, const lapack_complex_float* vl,
14321                    lapack_int* ldvl, const lapack_complex_float* vr,
14322                    lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
14323                    lapack_int* m, lapack_complex_float* work,
14324                    lapack_int* ldwork, float* rwork, lapack_int *info );
14325void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
14326                    lapack_int* n, const lapack_complex_double* t,
14327                    lapack_int* ldt, const lapack_complex_double* vl,
14328                    lapack_int* ldvl, const lapack_complex_double* vr,
14329                    lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
14330                    lapack_int* m, lapack_complex_double* work,
14331                    lapack_int* ldwork, double* rwork, lapack_int *info );
14332void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
14333                    float* q, lapack_int* ldq, lapack_int* ifst,
14334                    lapack_int* ilst, float* work, lapack_int *info );
14335void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
14336                    double* q, lapack_int* ldq, lapack_int* ifst,
14337                    lapack_int* ilst, double* work, lapack_int *info );
14338void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
14339                    lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
14340                    lapack_int* ifst, lapack_int* ilst, lapack_int *info );
14341void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
14342                    lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
14343                    lapack_int* ifst, lapack_int* ilst, lapack_int *info );
14344void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
14345                    lapack_int* n, float* t, lapack_int* ldt, float* q,
14346                    lapack_int* ldq, float* wr, float* wi, lapack_int* m,
14347                    float* s, float* sep, float* work, lapack_int* lwork,
14348                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14349void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
14350                    lapack_int* n, double* t, lapack_int* ldt, double* q,
14351                    lapack_int* ldq, double* wr, double* wi, lapack_int* m,
14352                    double* s, double* sep, double* work, lapack_int* lwork,
14353                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14354void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
14355                    lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
14356                    lapack_complex_float* q, lapack_int* ldq,
14357                    lapack_complex_float* w, lapack_int* m, float* s,
14358                    float* sep, lapack_complex_float* work, lapack_int* lwork,
14359                    lapack_int *info );
14360void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
14361                    lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
14362                    lapack_complex_double* q, lapack_int* ldq,
14363                    lapack_complex_double* w, lapack_int* m, double* s,
14364                    double* sep, lapack_complex_double* work, lapack_int* lwork,
14365                    lapack_int *info );
14366void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14367                    lapack_int* n, const float* a, lapack_int* lda,
14368                    const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
14369                    float* scale, lapack_int *info );
14370void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14371                    lapack_int* n, const double* a, lapack_int* lda,
14372                    const double* b, lapack_int* ldb, double* c,
14373                    lapack_int* ldc, double* scale, lapack_int *info );
14374void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14375                    lapack_int* n, const lapack_complex_float* a,
14376                    lapack_int* lda, const lapack_complex_float* b,
14377                    lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
14378                    float* scale, lapack_int *info );
14379void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14380                    lapack_int* n, const lapack_complex_double* a,
14381                    lapack_int* lda, const lapack_complex_double* b,
14382                    lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
14383                    double* scale, lapack_int *info );
14384void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14385                    lapack_int* ihi, float* a, lapack_int* lda, float* b,
14386                    lapack_int* ldb, float* q, lapack_int* ldq, float* z,
14387                    lapack_int* ldz, lapack_int *info );
14388void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14389                    lapack_int* ihi, double* a, lapack_int* lda, double* b,
14390                    lapack_int* ldb, double* q, lapack_int* ldq, double* z,
14391                    lapack_int* ldz, lapack_int *info );
14392void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14393                    lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
14394                    lapack_complex_float* b, lapack_int* ldb,
14395                    lapack_complex_float* q, lapack_int* ldq,
14396                    lapack_complex_float* z, lapack_int* ldz,
14397                    lapack_int *info );
14398void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14399                    lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
14400                    lapack_complex_double* b, lapack_int* ldb,
14401                    lapack_complex_double* q, lapack_int* ldq,
14402                    lapack_complex_double* z, lapack_int* ldz,
14403                    lapack_int *info );
14404void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
14405                    float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
14406                    float* lscale, float* rscale, float* work,
14407                    lapack_int *info );
14408void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
14409                    double* b, lapack_int* ldb, lapack_int* ilo,
14410                    lapack_int* ihi, double* lscale, double* rscale,
14411                    double* work, lapack_int *info );
14412void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
14413                    lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14414                    lapack_int* ilo, lapack_int* ihi, float* lscale,
14415                    float* rscale, float* work, lapack_int *info );
14416void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
14417                    lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14418                    lapack_int* ilo, lapack_int* ihi, double* lscale,
14419                    double* rscale, double* work, lapack_int *info );
14420void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14421                    lapack_int* ihi, const float* lscale, const float* rscale,
14422                    lapack_int* m, float* v, lapack_int* ldv,
14423                    lapack_int *info );
14424void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14425                    lapack_int* ihi, const double* lscale, const double* rscale,
14426                    lapack_int* m, double* v, lapack_int* ldv,
14427                    lapack_int *info );
14428void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14429                    lapack_int* ihi, const float* lscale, const float* rscale,
14430                    lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
14431                    lapack_int *info );
14432void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14433                    lapack_int* ihi, const double* lscale, const double* rscale,
14434                    lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
14435                    lapack_int *info );
14436void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
14437                    lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
14438                    float* t, lapack_int* ldt, float* alphar, float* alphai,
14439                    float* beta, float* q, lapack_int* ldq, float* z,
14440                    lapack_int* ldz, float* work, lapack_int* lwork,
14441                    lapack_int *info );
14442void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
14443                    lapack_int* ilo, lapack_int* ihi, double* h,
14444                    lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
14445                    double* alphai, double* beta, double* q, lapack_int* ldq,
14446                    double* z, lapack_int* ldz, double* work, lapack_int* lwork,
14447                    lapack_int *info );
14448void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
14449                    lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
14450                    lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
14451                    lapack_complex_float* alpha, lapack_complex_float* beta,
14452                    lapack_complex_float* q, lapack_int* ldq,
14453                    lapack_complex_float* z, lapack_int* ldz,
14454                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14455                    lapack_int *info );
14456void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
14457                    lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
14458                    lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
14459                    lapack_complex_double* alpha, lapack_complex_double* beta,
14460                    lapack_complex_double* q, lapack_int* ldq,
14461                    lapack_complex_double* z, lapack_int* ldz,
14462                    lapack_complex_double* work, lapack_int* lwork,
14463                    double* rwork, lapack_int *info );
14464void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
14465                    lapack_int* n, const float* s, lapack_int* lds,
14466                    const float* p, lapack_int* ldp, float* vl,
14467                    lapack_int* ldvl, float* vr, lapack_int* ldvr,
14468                    lapack_int* mm, lapack_int* m, float* work,
14469                    lapack_int *info );
14470void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
14471                    lapack_int* n, const double* s, lapack_int* lds,
14472                    const double* p, lapack_int* ldp, double* vl,
14473                    lapack_int* ldvl, double* vr, lapack_int* ldvr,
14474                    lapack_int* mm, lapack_int* m, double* work,
14475                    lapack_int *info );
14476void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
14477                    lapack_int* n, const lapack_complex_float* s,
14478                    lapack_int* lds, const lapack_complex_float* p,
14479                    lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
14480                    lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
14481                    lapack_int* m, lapack_complex_float* work, float* rwork,
14482                    lapack_int *info );
14483void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
14484                    lapack_int* n, const lapack_complex_double* s,
14485                    lapack_int* lds, const lapack_complex_double* p,
14486                    lapack_int* ldp, lapack_complex_double* vl,
14487                    lapack_int* ldvl, lapack_complex_double* vr,
14488                    lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14489                    lapack_complex_double* work, double* rwork,
14490                    lapack_int *info );
14491void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14492                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
14493                    float* q, lapack_int* ldq, float* z, lapack_int* ldz,
14494                    lapack_int* ifst, lapack_int* ilst, float* work,
14495                    lapack_int* lwork, lapack_int *info );
14496void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14497                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
14498                    double* q, lapack_int* ldq, double* z, lapack_int* ldz,
14499                    lapack_int* ifst, lapack_int* ilst, double* work,
14500                    lapack_int* lwork, lapack_int *info );
14501void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14502                    lapack_complex_float* a, lapack_int* lda,
14503                    lapack_complex_float* b, lapack_int* ldb,
14504                    lapack_complex_float* q, lapack_int* ldq,
14505                    lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
14506                    lapack_int* ilst, lapack_int *info );
14507void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14508                    lapack_complex_double* a, lapack_int* lda,
14509                    lapack_complex_double* b, lapack_int* ldb,
14510                    lapack_complex_double* q, lapack_int* ldq,
14511                    lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
14512                    lapack_int* ilst, lapack_int *info );
14513void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
14514                    lapack_logical* wantz, const lapack_logical* select,
14515                    lapack_int* n, float* a, lapack_int* lda, float* b,
14516                    lapack_int* ldb, float* alphar, float* alphai, float* beta,
14517                    float* q, lapack_int* ldq, float* z, lapack_int* ldz,
14518                    lapack_int* m, float* pl, float* pr, float* dif,
14519                    float* work, lapack_int* lwork, lapack_int* iwork,
14520                    lapack_int* liwork, lapack_int *info );
14521void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
14522                    lapack_logical* wantz, const lapack_logical* select,
14523                    lapack_int* n, double* a, lapack_int* lda, double* b,
14524                    lapack_int* ldb, double* alphar, double* alphai,
14525                    double* beta, double* q, lapack_int* ldq, double* z,
14526                    lapack_int* ldz, lapack_int* m, double* pl, double* pr,
14527                    double* dif, double* work, lapack_int* lwork,
14528                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14529void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
14530                    lapack_logical* wantz, const lapack_logical* select,
14531                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
14532                    lapack_complex_float* b, lapack_int* ldb,
14533                    lapack_complex_float* alpha, lapack_complex_float* beta,
14534                    lapack_complex_float* q, lapack_int* ldq,
14535                    lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
14536                    float* pl, float* pr, float* dif,
14537                    lapack_complex_float* work, lapack_int* lwork,
14538                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14539void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
14540                    lapack_logical* wantz, const lapack_logical* select,
14541                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
14542                    lapack_complex_double* b, lapack_int* ldb,
14543                    lapack_complex_double* alpha, lapack_complex_double* beta,
14544                    lapack_complex_double* q, lapack_int* ldq,
14545                    lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
14546                    double* pl, double* pr, double* dif,
14547                    lapack_complex_double* work, lapack_int* lwork,
14548                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14549void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14550                    const float* a, lapack_int* lda, const float* b,
14551                    lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
14552                    lapack_int* ldd, const float* e, lapack_int* lde, float* f,
14553                    lapack_int* ldf, float* scale, float* dif, float* work,
14554                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14555void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14556                    const double* a, lapack_int* lda, const double* b,
14557                    lapack_int* ldb, double* c, lapack_int* ldc,
14558                    const double* d, lapack_int* ldd, const double* e,
14559                    lapack_int* lde, double* f, lapack_int* ldf, double* scale,
14560                    double* dif, double* work, lapack_int* lwork,
14561                    lapack_int* iwork, lapack_int *info );
14562void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14563                    const lapack_complex_float* a, lapack_int* lda,
14564                    const lapack_complex_float* b, lapack_int* ldb,
14565                    lapack_complex_float* c, lapack_int* ldc,
14566                    const lapack_complex_float* d, lapack_int* ldd,
14567                    const lapack_complex_float* e, lapack_int* lde,
14568                    lapack_complex_float* f, lapack_int* ldf, float* scale,
14569                    float* dif, lapack_complex_float* work, lapack_int* lwork,
14570                    lapack_int* iwork, lapack_int *info );
14571void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14572                    const lapack_complex_double* a, lapack_int* lda,
14573                    const lapack_complex_double* b, lapack_int* ldb,
14574                    lapack_complex_double* c, lapack_int* ldc,
14575                    const lapack_complex_double* d, lapack_int* ldd,
14576                    const lapack_complex_double* e, lapack_int* lde,
14577                    lapack_complex_double* f, lapack_int* ldf, double* scale,
14578                    double* dif, lapack_complex_double* work, lapack_int* lwork,
14579                    lapack_int* iwork, lapack_int *info );
14580void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
14581                    lapack_int* n, const float* a, lapack_int* lda,
14582                    const float* b, lapack_int* ldb, const float* vl,
14583                    lapack_int* ldvl, const float* vr, lapack_int* ldvr,
14584                    float* s, float* dif, lapack_int* mm, lapack_int* m,
14585                    float* work, lapack_int* lwork, lapack_int* iwork,
14586                    lapack_int *info );
14587void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
14588                    lapack_int* n, const double* a, lapack_int* lda,
14589                    const double* b, lapack_int* ldb, const double* vl,
14590                    lapack_int* ldvl, const double* vr, lapack_int* ldvr,
14591                    double* s, double* dif, lapack_int* mm, lapack_int* m,
14592                    double* work, lapack_int* lwork, lapack_int* iwork,
14593                    lapack_int *info );
14594void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
14595                    lapack_int* n, const lapack_complex_float* a,
14596                    lapack_int* lda, const lapack_complex_float* b,
14597                    lapack_int* ldb, const lapack_complex_float* vl,
14598                    lapack_int* ldvl, const lapack_complex_float* vr,
14599                    lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
14600                    lapack_int* m, lapack_complex_float* work,
14601                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14602void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
14603                    lapack_int* n, const lapack_complex_double* a,
14604                    lapack_int* lda, const lapack_complex_double* b,
14605                    lapack_int* ldb, const lapack_complex_double* vl,
14606                    lapack_int* ldvl, const lapack_complex_double* vr,
14607                    lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
14608                    lapack_int* m, lapack_complex_double* work,
14609                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14610void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14611                    lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
14612                    float* b, lapack_int* ldb, float* tola, float* tolb,
14613                    lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
14614                    float* v, lapack_int* ldv, float* q, lapack_int* ldq,
14615                    lapack_int* iwork, float* tau, float* work,
14616                    lapack_int *info );
14617void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14618                    lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
14619                    double* b, lapack_int* ldb, double* tola, double* tolb,
14620                    lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
14621                    double* v, lapack_int* ldv, double* q, lapack_int* ldq,
14622                    lapack_int* iwork, double* tau, double* work,
14623                    lapack_int *info );
14624void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14625                    lapack_int* p, lapack_int* n, lapack_complex_float* a,
14626                    lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14627                    float* tola, float* tolb, lapack_int* k, lapack_int* l,
14628                    lapack_complex_float* u, lapack_int* ldu,
14629                    lapack_complex_float* v, lapack_int* ldv,
14630                    lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
14631                    float* rwork, lapack_complex_float* tau,
14632                    lapack_complex_float* work, lapack_int *info );
14633void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14634                    lapack_int* p, lapack_int* n, lapack_complex_double* a,
14635                    lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14636                    double* tola, double* tolb, lapack_int* k, lapack_int* l,
14637                    lapack_complex_double* u, lapack_int* ldu,
14638                    lapack_complex_double* v, lapack_int* ldv,
14639                    lapack_complex_double* q, lapack_int* ldq,
14640                    lapack_int* iwork, double* rwork,
14641                    lapack_complex_double* tau, lapack_complex_double* work,
14642                    lapack_int *info );
14643void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14644                    lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14645                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
14646                    float* tola, float* tolb, float* alpha, float* beta,
14647                    float* u, lapack_int* ldu, float* v, lapack_int* ldv,
14648                    float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
14649                    lapack_int *info );
14650void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14651                    lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14652                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
14653                    double* tola, double* tolb, double* alpha, double* beta,
14654                    double* u, lapack_int* ldu, double* v, lapack_int* ldv,
14655                    double* q, lapack_int* ldq, double* work,
14656                    lapack_int* ncycle, lapack_int *info );
14657void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14658                    lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14659                    lapack_complex_float* a, lapack_int* lda,
14660                    lapack_complex_float* b, lapack_int* ldb, float* tola,
14661                    float* tolb, float* alpha, float* beta,
14662                    lapack_complex_float* u, lapack_int* ldu,
14663                    lapack_complex_float* v, lapack_int* ldv,
14664                    lapack_complex_float* q, lapack_int* ldq,
14665                    lapack_complex_float* work, lapack_int* ncycle,
14666                    lapack_int *info );
14667void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14668                    lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14669                    lapack_complex_double* a, lapack_int* lda,
14670                    lapack_complex_double* b, lapack_int* ldb, double* tola,
14671                    double* tolb, double* alpha, double* beta,
14672                    lapack_complex_double* u, lapack_int* ldu,
14673                    lapack_complex_double* v, lapack_int* ldv,
14674                    lapack_complex_double* q, lapack_int* ldq,
14675                    lapack_complex_double* work, lapack_int* ncycle,
14676                    lapack_int *info );
14677void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14678                   float* a, lapack_int* lda, float* b, lapack_int* ldb,
14679                   float* work, lapack_int* lwork, lapack_int *info );
14680void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14681                   double* a, lapack_int* lda, double* b, lapack_int* ldb,
14682                   double* work, lapack_int* lwork, lapack_int *info );
14683void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14684                   lapack_complex_float* a, lapack_int* lda,
14685                   lapack_complex_float* b, lapack_int* ldb,
14686                   lapack_complex_float* work, lapack_int* lwork,
14687                   lapack_int *info );
14688void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14689                   lapack_complex_double* a, lapack_int* lda,
14690                   lapack_complex_double* b, lapack_int* ldb,
14691                   lapack_complex_double* work, lapack_int* lwork,
14692                   lapack_int *info );
14693void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14694                    lapack_int* lda, float* b, lapack_int* ldb,
14695                    lapack_int* jpvt, float* rcond, lapack_int* rank,
14696                    float* work, lapack_int* lwork, lapack_int *info );
14697void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14698                    lapack_int* lda, double* b, lapack_int* ldb,
14699                    lapack_int* jpvt, double* rcond, lapack_int* rank,
14700                    double* work, lapack_int* lwork, lapack_int *info );
14701void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14702                    lapack_complex_float* a, lapack_int* lda,
14703                    lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
14704                    float* rcond, lapack_int* rank, lapack_complex_float* work,
14705                    lapack_int* lwork, float* rwork, lapack_int *info );
14706void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14707                    lapack_complex_double* a, lapack_int* lda,
14708                    lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
14709                    double* rcond, lapack_int* rank,
14710                    lapack_complex_double* work, lapack_int* lwork,
14711                    double* rwork, lapack_int *info );
14712void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14713                    lapack_int* lda, float* b, lapack_int* ldb, float* s,
14714                    float* rcond, lapack_int* rank, float* work,
14715                    lapack_int* lwork, lapack_int *info );
14716void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14717                    lapack_int* lda, double* b, lapack_int* ldb, double* s,
14718                    double* rcond, lapack_int* rank, double* work,
14719                    lapack_int* lwork, lapack_int *info );
14720void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14721                    lapack_complex_float* a, lapack_int* lda,
14722                    lapack_complex_float* b, lapack_int* ldb, float* s,
14723                    float* rcond, lapack_int* rank, lapack_complex_float* work,
14724                    lapack_int* lwork, float* rwork, lapack_int *info );
14725void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14726                    lapack_complex_double* a, lapack_int* lda,
14727                    lapack_complex_double* b, lapack_int* ldb, double* s,
14728                    double* rcond, lapack_int* rank,
14729                    lapack_complex_double* work, lapack_int* lwork,
14730                    double* rwork, lapack_int *info );
14731void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14732                    lapack_int* lda, float* b, lapack_int* ldb, float* s,
14733                    float* rcond, lapack_int* rank, float* work,
14734                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14735void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14736                    lapack_int* lda, double* b, lapack_int* ldb, double* s,
14737                    double* rcond, lapack_int* rank, double* work,
14738                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14739void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14740                    lapack_complex_float* a, lapack_int* lda,
14741                    lapack_complex_float* b, lapack_int* ldb, float* s,
14742                    float* rcond, lapack_int* rank, lapack_complex_float* work,
14743                    lapack_int* lwork, float* rwork, lapack_int* iwork,
14744                    lapack_int *info );
14745void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14746                    lapack_complex_double* a, lapack_int* lda,
14747                    lapack_complex_double* b, lapack_int* ldb, double* s,
14748                    double* rcond, lapack_int* rank,
14749                    lapack_complex_double* work, lapack_int* lwork,
14750                    double* rwork, lapack_int* iwork, lapack_int *info );
14751void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
14752                    lapack_int* lda, float* b, lapack_int* ldb, float* c,
14753                    float* d, float* x, float* work, lapack_int* lwork,
14754                    lapack_int *info );
14755void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
14756                    lapack_int* lda, double* b, lapack_int* ldb, double* c,
14757                    double* d, double* x, double* work, lapack_int* lwork,
14758                    lapack_int *info );
14759void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
14760                    lapack_complex_float* a, lapack_int* lda,
14761                    lapack_complex_float* b, lapack_int* ldb,
14762                    lapack_complex_float* c, lapack_complex_float* d,
14763                    lapack_complex_float* x, lapack_complex_float* work,
14764                    lapack_int* lwork, lapack_int *info );
14765void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
14766                    lapack_complex_double* a, lapack_int* lda,
14767                    lapack_complex_double* b, lapack_int* ldb,
14768                    lapack_complex_double* c, lapack_complex_double* d,
14769                    lapack_complex_double* x, lapack_complex_double* work,
14770                    lapack_int* lwork, lapack_int *info );
14771void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
14772                    lapack_int* lda, float* b, lapack_int* ldb, float* d,
14773                    float* x, float* y, float* work, lapack_int* lwork,
14774                    lapack_int *info );
14775void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
14776                    lapack_int* lda, double* b, lapack_int* ldb, double* d,
14777                    double* x, double* y, double* work, lapack_int* lwork,
14778                    lapack_int *info );
14779void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
14780                    lapack_complex_float* a, lapack_int* lda,
14781                    lapack_complex_float* b, lapack_int* ldb,
14782                    lapack_complex_float* d, lapack_complex_float* x,
14783                    lapack_complex_float* y, lapack_complex_float* work,
14784                    lapack_int* lwork, lapack_int *info );
14785void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
14786                    lapack_complex_double* a, lapack_int* lda,
14787                    lapack_complex_double* b, lapack_int* ldb,
14788                    lapack_complex_double* d, lapack_complex_double* x,
14789                    lapack_complex_double* y, lapack_complex_double* work,
14790                    lapack_int* lwork, lapack_int *info );
14791void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
14792                   lapack_int* lda, float* w, float* work, lapack_int* lwork,
14793                   lapack_int *info );
14794void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
14795                   lapack_int* lda, double* w, double* work, lapack_int* lwork,
14796                   lapack_int *info );
14797void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
14798                   lapack_complex_float* a, lapack_int* lda, float* w,
14799                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
14800                   lapack_int *info );
14801void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
14802                   lapack_complex_double* a, lapack_int* lda, double* w,
14803                   lapack_complex_double* work, lapack_int* lwork,
14804                   double* rwork, lapack_int *info );
14805void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
14806                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
14807                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14808void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
14809                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
14810                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14811void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
14812                    lapack_complex_float* a, lapack_int* lda, float* w,
14813                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14814                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14815                    lapack_int *info );
14816void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
14817                    lapack_complex_double* a, lapack_int* lda, double* w,
14818                    lapack_complex_double* work, lapack_int* lwork,
14819                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
14820                    lapack_int* liwork, lapack_int *info );
14821void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
14822                    float* a, lapack_int* lda, float* vl, float* vu,
14823                    lapack_int* il, lapack_int* iu, float* abstol,
14824                    lapack_int* m, float* w, float* z, lapack_int* ldz,
14825                    float* work, lapack_int* lwork, lapack_int* iwork,
14826                    lapack_int* ifail, lapack_int *info );
14827void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
14828                    double* a, lapack_int* lda, double* vl, double* vu,
14829                    lapack_int* il, lapack_int* iu, double* abstol,
14830                    lapack_int* m, double* w, double* z, lapack_int* ldz,
14831                    double* work, lapack_int* lwork, lapack_int* iwork,
14832                    lapack_int* ifail, lapack_int *info );
14833void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
14834                    lapack_complex_float* a, lapack_int* lda, float* vl,
14835                    float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14836                    lapack_int* m, float* w, lapack_complex_float* z,
14837                    lapack_int* ldz, lapack_complex_float* work,
14838                    lapack_int* lwork, float* rwork, lapack_int* iwork,
14839                    lapack_int* ifail, lapack_int *info );
14840void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
14841                    lapack_complex_double* a, lapack_int* lda, double* vl,
14842                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14843                    lapack_int* m, double* w, lapack_complex_double* z,
14844                    lapack_int* ldz, lapack_complex_double* work,
14845                    lapack_int* lwork, double* rwork, lapack_int* iwork,
14846                    lapack_int* ifail, lapack_int *info );
14847void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
14848                    float* a, lapack_int* lda, float* vl, float* vu,
14849                    lapack_int* il, lapack_int* iu, float* abstol,
14850                    lapack_int* m, float* w, float* z, lapack_int* ldz,
14851                    lapack_int* isuppz, float* work, lapack_int* lwork,
14852                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14853void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
14854                    double* a, lapack_int* lda, double* vl, double* vu,
14855                    lapack_int* il, lapack_int* iu, double* abstol,
14856                    lapack_int* m, double* w, double* z, lapack_int* ldz,
14857                    lapack_int* isuppz, double* work, lapack_int* lwork,
14858                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14859void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
14860                    lapack_complex_float* a, lapack_int* lda, float* vl,
14861                    float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14862                    lapack_int* m, float* w, lapack_complex_float* z,
14863                    lapack_int* ldz, lapack_int* isuppz,
14864                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14865                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14866                    lapack_int *info );
14867void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
14868                    lapack_complex_double* a, lapack_int* lda, double* vl,
14869                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14870                    lapack_int* m, double* w, lapack_complex_double* z,
14871                    lapack_int* ldz, lapack_int* isuppz,
14872                    lapack_complex_double* work, lapack_int* lwork,
14873                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
14874                    lapack_int* liwork, lapack_int *info );
14875void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
14876                   float* z, lapack_int* ldz, float* work, lapack_int *info );
14877void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
14878                   double* z, lapack_int* ldz, double* work, lapack_int *info );
14879void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
14880                   lapack_complex_float* ap, float* w, lapack_complex_float* z,
14881                   lapack_int* ldz, lapack_complex_float* work, float* rwork,
14882                   lapack_int *info );
14883void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
14884                   lapack_complex_double* ap, double* w,
14885                   lapack_complex_double* z, lapack_int* ldz,
14886                   lapack_complex_double* work, double* rwork,
14887                   lapack_int *info );
14888void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
14889                    float* z, lapack_int* ldz, float* work, lapack_int* lwork,
14890                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14891void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
14892                    double* w, double* z, lapack_int* ldz, double* work,
14893                    lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14894                    lapack_int *info );
14895void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
14896                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
14897                    lapack_int* ldz, lapack_complex_float* work,
14898                    lapack_int* lwork, float* rwork, lapack_int* lrwork,
14899                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14900void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
14901                    lapack_complex_double* ap, double* w,
14902                    lapack_complex_double* z, lapack_int* ldz,
14903                    lapack_complex_double* work, lapack_int* lwork,
14904                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
14905                    lapack_int* liwork, lapack_int *info );
14906void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
14907                    float* ap, float* vl, float* vu, lapack_int* il,
14908                    lapack_int* iu, float* abstol, lapack_int* m, float* w,
14909                    float* z, lapack_int* ldz, float* work, lapack_int* iwork,
14910                    lapack_int* ifail, lapack_int *info );
14911void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
14912                    double* ap, double* vl, double* vu, lapack_int* il,
14913                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
14914                    double* z, lapack_int* ldz, double* work, lapack_int* iwork,
14915                    lapack_int* ifail, lapack_int *info );
14916void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
14917                    lapack_complex_float* ap, float* vl, float* vu,
14918                    lapack_int* il, lapack_int* iu, float* abstol,
14919                    lapack_int* m, float* w, lapack_complex_float* z,
14920                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
14921                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14922void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
14923                    lapack_complex_double* ap, double* vl, double* vu,
14924                    lapack_int* il, lapack_int* iu, double* abstol,
14925                    lapack_int* m, double* w, lapack_complex_double* z,
14926                    lapack_int* ldz, lapack_complex_double* work, double* rwork,
14927                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14928void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14929                   float* ab, lapack_int* ldab, float* w, float* z,
14930                   lapack_int* ldz, float* work, lapack_int *info );
14931void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14932                   double* ab, lapack_int* ldab, double* w, double* z,
14933                   lapack_int* ldz, double* work, lapack_int *info );
14934void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14935                   lapack_complex_float* ab, lapack_int* ldab, float* w,
14936                   lapack_complex_float* z, lapack_int* ldz,
14937                   lapack_complex_float* work, float* rwork, lapack_int *info );
14938void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14939                   lapack_complex_double* ab, lapack_int* ldab, double* w,
14940                   lapack_complex_double* z, lapack_int* ldz,
14941                   lapack_complex_double* work, double* rwork,
14942                   lapack_int *info );
14943void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14944                    float* ab, lapack_int* ldab, float* w, float* z,
14945                    lapack_int* ldz, float* work, lapack_int* lwork,
14946                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14947void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14948                    double* ab, lapack_int* ldab, double* w, double* z,
14949                    lapack_int* ldz, double* work, lapack_int* lwork,
14950                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14951void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14952                    lapack_complex_float* ab, lapack_int* ldab, float* w,
14953                    lapack_complex_float* z, lapack_int* ldz,
14954                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14955                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14956                    lapack_int *info );
14957void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14958                    lapack_complex_double* ab, lapack_int* ldab, double* w,
14959                    lapack_complex_double* z, lapack_int* ldz,
14960                    lapack_complex_double* work, lapack_int* lwork,
14961                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
14962                    lapack_int* liwork, lapack_int *info );
14963void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14964                    lapack_int* kd, float* ab, lapack_int* ldab, float* q,
14965                    lapack_int* ldq, float* vl, float* vu, lapack_int* il,
14966                    lapack_int* iu, float* abstol, lapack_int* m, float* w,
14967                    float* z, lapack_int* ldz, float* work, lapack_int* iwork,
14968                    lapack_int* ifail, lapack_int *info );
14969void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14970                    lapack_int* kd, double* ab, lapack_int* ldab, double* q,
14971                    lapack_int* ldq, double* vl, double* vu, lapack_int* il,
14972                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
14973                    double* z, lapack_int* ldz, double* work, lapack_int* iwork,
14974                    lapack_int* ifail, lapack_int *info );
14975void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14976                    lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
14977                    lapack_complex_float* q, lapack_int* ldq, float* vl,
14978                    float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14979                    lapack_int* m, float* w, lapack_complex_float* z,
14980                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
14981                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14982void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14983                    lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
14984                    lapack_complex_double* q, lapack_int* ldq, double* vl,
14985                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14986                    lapack_int* m, double* w, lapack_complex_double* z,
14987                    lapack_int* ldz, lapack_complex_double* work, double* rwork,
14988                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14989void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
14990                   lapack_int* ldz, float* work, lapack_int *info );
14991void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
14992                   lapack_int* ldz, double* work, lapack_int *info );
14993void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
14994                    lapack_int* ldz, float* work, lapack_int* lwork,
14995                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14996void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
14997                    lapack_int* ldz, double* work, lapack_int* lwork,
14998                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14999void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
15000                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
15001                    float* abstol, lapack_int* m, float* w, float* z,
15002                    lapack_int* ldz, float* work, lapack_int* iwork,
15003                    lapack_int* ifail, lapack_int *info );
15004void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
15005                    double* e, double* vl, double* vu, lapack_int* il,
15006                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
15007                    double* z, lapack_int* ldz, double* work, lapack_int* iwork,
15008                    lapack_int* ifail, lapack_int *info );
15009void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15010                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
15011                    float* abstol, lapack_int* m, float* w, float* z,
15012                    lapack_int* ldz, lapack_int* isuppz, float* work,
15013                    lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15014                    lapack_int *info );
15015void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
15016                    double* e, double* vl, double* vu, lapack_int* il,
15017                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
15018                    double* z, lapack_int* ldz, lapack_int* isuppz,
15019                    double* work, lapack_int* lwork, lapack_int* iwork,
15020                    lapack_int* liwork, lapack_int *info );
15021void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
15022                   lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
15023                   float* wr, float* wi, float* vs, lapack_int* ldvs,
15024                   float* work, lapack_int* lwork, lapack_logical* bwork,
15025                   lapack_int *info );
15026void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
15027                   lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
15028                   double* wr, double* wi, double* vs, lapack_int* ldvs,
15029                   double* work, lapack_int* lwork, lapack_logical* bwork,
15030                   lapack_int *info );
15031void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
15032                   lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15033                   lapack_int* sdim, lapack_complex_float* w,
15034                   lapack_complex_float* vs, lapack_int* ldvs,
15035                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
15036                   lapack_logical* bwork, lapack_int *info );
15037void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
15038                   lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15039                   lapack_int* sdim, lapack_complex_double* w,
15040                   lapack_complex_double* vs, lapack_int* ldvs,
15041                   lapack_complex_double* work, lapack_int* lwork,
15042                   double* rwork, lapack_logical* bwork, lapack_int *info );
15043void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
15044                    char* sense, lapack_int* n, float* a, lapack_int* lda,
15045                    lapack_int* sdim, float* wr, float* wi, float* vs,
15046                    lapack_int* ldvs, float* rconde, float* rcondv, float* work,
15047                    lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15048                    lapack_logical* bwork, lapack_int *info );
15049void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
15050                    char* sense, lapack_int* n, double* a, lapack_int* lda,
15051                    lapack_int* sdim, double* wr, double* wi, double* vs,
15052                    lapack_int* ldvs, double* rconde, double* rcondv,
15053                    double* work, lapack_int* lwork, lapack_int* iwork,
15054                    lapack_int* liwork, lapack_logical* bwork,
15055                    lapack_int *info );
15056void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
15057                    char* sense, lapack_int* n, lapack_complex_float* a,
15058                    lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
15059                    lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
15060                    float* rcondv, lapack_complex_float* work,
15061                    lapack_int* lwork, float* rwork, lapack_logical* bwork,
15062                    lapack_int *info );
15063void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
15064                    char* sense, lapack_int* n, lapack_complex_double* a,
15065                    lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
15066                    lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
15067                    double* rcondv, lapack_complex_double* work,
15068                    lapack_int* lwork, double* rwork, lapack_logical* bwork,
15069                    lapack_int *info );
15070void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
15071                   lapack_int* lda, float* wr, float* wi, float* vl,
15072                   lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
15073                   lapack_int* lwork, lapack_int *info );
15074void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
15075                   lapack_int* lda, double* wr, double* wi, double* vl,
15076                   lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
15077                   lapack_int* lwork, lapack_int *info );
15078void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
15079                   lapack_complex_float* a, lapack_int* lda,
15080                   lapack_complex_float* w, lapack_complex_float* vl,
15081                   lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
15082                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
15083                   lapack_int *info );
15084void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
15085                   lapack_complex_double* a, lapack_int* lda,
15086                   lapack_complex_double* w, lapack_complex_double* vl,
15087                   lapack_int* ldvl, lapack_complex_double* vr,
15088                   lapack_int* ldvr, lapack_complex_double* work,
15089                   lapack_int* lwork, double* rwork, lapack_int *info );
15090void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15091                    lapack_int* n, float* a, lapack_int* lda, float* wr,
15092                    float* wi, float* vl, lapack_int* ldvl, float* vr,
15093                    lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15094                    float* scale, float* abnrm, float* rconde, float* rcondv,
15095                    float* work, lapack_int* lwork, lapack_int* iwork,
15096                    lapack_int *info );
15097void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15098                    lapack_int* n, double* a, lapack_int* lda, double* wr,
15099                    double* wi, double* vl, lapack_int* ldvl, double* vr,
15100                    lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15101                    double* scale, double* abnrm, double* rconde,
15102                    double* rcondv, double* work, lapack_int* lwork,
15103                    lapack_int* iwork, lapack_int *info );
15104void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15105                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15106                    lapack_complex_float* w, lapack_complex_float* vl,
15107                    lapack_int* ldvl, lapack_complex_float* vr,
15108                    lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15109                    float* scale, float* abnrm, float* rconde, float* rcondv,
15110                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15111                    lapack_int *info );
15112void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15113                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15114                    lapack_complex_double* w, lapack_complex_double* vl,
15115                    lapack_int* ldvl, lapack_complex_double* vr,
15116                    lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15117                    double* scale, double* abnrm, double* rconde,
15118                    double* rcondv, lapack_complex_double* work,
15119                    lapack_int* lwork, double* rwork, lapack_int *info );
15120void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15121                    float* a, lapack_int* lda, float* s, float* u,
15122                    lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
15123                    lapack_int* lwork, lapack_int *info );
15124void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15125                    double* a, lapack_int* lda, double* s, double* u,
15126                    lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
15127                    lapack_int* lwork, lapack_int *info );
15128void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15129                    lapack_complex_float* a, lapack_int* lda, float* s,
15130                    lapack_complex_float* u, lapack_int* ldu,
15131                    lapack_complex_float* vt, lapack_int* ldvt,
15132                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15133                    lapack_int *info );
15134void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15135                    lapack_complex_double* a, lapack_int* lda, double* s,
15136                    lapack_complex_double* u, lapack_int* ldu,
15137                    lapack_complex_double* vt, lapack_int* ldvt,
15138                    lapack_complex_double* work, lapack_int* lwork,
15139                    double* rwork, lapack_int *info );
15140void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
15141                    lapack_int* lda, float* s, float* u, lapack_int* ldu,
15142                    float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
15143                    lapack_int* iwork, lapack_int *info );
15144void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
15145                    lapack_int* lda, double* s, double* u, lapack_int* ldu,
15146                    double* vt, lapack_int* ldvt, double* work,
15147                    lapack_int* lwork, lapack_int* iwork, lapack_int *info );
15148void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
15149                    lapack_complex_float* a, lapack_int* lda, float* s,
15150                    lapack_complex_float* u, lapack_int* ldu,
15151                    lapack_complex_float* vt, lapack_int* ldvt,
15152                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15153                    lapack_int* iwork, lapack_int *info );
15154void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
15155                    lapack_complex_double* a, lapack_int* lda, double* s,
15156                    lapack_complex_double* u, lapack_int* ldu,
15157                    lapack_complex_double* vt, lapack_int* ldvt,
15158                    lapack_complex_double* work, lapack_int* lwork,
15159                    double* rwork, lapack_int* iwork, lapack_int *info );
15160void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
15161                    char* jobp, lapack_int* m, lapack_int* n, double* a,
15162                    lapack_int* lda, double* sva, double* u, lapack_int* ldu,
15163                    double* v, lapack_int* ldv, double* work, lapack_int* lwork,
15164                    lapack_int* iwork, lapack_int *info );
15165void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
15166                    char* jobp, lapack_int* m, lapack_int* n, float* a,
15167                    lapack_int* lda, float* sva, float* u, lapack_int* ldu,
15168                    float* v, lapack_int* ldv, float* work, lapack_int* lwork,
15169                    lapack_int* iwork, lapack_int *info );
15170void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
15171                    lapack_int* n, double* a, lapack_int* lda, double* sva,
15172                    lapack_int* mv, double* v, lapack_int* ldv, double* work,
15173                    lapack_int* lwork, lapack_int *info );
15174void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
15175                    lapack_int* n, float* a, lapack_int* lda, float* sva,
15176                    lapack_int* mv, float* v, lapack_int* ldv, float* work,
15177                    lapack_int* lwork, lapack_int *info );
15178void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15179                    lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15180                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
15181                    float* alpha, float* beta, float* u, lapack_int* ldu,
15182                    float* v, lapack_int* ldv, float* q, lapack_int* ldq,
15183                    float* work, lapack_int* iwork, lapack_int *info );
15184void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15185                    lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15186                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
15187                    double* alpha, double* beta, double* u, lapack_int* ldu,
15188                    double* v, lapack_int* ldv, double* q, lapack_int* ldq,
15189                    double* work, lapack_int* iwork, lapack_int *info );
15190void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15191                    lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15192                    lapack_complex_float* a, lapack_int* lda,
15193                    lapack_complex_float* b, lapack_int* ldb, float* alpha,
15194                    float* beta, lapack_complex_float* u, lapack_int* ldu,
15195                    lapack_complex_float* v, lapack_int* ldv,
15196                    lapack_complex_float* q, lapack_int* ldq,
15197                    lapack_complex_float* work, float* rwork, lapack_int* iwork,
15198                    lapack_int *info );
15199void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15200                    lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15201                    lapack_complex_double* a, lapack_int* lda,
15202                    lapack_complex_double* b, lapack_int* ldb, double* alpha,
15203                    double* beta, lapack_complex_double* u, lapack_int* ldu,
15204                    lapack_complex_double* v, lapack_int* ldv,
15205                    lapack_complex_double* q, lapack_int* ldq,
15206                    lapack_complex_double* work, double* rwork,
15207                    lapack_int* iwork, lapack_int *info );
15208void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15209                   float* a, lapack_int* lda, float* b, lapack_int* ldb,
15210                   float* w, float* work, lapack_int* lwork, lapack_int *info );
15211void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15212                   double* a, lapack_int* lda, double* b, lapack_int* ldb,
15213                   double* w, double* work, lapack_int* lwork,
15214                   lapack_int *info );
15215void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15216                   lapack_complex_float* a, lapack_int* lda,
15217                   lapack_complex_float* b, lapack_int* ldb, float* w,
15218                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
15219                   lapack_int *info );
15220void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15221                   lapack_complex_double* a, lapack_int* lda,
15222                   lapack_complex_double* b, lapack_int* ldb, double* w,
15223                   lapack_complex_double* work, lapack_int* lwork,
15224                   double* rwork, lapack_int *info );
15225void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15226                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
15227                    float* w, float* work, lapack_int* lwork, lapack_int* iwork,
15228                    lapack_int* liwork, lapack_int *info );
15229void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15230                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
15231                    double* w, double* work, lapack_int* lwork,
15232                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15233void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15234                    lapack_complex_float* a, lapack_int* lda,
15235                    lapack_complex_float* b, lapack_int* ldb, float* w,
15236                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15237                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15238                    lapack_int *info );
15239void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15240                    lapack_complex_double* a, lapack_int* lda,
15241                    lapack_complex_double* b, lapack_int* ldb, double* w,
15242                    lapack_complex_double* work, lapack_int* lwork,
15243                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
15244                    lapack_int* liwork, lapack_int *info );
15245void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15246                    lapack_int* n, float* a, lapack_int* lda, float* b,
15247                    lapack_int* ldb, float* vl, float* vu, lapack_int* il,
15248                    lapack_int* iu, float* abstol, lapack_int* m, float* w,
15249                    float* z, lapack_int* ldz, float* work, lapack_int* lwork,
15250                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15251void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15252                    lapack_int* n, double* a, lapack_int* lda, double* b,
15253                    lapack_int* ldb, double* vl, double* vu, lapack_int* il,
15254                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
15255                    double* z, lapack_int* ldz, double* work, lapack_int* lwork,
15256                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15257void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15258                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15259                    lapack_complex_float* b, lapack_int* ldb, float* vl,
15260                    float* vu, lapack_int* il, lapack_int* iu, float* abstol,
15261                    lapack_int* m, float* w, lapack_complex_float* z,
15262                    lapack_int* ldz, lapack_complex_float* work,
15263                    lapack_int* lwork, float* rwork, lapack_int* iwork,
15264                    lapack_int* ifail, lapack_int *info );
15265void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15266                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15267                    lapack_complex_double* b, lapack_int* ldb, double* vl,
15268                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
15269                    lapack_int* m, double* w, lapack_complex_double* z,
15270                    lapack_int* ldz, lapack_complex_double* work,
15271                    lapack_int* lwork, double* rwork, lapack_int* iwork,
15272                    lapack_int* ifail, lapack_int *info );
15273void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15274                   float* ap, float* bp, float* w, float* z, lapack_int* ldz,
15275                   float* work, lapack_int *info );
15276void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15277                   double* ap, double* bp, double* w, double* z,
15278                   lapack_int* ldz, double* work, lapack_int *info );
15279void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15280                   lapack_complex_float* ap, lapack_complex_float* bp, float* w,
15281                   lapack_complex_float* z, lapack_int* ldz,
15282                   lapack_complex_float* work, float* rwork, lapack_int *info );
15283void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15284                   lapack_complex_double* ap, lapack_complex_double* bp,
15285                   double* w, lapack_complex_double* z, lapack_int* ldz,
15286                   lapack_complex_double* work, double* rwork,
15287                   lapack_int *info );
15288void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15289                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
15290                    float* work, lapack_int* lwork, lapack_int* iwork,
15291                    lapack_int* liwork, lapack_int *info );
15292void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15293                    double* ap, double* bp, double* w, double* z,
15294                    lapack_int* ldz, double* work, lapack_int* lwork,
15295                    lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15296void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15297                    lapack_complex_float* ap, lapack_complex_float* bp,
15298                    float* w, lapack_complex_float* z, lapack_int* ldz,
15299                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15300                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15301                    lapack_int *info );
15302void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15303                    lapack_complex_double* ap, lapack_complex_double* bp,
15304                    double* w, lapack_complex_double* z, lapack_int* ldz,
15305                    lapack_complex_double* work, lapack_int* lwork,
15306                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
15307                    lapack_int* liwork, lapack_int *info );
15308void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15309                    lapack_int* n, float* ap, float* bp, float* vl, float* vu,
15310                    lapack_int* il, lapack_int* iu, float* abstol,
15311                    lapack_int* m, float* w, float* z, lapack_int* ldz,
15312                    float* work, lapack_int* iwork, lapack_int* ifail,
15313                    lapack_int *info );
15314void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15315                    lapack_int* n, double* ap, double* bp, double* vl,
15316                    double* vu, lapack_int* il, lapack_int* iu, double* abstol,
15317                    lapack_int* m, double* w, double* z, lapack_int* ldz,
15318                    double* work, lapack_int* iwork, lapack_int* ifail,
15319                    lapack_int *info );
15320void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15321                    lapack_int* n, lapack_complex_float* ap,
15322                    lapack_complex_float* bp, float* vl, float* vu,
15323                    lapack_int* il, lapack_int* iu, float* abstol,
15324                    lapack_int* m, float* w, lapack_complex_float* z,
15325                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
15326                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15327void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15328                    lapack_int* n, lapack_complex_double* ap,
15329                    lapack_complex_double* bp, double* vl, double* vu,
15330                    lapack_int* il, lapack_int* iu, double* abstol,
15331                    lapack_int* m, double* w, lapack_complex_double* z,
15332                    lapack_int* ldz, lapack_complex_double* work, double* rwork,
15333                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15334void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15335                   lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
15336                   lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
15337                   float* work, lapack_int *info );
15338void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15339                   lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
15340                   lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
15341                   double* work, lapack_int *info );
15342void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15343                   lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
15344                   lapack_complex_float* bb, lapack_int* ldbb, float* w,
15345                   lapack_complex_float* z, lapack_int* ldz,
15346                   lapack_complex_float* work, float* rwork, lapack_int *info );
15347void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15348                   lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
15349                   lapack_complex_double* bb, lapack_int* ldbb, double* w,
15350                   lapack_complex_double* z, lapack_int* ldz,
15351                   lapack_complex_double* work, double* rwork,
15352                   lapack_int *info );
15353void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15354                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
15355                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
15356                    float* work, lapack_int* lwork, lapack_int* iwork,
15357                    lapack_int* liwork, lapack_int *info );
15358void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15359                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
15360                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
15361                    double* work, lapack_int* lwork, lapack_int* iwork,
15362                    lapack_int* liwork, lapack_int *info );
15363void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15364                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
15365                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
15366                    lapack_complex_float* z, lapack_int* ldz,
15367                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15368                    lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15369                    lapack_int *info );
15370void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15371                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
15372                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
15373                    lapack_complex_double* z, lapack_int* ldz,
15374                    lapack_complex_double* work, lapack_int* lwork,
15375                    double* rwork, lapack_int* lrwork, lapack_int* iwork,
15376                    lapack_int* liwork, lapack_int *info );
15377void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15378                    lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
15379                    float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
15380                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
15381                    float* abstol, lapack_int* m, float* w, float* z,
15382                    lapack_int* ldz, float* work, lapack_int* iwork,
15383                    lapack_int* ifail, lapack_int *info );
15384void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15385                    lapack_int* ka, lapack_int* kb, double* ab,
15386                    lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
15387                    lapack_int* ldq, double* vl, double* vu, lapack_int* il,
15388                    lapack_int* iu, double* abstol, lapack_int* m, double* w,
15389                    double* z, lapack_int* ldz, double* work, lapack_int* iwork,
15390                    lapack_int* ifail, lapack_int *info );
15391void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15392                    lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
15393                    lapack_int* ldab, lapack_complex_float* bb,
15394                    lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
15395                    float* vl, float* vu, lapack_int* il, lapack_int* iu,
15396                    float* abstol, lapack_int* m, float* w,
15397                    lapack_complex_float* z, lapack_int* ldz,
15398                    lapack_complex_float* work, float* rwork, lapack_int* iwork,
15399                    lapack_int* ifail, lapack_int *info );
15400void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15401                    lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
15402                    lapack_int* ldab, lapack_complex_double* bb,
15403                    lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
15404                    double* vl, double* vu, lapack_int* il, lapack_int* iu,
15405                    double* abstol, lapack_int* m, double* w,
15406                    lapack_complex_double* z, lapack_int* ldz,
15407                    lapack_complex_double* work, double* rwork,
15408                    lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15409void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
15410                   LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
15411                   lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
15412                   float* alphar, float* alphai, float* beta, float* vsl,
15413                   lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
15414                   float* work, lapack_int* lwork, lapack_logical* bwork,
15415                   lapack_int *info );
15416void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
15417                   LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
15418                   lapack_int* lda, double* b, lapack_int* ldb,
15419                   lapack_int* sdim, double* alphar, double* alphai,
15420                   double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
15421                   lapack_int* ldvsr, double* work, lapack_int* lwork,
15422                   lapack_logical* bwork, lapack_int *info );
15423void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
15424                   LAPACK_C_SELECT2 selctg, lapack_int* n,
15425                   lapack_complex_float* a, lapack_int* lda,
15426                   lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
15427                   lapack_complex_float* alpha, lapack_complex_float* beta,
15428                   lapack_complex_float* vsl, lapack_int* ldvsl,
15429                   lapack_complex_float* vsr, lapack_int* ldvsr,
15430                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
15431                   lapack_logical* bwork, lapack_int *info );
15432void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
15433                   LAPACK_Z_SELECT2 selctg, lapack_int* n,
15434                   lapack_complex_double* a, lapack_int* lda,
15435                   lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
15436                   lapack_complex_double* alpha, lapack_complex_double* beta,
15437                   lapack_complex_double* vsl, lapack_int* ldvsl,
15438                   lapack_complex_double* vsr, lapack_int* ldvsr,
15439                   lapack_complex_double* work, lapack_int* lwork,
15440                   double* rwork, lapack_logical* bwork, lapack_int *info );
15441void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
15442                    LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
15443                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
15444                    lapack_int* sdim, float* alphar, float* alphai, float* beta,
15445                    float* vsl, lapack_int* ldvsl, float* vsr,
15446                    lapack_int* ldvsr, float* rconde, float* rcondv,
15447                    float* work, lapack_int* lwork, lapack_int* iwork,
15448                    lapack_int* liwork, lapack_logical* bwork,
15449                    lapack_int *info );
15450void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
15451                    LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
15452                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
15453                    lapack_int* sdim, double* alphar, double* alphai,
15454                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
15455                    lapack_int* ldvsr, double* rconde, double* rcondv,
15456                    double* work, lapack_int* lwork, lapack_int* iwork,
15457                    lapack_int* liwork, lapack_logical* bwork,
15458                    lapack_int *info );
15459void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
15460                    LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
15461                    lapack_complex_float* a, lapack_int* lda,
15462                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
15463                    lapack_complex_float* alpha, lapack_complex_float* beta,
15464                    lapack_complex_float* vsl, lapack_int* ldvsl,
15465                    lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
15466                    float* rcondv, lapack_complex_float* work,
15467                    lapack_int* lwork, float* rwork, lapack_int* iwork,
15468                    lapack_int* liwork, lapack_logical* bwork,
15469                    lapack_int *info );
15470void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
15471                    LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
15472                    lapack_complex_double* a, lapack_int* lda,
15473                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
15474                    lapack_complex_double* alpha, lapack_complex_double* beta,
15475                    lapack_complex_double* vsl, lapack_int* ldvsl,
15476                    lapack_complex_double* vsr, lapack_int* ldvsr,
15477                    double* rconde, double* rcondv, lapack_complex_double* work,
15478                    lapack_int* lwork, double* rwork, lapack_int* iwork,
15479                    lapack_int* liwork, lapack_logical* bwork,
15480                    lapack_int *info );
15481void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
15482                   lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
15483                   float* alphai, float* beta, float* vl, lapack_int* ldvl,
15484                   float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
15485                   lapack_int *info );
15486void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
15487                   lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
15488                   double* alphai, double* beta, double* vl, lapack_int* ldvl,
15489                   double* vr, lapack_int* ldvr, double* work,
15490                   lapack_int* lwork, lapack_int *info );
15491void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
15492                   lapack_complex_float* a, lapack_int* lda,
15493                   lapack_complex_float* b, lapack_int* ldb,
15494                   lapack_complex_float* alpha, lapack_complex_float* beta,
15495                   lapack_complex_float* vl, lapack_int* ldvl,
15496                   lapack_complex_float* vr, lapack_int* ldvr,
15497                   lapack_complex_float* work, lapack_int* lwork, float* rwork,
15498                   lapack_int *info );
15499void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
15500                   lapack_complex_double* a, lapack_int* lda,
15501                   lapack_complex_double* b, lapack_int* ldb,
15502                   lapack_complex_double* alpha, lapack_complex_double* beta,
15503                   lapack_complex_double* vl, lapack_int* ldvl,
15504                   lapack_complex_double* vr, lapack_int* ldvr,
15505                   lapack_complex_double* work, lapack_int* lwork,
15506                   double* rwork, lapack_int *info );
15507void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15508                    lapack_int* n, float* a, lapack_int* lda, float* b,
15509                    lapack_int* ldb, float* alphar, float* alphai, float* beta,
15510                    float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
15511                    lapack_int* ilo, lapack_int* ihi, float* lscale,
15512                    float* rscale, float* abnrm, float* bbnrm, float* rconde,
15513                    float* rcondv, float* work, lapack_int* lwork,
15514                    lapack_int* iwork, lapack_logical* bwork,
15515                    lapack_int *info );
15516void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15517                    lapack_int* n, double* a, lapack_int* lda, double* b,
15518                    lapack_int* ldb, double* alphar, double* alphai,
15519                    double* beta, double* vl, lapack_int* ldvl, double* vr,
15520                    lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15521                    double* lscale, double* rscale, double* abnrm,
15522                    double* bbnrm, double* rconde, double* rcondv, double* work,
15523                    lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
15524                    lapack_int *info );
15525void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15526                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15527                    lapack_complex_float* b, lapack_int* ldb,
15528                    lapack_complex_float* alpha, lapack_complex_float* beta,
15529                    lapack_complex_float* vl, lapack_int* ldvl,
15530                    lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
15531                    lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
15532                    float* bbnrm, float* rconde, float* rcondv,
15533                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15534                    lapack_int* iwork, lapack_logical* bwork,
15535                    lapack_int *info );
15536void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15537                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15538                    lapack_complex_double* b, lapack_int* ldb,
15539                    lapack_complex_double* alpha, lapack_complex_double* beta,
15540                    lapack_complex_double* vl, lapack_int* ldvl,
15541                    lapack_complex_double* vr, lapack_int* ldvr,
15542                    lapack_int* ilo, lapack_int* ihi, double* lscale,
15543                    double* rscale, double* abnrm, double* bbnrm,
15544                    double* rconde, double* rcondv, lapack_complex_double* work,
15545                    lapack_int* lwork, double* rwork, lapack_int* iwork,
15546                    lapack_logical* bwork, lapack_int *info );
15547void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15548                   lapack_int* k, double* alpha, const double* a,
15549                   lapack_int* lda, double* beta, double* c );
15550void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15551                   lapack_int* k, float* alpha, const float* a, lapack_int* lda,
15552                   float* beta, float* c );
15553void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15554                   lapack_int* k, double* alpha, const lapack_complex_double* a,
15555                   lapack_int* lda, double* beta, lapack_complex_double* c );
15556void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15557                   lapack_int* k, float* alpha, const lapack_complex_float* a,
15558                   lapack_int* lda, float* beta, lapack_complex_float* c );
15559void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
15560                   char* diag, lapack_int* m, lapack_int* n, double* alpha,
15561                   const double* a, double* b, lapack_int* ldb );
15562void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
15563                   char* diag, lapack_int* m, lapack_int* n, float* alpha,
15564                   const float* a, float* b, lapack_int* ldb );
15565void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
15566                   char* diag, lapack_int* m, lapack_int* n,
15567                   lapack_complex_double* alpha, const lapack_complex_double* a,
15568                   lapack_complex_double* b, lapack_int* ldb );
15569void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
15570                   char* diag, lapack_int* m, lapack_int* n,
15571                   lapack_complex_float* alpha, const lapack_complex_float* a,
15572                   lapack_complex_float* b, lapack_int* ldb );
15573void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
15574                    double* ap, lapack_int *info );
15575void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
15576                    float* ap, lapack_int *info );
15577void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
15578                    const lapack_complex_double* arf, lapack_complex_double* ap,
15579                    lapack_int *info );
15580void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
15581                    const lapack_complex_float* arf, lapack_complex_float* ap,
15582                    lapack_int *info );
15583void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
15584                    double* a, lapack_int* lda, lapack_int *info );
15585void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
15586                    float* a, lapack_int* lda, lapack_int *info );
15587void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
15588                    const lapack_complex_double* arf, lapack_complex_double* a,
15589                    lapack_int* lda, lapack_int *info );
15590void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
15591                    const lapack_complex_float* arf, lapack_complex_float* a,
15592                    lapack_int* lda, lapack_int *info );
15593void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
15594                    double* arf, lapack_int *info );
15595void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
15596                    float* arf, lapack_int *info );
15597void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
15598                    const lapack_complex_double* ap, lapack_complex_double* arf,
15599                    lapack_int *info );
15600void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
15601                    const lapack_complex_float* ap, lapack_complex_float* arf,
15602                    lapack_int *info );
15603void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
15604                    lapack_int* lda, lapack_int *info );
15605void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
15606                    lapack_int* lda, lapack_int *info );
15607void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
15608                    lapack_complex_double* a, lapack_int* lda,
15609                    lapack_int *info );
15610void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
15611                    lapack_complex_float* a, lapack_int* lda,
15612                    lapack_int *info );
15613void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
15614                    lapack_int* lda, double* arf, lapack_int *info );
15615void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
15616                    lapack_int* lda, float* arf, lapack_int *info );
15617void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
15618                    const lapack_complex_double* a, lapack_int* lda,
15619                    lapack_complex_double* arf, lapack_int *info );
15620void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
15621                    const lapack_complex_float* a, lapack_int* lda,
15622                    lapack_complex_float* arf, lapack_int *info );
15623void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
15624                    double* ap, lapack_int *info );
15625void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
15626                    float* ap, lapack_int *info );
15627void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
15628                    lapack_int* lda, lapack_complex_double* ap,
15629                    lapack_int *info );
15630void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
15631                    lapack_int* lda, lapack_complex_float* ap,
15632                    lapack_int *info );
15633void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15634                     float* tau, float* work, lapack_int* lwork,
15635                     lapack_int *info );
15636void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15637                     double* tau, double* work, lapack_int* lwork,
15638                     lapack_int *info );
15639void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15640                     lapack_int* lda, lapack_complex_float* tau,
15641                     lapack_complex_float* work, lapack_int* lwork,
15642                     lapack_int *info );
15643void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15644                     lapack_int* lda, lapack_complex_double* tau,
15645                     lapack_complex_double* work, lapack_int* lwork,
15646                     lapack_int *info );
15647void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
15648void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
15649void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15650                    float* x );
15651void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15652                    double* x );
15653void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15654                    lapack_complex_float* x );
15655void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15656                    lapack_complex_double* x );
15657void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15658                    float* tau, float* work, lapack_int *info );
15659void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15660                    double* tau, double* work, lapack_int *info );
15661void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15662                    lapack_int* lda, lapack_complex_float* tau,
15663                    lapack_complex_float* work, lapack_int *info );
15664void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15665                    lapack_int* lda, lapack_complex_double* tau,
15666                    lapack_complex_double* work, lapack_int *info );
15667void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
15668                    lapack_int* lda, float* b, lapack_int* ldb );
15669void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
15670                    lapack_int* lda, double* b, lapack_int* ldb );
15671void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
15672                    const lapack_complex_float* a, lapack_int* lda,
15673                    lapack_complex_float* b, lapack_int* ldb );
15674void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
15675                    const lapack_complex_double* a, lapack_int* lda,
15676                    lapack_complex_double* b, lapack_int* ldb );
15677void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15678                    lapack_int* ipiv, lapack_int *info );
15679void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15680                    lapack_int* ipiv, lapack_int *info );
15681void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15682                    lapack_int* lda, lapack_int* ipiv, lapack_int *info );
15683void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15684                    lapack_int* lda, lapack_int* ipiv, lapack_int *info );
15685void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
15686                    lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
15687void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
15688                    lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
15689void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15690                    lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
15691                    lapack_int* incx );
15692void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15693                    lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
15694                    lapack_int* incx );
15695float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
15696                    lapack_int* lda, float* work );
15697double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
15698                    lapack_int* lda, double* work );
15699float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
15700                    const lapack_complex_float* a, lapack_int* lda, float* work );
15701double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
15702                    const lapack_complex_double* a, lapack_int* lda, double* work );
15703float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
15704                    const lapack_complex_float* a, lapack_int* lda, float* work );
15705double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
15706                    const lapack_complex_double* a, lapack_int* lda, double* work );
15707float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
15708                    lapack_int* lda, float* work );
15709double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
15710                    lapack_int* lda, double* work );
15711float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
15712                    const lapack_complex_float* a, lapack_int* lda, float* work );
15713double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
15714                    const lapack_complex_double* a, lapack_int* lda, double* work );
15715float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
15716                    lapack_int* n, const float* a, lapack_int* lda, float* work );
15717double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
15718                    lapack_int* n, const double* a, lapack_int* lda, double* work );
15719float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
15720                    lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
15721                    float* work );
15722double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
15723                    lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
15724                    double* work );
15725float LAPACK_slamch( char* cmach );
15726double LAPACK_dlamch( char* cmach );
15727void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15728                    float* tau, float* work, lapack_int *info );
15729void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15730                    double* tau, double* work, lapack_int *info );
15731void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15732                    lapack_int* lda, lapack_complex_float* tau,
15733                    lapack_complex_float* work, lapack_int *info );
15734void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15735                    lapack_int* lda, lapack_complex_double* tau,
15736                    lapack_complex_double* work, lapack_int *info );
15737void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
15738                    lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
15739                    lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
15740                    lapack_int* ldc, float* work, lapack_int* ldwork );
15741void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
15742                    lapack_int* m, lapack_int* n, lapack_int* k,
15743                    const double* v, lapack_int* ldv, const double* t,
15744                    lapack_int* ldt, double* c, lapack_int* ldc, double* work,
15745                    lapack_int* ldwork );
15746void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
15747                    lapack_int* m, lapack_int* n, lapack_int* k,
15748                    const lapack_complex_float* v, lapack_int* ldv,
15749                    const lapack_complex_float* t, lapack_int* ldt,
15750                    lapack_complex_float* c, lapack_int* ldc,
15751                    lapack_complex_float* work, lapack_int* ldwork );
15752void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
15753                    lapack_int* m, lapack_int* n, lapack_int* k,
15754                    const lapack_complex_double* v, lapack_int* ldv,
15755                    const lapack_complex_double* t, lapack_int* ldt,
15756                    lapack_complex_double* c, lapack_int* ldc,
15757                    lapack_complex_double* work, lapack_int* ldwork );
15758void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
15759                    float* tau );
15760void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
15761                    double* tau );
15762void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
15763                    lapack_complex_float* x, lapack_int* incx,
15764                    lapack_complex_float* tau );
15765void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
15766                    lapack_complex_double* x, lapack_int* incx,
15767                    lapack_complex_double* tau );
15768void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15769                    const float* v, lapack_int* ldv, const float* tau, float* t,
15770                    lapack_int* ldt );
15771void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15772                    const double* v, lapack_int* ldv, const double* tau,
15773                    double* t, lapack_int* ldt );
15774void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15775                    const lapack_complex_float* v, lapack_int* ldv,
15776                    const lapack_complex_float* tau, lapack_complex_float* t,
15777                    lapack_int* ldt );
15778void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15779                    const lapack_complex_double* v, lapack_int* ldv,
15780                    const lapack_complex_double* tau, lapack_complex_double* t,
15781                    lapack_int* ldt );
15782void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
15783                    float* tau, float* c, lapack_int* ldc, float* work );
15784void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
15785                    double* tau, double* c, lapack_int* ldc, double* work );
15786void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
15787                    const lapack_complex_float* v, lapack_complex_float* tau,
15788                    lapack_complex_float* c, lapack_int* ldc,
15789                    lapack_complex_float* work );
15790void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
15791                    const lapack_complex_double* v, lapack_complex_double* tau,
15792                    lapack_complex_double* c, lapack_int* ldc,
15793                    lapack_complex_double* work );
15794void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15795                    char* sym, float* d, lapack_int* mode, float* cond,
15796                    float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15797                    float* a, lapack_int* lda, float* work, lapack_int *info );
15798void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15799                    char* sym, double* d, lapack_int* mode, double* cond,
15800                    double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15801                    double* a, lapack_int* lda, double* work,
15802                    lapack_int *info );
15803void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15804                    char* sym, float* d, lapack_int* mode, float* cond,
15805                    float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15806                    lapack_complex_float* a, lapack_int* lda,
15807                    lapack_complex_float* work, lapack_int *info );
15808void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15809                    char* sym, double* d, lapack_int* mode, double* cond,
15810                    double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15811                    lapack_complex_double* a, lapack_int* lda,
15812                    lapack_complex_double* work, lapack_int *info );
15813void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
15814                    lapack_int* ldsa, double* a, lapack_int* lda,
15815                    lapack_int *info );
15816void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
15817                    lapack_int* lda, float* sa, lapack_int* ldsa,
15818                    lapack_int *info );
15819void LAPACK_clag2z( lapack_int* m, lapack_int* n,
15820                    const lapack_complex_float* sa, lapack_int* ldsa,
15821                    lapack_complex_double* a, lapack_int* lda,
15822                    lapack_int *info );
15823void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
15824                    const lapack_complex_double* a, lapack_int* lda,
15825                    lapack_complex_float* sa, lapack_int* ldsa,
15826                    lapack_int *info );
15827void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
15828                    lapack_int *info );
15829void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
15830                    lapack_int *info );
15831void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
15832                    lapack_int* lda, lapack_int *info );
15833void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
15834                    lapack_int* lda, lapack_int *info );
15835void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15836                    lapack_int* ku, const float* d, float* a, lapack_int* lda,
15837                    lapack_int* iseed, float* work, lapack_int *info );
15838void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15839                    lapack_int* ku, const double* d, double* a, lapack_int* lda,
15840                    lapack_int* iseed, double* work, lapack_int *info );
15841void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15842                    lapack_int* ku, const float* d, lapack_complex_float* a,
15843                    lapack_int* lda, lapack_int* iseed,
15844                    lapack_complex_float* work, lapack_int *info );
15845void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15846                    lapack_int* ku, const double* d, lapack_complex_double* a,
15847                    lapack_int* lda, lapack_int* iseed,
15848                    lapack_complex_double* work, lapack_int *info );
15849void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
15850                    float* beta, float* a, lapack_int* lda );
15851void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
15852                    double* beta, double* a, lapack_int* lda );
15853void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
15854                    lapack_complex_float* alpha, lapack_complex_float* beta,
15855                    lapack_complex_float* a, lapack_int* lda );
15856void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
15857                    lapack_complex_double* alpha, lapack_complex_double* beta,
15858                    lapack_complex_double* a, lapack_int* lda );
15859void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
15860void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
15861void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
15862                    lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
15863                    lapack_complex_float* work, lapack_int *info );
15864void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
15865                    lapack_complex_double* a, lapack_int* lda,
15866                    lapack_int* iseed, lapack_complex_double* work,
15867                    lapack_int *info );
15868void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
15869                    lapack_int* lda, lapack_int* iseed, float* work,
15870                    lapack_int *info );
15871void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
15872                    lapack_int* lda, lapack_int* iseed, double* work,
15873                    lapack_int *info );
15874void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
15875                    lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
15876                    lapack_complex_float* work, lapack_int *info );
15877void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
15878                    lapack_complex_double* a, lapack_int* lda,
15879                    lapack_int* iseed, lapack_complex_double* work,
15880                    lapack_int *info );
15881void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15882                    float* x, lapack_int* ldx, lapack_int* k );
15883void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15884                    double* x, lapack_int* ldx, lapack_int* k );
15885void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15886                    lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
15887void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15888                    lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
15889float LAPACK_slapy2( float* x, float* y );
15890double LAPACK_dlapy2( double* x, double* y );
15891float LAPACK_slapy3( float* x, float* y, float* z );
15892double LAPACK_dlapy3( double* x, double* y, double* z );
15893void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
15894void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
15895void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
15896void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
15897                     double* sn );
15898// LAPACK 3.3.0
15899void LAPACK_cbbcsd( char* jobu1, char* jobu2,
15900                    char* jobv1t, char* jobv2t, char* trans,
15901                    lapack_int* m, lapack_int* p, lapack_int* q,
15902                    float* theta, float* phi,
15903                    lapack_complex_float* u1, lapack_int* ldu1,
15904                    lapack_complex_float* u2, lapack_int* ldu2,
15905                    lapack_complex_float* v1t, lapack_int* ldv1t,
15906                    lapack_complex_float* v2t, lapack_int* ldv2t,
15907                    float* b11d, float* b11e, float* b12d,
15908                    float* b12e, float* b21d, float* b21e,
15909                    float* b22d, float* b22e, float* rwork,
15910                    lapack_int* lrwork , lapack_int *info );
15911void LAPACK_cheswapr( char* uplo, lapack_int* n,
15912                      lapack_complex_float* a, lapack_int* i1,
15913                      lapack_int* i2 );
15914void LAPACK_chetri2( char* uplo, lapack_int* n,
15915                     lapack_complex_float* a, lapack_int* lda,
15916                     const lapack_int* ipiv,
15917                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15918void LAPACK_chetri2x( char* uplo, lapack_int* n,
15919                      lapack_complex_float* a, lapack_int* lda,
15920                      const lapack_int* ipiv,
15921                      lapack_complex_float* work, lapack_int* nb , lapack_int *info );
15922void LAPACK_chetrs2( char* uplo, lapack_int* n,
15923                     lapack_int* nrhs, const lapack_complex_float* a,
15924                     lapack_int* lda, const lapack_int* ipiv,
15925                     lapack_complex_float* b, lapack_int* ldb,
15926                     lapack_complex_float* work , lapack_int *info );
15927void LAPACK_csyconv( char* uplo, char* way,
15928                     lapack_int* n, lapack_complex_float* a,
15929                     lapack_int* lda, const lapack_int* ipiv,
15930                     lapack_complex_float* work , lapack_int *info );
15931void LAPACK_csyswapr( char* uplo, lapack_int* n,
15932                      lapack_complex_float* a, lapack_int* i1,
15933                      lapack_int* i2 );
15934void LAPACK_csytri2( char* uplo, lapack_int* n,
15935                     lapack_complex_float* a, lapack_int* lda,
15936                     const lapack_int* ipiv,
15937                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15938void LAPACK_csytri2x( char* uplo, lapack_int* n,
15939                      lapack_complex_float* a, lapack_int* lda,
15940                      const lapack_int* ipiv,
15941                      lapack_complex_float* work, lapack_int* nb , lapack_int *info );
15942void LAPACK_csytrs2( char* uplo, lapack_int* n,
15943                     lapack_int* nrhs, const lapack_complex_float* a,
15944                     lapack_int* lda, const lapack_int* ipiv,
15945                     lapack_complex_float* b, lapack_int* ldb,
15946                     lapack_complex_float* work , lapack_int *info );
15947void LAPACK_cunbdb( char* trans, char* signs,
15948                    lapack_int* m, lapack_int* p, lapack_int* q,
15949                    lapack_complex_float* x11, lapack_int* ldx11,
15950                    lapack_complex_float* x12, lapack_int* ldx12,
15951                    lapack_complex_float* x21, lapack_int* ldx21,
15952                    lapack_complex_float* x22, lapack_int* ldx22,
15953                    float* theta, float* phi,
15954                    lapack_complex_float* taup1,
15955                    lapack_complex_float* taup2,
15956                    lapack_complex_float* tauq1,
15957                    lapack_complex_float* tauq2,
15958                    lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15959void LAPACK_cuncsd( char* jobu1, char* jobu2,
15960                    char* jobv1t, char* jobv2t, char* trans,
15961                    char* signs, lapack_int* m, lapack_int* p,
15962                    lapack_int* q, lapack_complex_float* x11,
15963                    lapack_int* ldx11, lapack_complex_float* x12,
15964                    lapack_int* ldx12, lapack_complex_float* x21,
15965                    lapack_int* ldx21, lapack_complex_float* x22,
15966                    lapack_int* ldx22, float* theta,
15967                    lapack_complex_float* u1, lapack_int* ldu1,
15968                    lapack_complex_float* u2, lapack_int* ldu2,
15969                    lapack_complex_float* v1t, lapack_int* ldv1t,
15970                    lapack_complex_float* v2t, lapack_int* ldv2t,
15971                    lapack_complex_float* work, lapack_int* lwork,
15972                    float* rwork, lapack_int* lrwork,
15973                    lapack_int* iwork , lapack_int *info );
15974void LAPACK_dbbcsd( char* jobu1, char* jobu2,
15975                    char* jobv1t, char* jobv2t, char* trans,
15976                    lapack_int* m, lapack_int* p, lapack_int* q,
15977                    double* theta, double* phi, double* u1,
15978                    lapack_int* ldu1, double* u2, lapack_int* ldu2,
15979                    double* v1t, lapack_int* ldv1t, double* v2t,
15980                    lapack_int* ldv2t, double* b11d, double* b11e,
15981                    double* b12d, double* b12e, double* b21d,
15982                    double* b21e, double* b22d, double* b22e,
15983                    double* work, lapack_int* lwork , lapack_int *info );
15984void LAPACK_dorbdb( char* trans, char* signs,
15985                    lapack_int* m, lapack_int* p, lapack_int* q,
15986                    double* x11, lapack_int* ldx11, double* x12,
15987                    lapack_int* ldx12, double* x21, lapack_int* ldx21,
15988                    double* x22, lapack_int* ldx22, double* theta,
15989                    double* phi, double* taup1, double* taup2,
15990                    double* tauq1, double* tauq2, double* work,
15991                    lapack_int* lwork , lapack_int *info );
15992void LAPACK_dorcsd( char* jobu1, char* jobu2,
15993                    char* jobv1t, char* jobv2t, char* trans,
15994                    char* signs, lapack_int* m, lapack_int* p,
15995                    lapack_int* q, double* x11, lapack_int* ldx11,
15996                    double* x12, lapack_int* ldx12, double* x21,
15997                    lapack_int* ldx21, double* x22, lapack_int* ldx22,
15998                    double* theta, double* u1, lapack_int* ldu1,
15999                    double* u2, lapack_int* ldu2, double* v1t,
16000                    lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
16001                    double* work, lapack_int* lwork,
16002                    lapack_int* iwork , lapack_int *info );
16003void LAPACK_dsyconv( char* uplo, char* way,
16004                     lapack_int* n, double* a, lapack_int* lda,
16005                     const lapack_int* ipiv, double* work , lapack_int *info );
16006void LAPACK_dsyswapr( char* uplo, lapack_int* n,
16007                      double* a, lapack_int* i1, lapack_int* i2 );
16008void LAPACK_dsytri2( char* uplo, lapack_int* n,
16009                     double* a, lapack_int* lda,
16010                     const lapack_int* ipiv,
16011                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16012void LAPACK_dsytri2x( char* uplo, lapack_int* n,
16013                      double* a, lapack_int* lda,
16014                      const lapack_int* ipiv, double* work,
16015                      lapack_int* nb , lapack_int *info );
16016void LAPACK_dsytrs2( char* uplo, lapack_int* n,
16017                     lapack_int* nrhs, const double* a,
16018                     lapack_int* lda, const lapack_int* ipiv,
16019                     double* b, lapack_int* ldb, double* work , lapack_int *info );
16020void LAPACK_sbbcsd( char* jobu1, char* jobu2,
16021                    char* jobv1t, char* jobv2t, char* trans,
16022                    lapack_int* m, lapack_int* p, lapack_int* q,
16023                    float* theta, float* phi, float* u1,
16024                    lapack_int* ldu1, float* u2, lapack_int* ldu2,
16025                    float* v1t, lapack_int* ldv1t, float* v2t,
16026                    lapack_int* ldv2t, float* b11d, float* b11e,
16027                    float* b12d, float* b12e, float* b21d,
16028                    float* b21e, float* b22d, float* b22e,
16029                    float* work, lapack_int* lwork , lapack_int *info );
16030void LAPACK_sorbdb( char* trans, char* signs,
16031                    lapack_int* m, lapack_int* p, lapack_int* q,
16032                    float* x11, lapack_int* ldx11, float* x12,
16033                    lapack_int* ldx12, float* x21, lapack_int* ldx21,
16034                    float* x22, lapack_int* ldx22, float* theta,
16035                    float* phi, float* taup1, float* taup2,
16036                    float* tauq1, float* tauq2, float* work,
16037                    lapack_int* lwork , lapack_int *info );
16038void LAPACK_sorcsd( char* jobu1, char* jobu2,
16039                    char* jobv1t, char* jobv2t, char* trans,
16040                    char* signs, lapack_int* m, lapack_int* p,
16041                    lapack_int* q, float* x11, lapack_int* ldx11,
16042                    float* x12, lapack_int* ldx12, float* x21,
16043                    lapack_int* ldx21, float* x22, lapack_int* ldx22,
16044                    float* theta, float* u1, lapack_int* ldu1,
16045                    float* u2, lapack_int* ldu2, float* v1t,
16046                    lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
16047                    float* work, lapack_int* lwork,
16048                    lapack_int* iwork , lapack_int *info );
16049void LAPACK_ssyconv( char* uplo, char* way,
16050                     lapack_int* n, float* a, lapack_int* lda,
16051                     const lapack_int* ipiv, float* work , lapack_int *info );
16052void LAPACK_ssyswapr( char* uplo, lapack_int* n,
16053                      float* a, lapack_int* i1, lapack_int* i2 );
16054void LAPACK_ssytri2( char* uplo, lapack_int* n,
16055                     float* a, lapack_int* lda,
16056                     const lapack_int* ipiv,
16057                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
16058void LAPACK_ssytri2x( char* uplo, lapack_int* n,
16059                      float* a, lapack_int* lda,
16060                      const lapack_int* ipiv, float* work,
16061                      lapack_int* nb , lapack_int *info );
16062void LAPACK_ssytrs2( char* uplo, lapack_int* n,
16063                     lapack_int* nrhs, const float* a,
16064                     lapack_int* lda, const lapack_int* ipiv,
16065                     float* b, lapack_int* ldb, float* work , lapack_int *info );
16066void LAPACK_zbbcsd( char* jobu1, char* jobu2,
16067                    char* jobv1t, char* jobv2t, char* trans,
16068                    lapack_int* m, lapack_int* p, lapack_int* q,
16069                    double* theta, double* phi,
16070                    lapack_complex_double* u1, lapack_int* ldu1,
16071                    lapack_complex_double* u2, lapack_int* ldu2,
16072                    lapack_complex_double* v1t, lapack_int* ldv1t,
16073                    lapack_complex_double* v2t, lapack_int* ldv2t,
16074                    double* b11d, double* b11e, double* b12d,
16075                    double* b12e, double* b21d, double* b21e,
16076                    double* b22d, double* b22e, double* rwork,
16077                    lapack_int* lrwork , lapack_int *info );
16078void LAPACK_zheswapr( char* uplo, lapack_int* n,
16079                      lapack_complex_double* a, lapack_int* i1,
16080                      lapack_int* i2 );
16081void LAPACK_zhetri2( char* uplo, lapack_int* n,
16082                     lapack_complex_double* a, lapack_int* lda,
16083                     const lapack_int* ipiv,
16084                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16085void LAPACK_zhetri2x( char* uplo, lapack_int* n,
16086                      lapack_complex_double* a, lapack_int* lda,
16087                      const lapack_int* ipiv,
16088                      lapack_complex_double* work, lapack_int* nb , lapack_int *info );
16089void LAPACK_zhetrs2( char* uplo, lapack_int* n,
16090                     lapack_int* nrhs,
16091                     const lapack_complex_double* a, lapack_int* lda,
16092                     const lapack_int* ipiv,
16093                     lapack_complex_double* b, lapack_int* ldb,
16094                     lapack_complex_double* work , lapack_int *info );
16095void LAPACK_zsyconv( char* uplo, char* way,
16096                     lapack_int* n, lapack_complex_double* a,
16097                     lapack_int* lda, const lapack_int* ipiv,
16098                     lapack_complex_double* work , lapack_int *info );
16099void LAPACK_zsyswapr( char* uplo, lapack_int* n,
16100                      lapack_complex_double* a, lapack_int* i1,
16101                      lapack_int* i2 );
16102void LAPACK_zsytri2( char* uplo, lapack_int* n,
16103                     lapack_complex_double* a, lapack_int* lda,
16104                     const lapack_int* ipiv,
16105                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16106void LAPACK_zsytri2x( char* uplo, lapack_int* n,
16107                      lapack_complex_double* a, lapack_int* lda,
16108                      const lapack_int* ipiv,
16109                      lapack_complex_double* work, lapack_int* nb , lapack_int *info );
16110void LAPACK_zsytrs2( char* uplo, lapack_int* n,
16111                     lapack_int* nrhs,
16112                     const lapack_complex_double* a, lapack_int* lda,
16113                     const lapack_int* ipiv,
16114                     lapack_complex_double* b, lapack_int* ldb,
16115                     lapack_complex_double* work , lapack_int *info );
16116void LAPACK_zunbdb( char* trans, char* signs,
16117                    lapack_int* m, lapack_int* p, lapack_int* q,
16118                    lapack_complex_double* x11, lapack_int* ldx11,
16119                    lapack_complex_double* x12, lapack_int* ldx12,
16120                    lapack_complex_double* x21, lapack_int* ldx21,
16121                    lapack_complex_double* x22, lapack_int* ldx22,
16122                    double* theta, double* phi,
16123                    lapack_complex_double* taup1,
16124                    lapack_complex_double* taup2,
16125                    lapack_complex_double* tauq1,
16126                    lapack_complex_double* tauq2,
16127                    lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16128void LAPACK_zuncsd( char* jobu1, char* jobu2,
16129                    char* jobv1t, char* jobv2t, char* trans,
16130                    char* signs, lapack_int* m, lapack_int* p,
16131                    lapack_int* q, lapack_complex_double* x11,
16132                    lapack_int* ldx11, lapack_complex_double* x12,
16133                    lapack_int* ldx12, lapack_complex_double* x21,
16134                    lapack_int* ldx21, lapack_complex_double* x22,
16135                    lapack_int* ldx22, double* theta,
16136                    lapack_complex_double* u1, lapack_int* ldu1,
16137                    lapack_complex_double* u2, lapack_int* ldu2,
16138                    lapack_complex_double* v1t, lapack_int* ldv1t,
16139                    lapack_complex_double* v2t, lapack_int* ldv2t,
16140                    lapack_complex_double* work, lapack_int* lwork,
16141                    double* rwork, lapack_int* lrwork,
16142                    lapack_int* iwork , lapack_int *info );
16143// LAPACK 3.4.0
16144void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16145                     lapack_int* k, lapack_int* nb, const float* v,
16146                     lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
16147                     lapack_int* ldc, float* work, lapack_int *info );
16148void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16149                     lapack_int* k, lapack_int* nb, const double* v,
16150                     lapack_int* ldv, const double* t, lapack_int* ldt,
16151                     double* c, lapack_int* ldc, double* work,
16152                     lapack_int *info );
16153void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16154                     lapack_int* k, lapack_int* nb,
16155                     const lapack_complex_float* v, lapack_int* ldv,
16156                     const lapack_complex_float* t, lapack_int* ldt,
16157                     lapack_complex_float* c, lapack_int* ldc,
16158                     lapack_complex_float* work, lapack_int *info );
16159void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16160                     lapack_int* k, lapack_int* nb,
16161                     const lapack_complex_double* v, lapack_int* ldv,
16162                     const lapack_complex_double* t, lapack_int* ldt,
16163                     lapack_complex_double* c, lapack_int* ldc,
16164                     lapack_complex_double* work, lapack_int *info );
16165void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
16166                    lapack_int* lda, float* t, lapack_int* ldt, float* work,
16167                    lapack_int *info );
16168void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
16169                    lapack_int* lda, double* t, lapack_int* ldt, double* work,
16170                    lapack_int *info );
16171void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
16172                    lapack_complex_float* a, lapack_int* lda,
16173                    lapack_complex_float* t, lapack_int* ldt,
16174                    lapack_complex_float* work, lapack_int *info );
16175void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
16176                    lapack_complex_double* a, lapack_int* lda,
16177                    lapack_complex_double* t, lapack_int* ldt,
16178                    lapack_complex_double* work, lapack_int *info );
16179void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16180                     float* t, lapack_int* ldt, lapack_int *info );
16181void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16182                     double* t, lapack_int* ldt, lapack_int *info );
16183void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16184                     lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
16185                     lapack_int *info );
16186void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16187                     lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
16188                     lapack_int *info );
16189void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16190                     float* t, lapack_int* ldt, lapack_int *info );
16191void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16192                     double* t, lapack_int* ldt, lapack_int *info );
16193void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16194                     lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
16195                     lapack_int *info );
16196void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16197                     lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
16198                     lapack_int *info );
16199void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16200                     lapack_int* k, lapack_int* l, lapack_int* nb,
16201                     const float* v, lapack_int* ldv, const float* t,
16202                     lapack_int* ldt, float* a, lapack_int* lda, float* b,
16203                     lapack_int* ldb, float* work, lapack_int *info );
16204void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16205                     lapack_int* k, lapack_int* l, lapack_int* nb,
16206                     const double* v, lapack_int* ldv, const double* t,
16207                     lapack_int* ldt, double* a, lapack_int* lda, double* b,
16208                     lapack_int* ldb, double* work, lapack_int *info );
16209void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16210                     lapack_int* k, lapack_int* l, lapack_int* nb,
16211                     const lapack_complex_float* v, lapack_int* ldv,
16212                     const lapack_complex_float* t, lapack_int* ldt,
16213                     lapack_complex_float* a, lapack_int* lda,
16214                     lapack_complex_float* b, lapack_int* ldb,
16215                     lapack_complex_float* work, lapack_int *info );
16216void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16217                     lapack_int* k, lapack_int* l, lapack_int* nb,
16218                     const lapack_complex_double* v, lapack_int* ldv,
16219                     const lapack_complex_double* t, lapack_int* ldt,
16220                     lapack_complex_double* a, lapack_int* lda,
16221                     lapack_complex_double* b, lapack_int* ldb,
16222                     lapack_complex_double* work, lapack_int *info );
16223void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16224                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
16225                    double* t, lapack_int* ldt, double* work,
16226                    lapack_int *info );
16227void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16228                    lapack_complex_float* a, lapack_int* lda,
16229                    lapack_complex_float* t, lapack_complex_float* b,
16230                    lapack_int* ldb, lapack_int* ldt,
16231                    lapack_complex_float* work, lapack_int *info );
16232void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16233                    lapack_complex_double* a, lapack_int* lda,
16234                    lapack_complex_double* b, lapack_int* ldb,
16235                    lapack_complex_double* t, lapack_int* ldt,
16236                    lapack_complex_double* work, lapack_int *info );
16237void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16238                     float* b, lapack_int* ldb, float* t, lapack_int* ldt,
16239                     lapack_int *info );
16240void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16241                     double* b, lapack_int* ldb, double* t, lapack_int* ldt,
16242                     lapack_int *info );
16243void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16244                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16245                     lapack_complex_float* t, lapack_int* ldt,
16246                     lapack_int *info );
16247void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16248                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16249                     lapack_complex_double* t, lapack_int* ldt,
16250                     lapack_int *info );
16251void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
16252                    lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16253                    const float* v, lapack_int* ldv, const float* t,
16254                    lapack_int* ldt, float* a, lapack_int* lda, float* b,
16255                    lapack_int* ldb, const float* mywork,
16256                    lapack_int* myldwork );
16257void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
16258                    lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16259                    const double* v, lapack_int* ldv, const double* t,
16260                    lapack_int* ldt, double* a, lapack_int* lda, double* b,
16261                    lapack_int* ldb, const double* mywork,
16262                    lapack_int* myldwork );
16263void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
16264                    lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16265                    const lapack_complex_float* v, lapack_int* ldv,
16266                    const lapack_complex_float* t, lapack_int* ldt,
16267                    lapack_complex_float* a, lapack_int* lda,
16268                    lapack_complex_float* b, lapack_int* ldb,
16269                    const float* mywork, lapack_int* myldwork );
16270void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
16271                    lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16272                    const lapack_complex_double* v, lapack_int* ldv,
16273                    const lapack_complex_double* t, lapack_int* ldt,
16274                    lapack_complex_double* a, lapack_int* lda,
16275                    lapack_complex_double* b, lapack_int* ldb,
16276                    const double* mywork, lapack_int* myldwork );
16277// LAPACK 3.X.X
16278void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
16279                      const lapack_complex_float* x, lapack_int* incx,
16280                      lapack_complex_float* a, lapack_int* lda );
16281void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
16282                      const lapack_complex_double* x, lapack_int* incx,
16283                      lapack_complex_double* a, lapack_int* lda );
16284
16285#ifdef __cplusplus
16286}
16287#endif /* __cplusplus */
16288
16289#endif /* _LAPACKE_H_ */
16290
16291#endif /* _MKL_LAPACKE_H_ */
16292