TRIQS/nda 1.3.0
Multi-dimensional array library for C++
Loading...
Searching...
No Matches
lapack.h
1/*****************************************************************************
2 Copyright (c) 2014, Intel Corp.
3 All rights reserved.
4 Redistribution and use in source and binary forms, with or without
5 modification, are permitted provided that the following conditions are met:
6 * Redistributions of source code must retain the above copyright notice,
7 this list of conditions and the following disclaimer.
8 * Redistributions in binary form must reproduce the above copyright
9 notice, this list of conditions and the following disclaimer in the
10 documentation and/or other materials provided with the distribution.
11 * Neither the name of Intel Corporation nor the names of its contributors
12 may be used to endorse or promote products derived from this software
13 without specific prior written permission.
14 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
15 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
18 LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
19 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
20 SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
21 INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
22 CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
23 ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
24 THE POSSIBILITY OF SUCH DAMAGE.
25******************************************************************************
26* Contents: Native C interface to LAPACK
27* Author: Intel Corporation
28* Generated August, 2015
29*****************************************************************************/
30
31#ifndef LAPACK_H
32#define LAPACK_H
33
34/*
35* Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
36*/
37
38#define HAVE_LAPACK_CONFIG_H 1
39
40#ifdef HAVE_LAPACK_CONFIG_H
41#include "lapacke_config.h"
42#endif
43
44#include "lapacke_mangling.h"
45
46#include <stdlib.h>
47
48#ifdef __cplusplus
49extern "C" {
50#endif
51
52/*----------------------------------------------------------------------------*/
53#ifndef lapack_int
54#define lapack_int int
55#endif
56
57#ifndef lapack_logical
58#define lapack_logical lapack_int
59#endif
60
61/* f2c, hence clapack and MacOS Accelerate, returns double instead of float
62 * for sdot, slange, clange, etc. */
63#if defined(LAPACK_F2C)
64typedef double lapack_float_return;
65#else
66typedef float lapack_float_return;
67#endif
68
69/* Complex types are structures equivalent to the
70* Fortran complex types COMPLEX(4) and COMPLEX(8).
71*
72* One can also redefine the types with his own types
73* for example by including in the code definitions like
74*
75* #define lapack_complex_float std::complex<float>
76* #define lapack_complex_double std::complex<double>
77*
78* or define these types in the command line:
79*
80* -Dlapack_complex_float="std::complex<float>"
81* -Dlapack_complex_double="std::complex<double>"
82*/
83
84#ifndef LAPACK_COMPLEX_CUSTOM
85
86/* Complex type (single precision) */
87#ifndef lapack_complex_float
88#include <complex.h>
89#define lapack_complex_float float _Complex
90#endif
91
92#ifndef lapack_complex_float_real
93#define lapack_complex_float_real(z) (creal(z))
94#endif
95
96#ifndef lapack_complex_float_imag
97#define lapack_complex_float_imag(z) (cimag(z))
98#endif
99
100/* Complex type (double precision) */
101#ifndef lapack_complex_double
102#include <complex.h>
103#define lapack_complex_double double _Complex
104#endif
105
106#ifndef lapack_complex_double_real
107#define lapack_complex_double_real(z) (creal(z))
108#endif
109
110#ifndef lapack_complex_double_imag
111#define lapack_complex_double_imag(z) (cimag(z))
112#endif
113
114#endif /* LAPACK_COMPLEX_CUSTOM */
115
116/* Callback logical functions of one, two, or three arguments are used
117* to select eigenvalues to sort to the top left of the Schur form.
118* The value is selected if function returns TRUE (non-zero). */
119
120typedef lapack_logical (*LAPACK_S_SELECT2)(const float *, const float *);
121typedef lapack_logical (*LAPACK_S_SELECT3)(const float *, const float *, const float *);
122typedef lapack_logical (*LAPACK_D_SELECT2)(const double *, const double *);
123typedef lapack_logical (*LAPACK_D_SELECT3)(const double *, const double *, const double *);
124
125typedef lapack_logical (*LAPACK_C_SELECT1)(const lapack_complex_float *);
126typedef lapack_logical (*LAPACK_C_SELECT2)(const lapack_complex_float *, const lapack_complex_float *);
127typedef lapack_logical (*LAPACK_Z_SELECT1)(const lapack_complex_double *);
128typedef lapack_logical (*LAPACK_Z_SELECT2)(const lapack_complex_double *, const lapack_complex_double *);
129
130#define LAPACK_lsame LAPACK_GLOBAL(lsame, LSAME)
131lapack_logical LAPACK_lsame(char *ca, char *cb, lapack_int lca, lapack_int lcb);
132
133/*----------------------------------------------------------------------------*/
134/* This is in alphabetical order (ignoring leading precision). */
135
136#define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd, CBBCSD)
137void LAPACK_cbbcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, lapack_int const *m,
138 lapack_int const *p, lapack_int const *q, float *theta, float *phi, lapack_complex_float *U1, lapack_int const *ldu1,
139 lapack_complex_float *U2, lapack_int const *ldu2, lapack_complex_float *V1T, lapack_int const *ldv1t, lapack_complex_float *V2T,
140 lapack_int const *ldv2t, float *B11D, float *B11E, float *B12D, float *B12E, float *B21D, float *B21E, float *B22D, float *B22E,
141 float *rwork, lapack_int const *lrwork, lapack_int *info);
142
143#define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd, DBBCSD)
144void LAPACK_dbbcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, lapack_int const *m,
145 lapack_int const *p, lapack_int const *q, double *theta, double *phi, double *U1, lapack_int const *ldu1, double *U2,
146 lapack_int const *ldu2, double *V1T, lapack_int const *ldv1t, double *V2T, lapack_int const *ldv2t, double *B11D, double *B11E,
147 double *B12D, double *B12E, double *b21d, double *b21e, double *b22d, double *b22e, double *work, lapack_int const *lwork,
148 lapack_int *info);
149
150#define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd, SBBCSD)
151void LAPACK_sbbcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, lapack_int const *m,
152 lapack_int const *p, lapack_int const *q, float *theta, float *phi, float *U1, lapack_int const *ldu1, float *U2,
153 lapack_int const *ldu2, float *V1T, lapack_int const *ldv1t, float *V2T, lapack_int const *ldv2t, float *B11D, float *B11E,
154 float *B12D, float *B12E, float *B21D, float *B21E, float *B22D, float *B22E, float *work, lapack_int const *lwork,
155 lapack_int *info);
156
157#define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd, ZBBCSD)
158void LAPACK_zbbcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, lapack_int const *m,
159 lapack_int const *p, lapack_int const *q, double *theta, double *phi, lapack_complex_double *U1, lapack_int const *ldu1,
160 lapack_complex_double *U2, lapack_int const *ldu2, lapack_complex_double *V1T, lapack_int const *ldv1t, lapack_complex_double *V2T,
161 lapack_int const *ldv2t, double *B11D, double *B11E, double *B12D, double *B12E, double *B21D, double *B21E, double *B22D,
162 double *B22E, double *rwork, lapack_int const *lrwork, lapack_int *info);
163
164#define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc, DBDSDC)
165void LAPACK_dbdsdc(char const *uplo, char const *compq, lapack_int const *n, double *D, double *E, double *U, lapack_int const *ldu, double *VT,
166 lapack_int const *ldvt, double *Q, lapack_int *IQ, double *work, lapack_int *iwork, lapack_int *info);
167
168#define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc, SBDSDC)
169void LAPACK_sbdsdc(char const *uplo, char const *compq, lapack_int const *n, float *D, float *E, float *U, lapack_int const *ldu, float *VT,
170 lapack_int const *ldvt, float *Q, lapack_int *IQ, float *work, lapack_int *iwork, lapack_int *info);
171
172#define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr, CBDSQR)
173void LAPACK_cbdsqr(char const *uplo, lapack_int const *n, lapack_int const *ncvt, lapack_int const *nru, lapack_int const *ncc, float *D, float *E,
174 lapack_complex_float *VT, lapack_int const *ldvt, lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *C,
175 lapack_int const *ldc, float *rwork, lapack_int *info);
176
177#define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr, DBDSQR)
178void LAPACK_dbdsqr(char const *uplo, lapack_int const *n, lapack_int const *ncvt, lapack_int const *nru, lapack_int const *ncc, double *D, double *E,
179 double *VT, lapack_int const *ldvt, double *U, lapack_int const *ldu, double *C, lapack_int const *ldc, double *work,
180 lapack_int *info);
181
182#define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr, SBDSQR)
183void LAPACK_sbdsqr(char const *uplo, lapack_int const *n, lapack_int const *ncvt, lapack_int const *nru, lapack_int const *ncc, float *D, float *E,
184 float *VT, lapack_int const *ldvt, float *U, lapack_int const *ldu, float *C, lapack_int const *ldc, float *work,
185 lapack_int *info);
186
187#define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr, ZBDSQR)
188void LAPACK_zbdsqr(char const *uplo, lapack_int const *n, lapack_int const *ncvt, lapack_int const *nru, lapack_int const *ncc, double *D, double *E,
189 lapack_complex_double *VT, lapack_int const *ldvt, lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *C,
190 lapack_int const *ldc, double *rwork, lapack_int *info);
191
192#define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx, DBDSVDX)
193void LAPACK_dbdsvdx(char const *uplo, char const *jobz, char const *range, lapack_int const *n, double const *D, double const *E, double const *vl,
194 double const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, double *S, double *Z, lapack_int const *ldz,
195 double *work, lapack_int *iwork, lapack_int *info);
196
197#define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx, SBDSVDX)
198void LAPACK_sbdsvdx(char const *uplo, char const *jobz, char const *range, lapack_int const *n, float const *D, float const *E, float const *vl,
199 float const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, float *S, float *Z, lapack_int const *ldz,
200 float *work, lapack_int *iwork, lapack_int *info);
201
202#define LAPACK_ddisna LAPACK_GLOBAL(ddisna, DDISNA)
203void LAPACK_ddisna(char const *job, lapack_int const *m, lapack_int const *n, double const *D, double *SEP, lapack_int *info);
204
205#define LAPACK_sdisna LAPACK_GLOBAL(sdisna, SDISNA)
206void LAPACK_sdisna(char const *job, lapack_int const *m, lapack_int const *n, float const *D, float *SEP, lapack_int *info);
207
208#define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd, CGBBRD)
209void LAPACK_cgbbrd(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *ncc, lapack_int const *kl, lapack_int const *ku,
210 lapack_complex_float *AB, lapack_int const *ldab, float *D, float *E, lapack_complex_float *Q, lapack_int const *ldq,
211 lapack_complex_float *PT, lapack_int const *ldpt, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
212 float *rwork, lapack_int *info);
213
214#define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd, DGBBRD)
215void LAPACK_dgbbrd(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *ncc, lapack_int const *kl, lapack_int const *ku,
216 double *AB, lapack_int const *ldab, double *D, double *E, double *Q, lapack_int const *ldq, double *PT, lapack_int const *ldpt,
217 double *C, lapack_int const *ldc, double *work, lapack_int *info);
218
219#define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd, SGBBRD)
220void LAPACK_sgbbrd(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *ncc, lapack_int const *kl, lapack_int const *ku,
221 float *AB, lapack_int const *ldab, float *D, float *E, float *Q, lapack_int const *ldq, float *PT, lapack_int const *ldpt,
222 float *C, lapack_int const *ldc, float *work, lapack_int *info);
223
224#define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd, ZGBBRD)
225void LAPACK_zgbbrd(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *ncc, lapack_int const *kl, lapack_int const *ku,
226 lapack_complex_double *AB, lapack_int const *ldab, double *D, double *E, lapack_complex_double *Q, lapack_int const *ldq,
227 lapack_complex_double *PT, lapack_int const *ldpt, lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work,
228 double *rwork, lapack_int *info);
229
230#define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon, CGBCON)
231void LAPACK_cgbcon(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_float const *AB,
232 lapack_int const *ldab, lapack_int const *ipiv, float const *anorm, float *rcond, lapack_complex_float *work, float *rwork,
233 lapack_int *info);
234
235#define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon, DGBCON)
236void LAPACK_dgbcon(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *AB, lapack_int const *ldab,
237 lapack_int const *ipiv, double const *anorm, double *rcond, double *work, lapack_int *iwork, lapack_int *info);
238
239#define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon, SGBCON)
240void LAPACK_sgbcon(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *AB, lapack_int const *ldab,
241 lapack_int const *ipiv, float const *anorm, float *rcond, float *work, lapack_int *iwork, lapack_int *info);
242
243#define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon, ZGBCON)
244void LAPACK_zgbcon(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_double const *AB,
245 lapack_int const *ldab, lapack_int const *ipiv, double const *anorm, double *rcond, lapack_complex_double *work, double *rwork,
246 lapack_int *info);
247
248#define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ, CGBEQU)
249void LAPACK_cgbequ(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_float const *AB,
250 lapack_int const *ldab, float *R, float *C, float *rowcnd, float *colcnd, float *amax, lapack_int *info);
251
252#define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ, DGBEQU)
253void LAPACK_dgbequ(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *AB, lapack_int const *ldab,
254 double *R, double *C, double *rowcnd, double *colcnd, double *amax, lapack_int *info);
255
256#define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ, SGBEQU)
257void LAPACK_sgbequ(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *AB, lapack_int const *ldab,
258 float *R, float *C, float *rowcnd, float *colcnd, float *amax, lapack_int *info);
259
260#define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ, ZGBEQU)
261void LAPACK_zgbequ(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_double const *AB,
262 lapack_int const *ldab, double *R, double *C, double *rowcnd, double *colcnd, double *amax, lapack_int *info);
263
264#define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb, CGBEQUB)
265void LAPACK_cgbequb(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_float const *AB,
266 lapack_int const *ldab, float *R, float *C, float *rowcnd, float *colcnd, float *amax, lapack_int *info);
267
268#define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb, DGBEQUB)
269void LAPACK_dgbequb(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *AB, lapack_int const *ldab,
270 double *R, double *C, double *rowcnd, double *colcnd, double *amax, lapack_int *info);
271
272#define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb, SGBEQUB)
273void LAPACK_sgbequb(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *AB, lapack_int const *ldab,
274 float *R, float *C, float *rowcnd, float *colcnd, float *amax, lapack_int *info);
275
276#define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb, ZGBEQUB)
277void LAPACK_zgbequb(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_double const *AB,
278 lapack_int const *ldab, double *R, double *C, double *rowcnd, double *colcnd, double *amax, lapack_int *info);
279
280#define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs, CGBRFS)
281void LAPACK_cgbrfs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
282 lapack_complex_float const *AB, lapack_int const *ldab, lapack_complex_float const *AFB, lapack_int const *ldafb,
283 lapack_int const *ipiv, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
284 float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
285
286#define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs, DGBRFS)
287void LAPACK_dgbrfs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, double const *AB,
288 lapack_int const *ldab, double const *AFB, lapack_int const *ldafb, lapack_int const *ipiv, double const *B, lapack_int const *ldb,
289 double *X, lapack_int const *ldx, double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
290
291#define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs, SGBRFS)
292void LAPACK_sgbrfs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, float const *AB,
293 lapack_int const *ldab, float const *AFB, lapack_int const *ldafb, lapack_int const *ipiv, float const *B, lapack_int const *ldb,
294 float *X, lapack_int const *ldx, float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
295
296#define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs, ZGBRFS)
297void LAPACK_zgbrfs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
298 lapack_complex_double const *AB, lapack_int const *ldab, lapack_complex_double const *AFB, lapack_int const *ldafb,
299 lapack_int const *ipiv, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
300 double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
301
302#define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx, CGBRFSX)
303void LAPACK_cgbrfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
304 lapack_complex_float const *AB, lapack_int const *ldab, lapack_complex_float const *AFB, lapack_int const *ldafb,
305 lapack_int const *ipiv, float *R, float *C, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X,
306 lapack_int const *ldx, float *rcond, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp,
307 lapack_int const *nparams, float *params, lapack_complex_float *work, float *rwork, lapack_int *info);
308
309#define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx, DGBRFSX)
310void LAPACK_dgbrfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
311 double const *AB, lapack_int const *ldab, double const *AFB, lapack_int const *ldafb, lapack_int const *ipiv, double *R,
312 double *C, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *berr,
313 lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params,
314 double *work, lapack_int *iwork, lapack_int *info);
315
316#define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx, SGBRFSX)
317void LAPACK_sgbrfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
318 float const *AB, lapack_int const *ldab, float const *AFB, lapack_int const *ldafb, lapack_int const *ipiv, float *R, float *C,
319 float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *berr, lapack_int const *n_err_bnds,
320 float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params, float *work, lapack_int *iwork,
321 lapack_int *info);
322
323#define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx, ZGBRFSX)
324void LAPACK_zgbrfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
325 lapack_complex_double const *AB, lapack_int const *ldab, lapack_complex_double const *AFB, lapack_int const *ldafb,
326 lapack_int const *ipiv, double *R, double *C, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X,
327 lapack_int const *ldx, double *rcond, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp,
328 lapack_int const *nparams, double *params, lapack_complex_double *work, double *rwork, lapack_int *info);
329
330#define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv, CGBSV)
331void LAPACK_cgbsv(lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, lapack_complex_float *AB,
332 lapack_int const *ldab, lapack_int *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
333
334#define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv, DGBSV)
335void LAPACK_dgbsv(lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, double *AB, lapack_int const *ldab,
336 lapack_int *ipiv, double *B, lapack_int const *ldb, lapack_int *info);
337
338#define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv, SGBSV)
339void LAPACK_sgbsv(lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, float *AB, lapack_int const *ldab,
340 lapack_int *ipiv, float *B, lapack_int const *ldb, lapack_int *info);
341
342#define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv, ZGBSV)
343void LAPACK_zgbsv(lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, lapack_complex_double *AB,
344 lapack_int const *ldab, lapack_int *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
345
346#define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx, CGBSVX)
347void LAPACK_cgbsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
348 lapack_complex_float *AB, lapack_int const *ldab, lapack_complex_float *AFB, lapack_int const *ldafb, lapack_int *ipiv,
349 char *equed, float *R, float *C, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
350 float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
351
352#define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx, DGBSVX)
353void LAPACK_dgbsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
354 double *AB, lapack_int const *ldab, double *AFB, lapack_int const *ldafb, lapack_int *ipiv, char *equed, double *R, double *C,
355 double *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work,
356 lapack_int *iwork, lapack_int *info);
357
358#define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx, SGBSVX)
359void LAPACK_sgbsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
360 float *AB, lapack_int const *ldab, float *AFB, lapack_int const *ldafb, lapack_int *ipiv, char *equed, float *R, float *C,
361 float *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work,
362 lapack_int *iwork, lapack_int *info);
363
364#define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx, ZGBSVX)
365void LAPACK_zgbsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
366 lapack_complex_double *AB, lapack_int const *ldab, lapack_complex_double *AFB, lapack_int const *ldafb, lapack_int *ipiv,
367 char *equed, double *R, double *C, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *X,
368 lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
369
370#define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx, CGBSVXX)
371void LAPACK_cgbsvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
372 lapack_complex_float *AB, lapack_int const *ldab, lapack_complex_float *AFB, lapack_int const *ldafb, lapack_int *ipiv,
373 char *equed, float *R, float *C, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
374 float *rcond, float *rpvgrw, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp,
375 lapack_int const *nparams, float *params, lapack_complex_float *work, float *rwork, lapack_int *info);
376
377#define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx, DGBSVXX)
378void LAPACK_dgbsvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
379 double *AB, lapack_int const *ldab, double *AFB, lapack_int const *ldafb, lapack_int *ipiv, char *equed, double *R, double *C,
380 double *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr,
381 lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params,
382 double *work, lapack_int *iwork, lapack_int *info);
383
384#define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx, SGBSVXX)
385void LAPACK_sgbsvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
386 float *AB, lapack_int const *ldab, float *AFB, lapack_int const *ldafb, lapack_int *ipiv, char *equed, float *R, float *C,
387 float *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr,
388 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params, float *work,
389 lapack_int *iwork, lapack_int *info);
390
391#define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx, ZGBSVXX)
392void LAPACK_zgbsvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
393 lapack_complex_double *AB, lapack_int const *ldab, lapack_complex_double *AFB, lapack_int const *ldafb, lapack_int *ipiv,
394 char *equed, double *R, double *C, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *X,
395 lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm,
396 double *err_bnds_comp, lapack_int const *nparams, double *params, lapack_complex_double *work, double *rwork, lapack_int *info);
397
398#define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf, CGBTRF)
399void LAPACK_cgbtrf(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_float *AB,
400 lapack_int const *ldab, lapack_int *ipiv, lapack_int *info);
401
402#define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf, DGBTRF)
403void LAPACK_dgbtrf(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double *AB, lapack_int const *ldab,
404 lapack_int *ipiv, lapack_int *info);
405
406#define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf, SGBTRF)
407void LAPACK_sgbtrf(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float *AB, lapack_int const *ldab,
408 lapack_int *ipiv, lapack_int *info);
409
410#define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf, ZGBTRF)
411void LAPACK_zgbtrf(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_double *AB,
412 lapack_int const *ldab, lapack_int *ipiv, lapack_int *info);
413
414#define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs, CGBTRS)
415void LAPACK_cgbtrs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
416 lapack_complex_float const *AB, lapack_int const *ldab, lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb,
417 lapack_int *info);
418
419#define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs, DGBTRS)
420void LAPACK_dgbtrs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, double const *AB,
421 lapack_int const *ldab, lapack_int const *ipiv, double *B, lapack_int const *ldb, lapack_int *info);
422
423#define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs, SGBTRS)
424void LAPACK_sgbtrs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs, float const *AB,
425 lapack_int const *ldab, lapack_int const *ipiv, float *B, lapack_int const *ldb, lapack_int *info);
426
427#define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs, ZGBTRS)
428void LAPACK_zgbtrs(char const *trans, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_int const *nrhs,
429 lapack_complex_double const *AB, lapack_int const *ldab, lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb,
430 lapack_int *info);
431
432#define LAPACK_cgebak LAPACK_GLOBAL(cgebak, CGEBAK)
433void LAPACK_cgebak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float const *scale,
434 lapack_int const *m, lapack_complex_float *V, lapack_int const *ldv, lapack_int *info);
435
436#define LAPACK_dgebak LAPACK_GLOBAL(dgebak, DGEBAK)
437void LAPACK_dgebak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double const *scale,
438 lapack_int const *m, double *V, lapack_int const *ldv, lapack_int *info);
439
440#define LAPACK_sgebak LAPACK_GLOBAL(sgebak, SGEBAK)
441void LAPACK_sgebak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float const *scale,
442 lapack_int const *m, float *V, lapack_int const *ldv, lapack_int *info);
443
444#define LAPACK_zgebak LAPACK_GLOBAL(zgebak, ZGEBAK)
445void LAPACK_zgebak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double const *scale,
446 lapack_int const *m, lapack_complex_double *V, lapack_int const *ldv, lapack_int *info);
447
448#define LAPACK_cgebal LAPACK_GLOBAL(cgebal, CGEBAL)
449void LAPACK_cgebal(char const *job, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ilo, lapack_int *ihi,
450 float *scale, lapack_int *info);
451
452#define LAPACK_dgebal LAPACK_GLOBAL(dgebal, DGEBAL)
453void LAPACK_dgebal(char const *job, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ilo, lapack_int *ihi, double *scale,
454 lapack_int *info);
455
456#define LAPACK_sgebal LAPACK_GLOBAL(sgebal, SGEBAL)
457void LAPACK_sgebal(char const *job, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ilo, lapack_int *ihi, float *scale,
458 lapack_int *info);
459
460#define LAPACK_zgebal LAPACK_GLOBAL(zgebal, ZGEBAL)
461void LAPACK_zgebal(char const *job, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ilo, lapack_int *ihi,
462 double *scale, lapack_int *info);
463
464#define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd, CGEBRD)
465void LAPACK_cgebrd(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *D, float *E,
466 lapack_complex_float *tauq, lapack_complex_float *taup, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
467
468#define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd, DGEBRD)
469void LAPACK_dgebrd(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *D, double *E, double *tauq, double *taup,
470 double *work, lapack_int const *lwork, lapack_int *info);
471
472#define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd, SGEBRD)
473void LAPACK_sgebrd(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *D, float *E, float *tauq, float *taup,
474 float *work, lapack_int const *lwork, lapack_int *info);
475
476#define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd, ZGEBRD)
477void LAPACK_zgebrd(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *D, double *E,
478 lapack_complex_double *tauq, lapack_complex_double *taup, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
479
480#define LAPACK_cgecon LAPACK_GLOBAL(cgecon, CGECON)
481void LAPACK_cgecon(char const *norm, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float const *anorm, float *rcond,
482 lapack_complex_float *work, float *rwork, lapack_int *info);
483
484#define LAPACK_dgecon LAPACK_GLOBAL(dgecon, DGECON)
485void LAPACK_dgecon(char const *norm, lapack_int const *n, double const *A, lapack_int const *lda, double const *anorm, double *rcond, double *work,
486 lapack_int *iwork, lapack_int *info);
487
488#define LAPACK_sgecon LAPACK_GLOBAL(sgecon, SGECON)
489void LAPACK_sgecon(char const *norm, lapack_int const *n, float const *A, lapack_int const *lda, float const *anorm, float *rcond, float *work,
490 lapack_int *iwork, lapack_int *info);
491
492#define LAPACK_zgecon LAPACK_GLOBAL(zgecon, ZGECON)
493void LAPACK_zgecon(char const *norm, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double const *anorm, double *rcond,
494 lapack_complex_double *work, double *rwork, lapack_int *info);
495
496#define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ, CGEEQU)
497void LAPACK_cgeequ(lapack_int const *m, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *R, float *C, float *rowcnd,
498 float *colcnd, float *amax, lapack_int *info);
499
500#define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ, DGEEQU)
501void LAPACK_dgeequ(lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, double *R, double *C, double *rowcnd,
502 double *colcnd, double *amax, lapack_int *info);
503
504#define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ, SGEEQU)
505void LAPACK_sgeequ(lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, float *R, float *C, float *rowcnd, float *colcnd,
506 float *amax, lapack_int *info);
507
508#define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ, ZGEEQU)
509void LAPACK_zgeequ(lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *R, double *C,
510 double *rowcnd, double *colcnd, double *amax, lapack_int *info);
511
512#define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb, CGEEQUB)
513void LAPACK_cgeequb(lapack_int const *m, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *R, float *C, float *rowcnd,
514 float *colcnd, float *amax, lapack_int *info);
515
516#define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb, DGEEQUB)
517void LAPACK_dgeequb(lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, double *R, double *C, double *rowcnd,
518 double *colcnd, double *amax, lapack_int *info);
519
520#define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb, SGEEQUB)
521void LAPACK_sgeequb(lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, float *R, float *C, float *rowcnd, float *colcnd,
522 float *amax, lapack_int *info);
523
524#define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb, ZGEEQUB)
525void LAPACK_zgeequb(lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *R, double *C,
526 double *rowcnd, double *colcnd, double *amax, lapack_int *info);
527
528#define LAPACK_cgees LAPACK_GLOBAL(cgees, CGEES)
529void LAPACK_cgees(char const *jobvs, char const *sort, LAPACK_C_SELECT1 select, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
530 lapack_int *sdim, lapack_complex_float *W, lapack_complex_float *VS, lapack_int const *ldvs, lapack_complex_float *work,
531 lapack_int const *lwork, float *rwork, lapack_logical *BWORK, lapack_int *info);
532
533#define LAPACK_dgees LAPACK_GLOBAL(dgees, DGEES)
534void LAPACK_dgees(char const *jobvs, char const *sort, LAPACK_D_SELECT2 select, lapack_int const *n, double *A, lapack_int const *lda,
535 lapack_int *sdim, double *WR, double *WI, double *VS, lapack_int const *ldvs, double *work, lapack_int const *lwork,
536 lapack_logical *BWORK, lapack_int *info);
537
538#define LAPACK_sgees LAPACK_GLOBAL(sgees, SGEES)
539void LAPACK_sgees(char const *jobvs, char const *sort, LAPACK_S_SELECT2 select, lapack_int const *n, float *A, lapack_int const *lda,
540 lapack_int *sdim, float *WR, float *WI, float *VS, lapack_int const *ldvs, float *work, lapack_int const *lwork,
541 lapack_logical *BWORK, lapack_int *info);
542
543#define LAPACK_zgees LAPACK_GLOBAL(zgees, ZGEES)
544void LAPACK_zgees(char const *jobvs, char const *sort, LAPACK_Z_SELECT1 select, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
545 lapack_int *sdim, lapack_complex_double *W, lapack_complex_double *VS, lapack_int const *ldvs, lapack_complex_double *work,
546 lapack_int const *lwork, double *rwork, lapack_logical *BWORK, lapack_int *info);
547
548#define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx, CGEESX)
549void LAPACK_cgeesx(char const *jobvs, char const *sort, LAPACK_C_SELECT1 select, char const *sense, lapack_int const *n, lapack_complex_float *A,
550 lapack_int const *lda, lapack_int *sdim, lapack_complex_float *W, lapack_complex_float *VS, lapack_int const *ldvs, float *rconde,
551 float *rcondv, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_logical *BWORK, lapack_int *info);
552
553#define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx, DGEESX)
554void LAPACK_dgeesx(char const *jobvs, char const *sort, LAPACK_D_SELECT2 select, char const *sense, lapack_int const *n, double *A,
555 lapack_int const *lda, lapack_int *sdim, double *WR, double *WI, double *VS, lapack_int const *ldvs, double *rconde,
556 double *rcondv, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK,
557 lapack_int *info);
558
559#define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx, SGEESX)
560void LAPACK_sgeesx(char const *jobvs, char const *sort, LAPACK_S_SELECT2 select, char const *sense, lapack_int const *n, float *A,
561 lapack_int const *lda, lapack_int *sdim, float *WR, float *WI, float *VS, lapack_int const *ldvs, float *rconde, float *rcondv,
562 float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK, lapack_int *info);
563
564#define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx, ZGEESX)
565void LAPACK_zgeesx(char const *jobvs, char const *sort, LAPACK_Z_SELECT1 select, char const *sense, lapack_int const *n, lapack_complex_double *A,
566 lapack_int const *lda, lapack_int *sdim, lapack_complex_double *W, lapack_complex_double *VS, lapack_int const *ldvs,
567 double *rconde, double *rcondv, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_logical *BWORK,
568 lapack_int *info);
569
570#define LAPACK_cgeev LAPACK_GLOBAL(cgeev, CGEEV)
571void LAPACK_cgeev(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *W,
572 lapack_complex_float *VL, lapack_int const *ldvl, lapack_complex_float *VR, lapack_int const *ldvr, lapack_complex_float *work,
573 lapack_int const *lwork, float *rwork, lapack_int *info);
574
575#define LAPACK_dgeev LAPACK_GLOBAL(dgeev, DGEEV)
576void LAPACK_dgeev(char const *jobvl, char const *jobvr, lapack_int const *n, double *A, lapack_int const *lda, double *WR, double *WI, double *VL,
577 lapack_int const *ldvl, double *VR, lapack_int const *ldvr, double *work, lapack_int const *lwork, lapack_int *info);
578
579#define LAPACK_sgeev LAPACK_GLOBAL(sgeev, SGEEV)
580void LAPACK_sgeev(char const *jobvl, char const *jobvr, lapack_int const *n, float *A, lapack_int const *lda, float *WR, float *WI, float *VL,
581 lapack_int const *ldvl, float *VR, lapack_int const *ldvr, float *work, lapack_int const *lwork, lapack_int *info);
582
583#define LAPACK_zgeev LAPACK_GLOBAL(zgeev, ZGEEV)
584void LAPACK_zgeev(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
585 lapack_complex_double *W, lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr,
586 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
587
588#define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx, CGEEVX)
589void LAPACK_cgeevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, lapack_complex_float *A,
590 lapack_int const *lda, lapack_complex_float *W, lapack_complex_float *VL, lapack_int const *ldvl, lapack_complex_float *VR,
591 lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi, float *scale, float *abnrm, float *rconde, float *rcondv,
592 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
593
594#define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx, DGEEVX)
595void LAPACK_dgeevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, double *A, lapack_int const *lda,
596 double *WR, double *WI, double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi,
597 double *scale, double *abnrm, double *rconde, double *rcondv, double *work, lapack_int const *lwork, lapack_int *iwork,
598 lapack_int *info);
599
600#define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx, SGEEVX)
601void LAPACK_sgeevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, float *A, lapack_int const *lda,
602 float *WR, float *WI, float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi,
603 float *scale, float *abnrm, float *rconde, float *rcondv, float *work, lapack_int const *lwork, lapack_int *iwork,
604 lapack_int *info);
605
606#define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx, ZGEEVX)
607void LAPACK_zgeevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, lapack_complex_double *A,
608 lapack_int const *lda, lapack_complex_double *W, lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR,
609 lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi, double *scale, double *abnrm, double *rconde, double *rcondv,
610 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
611
612#define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd, CGEHRD)
613void LAPACK_cgehrd(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_float *A, lapack_int const *lda,
614 lapack_complex_float *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
615
616#define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd, DGEHRD)
617void LAPACK_dgehrd(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double *A, lapack_int const *lda, double *tau, double *work,
618 lapack_int const *lwork, lapack_int *info);
619
620#define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd, SGEHRD)
621void LAPACK_sgehrd(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *A, lapack_int const *lda, float *tau, float *work,
622 lapack_int const *lwork, lapack_int *info);
623
624#define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd, ZGEHRD)
625void LAPACK_zgehrd(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_double *A, lapack_int const *lda,
626 lapack_complex_double *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
627
628#define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv, CGEJSV)
629void LAPACK_cgejsv(char const *joba, char const *jobu, char const *jobv, char const *jobr, char const *jobt, char const *jobp, lapack_int const *m,
630 lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *SVA, lapack_complex_float *U, lapack_int const *ldu,
631 lapack_complex_float *V, lapack_int const *ldv, lapack_complex_float *cwork, lapack_int const *lwork, float *rwork,
632 lapack_int const *lrwork, lapack_int *iwork, lapack_int *info);
633
634#define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv, DGEJSV)
635void LAPACK_dgejsv(char const *joba, char const *jobu, char const *jobv, char const *jobr, char const *jobt, char const *jobp, lapack_int const *m,
636 lapack_int const *n, double *A, lapack_int const *lda, double *SVA, double *U, lapack_int const *ldu, double *V,
637 lapack_int const *ldv, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
638
639#define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv, SGEJSV)
640void LAPACK_sgejsv(char const *joba, char const *jobu, char const *jobv, char const *jobr, char const *jobt, char const *jobp, lapack_int const *m,
641 lapack_int const *n, float *A, lapack_int const *lda, float *SVA, float *U, lapack_int const *ldu, float *V, lapack_int const *ldv,
642 float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
643
644#define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv, ZGEJSV)
645void LAPACK_zgejsv(char const *joba, char const *jobu, char const *jobv, char const *jobr, char const *jobt, char const *jobp, lapack_int const *m,
646 lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *SVA, lapack_complex_double *U, lapack_int const *ldu,
647 lapack_complex_double *V, lapack_int const *ldv, lapack_complex_double *cwork, lapack_int const *lwork, double *rwork,
648 lapack_int const *lrwork, lapack_int *iwork, lapack_int *info);
649
650#define LAPACK_cgelq LAPACK_GLOBAL(cgelq, CGELQ)
651void LAPACK_cgelq(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *T,
652 lapack_int const *tsize, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
653
654#define LAPACK_dgelq LAPACK_GLOBAL(dgelq, DGELQ)
655void LAPACK_dgelq(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *T, lapack_int const *tsize, double *work,
656 lapack_int const *lwork, lapack_int *info);
657
658#define LAPACK_sgelq LAPACK_GLOBAL(sgelq, SGELQ)
659void LAPACK_sgelq(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *T, lapack_int const *tsize, float *work,
660 lapack_int const *lwork, lapack_int *info);
661
662#define LAPACK_zgelq LAPACK_GLOBAL(zgelq, ZGELQ)
663void LAPACK_zgelq(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *T,
664 lapack_int const *tsize, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
665
666#define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2, CGELQ2)
667void LAPACK_cgelq2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
668 lapack_complex_float *work, lapack_int *info);
669
670#define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2, DGELQ2)
671void LAPACK_dgelq2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int *info);
672
673#define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2, SGELQ2)
674void LAPACK_sgelq2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int *info);
675
676#define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2, ZGELQ2)
677void LAPACK_zgelq2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
678 lapack_complex_double *work, lapack_int *info);
679
680#define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf, CGELQF)
681void LAPACK_cgelqf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
682 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
683
684#define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf, DGELQF)
685void LAPACK_dgelqf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
686 lapack_int *info);
687
688#define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf, SGELQF)
689void LAPACK_sgelqf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
690 lapack_int *info);
691
692#define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf, ZGELQF)
693void LAPACK_zgelqf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
694 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
695
696#define LAPACK_cgels LAPACK_GLOBAL(cgels, CGELS)
697void LAPACK_cgels(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
698 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
699
700#define LAPACK_dgels LAPACK_GLOBAL(dgels, DGELS)
701void LAPACK_dgels(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B,
702 lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
703
704#define LAPACK_sgels LAPACK_GLOBAL(sgels, SGELS)
705void LAPACK_sgels(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B,
706 lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
707
708#define LAPACK_zgels LAPACK_GLOBAL(zgels, ZGELS)
709void LAPACK_zgels(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A,
710 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
711 lapack_int *info);
712
713#define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd, CGELSD)
714void LAPACK_cgelsd(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
715 lapack_complex_float *B, lapack_int const *ldb, float *S, float const *rcond, lapack_int *rank, lapack_complex_float *work,
716 lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_int *info);
717
718#define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd, DGELSD)
719void LAPACK_dgelsd(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B,
720 lapack_int const *ldb, double *S, double const *rcond, lapack_int *rank, double *work, lapack_int const *lwork, lapack_int *iwork,
721 lapack_int *info);
722
723#define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd, SGELSD)
724void LAPACK_sgelsd(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
725 float *S, float const *rcond, lapack_int *rank, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
726
727#define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd, ZGELSD)
728void LAPACK_zgelsd(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
729 lapack_complex_double *B, lapack_int const *ldb, double *S, double const *rcond, lapack_int *rank, lapack_complex_double *work,
730 lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_int *info);
731
732#define LAPACK_cgelss LAPACK_GLOBAL(cgelss, CGELSS)
733void LAPACK_cgelss(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
734 lapack_complex_float *B, lapack_int const *ldb, float *S, float const *rcond, lapack_int *rank, lapack_complex_float *work,
735 lapack_int const *lwork, float *rwork, lapack_int *info);
736
737#define LAPACK_dgelss LAPACK_GLOBAL(dgelss, DGELSS)
738void LAPACK_dgelss(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B,
739 lapack_int const *ldb, double *S, double const *rcond, lapack_int *rank, double *work, lapack_int const *lwork, lapack_int *info);
740
741#define LAPACK_sgelss LAPACK_GLOBAL(sgelss, SGELSS)
742void LAPACK_sgelss(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
743 float *S, float const *rcond, lapack_int *rank, float *work, lapack_int const *lwork, lapack_int *info);
744
745#define LAPACK_zgelss LAPACK_GLOBAL(zgelss, ZGELSS)
746void LAPACK_zgelss(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
747 lapack_complex_double *B, lapack_int const *ldb, double *S, double const *rcond, lapack_int *rank, lapack_complex_double *work,
748 lapack_int const *lwork, double *rwork, lapack_int *info);
749
750#define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy, CGELSY)
751void LAPACK_cgelsy(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
752 lapack_complex_float *B, lapack_int const *ldb, lapack_int *JPVT, float const *rcond, lapack_int *rank, lapack_complex_float *work,
753 lapack_int const *lwork, float *rwork, lapack_int *info);
754
755#define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy, DGELSY)
756void LAPACK_dgelsy(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B,
757 lapack_int const *ldb, lapack_int *JPVT, double const *rcond, lapack_int *rank, double *work, lapack_int const *lwork,
758 lapack_int *info);
759
760#define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy, SGELSY)
761void LAPACK_sgelsy(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
762 lapack_int *JPVT, float const *rcond, lapack_int *rank, float *work, lapack_int const *lwork, lapack_int *info);
763
764#define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy, ZGELSY)
765void LAPACK_zgelsy(lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
766 lapack_complex_double *B, lapack_int const *ldb, lapack_int *JPVT, double const *rcond, lapack_int *rank,
767 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
768
769#define LAPACK_cgemlq LAPACK_GLOBAL(cgemlq, CGEMLQ)
770void LAPACK_cgemlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
771 lapack_int const *lda, lapack_complex_float const *T, lapack_int const *tsize, lapack_complex_float *C, lapack_int const *ldc,
772 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
773
774#define LAPACK_dgemlq LAPACK_GLOBAL(dgemlq, DGEMLQ)
775void LAPACK_dgemlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
776 lapack_int const *lda, double const *T, lapack_int const *tsize, double *C, lapack_int const *ldc, double *work,
777 lapack_int const *lwork, lapack_int *info);
778
779#define LAPACK_sgemlq LAPACK_GLOBAL(sgemlq, SGEMLQ)
780void LAPACK_sgemlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
781 lapack_int const *lda, float const *T, lapack_int const *tsize, float *C, lapack_int const *ldc, float *work,
782 lapack_int const *lwork, lapack_int *info);
783
784#define LAPACK_zgemlq LAPACK_GLOBAL(zgemlq, ZGEMLQ)
785void LAPACK_zgemlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
786 lapack_int const *lda, lapack_complex_double const *T, lapack_int const *tsize, lapack_complex_double *C, lapack_int const *ldc,
787 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
788
789#define LAPACK_cgemqr LAPACK_GLOBAL(cgemqr, CGEMQR)
790void LAPACK_cgemqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
791 lapack_int const *lda, lapack_complex_float const *T, lapack_int const *tsize, lapack_complex_float *C, lapack_int const *ldc,
792 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
793
794#define LAPACK_dgemqr LAPACK_GLOBAL(dgemqr, DGEMQR)
795void LAPACK_dgemqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
796 lapack_int const *lda, double const *T, lapack_int const *tsize, double *C, lapack_int const *ldc, double *work,
797 lapack_int const *lwork, lapack_int *info);
798
799#define LAPACK_sgemqr LAPACK_GLOBAL(sgemqr, SGEMQR)
800void LAPACK_sgemqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
801 lapack_int const *lda, float const *T, lapack_int const *tsize, float *C, lapack_int const *ldc, float *work,
802 lapack_int const *lwork, lapack_int *info);
803
804#define LAPACK_zgemqr LAPACK_GLOBAL(zgemqr, ZGEMQR)
805void LAPACK_zgemqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
806 lapack_int const *lda, lapack_complex_double const *T, lapack_int const *tsize, lapack_complex_double *C, lapack_int const *ldc,
807 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
808
809#define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt, CGEMQRT)
810void LAPACK_cgemqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *nb,
811 lapack_complex_float const *V, lapack_int const *ldv, lapack_complex_float const *T, lapack_int const *ldt,
812 lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work, lapack_int *info);
813
814#define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt, DGEMQRT)
815void LAPACK_dgemqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *nb,
816 double const *V, lapack_int const *ldv, double const *T, lapack_int const *ldt, double *C, lapack_int const *ldc, double *work,
817 lapack_int *info);
818
819#define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt, SGEMQRT)
820void LAPACK_sgemqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *nb,
821 float const *V, lapack_int const *ldv, float const *T, lapack_int const *ldt, float *C, lapack_int const *ldc, float *work,
822 lapack_int *info);
823
824#define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt, ZGEMQRT)
825void LAPACK_zgemqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *nb,
826 lapack_complex_double const *V, lapack_int const *ldv, lapack_complex_double const *T, lapack_int const *ldt,
827 lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work, lapack_int *info);
828
829#define LAPACK_cgeql2 LAPACK_GLOBAL(cgeql2, CGEQL2)
830void LAPACK_cgeql2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
831 lapack_complex_float *work, lapack_int *info);
832
833#define LAPACK_dgeql2 LAPACK_GLOBAL(dgeql2, DGEQL2)
834void LAPACK_dgeql2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int *info);
835
836#define LAPACK_sgeql2 LAPACK_GLOBAL(sgeql2, SGEQL2)
837void LAPACK_sgeql2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int *info);
838
839#define LAPACK_zgeql2 LAPACK_GLOBAL(zgeql2, ZGEQL2)
840void LAPACK_zgeql2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
841 lapack_complex_double *work, lapack_int *info);
842
843#define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf, CGEQLF)
844void LAPACK_cgeqlf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
845 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
846
847#define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf, DGEQLF)
848void LAPACK_dgeqlf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
849 lapack_int *info);
850
851#define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf, SGEQLF)
852void LAPACK_sgeqlf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
853 lapack_int *info);
854
855#define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf, ZGEQLF)
856void LAPACK_zgeqlf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
857 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
858
859#define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3, CGEQP3)
860void LAPACK_cgeqp3(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *JPVT,
861 lapack_complex_float *tau, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
862
863#define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3, DGEQP3)
864void LAPACK_dgeqp3(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *JPVT, double *tau, double *work,
865 lapack_int const *lwork, lapack_int *info);
866
867#define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3, SGEQP3)
868void LAPACK_sgeqp3(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *JPVT, float *tau, float *work,
869 lapack_int const *lwork, lapack_int *info);
870
871#define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3, ZGEQP3)
872void LAPACK_zgeqp3(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *JPVT,
873 lapack_complex_double *tau, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
874
875#define LAPACK_cgeqr LAPACK_GLOBAL(cgeqr, CGEQR)
876void LAPACK_cgeqr(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *T,
877 lapack_int const *tsize, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
878
879#define LAPACK_dgeqr LAPACK_GLOBAL(dgeqr, DGEQR)
880void LAPACK_dgeqr(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *T, lapack_int const *tsize, double *work,
881 lapack_int const *lwork, lapack_int *info);
882
883#define LAPACK_sgeqr LAPACK_GLOBAL(sgeqr, SGEQR)
884void LAPACK_sgeqr(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *T, lapack_int const *tsize, float *work,
885 lapack_int const *lwork, lapack_int *info);
886
887#define LAPACK_zgeqr LAPACK_GLOBAL(zgeqr, ZGEQR)
888void LAPACK_zgeqr(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *T,
889 lapack_int const *tsize, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
890
891#define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2, CGEQR2)
892void LAPACK_cgeqr2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
893 lapack_complex_float *work, lapack_int *info);
894
895#define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2, DGEQR2)
896void LAPACK_dgeqr2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int *info);
897
898#define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2, SGEQR2)
899void LAPACK_sgeqr2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int *info);
900
901#define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2, ZGEQR2)
902void LAPACK_zgeqr2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
903 lapack_complex_double *work, lapack_int *info);
904
905#define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf, CGEQRF)
906void LAPACK_cgeqrf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
907 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
908
909#define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf, DGEQRF)
910void LAPACK_dgeqrf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
911 lapack_int *info);
912
913#define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf, SGEQRF)
914void LAPACK_sgeqrf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
915 lapack_int *info);
916
917#define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf, ZGEQRF)
918void LAPACK_zgeqrf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
919 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
920
921#define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp, CGEQRFP)
922void LAPACK_cgeqrfp(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
923 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
924
925#define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp, DGEQRFP)
926void LAPACK_dgeqrfp(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
927 lapack_int *info);
928
929#define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp, SGEQRFP)
930void LAPACK_sgeqrfp(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
931 lapack_int *info);
932
933#define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp, ZGEQRFP)
934void LAPACK_zgeqrfp(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
935 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
936
937#define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt, CGEQRT)
938void LAPACK_cgeqrt(lapack_int const *m, lapack_int const *n, lapack_int const *nb, lapack_complex_float *A, lapack_int const *lda,
939 lapack_complex_float *T, lapack_int const *ldt, lapack_complex_float *work, lapack_int *info);
940
941#define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt, DGEQRT)
942void LAPACK_dgeqrt(lapack_int const *m, lapack_int const *n, lapack_int const *nb, double *A, lapack_int const *lda, double *T, lapack_int const *ldt,
943 double *work, lapack_int *info);
944
945#define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt, SGEQRT)
946void LAPACK_sgeqrt(lapack_int const *m, lapack_int const *n, lapack_int const *nb, float *A, lapack_int const *lda, float *T, lapack_int const *ldt,
947 float *work, lapack_int *info);
948
949#define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt, ZGEQRT)
950void LAPACK_zgeqrt(lapack_int const *m, lapack_int const *n, lapack_int const *nb, lapack_complex_double *A, lapack_int const *lda,
951 lapack_complex_double *T, lapack_int const *ldt, lapack_complex_double *work, lapack_int *info);
952
953#define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2, CGEQRT2)
954void LAPACK_cgeqrt2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *T,
955 lapack_int const *ldt, lapack_int *info);
956
957#define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2, DGEQRT2)
958void LAPACK_dgeqrt2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *T, lapack_int const *ldt, lapack_int *info);
959
960#define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2, SGEQRT2)
961void LAPACK_sgeqrt2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *T, lapack_int const *ldt, lapack_int *info);
962
963#define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2, ZGEQRT2)
964void LAPACK_zgeqrt2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *T,
965 lapack_int const *ldt, lapack_int *info);
966
967#define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3, CGEQRT3)
968void LAPACK_cgeqrt3(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *T,
969 lapack_int const *ldt, lapack_int *info);
970
971#define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3, DGEQRT3)
972void LAPACK_dgeqrt3(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *T, lapack_int const *ldt, lapack_int *info);
973
974#define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3, SGEQRT3)
975void LAPACK_sgeqrt3(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *T, lapack_int const *ldt, lapack_int *info);
976
977#define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3, ZGEQRT3)
978void LAPACK_zgeqrt3(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *T,
979 lapack_int const *ldt, lapack_int *info);
980
981#define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs, CGERFS)
982void LAPACK_cgerfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
983 lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_float const *B,
984 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work,
985 float *rwork, lapack_int *info);
986
987#define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs, DGERFS)
988void LAPACK_dgerfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double const *AF,
989 lapack_int const *ldaf, lapack_int const *ipiv, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx,
990 double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
991
992#define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs, SGERFS)
993void LAPACK_sgerfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float const *AF,
994 lapack_int const *ldaf, lapack_int const *ipiv, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx,
995 float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
996
997#define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs, ZGERFS)
998void LAPACK_zgerfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
999 lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_double const *B,
1000 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work,
1001 double *rwork, lapack_int *info);
1002
1003#define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx, CGERFSX)
1004void LAPACK_cgerfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
1005 lapack_int const *lda, lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, float const *R,
1006 float const *C, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
1007 float *rcond, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams,
1008 float *params, lapack_complex_float *work, float *rwork, lapack_int *info);
1009
1010#define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx, DGERFSX)
1011void LAPACK_dgerfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda,
1012 double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, double const *R, double const *C, double const *B,
1013 lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *berr, lapack_int const *n_err_bnds,
1014 double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params, double *work, lapack_int *iwork,
1015 lapack_int *info);
1016
1017#define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx, SGERFSX)
1018void LAPACK_sgerfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda,
1019 float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, float const *R, float const *C, float const *B,
1020 lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *berr, lapack_int const *n_err_bnds,
1021 float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params, float *work, lapack_int *iwork,
1022 lapack_int *info);
1023
1024#define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx, ZGERFSX)
1025void LAPACK_zgerfsx(char const *trans, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
1026 lapack_int const *lda, lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, double const *R,
1027 double const *C, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
1028 double *rcond, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp,
1029 lapack_int const *nparams, double *params, lapack_complex_double *work, double *rwork, lapack_int *info);
1030
1031#define LAPACK_cgerq2 LAPACK_GLOBAL(cgerq2, CGERQ2)
1032void LAPACK_cgerq2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
1033 lapack_complex_float *work, lapack_int *info);
1034
1035#define LAPACK_dgerq2 LAPACK_GLOBAL(dgerq2, DGERQ2)
1036void LAPACK_dgerq2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int *info);
1037
1038#define LAPACK_sgerq2 LAPACK_GLOBAL(sgerq2, SGERQ2)
1039void LAPACK_sgerq2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int *info);
1040
1041#define LAPACK_zgerq2 LAPACK_GLOBAL(zgerq2, ZGERQ2)
1042void LAPACK_zgerq2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
1043 lapack_complex_double *work, lapack_int *info);
1044
1045#define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf, CGERQF)
1046void LAPACK_cgerqf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
1047 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
1048
1049#define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf, DGERQF)
1050void LAPACK_dgerqf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
1051 lapack_int *info);
1052
1053#define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf, SGERQF)
1054void LAPACK_sgerqf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
1055 lapack_int *info);
1056
1057#define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf, ZGERQF)
1058void LAPACK_zgerqf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
1059 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1060
1061#define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd, CGESDD)
1062void LAPACK_cgesdd(char const *jobz, lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *S,
1063 lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *VT, lapack_int const *ldvt, lapack_complex_float *work,
1064 lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_int *info);
1065
1066#define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd, DGESDD)
1067void LAPACK_dgesdd(char const *jobz, lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *S, double *U,
1068 lapack_int const *ldu, double *VT, lapack_int const *ldvt, double *work, lapack_int const *lwork, lapack_int *iwork,
1069 lapack_int *info);
1070
1071#define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd, SGESDD)
1072void LAPACK_sgesdd(char const *jobz, lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *S, float *U,
1073 lapack_int const *ldu, float *VT, lapack_int const *ldvt, float *work, lapack_int const *lwork, lapack_int *iwork,
1074 lapack_int *info);
1075
1076#define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd, ZGESDD)
1077void LAPACK_zgesdd(char const *jobz, lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *S,
1078 lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *VT, lapack_int const *ldvt, lapack_complex_double *work,
1079 lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_int *info);
1080
1081#define LAPACK_cgesv LAPACK_GLOBAL(cgesv, CGESV)
1082void LAPACK_cgesv(lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
1083 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
1084
1085#define LAPACK_dgesv LAPACK_GLOBAL(dgesv, DGESV)
1086void LAPACK_dgesv(lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int *ipiv, double *B, lapack_int const *ldb,
1087 lapack_int *info);
1088
1089#define LAPACK_sgesv LAPACK_GLOBAL(sgesv, SGESV)
1090void LAPACK_sgesv(lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, lapack_int *ipiv, float *B, lapack_int const *ldb,
1091 lapack_int *info);
1092
1093#define LAPACK_zgesv LAPACK_GLOBAL(zgesv, ZGESV)
1094void LAPACK_zgesv(lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
1095 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
1096
1097#define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv, DSGESV)
1098void LAPACK_dsgesv(lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int *ipiv, double const *B,
1099 lapack_int const *ldb, double *X, lapack_int const *ldx, double *work, float *swork, lapack_int *iter, lapack_int *info);
1100
1101#define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv, ZCGESV)
1102void LAPACK_zcgesv(lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
1103 lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
1104 lapack_complex_double *work, lapack_complex_float *swork, double *rwork, lapack_int *iter, lapack_int *info);
1105
1106#define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd, CGESVD)
1107void LAPACK_cgesvd(char const *jobu, char const *jobvt, lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1108 float *S, lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *VT, lapack_int const *ldvt,
1109 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
1110
1111#define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd, DGESVD)
1112void LAPACK_dgesvd(char const *jobu, char const *jobvt, lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *S,
1113 double *U, lapack_int const *ldu, double *VT, lapack_int const *ldvt, double *work, lapack_int const *lwork, lapack_int *info);
1114
1115#define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd, SGESVD)
1116void LAPACK_sgesvd(char const *jobu, char const *jobvt, lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *S, float *U,
1117 lapack_int const *ldu, float *VT, lapack_int const *ldvt, float *work, lapack_int const *lwork, lapack_int *info);
1118
1119#define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd, ZGESVD)
1120void LAPACK_zgesvd(char const *jobu, char const *jobvt, lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1121 double *S, lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *VT, lapack_int const *ldvt,
1122 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
1123
1124#define LAPACK_cgesvdq LAPACK_GLOBAL(cgesvdq, CGESVDQ)
1125void LAPACK_cgesvdq(char const *joba, char const *jobp, char const *jobr, char const *jobu, char const *jobv, lapack_int const *m,
1126 lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *S, lapack_complex_float *U, lapack_int const *ldu,
1127 lapack_complex_float *V, lapack_int const *ldv, lapack_int *numrank, lapack_int *iwork, lapack_int const *liwork,
1128 lapack_complex_float *cwork, lapack_int *lcwork, float *rwork, lapack_int const *lrwork, lapack_int *info);
1129
1130#define LAPACK_dgesvdq LAPACK_GLOBAL(dgesvdq, DGESVDQ)
1131void LAPACK_dgesvdq(char const *joba, char const *jobp, char const *jobr, char const *jobu, char const *jobv, lapack_int const *m,
1132 lapack_int const *n, double *A, lapack_int const *lda, double *S, double *U, lapack_int const *ldu, double *V,
1133 lapack_int const *ldv, lapack_int *numrank, lapack_int *iwork, lapack_int const *liwork, double *work, lapack_int *lwork,
1134 double *rwork, lapack_int const *lrwork, lapack_int *info);
1135
1136#define LAPACK_sgesvdq LAPACK_GLOBAL(sgesvdq, SGESVDQ)
1137void LAPACK_sgesvdq(char const *joba, char const *jobp, char const *jobr, char const *jobu, char const *jobv, lapack_int const *m,
1138 lapack_int const *n, float *A, lapack_int const *lda, float *S, float *U, lapack_int const *ldu, float *V, lapack_int const *ldv,
1139 lapack_int *numrank, lapack_int *iwork, lapack_int const *liwork, float *work, lapack_int *lwork, float *rwork,
1140 lapack_int const *lrwork, lapack_int *info);
1141
1142#define LAPACK_zgesvdq LAPACK_GLOBAL(zgesvdq, ZGESVDQ)
1143void LAPACK_zgesvdq(char const *joba, char const *jobp, char const *jobr, char const *jobu, char const *jobv, lapack_int const *m,
1144 lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *S, lapack_complex_double *U, lapack_int const *ldu,
1145 lapack_complex_double *V, lapack_int const *ldv, lapack_int *numrank, lapack_int *iwork, lapack_int const *liwork,
1146 lapack_complex_float *cwork, lapack_int *lcwork, double *rwork, lapack_int const *lrwork, lapack_int *info);
1147
1148#define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx, CGESVDX)
1149void LAPACK_cgesvdx(char const *jobu, char const *jobvt, char const *range, lapack_int const *m, lapack_int const *n, lapack_complex_float *A,
1150 lapack_int const *lda, float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, float *S,
1151 lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *VT, lapack_int const *ldvt, lapack_complex_float *work,
1152 lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_int *info);
1153
1154#define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx, DGESVDX)
1155void LAPACK_dgesvdx(char const *jobu, char const *jobvt, char const *range, lapack_int const *m, lapack_int const *n, double *A,
1156 lapack_int const *lda, double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, double *S,
1157 double *U, lapack_int const *ldu, double *VT, lapack_int const *ldvt, double *work, lapack_int const *lwork, lapack_int *iwork,
1158 lapack_int *info);
1159
1160#define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx, SGESVDX)
1161void LAPACK_sgesvdx(char const *jobu, char const *jobvt, char const *range, lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda,
1162 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, float *S, float *U,
1163 lapack_int const *ldu, float *VT, lapack_int const *ldvt, float *work, lapack_int const *lwork, lapack_int *iwork,
1164 lapack_int *info);
1165
1166#define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx, ZGESVDX)
1167void LAPACK_zgesvdx(char const *jobu, char const *jobvt, char const *range, lapack_int const *m, lapack_int const *n, lapack_complex_double *A,
1168 lapack_int const *lda, double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, lapack_int *ns, double *S,
1169 lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *VT, lapack_int const *ldvt, lapack_complex_double *work,
1170 lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_int *info);
1171
1172#define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj, CGESVJ)
1173void LAPACK_cgesvj(char const *joba, char const *jobu, char const *jobv, lapack_int const *m, lapack_int const *n, lapack_complex_float *A,
1174 lapack_int const *lda, float *SVA, lapack_int const *mv, lapack_complex_float *V, lapack_int const *ldv,
1175 lapack_complex_float *cwork, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *info);
1176
1177#define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj, DGESVJ)
1178void LAPACK_dgesvj(char const *joba, char const *jobu, char const *jobv, lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda,
1179 double *SVA, lapack_int const *mv, double *V, lapack_int const *ldv, double *work, lapack_int const *lwork, lapack_int *info);
1180
1181#define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj, SGESVJ)
1182void LAPACK_sgesvj(char const *joba, char const *jobu, char const *jobv, lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda,
1183 float *SVA, lapack_int const *mv, float *V, lapack_int const *ldv, float *work, lapack_int const *lwork, lapack_int *info);
1184
1185#define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj, ZGESVJ)
1186void LAPACK_zgesvj(char const *joba, char const *jobu, char const *jobv, lapack_int const *m, lapack_int const *n, lapack_complex_double *A,
1187 lapack_int const *lda, double *SVA, lapack_int const *mv, lapack_complex_double *V, lapack_int const *ldv,
1188 lapack_complex_double *cwork, lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *info);
1189
1190#define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx, CGESVX)
1191void LAPACK_cgesvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
1192 lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *R, float *C, lapack_complex_float *B,
1193 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr,
1194 lapack_complex_float *work, float *rwork, lapack_int *info);
1195
1196#define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx, DGESVX)
1197void LAPACK_dgesvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *AF,
1198 lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *R, double *C, double *B, lapack_int const *ldb, double *X,
1199 lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
1200
1201#define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx, SGESVX)
1202void LAPACK_sgesvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *AF,
1203 lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *R, float *C, float *B, lapack_int const *ldb, float *X,
1204 lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
1205
1206#define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx, ZGESVX)
1207void LAPACK_zgesvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
1208 lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *R, double *C, lapack_complex_double *B,
1209 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr,
1210 lapack_complex_double *work, double *rwork, lapack_int *info);
1211
1212#define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx, CGESVXX)
1213void LAPACK_cgesvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
1214 lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *R, float *C, lapack_complex_float *B,
1215 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr,
1216 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params,
1217 lapack_complex_float *work, float *rwork, lapack_int *info);
1218
1219#define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx, DGESVXX)
1220void LAPACK_dgesvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *AF,
1221 lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *R, double *C, double *B, lapack_int const *ldb, double *X,
1222 lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm,
1223 double *err_bnds_comp, lapack_int const *nparams, double *params, double *work, lapack_int *iwork, lapack_int *info);
1224
1225#define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx, SGESVXX)
1226void LAPACK_sgesvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *AF,
1227 lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *R, float *C, float *B, lapack_int const *ldb, float *X,
1228 lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm,
1229 float *err_bnds_comp, lapack_int const *nparams, float *params, float *work, lapack_int *iwork, lapack_int *info);
1230
1231#define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx, ZGESVXX)
1232void LAPACK_zgesvxx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
1233 lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *R, double *C, lapack_complex_double *B,
1234 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr,
1235 lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params,
1236 lapack_complex_double *work, double *rwork, lapack_int *info);
1237
1238#define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2, CGETF2)
1239void LAPACK_cgetf2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1240
1241#define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2, DGETF2)
1242void LAPACK_dgetf2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1243
1244#define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2, SGETF2)
1245void LAPACK_sgetf2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1246
1247#define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2, ZGETF2)
1248void LAPACK_zgetf2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1249
1250#define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf, CGETRF)
1251void LAPACK_cgetrf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1252
1253#define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf, DGETRF)
1254void LAPACK_dgetrf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1255
1256#define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf, SGETRF)
1257void LAPACK_sgetrf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1258
1259#define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf, ZGETRF)
1260void LAPACK_zgetrf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1261
1262#define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2, CGETRF2)
1263void LAPACK_cgetrf2(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1264
1265#define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2, DGETRF2)
1266void LAPACK_dgetrf2(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1267
1268#define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2, SGETRF2)
1269void LAPACK_sgetrf2(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1270
1271#define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2, ZGETRF2)
1272void LAPACK_zgetrf2(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv, lapack_int *info);
1273
1274#define LAPACK_cgetri LAPACK_GLOBAL(cgetri, CGETRI)
1275void LAPACK_cgetri(lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv, lapack_complex_float *work,
1276 lapack_int const *lwork, lapack_int *info);
1277
1278#define LAPACK_dgetri LAPACK_GLOBAL(dgetri, DGETRI)
1279void LAPACK_dgetri(lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *ipiv, double *work, lapack_int const *lwork,
1280 lapack_int *info);
1281
1282#define LAPACK_sgetri LAPACK_GLOBAL(sgetri, SGETRI)
1283void LAPACK_sgetri(lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *ipiv, float *work, lapack_int const *lwork,
1284 lapack_int *info);
1285
1286#define LAPACK_zgetri LAPACK_GLOBAL(zgetri, ZGETRI)
1287void LAPACK_zgetri(lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv, lapack_complex_double *work,
1288 lapack_int const *lwork, lapack_int *info);
1289
1290#define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs, CGETRS)
1291void LAPACK_cgetrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
1292 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
1293
1294#define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs, DGETRS)
1295void LAPACK_dgetrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, lapack_int const *ipiv,
1296 double *B, lapack_int const *ldb, lapack_int *info);
1297
1298#define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs, SGETRS)
1299void LAPACK_sgetrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, lapack_int const *ipiv,
1300 float *B, lapack_int const *ldb, lapack_int *info);
1301
1302#define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs, ZGETRS)
1303void LAPACK_zgetrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
1304 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
1305
1306#define LAPACK_cgetsls LAPACK_GLOBAL(cgetsls, CGETSLS)
1307void LAPACK_cgetsls(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A,
1308 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork,
1309 lapack_int *info);
1310
1311#define LAPACK_dgetsls LAPACK_GLOBAL(dgetsls, DGETSLS)
1312void LAPACK_dgetsls(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B,
1313 lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
1314
1315#define LAPACK_sgetsls LAPACK_GLOBAL(sgetsls, SGETSLS)
1316void LAPACK_sgetsls(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B,
1317 lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
1318
1319#define LAPACK_zgetsls LAPACK_GLOBAL(zgetsls, ZGETSLS)
1320void LAPACK_zgetsls(char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A,
1321 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
1322 lapack_int *info);
1323
1324#define LAPACK_cggbak LAPACK_GLOBAL(cggbak, CGGBAK)
1325void LAPACK_cggbak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float const *lscale,
1326 float const *rscale, lapack_int const *m, lapack_complex_float *V, lapack_int const *ldv, lapack_int *info);
1327
1328#define LAPACK_dggbak LAPACK_GLOBAL(dggbak, DGGBAK)
1329void LAPACK_dggbak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double const *lscale,
1330 double const *rscale, lapack_int const *m, double *V, lapack_int const *ldv, lapack_int *info);
1331
1332#define LAPACK_sggbak LAPACK_GLOBAL(sggbak, SGGBAK)
1333void LAPACK_sggbak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float const *lscale,
1334 float const *rscale, lapack_int const *m, float *V, lapack_int const *ldv, lapack_int *info);
1335
1336#define LAPACK_zggbak LAPACK_GLOBAL(zggbak, ZGGBAK)
1337void LAPACK_zggbak(char const *job, char const *side, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double const *lscale,
1338 double const *rscale, lapack_int const *m, lapack_complex_double *V, lapack_int const *ldv, lapack_int *info);
1339
1340#define LAPACK_cggbal LAPACK_GLOBAL(cggbal, CGGBAL)
1341void LAPACK_cggbal(char const *job, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B,
1342 lapack_int const *ldb, lapack_int *ilo, lapack_int *ihi, float *lscale, float *rscale, float *work, lapack_int *info);
1343
1344#define LAPACK_dggbal LAPACK_GLOBAL(dggbal, DGGBAL)
1345void LAPACK_dggbal(char const *job, lapack_int const *n, double *A, lapack_int const *lda, double *B, lapack_int const *ldb, lapack_int *ilo,
1346 lapack_int *ihi, double *lscale, double *rscale, double *work, lapack_int *info);
1347
1348#define LAPACK_sggbal LAPACK_GLOBAL(sggbal, SGGBAL)
1349void LAPACK_sggbal(char const *job, lapack_int const *n, float *A, lapack_int const *lda, float *B, lapack_int const *ldb, lapack_int *ilo,
1350 lapack_int *ihi, float *lscale, float *rscale, float *work, lapack_int *info);
1351
1352#define LAPACK_zggbal LAPACK_GLOBAL(zggbal, ZGGBAL)
1353void LAPACK_zggbal(char const *job, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B,
1354 lapack_int const *ldb, lapack_int *ilo, lapack_int *ihi, double *lscale, double *rscale, double *work, lapack_int *info);
1355
1356#define LAPACK_cgges LAPACK_GLOBAL(cgges, CGGES)
1357void LAPACK_cgges(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_C_SELECT2 selctg, lapack_int const *n, lapack_complex_float *A,
1358 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_int *sdim, lapack_complex_float *alpha,
1359 lapack_complex_float *beta, lapack_complex_float *VSL, lapack_int const *ldvsl, lapack_complex_float *VSR, lapack_int const *ldvsr,
1360 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_logical *BWORK, lapack_int *info);
1361
1362#define LAPACK_dgges LAPACK_GLOBAL(dgges, DGGES)
1363void LAPACK_dgges(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_D_SELECT3 selctg, lapack_int const *n, double *A,
1364 lapack_int const *lda, double *B, lapack_int const *ldb, lapack_int *sdim, double *alphar, double *alphai, double *beta,
1365 double *VSL, lapack_int const *ldvsl, double *VSR, lapack_int const *ldvsr, double *work, lapack_int const *lwork,
1366 lapack_logical *BWORK, lapack_int *info);
1367
1368#define LAPACK_sgges LAPACK_GLOBAL(sgges, SGGES)
1369void LAPACK_sgges(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_S_SELECT3 selctg, lapack_int const *n, float *A,
1370 lapack_int const *lda, float *B, lapack_int const *ldb, lapack_int *sdim, float *alphar, float *alphai, float *beta, float *VSL,
1371 lapack_int const *ldvsl, float *VSR, lapack_int const *ldvsr, float *work, lapack_int const *lwork, lapack_logical *BWORK,
1372 lapack_int *info);
1373
1374#define LAPACK_zgges LAPACK_GLOBAL(zgges, ZGGES)
1375void LAPACK_zgges(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_Z_SELECT2 selctg, lapack_int const *n, lapack_complex_double *A,
1376 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_int *sdim, lapack_complex_double *alpha,
1377 lapack_complex_double *beta, lapack_complex_double *VSL, lapack_int const *ldvsl, lapack_complex_double *VSR,
1378 lapack_int const *ldvsr, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_logical *BWORK,
1379 lapack_int *info);
1380
1381#define LAPACK_cgges3 LAPACK_GLOBAL(cgges3, CGGES3)
1382void LAPACK_cgges3(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_C_SELECT2 selctg, lapack_int const *n, lapack_complex_float *A,
1383 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_int *sdim, lapack_complex_float *alpha,
1384 lapack_complex_float *beta, lapack_complex_float *VSL, lapack_int const *ldvsl, lapack_complex_float *VSR, lapack_int const *ldvsr,
1385 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_logical *BWORK, lapack_int *info);
1386
1387#define LAPACK_dgges3 LAPACK_GLOBAL(dgges3, DGGES3)
1388void LAPACK_dgges3(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_D_SELECT3 selctg, lapack_int const *n, double *A,
1389 lapack_int const *lda, double *B, lapack_int const *ldb, lapack_int *sdim, double *alphar, double *alphai, double *beta,
1390 double *VSL, lapack_int const *ldvsl, double *VSR, lapack_int const *ldvsr, double *work, lapack_int const *lwork,
1391 lapack_logical *BWORK, lapack_int *info);
1392
1393#define LAPACK_sgges3 LAPACK_GLOBAL(sgges3, SGGES3)
1394void LAPACK_sgges3(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_S_SELECT3 selctg, lapack_int const *n, float *A,
1395 lapack_int const *lda, float *B, lapack_int const *ldb, lapack_int *sdim, float *alphar, float *alphai, float *beta, float *VSL,
1396 lapack_int const *ldvsl, float *VSR, lapack_int const *ldvsr, float *work, lapack_int const *lwork, lapack_logical *BWORK,
1397 lapack_int *info);
1398
1399#define LAPACK_zgges3 LAPACK_GLOBAL(zgges3, ZGGES3)
1400void LAPACK_zgges3(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_Z_SELECT2 selctg, lapack_int const *n, lapack_complex_double *A,
1401 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_int *sdim, lapack_complex_double *alpha,
1402 lapack_complex_double *beta, lapack_complex_double *VSL, lapack_int const *ldvsl, lapack_complex_double *VSR,
1403 lapack_int const *ldvsr, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_logical *BWORK,
1404 lapack_int *info);
1405
1406#define LAPACK_cggesx LAPACK_GLOBAL(cggesx, CGGESX)
1407void LAPACK_cggesx(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_C_SELECT2 selctg, char const *sense, lapack_int const *n,
1408 lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_int *sdim,
1409 lapack_complex_float *alpha, lapack_complex_float *beta, lapack_complex_float *VSL, lapack_int const *ldvsl,
1410 lapack_complex_float *VSR, lapack_int const *ldvsr, float *rconde, float *rcondv, lapack_complex_float *work,
1411 lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK, lapack_int *info);
1412
1413#define LAPACK_dggesx LAPACK_GLOBAL(dggesx, DGGESX)
1414void LAPACK_dggesx(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_D_SELECT3 selctg, char const *sense, lapack_int const *n,
1415 double *A, lapack_int const *lda, double *B, lapack_int const *ldb, lapack_int *sdim, double *alphar, double *alphai, double *beta,
1416 double *VSL, lapack_int const *ldvsl, double *VSR, lapack_int const *ldvsr, double *rconde, double *rcondv, double *work,
1417 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK, lapack_int *info);
1418
1419#define LAPACK_sggesx LAPACK_GLOBAL(sggesx, SGGESX)
1420void LAPACK_sggesx(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_S_SELECT3 selctg, char const *sense, lapack_int const *n,
1421 float *A, lapack_int const *lda, float *B, lapack_int const *ldb, lapack_int *sdim, float *alphar, float *alphai, float *beta,
1422 float *VSL, lapack_int const *ldvsl, float *VSR, lapack_int const *ldvsr, float *rconde, float *rcondv, float *work,
1423 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK, lapack_int *info);
1424
1425#define LAPACK_zggesx LAPACK_GLOBAL(zggesx, ZGGESX)
1426void LAPACK_zggesx(char const *jobvsl, char const *jobvsr, char const *sort, LAPACK_Z_SELECT2 selctg, char const *sense, lapack_int const *n,
1427 lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_int *sdim,
1428 lapack_complex_double *alpha, lapack_complex_double *beta, lapack_complex_double *VSL, lapack_int const *ldvsl,
1429 lapack_complex_double *VSR, lapack_int const *ldvsr, double *rconde, double *rcondv, lapack_complex_double *work,
1430 lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_int const *liwork, lapack_logical *BWORK, lapack_int *info);
1431
1432#define LAPACK_cggev LAPACK_GLOBAL(cggev, CGGEV)
1433void LAPACK_cggev(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B,
1434 lapack_int const *ldb, lapack_complex_float *alpha, lapack_complex_float *beta, lapack_complex_float *VL, lapack_int const *ldvl,
1435 lapack_complex_float *VR, lapack_int const *ldvr, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
1436 lapack_int *info);
1437
1438#define LAPACK_dggev LAPACK_GLOBAL(dggev, DGGEV)
1439void LAPACK_dggev(char const *jobvl, char const *jobvr, lapack_int const *n, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
1440 double *alphar, double *alphai, double *beta, double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr, double *work,
1441 lapack_int const *lwork, lapack_int *info);
1442
1443#define LAPACK_sggev LAPACK_GLOBAL(sggev, SGGEV)
1444void LAPACK_sggev(char const *jobvl, char const *jobvr, lapack_int const *n, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
1445 float *alphar, float *alphai, float *beta, float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, float *work,
1446 lapack_int const *lwork, lapack_int *info);
1447
1448#define LAPACK_zggev LAPACK_GLOBAL(zggev, ZGGEV)
1449void LAPACK_zggev(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1450 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *alpha, lapack_complex_double *beta,
1451 lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr, lapack_complex_double *work,
1452 lapack_int const *lwork, double *rwork, lapack_int *info);
1453
1454#define LAPACK_cggev3 LAPACK_GLOBAL(cggev3, CGGEV3)
1455void LAPACK_cggev3(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B,
1456 lapack_int const *ldb, lapack_complex_float *alpha, lapack_complex_float *beta, lapack_complex_float *VL, lapack_int const *ldvl,
1457 lapack_complex_float *VR, lapack_int const *ldvr, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
1458 lapack_int *info);
1459
1460#define LAPACK_dggev3 LAPACK_GLOBAL(dggev3, DGGEV3)
1461void LAPACK_dggev3(char const *jobvl, char const *jobvr, lapack_int const *n, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
1462 double *alphar, double *alphai, double *beta, double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr, double *work,
1463 lapack_int const *lwork, lapack_int *info);
1464
1465#define LAPACK_sggev3 LAPACK_GLOBAL(sggev3, SGGEV3)
1466void LAPACK_sggev3(char const *jobvl, char const *jobvr, lapack_int const *n, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
1467 float *alphar, float *alphai, float *beta, float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, float *work,
1468 lapack_int const *lwork, lapack_int *info);
1469
1470#define LAPACK_zggev3 LAPACK_GLOBAL(zggev3, ZGGEV3)
1471void LAPACK_zggev3(char const *jobvl, char const *jobvr, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1472 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *alpha, lapack_complex_double *beta,
1473 lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr, lapack_complex_double *work,
1474 lapack_int const *lwork, double *rwork, lapack_int *info);
1475
1476#define LAPACK_cggevx LAPACK_GLOBAL(cggevx, CGGEVX)
1477void LAPACK_cggevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, lapack_complex_float *A,
1478 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *alpha, lapack_complex_float *beta,
1479 lapack_complex_float *VL, lapack_int const *ldvl, lapack_complex_float *VR, lapack_int const *ldvr, lapack_int *ilo,
1480 lapack_int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv,
1481 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_logical *BWORK, lapack_int *info);
1482
1483#define LAPACK_dggevx LAPACK_GLOBAL(dggevx, DGGEVX)
1484void LAPACK_dggevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, double *A, lapack_int const *lda,
1485 double *B, lapack_int const *ldb, double *alphar, double *alphai, double *beta, double *VL, lapack_int const *ldvl, double *VR,
1486 lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm,
1487 double *rconde, double *rcondv, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_logical *BWORK, lapack_int *info);
1488
1489#define LAPACK_sggevx LAPACK_GLOBAL(sggevx, SGGEVX)
1490void LAPACK_sggevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, float *A, lapack_int const *lda,
1491 float *B, lapack_int const *ldb, float *alphar, float *alphai, float *beta, float *VL, lapack_int const *ldvl, float *VR,
1492 lapack_int const *ldvr, lapack_int *ilo, lapack_int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde,
1493 float *rcondv, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_logical *BWORK, lapack_int *info);
1494
1495#define LAPACK_zggevx LAPACK_GLOBAL(zggevx, ZGGEVX)
1496void LAPACK_zggevx(char const *balanc, char const *jobvl, char const *jobvr, char const *sense, lapack_int const *n, lapack_complex_double *A,
1497 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *alpha, lapack_complex_double *beta,
1498 lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr, lapack_int *ilo,
1499 lapack_int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv,
1500 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_logical *BWORK, lapack_int *info);
1501
1502#define LAPACK_cggglm LAPACK_GLOBAL(cggglm, CGGGLM)
1503void LAPACK_cggglm(lapack_int const *n, lapack_int const *m, lapack_int const *p, lapack_complex_float *A, lapack_int const *lda,
1504 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *D, lapack_complex_float *X, lapack_complex_float *Y,
1505 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
1506
1507#define LAPACK_dggglm LAPACK_GLOBAL(dggglm, DGGGLM)
1508void LAPACK_dggglm(lapack_int const *n, lapack_int const *m, lapack_int const *p, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
1509 double *D, double *X, double *Y, double *work, lapack_int const *lwork, lapack_int *info);
1510
1511#define LAPACK_sggglm LAPACK_GLOBAL(sggglm, SGGGLM)
1512void LAPACK_sggglm(lapack_int const *n, lapack_int const *m, lapack_int const *p, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
1513 float *D, float *X, float *Y, float *work, lapack_int const *lwork, lapack_int *info);
1514
1515#define LAPACK_zggglm LAPACK_GLOBAL(zggglm, ZGGGLM)
1516void LAPACK_zggglm(lapack_int const *n, lapack_int const *m, lapack_int const *p, lapack_complex_double *A, lapack_int const *lda,
1517 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *D, lapack_complex_double *X, lapack_complex_double *Y,
1518 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1519
1520#define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3, CGGHD3)
1521void LAPACK_cgghd3(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_float *A,
1522 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *Q, lapack_int const *ldq,
1523 lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
1524
1525#define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3, DGGHD3)
1526void LAPACK_dgghd3(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double *A,
1527 lapack_int const *lda, double *B, lapack_int const *ldb, double *Q, lapack_int const *ldq, double *Z, lapack_int const *ldz,
1528 double *work, lapack_int const *lwork, lapack_int *info);
1529
1530#define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3, SGGHD3)
1531void LAPACK_sgghd3(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *A,
1532 lapack_int const *lda, float *B, lapack_int const *ldb, float *Q, lapack_int const *ldq, float *Z, lapack_int const *ldz,
1533 float *work, lapack_int const *lwork, lapack_int *info);
1534
1535#define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3, ZGGHD3)
1536void LAPACK_zgghd3(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_double *A,
1537 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *Q, lapack_int const *ldq,
1538 lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1539
1540#define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd, CGGHRD)
1541void LAPACK_cgghrd(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_float *A,
1542 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *Q, lapack_int const *ldq,
1543 lapack_complex_float *Z, lapack_int const *ldz, lapack_int *info);
1544
1545#define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd, DGGHRD)
1546void LAPACK_dgghrd(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double *A,
1547 lapack_int const *lda, double *B, lapack_int const *ldb, double *Q, lapack_int const *ldq, double *Z, lapack_int const *ldz,
1548 lapack_int *info);
1549
1550#define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd, SGGHRD)
1551void LAPACK_sgghrd(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *A,
1552 lapack_int const *lda, float *B, lapack_int const *ldb, float *Q, lapack_int const *ldq, float *Z, lapack_int const *ldz,
1553 lapack_int *info);
1554
1555#define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd, ZGGHRD)
1556void LAPACK_zgghrd(char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_double *A,
1557 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *Q, lapack_int const *ldq,
1558 lapack_complex_double *Z, lapack_int const *ldz, lapack_int *info);
1559
1560#define LAPACK_cgglse LAPACK_GLOBAL(cgglse, CGGLSE)
1561void LAPACK_cgglse(lapack_int const *m, lapack_int const *n, lapack_int const *p, lapack_complex_float *A, lapack_int const *lda,
1562 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *C, lapack_complex_float *D, lapack_complex_float *X,
1563 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
1564
1565#define LAPACK_dgglse LAPACK_GLOBAL(dgglse, DGGLSE)
1566void LAPACK_dgglse(lapack_int const *m, lapack_int const *n, lapack_int const *p, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
1567 double *C, double *D, double *X, double *work, lapack_int const *lwork, lapack_int *info);
1568
1569#define LAPACK_sgglse LAPACK_GLOBAL(sgglse, SGGLSE)
1570void LAPACK_sgglse(lapack_int const *m, lapack_int const *n, lapack_int const *p, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
1571 float *C, float *D, float *X, float *work, lapack_int const *lwork, lapack_int *info);
1572
1573#define LAPACK_zgglse LAPACK_GLOBAL(zgglse, ZGGLSE)
1574void LAPACK_zgglse(lapack_int const *m, lapack_int const *n, lapack_int const *p, lapack_complex_double *A, lapack_int const *lda,
1575 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *C, lapack_complex_double *D, lapack_complex_double *X,
1576 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1577
1578#define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf, CGGQRF)
1579void LAPACK_cggqrf(lapack_int const *n, lapack_int const *m, lapack_int const *p, lapack_complex_float *A, lapack_int const *lda,
1580 lapack_complex_float *taua, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *taub, lapack_complex_float *work,
1581 lapack_int const *lwork, lapack_int *info);
1582
1583#define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf, DGGQRF)
1584void LAPACK_dggqrf(lapack_int const *n, lapack_int const *m, lapack_int const *p, double *A, lapack_int const *lda, double *taua, double *B,
1585 lapack_int const *ldb, double *taub, double *work, lapack_int const *lwork, lapack_int *info);
1586
1587#define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf, SGGQRF)
1588void LAPACK_sggqrf(lapack_int const *n, lapack_int const *m, lapack_int const *p, float *A, lapack_int const *lda, float *taua, float *B,
1589 lapack_int const *ldb, float *taub, float *work, lapack_int const *lwork, lapack_int *info);
1590
1591#define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf, ZGGQRF)
1592void LAPACK_zggqrf(lapack_int const *n, lapack_int const *m, lapack_int const *p, lapack_complex_double *A, lapack_int const *lda,
1593 lapack_complex_double *taua, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *taub,
1594 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1595
1596#define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf, CGGRQF)
1597void LAPACK_cggrqf(lapack_int const *m, lapack_int const *p, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1598 lapack_complex_float *taua, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *taub, lapack_complex_float *work,
1599 lapack_int const *lwork, lapack_int *info);
1600
1601#define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf, DGGRQF)
1602void LAPACK_dggrqf(lapack_int const *m, lapack_int const *p, lapack_int const *n, double *A, lapack_int const *lda, double *taua, double *B,
1603 lapack_int const *ldb, double *taub, double *work, lapack_int const *lwork, lapack_int *info);
1604
1605#define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf, SGGRQF)
1606void LAPACK_sggrqf(lapack_int const *m, lapack_int const *p, lapack_int const *n, float *A, lapack_int const *lda, float *taua, float *B,
1607 lapack_int const *ldb, float *taub, float *work, lapack_int const *lwork, lapack_int *info);
1608
1609#define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf, ZGGRQF)
1610void LAPACK_zggrqf(lapack_int const *m, lapack_int const *p, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1611 lapack_complex_double *taua, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *taub,
1612 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1613
1614#define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3, CGGSVD3)
1615void LAPACK_cggsvd3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *n, lapack_int const *p,
1616 lapack_int *k, lapack_int *l, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb,
1617 float *alpha, float *beta, lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *V, lapack_int const *ldv,
1618 lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
1619 lapack_int *iwork, lapack_int *info);
1620
1621#define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3, DGGSVD3)
1622void LAPACK_dggsvd3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *n, lapack_int const *p,
1623 lapack_int *k, lapack_int *l, double *A, lapack_int const *lda, double *B, lapack_int const *ldb, double *alpha, double *beta,
1624 double *U, lapack_int const *ldu, double *V, lapack_int const *ldv, double *Q, lapack_int const *ldq, double *work,
1625 lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
1626
1627#define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3, SGGSVD3)
1628void LAPACK_sggsvd3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *n, lapack_int const *p,
1629 lapack_int *k, lapack_int *l, float *A, lapack_int const *lda, float *B, lapack_int const *ldb, float *alpha, float *beta,
1630 float *U, lapack_int const *ldu, float *V, lapack_int const *ldv, float *Q, lapack_int const *ldq, float *work,
1631 lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
1632
1633#define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3, ZGGSVD3)
1634void LAPACK_zggsvd3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *n, lapack_int const *p,
1635 lapack_int *k, lapack_int *l, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb,
1636 double *alpha, double *beta, lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *V, lapack_int const *ldv,
1637 lapack_complex_double *Q, lapack_int const *ldq, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
1638 lapack_int *iwork, lapack_int *info);
1639
1640#define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3, CGGSVP3)
1641void LAPACK_cggsvp3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
1642 lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, float const *tola,
1643 float const *tolb, lapack_int *k, lapack_int *l, lapack_complex_float *U, lapack_int const *ldu, lapack_complex_float *V,
1644 lapack_int const *ldv, lapack_complex_float *Q, lapack_int const *ldq, lapack_int *iwork, float *rwork, lapack_complex_float *tau,
1645 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
1646
1647#define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3, DGGSVP3)
1648void LAPACK_dggsvp3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n, double *A,
1649 lapack_int const *lda, double *B, lapack_int const *ldb, double const *tola, double const *tolb, lapack_int *k, lapack_int *l,
1650 double *U, lapack_int const *ldu, double *V, lapack_int const *ldv, double *Q, lapack_int const *ldq, lapack_int *iwork,
1651 double *tau, double *work, lapack_int const *lwork, lapack_int *info);
1652
1653#define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3, SGGSVP3)
1654void LAPACK_sggsvp3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n, float *A,
1655 lapack_int const *lda, float *B, lapack_int const *ldb, float const *tola, float const *tolb, lapack_int *k, lapack_int *l,
1656 float *U, lapack_int const *ldu, float *V, lapack_int const *ldv, float *Q, lapack_int const *ldq, lapack_int *iwork, float *tau,
1657 float *work, lapack_int const *lwork, lapack_int *info);
1658
1659#define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3, ZGGSVP3)
1660void LAPACK_zggsvp3(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
1661 lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, double const *tola,
1662 double const *tolb, lapack_int *k, lapack_int *l, lapack_complex_double *U, lapack_int const *ldu, lapack_complex_double *V,
1663 lapack_int const *ldv, lapack_complex_double *Q, lapack_int const *ldq, lapack_int *iwork, double *rwork,
1664 lapack_complex_double *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
1665
1666#define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon, CGTCON)
1667void LAPACK_cgtcon(char const *norm, lapack_int const *n, lapack_complex_float const *DL, lapack_complex_float const *D,
1668 lapack_complex_float const *DU, lapack_complex_float const *DU2, lapack_int const *ipiv, float const *anorm, float *rcond,
1669 lapack_complex_float *work, lapack_int *info);
1670
1671#define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon, DGTCON)
1672void LAPACK_dgtcon(char const *norm, lapack_int const *n, double const *DL, double const *D, double const *DU, double const *DU2,
1673 lapack_int const *ipiv, double const *anorm, double *rcond, double *work, lapack_int *iwork, lapack_int *info);
1674
1675#define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon, SGTCON)
1676void LAPACK_sgtcon(char const *norm, lapack_int const *n, float const *DL, float const *D, float const *DU, float const *DU2, lapack_int const *ipiv,
1677 float const *anorm, float *rcond, float *work, lapack_int *iwork, lapack_int *info);
1678
1679#define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon, ZGTCON)
1680void LAPACK_zgtcon(char const *norm, lapack_int const *n, lapack_complex_double const *DL, lapack_complex_double const *D,
1681 lapack_complex_double const *DU, lapack_complex_double const *DU2, lapack_int const *ipiv, double const *anorm, double *rcond,
1682 lapack_complex_double *work, lapack_int *info);
1683
1684#define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs, CGTRFS)
1685void LAPACK_cgtrfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *DL, lapack_complex_float const *D,
1686 lapack_complex_float const *DU, lapack_complex_float const *DLF, lapack_complex_float const *DF, lapack_complex_float const *DUF,
1687 lapack_complex_float const *DU2, lapack_int const *ipiv, lapack_complex_float const *B, lapack_int const *ldb,
1688 lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work, float *rwork,
1689 lapack_int *info);
1690
1691#define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs, DGTRFS)
1692void LAPACK_dgtrfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, double const *DL, double const *D, double const *DU,
1693 double const *DLF, double const *DF, double const *DUF, double const *DU2, lapack_int const *ipiv, double const *B,
1694 lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr, double *berr, double *work, lapack_int *iwork,
1695 lapack_int *info);
1696
1697#define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs, SGTRFS)
1698void LAPACK_sgtrfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, float const *DL, float const *D, float const *DU, float const *DLF,
1699 float const *DF, float const *DUF, float const *DU2, lapack_int const *ipiv, float const *B, lapack_int const *ldb, float *X,
1700 lapack_int const *ldx, float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
1701
1702#define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs, ZGTRFS)
1703void LAPACK_zgtrfs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *DL, lapack_complex_double const *D,
1704 lapack_complex_double const *DU, lapack_complex_double const *DLF, lapack_complex_double const *DF,
1705 lapack_complex_double const *DUF, lapack_complex_double const *DU2, lapack_int const *ipiv, lapack_complex_double const *B,
1706 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work,
1707 double *rwork, lapack_int *info);
1708
1709#define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv, CGTSV)
1710void LAPACK_cgtsv(lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *DL, lapack_complex_float *D, lapack_complex_float *DU,
1711 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
1712
1713#define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv, DGTSV)
1714void LAPACK_dgtsv(lapack_int const *n, lapack_int const *nrhs, double *DL, double *D, double *DU, double *B, lapack_int const *ldb, lapack_int *info);
1715
1716#define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv, SGTSV)
1717void LAPACK_sgtsv(lapack_int const *n, lapack_int const *nrhs, float *DL, float *D, float *DU, float *B, lapack_int const *ldb, lapack_int *info);
1718
1719#define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv, ZGTSV)
1720void LAPACK_zgtsv(lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *DL, lapack_complex_double *D, lapack_complex_double *DU,
1721 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
1722
1723#define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx, CGTSVX)
1724void LAPACK_cgtsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *DL,
1725 lapack_complex_float const *D, lapack_complex_float const *DU, lapack_complex_float *DLF, lapack_complex_float *DF,
1726 lapack_complex_float *DUF, lapack_complex_float *DU2, lapack_int *ipiv, lapack_complex_float const *B, lapack_int const *ldb,
1727 lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork,
1728 lapack_int *info);
1729
1730#define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx, DGTSVX)
1731void LAPACK_dgtsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, double const *DL, double const *D,
1732 double const *DU, double *DLF, double *DF, double *DUF, double *DU2, lapack_int *ipiv, double const *B, lapack_int const *ldb,
1733 double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
1734
1735#define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx, SGTSVX)
1736void LAPACK_sgtsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, float const *DL, float const *D, float const *DU,
1737 float *DLF, float *DF, float *DUF, float *DU2, lapack_int *ipiv, float const *B, lapack_int const *ldb, float *X,
1738 lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
1739
1740#define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx, ZGTSVX)
1741void LAPACK_zgtsvx(char const *fact, char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *DL,
1742 lapack_complex_double const *D, lapack_complex_double const *DU, lapack_complex_double *DLF, lapack_complex_double *DF,
1743 lapack_complex_double *DUF, lapack_complex_double *DU2, lapack_int *ipiv, lapack_complex_double const *B, lapack_int const *ldb,
1744 lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work,
1745 double *rwork, lapack_int *info);
1746
1747#define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf, CGTTRF)
1748void LAPACK_cgttrf(lapack_int const *n, lapack_complex_float *DL, lapack_complex_float *D, lapack_complex_float *DU, lapack_complex_float *DU2,
1749 lapack_int *ipiv, lapack_int *info);
1750
1751#define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf, DGTTRF)
1752void LAPACK_dgttrf(lapack_int const *n, double *DL, double *D, double *DU, double *DU2, lapack_int *ipiv, lapack_int *info);
1753
1754#define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf, SGTTRF)
1755void LAPACK_sgttrf(lapack_int const *n, float *DL, float *D, float *DU, float *DU2, lapack_int *ipiv, lapack_int *info);
1756
1757#define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf, ZGTTRF)
1758void LAPACK_zgttrf(lapack_int const *n, lapack_complex_double *DL, lapack_complex_double *D, lapack_complex_double *DU, lapack_complex_double *DU2,
1759 lapack_int *ipiv, lapack_int *info);
1760
1761#define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs, CGTTRS)
1762void LAPACK_cgttrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *DL, lapack_complex_float const *D,
1763 lapack_complex_float const *DU, lapack_complex_float const *DU2, lapack_int const *ipiv, lapack_complex_float *B,
1764 lapack_int const *ldb, lapack_int *info);
1765
1766#define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs, DGTTRS)
1767void LAPACK_dgttrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, double const *DL, double const *D, double const *DU,
1768 double const *DU2, lapack_int const *ipiv, double *B, lapack_int const *ldb, lapack_int *info);
1769
1770#define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs, SGTTRS)
1771void LAPACK_sgttrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, float const *DL, float const *D, float const *DU, float const *DU2,
1772 lapack_int const *ipiv, float *B, lapack_int const *ldb, lapack_int *info);
1773
1774#define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs, ZGTTRS)
1775void LAPACK_zgttrs(char const *trans, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *DL, lapack_complex_double const *D,
1776 lapack_complex_double const *DU, lapack_complex_double const *DU2, lapack_int const *ipiv, lapack_complex_double *B,
1777 lapack_int const *ldb, lapack_int *info);
1778
1779#define LAPACK_chbev LAPACK_GLOBAL(chbev, CHBEV)
1780void LAPACK_chbev(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB, lapack_int const *ldab,
1781 float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, float *rwork, lapack_int *info);
1782
1783#define LAPACK_zhbev LAPACK_GLOBAL(zhbev, ZHBEV)
1784void LAPACK_zhbev(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB, lapack_int const *ldab,
1785 double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, double *rwork, lapack_int *info);
1786
1787#define LAPACK_chbev_2stage LAPACK_GLOBAL(chbev_2stage, CHBEV_2STAGE)
1788void LAPACK_chbev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB,
1789 lapack_int const *ldab, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work,
1790 lapack_int const *lwork, float *rwork, lapack_int *info);
1791
1792#define LAPACK_zhbev_2stage LAPACK_GLOBAL(zhbev_2stage, ZHBEV_2STAGE)
1793void LAPACK_zhbev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB,
1794 lapack_int const *ldab, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work,
1795 lapack_int const *lwork, double *rwork, lapack_int *info);
1796
1797#define LAPACK_chbevd LAPACK_GLOBAL(chbevd, CHBEVD)
1798void LAPACK_chbevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB, lapack_int const *ldab,
1799 float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
1800 lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1801
1802#define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd, ZHBEVD)
1803void LAPACK_zhbevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB, lapack_int const *ldab,
1804 double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
1805 lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1806
1807#define LAPACK_chbevd_2stage LAPACK_GLOBAL(chbevd_2stage, CHBEVD_2STAGE)
1808void LAPACK_chbevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB,
1809 lapack_int const *ldab, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work,
1810 lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork,
1811 lapack_int *info);
1812
1813#define LAPACK_zhbevd_2stage LAPACK_GLOBAL(zhbevd_2stage, ZHBEVD_2STAGE)
1814void LAPACK_zhbevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB,
1815 lapack_int const *ldab, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work,
1816 lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork,
1817 lapack_int *info);
1818
1819#define LAPACK_chbevx LAPACK_GLOBAL(chbevx, CHBEVX)
1820void LAPACK_chbevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB,
1821 lapack_int const *ldab, lapack_complex_float *Q, lapack_int const *ldq, float const *vl, float const *vu, lapack_int const *il,
1822 lapack_int const *iu, float const *abstol, lapack_int *m, float *W, lapack_complex_float *Z, lapack_int const *ldz,
1823 lapack_complex_float *work, float *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1824
1825#define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx, ZHBEVX)
1826void LAPACK_zhbevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB,
1827 lapack_int const *ldab, lapack_complex_double *Q, lapack_int const *ldq, double const *vl, double const *vu, lapack_int const *il,
1828 lapack_int const *iu, double const *abstol, lapack_int *m, double *W, lapack_complex_double *Z, lapack_int const *ldz,
1829 lapack_complex_double *work, double *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1830
1831#define LAPACK_chbevx_2stage LAPACK_GLOBAL(chbevx_2stage, CHBEVX_2STAGE)
1832void LAPACK_chbevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB,
1833 lapack_int const *ldab, lapack_complex_float *Q, lapack_int const *ldq, float const *vl, float const *vu,
1834 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, lapack_complex_float *Z,
1835 lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *iwork,
1836 lapack_int *IFAIL, lapack_int *info);
1837
1838#define LAPACK_zhbevx_2stage LAPACK_GLOBAL(zhbevx_2stage, ZHBEVX_2STAGE)
1839void LAPACK_zhbevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB,
1840 lapack_int const *ldab, lapack_complex_double *Q, lapack_int const *ldq, double const *vl, double const *vu,
1841 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, lapack_complex_double *Z,
1842 lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *iwork,
1843 lapack_int *IFAIL, lapack_int *info);
1844
1845#define LAPACK_chbgst LAPACK_GLOBAL(chbgst, CHBGST)
1846void LAPACK_chbgst(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_float *AB,
1847 lapack_int const *ldab, lapack_complex_float const *BB, lapack_int const *ldbb, lapack_complex_float *X, lapack_int const *ldx,
1848 lapack_complex_float *work, float *rwork, lapack_int *info);
1849
1850#define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst, ZHBGST)
1851void LAPACK_zhbgst(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_double *AB,
1852 lapack_int const *ldab, lapack_complex_double const *BB, lapack_int const *ldbb, lapack_complex_double *X, lapack_int const *ldx,
1853 lapack_complex_double *work, double *rwork, lapack_int *info);
1854
1855#define LAPACK_chbgv LAPACK_GLOBAL(chbgv, CHBGV)
1856void LAPACK_chbgv(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_float *AB,
1857 lapack_int const *ldab, lapack_complex_float *BB, lapack_int const *ldbb, float *W, lapack_complex_float *Z, lapack_int const *ldz,
1858 lapack_complex_float *work, float *rwork, lapack_int *info);
1859
1860#define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv, ZHBGV)
1861void LAPACK_zhbgv(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_double *AB,
1862 lapack_int const *ldab, lapack_complex_double *BB, lapack_int const *ldbb, double *W, lapack_complex_double *Z,
1863 lapack_int const *ldz, lapack_complex_double *work, double *rwork, lapack_int *info);
1864
1865#define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd, CHBGVD)
1866void LAPACK_chbgvd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_float *AB,
1867 lapack_int const *ldab, lapack_complex_float *BB, lapack_int const *ldbb, float *W, lapack_complex_float *Z, lapack_int const *ldz,
1868 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork,
1869 lapack_int const *liwork, lapack_int *info);
1870
1871#define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd, ZHBGVD)
1872void LAPACK_zhbgvd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, lapack_complex_double *AB,
1873 lapack_int const *ldab, lapack_complex_double *BB, lapack_int const *ldbb, double *W, lapack_complex_double *Z,
1874 lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork,
1875 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1876
1877#define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx, CHBGVX)
1878void LAPACK_chbgvx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb,
1879 lapack_complex_float *AB, lapack_int const *ldab, lapack_complex_float *BB, lapack_int const *ldbb, lapack_complex_float *Q,
1880 lapack_int const *ldq, float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol,
1881 lapack_int *m, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, float *rwork,
1882 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1883
1884#define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx, ZHBGVX)
1885void LAPACK_zhbgvx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb,
1886 lapack_complex_double *AB, lapack_int const *ldab, lapack_complex_double *BB, lapack_int const *ldbb, lapack_complex_double *Q,
1887 lapack_int const *ldq, double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol,
1888 lapack_int *m, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, double *rwork,
1889 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1890
1891#define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd, CHBTRD)
1892void LAPACK_chbtrd(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB, lapack_int const *ldab,
1893 float *D, float *E, lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *work, lapack_int *info);
1894
1895#define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd, ZHBTRD)
1896void LAPACK_zhbtrd(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB, lapack_int const *ldab,
1897 double *D, double *E, lapack_complex_double *Q, lapack_int const *ldq, lapack_complex_double *work, lapack_int *info);
1898
1899#define LAPACK_checon LAPACK_GLOBAL(checon, CHECON)
1900void LAPACK_checon(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, lapack_int const *ipiv,
1901 float const *anorm, float *rcond, lapack_complex_float *work, lapack_int *info);
1902
1903#define LAPACK_zhecon LAPACK_GLOBAL(zhecon, ZHECON)
1904void LAPACK_zhecon(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_int const *ipiv,
1905 double const *anorm, double *rcond, lapack_complex_double *work, lapack_int *info);
1906
1907#define LAPACK_checon_3 LAPACK_GLOBAL(checon_3, CHECON_3)
1908void LAPACK_checon_3(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *E,
1909 lapack_int const *ipiv, float const *anorm, float *rcond, lapack_complex_float *work, lapack_int *info);
1910
1911#define LAPACK_zhecon_3 LAPACK_GLOBAL(zhecon_3, ZHECON_3)
1912void LAPACK_zhecon_3(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *E,
1913 lapack_int const *ipiv, double const *anorm, double *rcond, lapack_complex_double *work, lapack_int *info);
1914
1915#define LAPACK_cheequb LAPACK_GLOBAL(cheequb, CHEEQUB)
1916void LAPACK_cheequb(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *S, float *scond, float *amax,
1917 lapack_complex_float *work, lapack_int *info);
1918
1919#define LAPACK_zheequb LAPACK_GLOBAL(zheequb, ZHEEQUB)
1920void LAPACK_zheequb(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *S, double *scond,
1921 double *amax, lapack_complex_double *work, lapack_int *info);
1922
1923#define LAPACK_cheev LAPACK_GLOBAL(cheev, CHEEV)
1924void LAPACK_cheev(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *W,
1925 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
1926
1927#define LAPACK_zheev LAPACK_GLOBAL(zheev, ZHEEV)
1928void LAPACK_zheev(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *W,
1929 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
1930
1931#define LAPACK_cheev_2stage LAPACK_GLOBAL(cheev_2stage, CHEEV_2STAGE)
1932void LAPACK_cheev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *W,
1933 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
1934
1935#define LAPACK_zheev_2stage LAPACK_GLOBAL(zheev_2stage, ZHEEV_2STAGE)
1936void LAPACK_zheev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *W,
1937 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
1938
1939#define LAPACK_cheevd LAPACK_GLOBAL(cheevd, CHEEVD)
1940void LAPACK_cheevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *W,
1941 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork,
1942 lapack_int const *liwork, lapack_int *info);
1943
1944#define LAPACK_zheevd LAPACK_GLOBAL(zheevd, ZHEEVD)
1945void LAPACK_zheevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *W,
1946 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork,
1947 lapack_int const *liwork, lapack_int *info);
1948
1949#define LAPACK_cheevd_2stage LAPACK_GLOBAL(cheevd_2stage, CHEEVD_2STAGE)
1950void LAPACK_cheevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *W,
1951 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork,
1952 lapack_int const *liwork, lapack_int *info);
1953
1954#define LAPACK_zheevd_2stage LAPACK_GLOBAL(zheevd_2stage, ZHEEVD_2STAGE)
1955void LAPACK_zheevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *W,
1956 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork,
1957 lapack_int const *liwork, lapack_int *info);
1958
1959#define LAPACK_cheevr LAPACK_GLOBAL(cheevr, CHEEVR)
1960void LAPACK_cheevr(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1961 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
1962 lapack_complex_float *Z, lapack_int const *ldz, lapack_int *ISUPPZ, lapack_complex_float *work, lapack_int const *lwork,
1963 float *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1964
1965#define LAPACK_zheevr LAPACK_GLOBAL(zheevr, ZHEEVR)
1966void LAPACK_zheevr(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1967 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W,
1968 lapack_complex_double *Z, lapack_int const *ldz, lapack_int *ISUPPZ, lapack_complex_double *work, lapack_int const *lwork,
1969 double *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1970
1971#define LAPACK_cheevr_2stage LAPACK_GLOBAL(cheevr_2stage, CHEEVR_2STAGE)
1972void LAPACK_cheevr_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1973 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
1974 lapack_complex_float *Z, lapack_int const *ldz, lapack_int *ISUPPZ, lapack_complex_float *work, lapack_int const *lwork,
1975 float *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
1976
1977#define LAPACK_zheevr_2stage LAPACK_GLOBAL(zheevr_2stage, ZHEEVR_2STAGE)
1978void LAPACK_zheevr_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1979 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m,
1980 double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_int *ISUPPZ, lapack_complex_double *work,
1981 lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork,
1982 lapack_int *info);
1983
1984#define LAPACK_cheevx LAPACK_GLOBAL(cheevx, CHEEVX)
1985void LAPACK_cheevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1986 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
1987 lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
1988 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1989
1990#define LAPACK_zheevx LAPACK_GLOBAL(zheevx, ZHEEVX)
1991void LAPACK_zheevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
1992 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W,
1993 lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
1994 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
1995
1996#define LAPACK_cheevx_2stage LAPACK_GLOBAL(cheevx_2stage, CHEEVX_2STAGE)
1997void LAPACK_cheevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
1998 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
1999 lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
2000 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2001
2002#define LAPACK_zheevx_2stage LAPACK_GLOBAL(zheevx_2stage, ZHEEVX_2STAGE)
2003void LAPACK_zheevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
2004 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m,
2005 double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork,
2006 double *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2007
2008#define LAPACK_chegst LAPACK_GLOBAL(chegst, CHEGST)
2009void LAPACK_chegst(lapack_int const *itype, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
2010 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2011
2012#define LAPACK_zhegst LAPACK_GLOBAL(zhegst, ZHEGST)
2013void LAPACK_zhegst(lapack_int const *itype, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
2014 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2015
2016#define LAPACK_chegv LAPACK_GLOBAL(chegv, CHEGV)
2017void LAPACK_chegv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
2018 lapack_complex_float *B, lapack_int const *ldb, float *W, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
2019 lapack_int *info);
2020
2021#define LAPACK_zhegv LAPACK_GLOBAL(zhegv, ZHEGV)
2022void LAPACK_zhegv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
2023 lapack_complex_double *B, lapack_int const *ldb, double *W, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
2024 lapack_int *info);
2025
2026#define LAPACK_chegv_2stage LAPACK_GLOBAL(chegv_2stage, CHEGV_2STAGE)
2027void LAPACK_chegv_2stage(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A,
2028 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, float *W, lapack_complex_float *work,
2029 lapack_int const *lwork, float *rwork, lapack_int *info);
2030
2031#define LAPACK_zhegv_2stage LAPACK_GLOBAL(zhegv_2stage, ZHEGV_2STAGE)
2032void LAPACK_zhegv_2stage(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A,
2033 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, double *W, lapack_complex_double *work,
2034 lapack_int const *lwork, double *rwork, lapack_int *info);
2035
2036#define LAPACK_chegvd LAPACK_GLOBAL(chegvd, CHEGVD)
2037void LAPACK_chegvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
2038 lapack_complex_float *B, lapack_int const *ldb, float *W, lapack_complex_float *work, lapack_int const *lwork, float *rwork,
2039 lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2040
2041#define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd, ZHEGVD)
2042void LAPACK_zhegvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
2043 lapack_complex_double *B, lapack_int const *ldb, double *W, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
2044 lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2045
2046#define LAPACK_chegvx LAPACK_GLOBAL(chegvx, CHEGVX)
2047void LAPACK_chegvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *A,
2048 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, float const *vl, float const *vu, lapack_int const *il,
2049 lapack_int const *iu, float const *abstol, lapack_int *m, float *W, lapack_complex_float *Z, lapack_int const *ldz,
2050 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2051
2052#define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx, ZHEGVX)
2053void LAPACK_zhegvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *A,
2054 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, double const *vl, double const *vu, lapack_int const *il,
2055 lapack_int const *iu, double const *abstol, lapack_int *m, double *W, lapack_complex_double *Z, lapack_int const *ldz,
2056 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2057
2058#define LAPACK_cherfs LAPACK_GLOBAL(cherfs, CHERFS)
2059void LAPACK_cherfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2060 lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_float const *B,
2061 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work,
2062 float *rwork, lapack_int *info);
2063
2064#define LAPACK_zherfs LAPACK_GLOBAL(zherfs, ZHERFS)
2065void LAPACK_zherfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2066 lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_double const *B,
2067 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work,
2068 double *rwork, lapack_int *info);
2069
2070#define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx, CHERFSX)
2071void LAPACK_cherfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
2072 lapack_int const *lda, lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, float *S,
2073 lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *berr,
2074 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params,
2075 lapack_complex_float *work, float *rwork, lapack_int *info);
2076
2077#define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx, ZHERFSX)
2078void LAPACK_zherfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
2079 lapack_int const *lda, lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, double *S,
2080 lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond,
2081 double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams,
2082 double *params, lapack_complex_double *work, double *rwork, lapack_int *info);
2083
2084#define LAPACK_chesv LAPACK_GLOBAL(chesv, CHESV)
2085void LAPACK_chesv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
2086 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2087
2088#define LAPACK_zhesv LAPACK_GLOBAL(zhesv, ZHESV)
2089void LAPACK_zhesv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
2090 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2091
2092#define LAPACK_chesv_aa LAPACK_GLOBAL(chesv_aa, CHESV_AA)
2093void LAPACK_chesv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
2094 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2095
2096#define LAPACK_zhesv_aa LAPACK_GLOBAL(zhesv_aa, ZHESV_AA)
2097void LAPACK_zhesv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
2098 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2099
2100#define LAPACK_chesv_aa_2stage LAPACK_GLOBAL(chesv_aa_2stage, CHESV_AA_2STAGE)
2101void LAPACK_chesv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
2102 lapack_complex_float *TB, lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_float *B,
2103 lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2104
2105#define LAPACK_zhesv_aa_2stage LAPACK_GLOBAL(zhesv_aa_2stage, ZHESV_AA_2STAGE)
2106void LAPACK_zhesv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
2107 lapack_complex_double *TB, lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_double *B,
2108 lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2109
2110#define LAPACK_chesv_rk LAPACK_GLOBAL(chesv_rk, CHESV_RK)
2111void LAPACK_chesv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
2112 lapack_complex_float *E, lapack_int *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work,
2113 lapack_int const *lwork, lapack_int *info);
2114
2115#define LAPACK_zhesv_rk LAPACK_GLOBAL(zhesv_rk, ZHESV_RK)
2116void LAPACK_zhesv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
2117 lapack_complex_double *E, lapack_int *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work,
2118 lapack_int const *lwork, lapack_int *info);
2119
2120#define LAPACK_chesv_rook LAPACK_GLOBAL(chesv_rook, CHESV_ROOK)
2121void LAPACK_chesv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
2122 lapack_int *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork,
2123 lapack_int *info);
2124
2125#define LAPACK_zhesv_rook LAPACK_GLOBAL(zhesv_rook, ZHESV_ROOK)
2126void LAPACK_zhesv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
2127 lapack_int *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
2128 lapack_int *info);
2129
2130#define LAPACK_chesvx LAPACK_GLOBAL(chesvx, CHESVX)
2131void LAPACK_chesvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
2132 lapack_int const *lda, lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, lapack_complex_float const *B,
2133 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr,
2134 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
2135
2136#define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx, ZHESVX)
2137void LAPACK_zhesvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
2138 lapack_int const *lda, lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, lapack_complex_double const *B,
2139 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr,
2140 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
2141
2142#define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx, CHESVXX)
2143void LAPACK_chesvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
2144 lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *S, lapack_complex_float *B,
2145 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr,
2146 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params,
2147 lapack_complex_float *work, float *rwork, lapack_int *info);
2148
2149#define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx, ZHESVXX)
2150void LAPACK_zhesvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
2151 lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *S, lapack_complex_double *B,
2152 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr,
2153 lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params,
2154 lapack_complex_double *work, double *rwork, lapack_int *info);
2155
2156#define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr, CHESWAPR)
2157void LAPACK_cheswapr(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *i1,
2158 lapack_int const *i2);
2159
2160#define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr, ZHESWAPR)
2161void LAPACK_zheswapr(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *i1,
2162 lapack_int const *i2);
2163
2164#define LAPACK_chetrd LAPACK_GLOBAL(chetrd, CHETRD)
2165void LAPACK_chetrd(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *D, float *E,
2166 lapack_complex_float *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2167
2168#define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd, ZHETRD)
2169void LAPACK_zhetrd(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *D, double *E,
2170 lapack_complex_double *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2171
2172#define LAPACK_chetrd_2stage LAPACK_GLOBAL(chetrd_2stage, CHETRD_2STAGE)
2173void LAPACK_chetrd_2stage(char const *vect, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, float *D, float *E,
2174 lapack_complex_float *tau, lapack_complex_float *HOUS2, lapack_int const *lhous2, lapack_complex_float *work,
2175 lapack_int const *lwork, lapack_int *info);
2176
2177#define LAPACK_zhetrd_2stage LAPACK_GLOBAL(zhetrd_2stage, ZHETRD_2STAGE)
2178void LAPACK_zhetrd_2stage(char const *vect, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, double *D,
2179 double *E, lapack_complex_double *tau, lapack_complex_double *HOUS2, lapack_int const *lhous2, lapack_complex_double *work,
2180 lapack_int const *lwork, lapack_int *info);
2181
2182#define LAPACK_chetrf LAPACK_GLOBAL(chetrf, CHETRF)
2183void LAPACK_chetrf(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
2184 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2185
2186#define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf, ZHETRF)
2187void LAPACK_zhetrf(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
2188 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2189
2190#define LAPACK_chetrf_aa LAPACK_GLOBAL(chetrf_aa, CHETRF_AA)
2191void LAPACK_chetrf_aa(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
2192 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2193
2194#define LAPACK_zhetrf_aa LAPACK_GLOBAL(zhetrf_aa, ZHETRF_AA)
2195void LAPACK_zhetrf_aa(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
2196 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2197
2198#define LAPACK_chetrf_aa_2stage LAPACK_GLOBAL(chetrf_aa_2stage, CHETRF_AA_2STAGE)
2199void LAPACK_chetrf_aa_2stage(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *TB,
2200 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_float *work, lapack_int const *lwork,
2201 lapack_int *info);
2202
2203#define LAPACK_zhetrf_aa_2stage LAPACK_GLOBAL(zhetrf_aa_2stage, ZHETRF_AA_2STAGE)
2204void LAPACK_zhetrf_aa_2stage(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *TB,
2205 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_double *work, lapack_int const *lwork,
2206 lapack_int *info);
2207
2208#define LAPACK_chetrf_rk LAPACK_GLOBAL(chetrf_rk, CHETRF_RK)
2209void LAPACK_chetrf_rk(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *E,
2210 lapack_int *ipiv, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2211
2212#define LAPACK_zhetrf_rk LAPACK_GLOBAL(zhetrf_rk, ZHETRF_RK)
2213void LAPACK_zhetrf_rk(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *E,
2214 lapack_int *ipiv, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2215
2216#define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook, CHETRF_ROOK)
2217void LAPACK_chetrf_rook(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
2218 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2219
2220#define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook, ZHETRF_ROOK)
2221void LAPACK_zhetrf_rook(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
2222 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2223
2224#define LAPACK_chetri LAPACK_GLOBAL(chetri, CHETRI)
2225void LAPACK_chetri(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
2226 lapack_complex_float *work, lapack_int *info);
2227
2228#define LAPACK_zhetri LAPACK_GLOBAL(zhetri, ZHETRI)
2229void LAPACK_zhetri(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
2230 lapack_complex_double *work, lapack_int *info);
2231
2232#define LAPACK_chetri2 LAPACK_GLOBAL(chetri2, CHETRI2)
2233void LAPACK_chetri2(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
2234 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2235
2236#define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2, ZHETRI2)
2237void LAPACK_zhetri2(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
2238 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2239
2240#define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x, CHETRI2X)
2241void LAPACK_chetri2x(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
2242 lapack_complex_float *work, lapack_int const *nb, lapack_int *info);
2243
2244#define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x, ZHETRI2X)
2245void LAPACK_zhetri2x(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
2246 lapack_complex_double *work, lapack_int const *nb, lapack_int *info);
2247
2248#define LAPACK_chetri_3 LAPACK_GLOBAL(chetri_3, CHETRI_3)
2249void LAPACK_chetri_3(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float const *E,
2250 lapack_int const *ipiv, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
2251
2252#define LAPACK_zhetri_3 LAPACK_GLOBAL(zhetri_3, ZHETRI_3)
2253void LAPACK_zhetri_3(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double const *E,
2254 lapack_int const *ipiv, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
2255
2256#define LAPACK_chetrs LAPACK_GLOBAL(chetrs, CHETRS)
2257void LAPACK_chetrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2258 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2259
2260#define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs, ZHETRS)
2261void LAPACK_zhetrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2262 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2263
2264#define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2, CHETRS2)
2265void LAPACK_chetrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2266 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int *info);
2267
2268#define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2, ZHETRS2)
2269void LAPACK_zhetrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2270 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int *info);
2271
2272#define LAPACK_chetrs_3 LAPACK_GLOBAL(chetrs_3, CHETRS_3)
2273void LAPACK_chetrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2274 lapack_complex_float const *E, lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2275
2276#define LAPACK_zhetrs_3 LAPACK_GLOBAL(zhetrs_3, ZHETRS_3)
2277void LAPACK_zhetrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2278 lapack_complex_double const *E, lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2279
2280#define LAPACK_chetrs_aa LAPACK_GLOBAL(chetrs_aa, CHETRS_AA)
2281void LAPACK_chetrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2282 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork,
2283 lapack_int *info);
2284
2285#define LAPACK_zhetrs_aa LAPACK_GLOBAL(zhetrs_aa, ZHETRS_AA)
2286void LAPACK_zhetrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2287 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
2288 lapack_int *info);
2289
2290#define LAPACK_chetrs_aa_2stage LAPACK_GLOBAL(chetrs_aa_2stage, CHETRS_AA_2STAGE)
2291void LAPACK_chetrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2292 lapack_complex_float *TB, lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2,
2293 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2294
2295#define LAPACK_zhetrs_aa_2stage LAPACK_GLOBAL(zhetrs_aa_2stage, ZHETRS_AA_2STAGE)
2296void LAPACK_zhetrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2297 lapack_complex_double *TB, lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2,
2298 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2299
2300#define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook, CHETRS_ROOK)
2301void LAPACK_chetrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
2302 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2303
2304#define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook, ZHETRS_ROOK)
2305void LAPACK_zhetrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
2306 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2307
2308#define LAPACK_chfrk LAPACK_GLOBAL(chfrk, CHFRK)
2309void LAPACK_chfrk(char const *transr, char const *uplo, char const *trans, lapack_int const *n, lapack_int const *k, float const *alpha,
2310 lapack_complex_float const *A, lapack_int const *lda, float const *beta, lapack_complex_float *C);
2311
2312#define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk, ZHFRK)
2313void LAPACK_zhfrk(char const *transr, char const *uplo, char const *trans, lapack_int const *n, lapack_int const *k, double const *alpha,
2314 lapack_complex_double const *A, lapack_int const *lda, double const *beta, lapack_complex_double *C);
2315
2316#define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz, CHGEQZ)
2317void LAPACK_chgeqz(char const *job, char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
2318 lapack_complex_float *H, lapack_int const *ldh, lapack_complex_float *T, lapack_int const *ldt, lapack_complex_float *alpha,
2319 lapack_complex_float *beta, lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *Z, lapack_int const *ldz,
2320 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
2321
2322#define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz, DHGEQZ)
2323void LAPACK_dhgeqz(char const *job, char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
2324 double *H, lapack_int const *ldh, double *T, lapack_int const *ldt, double *alphar, double *alphai, double *beta, double *Q,
2325 lapack_int const *ldq, double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *info);
2326
2327#define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz, SHGEQZ)
2328void LAPACK_shgeqz(char const *job, char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *H,
2329 lapack_int const *ldh, float *T, lapack_int const *ldt, float *alphar, float *alphai, float *beta, float *Q, lapack_int const *ldq,
2330 float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *info);
2331
2332#define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz, ZHGEQZ)
2333void LAPACK_zhgeqz(char const *job, char const *compq, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
2334 lapack_complex_double *H, lapack_int const *ldh, lapack_complex_double *T, lapack_int const *ldt, lapack_complex_double *alpha,
2335 lapack_complex_double *beta, lapack_complex_double *Q, lapack_int const *ldq, lapack_complex_double *Z, lapack_int const *ldz,
2336 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
2337
2338#define LAPACK_chpcon LAPACK_GLOBAL(chpcon, CHPCON)
2339void LAPACK_chpcon(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, lapack_int const *ipiv, float const *anorm, float *rcond,
2340 lapack_complex_float *work, lapack_int *info);
2341
2342#define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon, ZHPCON)
2343void LAPACK_zhpcon(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, lapack_int const *ipiv, double const *anorm, double *rcond,
2344 lapack_complex_double *work, lapack_int *info);
2345
2346#define LAPACK_chpev LAPACK_GLOBAL(chpev, CHPEV)
2347void LAPACK_chpev(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *AP, float *W, lapack_complex_float *Z,
2348 lapack_int const *ldz, lapack_complex_float *work, float *rwork, lapack_int *info);
2349
2350#define LAPACK_zhpev LAPACK_GLOBAL(zhpev, ZHPEV)
2351void LAPACK_zhpev(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *AP, double *W, lapack_complex_double *Z,
2352 lapack_int const *ldz, lapack_complex_double *work, double *rwork, lapack_int *info);
2353
2354#define LAPACK_chpevd LAPACK_GLOBAL(chpevd, CHPEVD)
2355void LAPACK_chpevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *AP, float *W, lapack_complex_float *Z,
2356 lapack_int const *ldz, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork,
2357 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2358
2359#define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd, ZHPEVD)
2360void LAPACK_zhpevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *AP, double *W, lapack_complex_double *Z,
2361 lapack_int const *ldz, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork,
2362 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2363
2364#define LAPACK_chpevx LAPACK_GLOBAL(chpevx, CHPEVX)
2365void LAPACK_chpevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *AP, float const *vl,
2366 float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, lapack_complex_float *Z,
2367 lapack_int const *ldz, lapack_complex_float *work, float *rwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2368
2369#define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx, ZHPEVX)
2370void LAPACK_zhpevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *AP, double const *vl,
2371 double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W,
2372 lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, double *rwork, lapack_int *iwork, lapack_int *IFAIL,
2373 lapack_int *info);
2374
2375#define LAPACK_chpgst LAPACK_GLOBAL(chpgst, CHPGST)
2376void LAPACK_chpgst(lapack_int const *itype, char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_complex_float const *BP,
2377 lapack_int *info);
2378
2379#define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst, ZHPGST)
2380void LAPACK_zhpgst(lapack_int const *itype, char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_complex_double const *BP,
2381 lapack_int *info);
2382
2383#define LAPACK_chpgv LAPACK_GLOBAL(chpgv, CHPGV)
2384void LAPACK_chpgv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *AP,
2385 lapack_complex_float *BP, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, float *rwork,
2386 lapack_int *info);
2387
2388#define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv, ZHPGV)
2389void LAPACK_zhpgv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *AP,
2390 lapack_complex_double *BP, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, double *rwork,
2391 lapack_int *info);
2392
2393#define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd, CHPGVD)
2394void LAPACK_chpgvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_float *AP,
2395 lapack_complex_float *BP, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work,
2396 lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2397
2398#define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd, ZHPGVD)
2399void LAPACK_zhpgvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, lapack_complex_double *AP,
2400 lapack_complex_double *BP, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work,
2401 lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
2402
2403#define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx, CHPGVX)
2404void LAPACK_chpgvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_float *AP,
2405 lapack_complex_float *BP, float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol,
2406 lapack_int *m, float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work, float *rwork,
2407 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2408
2409#define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx, ZHPGVX)
2410void LAPACK_zhpgvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_complex_double *AP,
2411 lapack_complex_double *BP, double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol,
2412 lapack_int *m, double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work, double *rwork,
2413 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
2414
2415#define LAPACK_chprfs LAPACK_GLOBAL(chprfs, CHPRFS)
2416void LAPACK_chprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_complex_float const *AFP,
2417 lapack_int const *ipiv, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
2418 float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
2419
2420#define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs, ZHPRFS)
2421void LAPACK_zhprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_complex_double const *AFP,
2422 lapack_int const *ipiv, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
2423 double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
2424
2425#define LAPACK_chpsv LAPACK_GLOBAL(chpsv, CHPSV)
2426void LAPACK_chpsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *AP, lapack_int *ipiv, lapack_complex_float *B,
2427 lapack_int const *ldb, lapack_int *info);
2428
2429#define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv, ZHPSV)
2430void LAPACK_zhpsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *AP, lapack_int *ipiv,
2431 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2432
2433#define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx, CHPSVX)
2434void LAPACK_chpsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP,
2435 lapack_complex_float *AFP, lapack_int *ipiv, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X,
2436 lapack_int const *ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
2437
2438#define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx, ZHPSVX)
2439void LAPACK_zhpsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP,
2440 lapack_complex_double *AFP, lapack_int *ipiv, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X,
2441 lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
2442
2443#define LAPACK_chptrd LAPACK_GLOBAL(chptrd, CHPTRD)
2444void LAPACK_chptrd(char const *uplo, lapack_int const *n, lapack_complex_float *AP, float *D, float *E, lapack_complex_float *tau, lapack_int *info);
2445
2446#define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd, ZHPTRD)
2447void LAPACK_zhptrd(char const *uplo, lapack_int const *n, lapack_complex_double *AP, double *D, double *E, lapack_complex_double *tau,
2448 lapack_int *info);
2449
2450#define LAPACK_chptrf LAPACK_GLOBAL(chptrf, CHPTRF)
2451void LAPACK_chptrf(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int *ipiv, lapack_int *info);
2452
2453#define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf, ZHPTRF)
2454void LAPACK_zhptrf(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int *ipiv, lapack_int *info);
2455
2456#define LAPACK_chptri LAPACK_GLOBAL(chptri, CHPTRI)
2457void LAPACK_chptri(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int const *ipiv, lapack_complex_float *work,
2458 lapack_int *info);
2459
2460#define LAPACK_zhptri LAPACK_GLOBAL(zhptri, ZHPTRI)
2461void LAPACK_zhptri(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int const *ipiv, lapack_complex_double *work,
2462 lapack_int *info);
2463
2464#define LAPACK_chptrs LAPACK_GLOBAL(chptrs, CHPTRS)
2465void LAPACK_chptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_int const *ipiv,
2466 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
2467
2468#define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs, ZHPTRS)
2469void LAPACK_zhptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_int const *ipiv,
2470 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
2471
2472#define LAPACK_chsein LAPACK_GLOBAL(chsein, CHSEIN)
2473void LAPACK_chsein(char const *side, char const *eigsrc, char const *initv, lapack_logical const *select, lapack_int const *n,
2474 lapack_complex_float const *H, lapack_int const *ldh, lapack_complex_float *W, lapack_complex_float *VL, lapack_int const *ldvl,
2475 lapack_complex_float *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, lapack_complex_float *work, float *rwork,
2476 lapack_int *IFAILL, lapack_int *IFAILR, lapack_int *info);
2477
2478#define LAPACK_dhsein LAPACK_GLOBAL(dhsein, DHSEIN)
2479void LAPACK_dhsein(char const *side, char const *eigsrc, char const *initv, lapack_logical *select, lapack_int const *n, double const *H,
2480 lapack_int const *ldh, double *WR, double const *WI, double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr,
2481 lapack_int const *mm, lapack_int *m, double *work, lapack_int *IFAILL, lapack_int *IFAILR, lapack_int *info);
2482
2483#define LAPACK_shsein LAPACK_GLOBAL(shsein, SHSEIN)
2484void LAPACK_shsein(char const *side, char const *eigsrc, char const *initv, lapack_logical *select, lapack_int const *n, float const *H,
2485 lapack_int const *ldh, float *WR, float const *WI, float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr,
2486 lapack_int const *mm, lapack_int *m, float *work, lapack_int *IFAILL, lapack_int *IFAILR, lapack_int *info);
2487
2488#define LAPACK_zhsein LAPACK_GLOBAL(zhsein, ZHSEIN)
2489void LAPACK_zhsein(char const *side, char const *eigsrc, char const *initv, lapack_logical const *select, lapack_int const *n,
2490 lapack_complex_double const *H, lapack_int const *ldh, lapack_complex_double *W, lapack_complex_double *VL, lapack_int const *ldvl,
2491 lapack_complex_double *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, lapack_complex_double *work, double *rwork,
2492 lapack_int *IFAILL, lapack_int *IFAILR, lapack_int *info);
2493
2494#define LAPACK_chseqr LAPACK_GLOBAL(chseqr, CHSEQR)
2495void LAPACK_chseqr(char const *job, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_float *H,
2496 lapack_int const *ldh, lapack_complex_float *W, lapack_complex_float *Z, lapack_int const *ldz, lapack_complex_float *work,
2497 lapack_int const *lwork, lapack_int *info);
2498
2499#define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr, DHSEQR)
2500void LAPACK_dhseqr(char const *job, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double *H,
2501 lapack_int const *ldh, double *WR, double *WI, double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork,
2502 lapack_int *info);
2503
2504#define LAPACK_shseqr LAPACK_GLOBAL(shseqr, SHSEQR)
2505void LAPACK_shseqr(char const *job, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *H,
2506 lapack_int const *ldh, float *WR, float *WI, float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork,
2507 lapack_int *info);
2508
2509#define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr, ZHSEQR)
2510void LAPACK_zhseqr(char const *job, char const *compz, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_double *H,
2511 lapack_int const *ldh, lapack_complex_double *W, lapack_complex_double *Z, lapack_int const *ldz, lapack_complex_double *work,
2512 lapack_int const *lwork, lapack_int *info);
2513
2514#define LAPACK_clacgv LAPACK_GLOBAL(clacgv, CLACGV)
2515void LAPACK_clacgv(lapack_int const *n, lapack_complex_float *X, lapack_int const *incx);
2516
2517#define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv, ZLACGV)
2518void LAPACK_zlacgv(lapack_int const *n, lapack_complex_double *X, lapack_int const *incx);
2519
2520#define LAPACK_clacn2 LAPACK_GLOBAL(clacn2, CLACN2)
2521void LAPACK_clacn2(lapack_int const *n, lapack_complex_float *V, lapack_complex_float *X, float *est, lapack_int *kase, lapack_int *ISAVE);
2522
2523#define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2, DLACN2)
2524void LAPACK_dlacn2(lapack_int const *n, double *V, double *X, lapack_int *ISGN, double *est, lapack_int *kase, lapack_int *ISAVE);
2525
2526#define LAPACK_slacn2 LAPACK_GLOBAL(slacn2, SLACN2)
2527void LAPACK_slacn2(lapack_int const *n, float *V, float *X, lapack_int *ISGN, float *est, lapack_int *kase, lapack_int *ISAVE);
2528
2529#define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2, ZLACN2)
2530void LAPACK_zlacn2(lapack_int const *n, lapack_complex_double *V, lapack_complex_double *X, double *est, lapack_int *kase, lapack_int *ISAVE);
2531
2532#define LAPACK_clacp2 LAPACK_GLOBAL(clacp2, CLACP2)
2533void LAPACK_clacp2(char const *uplo, lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, lapack_complex_float *B,
2534 lapack_int const *ldb);
2535
2536#define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2, ZLACP2)
2537void LAPACK_zlacp2(char const *uplo, lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, lapack_complex_double *B,
2538 lapack_int const *ldb);
2539
2540#define LAPACK_clacpy LAPACK_GLOBAL(clacpy, CLACPY)
2541void LAPACK_clacpy(char const *uplo, lapack_int const *m, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
2542 lapack_complex_float *B, lapack_int const *ldb);
2543
2544#define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy, DLACPY)
2545void LAPACK_dlacpy(char const *uplo, lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, double *B,
2546 lapack_int const *ldb);
2547
2548#define LAPACK_slacpy LAPACK_GLOBAL(slacpy, SLACPY)
2549void LAPACK_slacpy(char const *uplo, lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, float *B,
2550 lapack_int const *ldb);
2551
2552#define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy, ZLACPY)
2553void LAPACK_zlacpy(char const *uplo, lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda,
2554 lapack_complex_double *B, lapack_int const *ldb);
2555
2556#define LAPACK_clacrm LAPACK_GLOBAL(clacrm, CLACRM)
2557void LAPACK_clacrm(lapack_int const *m, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float const *B,
2558 lapack_int const *ldb, lapack_complex_float *C, lapack_int const *ldc, float *rwork);
2559
2560#define LAPACK_zlacrm LAPACK_GLOBAL(zlacrm, ZLACRM)
2561void LAPACK_zlacrm(lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double const *B,
2562 lapack_int const *ldb, lapack_complex_double *C, lapack_int const *ldc, double *rwork);
2563
2564#define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c, ZLAG2C)
2565void LAPACK_zlag2c(lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_complex_float *SA,
2566 lapack_int const *ldsa, lapack_int *info);
2567
2568#define LAPACK_slag2d LAPACK_GLOBAL(slag2d, SLAG2D)
2569void LAPACK_slag2d(lapack_int const *m, lapack_int const *n, float const *SA, lapack_int const *ldsa, double *A, lapack_int const *lda,
2570 lapack_int *info);
2571
2572#define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s, DLAG2S)
2573void LAPACK_dlag2s(lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, float *SA, lapack_int const *ldsa,
2574 lapack_int *info);
2575
2576#define LAPACK_clag2z LAPACK_GLOBAL(clag2z, CLAG2Z)
2577void LAPACK_clag2z(lapack_int const *m, lapack_int const *n, lapack_complex_float const *SA, lapack_int const *ldsa, lapack_complex_double *A,
2578 lapack_int const *lda, lapack_int *info);
2579
2580#define LAPACK_clagge LAPACK_GLOBAL(clagge, CLAGGE)
2581void LAPACK_clagge(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *D, lapack_complex_float *A,
2582 lapack_int const *lda, lapack_int *iseed, lapack_complex_float *work, lapack_int *info);
2583
2584#define LAPACK_dlagge LAPACK_GLOBAL(dlagge, DLAGGE)
2585void LAPACK_dlagge(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *D, double *A,
2586 lapack_int const *lda, lapack_int *iseed, double *work, lapack_int *info);
2587
2588#define LAPACK_slagge LAPACK_GLOBAL(slagge, SLAGGE)
2589void LAPACK_slagge(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *D, float *A,
2590 lapack_int const *lda, lapack_int *iseed, float *work, lapack_int *info);
2591
2592#define LAPACK_zlagge LAPACK_GLOBAL(zlagge, ZLAGGE)
2593void LAPACK_zlagge(lapack_int const *m, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *D, lapack_complex_double *A,
2594 lapack_int const *lda, lapack_int *iseed, lapack_complex_double *work, lapack_int *info);
2595
2596#define LAPACK_claghe LAPACK_GLOBAL(claghe, CLAGHE)
2597void LAPACK_claghe(lapack_int const *n, lapack_int const *k, float const *D, lapack_complex_float *A, lapack_int const *lda, lapack_int *iseed,
2598 lapack_complex_float *work, lapack_int *info);
2599
2600#define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe, ZLAGHE)
2601void LAPACK_zlaghe(lapack_int const *n, lapack_int const *k, double const *D, lapack_complex_double *A, lapack_int const *lda, lapack_int *iseed,
2602 lapack_complex_double *work, lapack_int *info);
2603
2604#define LAPACK_clagsy LAPACK_GLOBAL(clagsy, CLAGSY)
2605void LAPACK_clagsy(lapack_int const *n, lapack_int const *k, float const *D, lapack_complex_float *A, lapack_int const *lda, lapack_int *iseed,
2606 lapack_complex_float *work, lapack_int *info);
2607
2608#define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy, DLAGSY)
2609void LAPACK_dlagsy(lapack_int const *n, lapack_int const *k, double const *D, double *A, lapack_int const *lda, lapack_int *iseed, double *work,
2610 lapack_int *info);
2611
2612#define LAPACK_slagsy LAPACK_GLOBAL(slagsy, SLAGSY)
2613void LAPACK_slagsy(lapack_int const *n, lapack_int const *k, float const *D, float *A, lapack_int const *lda, lapack_int *iseed, float *work,
2614 lapack_int *info);
2615
2616#define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy, ZLAGSY)
2617void LAPACK_zlagsy(lapack_int const *n, lapack_int const *k, double const *D, lapack_complex_double *A, lapack_int const *lda, lapack_int *iseed,
2618 lapack_complex_double *work, lapack_int *info);
2619
2620#define LAPACK_dlamch LAPACK_GLOBAL(dlamch, DLAMCH)
2621double LAPACK_dlamch(char const *cmach);
2622
2623#define LAPACK_slamch LAPACK_GLOBAL(slamch, SLAMCH)
2624lapack_float_return LAPACK_slamch(char const *cmach);
2625
2626#define LAPACK_clangb LAPACK_GLOBAL(clangb, CLANGB)
2627lapack_float_return LAPACK_clangb(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_float const *AB,
2628 lapack_int const *ldab, float *work);
2629
2630#define LAPACK_dlangb LAPACK_GLOBAL(dlangb, DLANGB)
2631double LAPACK_dlangb(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, double const *AB, lapack_int const *ldab,
2632 double *work);
2633
2634#define LAPACK_slangb LAPACK_GLOBAL(slangb, SLANGB)
2635lapack_float_return LAPACK_slangb(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, float const *AB,
2636 lapack_int const *ldab, float *work);
2637
2638#define LAPACK_zlangb LAPACK_GLOBAL(zlangb, ZLANGB)
2639double LAPACK_zlangb(char const *norm, lapack_int const *n, lapack_int const *kl, lapack_int const *ku, lapack_complex_double const *AB,
2640 lapack_int const *ldab, double *work);
2641
2642#define LAPACK_clange LAPACK_GLOBAL(clange, CLANGE)
2643lapack_float_return LAPACK_clange(char const *norm, lapack_int const *m, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
2644 float *work);
2645
2646#define LAPACK_dlange LAPACK_GLOBAL(dlange, DLANGE)
2647double LAPACK_dlange(char const *norm, lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, double *work);
2648
2649#define LAPACK_slange LAPACK_GLOBAL(slange, SLANGE)
2650lapack_float_return LAPACK_slange(char const *norm, lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, float *work);
2651
2652#define LAPACK_zlange LAPACK_GLOBAL(zlange, ZLANGE)
2653double LAPACK_zlange(char const *norm, lapack_int const *m, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *work);
2654
2655#define LAPACK_clangt LAPACK_GLOBAL(clangt, CLANGT)
2656lapack_float_return LAPACK_clangt(char const *norm, lapack_int const *n, lapack_complex_float const *DL, lapack_complex_float const *D,
2657 lapack_complex_float const *DU);
2658
2659#define LAPACK_dlangt LAPACK_GLOBAL(dlangt, DLANGT)
2660double LAPACK_dlangt(char const *norm, lapack_int const *n, double const *DL, double const *D, double const *DU);
2661
2662#define LAPACK_slangt LAPACK_GLOBAL(slangt, SLANGT)
2663lapack_float_return LAPACK_slangt(char const *norm, lapack_int const *n, float const *DL, float const *D, float const *DU);
2664
2665#define LAPACK_zlangt LAPACK_GLOBAL(zlangt, ZLANGT)
2666double LAPACK_zlangt(char const *norm, lapack_int const *n, lapack_complex_double const *DL, lapack_complex_double const *D,
2667 lapack_complex_double const *DU);
2668
2669#define LAPACK_clanhb LAPACK_GLOBAL(clanhb, CLANHB)
2670lapack_float_return LAPACK_clanhb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, lapack_complex_float const *AB,
2671 lapack_int const *ldab, float *work);
2672
2673#define LAPACK_zlanhb LAPACK_GLOBAL(zlanhb, ZLANHB)
2674double LAPACK_zlanhb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, lapack_complex_double const *AB,
2675 lapack_int const *ldab, double *work);
2676
2677#define LAPACK_clanhe LAPACK_GLOBAL(clanhe, CLANHE)
2678lapack_float_return LAPACK_clanhe(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
2679 float *work);
2680
2681#define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe, ZLANHE)
2682double LAPACK_zlanhe(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *work);
2683
2684#define LAPACK_clanhp LAPACK_GLOBAL(clanhp, CLANHP)
2685lapack_float_return LAPACK_clanhp(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_float const *AP, float *work);
2686
2687#define LAPACK_zlanhp LAPACK_GLOBAL(zlanhp, ZLANHP)
2688double LAPACK_zlanhp(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_double const *AP, double *work);
2689
2690#define LAPACK_clanhs LAPACK_GLOBAL(clanhs, CLANHS)
2691lapack_float_return LAPACK_clanhs(char const *norm, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *work);
2692
2693#define LAPACK_dlanhs LAPACK_GLOBAL(dlanhs, DLANHS)
2694double LAPACK_dlanhs(char const *norm, lapack_int const *n, double const *A, lapack_int const *lda, double *work);
2695
2696#define LAPACK_slanhs LAPACK_GLOBAL(slanhs, SLANHS)
2697lapack_float_return LAPACK_slanhs(char const *norm, lapack_int const *n, float const *A, lapack_int const *lda, float *work);
2698
2699#define LAPACK_zlanhs LAPACK_GLOBAL(zlanhs, ZLANHS)
2700double LAPACK_zlanhs(char const *norm, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *work);
2701
2702#define LAPACK_clanht LAPACK_GLOBAL(clanht, CLANHT)
2703lapack_float_return LAPACK_clanht(char const *norm, lapack_int const *n, float const *D, lapack_complex_float const *E);
2704
2705#define LAPACK_zlanht LAPACK_GLOBAL(zlanht, ZLANHT)
2706double LAPACK_zlanht(char const *norm, lapack_int const *n, double const *D, lapack_complex_double const *E);
2707
2708#define LAPACK_clansb LAPACK_GLOBAL(clansb, CLANSB)
2709lapack_float_return LAPACK_clansb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, lapack_complex_float const *AB,
2710 lapack_int const *ldab, float *work);
2711
2712#define LAPACK_dlansb LAPACK_GLOBAL(dlansb, DLANSB)
2713double LAPACK_dlansb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, double const *AB, lapack_int const *ldab,
2714 double *work);
2715
2716#define LAPACK_slansb LAPACK_GLOBAL(slansb, SLANSB)
2717lapack_float_return LAPACK_slansb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, float const *AB,
2718 lapack_int const *ldab, float *work);
2719
2720#define LAPACK_zlansb LAPACK_GLOBAL(zlansb, ZLANSB)
2721double LAPACK_zlansb(char const *norm, char const *uplo, lapack_int const *n, lapack_int const *k, lapack_complex_double const *AB,
2722 lapack_int const *ldab, double *work);
2723
2724#define LAPACK_clansp LAPACK_GLOBAL(clansp, CLANSP)
2725lapack_float_return LAPACK_clansp(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_float const *AP, float *work);
2726
2727#define LAPACK_dlansp LAPACK_GLOBAL(dlansp, DLANSP)
2728double LAPACK_dlansp(char const *norm, char const *uplo, lapack_int const *n, double const *AP, double *work);
2729
2730#define LAPACK_slansp LAPACK_GLOBAL(slansp, SLANSP)
2731lapack_float_return LAPACK_slansp(char const *norm, char const *uplo, lapack_int const *n, float const *AP, float *work);
2732
2733#define LAPACK_zlansp LAPACK_GLOBAL(zlansp, ZLANSP)
2734double LAPACK_zlansp(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_double const *AP, double *work);
2735
2736#define LAPACK_dlanst LAPACK_GLOBAL(dlanst, DLANST)
2737double LAPACK_dlanst(char const *norm, lapack_int const *n, double const *D, double const *E);
2738
2739#define LAPACK_slanst LAPACK_GLOBAL(slanst, SLANST)
2740lapack_float_return LAPACK_slanst(char const *norm, lapack_int const *n, float const *D, float const *E);
2741
2742#define LAPACK_clansy LAPACK_GLOBAL(clansy, CLANSY)
2743lapack_float_return LAPACK_clansy(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
2744 float *work);
2745
2746#define LAPACK_dlansy LAPACK_GLOBAL(dlansy, DLANSY)
2747double LAPACK_dlansy(char const *norm, char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double *work);
2748
2749#define LAPACK_slansy LAPACK_GLOBAL(slansy, SLANSY)
2750lapack_float_return LAPACK_slansy(char const *norm, char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float *work);
2751
2752#define LAPACK_zlansy LAPACK_GLOBAL(zlansy, ZLANSY)
2753double LAPACK_zlansy(char const *norm, char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *work);
2754
2755#define LAPACK_clantb LAPACK_GLOBAL(clantb, CLANTB)
2756lapack_float_return LAPACK_clantb(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *k,
2757 lapack_complex_float const *AB, lapack_int const *ldab, float *work);
2758
2759#define LAPACK_dlantb LAPACK_GLOBAL(dlantb, DLANTB)
2760double LAPACK_dlantb(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *k, double const *AB,
2761 lapack_int const *ldab, double *work);
2762
2763#define LAPACK_slantb LAPACK_GLOBAL(slantb, SLANTB)
2764lapack_float_return LAPACK_slantb(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *k, float const *AB,
2765 lapack_int const *ldab, float *work);
2766
2767#define LAPACK_zlantb LAPACK_GLOBAL(zlantb, ZLANTB)
2768double LAPACK_zlantb(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *k, lapack_complex_double const *AB,
2769 lapack_int const *ldab, double *work);
2770
2771#define LAPACK_clantp LAPACK_GLOBAL(clantp, CLANTP)
2772lapack_float_return LAPACK_clantp(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float const *AP,
2773 float *work);
2774
2775#define LAPACK_dlantp LAPACK_GLOBAL(dlantp, DLANTP)
2776double LAPACK_dlantp(char const *norm, char const *uplo, char const *diag, lapack_int const *n, double const *AP, double *work);
2777
2778#define LAPACK_slantp LAPACK_GLOBAL(slantp, SLANTP)
2779lapack_float_return LAPACK_slantp(char const *norm, char const *uplo, char const *diag, lapack_int const *n, float const *AP, float *work);
2780
2781#define LAPACK_zlantp LAPACK_GLOBAL(zlantp, ZLANTP)
2782double LAPACK_zlantp(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double const *AP, double *work);
2783
2784#define LAPACK_clantr LAPACK_GLOBAL(clantr, CLANTR)
2785lapack_float_return LAPACK_clantr(char const *norm, char const *uplo, char const *diag, lapack_int const *m, lapack_int const *n,
2786 lapack_complex_float const *A, lapack_int const *lda, float *work);
2787
2788#define LAPACK_dlantr LAPACK_GLOBAL(dlantr, DLANTR)
2789double LAPACK_dlantr(char const *norm, char const *uplo, char const *diag, lapack_int const *m, lapack_int const *n, double const *A,
2790 lapack_int const *lda, double *work);
2791
2792#define LAPACK_slantr LAPACK_GLOBAL(slantr, SLANTR)
2793lapack_float_return LAPACK_slantr(char const *norm, char const *uplo, char const *diag, lapack_int const *m, lapack_int const *n, float const *A,
2794 lapack_int const *lda, float *work);
2795
2796#define LAPACK_zlantr LAPACK_GLOBAL(zlantr, ZLANTR)
2797double LAPACK_zlantr(char const *norm, char const *uplo, char const *diag, lapack_int const *m, lapack_int const *n, lapack_complex_double const *A,
2798 lapack_int const *lda, double *work);
2799
2800#define LAPACK_clapmr LAPACK_GLOBAL(clapmr, CLAPMR)
2801void LAPACK_clapmr(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, lapack_complex_float *X, lapack_int const *ldx,
2802 lapack_int *K);
2803
2804#define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr, DLAPMR)
2805void LAPACK_dlapmr(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, double *X, lapack_int const *ldx, lapack_int *K);
2806
2807#define LAPACK_slapmr LAPACK_GLOBAL(slapmr, SLAPMR)
2808void LAPACK_slapmr(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, float *X, lapack_int const *ldx, lapack_int *K);
2809
2810#define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr, ZLAPMR)
2811void LAPACK_zlapmr(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, lapack_complex_double *X, lapack_int const *ldx,
2812 lapack_int *K);
2813
2814#define LAPACK_clapmt LAPACK_GLOBAL(clapmt, CLAPMT)
2815void LAPACK_clapmt(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, lapack_complex_float *X, lapack_int const *ldx,
2816 lapack_int *K);
2817
2818#define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt, DLAPMT)
2819void LAPACK_dlapmt(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, double *X, lapack_int const *ldx, lapack_int *K);
2820
2821#define LAPACK_slapmt LAPACK_GLOBAL(slapmt, SLAPMT)
2822void LAPACK_slapmt(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, float *X, lapack_int const *ldx, lapack_int *K);
2823
2824#define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt, ZLAPMT)
2825void LAPACK_zlapmt(lapack_logical const *forwrd, lapack_int const *m, lapack_int const *n, lapack_complex_double *X, lapack_int const *ldx,
2826 lapack_int *K);
2827
2828#define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2, DLAPY2)
2829double LAPACK_dlapy2(double const *x, double const *y);
2830
2831#define LAPACK_slapy2 LAPACK_GLOBAL(slapy2, SLAPY2)
2832lapack_float_return LAPACK_slapy2(float const *x, float const *y);
2833
2834#define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3, DLAPY3)
2835double LAPACK_dlapy3(double const *x, double const *y, double const *z);
2836
2837#define LAPACK_slapy3 LAPACK_GLOBAL(slapy3, SLAPY3)
2838lapack_float_return LAPACK_slapy3(float const *x, float const *y, float const *z);
2839
2840#define LAPACK_clarcm LAPACK_GLOBAL(clarcm, CLARCM)
2841void LAPACK_clarcm(lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda, lapack_complex_float const *B,
2842 lapack_int const *ldb, lapack_complex_float *C, lapack_int const *ldc, float *rwork);
2843
2844#define LAPACK_zlarcm LAPACK_GLOBAL(zlarcm, ZLARCM)
2845void LAPACK_zlarcm(lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda, lapack_complex_double const *B,
2846 lapack_int const *ldb, lapack_complex_double *C, lapack_int const *ldc, double *rwork);
2847
2848#define LAPACK_clarf LAPACK_GLOBAL(clarf, CLARF)
2849void LAPACK_clarf(char const *side, lapack_int const *m, lapack_int const *n, lapack_complex_float const *V, lapack_int const *incv,
2850 lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work);
2851
2852#define LAPACK_dlarf LAPACK_GLOBAL(dlarf, DLARF)
2853void LAPACK_dlarf(char const *side, lapack_int const *m, lapack_int const *n, double const *V, lapack_int const *incv, double const *tau, double *C,
2854 lapack_int const *ldc, double *work);
2855
2856#define LAPACK_slarf LAPACK_GLOBAL(slarf, SLARF)
2857void LAPACK_slarf(char const *side, lapack_int const *m, lapack_int const *n, float const *V, lapack_int const *incv, float const *tau, float *C,
2858 lapack_int const *ldc, float *work);
2859
2860#define LAPACK_zlarf LAPACK_GLOBAL(zlarf, ZLARF)
2861void LAPACK_zlarf(char const *side, lapack_int const *m, lapack_int const *n, lapack_complex_double const *V, lapack_int const *incv,
2862 lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work);
2863
2864#define LAPACK_clarfb LAPACK_GLOBAL(clarfb, CLARFB)
2865void LAPACK_clarfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
2866 lapack_int const *k, lapack_complex_float const *V, lapack_int const *ldv, lapack_complex_float const *T, lapack_int const *ldt,
2867 lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work, lapack_int const *ldwork);
2868
2869#define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb, DLARFB)
2870void LAPACK_dlarfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
2871 lapack_int const *k, double const *V, lapack_int const *ldv, double const *T, lapack_int const *ldt, double *C,
2872 lapack_int const *ldc, double *work, lapack_int const *ldwork);
2873
2874#define LAPACK_slarfb LAPACK_GLOBAL(slarfb, SLARFB)
2875void LAPACK_slarfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
2876 lapack_int const *k, float const *V, lapack_int const *ldv, float const *T, lapack_int const *ldt, float *C, lapack_int const *ldc,
2877 float *work, lapack_int const *ldwork);
2878
2879#define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb, ZLARFB)
2880void LAPACK_zlarfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
2881 lapack_int const *k, lapack_complex_double const *V, lapack_int const *ldv, lapack_complex_double const *T, lapack_int const *ldt,
2882 lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work, lapack_int const *ldwork);
2883
2884#define LAPACK_clarfg LAPACK_GLOBAL(clarfg, CLARFG)
2885void LAPACK_clarfg(lapack_int const *n, lapack_complex_float *alpha, lapack_complex_float *X, lapack_int const *incx, lapack_complex_float *tau);
2886
2887#define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg, DLARFG)
2888void LAPACK_dlarfg(lapack_int const *n, double *alpha, double *X, lapack_int const *incx, double *tau);
2889
2890#define LAPACK_slarfg LAPACK_GLOBAL(slarfg, SLARFG)
2891void LAPACK_slarfg(lapack_int const *n, float *alpha, float *X, lapack_int const *incx, float *tau);
2892
2893#define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg, ZLARFG)
2894void LAPACK_zlarfg(lapack_int const *n, lapack_complex_double *alpha, lapack_complex_double *X, lapack_int const *incx, lapack_complex_double *tau);
2895
2896#define LAPACK_clarft LAPACK_GLOBAL(clarft, CLARFT)
2897void LAPACK_clarft(char const *direct, char const *storev, lapack_int const *n, lapack_int const *k, lapack_complex_float const *V,
2898 lapack_int const *ldv, lapack_complex_float const *tau, lapack_complex_float *T, lapack_int const *ldt);
2899
2900#define LAPACK_dlarft LAPACK_GLOBAL(dlarft, DLARFT)
2901void LAPACK_dlarft(char const *direct, char const *storev, lapack_int const *n, lapack_int const *k, double const *V, lapack_int const *ldv,
2902 double const *tau, double *T, lapack_int const *ldt);
2903
2904#define LAPACK_slarft LAPACK_GLOBAL(slarft, SLARFT)
2905void LAPACK_slarft(char const *direct, char const *storev, lapack_int const *n, lapack_int const *k, float const *V, lapack_int const *ldv,
2906 float const *tau, float *T, lapack_int const *ldt);
2907
2908#define LAPACK_zlarft LAPACK_GLOBAL(zlarft, ZLARFT)
2909void LAPACK_zlarft(char const *direct, char const *storev, lapack_int const *n, lapack_int const *k, lapack_complex_double const *V,
2910 lapack_int const *ldv, lapack_complex_double const *tau, lapack_complex_double *T, lapack_int const *ldt);
2911
2912#define LAPACK_clarfx LAPACK_GLOBAL(clarfx, CLARFX)
2913void LAPACK_clarfx(char const *side, lapack_int const *m, lapack_int const *n, lapack_complex_float const *V, lapack_complex_float const *tau,
2914 lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work);
2915
2916#define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx, DLARFX)
2917void LAPACK_dlarfx(char const *side, lapack_int const *m, lapack_int const *n, double const *V, double const *tau, double *C, lapack_int const *ldc,
2918 double *work);
2919
2920#define LAPACK_slarfx LAPACK_GLOBAL(slarfx, SLARFX)
2921void LAPACK_slarfx(char const *side, lapack_int const *m, lapack_int const *n, float const *V, float const *tau, float *C, lapack_int const *ldc,
2922 float *work);
2923
2924#define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx, ZLARFX)
2925void LAPACK_zlarfx(char const *side, lapack_int const *m, lapack_int const *n, lapack_complex_double const *V, lapack_complex_double const *tau,
2926 lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work);
2927
2928#define LAPACK_clarnv LAPACK_GLOBAL(clarnv, CLARNV)
2929void LAPACK_clarnv(lapack_int const *idist, lapack_int *iseed, lapack_int const *n, lapack_complex_float *X);
2930
2931#define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv, DLARNV)
2932void LAPACK_dlarnv(lapack_int const *idist, lapack_int *iseed, lapack_int const *n, double *X);
2933
2934#define LAPACK_slarnv LAPACK_GLOBAL(slarnv, SLARNV)
2935void LAPACK_slarnv(lapack_int const *idist, lapack_int *iseed, lapack_int const *n, float *X);
2936
2937#define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv, ZLARNV)
2938void LAPACK_zlarnv(lapack_int const *idist, lapack_int *iseed, lapack_int const *n, lapack_complex_double *X);
2939
2940#define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp, DLARTGP)
2941void LAPACK_dlartgp(double const *f, double const *g, double *cs, double *sn, double *r);
2942
2943#define LAPACK_slartgp LAPACK_GLOBAL(slartgp, SLARTGP)
2944void LAPACK_slartgp(float const *f, float const *g, float *cs, float *sn, float *r);
2945
2946#define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs, DLARTGS)
2947void LAPACK_dlartgs(double const *x, double const *y, double const *sigma, double *cs, double *sn);
2948
2949#define LAPACK_slartgs LAPACK_GLOBAL(slartgs, SLARTGS)
2950void LAPACK_slartgs(float const *x, float const *y, float const *sigma, float *cs, float *sn);
2951
2952#define LAPACK_clascl LAPACK_GLOBAL(clascl, CLASCL)
2953void LAPACK_clascl(char const *type, lapack_int const *kl, lapack_int const *ku, float const *cfrom, float const *cto, lapack_int const *m,
2954 lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
2955
2956#define LAPACK_dlascl LAPACK_GLOBAL(dlascl, DLASCL)
2957void LAPACK_dlascl(char const *type, lapack_int const *kl, lapack_int const *ku, double const *cfrom, double const *cto, lapack_int const *m,
2958 lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
2959
2960#define LAPACK_slascl LAPACK_GLOBAL(slascl, SLASCL)
2961void LAPACK_slascl(char const *type, lapack_int const *kl, lapack_int const *ku, float const *cfrom, float const *cto, lapack_int const *m,
2962 lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
2963
2964#define LAPACK_zlascl LAPACK_GLOBAL(zlascl, ZLASCL)
2965void LAPACK_zlascl(char const *type, lapack_int const *kl, lapack_int const *ku, double const *cfrom, double const *cto, lapack_int const *m,
2966 lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
2967
2968#define LAPACK_claset LAPACK_GLOBAL(claset, CLASET)
2969void LAPACK_claset(char const *uplo, lapack_int const *m, lapack_int const *n, lapack_complex_float const *alpha, lapack_complex_float const *beta,
2970 lapack_complex_float *A, lapack_int const *lda);
2971
2972#define LAPACK_dlaset LAPACK_GLOBAL(dlaset, DLASET)
2973void LAPACK_dlaset(char const *uplo, lapack_int const *m, lapack_int const *n, double const *alpha, double const *beta, double *A,
2974 lapack_int const *lda);
2975
2976#define LAPACK_slaset LAPACK_GLOBAL(slaset, SLASET)
2977void LAPACK_slaset(char const *uplo, lapack_int const *m, lapack_int const *n, float const *alpha, float const *beta, float *A,
2978 lapack_int const *lda);
2979
2980#define LAPACK_zlaset LAPACK_GLOBAL(zlaset, ZLASET)
2981void LAPACK_zlaset(char const *uplo, lapack_int const *m, lapack_int const *n, lapack_complex_double const *alpha, lapack_complex_double const *beta,
2982 lapack_complex_double *A, lapack_int const *lda);
2983
2984#define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt, DLASRT)
2985void LAPACK_dlasrt(char const *id, lapack_int const *n, double *D, lapack_int *info);
2986
2987#define LAPACK_slasrt LAPACK_GLOBAL(slasrt, SLASRT)
2988void LAPACK_slasrt(char const *id, lapack_int const *n, float *D, lapack_int *info);
2989
2990#define LAPACK_classq LAPACK_GLOBAL(classq, CLASSQ)
2991void LAPACK_classq(lapack_int const *n, lapack_complex_float const *X, lapack_int const *incx, float *scale, float *sumsq);
2992
2993#define LAPACK_dlassq LAPACK_GLOBAL(dlassq, DLASSQ)
2994void LAPACK_dlassq(lapack_int const *n, double const *X, lapack_int const *incx, double *scale, double *sumsq);
2995
2996#define LAPACK_slassq LAPACK_GLOBAL(slassq, SLASSQ)
2997void LAPACK_slassq(lapack_int const *n, float const *X, lapack_int const *incx, float *scale, float *sumsq);
2998
2999#define LAPACK_zlassq LAPACK_GLOBAL(zlassq, ZLASSQ)
3000void LAPACK_zlassq(lapack_int const *n, lapack_complex_double const *X, lapack_int const *incx, double *scale, double *sumsq);
3001
3002#define LAPACK_claswp LAPACK_GLOBAL(claswp, CLASWP)
3003void LAPACK_claswp(lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *k1, lapack_int const *k2,
3004 lapack_int const *ipiv, lapack_int const *incx);
3005
3006#define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp, DLASWP)
3007void LAPACK_dlaswp(lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *k1, lapack_int const *k2, lapack_int const *ipiv,
3008 lapack_int const *incx);
3009
3010#define LAPACK_slaswp LAPACK_GLOBAL(slaswp, SLASWP)
3011void LAPACK_slaswp(lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *k1, lapack_int const *k2, lapack_int const *ipiv,
3012 lapack_int const *incx);
3013
3014#define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp, ZLASWP)
3015void LAPACK_zlaswp(lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *k1, lapack_int const *k2,
3016 lapack_int const *ipiv, lapack_int const *incx);
3017
3018#define LAPACK_clatms LAPACK_GLOBAL(clatms, CLATMS)
3019void LAPACK_clatms(lapack_int const *m, lapack_int const *n, char const *dist, lapack_int *iseed, char const *sym, float *D, lapack_int const *mode,
3020 float const *cond, float const *dmax, lapack_int const *kl, lapack_int const *ku, char const *pack, lapack_complex_float *A,
3021 lapack_int const *lda, lapack_complex_float *work, lapack_int *info);
3022
3023#define LAPACK_dlatms LAPACK_GLOBAL(dlatms, DLATMS)
3024void LAPACK_dlatms(lapack_int const *m, lapack_int const *n, char const *dist, lapack_int *iseed, char const *sym, double *D, lapack_int const *mode,
3025 double const *cond, double const *dmax, lapack_int const *kl, lapack_int const *ku, char const *pack, double *A,
3026 lapack_int const *lda, double *work, lapack_int *info);
3027
3028#define LAPACK_slatms LAPACK_GLOBAL(slatms, SLATMS)
3029void LAPACK_slatms(lapack_int const *m, lapack_int const *n, char const *dist, lapack_int *iseed, char const *sym, float *D, lapack_int const *mode,
3030 float const *cond, float const *dmax, lapack_int const *kl, lapack_int const *ku, char const *pack, float *A,
3031 lapack_int const *lda, float *work, lapack_int *info);
3032
3033#define LAPACK_zlatms LAPACK_GLOBAL(zlatms, ZLATMS)
3034void LAPACK_zlatms(lapack_int const *m, lapack_int const *n, char const *dist, lapack_int *iseed, char const *sym, double *D, lapack_int const *mode,
3035 double const *cond, double const *dmax, lapack_int const *kl, lapack_int const *ku, char const *pack, lapack_complex_double *A,
3036 lapack_int const *lda, lapack_complex_double *work, lapack_int *info);
3037
3038#define LAPACK_clauum LAPACK_GLOBAL(clauum, CLAUUM)
3039void LAPACK_clauum(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
3040
3041#define LAPACK_dlauum LAPACK_GLOBAL(dlauum, DLAUUM)
3042void LAPACK_dlauum(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
3043
3044#define LAPACK_slauum LAPACK_GLOBAL(slauum, SLAUUM)
3045void LAPACK_slauum(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
3046
3047#define LAPACK_zlauum LAPACK_GLOBAL(zlauum, ZLAUUM)
3048void LAPACK_zlauum(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
3049
3050#define LAPACK_ilaver LAPACK_GLOBAL(ilaver, ILAVER)
3051void LAPACK_ilaver(lapack_int *vers_major, lapack_int *vers_minor, lapack_int *vers_patch);
3052
3053#define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr, DOPGTR)
3054void LAPACK_dopgtr(char const *uplo, lapack_int const *n, double const *AP, double const *tau, double *Q, lapack_int const *ldq, double *work,
3055 lapack_int *info);
3056
3057#define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr, SOPGTR)
3058void LAPACK_sopgtr(char const *uplo, lapack_int const *n, float const *AP, float const *tau, float *Q, lapack_int const *ldq, float *work,
3059 lapack_int *info);
3060
3061#define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr, DOPMTR)
3062void LAPACK_dopmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, double const *AP,
3063 double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int *info);
3064
3065#define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr, SOPMTR)
3066void LAPACK_sopmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, float const *AP, float const *tau,
3067 float *C, lapack_int const *ldc, float *work, lapack_int *info);
3068
3069#define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb, DORBDB)
3070void LAPACK_dorbdb(char const *trans, char const *signs, lapack_int const *m, lapack_int const *p, lapack_int const *q, double *X11,
3071 lapack_int const *ldx11, double *X12, lapack_int const *ldx12, double *X21, lapack_int const *ldx21, double *X22,
3072 lapack_int const *ldx22, double *theta, double *phi, double *TAUP1, double *TAUP2, double *TAUQ1, double *TAUQ2, double *work,
3073 lapack_int const *lwork, lapack_int *info);
3074
3075#define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb, SORBDB)
3076void LAPACK_sorbdb(char const *trans, char const *signs, lapack_int const *m, lapack_int const *p, lapack_int const *q, float *X11,
3077 lapack_int const *ldx11, float *X12, lapack_int const *ldx12, float *X21, lapack_int const *ldx21, float *X22,
3078 lapack_int const *ldx22, float *theta, float *phi, float *TAUP1, float *TAUP2, float *TAUQ1, float *TAUQ2, float *work,
3079 lapack_int const *lwork, lapack_int *info);
3080
3081#define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd, DORCSD)
3082void LAPACK_dorcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, char const *signs,
3083 lapack_int const *m, lapack_int const *p, lapack_int const *q, double *X11, lapack_int const *ldx11, double *X12,
3084 lapack_int const *ldx12, double *X21, lapack_int const *ldx21, double *X22, lapack_int const *ldx22, double *theta, double *U1,
3085 lapack_int const *ldu1, double *U2, lapack_int const *ldu2, double *V1T, lapack_int const *ldv1t, double *V2T,
3086 lapack_int const *ldv2t, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
3087
3088#define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd, SORCSD)
3089void LAPACK_sorcsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, char const *signs,
3090 lapack_int const *m, lapack_int const *p, lapack_int const *q, float *X11, lapack_int const *ldx11, float *X12,
3091 lapack_int const *ldx12, float *X21, lapack_int const *ldx21, float *X22, lapack_int const *ldx22, float *theta, float *U1,
3092 lapack_int const *ldu1, float *U2, lapack_int const *ldu2, float *V1T, lapack_int const *ldv1t, float *V2T,
3093 lapack_int const *ldv2t, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
3094
3095#define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1, DORCSD2BY1)
3096void LAPACK_dorcsd2by1(char const *jobu1, char const *jobu2, char const *jobv1t, lapack_int const *m, lapack_int const *p, lapack_int const *q,
3097 double *X11, lapack_int const *ldx11, double *X21, lapack_int const *ldx21, double *theta, double *U1, lapack_int const *ldu1,
3098 double *U2, lapack_int const *ldu2, double *V1T, lapack_int const *ldv1t, double *work, lapack_int const *lwork,
3099 lapack_int *iwork, lapack_int *info);
3100
3101#define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1, SORCSD2BY1)
3102void LAPACK_sorcsd2by1(char const *jobu1, char const *jobu2, char const *jobv1t, lapack_int const *m, lapack_int const *p, lapack_int const *q,
3103 float *X11, lapack_int const *ldx11, float *X21, lapack_int const *ldx21, float *theta, float *U1, lapack_int const *ldu1,
3104 float *U2, lapack_int const *ldu2, float *V1T, lapack_int const *ldv1t, float *work, lapack_int const *lwork,
3105 lapack_int *iwork, lapack_int *info);
3106
3107#define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr, DORGBR)
3108void LAPACK_dorgbr(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *k, double *A, lapack_int const *lda,
3109 double const *tau, double *work, lapack_int const *lwork, lapack_int *info);
3110
3111#define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr, SORGBR)
3112void LAPACK_sorgbr(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *k, float *A, lapack_int const *lda, float const *tau,
3113 float *work, lapack_int const *lwork, lapack_int *info);
3114
3115#define LAPACK_dorghr LAPACK_GLOBAL(dorghr, DORGHR)
3116void LAPACK_dorghr(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, double *A, lapack_int const *lda, double const *tau,
3117 double *work, lapack_int const *lwork, lapack_int *info);
3118
3119#define LAPACK_sorghr LAPACK_GLOBAL(sorghr, SORGHR)
3120void LAPACK_sorghr(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, float *A, lapack_int const *lda, float const *tau, float *work,
3121 lapack_int const *lwork, lapack_int *info);
3122
3123#define LAPACK_dorglq LAPACK_GLOBAL(dorglq, DORGLQ)
3124void LAPACK_dorglq(lapack_int const *m, lapack_int const *n, lapack_int const *k, double *A, lapack_int const *lda, double const *tau, double *work,
3125 lapack_int const *lwork, lapack_int *info);
3126
3127#define LAPACK_sorglq LAPACK_GLOBAL(sorglq, SORGLQ)
3128void LAPACK_sorglq(lapack_int const *m, lapack_int const *n, lapack_int const *k, float *A, lapack_int const *lda, float const *tau, float *work,
3129 lapack_int const *lwork, lapack_int *info);
3130
3131#define LAPACK_dorgql LAPACK_GLOBAL(dorgql, DORGQL)
3132void LAPACK_dorgql(lapack_int const *m, lapack_int const *n, lapack_int const *k, double *A, lapack_int const *lda, double const *tau, double *work,
3133 lapack_int const *lwork, lapack_int *info);
3134
3135#define LAPACK_sorgql LAPACK_GLOBAL(sorgql, SORGQL)
3136void LAPACK_sorgql(lapack_int const *m, lapack_int const *n, lapack_int const *k, float *A, lapack_int const *lda, float const *tau, float *work,
3137 lapack_int const *lwork, lapack_int *info);
3138
3139#define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr, DORGQR)
3140void LAPACK_dorgqr(lapack_int const *m, lapack_int const *n, lapack_int const *k, double *A, lapack_int const *lda, double const *tau, double *work,
3141 lapack_int const *lwork, lapack_int *info);
3142
3143#define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr, SORGQR)
3144void LAPACK_sorgqr(lapack_int const *m, lapack_int const *n, lapack_int const *k, float *A, lapack_int const *lda, float const *tau, float *work,
3145 lapack_int const *lwork, lapack_int *info);
3146
3147#define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq, DORGRQ)
3148void LAPACK_dorgrq(lapack_int const *m, lapack_int const *n, lapack_int const *k, double *A, lapack_int const *lda, double const *tau, double *work,
3149 lapack_int const *lwork, lapack_int *info);
3150
3151#define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq, SORGRQ)
3152void LAPACK_sorgrq(lapack_int const *m, lapack_int const *n, lapack_int const *k, float *A, lapack_int const *lda, float const *tau, float *work,
3153 lapack_int const *lwork, lapack_int *info);
3154
3155#define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr, DORGTR)
3156void LAPACK_dorgtr(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double const *tau, double *work, lapack_int const *lwork,
3157 lapack_int *info);
3158
3159#define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr, SORGTR)
3160void LAPACK_sorgtr(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float const *tau, float *work, lapack_int const *lwork,
3161 lapack_int *info);
3162
3163#define LAPACK_dormbr LAPACK_GLOBAL(dormbr, DORMBR)
3164void LAPACK_dormbr(char const *vect, char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k,
3165 double const *A, lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3166 lapack_int *info);
3167
3168#define LAPACK_sormbr LAPACK_GLOBAL(sormbr, SORMBR)
3169void LAPACK_sormbr(char const *vect, char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k,
3170 float const *A, lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork,
3171 lapack_int *info);
3172
3173#define LAPACK_dormhr LAPACK_GLOBAL(dormhr, DORMHR)
3174void LAPACK_dormhr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
3175 double const *A, lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3176 lapack_int *info);
3177
3178#define LAPACK_sormhr LAPACK_GLOBAL(sormhr, SORMHR)
3179void LAPACK_sormhr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
3180 float const *A, lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork,
3181 lapack_int *info);
3182
3183#define LAPACK_dormlq LAPACK_GLOBAL(dormlq, DORMLQ)
3184void LAPACK_dormlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
3185 lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3186 lapack_int *info);
3187
3188#define LAPACK_sormlq LAPACK_GLOBAL(sormlq, SORMLQ)
3189void LAPACK_sormlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
3190 lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork, lapack_int *info);
3191
3192#define LAPACK_dormql LAPACK_GLOBAL(dormql, DORMQL)
3193void LAPACK_dormql(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
3194 lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3195 lapack_int *info);
3196
3197#define LAPACK_sormql LAPACK_GLOBAL(sormql, SORMQL)
3198void LAPACK_sormql(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
3199 lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork, lapack_int *info);
3200
3201#define LAPACK_dormqr LAPACK_GLOBAL(dormqr, DORMQR)
3202void LAPACK_dormqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
3203 lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3204 lapack_int *info);
3205
3206#define LAPACK_sormqr LAPACK_GLOBAL(sormqr, SORMQR)
3207void LAPACK_sormqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
3208 lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork, lapack_int *info);
3209
3210#define LAPACK_dormrq LAPACK_GLOBAL(dormrq, DORMRQ)
3211void LAPACK_dormrq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, double const *A,
3212 lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3213 lapack_int *info);
3214
3215#define LAPACK_sormrq LAPACK_GLOBAL(sormrq, SORMRQ)
3216void LAPACK_sormrq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, float const *A,
3217 lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork, lapack_int *info);
3218
3219#define LAPACK_dormrz LAPACK_GLOBAL(dormrz, DORMRZ)
3220void LAPACK_dormrz(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
3221 double const *A, lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3222 lapack_int *info);
3223
3224#define LAPACK_sormrz LAPACK_GLOBAL(sormrz, SORMRZ)
3225void LAPACK_sormrz(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
3226 float const *A, lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork,
3227 lapack_int *info);
3228
3229#define LAPACK_dormtr LAPACK_GLOBAL(dormtr, DORMTR)
3230void LAPACK_dormtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, double const *A,
3231 lapack_int const *lda, double const *tau, double *C, lapack_int const *ldc, double *work, lapack_int const *lwork,
3232 lapack_int *info);
3233
3234#define LAPACK_sormtr LAPACK_GLOBAL(sormtr, SORMTR)
3235void LAPACK_sormtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, float const *A,
3236 lapack_int const *lda, float const *tau, float *C, lapack_int const *ldc, float *work, lapack_int const *lwork, lapack_int *info);
3237
3238#define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon, CPBCON)
3239void LAPACK_cpbcon(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float const *AB, lapack_int const *ldab,
3240 float const *anorm, float *rcond, lapack_complex_float *work, float *rwork, lapack_int *info);
3241
3242#define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon, DPBCON)
3243void LAPACK_dpbcon(char const *uplo, lapack_int const *n, lapack_int const *kd, double const *AB, lapack_int const *ldab, double const *anorm,
3244 double *rcond, double *work, lapack_int *iwork, lapack_int *info);
3245
3246#define LAPACK_spbcon LAPACK_GLOBAL(spbcon, SPBCON)
3247void LAPACK_spbcon(char const *uplo, lapack_int const *n, lapack_int const *kd, float const *AB, lapack_int const *ldab, float const *anorm,
3248 float *rcond, float *work, lapack_int *iwork, lapack_int *info);
3249
3250#define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon, ZPBCON)
3251void LAPACK_zpbcon(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double const *AB, lapack_int const *ldab,
3252 double const *anorm, double *rcond, lapack_complex_double *work, double *rwork, lapack_int *info);
3253
3254#define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ, CPBEQU)
3255void LAPACK_cpbequ(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float const *AB, lapack_int const *ldab, float *S,
3256 float *scond, float *amax, lapack_int *info);
3257
3258#define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ, DPBEQU)
3259void LAPACK_dpbequ(char const *uplo, lapack_int const *n, lapack_int const *kd, double const *AB, lapack_int const *ldab, double *S, double *scond,
3260 double *amax, lapack_int *info);
3261
3262#define LAPACK_spbequ LAPACK_GLOBAL(spbequ, SPBEQU)
3263void LAPACK_spbequ(char const *uplo, lapack_int const *n, lapack_int const *kd, float const *AB, lapack_int const *ldab, float *S, float *scond,
3264 float *amax, lapack_int *info);
3265
3266#define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ, ZPBEQU)
3267void LAPACK_zpbequ(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double const *AB, lapack_int const *ldab, double *S,
3268 double *scond, double *amax, lapack_int *info);
3269
3270#define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs, CPBRFS)
3271void LAPACK_cpbrfs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_float const *AB,
3272 lapack_int const *ldab, lapack_complex_float const *AFB, lapack_int const *ldafb, lapack_complex_float const *B,
3273 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work,
3274 float *rwork, lapack_int *info);
3275
3276#define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs, DPBRFS)
3277void LAPACK_dpbrfs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, double const *AB, lapack_int const *ldab,
3278 double const *AFB, lapack_int const *ldafb, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr,
3279 double *berr, double *work, lapack_int *iwork, lapack_int *info);
3280
3281#define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs, SPBRFS)
3282void LAPACK_spbrfs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, float const *AB, lapack_int const *ldab,
3283 float const *AFB, lapack_int const *ldafb, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *ferr,
3284 float *berr, float *work, lapack_int *iwork, lapack_int *info);
3285
3286#define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs, ZPBRFS)
3287void LAPACK_zpbrfs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_double const *AB,
3288 lapack_int const *ldab, lapack_complex_double const *AFB, lapack_int const *ldafb, lapack_complex_double const *B,
3289 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work,
3290 double *rwork, lapack_int *info);
3291
3292#define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf, CPBSTF)
3293void LAPACK_cpbstf(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB, lapack_int const *ldab, lapack_int *info);
3294
3295#define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf, DPBSTF)
3296void LAPACK_dpbstf(char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, lapack_int *info);
3297
3298#define LAPACK_spbstf LAPACK_GLOBAL(spbstf, SPBSTF)
3299void LAPACK_spbstf(char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, lapack_int *info);
3300
3301#define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf, ZPBSTF)
3302void LAPACK_zpbstf(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB, lapack_int const *ldab, lapack_int *info);
3303
3304#define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv, CPBSV)
3305void LAPACK_cpbsv(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_float *AB,
3306 lapack_int const *ldab, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3307
3308#define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv, DPBSV)
3309void LAPACK_dpbsv(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, double *AB, lapack_int const *ldab, double *B,
3310 lapack_int const *ldb, lapack_int *info);
3311
3312#define LAPACK_spbsv LAPACK_GLOBAL(spbsv, SPBSV)
3313void LAPACK_spbsv(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, float *AB, lapack_int const *ldab, float *B,
3314 lapack_int const *ldb, lapack_int *info);
3315
3316#define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv, ZPBSV)
3317void LAPACK_zpbsv(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_double *AB,
3318 lapack_int const *ldab, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3319
3320#define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx, CPBSVX)
3321void LAPACK_cpbsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_float *AB,
3322 lapack_int const *ldab, lapack_complex_float *AFB, lapack_int const *ldafb, char *equed, float *S, lapack_complex_float *B,
3323 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr,
3324 lapack_complex_float *work, float *rwork, lapack_int *info);
3325
3326#define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx, DPBSVX)
3327void LAPACK_dpbsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, double *AB,
3328 lapack_int const *ldab, double *AFB, lapack_int const *ldafb, char *equed, double *S, double *B, lapack_int const *ldb, double *X,
3329 lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
3330
3331#define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx, SPBSVX)
3332void LAPACK_spbsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, float *AB,
3333 lapack_int const *ldab, float *AFB, lapack_int const *ldafb, char *equed, float *S, float *B, lapack_int const *ldb, float *X,
3334 lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
3335
3336#define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx, ZPBSVX)
3337void LAPACK_zpbsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_double *AB,
3338 lapack_int const *ldab, lapack_complex_double *AFB, lapack_int const *ldafb, char *equed, double *S, lapack_complex_double *B,
3339 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr,
3340 lapack_complex_double *work, double *rwork, lapack_int *info);
3341
3342#define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf, CPBTRF)
3343void LAPACK_cpbtrf(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_float *AB, lapack_int const *ldab, lapack_int *info);
3344
3345#define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf, DPBTRF)
3346void LAPACK_dpbtrf(char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, lapack_int *info);
3347
3348#define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf, SPBTRF)
3349void LAPACK_spbtrf(char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, lapack_int *info);
3350
3351#define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf, ZPBTRF)
3352void LAPACK_zpbtrf(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_complex_double *AB, lapack_int const *ldab, lapack_int *info);
3353
3354#define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs, CPBTRS)
3355void LAPACK_cpbtrs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_float const *AB,
3356 lapack_int const *ldab, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3357
3358#define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs, DPBTRS)
3359void LAPACK_dpbtrs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, double const *AB, lapack_int const *ldab,
3360 double *B, lapack_int const *ldb, lapack_int *info);
3361
3362#define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs, SPBTRS)
3363void LAPACK_spbtrs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, float const *AB, lapack_int const *ldab,
3364 float *B, lapack_int const *ldb, lapack_int *info);
3365
3366#define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs, ZPBTRS)
3367void LAPACK_zpbtrs(char const *uplo, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs, lapack_complex_double const *AB,
3368 lapack_int const *ldab, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3369
3370#define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf, CPFTRF)
3371void LAPACK_cpftrf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int *info);
3372
3373#define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf, DPFTRF)
3374void LAPACK_dpftrf(char const *transr, char const *uplo, lapack_int const *n, double *A, lapack_int *info);
3375
3376#define LAPACK_spftrf LAPACK_GLOBAL(spftrf, SPFTRF)
3377void LAPACK_spftrf(char const *transr, char const *uplo, lapack_int const *n, float *A, lapack_int *info);
3378
3379#define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf, ZPFTRF)
3380void LAPACK_zpftrf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int *info);
3381
3382#define LAPACK_cpftri LAPACK_GLOBAL(cpftri, CPFTRI)
3383void LAPACK_cpftri(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int *info);
3384
3385#define LAPACK_dpftri LAPACK_GLOBAL(dpftri, DPFTRI)
3386void LAPACK_dpftri(char const *transr, char const *uplo, lapack_int const *n, double *A, lapack_int *info);
3387
3388#define LAPACK_spftri LAPACK_GLOBAL(spftri, SPFTRI)
3389void LAPACK_spftri(char const *transr, char const *uplo, lapack_int const *n, float *A, lapack_int *info);
3390
3391#define LAPACK_zpftri LAPACK_GLOBAL(zpftri, ZPFTRI)
3392void LAPACK_zpftri(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int *info);
3393
3394#define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs, CPFTRS)
3395void LAPACK_cpftrs(char const *transr, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
3396 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3397
3398#define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs, DPFTRS)
3399void LAPACK_dpftrs(char const *transr, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, double *B,
3400 lapack_int const *ldb, lapack_int *info);
3401
3402#define LAPACK_spftrs LAPACK_GLOBAL(spftrs, SPFTRS)
3403void LAPACK_spftrs(char const *transr, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, float *B, lapack_int const *ldb,
3404 lapack_int *info);
3405
3406#define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs, ZPFTRS)
3407void LAPACK_zpftrs(char const *transr, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
3408 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3409
3410#define LAPACK_cpocon LAPACK_GLOBAL(cpocon, CPOCON)
3411void LAPACK_cpocon(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float const *anorm, float *rcond,
3412 lapack_complex_float *work, float *rwork, lapack_int *info);
3413
3414#define LAPACK_dpocon LAPACK_GLOBAL(dpocon, DPOCON)
3415void LAPACK_dpocon(char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double const *anorm, double *rcond, double *work,
3416 lapack_int *iwork, lapack_int *info);
3417
3418#define LAPACK_spocon LAPACK_GLOBAL(spocon, SPOCON)
3419void LAPACK_spocon(char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float const *anorm, float *rcond, float *work,
3420 lapack_int *iwork, lapack_int *info);
3421
3422#define LAPACK_zpocon LAPACK_GLOBAL(zpocon, ZPOCON)
3423void LAPACK_zpocon(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double const *anorm, double *rcond,
3424 lapack_complex_double *work, double *rwork, lapack_int *info);
3425
3426#define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ, CPOEQU)
3427void LAPACK_cpoequ(lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *S, float *scond, float *amax, lapack_int *info);
3428
3429#define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ, DPOEQU)
3430void LAPACK_dpoequ(lapack_int const *n, double const *A, lapack_int const *lda, double *S, double *scond, double *amax, lapack_int *info);
3431
3432#define LAPACK_spoequ LAPACK_GLOBAL(spoequ, SPOEQU)
3433void LAPACK_spoequ(lapack_int const *n, float const *A, lapack_int const *lda, float *S, float *scond, float *amax, lapack_int *info);
3434
3435#define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ, ZPOEQU)
3436void LAPACK_zpoequ(lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *S, double *scond, double *amax,
3437 lapack_int *info);
3438
3439#define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb, CPOEQUB)
3440void LAPACK_cpoequb(lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *S, float *scond, float *amax, lapack_int *info);
3441
3442#define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb, DPOEQUB)
3443void LAPACK_dpoequb(lapack_int const *n, double const *A, lapack_int const *lda, double *S, double *scond, double *amax, lapack_int *info);
3444
3445#define LAPACK_spoequb LAPACK_GLOBAL(spoequb, SPOEQUB)
3446void LAPACK_spoequb(lapack_int const *n, float const *A, lapack_int const *lda, float *S, float *scond, float *amax, lapack_int *info);
3447
3448#define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb, ZPOEQUB)
3449void LAPACK_zpoequb(lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *S, double *scond, double *amax,
3450 lapack_int *info);
3451
3452#define LAPACK_cporfs LAPACK_GLOBAL(cporfs, CPORFS)
3453void LAPACK_cporfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
3454 lapack_complex_float const *AF, lapack_int const *ldaf, lapack_complex_float const *B, lapack_int const *ldb,
3455 lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work, float *rwork,
3456 lapack_int *info);
3457
3458#define LAPACK_dporfs LAPACK_GLOBAL(dporfs, DPORFS)
3459void LAPACK_dporfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double const *AF,
3460 lapack_int const *ldaf, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr, double *berr,
3461 double *work, lapack_int *iwork, lapack_int *info);
3462
3463#define LAPACK_sporfs LAPACK_GLOBAL(sporfs, SPORFS)
3464void LAPACK_sporfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float const *AF,
3465 lapack_int const *ldaf, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *ferr, float *berr,
3466 float *work, lapack_int *iwork, lapack_int *info);
3467
3468#define LAPACK_zporfs LAPACK_GLOBAL(zporfs, ZPORFS)
3469void LAPACK_zporfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
3470 lapack_complex_double const *AF, lapack_int const *ldaf, lapack_complex_double const *B, lapack_int const *ldb,
3471 lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work, double *rwork,
3472 lapack_int *info);
3473
3474#define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx, CPORFSX)
3475void LAPACK_cporfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
3476 lapack_int const *lda, lapack_complex_float const *AF, lapack_int const *ldaf, float *S, lapack_complex_float const *B,
3477 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *berr, lapack_int const *n_err_bnds,
3478 float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params, lapack_complex_float *work, float *rwork,
3479 lapack_int *info);
3480
3481#define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx, DPORFSX)
3482void LAPACK_dporfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda,
3483 double const *AF, lapack_int const *ldaf, double *S, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx,
3484 double *rcond, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp,
3485 lapack_int const *nparams, double *params, double *work, lapack_int *iwork, lapack_int *info);
3486
3487#define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx, SPORFSX)
3488void LAPACK_sporfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda,
3489 float const *AF, lapack_int const *ldaf, float *S, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx,
3490 float *rcond, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams,
3491 float *params, float *work, lapack_int *iwork, lapack_int *info);
3492
3493#define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx, ZPORFSX)
3494void LAPACK_zporfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
3495 lapack_int const *lda, lapack_complex_double const *AF, lapack_int const *ldaf, double *S, lapack_complex_double const *B,
3496 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *berr, lapack_int const *n_err_bnds,
3497 double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params, lapack_complex_double *work,
3498 double *rwork, lapack_int *info);
3499
3500#define LAPACK_cposv LAPACK_GLOBAL(cposv, CPOSV)
3501void LAPACK_cposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
3502 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3503
3504#define LAPACK_dposv LAPACK_GLOBAL(dposv, DPOSV)
3505void LAPACK_dposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
3506 lapack_int *info);
3507
3508#define LAPACK_sposv LAPACK_GLOBAL(sposv, SPOSV)
3509void LAPACK_sposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
3510 lapack_int *info);
3511
3512#define LAPACK_zposv LAPACK_GLOBAL(zposv, ZPOSV)
3513void LAPACK_zposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
3514 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3515
3516#define LAPACK_dsposv LAPACK_GLOBAL(dsposv, DSPOSV)
3517void LAPACK_dsposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double const *B,
3518 lapack_int const *ldb, double *X, lapack_int const *ldx, double *work, float *swork, lapack_int *iter, lapack_int *info);
3519
3520#define LAPACK_zcposv LAPACK_GLOBAL(zcposv, ZCPOSV)
3521void LAPACK_zcposv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
3522 lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
3523 lapack_complex_double *work, lapack_complex_float *swork, double *rwork, lapack_int *iter, lapack_int *info);
3524
3525#define LAPACK_cposvx LAPACK_GLOBAL(cposvx, CPOSVX)
3526void LAPACK_cposvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
3527 lapack_complex_float *AF, lapack_int const *ldaf, char *equed, float *S, lapack_complex_float *B, lapack_int const *ldb,
3528 lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork,
3529 lapack_int *info);
3530
3531#define LAPACK_dposvx LAPACK_GLOBAL(dposvx, DPOSVX)
3532void LAPACK_dposvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *AF,
3533 lapack_int const *ldaf, char *equed, double *S, double *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond,
3534 double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
3535
3536#define LAPACK_sposvx LAPACK_GLOBAL(sposvx, SPOSVX)
3537void LAPACK_sposvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *AF,
3538 lapack_int const *ldaf, char *equed, float *S, float *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond,
3539 float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
3540
3541#define LAPACK_zposvx LAPACK_GLOBAL(zposvx, ZPOSVX)
3542void LAPACK_zposvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
3543 lapack_complex_double *AF, lapack_int const *ldaf, char *equed, double *S, lapack_complex_double *B, lapack_int const *ldb,
3544 lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work,
3545 double *rwork, lapack_int *info);
3546
3547#define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx, CPOSVXX)
3548void LAPACK_cposvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
3549 lapack_complex_float *AF, lapack_int const *ldaf, char *equed, float *S, lapack_complex_float *B, lapack_int const *ldb,
3550 lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr, lapack_int const *n_err_bnds,
3551 float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params, lapack_complex_float *work, float *rwork,
3552 lapack_int *info);
3553
3554#define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx, DPOSVXX)
3555void LAPACK_dposvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *AF,
3556 lapack_int const *ldaf, char *equed, double *S, double *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond,
3557 double *rpvgrw, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp,
3558 lapack_int const *nparams, double *params, double *work, lapack_int *iwork, lapack_int *info);
3559
3560#define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx, SPOSVXX)
3561void LAPACK_sposvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *AF,
3562 lapack_int const *ldaf, char *equed, float *S, float *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond,
3563 float *rpvgrw, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams,
3564 float *params, float *work, lapack_int *iwork, lapack_int *info);
3565
3566#define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx, ZPOSVXX)
3567void LAPACK_zposvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
3568 lapack_complex_double *AF, lapack_int const *ldaf, char *equed, double *S, lapack_complex_double *B, lapack_int const *ldb,
3569 lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr, lapack_int const *n_err_bnds,
3570 double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params, lapack_complex_double *work,
3571 double *rwork, lapack_int *info);
3572
3573#define LAPACK_cpotf2 LAPACK_GLOBAL(cpotf2, CPOTF2)
3574void LAPACK_cpotf2(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
3575
3576#define LAPACK_dpotf2 LAPACK_GLOBAL(dpotf2, DPOTF2)
3577void LAPACK_dpotf2(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
3578
3579#define LAPACK_spotf2 LAPACK_GLOBAL(spotf2, SPOTF2)
3580void LAPACK_spotf2(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
3581
3582#define LAPACK_zpotf2 LAPACK_GLOBAL(zpotf2, ZPOTF2)
3583void LAPACK_zpotf2(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
3584
3585#define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf, CPOTRF)
3586void LAPACK_cpotrf(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
3587
3588#define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf, DPOTRF)
3589void LAPACK_dpotrf(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
3590
3591#define LAPACK_spotrf LAPACK_GLOBAL(spotrf, SPOTRF)
3592void LAPACK_spotrf(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
3593
3594#define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf, ZPOTRF)
3595void LAPACK_zpotrf(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
3596
3597#define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2, CPOTRF2)
3598void LAPACK_cpotrf2(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
3599
3600#define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2, DPOTRF2)
3601void LAPACK_dpotrf2(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
3602
3603#define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2, SPOTRF2)
3604void LAPACK_spotrf2(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
3605
3606#define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2, ZPOTRF2)
3607void LAPACK_zpotrf2(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
3608
3609#define LAPACK_cpotri LAPACK_GLOBAL(cpotri, CPOTRI)
3610void LAPACK_cpotri(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
3611
3612#define LAPACK_dpotri LAPACK_GLOBAL(dpotri, DPOTRI)
3613void LAPACK_dpotri(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
3614
3615#define LAPACK_spotri LAPACK_GLOBAL(spotri, SPOTRI)
3616void LAPACK_spotri(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
3617
3618#define LAPACK_zpotri LAPACK_GLOBAL(zpotri, ZPOTRI)
3619void LAPACK_zpotri(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
3620
3621#define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs, CPOTRS)
3622void LAPACK_cpotrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
3623 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3624
3625#define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs, DPOTRS)
3626void LAPACK_dpotrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double *B,
3627 lapack_int const *ldb, lapack_int *info);
3628
3629#define LAPACK_spotrs LAPACK_GLOBAL(spotrs, SPOTRS)
3630void LAPACK_spotrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float *B,
3631 lapack_int const *ldb, lapack_int *info);
3632
3633#define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs, ZPOTRS)
3634void LAPACK_zpotrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
3635 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3636
3637#define LAPACK_cppcon LAPACK_GLOBAL(cppcon, CPPCON)
3638void LAPACK_cppcon(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, float const *anorm, float *rcond,
3639 lapack_complex_float *work, float *rwork, lapack_int *info);
3640
3641#define LAPACK_dppcon LAPACK_GLOBAL(dppcon, DPPCON)
3642void LAPACK_dppcon(char const *uplo, lapack_int const *n, double const *AP, double const *anorm, double *rcond, double *work, lapack_int *iwork,
3643 lapack_int *info);
3644
3645#define LAPACK_sppcon LAPACK_GLOBAL(sppcon, SPPCON)
3646void LAPACK_sppcon(char const *uplo, lapack_int const *n, float const *AP, float const *anorm, float *rcond, float *work, lapack_int *iwork,
3647 lapack_int *info);
3648
3649#define LAPACK_zppcon LAPACK_GLOBAL(zppcon, ZPPCON)
3650void LAPACK_zppcon(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, double const *anorm, double *rcond,
3651 lapack_complex_double *work, double *rwork, lapack_int *info);
3652
3653#define LAPACK_cppequ LAPACK_GLOBAL(cppequ, CPPEQU)
3654void LAPACK_cppequ(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, float *S, float *scond, float *amax, lapack_int *info);
3655
3656#define LAPACK_dppequ LAPACK_GLOBAL(dppequ, DPPEQU)
3657void LAPACK_dppequ(char const *uplo, lapack_int const *n, double const *AP, double *S, double *scond, double *amax, lapack_int *info);
3658
3659#define LAPACK_sppequ LAPACK_GLOBAL(sppequ, SPPEQU)
3660void LAPACK_sppequ(char const *uplo, lapack_int const *n, float const *AP, float *S, float *scond, float *amax, lapack_int *info);
3661
3662#define LAPACK_zppequ LAPACK_GLOBAL(zppequ, ZPPEQU)
3663void LAPACK_zppequ(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, double *S, double *scond, double *amax, lapack_int *info);
3664
3665#define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs, CPPRFS)
3666void LAPACK_cpprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_complex_float const *AFP,
3667 lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr,
3668 lapack_complex_float *work, float *rwork, lapack_int *info);
3669
3670#define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs, DPPRFS)
3671void LAPACK_dpprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *AP, double const *AFP, double const *B,
3672 lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr, double *berr, double *work, lapack_int *iwork,
3673 lapack_int *info);
3674
3675#define LAPACK_spprfs LAPACK_GLOBAL(spprfs, SPPRFS)
3676void LAPACK_spprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *AP, float const *AFP, float const *B,
3677 lapack_int const *ldb, float *X, lapack_int const *ldx, float *ferr, float *berr, float *work, lapack_int *iwork,
3678 lapack_int *info);
3679
3680#define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs, ZPPRFS)
3681void LAPACK_zpprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_complex_double const *AFP,
3682 lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr,
3683 lapack_complex_double *work, double *rwork, lapack_int *info);
3684
3685#define LAPACK_cppsv LAPACK_GLOBAL(cppsv, CPPSV)
3686void LAPACK_cppsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *AP, lapack_complex_float *B,
3687 lapack_int const *ldb, lapack_int *info);
3688
3689#define LAPACK_dppsv LAPACK_GLOBAL(dppsv, DPPSV)
3690void LAPACK_dppsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *AP, double *B, lapack_int const *ldb, lapack_int *info);
3691
3692#define LAPACK_sppsv LAPACK_GLOBAL(sppsv, SPPSV)
3693void LAPACK_sppsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *AP, float *B, lapack_int const *ldb, lapack_int *info);
3694
3695#define LAPACK_zppsv LAPACK_GLOBAL(zppsv, ZPPSV)
3696void LAPACK_zppsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *AP, lapack_complex_double *B,
3697 lapack_int const *ldb, lapack_int *info);
3698
3699#define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx, CPPSVX)
3700void LAPACK_cppsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *AP,
3701 lapack_complex_float *AFP, char *equed, float *S, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *X,
3702 lapack_int const *ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
3703
3704#define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx, DPPSVX)
3705void LAPACK_dppsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *AP, double *AFP, char *equed, double *S,
3706 double *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work,
3707 lapack_int *iwork, lapack_int *info);
3708
3709#define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx, SPPSVX)
3710void LAPACK_sppsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *AP, float *AFP, char *equed, float *S,
3711 float *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work,
3712 lapack_int *iwork, lapack_int *info);
3713
3714#define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx, ZPPSVX)
3715void LAPACK_zppsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *AP,
3716 lapack_complex_double *AFP, char *equed, double *S, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *X,
3717 lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
3718
3719#define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf, CPPTRF)
3720void LAPACK_cpptrf(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int *info);
3721
3722#define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf, DPPTRF)
3723void LAPACK_dpptrf(char const *uplo, lapack_int const *n, double *AP, lapack_int *info);
3724
3725#define LAPACK_spptrf LAPACK_GLOBAL(spptrf, SPPTRF)
3726void LAPACK_spptrf(char const *uplo, lapack_int const *n, float *AP, lapack_int *info);
3727
3728#define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf, ZPPTRF)
3729void LAPACK_zpptrf(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int *info);
3730
3731#define LAPACK_cpptri LAPACK_GLOBAL(cpptri, CPPTRI)
3732void LAPACK_cpptri(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int *info);
3733
3734#define LAPACK_dpptri LAPACK_GLOBAL(dpptri, DPPTRI)
3735void LAPACK_dpptri(char const *uplo, lapack_int const *n, double *AP, lapack_int *info);
3736
3737#define LAPACK_spptri LAPACK_GLOBAL(spptri, SPPTRI)
3738void LAPACK_spptri(char const *uplo, lapack_int const *n, float *AP, lapack_int *info);
3739
3740#define LAPACK_zpptri LAPACK_GLOBAL(zpptri, ZPPTRI)
3741void LAPACK_zpptri(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int *info);
3742
3743#define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs, CPPTRS)
3744void LAPACK_cpptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_complex_float *B,
3745 lapack_int const *ldb, lapack_int *info);
3746
3747#define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs, DPPTRS)
3748void LAPACK_dpptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *AP, double *B, lapack_int const *ldb,
3749 lapack_int *info);
3750
3751#define LAPACK_spptrs LAPACK_GLOBAL(spptrs, SPPTRS)
3752void LAPACK_spptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *AP, float *B, lapack_int const *ldb, lapack_int *info);
3753
3754#define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs, ZPPTRS)
3755void LAPACK_zpptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_complex_double *B,
3756 lapack_int const *ldb, lapack_int *info);
3757
3758#define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf, CPSTRF)
3759void LAPACK_cpstrf(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *piv, lapack_int *rank,
3760 float const *tol, float *work, lapack_int *info);
3761
3762#define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf, DPSTRF)
3763void LAPACK_dpstrf(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *piv, lapack_int *rank, double const *tol,
3764 double *work, lapack_int *info);
3765
3766#define LAPACK_spstrf LAPACK_GLOBAL(spstrf, SPSTRF)
3767void LAPACK_spstrf(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *piv, lapack_int *rank, float const *tol,
3768 float *work, lapack_int *info);
3769
3770#define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf, ZPSTRF)
3771void LAPACK_zpstrf(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *piv, lapack_int *rank,
3772 double const *tol, double *work, lapack_int *info);
3773
3774#define LAPACK_cptcon LAPACK_GLOBAL(cptcon, CPTCON)
3775void LAPACK_cptcon(lapack_int const *n, float const *D, lapack_complex_float const *E, float const *anorm, float *rcond, float *rwork,
3776 lapack_int *info);
3777
3778#define LAPACK_dptcon LAPACK_GLOBAL(dptcon, DPTCON)
3779void LAPACK_dptcon(lapack_int const *n, double const *D, double const *E, double const *anorm, double *rcond, double *work, lapack_int *info);
3780
3781#define LAPACK_sptcon LAPACK_GLOBAL(sptcon, SPTCON)
3782void LAPACK_sptcon(lapack_int const *n, float const *D, float const *E, float const *anorm, float *rcond, float *work, lapack_int *info);
3783
3784#define LAPACK_zptcon LAPACK_GLOBAL(zptcon, ZPTCON)
3785void LAPACK_zptcon(lapack_int const *n, double const *D, lapack_complex_double const *E, double const *anorm, double *rcond, double *rwork,
3786 lapack_int *info);
3787
3788#define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr, CPTEQR)
3789void LAPACK_cpteqr(char const *compz, lapack_int const *n, float *D, float *E, lapack_complex_float *Z, lapack_int const *ldz, float *work,
3790 lapack_int *info);
3791
3792#define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr, DPTEQR)
3793void LAPACK_dpteqr(char const *compz, lapack_int const *n, double *D, double *E, double *Z, lapack_int const *ldz, double *work, lapack_int *info);
3794
3795#define LAPACK_spteqr LAPACK_GLOBAL(spteqr, SPTEQR)
3796void LAPACK_spteqr(char const *compz, lapack_int const *n, float *D, float *E, float *Z, lapack_int const *ldz, float *work, lapack_int *info);
3797
3798#define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr, ZPTEQR)
3799void LAPACK_zpteqr(char const *compz, lapack_int const *n, double *D, double *E, lapack_complex_double *Z, lapack_int const *ldz, double *work,
3800 lapack_int *info);
3801
3802#define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs, CPTRFS)
3803void LAPACK_cptrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *D, lapack_complex_float const *E, float const *DF,
3804 lapack_complex_float const *EF, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X,
3805 lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
3806
3807#define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs, DPTRFS)
3808void LAPACK_dptrfs(lapack_int const *n, lapack_int const *nrhs, double const *D, double const *E, double const *DF, double const *EF, double const *B,
3809 lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr, double *berr, double *work, lapack_int *info);
3810
3811#define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs, SPTRFS)
3812void LAPACK_sptrfs(lapack_int const *n, lapack_int const *nrhs, float const *D, float const *E, float const *DF, float const *EF, float const *B,
3813 lapack_int const *ldb, float *X, lapack_int const *ldx, float *ferr, float *berr, float *work, lapack_int *info);
3814
3815#define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs, ZPTRFS)
3816void LAPACK_zptrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *D, lapack_complex_double const *E, double const *DF,
3817 lapack_complex_double const *EF, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X,
3818 lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
3819
3820#define LAPACK_cptsv LAPACK_GLOBAL(cptsv, CPTSV)
3821void LAPACK_cptsv(lapack_int const *n, lapack_int const *nrhs, float *D, lapack_complex_float *E, lapack_complex_float *B, lapack_int const *ldb,
3822 lapack_int *info);
3823
3824#define LAPACK_dptsv LAPACK_GLOBAL(dptsv, DPTSV)
3825void LAPACK_dptsv(lapack_int const *n, lapack_int const *nrhs, double *D, double *E, double *B, lapack_int const *ldb, lapack_int *info);
3826
3827#define LAPACK_sptsv LAPACK_GLOBAL(sptsv, SPTSV)
3828void LAPACK_sptsv(lapack_int const *n, lapack_int const *nrhs, float *D, float *E, float *B, lapack_int const *ldb, lapack_int *info);
3829
3830#define LAPACK_zptsv LAPACK_GLOBAL(zptsv, ZPTSV)
3831void LAPACK_zptsv(lapack_int const *n, lapack_int const *nrhs, double *D, lapack_complex_double *E, lapack_complex_double *B, lapack_int const *ldb,
3832 lapack_int *info);
3833
3834#define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx, CPTSVX)
3835void LAPACK_cptsvx(char const *fact, lapack_int const *n, lapack_int const *nrhs, float const *D, lapack_complex_float const *E, float *DF,
3836 lapack_complex_float *EF, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
3837 float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
3838
3839#define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx, DPTSVX)
3840void LAPACK_dptsvx(char const *fact, lapack_int const *n, lapack_int const *nrhs, double const *D, double const *E, double *DF, double *EF,
3841 double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work,
3842 lapack_int *info);
3843
3844#define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx, SPTSVX)
3845void LAPACK_sptsvx(char const *fact, lapack_int const *n, lapack_int const *nrhs, float const *D, float const *E, float *DF, float *EF,
3846 float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work,
3847 lapack_int *info);
3848
3849#define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx, ZPTSVX)
3850void LAPACK_zptsvx(char const *fact, lapack_int const *n, lapack_int const *nrhs, double const *D, lapack_complex_double const *E, double *DF,
3851 lapack_complex_double *EF, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
3852 double *rcond, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
3853
3854#define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf, CPTTRF)
3855void LAPACK_cpttrf(lapack_int const *n, float *D, lapack_complex_float *E, lapack_int *info);
3856
3857#define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf, DPTTRF)
3858void LAPACK_dpttrf(lapack_int const *n, double *D, double *E, lapack_int *info);
3859
3860#define LAPACK_spttrf LAPACK_GLOBAL(spttrf, SPTTRF)
3861void LAPACK_spttrf(lapack_int const *n, float *D, float *E, lapack_int *info);
3862
3863#define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf, ZPTTRF)
3864void LAPACK_zpttrf(lapack_int const *n, double *D, lapack_complex_double *E, lapack_int *info);
3865
3866#define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs, CPTTRS)
3867void LAPACK_cpttrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *D, lapack_complex_float const *E,
3868 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
3869
3870#define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs, DPTTRS)
3871void LAPACK_dpttrs(lapack_int const *n, lapack_int const *nrhs, double const *D, double const *E, double *B, lapack_int const *ldb, lapack_int *info);
3872
3873#define LAPACK_spttrs LAPACK_GLOBAL(spttrs, SPTTRS)
3874void LAPACK_spttrs(lapack_int const *n, lapack_int const *nrhs, float const *D, float const *E, float *B, lapack_int const *ldb, lapack_int *info);
3875
3876#define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs, ZPTTRS)
3877void LAPACK_zpttrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *D, lapack_complex_double const *E,
3878 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
3879
3880#define LAPACK_dsbev LAPACK_GLOBAL(dsbev, DSBEV)
3881void LAPACK_dsbev(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, double *W,
3882 double *Z, lapack_int const *ldz, double *work, lapack_int *info);
3883
3884#define LAPACK_ssbev LAPACK_GLOBAL(ssbev, SSBEV)
3885void LAPACK_ssbev(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, float *W,
3886 float *Z, lapack_int const *ldz, float *work, lapack_int *info);
3887
3888#define LAPACK_dsbev_2stage LAPACK_GLOBAL(dsbev_2stage, DSBEV_2STAGE)
3889void LAPACK_dsbev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, double *W,
3890 double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *info);
3891
3892#define LAPACK_ssbev_2stage LAPACK_GLOBAL(ssbev_2stage, SSBEV_2STAGE)
3893void LAPACK_ssbev_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, float *W,
3894 float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *info);
3895
3896#define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd, DSBEVD)
3897void LAPACK_dsbevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, double *W,
3898 double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
3899 lapack_int *info);
3900
3901#define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd, SSBEVD)
3902void LAPACK_ssbevd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, float *W,
3903 float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
3904 lapack_int *info);
3905
3906#define LAPACK_dsbevd_2stage LAPACK_GLOBAL(dsbevd_2stage, DSBEVD_2STAGE)
3907void LAPACK_dsbevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab,
3908 double *W, double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *iwork,
3909 lapack_int const *liwork, lapack_int *info);
3910
3911#define LAPACK_ssbevd_2stage LAPACK_GLOBAL(ssbevd_2stage, SSBEVD_2STAGE)
3912void LAPACK_ssbevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, float *W,
3913 float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
3914 lapack_int *info);
3915
3916#define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx, DSBEVX)
3917void LAPACK_dsbevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB,
3918 lapack_int const *ldab, double *Q, lapack_int const *ldq, double const *vl, double const *vu, lapack_int const *il,
3919 lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz, double *work,
3920 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3921
3922#define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx, SSBEVX)
3923void LAPACK_ssbevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB,
3924 lapack_int const *ldab, float *Q, lapack_int const *ldq, float const *vl, float const *vu, lapack_int const *il,
3925 lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz, float *work,
3926 lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3927
3928#define LAPACK_dsbevx_2stage LAPACK_GLOBAL(dsbevx_2stage, DSBEVX_2STAGE)
3929void LAPACK_dsbevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB,
3930 lapack_int const *ldab, double *Q, lapack_int const *ldq, double const *vl, double const *vu, lapack_int const *il,
3931 lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz, double *work,
3932 lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3933
3934#define LAPACK_ssbevx_2stage LAPACK_GLOBAL(ssbevx_2stage, SSBEVX_2STAGE)
3935void LAPACK_ssbevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB,
3936 lapack_int const *ldab, float *Q, lapack_int const *ldq, float const *vl, float const *vu, lapack_int const *il,
3937 lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz, float *work,
3938 lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3939
3940#define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst, DSBGST)
3941void LAPACK_dsbgst(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, double *AB,
3942 lapack_int const *ldab, double const *BB, lapack_int const *ldbb, double *X, lapack_int const *ldx, double *work,
3943 lapack_int *info);
3944
3945#define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst, SSBGST)
3946void LAPACK_ssbgst(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, float *AB,
3947 lapack_int const *ldab, float const *BB, lapack_int const *ldbb, float *X, lapack_int const *ldx, float *work, lapack_int *info);
3948
3949#define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv, DSBGV)
3950void LAPACK_dsbgv(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, double *AB,
3951 lapack_int const *ldab, double *BB, lapack_int const *ldbb, double *W, double *Z, lapack_int const *ldz, double *work,
3952 lapack_int *info);
3953
3954#define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv, SSBGV)
3955void LAPACK_ssbgv(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, float *AB,
3956 lapack_int const *ldab, float *BB, lapack_int const *ldbb, float *W, float *Z, lapack_int const *ldz, float *work,
3957 lapack_int *info);
3958
3959#define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd, DSBGVD)
3960void LAPACK_dsbgvd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, double *AB,
3961 lapack_int const *ldab, double *BB, lapack_int const *ldbb, double *W, double *Z, lapack_int const *ldz, double *work,
3962 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
3963
3964#define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd, SSBGVD)
3965void LAPACK_ssbgvd(char const *jobz, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, float *AB,
3966 lapack_int const *ldab, float *BB, lapack_int const *ldbb, float *W, float *Z, lapack_int const *ldz, float *work,
3967 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
3968
3969#define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx, DSBGVX)
3970void LAPACK_dsbgvx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, double *AB,
3971 lapack_int const *ldab, double *BB, lapack_int const *ldbb, double *Q, lapack_int const *ldq, double const *vl, double const *vu,
3972 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz,
3973 double *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3974
3975#define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx, SSBGVX)
3976void LAPACK_ssbgvx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, lapack_int const *ka, lapack_int const *kb, float *AB,
3977 lapack_int const *ldab, float *BB, lapack_int const *ldbb, float *Q, lapack_int const *ldq, float const *vl, float const *vu,
3978 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz,
3979 float *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
3980
3981#define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd, DSBTRD)
3982void LAPACK_dsbtrd(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *kd, double *AB, lapack_int const *ldab, double *D,
3983 double *E, double *Q, lapack_int const *ldq, double *work, lapack_int *info);
3984
3985#define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd, SSBTRD)
3986void LAPACK_ssbtrd(char const *vect, char const *uplo, lapack_int const *n, lapack_int const *kd, float *AB, lapack_int const *ldab, float *D,
3987 float *E, float *Q, lapack_int const *ldq, float *work, lapack_int *info);
3988
3989#define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk, DSFRK)
3990void LAPACK_dsfrk(char const *transr, char const *uplo, char const *trans, lapack_int const *n, lapack_int const *k, double const *alpha,
3991 double const *A, lapack_int const *lda, double const *beta, double *C);
3992
3993#define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk, SSFRK)
3994void LAPACK_ssfrk(char const *transr, char const *uplo, char const *trans, lapack_int const *n, lapack_int const *k, float const *alpha,
3995 float const *A, lapack_int const *lda, float const *beta, float *C);
3996
3997#define LAPACK_cspcon LAPACK_GLOBAL(cspcon, CSPCON)
3998void LAPACK_cspcon(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, lapack_int const *ipiv, float const *anorm, float *rcond,
3999 lapack_complex_float *work, lapack_int *info);
4000
4001#define LAPACK_dspcon LAPACK_GLOBAL(dspcon, DSPCON)
4002void LAPACK_dspcon(char const *uplo, lapack_int const *n, double const *AP, lapack_int const *ipiv, double const *anorm, double *rcond, double *work,
4003 lapack_int *iwork, lapack_int *info);
4004
4005#define LAPACK_sspcon LAPACK_GLOBAL(sspcon, SSPCON)
4006void LAPACK_sspcon(char const *uplo, lapack_int const *n, float const *AP, lapack_int const *ipiv, float const *anorm, float *rcond, float *work,
4007 lapack_int *iwork, lapack_int *info);
4008
4009#define LAPACK_zspcon LAPACK_GLOBAL(zspcon, ZSPCON)
4010void LAPACK_zspcon(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, lapack_int const *ipiv, double const *anorm, double *rcond,
4011 lapack_complex_double *work, lapack_int *info);
4012
4013#define LAPACK_dspev LAPACK_GLOBAL(dspev, DSPEV)
4014void LAPACK_dspev(char const *jobz, char const *uplo, lapack_int const *n, double *AP, double *W, double *Z, lapack_int const *ldz, double *work,
4015 lapack_int *info);
4016
4017#define LAPACK_sspev LAPACK_GLOBAL(sspev, SSPEV)
4018void LAPACK_sspev(char const *jobz, char const *uplo, lapack_int const *n, float *AP, float *W, float *Z, lapack_int const *ldz, float *work,
4019 lapack_int *info);
4020
4021#define LAPACK_dspevd LAPACK_GLOBAL(dspevd, DSPEVD)
4022void LAPACK_dspevd(char const *jobz, char const *uplo, lapack_int const *n, double *AP, double *W, double *Z, lapack_int const *ldz, double *work,
4023 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4024
4025#define LAPACK_sspevd LAPACK_GLOBAL(sspevd, SSPEVD)
4026void LAPACK_sspevd(char const *jobz, char const *uplo, lapack_int const *n, float *AP, float *W, float *Z, lapack_int const *ldz, float *work,
4027 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4028
4029#define LAPACK_dspevx LAPACK_GLOBAL(dspevx, DSPEVX)
4030void LAPACK_dspevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *AP, double const *vl, double const *vu,
4031 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz,
4032 double *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4033
4034#define LAPACK_sspevx LAPACK_GLOBAL(sspevx, SSPEVX)
4035void LAPACK_sspevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *AP, float const *vl, float const *vu,
4036 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz,
4037 float *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4038
4039#define LAPACK_dspgst LAPACK_GLOBAL(dspgst, DSPGST)
4040void LAPACK_dspgst(lapack_int const *itype, char const *uplo, lapack_int const *n, double *AP, double const *BP, lapack_int *info);
4041
4042#define LAPACK_sspgst LAPACK_GLOBAL(sspgst, SSPGST)
4043void LAPACK_sspgst(lapack_int const *itype, char const *uplo, lapack_int const *n, float *AP, float const *BP, lapack_int *info);
4044
4045#define LAPACK_dspgv LAPACK_GLOBAL(dspgv, DSPGV)
4046void LAPACK_dspgv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, double *AP, double *BP, double *W, double *Z,
4047 lapack_int const *ldz, double *work, lapack_int *info);
4048
4049#define LAPACK_sspgv LAPACK_GLOBAL(sspgv, SSPGV)
4050void LAPACK_sspgv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, float *AP, float *BP, float *W, float *Z,
4051 lapack_int const *ldz, float *work, lapack_int *info);
4052
4053#define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd, DSPGVD)
4054void LAPACK_dspgvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, double *AP, double *BP, double *W, double *Z,
4055 lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4056
4057#define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd, SSPGVD)
4058void LAPACK_sspgvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, float *AP, float *BP, float *W, float *Z,
4059 lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4060
4061#define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx, DSPGVX)
4062void LAPACK_dspgvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *AP, double *BP,
4063 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W,
4064 double *Z, lapack_int const *ldz, double *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4065
4066#define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx, SSPGVX)
4067void LAPACK_sspgvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *AP, float *BP,
4068 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
4069 float *Z, lapack_int const *ldz, float *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4070
4071#define LAPACK_csprfs LAPACK_GLOBAL(csprfs, CSPRFS)
4072void LAPACK_csprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_complex_float const *AFP,
4073 lapack_int const *ipiv, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx,
4074 float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
4075
4076#define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs, DSPRFS)
4077void LAPACK_dsprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *AP, double const *AFP, lapack_int const *ipiv,
4078 double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *ferr, double *berr, double *work,
4079 lapack_int *iwork, lapack_int *info);
4080
4081#define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs, SSPRFS)
4082void LAPACK_ssprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *AP, float const *AFP, lapack_int const *ipiv,
4083 float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *ferr, float *berr, float *work, lapack_int *iwork,
4084 lapack_int *info);
4085
4086#define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs, ZSPRFS)
4087void LAPACK_zsprfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_complex_double const *AFP,
4088 lapack_int const *ipiv, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx,
4089 double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
4090
4091#define LAPACK_cspsv LAPACK_GLOBAL(cspsv, CSPSV)
4092void LAPACK_cspsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *AP, lapack_int *ipiv, lapack_complex_float *B,
4093 lapack_int const *ldb, lapack_int *info);
4094
4095#define LAPACK_dspsv LAPACK_GLOBAL(dspsv, DSPSV)
4096void LAPACK_dspsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *AP, lapack_int *ipiv, double *B, lapack_int const *ldb,
4097 lapack_int *info);
4098
4099#define LAPACK_sspsv LAPACK_GLOBAL(sspsv, SSPSV)
4100void LAPACK_sspsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *AP, lapack_int *ipiv, float *B, lapack_int const *ldb,
4101 lapack_int *info);
4102
4103#define LAPACK_zspsv LAPACK_GLOBAL(zspsv, ZSPSV)
4104void LAPACK_zspsv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *AP, lapack_int *ipiv,
4105 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4106
4107#define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx, CSPSVX)
4108void LAPACK_cspsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP,
4109 lapack_complex_float *AFP, lapack_int *ipiv, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X,
4110 lapack_int const *ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
4111
4112#define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx, DSPSVX)
4113void LAPACK_dspsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *AP, double *AFP, lapack_int *ipiv,
4114 double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr, double *work,
4115 lapack_int *iwork, lapack_int *info);
4116
4117#define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx, SSPSVX)
4118void LAPACK_sspsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *AP, float *AFP, lapack_int *ipiv,
4119 float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr, float *work,
4120 lapack_int *iwork, lapack_int *info);
4121
4122#define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx, ZSPSVX)
4123void LAPACK_zspsvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP,
4124 lapack_complex_double *AFP, lapack_int *ipiv, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X,
4125 lapack_int const *ldx, double *rcond, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
4126
4127#define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd, DSPTRD)
4128void LAPACK_dsptrd(char const *uplo, lapack_int const *n, double *AP, double *D, double *E, double *tau, lapack_int *info);
4129
4130#define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd, SSPTRD)
4131void LAPACK_ssptrd(char const *uplo, lapack_int const *n, float *AP, float *D, float *E, float *tau, lapack_int *info);
4132
4133#define LAPACK_csptrf LAPACK_GLOBAL(csptrf, CSPTRF)
4134void LAPACK_csptrf(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int *ipiv, lapack_int *info);
4135
4136#define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf, DSPTRF)
4137void LAPACK_dsptrf(char const *uplo, lapack_int const *n, double *AP, lapack_int *ipiv, lapack_int *info);
4138
4139#define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf, SSPTRF)
4140void LAPACK_ssptrf(char const *uplo, lapack_int const *n, float *AP, lapack_int *ipiv, lapack_int *info);
4141
4142#define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf, ZSPTRF)
4143void LAPACK_zsptrf(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int *ipiv, lapack_int *info);
4144
4145#define LAPACK_csptri LAPACK_GLOBAL(csptri, CSPTRI)
4146void LAPACK_csptri(char const *uplo, lapack_int const *n, lapack_complex_float *AP, lapack_int const *ipiv, lapack_complex_float *work,
4147 lapack_int *info);
4148
4149#define LAPACK_dsptri LAPACK_GLOBAL(dsptri, DSPTRI)
4150void LAPACK_dsptri(char const *uplo, lapack_int const *n, double *AP, lapack_int const *ipiv, double *work, lapack_int *info);
4151
4152#define LAPACK_ssptri LAPACK_GLOBAL(ssptri, SSPTRI)
4153void LAPACK_ssptri(char const *uplo, lapack_int const *n, float *AP, lapack_int const *ipiv, float *work, lapack_int *info);
4154
4155#define LAPACK_zsptri LAPACK_GLOBAL(zsptri, ZSPTRI)
4156void LAPACK_zsptri(char const *uplo, lapack_int const *n, lapack_complex_double *AP, lapack_int const *ipiv, lapack_complex_double *work,
4157 lapack_int *info);
4158
4159#define LAPACK_csptrs LAPACK_GLOBAL(csptrs, CSPTRS)
4160void LAPACK_csptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP, lapack_int const *ipiv,
4161 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
4162
4163#define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs, DSPTRS)
4164void LAPACK_dsptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *AP, lapack_int const *ipiv, double *B,
4165 lapack_int const *ldb, lapack_int *info);
4166
4167#define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs, SSPTRS)
4168void LAPACK_ssptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *AP, lapack_int const *ipiv, float *B,
4169 lapack_int const *ldb, lapack_int *info);
4170
4171#define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs, ZSPTRS)
4172void LAPACK_zsptrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *AP, lapack_int const *ipiv,
4173 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4174
4175#define LAPACK_dstebz LAPACK_GLOBAL(dstebz, DSTEBZ)
4176void LAPACK_dstebz(char const *range, char const *order, lapack_int const *n, double const *vl, double const *vu, lapack_int const *il,
4177 lapack_int const *iu, double const *abstol, double const *D, double const *E, lapack_int *m, lapack_int *nsplit, double *W,
4178 lapack_int *IBLOCK, lapack_int *ISPLIT, double *work, lapack_int *iwork, lapack_int *info);
4179
4180#define LAPACK_sstebz LAPACK_GLOBAL(sstebz, SSTEBZ)
4181void LAPACK_sstebz(char const *range, char const *order, lapack_int const *n, float const *vl, float const *vu, lapack_int const *il,
4182 lapack_int const *iu, float const *abstol, float const *D, float const *E, lapack_int *m, lapack_int *nsplit, float *W,
4183 lapack_int *IBLOCK, lapack_int *ISPLIT, float *work, lapack_int *iwork, lapack_int *info);
4184
4185#define LAPACK_cstedc LAPACK_GLOBAL(cstedc, CSTEDC)
4186void LAPACK_cstedc(char const *compz, lapack_int const *n, float *D, float *E, lapack_complex_float *Z, lapack_int const *ldz,
4187 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork,
4188 lapack_int const *liwork, lapack_int *info);
4189
4190#define LAPACK_dstedc LAPACK_GLOBAL(dstedc, DSTEDC)
4191void LAPACK_dstedc(char const *compz, lapack_int const *n, double *D, double *E, double *Z, lapack_int const *ldz, double *work,
4192 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4193
4194#define LAPACK_sstedc LAPACK_GLOBAL(sstedc, SSTEDC)
4195void LAPACK_sstedc(char const *compz, lapack_int const *n, float *D, float *E, float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork,
4196 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4197
4198#define LAPACK_zstedc LAPACK_GLOBAL(zstedc, ZSTEDC)
4199void LAPACK_zstedc(char const *compz, lapack_int const *n, double *D, double *E, lapack_complex_double *Z, lapack_int const *ldz,
4200 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork, lapack_int *iwork,
4201 lapack_int const *liwork, lapack_int *info);
4202
4203#define LAPACK_cstegr LAPACK_GLOBAL(cstegr, CSTEGR)
4204void LAPACK_cstegr(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4205 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, lapack_complex_float *Z,
4206 lapack_int const *ldz, lapack_int *ISUPPZ, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4207 lapack_int *info);
4208
4209#define LAPACK_dstegr LAPACK_GLOBAL(dstegr, DSTEGR)
4210void LAPACK_dstegr(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4211 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz,
4212 lapack_int *ISUPPZ, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4213
4214#define LAPACK_sstegr LAPACK_GLOBAL(sstegr, SSTEGR)
4215void LAPACK_sstegr(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4216 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz,
4217 lapack_int *ISUPPZ, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4218
4219#define LAPACK_zstegr LAPACK_GLOBAL(zstegr, ZSTEGR)
4220void LAPACK_zstegr(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4221 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, lapack_complex_double *Z,
4222 lapack_int const *ldz, lapack_int *ISUPPZ, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4223 lapack_int *info);
4224
4225#define LAPACK_cstein LAPACK_GLOBAL(cstein, CSTEIN)
4226void LAPACK_cstein(lapack_int const *n, float const *D, float const *E, lapack_int const *m, float const *W, lapack_int const *IBLOCK,
4227 lapack_int const *ISPLIT, lapack_complex_float *Z, lapack_int const *ldz, float *work, lapack_int *iwork, lapack_int *IFAIL,
4228 lapack_int *info);
4229
4230#define LAPACK_dstein LAPACK_GLOBAL(dstein, DSTEIN)
4231void LAPACK_dstein(lapack_int const *n, double const *D, double const *E, lapack_int const *m, double const *W, lapack_int const *IBLOCK,
4232 lapack_int const *ISPLIT, double *Z, lapack_int const *ldz, double *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4233
4234#define LAPACK_sstein LAPACK_GLOBAL(sstein, SSTEIN)
4235void LAPACK_sstein(lapack_int const *n, float const *D, float const *E, lapack_int const *m, float const *W, lapack_int const *IBLOCK,
4236 lapack_int const *ISPLIT, float *Z, lapack_int const *ldz, float *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4237
4238#define LAPACK_zstein LAPACK_GLOBAL(zstein, ZSTEIN)
4239void LAPACK_zstein(lapack_int const *n, double const *D, double const *E, lapack_int const *m, double const *W, lapack_int const *IBLOCK,
4240 lapack_int const *ISPLIT, lapack_complex_double *Z, lapack_int const *ldz, double *work, lapack_int *iwork, lapack_int *IFAIL,
4241 lapack_int *info);
4242
4243#define LAPACK_cstemr LAPACK_GLOBAL(cstemr, CSTEMR)
4244void LAPACK_cstemr(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4245 lapack_int const *il, lapack_int const *iu, lapack_int *m, float *W, lapack_complex_float *Z, lapack_int const *ldz,
4246 lapack_int const *nzc, lapack_int *ISUPPZ, lapack_logical *tryrac, float *work, lapack_int const *lwork, lapack_int *iwork,
4247 lapack_int const *liwork, lapack_int *info);
4248
4249#define LAPACK_dstemr LAPACK_GLOBAL(dstemr, DSTEMR)
4250void LAPACK_dstemr(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4251 lapack_int const *il, lapack_int const *iu, lapack_int *m, double *W, double *Z, lapack_int const *ldz, lapack_int const *nzc,
4252 lapack_int *ISUPPZ, lapack_logical *tryrac, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4253 lapack_int *info);
4254
4255#define LAPACK_sstemr LAPACK_GLOBAL(sstemr, SSTEMR)
4256void LAPACK_sstemr(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4257 lapack_int const *il, lapack_int const *iu, lapack_int *m, float *W, float *Z, lapack_int const *ldz, lapack_int const *nzc,
4258 lapack_int *ISUPPZ, lapack_logical *tryrac, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4259 lapack_int *info);
4260
4261#define LAPACK_zstemr LAPACK_GLOBAL(zstemr, ZSTEMR)
4262void LAPACK_zstemr(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4263 lapack_int const *il, lapack_int const *iu, lapack_int *m, double *W, lapack_complex_double *Z, lapack_int const *ldz,
4264 lapack_int const *nzc, lapack_int *ISUPPZ, lapack_logical *tryrac, double *work, lapack_int const *lwork, lapack_int *iwork,
4265 lapack_int const *liwork, lapack_int *info);
4266
4267#define LAPACK_csteqr LAPACK_GLOBAL(csteqr, CSTEQR)
4268void LAPACK_csteqr(char const *compz, lapack_int const *n, float *D, float *E, lapack_complex_float *Z, lapack_int const *ldz, float *work,
4269 lapack_int *info);
4270
4271#define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr, DSTEQR)
4272void LAPACK_dsteqr(char const *compz, lapack_int const *n, double *D, double *E, double *Z, lapack_int const *ldz, double *work, lapack_int *info);
4273
4274#define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr, SSTEQR)
4275void LAPACK_ssteqr(char const *compz, lapack_int const *n, float *D, float *E, float *Z, lapack_int const *ldz, float *work, lapack_int *info);
4276
4277#define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr, ZSTEQR)
4278void LAPACK_zsteqr(char const *compz, lapack_int const *n, double *D, double *E, lapack_complex_double *Z, lapack_int const *ldz, double *work,
4279 lapack_int *info);
4280
4281#define LAPACK_dsterf LAPACK_GLOBAL(dsterf, DSTERF)
4282void LAPACK_dsterf(lapack_int const *n, double *D, double *E, lapack_int *info);
4283
4284#define LAPACK_ssterf LAPACK_GLOBAL(ssterf, SSTERF)
4285void LAPACK_ssterf(lapack_int const *n, float *D, float *E, lapack_int *info);
4286
4287#define LAPACK_dstev LAPACK_GLOBAL(dstev, DSTEV)
4288void LAPACK_dstev(char const *jobz, lapack_int const *n, double *D, double *E, double *Z, lapack_int const *ldz, double *work, lapack_int *info);
4289
4290#define LAPACK_sstev LAPACK_GLOBAL(sstev, SSTEV)
4291void LAPACK_sstev(char const *jobz, lapack_int const *n, float *D, float *E, float *Z, lapack_int const *ldz, float *work, lapack_int *info);
4292
4293#define LAPACK_dstevd LAPACK_GLOBAL(dstevd, DSTEVD)
4294void LAPACK_dstevd(char const *jobz, lapack_int const *n, double *D, double *E, double *Z, lapack_int const *ldz, double *work,
4295 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4296
4297#define LAPACK_sstevd LAPACK_GLOBAL(sstevd, SSTEVD)
4298void LAPACK_sstevd(char const *jobz, lapack_int const *n, float *D, float *E, float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork,
4299 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4300
4301#define LAPACK_dstevr LAPACK_GLOBAL(dstevr, DSTEVR)
4302void LAPACK_dstevr(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4303 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz,
4304 lapack_int *ISUPPZ, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4305
4306#define LAPACK_sstevr LAPACK_GLOBAL(sstevr, SSTEVR)
4307void LAPACK_sstevr(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4308 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz,
4309 lapack_int *ISUPPZ, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4310
4311#define LAPACK_dstevx LAPACK_GLOBAL(dstevx, DSTEVX)
4312void LAPACK_dstevx(char const *jobz, char const *range, lapack_int const *n, double *D, double *E, double const *vl, double const *vu,
4313 lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz,
4314 double *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4315
4316#define LAPACK_sstevx LAPACK_GLOBAL(sstevx, SSTEVX)
4317void LAPACK_sstevx(char const *jobz, char const *range, lapack_int const *n, float *D, float *E, float const *vl, float const *vu,
4318 lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz,
4319 float *work, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4320
4321#define LAPACK_csycon LAPACK_GLOBAL(csycon, CSYCON)
4322void LAPACK_csycon(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, lapack_int const *ipiv,
4323 float const *anorm, float *rcond, lapack_complex_float *work, lapack_int *info);
4324
4325#define LAPACK_dsycon LAPACK_GLOBAL(dsycon, DSYCON)
4326void LAPACK_dsycon(char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, lapack_int const *ipiv, double const *anorm,
4327 double *rcond, double *work, lapack_int *iwork, lapack_int *info);
4328
4329#define LAPACK_ssycon LAPACK_GLOBAL(ssycon, SSYCON)
4330void LAPACK_ssycon(char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, lapack_int const *ipiv, float const *anorm,
4331 float *rcond, float *work, lapack_int *iwork, lapack_int *info);
4332
4333#define LAPACK_zsycon LAPACK_GLOBAL(zsycon, ZSYCON)
4334void LAPACK_zsycon(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_int const *ipiv,
4335 double const *anorm, double *rcond, lapack_complex_double *work, lapack_int *info);
4336
4337#define LAPACK_csycon_3 LAPACK_GLOBAL(csycon_3, CSYCON_3)
4338void LAPACK_csycon_3(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *E,
4339 lapack_int const *ipiv, float const *anorm, float *rcond, lapack_complex_float *work, lapack_int *info);
4340
4341#define LAPACK_dsycon_3 LAPACK_GLOBAL(dsycon_3, DSYCON_3)
4342void LAPACK_dsycon_3(char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double const *E, lapack_int const *ipiv,
4343 double const *anorm, double *rcond, double *work, lapack_int *iwork, lapack_int *info);
4344
4345#define LAPACK_ssycon_3 LAPACK_GLOBAL(ssycon_3, SSYCON_3)
4346void LAPACK_ssycon_3(char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float const *E, lapack_int const *ipiv,
4347 float const *anorm, float *rcond, float *work, lapack_int *iwork, lapack_int *info);
4348
4349#define LAPACK_zsycon_3 LAPACK_GLOBAL(zsycon_3, ZSYCON_3)
4350void LAPACK_zsycon_3(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *E,
4351 lapack_int const *ipiv, double const *anorm, double *rcond, lapack_complex_double *work, lapack_int *info);
4352
4353#define LAPACK_csyconv LAPACK_GLOBAL(csyconv, CSYCONV)
4354void LAPACK_csyconv(char const *uplo, char const *way, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
4355 lapack_complex_float *E, lapack_int *info);
4356
4357#define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv, DSYCONV)
4358void LAPACK_dsyconv(char const *uplo, char const *way, lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *ipiv, double *E,
4359 lapack_int *info);
4360
4361#define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv, SSYCONV)
4362void LAPACK_ssyconv(char const *uplo, char const *way, lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *ipiv, float *E,
4363 lapack_int *info);
4364
4365#define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv, ZSYCONV)
4366void LAPACK_zsyconv(char const *uplo, char const *way, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
4367 lapack_complex_double *E, lapack_int *info);
4368
4369#define LAPACK_csyequb LAPACK_GLOBAL(csyequb, CSYEQUB)
4370void LAPACK_csyequb(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, float *S, float *scond, float *amax,
4371 lapack_complex_float *work, lapack_int *info);
4372
4373#define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb, DSYEQUB)
4374void LAPACK_dsyequb(char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double *S, double *scond, double *amax,
4375 double *work, lapack_int *info);
4376
4377#define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb, SSYEQUB)
4378void LAPACK_ssyequb(char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float *S, float *scond, float *amax, float *work,
4379 lapack_int *info);
4380
4381#define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb, ZSYEQUB)
4382void LAPACK_zsyequb(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, double *S, double *scond,
4383 double *amax, lapack_complex_double *work, lapack_int *info);
4384
4385#define LAPACK_dsyev LAPACK_GLOBAL(dsyev, DSYEV)
4386void LAPACK_dsyev(char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *W, double *work,
4387 lapack_int const *lwork, lapack_int *info);
4388
4389#define LAPACK_ssyev LAPACK_GLOBAL(ssyev, SSYEV)
4390void LAPACK_ssyev(char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *W, float *work,
4391 lapack_int const *lwork, lapack_int *info);
4392
4393#define LAPACK_dsyev_2stage LAPACK_GLOBAL(dsyev_2stage, DSYEV_2STAGE)
4394void LAPACK_dsyev_2stage(char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *W, double *work,
4395 lapack_int const *lwork, lapack_int *info);
4396
4397#define LAPACK_ssyev_2stage LAPACK_GLOBAL(ssyev_2stage, SSYEV_2STAGE)
4398void LAPACK_ssyev_2stage(char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *W, float *work,
4399 lapack_int const *lwork, lapack_int *info);
4400
4401#define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd, DSYEVD)
4402void LAPACK_dsyevd(char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *W, double *work,
4403 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4404
4405#define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd, SSYEVD)
4406void LAPACK_ssyevd(char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *W, float *work,
4407 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4408
4409#define LAPACK_dsyevd_2stage LAPACK_GLOBAL(dsyevd_2stage, DSYEVD_2STAGE)
4410void LAPACK_dsyevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *W, double *work,
4411 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4412
4413#define LAPACK_ssyevd_2stage LAPACK_GLOBAL(ssyevd_2stage, SSYEVD_2STAGE)
4414void LAPACK_ssyevd_2stage(char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *W, float *work,
4415 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
4416
4417#define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr, DSYEVR)
4418void LAPACK_dsyevr(char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double const *vl,
4419 double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z,
4420 lapack_int const *ldz, lapack_int *ISUPPZ, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4421 lapack_int *info);
4422
4423#define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr, SSYEVR)
4424void LAPACK_ssyevr(char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float const *vl,
4425 float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z,
4426 lapack_int const *ldz, lapack_int *ISUPPZ, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4427 lapack_int *info);
4428
4429#define LAPACK_dsyevr_2stage LAPACK_GLOBAL(dsyevr_2stage, DSYEVR_2STAGE)
4430void LAPACK_dsyevr_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda,
4431 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m,
4432 double *W, double *Z, lapack_int const *ldz, lapack_int *ISUPPZ, double *work, lapack_int const *lwork, lapack_int *iwork,
4433 lapack_int const *liwork, lapack_int *info);
4434
4435#define LAPACK_ssyevr_2stage LAPACK_GLOBAL(ssyevr_2stage, SSYEVR_2STAGE)
4436void LAPACK_ssyevr_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda,
4437 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
4438 float *Z, lapack_int const *ldz, lapack_int *ISUPPZ, float *work, lapack_int const *lwork, lapack_int *iwork,
4439 lapack_int const *liwork, lapack_int *info);
4440
4441#define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx, DSYEVX)
4442void LAPACK_dsyevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double const *vl,
4443 double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z,
4444 lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4445
4446#define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx, SSYEVX)
4447void LAPACK_ssyevx(char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float const *vl,
4448 float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z,
4449 lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4450
4451#define LAPACK_dsyevx_2stage LAPACK_GLOBAL(dsyevx_2stage, DSYEVX_2STAGE)
4452void LAPACK_dsyevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda,
4453 double const *vl, double const *vu, lapack_int const *il, lapack_int const *iu, double const *abstol, lapack_int *m,
4454 double *W, double *Z, lapack_int const *ldz, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL,
4455 lapack_int *info);
4456
4457#define LAPACK_ssyevx_2stage LAPACK_GLOBAL(ssyevx_2stage, SSYEVX_2STAGE)
4458void LAPACK_ssyevx_2stage(char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda,
4459 float const *vl, float const *vu, lapack_int const *il, lapack_int const *iu, float const *abstol, lapack_int *m, float *W,
4460 float *Z, lapack_int const *ldz, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL,
4461 lapack_int *info);
4462
4463#define LAPACK_dsygst LAPACK_GLOBAL(dsygst, DSYGST)
4464void LAPACK_dsygst(lapack_int const *itype, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double const *B,
4465 lapack_int const *ldb, lapack_int *info);
4466
4467#define LAPACK_ssygst LAPACK_GLOBAL(ssygst, SSYGST)
4468void LAPACK_ssygst(lapack_int const *itype, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float const *B,
4469 lapack_int const *ldb, lapack_int *info);
4470
4471#define LAPACK_dsygv LAPACK_GLOBAL(dsygv, DSYGV)
4472void LAPACK_dsygv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *B,
4473 lapack_int const *ldb, double *W, double *work, lapack_int const *lwork, lapack_int *info);
4474
4475#define LAPACK_ssygv LAPACK_GLOBAL(ssygv, SSYGV)
4476void LAPACK_ssygv(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *B,
4477 lapack_int const *ldb, float *W, float *work, lapack_int const *lwork, lapack_int *info);
4478
4479#define LAPACK_dsygv_2stage LAPACK_GLOBAL(dsygv_2stage, DSYGV_2STAGE)
4480void LAPACK_dsygv_2stage(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda,
4481 double *B, lapack_int const *ldb, double *W, double *work, lapack_int const *lwork, lapack_int *info);
4482
4483#define LAPACK_ssygv_2stage LAPACK_GLOBAL(ssygv_2stage, SSYGV_2STAGE)
4484void LAPACK_ssygv_2stage(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *B,
4485 lapack_int const *ldb, float *W, float *work, lapack_int const *lwork, lapack_int *info);
4486
4487#define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd, DSYGVD)
4488void LAPACK_dsygvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *B,
4489 lapack_int const *ldb, double *W, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4490 lapack_int *info);
4491
4492#define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd, SSYGVD)
4493void LAPACK_ssygvd(lapack_int const *itype, char const *jobz, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *B,
4494 lapack_int const *ldb, float *W, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork,
4495 lapack_int *info);
4496
4497#define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx, DSYGVX)
4498void LAPACK_dsygvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, double *A,
4499 lapack_int const *lda, double *B, lapack_int const *ldb, double const *vl, double const *vu, lapack_int const *il,
4500 lapack_int const *iu, double const *abstol, lapack_int *m, double *W, double *Z, lapack_int const *ldz, double *work,
4501 lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4502
4503#define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx, SSYGVX)
4504void LAPACK_ssygvx(lapack_int const *itype, char const *jobz, char const *range, char const *uplo, lapack_int const *n, float *A,
4505 lapack_int const *lda, float *B, lapack_int const *ldb, float const *vl, float const *vu, lapack_int const *il,
4506 lapack_int const *iu, float const *abstol, lapack_int *m, float *W, float *Z, lapack_int const *ldz, float *work,
4507 lapack_int const *lwork, lapack_int *iwork, lapack_int *IFAIL, lapack_int *info);
4508
4509#define LAPACK_csyr LAPACK_GLOBAL(csyr, CSYR)
4510void LAPACK_csyr(char const *uplo, lapack_int const *n, lapack_complex_float const *alpha, lapack_complex_float const *X, lapack_int const *incx,
4511 lapack_complex_float *A, lapack_int const *lda);
4512
4513#define LAPACK_zsyr LAPACK_GLOBAL(zsyr, ZSYR)
4514void LAPACK_zsyr(char const *uplo, lapack_int const *n, lapack_complex_double const *alpha, lapack_complex_double const *X, lapack_int const *incx,
4515 lapack_complex_double *A, lapack_int const *lda);
4516
4517#define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs, CSYRFS)
4518void LAPACK_csyrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4519 lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_float const *B,
4520 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work,
4521 float *rwork, lapack_int *info);
4522
4523#define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs, DSYRFS)
4524void LAPACK_dsyrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double const *AF,
4525 lapack_int const *ldaf, lapack_int const *ipiv, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx,
4526 double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
4527
4528#define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs, SSYRFS)
4529void LAPACK_ssyrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float const *AF,
4530 lapack_int const *ldaf, lapack_int const *ipiv, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx,
4531 float *ferr, float *berr, float *work, lapack_int *iwork, lapack_int *info);
4532
4533#define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs, ZSYRFS)
4534void LAPACK_zsyrfs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4535 lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, lapack_complex_double const *B,
4536 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work,
4537 double *rwork, lapack_int *info);
4538
4539#define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx, CSYRFSX)
4540void LAPACK_csyrfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
4541 lapack_int const *lda, lapack_complex_float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, float *S,
4542 lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *berr,
4543 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params,
4544 lapack_complex_float *work, float *rwork, lapack_int *info);
4545
4546#define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx, DSYRFSX)
4547void LAPACK_dsyrfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda,
4548 double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, double *S, double const *B, lapack_int const *ldb, double *X,
4549 lapack_int const *ldx, double *rcond, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp,
4550 lapack_int const *nparams, double *params, double *work, lapack_int *iwork, lapack_int *info);
4551
4552#define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx, SSYRFSX)
4553void LAPACK_ssyrfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda,
4554 float const *AF, lapack_int const *ldaf, lapack_int const *ipiv, float *S, float const *B, lapack_int const *ldb, float *X,
4555 lapack_int const *ldx, float *rcond, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp,
4556 lapack_int const *nparams, float *params, float *work, lapack_int *iwork, lapack_int *info);
4557
4558#define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx, ZSYRFSX)
4559void LAPACK_zsyrfsx(char const *uplo, char const *equed, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
4560 lapack_int const *lda, lapack_complex_double const *AF, lapack_int const *ldaf, lapack_int const *ipiv, double *S,
4561 lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond,
4562 double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams,
4563 double *params, lapack_complex_double *work, double *rwork, lapack_int *info);
4564
4565#define LAPACK_csysv LAPACK_GLOBAL(csysv, CSYSV)
4566void LAPACK_csysv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
4567 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4568
4569#define LAPACK_dsysv LAPACK_GLOBAL(dsysv, DSYSV)
4570void LAPACK_dsysv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int *ipiv, double *B,
4571 lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
4572
4573#define LAPACK_ssysv LAPACK_GLOBAL(ssysv, SSYSV)
4574void LAPACK_ssysv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, lapack_int *ipiv, float *B,
4575 lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
4576
4577#define LAPACK_zsysv LAPACK_GLOBAL(zsysv, ZSYSV)
4578void LAPACK_zsysv(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
4579 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4580
4581#define LAPACK_csysv_aa LAPACK_GLOBAL(csysv_aa, CSYSV_AA)
4582void LAPACK_csysv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
4583 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4584
4585#define LAPACK_dsysv_aa LAPACK_GLOBAL(dsysv_aa, DSYSV_AA)
4586void LAPACK_dsysv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int *ipiv, double *B,
4587 lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
4588
4589#define LAPACK_ssysv_aa LAPACK_GLOBAL(ssysv_aa, SSYSV_AA)
4590void LAPACK_ssysv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, lapack_int *ipiv, float *B,
4591 lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
4592
4593#define LAPACK_zsysv_aa LAPACK_GLOBAL(zsysv_aa, ZSYSV_AA)
4594void LAPACK_zsysv_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
4595 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4596
4597#define LAPACK_csysv_aa_2stage LAPACK_GLOBAL(csysv_aa_2stage, CSYSV_AA_2STAGE)
4598void LAPACK_csysv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
4599 lapack_complex_float *TB, lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_float *B,
4600 lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4601
4602#define LAPACK_dsysv_aa_2stage LAPACK_GLOBAL(dsysv_aa_2stage, DSYSV_AA_2STAGE)
4603void LAPACK_dsysv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *TB,
4604 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, double *B, lapack_int const *ldb, double *work,
4605 lapack_int const *lwork, lapack_int *info);
4606
4607#define LAPACK_ssysv_aa_2stage LAPACK_GLOBAL(ssysv_aa_2stage, SSYSV_AA_2STAGE)
4608void LAPACK_ssysv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *TB,
4609 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, float *B, lapack_int const *ldb, float *work,
4610 lapack_int const *lwork, lapack_int *info);
4611
4612#define LAPACK_zsysv_aa_2stage LAPACK_GLOBAL(zsysv_aa_2stage, ZSYSV_AA_2STAGE)
4613void LAPACK_zsysv_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
4614 lapack_complex_double *TB, lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_double *B,
4615 lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4616
4617#define LAPACK_csysv_rk LAPACK_GLOBAL(csysv_rk, CSYSV_RK)
4618void LAPACK_csysv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
4619 lapack_complex_float *E, lapack_int *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work,
4620 lapack_int const *lwork, lapack_int *info);
4621
4622#define LAPACK_dsysv_rk LAPACK_GLOBAL(dsysv_rk, DSYSV_RK)
4623void LAPACK_dsysv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *E, lapack_int *ipiv,
4624 double *B, lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
4625
4626#define LAPACK_ssysv_rk LAPACK_GLOBAL(ssysv_rk, SSYSV_RK)
4627void LAPACK_ssysv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *E, lapack_int *ipiv,
4628 float *B, lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
4629
4630#define LAPACK_zsysv_rk LAPACK_GLOBAL(zsysv_rk, ZSYSV_RK)
4631void LAPACK_zsysv_rk(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
4632 lapack_complex_double *E, lapack_int *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work,
4633 lapack_int const *lwork, lapack_int *info);
4634
4635#define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook, CSYSV_ROOK)
4636void LAPACK_csysv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
4637 lapack_int *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork,
4638 lapack_int *info);
4639
4640#define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook, DSYSV_ROOK)
4641void LAPACK_dsysv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int *ipiv, double *B,
4642 lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
4643
4644#define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook, SSYSV_ROOK)
4645void LAPACK_ssysv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, lapack_int *ipiv, float *B,
4646 lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
4647
4648#define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook, ZSYSV_ROOK)
4649void LAPACK_zsysv_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
4650 lapack_int *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
4651 lapack_int *info);
4652
4653#define LAPACK_csysvx LAPACK_GLOBAL(csysvx, CSYSVX)
4654void LAPACK_csysvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
4655 lapack_int const *lda, lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, lapack_complex_float const *B,
4656 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *ferr, float *berr,
4657 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int *info);
4658
4659#define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx, DSYSVX)
4660void LAPACK_dsysvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda,
4661 double *AF, lapack_int const *ldaf, lapack_int *ipiv, double const *B, lapack_int const *ldb, double *X, lapack_int const *ldx,
4662 double *rcond, double *ferr, double *berr, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
4663
4664#define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx, SSYSVX)
4665void LAPACK_ssysvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float *AF,
4666 lapack_int const *ldaf, lapack_int *ipiv, float const *B, lapack_int const *ldb, float *X, lapack_int const *ldx, float *rcond,
4667 float *ferr, float *berr, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
4668
4669#define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx, ZSYSVX)
4670void LAPACK_zsysvx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
4671 lapack_int const *lda, lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, lapack_complex_double const *B,
4672 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *ferr, double *berr,
4673 lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int *info);
4674
4675#define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx, CSYSVXX)
4676void LAPACK_csysvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
4677 lapack_complex_float *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *S, lapack_complex_float *B,
4678 lapack_int const *ldb, lapack_complex_float *X, lapack_int const *ldx, float *rcond, float *rpvgrw, float *berr,
4679 lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp, lapack_int const *nparams, float *params,
4680 lapack_complex_float *work, float *rwork, lapack_int *info);
4681
4682#define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx, DSYSVXX)
4683void LAPACK_dsysvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, double *AF,
4684 lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *S, double *B, lapack_int const *ldb, double *X,
4685 lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr, lapack_int const *n_err_bnds, double *err_bnds_norm,
4686 double *err_bnds_comp, lapack_int const *nparams, double *params, double *work, lapack_int *iwork, lapack_int *info);
4687
4688#define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx, SSYSVXX)
4689void LAPACK_ssysvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, float *AF,
4690 lapack_int const *ldaf, lapack_int *ipiv, char *equed, float *S, float *B, lapack_int const *ldb, float *X, lapack_int const *ldx,
4691 float *rcond, float *rpvgrw, float *berr, lapack_int const *n_err_bnds, float *err_bnds_norm, float *err_bnds_comp,
4692 lapack_int const *nparams, float *params, float *work, lapack_int *iwork, lapack_int *info);
4693
4694#define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx, ZSYSVXX)
4695void LAPACK_zsysvxx(char const *fact, char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
4696 lapack_complex_double *AF, lapack_int const *ldaf, lapack_int *ipiv, char *equed, double *S, lapack_complex_double *B,
4697 lapack_int const *ldb, lapack_complex_double *X, lapack_int const *ldx, double *rcond, double *rpvgrw, double *berr,
4698 lapack_int const *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int const *nparams, double *params,
4699 lapack_complex_double *work, double *rwork, lapack_int *info);
4700
4701#define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr, CSYSWAPR)
4702void LAPACK_csyswapr(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *i1,
4703 lapack_int const *i2);
4704
4705#define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr, DSYSWAPR)
4706void LAPACK_dsyswapr(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *i1, lapack_int const *i2);
4707
4708#define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr, SSYSWAPR)
4709void LAPACK_ssyswapr(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *i1, lapack_int const *i2);
4710
4711#define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr, ZSYSWAPR)
4712void LAPACK_zsyswapr(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *i1,
4713 lapack_int const *i2);
4714
4715#define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd, DSYTRD)
4716void LAPACK_dsytrd(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *D, double *E, double *tau, double *work,
4717 lapack_int const *lwork, lapack_int *info);
4718
4719#define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd, SSYTRD)
4720void LAPACK_ssytrd(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *D, float *E, float *tau, float *work,
4721 lapack_int const *lwork, lapack_int *info);
4722
4723#define LAPACK_dsytrd_2stage LAPACK_GLOBAL(dsytrd_2stage, DSYTRD_2STAGE)
4724void LAPACK_dsytrd_2stage(char const *vect, char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *D, double *E,
4725 double *tau, double *HOUS2, lapack_int const *lhous2, double *work, lapack_int const *lwork, lapack_int *info);
4726
4727#define LAPACK_ssytrd_2stage LAPACK_GLOBAL(ssytrd_2stage, SSYTRD_2STAGE)
4728void LAPACK_ssytrd_2stage(char const *vect, char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *D, float *E, float *tau,
4729 float *HOUS2, lapack_int const *lhous2, float *work, lapack_int const *lwork, lapack_int *info);
4730
4731#define LAPACK_csytrf LAPACK_GLOBAL(csytrf, CSYTRF)
4732void LAPACK_csytrf(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
4733 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4734
4735#define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf, DSYTRF)
4736void LAPACK_dsytrf(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, double *work, lapack_int const *lwork,
4737 lapack_int *info);
4738
4739#define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf, SSYTRF)
4740void LAPACK_ssytrf(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, float *work, lapack_int const *lwork,
4741 lapack_int *info);
4742
4743#define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf, ZSYTRF)
4744void LAPACK_zsytrf(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
4745 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4746
4747#define LAPACK_csytrf_aa LAPACK_GLOBAL(csytrf_aa, CSYTRF_AA)
4748void LAPACK_csytrf_aa(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
4749 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4750
4751#define LAPACK_dsytrf_aa LAPACK_GLOBAL(dsytrf_aa, DSYTRF_AA)
4752void LAPACK_dsytrf_aa(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, double *work,
4753 lapack_int const *lwork, lapack_int *info);
4754
4755#define LAPACK_ssytrf_aa LAPACK_GLOBAL(ssytrf_aa, SSYTRF_AA)
4756void LAPACK_ssytrf_aa(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, float *work, lapack_int const *lwork,
4757 lapack_int *info);
4758
4759#define LAPACK_zsytrf_aa LAPACK_GLOBAL(zsytrf_aa, ZSYTRF_AA)
4760void LAPACK_zsytrf_aa(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
4761 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4762
4763#define LAPACK_csytrf_aa_2stage LAPACK_GLOBAL(csytrf_aa_2stage, CSYTRF_AA_2STAGE)
4764void LAPACK_csytrf_aa_2stage(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *TB,
4765 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_float *work, lapack_int const *lwork,
4766 lapack_int *info);
4767
4768#define LAPACK_dsytrf_aa_2stage LAPACK_GLOBAL(dsytrf_aa_2stage, DSYTRF_AA_2STAGE)
4769void LAPACK_dsytrf_aa_2stage(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *TB, lapack_int const *ltb,
4770 lapack_int *ipiv, lapack_int *ipiv2, double *work, lapack_int const *lwork, lapack_int *info);
4771
4772#define LAPACK_ssytrf_aa_2stage LAPACK_GLOBAL(ssytrf_aa_2stage, SSYTRF_AA_2STAGE)
4773void LAPACK_ssytrf_aa_2stage(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *TB, lapack_int const *ltb,
4774 lapack_int *ipiv, lapack_int *ipiv2, float *work, lapack_int const *lwork, lapack_int *info);
4775
4776#define LAPACK_zsytrf_aa_2stage LAPACK_GLOBAL(zsytrf_aa_2stage, ZSYTRF_AA_2STAGE)
4777void LAPACK_zsytrf_aa_2stage(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *TB,
4778 lapack_int const *ltb, lapack_int *ipiv, lapack_int *ipiv2, lapack_complex_double *work, lapack_int const *lwork,
4779 lapack_int *info);
4780
4781#define LAPACK_csytrf_rk LAPACK_GLOBAL(csytrf_rk, CSYTRF_RK)
4782void LAPACK_csytrf_rk(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *E,
4783 lapack_int *ipiv, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4784
4785#define LAPACK_dsytrf_rk LAPACK_GLOBAL(dsytrf_rk, DSYTRF_RK)
4786void LAPACK_dsytrf_rk(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double *E, lapack_int *ipiv, double *work,
4787 lapack_int const *lwork, lapack_int *info);
4788
4789#define LAPACK_ssytrf_rk LAPACK_GLOBAL(ssytrf_rk, SSYTRF_RK)
4790void LAPACK_ssytrf_rk(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float *E, lapack_int *ipiv, float *work,
4791 lapack_int const *lwork, lapack_int *info);
4792
4793#define LAPACK_zsytrf_rk LAPACK_GLOBAL(zsytrf_rk, ZSYTRF_RK)
4794void LAPACK_zsytrf_rk(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *E,
4795 lapack_int *ipiv, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4796
4797#define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook, CSYTRF_ROOK)
4798void LAPACK_csytrf_rook(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *ipiv,
4799 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4800
4801#define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook, DSYTRF_ROOK)
4802void LAPACK_dsytrf_rook(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *ipiv, double *work,
4803 lapack_int const *lwork, lapack_int *info);
4804
4805#define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook, SSYTRF_ROOK)
4806void LAPACK_ssytrf_rook(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *ipiv, float *work,
4807 lapack_int const *lwork, lapack_int *info);
4808
4809#define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook, ZSYTRF_ROOK)
4810void LAPACK_zsytrf_rook(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *ipiv,
4811 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4812
4813#define LAPACK_csytri LAPACK_GLOBAL(csytri, CSYTRI)
4814void LAPACK_csytri(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
4815 lapack_complex_float *work, lapack_int *info);
4816
4817#define LAPACK_dsytri LAPACK_GLOBAL(dsytri, DSYTRI)
4818void LAPACK_dsytri(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *ipiv, double *work, lapack_int *info);
4819
4820#define LAPACK_ssytri LAPACK_GLOBAL(ssytri, SSYTRI)
4821void LAPACK_ssytri(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *ipiv, float *work, lapack_int *info);
4822
4823#define LAPACK_zsytri LAPACK_GLOBAL(zsytri, ZSYTRI)
4824void LAPACK_zsytri(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
4825 lapack_complex_double *work, lapack_int *info);
4826
4827#define LAPACK_csytri2 LAPACK_GLOBAL(csytri2, CSYTRI2)
4828void LAPACK_csytri2(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
4829 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4830
4831#define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2, DSYTRI2)
4832void LAPACK_dsytri2(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *ipiv, double *work,
4833 lapack_int const *lwork, lapack_int *info);
4834
4835#define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2, SSYTRI2)
4836void LAPACK_ssytri2(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *ipiv, float *work,
4837 lapack_int const *lwork, lapack_int *info);
4838
4839#define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2, ZSYTRI2)
4840void LAPACK_zsytri2(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
4841 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4842
4843#define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x, CSYTRI2X)
4844void LAPACK_csytri2x(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int const *ipiv,
4845 lapack_complex_float *work, lapack_int const *nb, lapack_int *info);
4846
4847#define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x, DSYTRI2X)
4848void LAPACK_dsytri2x(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, lapack_int const *ipiv, double *work,
4849 lapack_int const *nb, lapack_int *info);
4850
4851#define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x, SSYTRI2X)
4852void LAPACK_ssytri2x(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, lapack_int const *ipiv, float *work,
4853 lapack_int const *nb, lapack_int *info);
4854
4855#define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x, ZSYTRI2X)
4856void LAPACK_zsytri2x(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int const *ipiv,
4857 lapack_complex_double *work, lapack_int const *nb, lapack_int *info);
4858
4859#define LAPACK_csytri_3 LAPACK_GLOBAL(csytri_3, CSYTRI_3)
4860void LAPACK_csytri_3(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float const *E,
4861 lapack_int const *ipiv, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
4862
4863#define LAPACK_dsytri_3 LAPACK_GLOBAL(dsytri_3, DSYTRI_3)
4864void LAPACK_dsytri_3(char const *uplo, lapack_int const *n, double *A, lapack_int const *lda, double const *E, lapack_int const *ipiv, double *work,
4865 lapack_int const *lwork, lapack_int *info);
4866
4867#define LAPACK_ssytri_3 LAPACK_GLOBAL(ssytri_3, SSYTRI_3)
4868void LAPACK_ssytri_3(char const *uplo, lapack_int const *n, float *A, lapack_int const *lda, float const *E, lapack_int const *ipiv, float *work,
4869 lapack_int const *lwork, lapack_int *info);
4870
4871#define LAPACK_zsytri_3 LAPACK_GLOBAL(zsytri_3, ZSYTRI_3)
4872void LAPACK_zsytri_3(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double const *E,
4873 lapack_int const *ipiv, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
4874
4875#define LAPACK_csytrs LAPACK_GLOBAL(csytrs, CSYTRS)
4876void LAPACK_csytrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4877 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
4878
4879#define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs, DSYTRS)
4880void LAPACK_dsytrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, lapack_int const *ipiv,
4881 double *B, lapack_int const *ldb, lapack_int *info);
4882
4883#define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs, SSYTRS)
4884void LAPACK_ssytrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, lapack_int const *ipiv,
4885 float *B, lapack_int const *ldb, lapack_int *info);
4886
4887#define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs, ZSYTRS)
4888void LAPACK_zsytrs(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4889 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4890
4891#define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2, CSYTRS2)
4892void LAPACK_csytrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float *A, lapack_int const *lda,
4893 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int *info);
4894
4895#define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2, DSYTRS2)
4896void LAPACK_dsytrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double *A, lapack_int const *lda, lapack_int const *ipiv,
4897 double *B, lapack_int const *ldb, double *work, lapack_int *info);
4898
4899#define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2, SSYTRS2)
4900void LAPACK_ssytrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float *A, lapack_int const *lda, lapack_int const *ipiv, float *B,
4901 lapack_int const *ldb, float *work, lapack_int *info);
4902
4903#define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2, ZSYTRS2)
4904void LAPACK_zsytrs2(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double *A, lapack_int const *lda,
4905 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int *info);
4906
4907#define LAPACK_csytrs_3 LAPACK_GLOBAL(csytrs_3, CSYTRS_3)
4908void LAPACK_csytrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4909 lapack_complex_float const *E, lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
4910
4911#define LAPACK_dsytrs_3 LAPACK_GLOBAL(dsytrs_3, DSYTRS_3)
4912void LAPACK_dsytrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double const *E,
4913 lapack_int const *ipiv, double *B, lapack_int const *ldb, lapack_int *info);
4914
4915#define LAPACK_ssytrs_3 LAPACK_GLOBAL(ssytrs_3, SSYTRS_3)
4916void LAPACK_ssytrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float const *E,
4917 lapack_int const *ipiv, float *B, lapack_int const *ldb, lapack_int *info);
4918
4919#define LAPACK_zsytrs_3 LAPACK_GLOBAL(zsytrs_3, ZSYTRS_3)
4920void LAPACK_zsytrs_3(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4921 lapack_complex_double const *E, lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4922
4923#define LAPACK_csytrs_aa LAPACK_GLOBAL(csytrs_aa, CSYTRS_AA)
4924void LAPACK_csytrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4925 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work, lapack_int const *lwork,
4926 lapack_int *info);
4927
4928#define LAPACK_dsytrs_aa LAPACK_GLOBAL(dsytrs_aa, DSYTRS_AA)
4929void LAPACK_dsytrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, lapack_int const *ipiv,
4930 double *B, lapack_int const *ldb, double *work, lapack_int const *lwork, lapack_int *info);
4931
4932#define LAPACK_ssytrs_aa LAPACK_GLOBAL(ssytrs_aa, SSYTRS_AA)
4933void LAPACK_ssytrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, lapack_int const *ipiv,
4934 float *B, lapack_int const *ldb, float *work, lapack_int const *lwork, lapack_int *info);
4935
4936#define LAPACK_zsytrs_aa LAPACK_GLOBAL(zsytrs_aa, ZSYTRS_AA)
4937void LAPACK_zsytrs_aa(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4938 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *work, lapack_int const *lwork,
4939 lapack_int *info);
4940
4941#define LAPACK_csytrs_aa_2stage LAPACK_GLOBAL(csytrs_aa_2stage, CSYTRS_AA_2STAGE)
4942void LAPACK_csytrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4943 lapack_complex_float *TB, lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2,
4944 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
4945
4946#define LAPACK_dsytrs_aa_2stage LAPACK_GLOBAL(dsytrs_aa_2stage, DSYTRS_AA_2STAGE)
4947void LAPACK_dsytrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, double *TB,
4948 lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2, double *B, lapack_int const *ldb,
4949 lapack_int *info);
4950
4951#define LAPACK_ssytrs_aa_2stage LAPACK_GLOBAL(ssytrs_aa_2stage, SSYTRS_AA_2STAGE)
4952void LAPACK_ssytrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, float *TB,
4953 lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2, float *B, lapack_int const *ldb,
4954 lapack_int *info);
4955
4956#define LAPACK_zsytrs_aa_2stage LAPACK_GLOBAL(zsytrs_aa_2stage, ZSYTRS_AA_2STAGE)
4957void LAPACK_zsytrs_aa_2stage(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4958 lapack_complex_double *TB, lapack_int const *ltb, lapack_int const *ipiv, lapack_int const *ipiv2,
4959 lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4960
4961#define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook, CSYTRS_ROOK)
4962void LAPACK_csytrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A, lapack_int const *lda,
4963 lapack_int const *ipiv, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
4964
4965#define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook, DSYTRS_ROOK)
4966void LAPACK_dsytrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, double const *A, lapack_int const *lda, lapack_int const *ipiv,
4967 double *B, lapack_int const *ldb, lapack_int *info);
4968
4969#define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook, SSYTRS_ROOK)
4970void LAPACK_ssytrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, float const *A, lapack_int const *lda, lapack_int const *ipiv,
4971 float *B, lapack_int const *ldb, lapack_int *info);
4972
4973#define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook, ZSYTRS_ROOK)
4974void LAPACK_zsytrs_rook(char const *uplo, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A, lapack_int const *lda,
4975 lapack_int const *ipiv, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
4976
4977#define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon, CTBCON)
4978void LAPACK_ctbcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_complex_float const *AB,
4979 lapack_int const *ldab, float *rcond, lapack_complex_float *work, float *rwork, lapack_int *info);
4980
4981#define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon, DTBCON)
4982void LAPACK_dtbcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *kd, double const *AB,
4983 lapack_int const *ldab, double *rcond, double *work, lapack_int *iwork, lapack_int *info);
4984
4985#define LAPACK_stbcon LAPACK_GLOBAL(stbcon, STBCON)
4986void LAPACK_stbcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *kd, float const *AB,
4987 lapack_int const *ldab, float *rcond, float *work, lapack_int *iwork, lapack_int *info);
4988
4989#define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon, ZTBCON)
4990void LAPACK_ztbcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_complex_double const *AB,
4991 lapack_int const *ldab, double *rcond, lapack_complex_double *work, double *rwork, lapack_int *info);
4992
4993#define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs, CTBRFS)
4994void LAPACK_ctbrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
4995 lapack_complex_float const *AB, lapack_int const *ldab, lapack_complex_float const *B, lapack_int const *ldb,
4996 lapack_complex_float const *X, lapack_int const *ldx, float *ferr, float *berr, lapack_complex_float *work, float *rwork,
4997 lapack_int *info);
4998
4999#define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs, DTBRFS)
5000void LAPACK_dtbrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5001 double const *AB, lapack_int const *ldab, double const *B, lapack_int const *ldb, double const *X, lapack_int const *ldx,
5002 double *ferr, double *berr, double *work, lapack_int *iwork, lapack_int *info);
5003
5004#define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs, STBRFS)
5005void LAPACK_stbrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5006 float const *AB, lapack_int const *ldab, float const *B, lapack_int const *ldb, float const *X, lapack_int const *ldx, float *ferr,
5007 float *berr, float *work, lapack_int *iwork, lapack_int *info);
5008
5009#define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs, ZTBRFS)
5010void LAPACK_ztbrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5011 lapack_complex_double const *AB, lapack_int const *ldab, lapack_complex_double const *B, lapack_int const *ldb,
5012 lapack_complex_double const *X, lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work, double *rwork,
5013 lapack_int *info);
5014
5015#define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs, CTBTRS)
5016void LAPACK_ctbtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5017 lapack_complex_float const *AB, lapack_int const *ldab, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
5018
5019#define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs, DTBTRS)
5020void LAPACK_dtbtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5021 double const *AB, lapack_int const *ldab, double *B, lapack_int const *ldb, lapack_int *info);
5022
5023#define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs, STBTRS)
5024void LAPACK_stbtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5025 float const *AB, lapack_int const *ldab, float *B, lapack_int const *ldb, lapack_int *info);
5026
5027#define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs, ZTBTRS)
5028void LAPACK_ztbtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *kd, lapack_int const *nrhs,
5029 lapack_complex_double const *AB, lapack_int const *ldab, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
5030
5031#define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm, CTFSM)
5032void LAPACK_ctfsm(char const *transr, char const *side, char const *uplo, char const *trans, char const *diag, lapack_int const *m,
5033 lapack_int const *n, lapack_complex_float const *alpha, lapack_complex_float const *A, lapack_complex_float *B,
5034 lapack_int const *ldb);
5035
5036#define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm, DTFSM)
5037void LAPACK_dtfsm(char const *transr, char const *side, char const *uplo, char const *trans, char const *diag, lapack_int const *m,
5038 lapack_int const *n, double const *alpha, double const *A, double *B, lapack_int const *ldb);
5039
5040#define LAPACK_stfsm LAPACK_GLOBAL(stfsm, STFSM)
5041void LAPACK_stfsm(char const *transr, char const *side, char const *uplo, char const *trans, char const *diag, lapack_int const *m,
5042 lapack_int const *n, float const *alpha, float const *A, float *B, lapack_int const *ldb);
5043
5044#define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm, ZTFSM)
5045void LAPACK_ztfsm(char const *transr, char const *side, char const *uplo, char const *trans, char const *diag, lapack_int const *m,
5046 lapack_int const *n, lapack_complex_double const *alpha, lapack_complex_double const *A, lapack_complex_double *B,
5047 lapack_int const *ldb);
5048
5049#define LAPACK_ctftri LAPACK_GLOBAL(ctftri, CTFTRI)
5050void LAPACK_ctftri(char const *transr, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float *A, lapack_int *info);
5051
5052#define LAPACK_dtftri LAPACK_GLOBAL(dtftri, DTFTRI)
5053void LAPACK_dtftri(char const *transr, char const *uplo, char const *diag, lapack_int const *n, double *A, lapack_int *info);
5054
5055#define LAPACK_stftri LAPACK_GLOBAL(stftri, STFTRI)
5056void LAPACK_stftri(char const *transr, char const *uplo, char const *diag, lapack_int const *n, float *A, lapack_int *info);
5057
5058#define LAPACK_ztftri LAPACK_GLOBAL(ztftri, ZTFTRI)
5059void LAPACK_ztftri(char const *transr, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double *A, lapack_int *info);
5060
5061#define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp, CTFTTP)
5062void LAPACK_ctfttp(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float const *ARF, lapack_complex_float *AP,
5063 lapack_int *info);
5064
5065#define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp, DTFTTP)
5066void LAPACK_dtfttp(char const *transr, char const *uplo, lapack_int const *n, double const *ARF, double *AP, lapack_int *info);
5067
5068#define LAPACK_stfttp LAPACK_GLOBAL(stfttp, STFTTP)
5069void LAPACK_stfttp(char const *transr, char const *uplo, lapack_int const *n, float const *ARF, float *AP, lapack_int *info);
5070
5071#define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp, ZTFTTP)
5072void LAPACK_ztfttp(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double const *ARF, lapack_complex_double *AP,
5073 lapack_int *info);
5074
5075#define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr, CTFTTR)
5076void LAPACK_ctfttr(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float const *ARF, lapack_complex_float *A,
5077 lapack_int const *lda, lapack_int *info);
5078
5079#define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr, DTFTTR)
5080void LAPACK_dtfttr(char const *transr, char const *uplo, lapack_int const *n, double const *ARF, double *A, lapack_int const *lda, lapack_int *info);
5081
5082#define LAPACK_stfttr LAPACK_GLOBAL(stfttr, STFTTR)
5083void LAPACK_stfttr(char const *transr, char const *uplo, lapack_int const *n, float const *ARF, float *A, lapack_int const *lda, lapack_int *info);
5084
5085#define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr, ZTFTTR)
5086void LAPACK_ztfttr(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double const *ARF, lapack_complex_double *A,
5087 lapack_int const *lda, lapack_int *info);
5088
5089#define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc, CTGEVC)
5090void LAPACK_ctgevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_float const *S,
5091 lapack_int const *lds, lapack_complex_float const *P, lapack_int const *ldp, lapack_complex_float *VL, lapack_int const *ldvl,
5092 lapack_complex_float *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, lapack_complex_float *work, float *rwork,
5093 lapack_int *info);
5094
5095#define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc, DTGEVC)
5096void LAPACK_dtgevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, double const *S, lapack_int const *lds,
5097 double const *P, lapack_int const *ldp, double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr,
5098 lapack_int const *mm, lapack_int *m, double *work, lapack_int *info);
5099
5100#define LAPACK_stgevc LAPACK_GLOBAL(stgevc, STGEVC)
5101void LAPACK_stgevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, float const *S, lapack_int const *lds,
5102 float const *P, lapack_int const *ldp, float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, lapack_int const *mm,
5103 lapack_int *m, float *work, lapack_int *info);
5104
5105#define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc, ZTGEVC)
5106void LAPACK_ztgevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_double const *S,
5107 lapack_int const *lds, lapack_complex_double const *P, lapack_int const *ldp, lapack_complex_double *VL, lapack_int const *ldvl,
5108 lapack_complex_double *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, lapack_complex_double *work, double *rwork,
5109 lapack_int *info);
5110
5111#define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc, CTGEXC)
5112void LAPACK_ctgexc(lapack_logical const *wantq, lapack_logical const *wantz, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda,
5113 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *Z,
5114 lapack_int const *ldz, lapack_int const *ifst, lapack_int *ilst, lapack_int *info);
5115
5116#define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc, DTGEXC)
5117void LAPACK_dtgexc(lapack_logical const *wantq, lapack_logical const *wantz, lapack_int const *n, double *A, lapack_int const *lda, double *B,
5118 lapack_int const *ldb, double *Q, lapack_int const *ldq, double *Z, lapack_int const *ldz, lapack_int *ifst, lapack_int *ilst,
5119 double *work, lapack_int const *lwork, lapack_int *info);
5120
5121#define LAPACK_stgexc LAPACK_GLOBAL(stgexc, STGEXC)
5122void LAPACK_stgexc(lapack_logical const *wantq, lapack_logical const *wantz, lapack_int const *n, float *A, lapack_int const *lda, float *B,
5123 lapack_int const *ldb, float *Q, lapack_int const *ldq, float *Z, lapack_int const *ldz, lapack_int *ifst, lapack_int *ilst,
5124 float *work, lapack_int const *lwork, lapack_int *info);
5125
5126#define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc, ZTGEXC)
5127void LAPACK_ztgexc(lapack_logical const *wantq, lapack_logical const *wantz, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda,
5128 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *Q, lapack_int const *ldq, lapack_complex_double *Z,
5129 lapack_int const *ldz, lapack_int const *ifst, lapack_int *ilst, lapack_int *info);
5130
5131#define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen, CTGSEN)
5132void LAPACK_ctgsen(lapack_int const *ijob, lapack_logical const *wantq, lapack_logical const *wantz, lapack_logical const *select,
5133 lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb,
5134 lapack_complex_float *alpha, lapack_complex_float *beta, lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *Z,
5135 lapack_int const *ldz, lapack_int *m, float *pl, float *pr, float *DIF, lapack_complex_float *work, lapack_int const *lwork,
5136 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5137
5138#define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen, DTGSEN)
5139void LAPACK_dtgsen(lapack_int const *ijob, lapack_logical const *wantq, lapack_logical const *wantz, lapack_logical const *select,
5140 lapack_int const *n, double *A, lapack_int const *lda, double *B, lapack_int const *ldb, double *alphar, double *alphai,
5141 double *beta, double *Q, lapack_int const *ldq, double *Z, lapack_int const *ldz, lapack_int *m, double *pl, double *pr,
5142 double *DIF, double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5143
5144#define LAPACK_stgsen LAPACK_GLOBAL(stgsen, STGSEN)
5145void LAPACK_stgsen(lapack_int const *ijob, lapack_logical const *wantq, lapack_logical const *wantz, lapack_logical const *select,
5146 lapack_int const *n, float *A, lapack_int const *lda, float *B, lapack_int const *ldb, float *alphar, float *alphai, float *beta,
5147 float *Q, lapack_int const *ldq, float *Z, lapack_int const *ldz, lapack_int *m, float *pl, float *pr, float *DIF, float *work,
5148 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5149
5150#define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen, ZTGSEN)
5151void LAPACK_ztgsen(lapack_int const *ijob, lapack_logical const *wantq, lapack_logical const *wantz, lapack_logical const *select,
5152 lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb,
5153 lapack_complex_double *alpha, lapack_complex_double *beta, lapack_complex_double *Q, lapack_int const *ldq,
5154 lapack_complex_double *Z, lapack_int const *ldz, lapack_int *m, double *pl, double *pr, double *DIF, lapack_complex_double *work,
5155 lapack_int const *lwork, lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5156
5157#define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja, CTGSJA)
5158void LAPACK_ctgsja(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
5159 lapack_int const *k, lapack_int const *l, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B,
5160 lapack_int const *ldb, float const *tola, float const *tolb, float *alpha, float *beta, lapack_complex_float *U,
5161 lapack_int const *ldu, lapack_complex_float *V, lapack_int const *ldv, lapack_complex_float *Q, lapack_int const *ldq,
5162 lapack_complex_float *work, lapack_int *ncycle, lapack_int *info);
5163
5164#define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja, DTGSJA)
5165void LAPACK_dtgsja(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
5166 lapack_int const *k, lapack_int const *l, double *A, lapack_int const *lda, double *B, lapack_int const *ldb, double const *tola,
5167 double const *tolb, double *alpha, double *beta, double *U, lapack_int const *ldu, double *V, lapack_int const *ldv, double *Q,
5168 lapack_int const *ldq, double *work, lapack_int *ncycle, lapack_int *info);
5169
5170#define LAPACK_stgsja LAPACK_GLOBAL(stgsja, STGSJA)
5171void LAPACK_stgsja(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
5172 lapack_int const *k, lapack_int const *l, float *A, lapack_int const *lda, float *B, lapack_int const *ldb, float const *tola,
5173 float const *tolb, float *alpha, float *beta, float *U, lapack_int const *ldu, float *V, lapack_int const *ldv, float *Q,
5174 lapack_int const *ldq, float *work, lapack_int *ncycle, lapack_int *info);
5175
5176#define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja, ZTGSJA)
5177void LAPACK_ztgsja(char const *jobu, char const *jobv, char const *jobq, lapack_int const *m, lapack_int const *p, lapack_int const *n,
5178 lapack_int const *k, lapack_int const *l, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B,
5179 lapack_int const *ldb, double const *tola, double const *tolb, double *alpha, double *beta, lapack_complex_double *U,
5180 lapack_int const *ldu, lapack_complex_double *V, lapack_int const *ldv, lapack_complex_double *Q, lapack_int const *ldq,
5181 lapack_complex_double *work, lapack_int *ncycle, lapack_int *info);
5182
5183#define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna, CTGSNA)
5184void LAPACK_ctgsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_float const *A,
5185 lapack_int const *lda, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float const *VL,
5186 lapack_int const *ldvl, lapack_complex_float const *VR, lapack_int const *ldvr, float *S, float *DIF, lapack_int const *mm,
5187 lapack_int *m, lapack_complex_float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
5188
5189#define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna, DTGSNA)
5190void LAPACK_dtgsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, double const *A, lapack_int const *lda,
5191 double const *B, lapack_int const *ldb, double const *VL, lapack_int const *ldvl, double const *VR, lapack_int const *ldvr,
5192 double *S, double *DIF, lapack_int const *mm, lapack_int *m, double *work, lapack_int const *lwork, lapack_int *iwork,
5193 lapack_int *info);
5194
5195#define LAPACK_stgsna LAPACK_GLOBAL(stgsna, STGSNA)
5196void LAPACK_stgsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, float const *A, lapack_int const *lda,
5197 float const *B, lapack_int const *ldb, float const *VL, lapack_int const *ldvl, float const *VR, lapack_int const *ldvr, float *S,
5198 float *DIF, lapack_int const *mm, lapack_int *m, float *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
5199
5200#define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna, ZTGSNA)
5201void LAPACK_ztgsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_double const *A,
5202 lapack_int const *lda, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double const *VL,
5203 lapack_int const *ldvl, lapack_complex_double const *VR, lapack_int const *ldvr, double *S, double *DIF, lapack_int const *mm,
5204 lapack_int *m, lapack_complex_double *work, lapack_int const *lwork, lapack_int *iwork, lapack_int *info);
5205
5206#define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl, CTGSYL)
5207void LAPACK_ctgsyl(char const *trans, lapack_int const *ijob, lapack_int const *m, lapack_int const *n, lapack_complex_float const *A,
5208 lapack_int const *lda, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float *C, lapack_int const *ldc,
5209 lapack_complex_float const *D, lapack_int const *ldd, lapack_complex_float const *E, lapack_int const *lde,
5210 lapack_complex_float *F, lapack_int const *ldf, float *dif, float *scale, lapack_complex_float *work, lapack_int const *lwork,
5211 lapack_int *iwork, lapack_int *info);
5212
5213#define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl, DTGSYL)
5214void LAPACK_dtgsyl(char const *trans, lapack_int const *ijob, lapack_int const *m, lapack_int const *n, double const *A, lapack_int const *lda,
5215 double const *B, lapack_int const *ldb, double *C, lapack_int const *ldc, double const *D, lapack_int const *ldd, double const *E,
5216 lapack_int const *lde, double *F, lapack_int const *ldf, double *dif, double *scale, double *work, lapack_int const *lwork,
5217 lapack_int *iwork, lapack_int *info);
5218
5219#define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl, STGSYL)
5220void LAPACK_stgsyl(char const *trans, lapack_int const *ijob, lapack_int const *m, lapack_int const *n, float const *A, lapack_int const *lda,
5221 float const *B, lapack_int const *ldb, float *C, lapack_int const *ldc, float const *D, lapack_int const *ldd, float const *E,
5222 lapack_int const *lde, float *F, lapack_int const *ldf, float *dif, float *scale, float *work, lapack_int const *lwork,
5223 lapack_int *iwork, lapack_int *info);
5224
5225#define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl, ZTGSYL)
5226void LAPACK_ztgsyl(char const *trans, lapack_int const *ijob, lapack_int const *m, lapack_int const *n, lapack_complex_double const *A,
5227 lapack_int const *lda, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double *C, lapack_int const *ldc,
5228 lapack_complex_double const *D, lapack_int const *ldd, lapack_complex_double const *E, lapack_int const *lde,
5229 lapack_complex_double *F, lapack_int const *ldf, double *dif, double *scale, lapack_complex_double *work, lapack_int const *lwork,
5230 lapack_int *iwork, lapack_int *info);
5231
5232#define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon, CTPCON)
5233void LAPACK_ctpcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float const *AP, float *rcond,
5234 lapack_complex_float *work, float *rwork, lapack_int *info);
5235
5236#define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon, DTPCON)
5237void LAPACK_dtpcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, double const *AP, double *rcond, double *work,
5238 lapack_int *iwork, lapack_int *info);
5239
5240#define LAPACK_stpcon LAPACK_GLOBAL(stpcon, STPCON)
5241void LAPACK_stpcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, float const *AP, float *rcond, float *work,
5242 lapack_int *iwork, lapack_int *info);
5243
5244#define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon, ZTPCON)
5245void LAPACK_ztpcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double const *AP, double *rcond,
5246 lapack_complex_double *work, double *rwork, lapack_int *info);
5247
5248#define LAPACK_ctplqt LAPACK_GLOBAL(ctplqt, CTPLQT)
5249void LAPACK_ctplqt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *mb, lapack_complex_float *A,
5250 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *T, lapack_int const *ldt,
5251 lapack_complex_float *work, lapack_int *info);
5252
5253#define LAPACK_dtplqt LAPACK_GLOBAL(dtplqt, DTPLQT)
5254void LAPACK_dtplqt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *mb, double *A, lapack_int const *lda, double *B,
5255 lapack_int const *ldb, double *T, lapack_int const *ldt, double *work, lapack_int *info);
5256
5257#define LAPACK_stplqt LAPACK_GLOBAL(stplqt, STPLQT)
5258void LAPACK_stplqt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *mb, float *A, lapack_int const *lda, float *B,
5259 lapack_int const *ldb, float *T, lapack_int const *ldt, float *work, lapack_int *info);
5260
5261#define LAPACK_ztplqt LAPACK_GLOBAL(ztplqt, ZTPLQT)
5262void LAPACK_ztplqt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *mb, lapack_complex_double *A,
5263 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *T, lapack_int const *ldt,
5264 lapack_complex_double *work, lapack_int *info);
5265
5266#define LAPACK_ctplqt2 LAPACK_GLOBAL(ctplqt2, CTPLQT2)
5267void LAPACK_ctplqt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_complex_float *A, lapack_int const *lda,
5268 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *T, lapack_int const *ldt, lapack_int *info);
5269
5270#define LAPACK_dtplqt2 LAPACK_GLOBAL(dtplqt2, DTPLQT2)
5271void LAPACK_dtplqt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
5272 double *T, lapack_int const *ldt, lapack_int *info);
5273
5274#define LAPACK_stplqt2 LAPACK_GLOBAL(stplqt2, STPLQT2)
5275void LAPACK_stplqt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
5276 float *T, lapack_int const *ldt, lapack_int *info);
5277
5278#define LAPACK_ztplqt2 LAPACK_GLOBAL(ztplqt2, ZTPLQT2)
5279void LAPACK_ztplqt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_complex_double *A, lapack_int const *lda,
5280 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *T, lapack_int const *ldt, lapack_int *info);
5281
5282#define LAPACK_ctpmlqt LAPACK_GLOBAL(ctpmlqt, CTPMLQT)
5283void LAPACK_ctpmlqt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5284 lapack_int const *mb, lapack_complex_float const *V, lapack_int const *ldv, lapack_complex_float const *T, lapack_int const *ldt,
5285 lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work,
5286 lapack_int *info);
5287
5288#define LAPACK_dtpmlqt LAPACK_GLOBAL(dtpmlqt, DTPMLQT)
5289void LAPACK_dtpmlqt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5290 lapack_int const *mb, double const *V, lapack_int const *ldv, double const *T, lapack_int const *ldt, double *A,
5291 lapack_int const *lda, double *B, lapack_int const *ldb, double *work, lapack_int *info);
5292
5293#define LAPACK_stpmlqt LAPACK_GLOBAL(stpmlqt, STPMLQT)
5294void LAPACK_stpmlqt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5295 lapack_int const *mb, float const *V, lapack_int const *ldv, float const *T, lapack_int const *ldt, float *A,
5296 lapack_int const *lda, float *B, lapack_int const *ldb, float *work, lapack_int *info);
5297
5298#define LAPACK_ztpmlqt LAPACK_GLOBAL(ztpmlqt, ZTPMLQT)
5299void LAPACK_ztpmlqt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5300 lapack_int const *mb, lapack_complex_double const *V, lapack_int const *ldv, lapack_complex_double const *T,
5301 lapack_int const *ldt, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb,
5302 lapack_complex_double *work, lapack_int *info);
5303
5304#define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt, CTPMQRT)
5305void LAPACK_ctpmqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5306 lapack_int const *nb, lapack_complex_float const *V, lapack_int const *ldv, lapack_complex_float const *T, lapack_int const *ldt,
5307 lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *work,
5308 lapack_int *info);
5309
5310#define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt, DTPMQRT)
5311void LAPACK_dtpmqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5312 lapack_int const *nb, double const *V, lapack_int const *ldv, double const *T, lapack_int const *ldt, double *A,
5313 lapack_int const *lda, double *B, lapack_int const *ldb, double *work, lapack_int *info);
5314
5315#define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt, STPMQRT)
5316void LAPACK_stpmqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5317 lapack_int const *nb, float const *V, lapack_int const *ldv, float const *T, lapack_int const *ldt, float *A,
5318 lapack_int const *lda, float *B, lapack_int const *ldb, float *work, lapack_int *info);
5319
5320#define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt, ZTPMQRT)
5321void LAPACK_ztpmqrt(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5322 lapack_int const *nb, lapack_complex_double const *V, lapack_int const *ldv, lapack_complex_double const *T,
5323 lapack_int const *ldt, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb,
5324 lapack_complex_double *work, lapack_int *info);
5325
5326#define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt, CTPQRT)
5327void LAPACK_ctpqrt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *nb, lapack_complex_float *A,
5328 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *T, lapack_int const *ldt,
5329 lapack_complex_float *work, lapack_int *info);
5330
5331#define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt, DTPQRT)
5332void LAPACK_dtpqrt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *nb, double *A, lapack_int const *lda, double *B,
5333 lapack_int const *ldb, double *T, lapack_int const *ldt, double *work, lapack_int *info);
5334
5335#define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt, STPQRT)
5336void LAPACK_stpqrt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *nb, float *A, lapack_int const *lda, float *B,
5337 lapack_int const *ldb, float *T, lapack_int const *ldt, float *work, lapack_int *info);
5338
5339#define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt, ZTPQRT)
5340void LAPACK_ztpqrt(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_int const *nb, lapack_complex_double *A,
5341 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *T, lapack_int const *ldt,
5342 lapack_complex_double *work, lapack_int *info);
5343
5344#define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2, CTPQRT2)
5345void LAPACK_ctpqrt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_complex_float *A, lapack_int const *lda,
5346 lapack_complex_float *B, lapack_int const *ldb, lapack_complex_float *T, lapack_int const *ldt, lapack_int *info);
5347
5348#define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2, DTPQRT2)
5349void LAPACK_dtpqrt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, double *A, lapack_int const *lda, double *B, lapack_int const *ldb,
5350 double *T, lapack_int const *ldt, lapack_int *info);
5351
5352#define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2, STPQRT2)
5353void LAPACK_stpqrt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, float *A, lapack_int const *lda, float *B, lapack_int const *ldb,
5354 float *T, lapack_int const *ldt, lapack_int *info);
5355
5356#define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2, ZTPQRT2)
5357void LAPACK_ztpqrt2(lapack_int const *m, lapack_int const *n, lapack_int const *l, lapack_complex_double *A, lapack_int const *lda,
5358 lapack_complex_double *B, lapack_int const *ldb, lapack_complex_double *T, lapack_int const *ldt, lapack_int *info);
5359
5360#define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb, CTPRFB)
5361void LAPACK_ctprfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
5362 lapack_int const *k, lapack_int const *l, lapack_complex_float const *V, lapack_int const *ldv, lapack_complex_float const *T,
5363 lapack_int const *ldt, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb,
5364 lapack_complex_float *work, lapack_int const *ldwork);
5365
5366#define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb, DTPRFB)
5367void LAPACK_dtprfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
5368 lapack_int const *k, lapack_int const *l, double const *V, lapack_int const *ldv, double const *T, lapack_int const *ldt,
5369 double *A, lapack_int const *lda, double *B, lapack_int const *ldb, double *work, lapack_int const *ldwork);
5370
5371#define LAPACK_stprfb LAPACK_GLOBAL(stprfb, STPRFB)
5372void LAPACK_stprfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
5373 lapack_int const *k, lapack_int const *l, float const *V, lapack_int const *ldv, float const *T, lapack_int const *ldt, float *A,
5374 lapack_int const *lda, float *B, lapack_int const *ldb, float *work, lapack_int const *ldwork);
5375
5376#define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb, ZTPRFB)
5377void LAPACK_ztprfb(char const *side, char const *trans, char const *direct, char const *storev, lapack_int const *m, lapack_int const *n,
5378 lapack_int const *k, lapack_int const *l, lapack_complex_double const *V, lapack_int const *ldv, lapack_complex_double const *T,
5379 lapack_int const *ldt, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb,
5380 lapack_complex_double *work, lapack_int const *ldwork);
5381
5382#define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs, CTPRFS)
5383void LAPACK_ctprfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP,
5384 lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float const *X, lapack_int const *ldx, float *ferr,
5385 float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
5386
5387#define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs, DTPRFS)
5388void LAPACK_dtprfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, double const *AP,
5389 double const *B, lapack_int const *ldb, double const *X, lapack_int const *ldx, double *ferr, double *berr, double *work,
5390 lapack_int *iwork, lapack_int *info);
5391
5392#define LAPACK_stprfs LAPACK_GLOBAL(stprfs, STPRFS)
5393void LAPACK_stprfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, float const *AP,
5394 float const *B, lapack_int const *ldb, float const *X, lapack_int const *ldx, float *ferr, float *berr, float *work,
5395 lapack_int *iwork, lapack_int *info);
5396
5397#define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs, ZTPRFS)
5398void LAPACK_ztprfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs,
5399 lapack_complex_double const *AP, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double const *X,
5400 lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
5401
5402#define LAPACK_ctptri LAPACK_GLOBAL(ctptri, CTPTRI)
5403void LAPACK_ctptri(char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float *AP, lapack_int *info);
5404
5405#define LAPACK_dtptri LAPACK_GLOBAL(dtptri, DTPTRI)
5406void LAPACK_dtptri(char const *uplo, char const *diag, lapack_int const *n, double *AP, lapack_int *info);
5407
5408#define LAPACK_stptri LAPACK_GLOBAL(stptri, STPTRI)
5409void LAPACK_stptri(char const *uplo, char const *diag, lapack_int const *n, float *AP, lapack_int *info);
5410
5411#define LAPACK_ztptri LAPACK_GLOBAL(ztptri, ZTPTRI)
5412void LAPACK_ztptri(char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double *AP, lapack_int *info);
5413
5414#define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs, CTPTRS)
5415void LAPACK_ctptrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *AP,
5416 lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
5417
5418#define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs, DTPTRS)
5419void LAPACK_dtptrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, double const *AP, double *B,
5420 lapack_int const *ldb, lapack_int *info);
5421
5422#define LAPACK_stptrs LAPACK_GLOBAL(stptrs, STPTRS)
5423void LAPACK_stptrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, float const *AP, float *B,
5424 lapack_int const *ldb, lapack_int *info);
5425
5426#define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs, ZTPTRS)
5427void LAPACK_ztptrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs,
5428 lapack_complex_double const *AP, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
5429
5430#define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf, CTPTTF)
5431void LAPACK_ctpttf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float const *AP, lapack_complex_float *ARF,
5432 lapack_int *info);
5433
5434#define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf, DTPTTF)
5435void LAPACK_dtpttf(char const *transr, char const *uplo, lapack_int const *n, double const *AP, double *ARF, lapack_int *info);
5436
5437#define LAPACK_stpttf LAPACK_GLOBAL(stpttf, STPTTF)
5438void LAPACK_stpttf(char const *transr, char const *uplo, lapack_int const *n, float const *AP, float *ARF, lapack_int *info);
5439
5440#define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf, ZTPTTF)
5441void LAPACK_ztpttf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double const *AP, lapack_complex_double *ARF,
5442 lapack_int *info);
5443
5444#define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr, CTPTTR)
5445void LAPACK_ctpttr(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, lapack_complex_float *A, lapack_int const *lda,
5446 lapack_int *info);
5447
5448#define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr, DTPTTR)
5449void LAPACK_dtpttr(char const *uplo, lapack_int const *n, double const *AP, double *A, lapack_int const *lda, lapack_int *info);
5450
5451#define LAPACK_stpttr LAPACK_GLOBAL(stpttr, STPTTR)
5452void LAPACK_stpttr(char const *uplo, lapack_int const *n, float const *AP, float *A, lapack_int const *lda, lapack_int *info);
5453
5454#define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr, ZTPTTR)
5455void LAPACK_ztpttr(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, lapack_complex_double *A, lapack_int const *lda,
5456 lapack_int *info);
5457
5458#define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon, CTRCON)
5459void LAPACK_ctrcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
5460 float *rcond, lapack_complex_float *work, float *rwork, lapack_int *info);
5461
5462#define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon, DTRCON)
5463void LAPACK_dtrcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, double const *A, lapack_int const *lda, double *rcond,
5464 double *work, lapack_int *iwork, lapack_int *info);
5465
5466#define LAPACK_strcon LAPACK_GLOBAL(strcon, STRCON)
5467void LAPACK_strcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, float const *A, lapack_int const *lda, float *rcond,
5468 float *work, lapack_int *iwork, lapack_int *info);
5469
5470#define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon, ZTRCON)
5471void LAPACK_ztrcon(char const *norm, char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda,
5472 double *rcond, lapack_complex_double *work, double *rwork, lapack_int *info);
5473
5474#define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc, CTREVC)
5475void LAPACK_ctrevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_float *T,
5476 lapack_int const *ldt, lapack_complex_float *VL, lapack_int const *ldvl, lapack_complex_float *VR, lapack_int const *ldvr,
5477 lapack_int const *mm, lapack_int *m, lapack_complex_float *work, float *rwork, lapack_int *info);
5478
5479#define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc, DTREVC)
5480void LAPACK_dtrevc(char const *side, char const *howmny, lapack_logical *select, lapack_int const *n, double const *T, lapack_int const *ldt,
5481 double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, double *work,
5482 lapack_int *info);
5483
5484#define LAPACK_strevc LAPACK_GLOBAL(strevc, STREVC)
5485void LAPACK_strevc(char const *side, char const *howmny, lapack_logical *select, lapack_int const *n, float const *T, lapack_int const *ldt,
5486 float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, float *work,
5487 lapack_int *info);
5488
5489#define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc, ZTREVC)
5490void LAPACK_ztrevc(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_double *T,
5491 lapack_int const *ldt, lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr,
5492 lapack_int const *mm, lapack_int *m, lapack_complex_double *work, double *rwork, lapack_int *info);
5493
5494#define LAPACK_ctrevc3 LAPACK_GLOBAL(ctrevc3, CTREVC3)
5495void LAPACK_ctrevc3(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_float *T,
5496 lapack_int const *ldt, lapack_complex_float *VL, lapack_int const *ldvl, lapack_complex_float *VR, lapack_int const *ldvr,
5497 lapack_int const *mm, lapack_int *m, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork,
5498 lapack_int *info);
5499
5500#define LAPACK_dtrevc3 LAPACK_GLOBAL(dtrevc3, DTREVC3)
5501void LAPACK_dtrevc3(char const *side, char const *howmny, lapack_logical *select, lapack_int const *n, double const *T, lapack_int const *ldt,
5502 double *VL, lapack_int const *ldvl, double *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, double *work,
5503 lapack_int const *lwork, lapack_int *info);
5504
5505#define LAPACK_strevc3 LAPACK_GLOBAL(strevc3, STREVC3)
5506void LAPACK_strevc3(char const *side, char const *howmny, lapack_logical *select, lapack_int const *n, float const *T, lapack_int const *ldt,
5507 float *VL, lapack_int const *ldvl, float *VR, lapack_int const *ldvr, lapack_int const *mm, lapack_int *m, float *work,
5508 lapack_int const *lwork, lapack_int *info);
5509
5510#define LAPACK_ztrevc3 LAPACK_GLOBAL(ztrevc3, ZTREVC3)
5511void LAPACK_ztrevc3(char const *side, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_double *T,
5512 lapack_int const *ldt, lapack_complex_double *VL, lapack_int const *ldvl, lapack_complex_double *VR, lapack_int const *ldvr,
5513 lapack_int const *mm, lapack_int *m, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
5514 lapack_int const *lrwork, lapack_int *info);
5515
5516#define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc, CTREXC)
5517void LAPACK_ctrexc(char const *compq, lapack_int const *n, lapack_complex_float *T, lapack_int const *ldt, lapack_complex_float *Q,
5518 lapack_int const *ldq, lapack_int const *ifst, lapack_int const *ilst, lapack_int *info);
5519
5520#define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc, DTREXC)
5521void LAPACK_dtrexc(char const *compq, lapack_int const *n, double *T, lapack_int const *ldt, double *Q, lapack_int const *ldq, lapack_int *ifst,
5522 lapack_int *ilst, double *work, lapack_int *info);
5523
5524#define LAPACK_strexc LAPACK_GLOBAL(strexc, STREXC)
5525void LAPACK_strexc(char const *compq, lapack_int const *n, float *T, lapack_int const *ldt, float *Q, lapack_int const *ldq, lapack_int *ifst,
5526 lapack_int *ilst, float *work, lapack_int *info);
5527
5528#define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc, ZTREXC)
5529void LAPACK_ztrexc(char const *compq, lapack_int const *n, lapack_complex_double *T, lapack_int const *ldt, lapack_complex_double *Q,
5530 lapack_int const *ldq, lapack_int const *ifst, lapack_int const *ilst, lapack_int *info);
5531
5532#define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs, CTRRFS)
5533void LAPACK_ctrrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
5534 lapack_int const *lda, lapack_complex_float const *B, lapack_int const *ldb, lapack_complex_float const *X, lapack_int const *ldx,
5535 float *ferr, float *berr, lapack_complex_float *work, float *rwork, lapack_int *info);
5536
5537#define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs, DTRRFS)
5538void LAPACK_dtrrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, double const *A,
5539 lapack_int const *lda, double const *B, lapack_int const *ldb, double const *X, lapack_int const *ldx, double *ferr, double *berr,
5540 double *work, lapack_int *iwork, lapack_int *info);
5541
5542#define LAPACK_strrfs LAPACK_GLOBAL(strrfs, STRRFS)
5543void LAPACK_strrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, float const *A,
5544 lapack_int const *lda, float const *B, lapack_int const *ldb, float const *X, lapack_int const *ldx, float *ferr, float *berr,
5545 float *work, lapack_int *iwork, lapack_int *info);
5546
5547#define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs, ZTRRFS)
5548void LAPACK_ztrrfs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
5549 lapack_int const *lda, lapack_complex_double const *B, lapack_int const *ldb, lapack_complex_double const *X,
5550 lapack_int const *ldx, double *ferr, double *berr, lapack_complex_double *work, double *rwork, lapack_int *info);
5551
5552#define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen, CTRSEN)
5553void LAPACK_ctrsen(char const *job, char const *compq, lapack_logical const *select, lapack_int const *n, lapack_complex_float *T,
5554 lapack_int const *ldt, lapack_complex_float *Q, lapack_int const *ldq, lapack_complex_float *W, lapack_int *m, float *s,
5555 float *sep, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5556
5557#define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen, DTRSEN)
5558void LAPACK_dtrsen(char const *job, char const *compq, lapack_logical const *select, lapack_int const *n, double *T, lapack_int const *ldt, double *Q,
5559 lapack_int const *ldq, double *WR, double *WI, lapack_int *m, double *s, double *sep, double *work, lapack_int const *lwork,
5560 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5561
5562#define LAPACK_strsen LAPACK_GLOBAL(strsen, STRSEN)
5563void LAPACK_strsen(char const *job, char const *compq, lapack_logical const *select, lapack_int const *n, float *T, lapack_int const *ldt, float *Q,
5564 lapack_int const *ldq, float *WR, float *WI, lapack_int *m, float *s, float *sep, float *work, lapack_int const *lwork,
5565 lapack_int *iwork, lapack_int const *liwork, lapack_int *info);
5566
5567#define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen, ZTRSEN)
5568void LAPACK_ztrsen(char const *job, char const *compq, lapack_logical const *select, lapack_int const *n, lapack_complex_double *T,
5569 lapack_int const *ldt, lapack_complex_double *Q, lapack_int const *ldq, lapack_complex_double *W, lapack_int *m, double *s,
5570 double *sep, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5571
5572#define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna, CTRSNA)
5573void LAPACK_ctrsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_float const *T,
5574 lapack_int const *ldt, lapack_complex_float const *VL, lapack_int const *ldvl, lapack_complex_float const *VR,
5575 lapack_int const *ldvr, float *S, float *SEP, lapack_int const *mm, lapack_int *m, lapack_complex_float *work,
5576 lapack_int const *ldwork, float *rwork, lapack_int *info);
5577
5578#define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna, DTRSNA)
5579void LAPACK_dtrsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, double const *T, lapack_int const *ldt,
5580 double const *VL, lapack_int const *ldvl, double const *VR, lapack_int const *ldvr, double *S, double *SEP, lapack_int const *mm,
5581 lapack_int *m, double *work, lapack_int const *ldwork, lapack_int *iwork, lapack_int *info);
5582
5583#define LAPACK_strsna LAPACK_GLOBAL(strsna, STRSNA)
5584void LAPACK_strsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, float const *T, lapack_int const *ldt,
5585 float const *VL, lapack_int const *ldvl, float const *VR, lapack_int const *ldvr, float *S, float *SEP, lapack_int const *mm,
5586 lapack_int *m, float *work, lapack_int const *ldwork, lapack_int *iwork, lapack_int *info);
5587
5588#define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna, ZTRSNA)
5589void LAPACK_ztrsna(char const *job, char const *howmny, lapack_logical const *select, lapack_int const *n, lapack_complex_double const *T,
5590 lapack_int const *ldt, lapack_complex_double const *VL, lapack_int const *ldvl, lapack_complex_double const *VR,
5591 lapack_int const *ldvr, double *S, double *SEP, lapack_int const *mm, lapack_int *m, lapack_complex_double *work,
5592 lapack_int const *ldwork, double *rwork, lapack_int *info);
5593
5594#define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl, CTRSYL)
5595void LAPACK_ctrsyl(char const *trana, char const *tranb, lapack_int const *isgn, lapack_int const *m, lapack_int const *n,
5596 lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *B, lapack_int const *ldb,
5597 lapack_complex_float *C, lapack_int const *ldc, float *scale, lapack_int *info);
5598
5599#define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl, DTRSYL)
5600void LAPACK_dtrsyl(char const *trana, char const *tranb, lapack_int const *isgn, lapack_int const *m, lapack_int const *n, double const *A,
5601 lapack_int const *lda, double const *B, lapack_int const *ldb, double *C, lapack_int const *ldc, double *scale, lapack_int *info);
5602
5603#define LAPACK_strsyl LAPACK_GLOBAL(strsyl, STRSYL)
5604void LAPACK_strsyl(char const *trana, char const *tranb, lapack_int const *isgn, lapack_int const *m, lapack_int const *n, float const *A,
5605 lapack_int const *lda, float const *B, lapack_int const *ldb, float *C, lapack_int const *ldc, float *scale, lapack_int *info);
5606
5607#define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl, ZTRSYL)
5608void LAPACK_ztrsyl(char const *trana, char const *tranb, lapack_int const *isgn, lapack_int const *m, lapack_int const *n,
5609 lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *B, lapack_int const *ldb,
5610 lapack_complex_double *C, lapack_int const *ldc, double *scale, lapack_int *info);
5611
5612#define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri, CTRTRI)
5613void LAPACK_ctrtri(char const *uplo, char const *diag, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_int *info);
5614
5615#define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri, DTRTRI)
5616void LAPACK_dtrtri(char const *uplo, char const *diag, lapack_int const *n, double *A, lapack_int const *lda, lapack_int *info);
5617
5618#define LAPACK_strtri LAPACK_GLOBAL(strtri, STRTRI)
5619void LAPACK_strtri(char const *uplo, char const *diag, lapack_int const *n, float *A, lapack_int const *lda, lapack_int *info);
5620
5621#define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri, ZTRTRI)
5622void LAPACK_ztrtri(char const *uplo, char const *diag, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_int *info);
5623
5624#define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs, CTRTRS)
5625void LAPACK_ctrtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_float const *A,
5626 lapack_int const *lda, lapack_complex_float *B, lapack_int const *ldb, lapack_int *info);
5627
5628#define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs, DTRTRS)
5629void LAPACK_dtrtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, double const *A,
5630 lapack_int const *lda, double *B, lapack_int const *ldb, lapack_int *info);
5631
5632#define LAPACK_strtrs LAPACK_GLOBAL(strtrs, STRTRS)
5633void LAPACK_strtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, float const *A,
5634 lapack_int const *lda, float *B, lapack_int const *ldb, lapack_int *info);
5635
5636#define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs, ZTRTRS)
5637void LAPACK_ztrtrs(char const *uplo, char const *trans, char const *diag, lapack_int const *n, lapack_int const *nrhs, lapack_complex_double const *A,
5638 lapack_int const *lda, lapack_complex_double *B, lapack_int const *ldb, lapack_int *info);
5639
5640#define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf, CTRTTF)
5641void LAPACK_ctrttf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda,
5642 lapack_complex_float *ARF, lapack_int *info);
5643
5644#define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf, DTRTTF)
5645void LAPACK_dtrttf(char const *transr, char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double *ARF, lapack_int *info);
5646
5647#define LAPACK_strttf LAPACK_GLOBAL(strttf, STRTTF)
5648void LAPACK_strttf(char const *transr, char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float *ARF, lapack_int *info);
5649
5650#define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf, ZTRTTF)
5651void LAPACK_ztrttf(char const *transr, char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda,
5652 lapack_complex_double *ARF, lapack_int *info);
5653
5654#define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp, CTRTTP)
5655void LAPACK_ctrttp(char const *uplo, lapack_int const *n, lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float *AP,
5656 lapack_int *info);
5657
5658#define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp, DTRTTP)
5659void LAPACK_dtrttp(char const *uplo, lapack_int const *n, double const *A, lapack_int const *lda, double *AP, lapack_int *info);
5660
5661#define LAPACK_strttp LAPACK_GLOBAL(strttp, STRTTP)
5662void LAPACK_strttp(char const *uplo, lapack_int const *n, float const *A, lapack_int const *lda, float *AP, lapack_int *info);
5663
5664#define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp, ZTRTTP)
5665void LAPACK_ztrttp(char const *uplo, lapack_int const *n, lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double *AP,
5666 lapack_int *info);
5667
5668#define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf, CTZRZF)
5669void LAPACK_ctzrzf(lapack_int const *m, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float *tau,
5670 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5671
5672#define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf, DTZRZF)
5673void LAPACK_dtzrzf(lapack_int const *m, lapack_int const *n, double *A, lapack_int const *lda, double *tau, double *work, lapack_int const *lwork,
5674 lapack_int *info);
5675
5676#define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf, STZRZF)
5677void LAPACK_stzrzf(lapack_int const *m, lapack_int const *n, float *A, lapack_int const *lda, float *tau, float *work, lapack_int const *lwork,
5678 lapack_int *info);
5679
5680#define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf, ZTZRZF)
5681void LAPACK_ztzrzf(lapack_int const *m, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double *tau,
5682 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5683
5684#define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb, CUNBDB)
5685void LAPACK_cunbdb(char const *trans, char const *signs, lapack_int const *m, lapack_int const *p, lapack_int const *q, lapack_complex_float *X11,
5686 lapack_int const *ldx11, lapack_complex_float *X12, lapack_int const *ldx12, lapack_complex_float *X21, lapack_int const *ldx21,
5687 lapack_complex_float *X22, lapack_int const *ldx22, float *theta, float *phi, lapack_complex_float *TAUP1,
5688 lapack_complex_float *TAUP2, lapack_complex_float *TAUQ1, lapack_complex_float *TAUQ2, lapack_complex_float *work,
5689 lapack_int const *lwork, lapack_int *info);
5690
5691#define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb, ZUNBDB)
5692void LAPACK_zunbdb(char const *trans, char const *signs, lapack_int const *m, lapack_int const *p, lapack_int const *q, lapack_complex_double *X11,
5693 lapack_int const *ldx11, lapack_complex_double *X12, lapack_int const *ldx12, lapack_complex_double *X21, lapack_int const *ldx21,
5694 lapack_complex_double *X22, lapack_int const *ldx22, double *theta, double *phi, lapack_complex_double *TAUP1,
5695 lapack_complex_double *TAUP2, lapack_complex_double *TAUQ1, lapack_complex_double *TAUQ2, lapack_complex_double *work,
5696 lapack_int const *lwork, lapack_int *info);
5697
5698#define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd, CUNCSD)
5699void LAPACK_cuncsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, char const *signs,
5700 lapack_int const *m, lapack_int const *p, lapack_int const *q, lapack_complex_float *X11, lapack_int const *ldx11,
5701 lapack_complex_float *X12, lapack_int const *ldx12, lapack_complex_float *X21, lapack_int const *ldx21, lapack_complex_float *X22,
5702 lapack_int const *ldx22, float *theta, lapack_complex_float *U1, lapack_int const *ldu1, lapack_complex_float *U2,
5703 lapack_int const *ldu2, lapack_complex_float *V1T, lapack_int const *ldv1t, lapack_complex_float *V2T, lapack_int const *ldv2t,
5704 lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork, lapack_int *iwork, lapack_int *info);
5705
5706#define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd, ZUNCSD)
5707void LAPACK_zuncsd(char const *jobu1, char const *jobu2, char const *jobv1t, char const *jobv2t, char const *trans, char const *signs,
5708 lapack_int const *m, lapack_int const *p, lapack_int const *q, lapack_complex_double *X11, lapack_int const *ldx11,
5709 lapack_complex_double *X12, lapack_int const *ldx12, lapack_complex_double *X21, lapack_int const *ldx21,
5710 lapack_complex_double *X22, lapack_int const *ldx22, double *theta, lapack_complex_double *U1, lapack_int const *ldu1,
5711 lapack_complex_double *U2, lapack_int const *ldu2, lapack_complex_double *V1T, lapack_int const *ldv1t, lapack_complex_double *V2T,
5712 lapack_int const *ldv2t, lapack_complex_double *work, lapack_int const *lwork, double *rwork, lapack_int const *lrwork,
5713 lapack_int *iwork, lapack_int *info);
5714
5715#define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1, CUNCSD2BY1)
5716void LAPACK_cuncsd2by1(char const *jobu1, char const *jobu2, char const *jobv1t, lapack_int const *m, lapack_int const *p, lapack_int const *q,
5717 lapack_complex_float *X11, lapack_int const *ldx11, lapack_complex_float *X21, lapack_int const *ldx21, float *theta,
5718 lapack_complex_float *U1, lapack_int const *ldu1, lapack_complex_float *U2, lapack_int const *ldu2, lapack_complex_float *V1T,
5719 lapack_int const *ldv1t, lapack_complex_float *work, lapack_int const *lwork, float *rwork, lapack_int const *lrwork,
5720 lapack_int *iwork, lapack_int *info);
5721
5722#define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1, ZUNCSD2BY1)
5723void LAPACK_zuncsd2by1(char const *jobu1, char const *jobu2, char const *jobv1t, lapack_int const *m, lapack_int const *p, lapack_int const *q,
5724 lapack_complex_double *X11, lapack_int const *ldx11, lapack_complex_double *X21, lapack_int const *ldx21, double *theta,
5725 lapack_complex_double *U1, lapack_int const *ldu1, lapack_complex_double *U2, lapack_int const *ldu2,
5726 lapack_complex_double *V1T, lapack_int const *ldv1t, lapack_complex_double *work, lapack_int const *lwork, double *rwork,
5727 lapack_int const *lrwork, lapack_int *iwork, lapack_int *info);
5728
5729#define LAPACK_cungbr LAPACK_GLOBAL(cungbr, CUNGBR)
5730void LAPACK_cungbr(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float *A, lapack_int const *lda,
5731 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5732
5733#define LAPACK_zungbr LAPACK_GLOBAL(zungbr, ZUNGBR)
5734void LAPACK_zungbr(char const *vect, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double *A, lapack_int const *lda,
5735 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5736
5737#define LAPACK_cunghr LAPACK_GLOBAL(cunghr, CUNGHR)
5738void LAPACK_cunghr(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_float *A, lapack_int const *lda,
5739 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5740
5741#define LAPACK_zunghr LAPACK_GLOBAL(zunghr, ZUNGHR)
5742void LAPACK_zunghr(lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi, lapack_complex_double *A, lapack_int const *lda,
5743 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5744
5745#define LAPACK_cunglq LAPACK_GLOBAL(cunglq, CUNGLQ)
5746void LAPACK_cunglq(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float *A, lapack_int const *lda,
5747 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5748
5749#define LAPACK_zunglq LAPACK_GLOBAL(zunglq, ZUNGLQ)
5750void LAPACK_zunglq(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double *A, lapack_int const *lda,
5751 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5752
5753#define LAPACK_cungql LAPACK_GLOBAL(cungql, CUNGQL)
5754void LAPACK_cungql(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float *A, lapack_int const *lda,
5755 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5756
5757#define LAPACK_zungql LAPACK_GLOBAL(zungql, ZUNGQL)
5758void LAPACK_zungql(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double *A, lapack_int const *lda,
5759 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5760
5761#define LAPACK_cungqr LAPACK_GLOBAL(cungqr, CUNGQR)
5762void LAPACK_cungqr(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float *A, lapack_int const *lda,
5763 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5764
5765#define LAPACK_zungqr LAPACK_GLOBAL(zungqr, ZUNGQR)
5766void LAPACK_zungqr(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double *A, lapack_int const *lda,
5767 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5768
5769#define LAPACK_cungrq LAPACK_GLOBAL(cungrq, CUNGRQ)
5770void LAPACK_cungrq(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float *A, lapack_int const *lda,
5771 lapack_complex_float const *tau, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5772
5773#define LAPACK_zungrq LAPACK_GLOBAL(zungrq, ZUNGRQ)
5774void LAPACK_zungrq(lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double *A, lapack_int const *lda,
5775 lapack_complex_double const *tau, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5776
5777#define LAPACK_cungtr LAPACK_GLOBAL(cungtr, CUNGTR)
5778void LAPACK_cungtr(char const *uplo, lapack_int const *n, lapack_complex_float *A, lapack_int const *lda, lapack_complex_float const *tau,
5779 lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5780
5781#define LAPACK_zungtr LAPACK_GLOBAL(zungtr, ZUNGTR)
5782void LAPACK_zungtr(char const *uplo, lapack_int const *n, lapack_complex_double *A, lapack_int const *lda, lapack_complex_double const *tau,
5783 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5784
5785#define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr, CUNMBR)
5786void LAPACK_cunmbr(char const *vect, char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k,
5787 lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C,
5788 lapack_int const *ldc, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5789
5790#define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr, ZUNMBR)
5791void LAPACK_zunmbr(char const *vect, char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k,
5792 lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C,
5793 lapack_int const *ldc, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5794
5795#define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr, CUNMHR)
5796void LAPACK_cunmhr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
5797 lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C,
5798 lapack_int const *ldc, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5799
5800#define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr, ZUNMHR)
5801void LAPACK_zunmhr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *ilo, lapack_int const *ihi,
5802 lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C,
5803 lapack_int const *ldc, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5804
5805#define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq, CUNMLQ)
5806void LAPACK_cunmlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
5807 lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
5808 lapack_int const *lwork, lapack_int *info);
5809
5810#define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq, ZUNMLQ)
5811void LAPACK_zunmlq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
5812 lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc,
5813 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5814
5815#define LAPACK_cunmql LAPACK_GLOBAL(cunmql, CUNMQL)
5816void LAPACK_cunmql(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
5817 lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
5818 lapack_int const *lwork, lapack_int *info);
5819
5820#define LAPACK_zunmql LAPACK_GLOBAL(zunmql, ZUNMQL)
5821void LAPACK_zunmql(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
5822 lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc,
5823 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5824
5825#define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr, CUNMQR)
5826void LAPACK_cunmqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
5827 lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
5828 lapack_int const *lwork, lapack_int *info);
5829
5830#define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr, ZUNMQR)
5831void LAPACK_zunmqr(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
5832 lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc,
5833 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5834
5835#define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq, CUNMRQ)
5836void LAPACK_cunmrq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_float const *A,
5837 lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
5838 lapack_int const *lwork, lapack_int *info);
5839
5840#define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq, ZUNMRQ)
5841void LAPACK_zunmrq(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_complex_double const *A,
5842 lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc,
5843 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5844
5845#define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz, CUNMRZ)
5846void LAPACK_cunmrz(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5847 lapack_complex_float const *A, lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C,
5848 lapack_int const *ldc, lapack_complex_float *work, lapack_int const *lwork, lapack_int *info);
5849
5850#define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz, ZUNMRZ)
5851void LAPACK_zunmrz(char const *side, char const *trans, lapack_int const *m, lapack_int const *n, lapack_int const *k, lapack_int const *l,
5852 lapack_complex_double const *A, lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C,
5853 lapack_int const *ldc, lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5854
5855#define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr, CUNMTR)
5856void LAPACK_cunmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, lapack_complex_float const *A,
5857 lapack_int const *lda, lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work,
5858 lapack_int const *lwork, lapack_int *info);
5859
5860#define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr, ZUNMTR)
5861void LAPACK_zunmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, lapack_complex_double const *A,
5862 lapack_int const *lda, lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc,
5863 lapack_complex_double *work, lapack_int const *lwork, lapack_int *info);
5864
5865#define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr, CUPGTR)
5866void LAPACK_cupgtr(char const *uplo, lapack_int const *n, lapack_complex_float const *AP, lapack_complex_float const *tau, lapack_complex_float *Q,
5867 lapack_int const *ldq, lapack_complex_float *work, lapack_int *info);
5868
5869#define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr, ZUPGTR)
5870void LAPACK_zupgtr(char const *uplo, lapack_int const *n, lapack_complex_double const *AP, lapack_complex_double const *tau, lapack_complex_double *Q,
5871 lapack_int const *ldq, lapack_complex_double *work, lapack_int *info);
5872
5873#define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr, CUPMTR)
5874void LAPACK_cupmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, lapack_complex_float const *AP,
5875 lapack_complex_float const *tau, lapack_complex_float *C, lapack_int const *ldc, lapack_complex_float *work, lapack_int *info);
5876
5877#define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr, ZUPMTR)
5878void LAPACK_zupmtr(char const *side, char const *uplo, char const *trans, lapack_int const *m, lapack_int const *n, lapack_complex_double const *AP,
5879 lapack_complex_double const *tau, lapack_complex_double *C, lapack_int const *ldc, lapack_complex_double *work, lapack_int *info);
5880
5881#ifdef __cplusplus
5882} /* extern "C" */
5883#endif
5884
5885#endif /* LAPACK_H */