lapacke.h
Go to the documentation of this file.
00001 /*****************************************************************************
00002   Copyright (c) 2010, Intel Corp.
00003   All rights reserved.
00004 
00005   Redistribution and use in source and binary forms, with or without
00006   modification, are permitted provided that the following conditions are met:
00007 
00008     * Redistributions of source code must retain the above copyright notice,
00009       this list of conditions and the following disclaimer.
00010     * Redistributions in binary form must reproduce the above copyright
00011       notice, this list of conditions and the following disclaimer in the
00012       documentation and/or other materials provided with the distribution.
00013     * Neither the name of Intel Corporation nor the names of its contributors
00014       may be used to endorse or promote products derived from this software
00015       without specific prior written permission.
00016 
00017   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
00018   AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00019   IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
00020   ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
00021   LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
00022   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
00023   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
00024   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
00025   CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
00026   ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
00027   THE POSSIBILITY OF SUCH DAMAGE.
00028 ******************************************************************************
00029 * Contents: Native C interface to LAPACK
00030 * Author: Intel Corporation
00031 * Generated October, 2010
00032 *****************************************************************************/
00033 
00034 #ifndef _LAPACKE_H_
00035 #define _LAPACKE_H_
00036 
00037 /*
00038 *  Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
00039 *  and default function name pattern.
00040 */
00041 #ifdef HAVE_LAPACK_CONFIG_H
00042 #include "lapacke_config.h"
00043 #endif
00044 
00045 #ifdef __cplusplus
00046 extern "C" {
00047 #endif /* __cplusplus */
00048 
00049 #include <stdlib.h>
00050 
00051 #ifndef lapack_int
00052 #define lapack_int     int
00053 #endif
00054 
00055 #ifndef lapack_logical
00056 #define lapack_logical lapack_int
00057 #endif
00058 
00059 /* Complex types are structures equivalent to the
00060 * Fortran complex types COMPLEX(4) and COMPLEX(8).
00061 *
00062 * One can also redefine the types with his own types
00063 * for example by including in the code definitions like
00064 *
00065 * #define lapack_complex_float std::complex<float>
00066 * #define lapack_complex_double std::complex<double>
00067 *
00068 * or define these types in the command line:
00069 *
00070 * -Dlapack_complex_float="std::complex<float>"
00071 * -Dlapack_complex_double="std::complex<double>"
00072 */
00073 
00074 #ifndef LAPACK_COMPLEX_CUSTOM
00075 
00076 /* Complex type (single precision) */
00077 #ifndef lapack_complex_float
00078 #include <complex.h>
00079 #define lapack_complex_float    float _Complex
00080 #endif
00081 
00082 #ifndef lapack_complex_float_real
00083 #define lapack_complex_float_real(z)       (creal(z))
00084 #endif
00085 
00086 #ifndef lapack_complex_float_imag
00087 #define lapack_complex_float_imag(z)       (imag(z))
00088 #endif
00089 
00090 lapack_complex_float lapack_make_complex_float( float re, float im );
00091 
00092 /* Complex type (double precision) */
00093 #ifndef lapack_complex_double
00094 #include <complex.h>
00095 #define lapack_complex_double   double _Complex
00096 #endif
00097 
00098 #ifndef lapack_complex_double_real
00099 #define lapack_complex_double_real(z)      (creal(z))
00100 #endif
00101 
00102 #ifndef lapack_complex_double_imag
00103 #define lapack_complex_double_imag(z)       (imag(z))
00104 #endif
00105 
00106 lapack_complex_double lapack_make_complex_double( double re, double im );
00107 
00108 #endif
00109 
00110 #ifndef ABS
00111 #define ABS(x) (((x) < 0) ? -(x) : (x))
00112 #endif
00113 #ifndef MAX
00114 #define MAX(x,y) (((x) > (y)) ? (x) : (y))
00115 #endif
00116 #ifndef MIN
00117 #define MIN(x,y) (((x) < (y)) ? (x) : (y))
00118 #endif
00119 #ifndef MAX3
00120 #define MAX3(x,y,z) (((x) > MAX(y,z)) ? (x) : MAX(y,z))
00121 #endif
00122 #ifndef MIN3
00123 #define MIN3(x,y,z) (((x) < MIN(y,z)) ? (x) : MIN(y,z))
00124 #endif
00125 
00126 #define IS_S_NONZERO(x) ( (x) < 0 || (x) > 0 )
00127 #define IS_D_NONZERO(x) ( (x) < 0 || (x) > 0 )
00128 #define IS_C_NONZERO(x) ( IS_S_NONZERO(*((float*)&x)) ||  \
00129                           IS_S_NONZERO(*(((float*)&x)+1)) )
00130 #define IS_Z_NONZERO(x) ( IS_D_NONZERO(*((double*)&x)) || \
00131                           IS_D_NONZERO(*(((double*)&x)+1)) )
00132 
00133 #ifndef LAPACKE_malloc
00134 #define LAPACKE_malloc( size ) malloc( size )
00135 #endif
00136 #ifndef LAPACKE_free
00137 #define LAPACKE_free( p )      free( p )
00138 #endif
00139 
00140 #define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
00141 #define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
00142 
00143 #define LAPACK_ROW_MAJOR               101
00144 #define LAPACK_COL_MAJOR               102
00145 
00146 #define LAPACK_WORK_MEMORY_ERROR       -1010
00147 #define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
00148 
00149 /* Callback logical functions of one, two, or three arguments are used
00150 *  to select eigenvalues to sort to the top left of the Schur form.
00151 *  The value is selected if function returns TRUE (non-zero). */
00152 
00153 typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
00154 typedef lapack_logical (*LAPACK_S_SELECT3)
00155     ( const float*, const float*, const float* );
00156 typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
00157 typedef lapack_logical (*LAPACK_D_SELECT3)
00158     ( const double*, const double*, const double* );
00159 
00160 typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
00161 typedef lapack_logical (*LAPACK_C_SELECT2)
00162     ( const lapack_complex_float*, const lapack_complex_float* );
00163 typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
00164 typedef lapack_logical (*LAPACK_Z_SELECT2)
00165     ( const lapack_complex_double*, const lapack_complex_double* );
00166 
00167 #ifndef LAPACK_NAME
00168 #define LAPACK_NAME(lcname,UCNAME)  lcname##_
00169 #endif
00170 
00171 #define LAPACK_lsame LAPACK_NAME(lsame,LSAME)
00172 lapack_logical LAPACK_lsame( char* ca,  char* cb,
00173                               lapack_int lca, lapack_int lcb );
00174 
00175 /* C-LAPACK function prototypes */
00176 
00177 lapack_int LAPACKE_sbdsdc( int matrix_order, char uplo, char compq,
00178                            lapack_int n, float* d, float* e, float* u,
00179                            lapack_int ldu, float* vt, lapack_int ldvt, float* q,
00180                            lapack_int* iq );
00181 lapack_int LAPACKE_dbdsdc( int matrix_order, char uplo, char compq,
00182                            lapack_int n, double* d, double* e, double* u,
00183                            lapack_int ldu, double* vt, lapack_int ldvt,
00184                            double* q, lapack_int* iq );
00185 
00186 lapack_int LAPACKE_sbdsqr( int matrix_order, char uplo, lapack_int n,
00187                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00188                            float* d, float* e, float* vt, lapack_int ldvt,
00189                            float* u, lapack_int ldu, float* c, lapack_int ldc );
00190 lapack_int LAPACKE_dbdsqr( int matrix_order, char uplo, lapack_int n,
00191                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00192                            double* d, double* e, double* vt, lapack_int ldvt,
00193                            double* u, lapack_int ldu, double* c,
00194                            lapack_int ldc );
00195 lapack_int LAPACKE_cbdsqr( int matrix_order, char uplo, lapack_int n,
00196                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00197                            float* d, float* e, lapack_complex_float* vt,
00198                            lapack_int ldvt, lapack_complex_float* u,
00199                            lapack_int ldu, lapack_complex_float* c,
00200                            lapack_int ldc );
00201 lapack_int LAPACKE_zbdsqr( int matrix_order, char uplo, lapack_int n,
00202                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00203                            double* d, double* e, lapack_complex_double* vt,
00204                            lapack_int ldvt, lapack_complex_double* u,
00205                            lapack_int ldu, lapack_complex_double* c,
00206                            lapack_int ldc );
00207 
00208 lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
00209                            float* sep );
00210 lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
00211                            const double* d, double* sep );
00212 
00213 lapack_int LAPACKE_sgbbrd( int matrix_order, char vect, lapack_int m,
00214                            lapack_int n, lapack_int ncc, lapack_int kl,
00215                            lapack_int ku, float* ab, lapack_int ldab, float* d,
00216                            float* e, float* q, lapack_int ldq, float* pt,
00217                            lapack_int ldpt, float* c, lapack_int ldc );
00218 lapack_int LAPACKE_dgbbrd( int matrix_order, char vect, lapack_int m,
00219                            lapack_int n, lapack_int ncc, lapack_int kl,
00220                            lapack_int ku, double* ab, lapack_int ldab,
00221                            double* d, double* e, double* q, lapack_int ldq,
00222                            double* pt, lapack_int ldpt, double* c,
00223                            lapack_int ldc );
00224 lapack_int LAPACKE_cgbbrd( int matrix_order, char vect, lapack_int m,
00225                            lapack_int n, lapack_int ncc, lapack_int kl,
00226                            lapack_int ku, lapack_complex_float* ab,
00227                            lapack_int ldab, float* d, float* e,
00228                            lapack_complex_float* q, lapack_int ldq,
00229                            lapack_complex_float* pt, lapack_int ldpt,
00230                            lapack_complex_float* c, lapack_int ldc );
00231 lapack_int LAPACKE_zgbbrd( int matrix_order, char vect, lapack_int m,
00232                            lapack_int n, lapack_int ncc, lapack_int kl,
00233                            lapack_int ku, lapack_complex_double* ab,
00234                            lapack_int ldab, double* d, double* e,
00235                            lapack_complex_double* q, lapack_int ldq,
00236                            lapack_complex_double* pt, lapack_int ldpt,
00237                            lapack_complex_double* c, lapack_int ldc );
00238 
00239 lapack_int LAPACKE_sgbcon( int matrix_order, char norm, lapack_int n,
00240                            lapack_int kl, lapack_int ku, const float* ab,
00241                            lapack_int ldab, const lapack_int* ipiv, float anorm,
00242                            float* rcond );
00243 lapack_int LAPACKE_dgbcon( int matrix_order, char norm, lapack_int n,
00244                            lapack_int kl, lapack_int ku, const double* ab,
00245                            lapack_int ldab, const lapack_int* ipiv,
00246                            double anorm, double* rcond );
00247 lapack_int LAPACKE_cgbcon( int matrix_order, char norm, lapack_int n,
00248                            lapack_int kl, lapack_int ku,
00249                            const lapack_complex_float* ab, lapack_int ldab,
00250                            const lapack_int* ipiv, float anorm, float* rcond );
00251 lapack_int LAPACKE_zgbcon( int matrix_order, char norm, lapack_int n,
00252                            lapack_int kl, lapack_int ku,
00253                            const lapack_complex_double* ab, lapack_int ldab,
00254                            const lapack_int* ipiv, double anorm,
00255                            double* rcond );
00256 
00257 lapack_int LAPACKE_sgbequ( int matrix_order, lapack_int m, lapack_int n,
00258                            lapack_int kl, lapack_int ku, const float* ab,
00259                            lapack_int ldab, float* r, float* c, float* rowcnd,
00260                            float* colcnd, float* amax );
00261 lapack_int LAPACKE_dgbequ( int matrix_order, lapack_int m, lapack_int n,
00262                            lapack_int kl, lapack_int ku, const double* ab,
00263                            lapack_int ldab, double* r, double* c,
00264                            double* rowcnd, double* colcnd, double* amax );
00265 lapack_int LAPACKE_cgbequ( int matrix_order, lapack_int m, lapack_int n,
00266                            lapack_int kl, lapack_int ku,
00267                            const lapack_complex_float* ab, lapack_int ldab,
00268                            float* r, float* c, float* rowcnd, float* colcnd,
00269                            float* amax );
00270 lapack_int LAPACKE_zgbequ( int matrix_order, lapack_int m, lapack_int n,
00271                            lapack_int kl, lapack_int ku,
00272                            const lapack_complex_double* ab, lapack_int ldab,
00273                            double* r, double* c, double* rowcnd, double* colcnd,
00274                            double* amax );
00275 
00276 lapack_int LAPACKE_sgbequb( int matrix_order, lapack_int m, lapack_int n,
00277                             lapack_int kl, lapack_int ku, const float* ab,
00278                             lapack_int ldab, float* r, float* c, float* rowcnd,
00279                             float* colcnd, float* amax );
00280 lapack_int LAPACKE_dgbequb( int matrix_order, lapack_int m, lapack_int n,
00281                             lapack_int kl, lapack_int ku, const double* ab,
00282                             lapack_int ldab, double* r, double* c,
00283                             double* rowcnd, double* colcnd, double* amax );
00284 lapack_int LAPACKE_cgbequb( int matrix_order, lapack_int m, lapack_int n,
00285                             lapack_int kl, lapack_int ku,
00286                             const lapack_complex_float* ab, lapack_int ldab,
00287                             float* r, float* c, float* rowcnd, float* colcnd,
00288                             float* amax );
00289 lapack_int LAPACKE_zgbequb( int matrix_order, lapack_int m, lapack_int n,
00290                             lapack_int kl, lapack_int ku,
00291                             const lapack_complex_double* ab, lapack_int ldab,
00292                             double* r, double* c, double* rowcnd,
00293                             double* colcnd, double* amax );
00294 
00295 lapack_int LAPACKE_sgbrfs( int matrix_order, char trans, lapack_int n,
00296                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00297                            const float* ab, lapack_int ldab, const float* afb,
00298                            lapack_int ldafb, const lapack_int* ipiv,
00299                            const float* b, lapack_int ldb, float* x,
00300                            lapack_int ldx, float* ferr, float* berr );
00301 lapack_int LAPACKE_dgbrfs( int matrix_order, char trans, lapack_int n,
00302                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00303                            const double* ab, lapack_int ldab, const double* afb,
00304                            lapack_int ldafb, const lapack_int* ipiv,
00305                            const double* b, lapack_int ldb, double* x,
00306                            lapack_int ldx, double* ferr, double* berr );
00307 lapack_int LAPACKE_cgbrfs( int matrix_order, char trans, lapack_int n,
00308                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00309                            const lapack_complex_float* ab, lapack_int ldab,
00310                            const lapack_complex_float* afb, lapack_int ldafb,
00311                            const lapack_int* ipiv,
00312                            const lapack_complex_float* b, lapack_int ldb,
00313                            lapack_complex_float* x, lapack_int ldx, float* ferr,
00314                            float* berr );
00315 lapack_int LAPACKE_zgbrfs( int matrix_order, char trans, lapack_int n,
00316                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00317                            const lapack_complex_double* ab, lapack_int ldab,
00318                            const lapack_complex_double* afb, lapack_int ldafb,
00319                            const lapack_int* ipiv,
00320                            const lapack_complex_double* b, lapack_int ldb,
00321                            lapack_complex_double* x, lapack_int ldx,
00322                            double* ferr, double* berr );
00323 
00324 lapack_int LAPACKE_sgbrfsx( int matrix_order, char trans, char equed,
00325                             lapack_int n, lapack_int kl, lapack_int ku,
00326                             lapack_int nrhs, const float* ab, lapack_int ldab,
00327                             const float* afb, lapack_int ldafb,
00328                             const lapack_int* ipiv, const float* r,
00329                             const float* c, const float* b, lapack_int ldb,
00330                             float* x, lapack_int ldx, float* rcond, float* berr,
00331                             lapack_int n_err_bnds, float* err_bnds_norm,
00332                             float* err_bnds_comp, lapack_int nparams,
00333                             float* params );
00334 lapack_int LAPACKE_dgbrfsx( int matrix_order, char trans, char equed,
00335                             lapack_int n, lapack_int kl, lapack_int ku,
00336                             lapack_int nrhs, const double* ab, lapack_int ldab,
00337                             const double* afb, lapack_int ldafb,
00338                             const lapack_int* ipiv, const double* r,
00339                             const double* c, const double* b, lapack_int ldb,
00340                             double* x, lapack_int ldx, double* rcond,
00341                             double* berr, lapack_int n_err_bnds,
00342                             double* err_bnds_norm, double* err_bnds_comp,
00343                             lapack_int nparams, double* params );
00344 lapack_int LAPACKE_cgbrfsx( int matrix_order, char trans, char equed,
00345                             lapack_int n, lapack_int kl, lapack_int ku,
00346                             lapack_int nrhs, const lapack_complex_float* ab,
00347                             lapack_int ldab, const lapack_complex_float* afb,
00348                             lapack_int ldafb, const lapack_int* ipiv,
00349                             const float* r, const float* c,
00350                             const lapack_complex_float* b, lapack_int ldb,
00351                             lapack_complex_float* x, lapack_int ldx,
00352                             float* rcond, float* berr, lapack_int n_err_bnds,
00353                             float* err_bnds_norm, float* err_bnds_comp,
00354                             lapack_int nparams, float* params );
00355 lapack_int LAPACKE_zgbrfsx( int matrix_order, char trans, char equed,
00356                             lapack_int n, lapack_int kl, lapack_int ku,
00357                             lapack_int nrhs, const lapack_complex_double* ab,
00358                             lapack_int ldab, const lapack_complex_double* afb,
00359                             lapack_int ldafb, const lapack_int* ipiv,
00360                             const double* r, const double* c,
00361                             const lapack_complex_double* b, lapack_int ldb,
00362                             lapack_complex_double* x, lapack_int ldx,
00363                             double* rcond, double* berr, lapack_int n_err_bnds,
00364                             double* err_bnds_norm, double* err_bnds_comp,
00365                             lapack_int nparams, double* params );
00366 
00367 lapack_int LAPACKE_sgbsv( int matrix_order, lapack_int n, lapack_int kl,
00368                           lapack_int ku, lapack_int nrhs, float* ab,
00369                           lapack_int ldab, lapack_int* ipiv, float* b,
00370                           lapack_int ldb );
00371 lapack_int LAPACKE_dgbsv( int matrix_order, lapack_int n, lapack_int kl,
00372                           lapack_int ku, lapack_int nrhs, double* ab,
00373                           lapack_int ldab, lapack_int* ipiv, double* b,
00374                           lapack_int ldb );
00375 lapack_int LAPACKE_cgbsv( int matrix_order, lapack_int n, lapack_int kl,
00376                           lapack_int ku, lapack_int nrhs,
00377                           lapack_complex_float* ab, lapack_int ldab,
00378                           lapack_int* ipiv, lapack_complex_float* b,
00379                           lapack_int ldb );
00380 lapack_int LAPACKE_zgbsv( int matrix_order, lapack_int n, lapack_int kl,
00381                           lapack_int ku, lapack_int nrhs,
00382                           lapack_complex_double* ab, lapack_int ldab,
00383                           lapack_int* ipiv, lapack_complex_double* b,
00384                           lapack_int ldb );
00385 
00386 lapack_int LAPACKE_sgbsvx( int matrix_order, char fact, char trans,
00387                            lapack_int n, lapack_int kl, lapack_int ku,
00388                            lapack_int nrhs, float* ab, lapack_int ldab,
00389                            float* afb, lapack_int ldafb, lapack_int* ipiv,
00390                            char* equed, float* r, float* c, float* b,
00391                            lapack_int ldb, float* x, lapack_int ldx,
00392                            float* rcond, float* ferr, float* berr,
00393                            float* rpivot );
00394 lapack_int LAPACKE_dgbsvx( int matrix_order, char fact, char trans,
00395                            lapack_int n, lapack_int kl, lapack_int ku,
00396                            lapack_int nrhs, double* ab, lapack_int ldab,
00397                            double* afb, lapack_int ldafb, lapack_int* ipiv,
00398                            char* equed, double* r, double* c, double* b,
00399                            lapack_int ldb, double* x, lapack_int ldx,
00400                            double* rcond, double* ferr, double* berr,
00401                            double* rpivot );
00402 lapack_int LAPACKE_cgbsvx( int matrix_order, char fact, char trans,
00403                            lapack_int n, lapack_int kl, lapack_int ku,
00404                            lapack_int nrhs, lapack_complex_float* ab,
00405                            lapack_int ldab, lapack_complex_float* afb,
00406                            lapack_int ldafb, lapack_int* ipiv, char* equed,
00407                            float* r, float* c, lapack_complex_float* b,
00408                            lapack_int ldb, lapack_complex_float* x,
00409                            lapack_int ldx, float* rcond, float* ferr,
00410                            float* berr, float* rpivot );
00411 lapack_int LAPACKE_zgbsvx( int matrix_order, char fact, char trans,
00412                            lapack_int n, lapack_int kl, lapack_int ku,
00413                            lapack_int nrhs, lapack_complex_double* ab,
00414                            lapack_int ldab, lapack_complex_double* afb,
00415                            lapack_int ldafb, lapack_int* ipiv, char* equed,
00416                            double* r, double* c, lapack_complex_double* b,
00417                            lapack_int ldb, lapack_complex_double* x,
00418                            lapack_int ldx, double* rcond, double* ferr,
00419                            double* berr, double* rpivot );
00420 
00421 lapack_int LAPACKE_sgbsvxx( int matrix_order, char fact, char trans,
00422                             lapack_int n, lapack_int kl, lapack_int ku,
00423                             lapack_int nrhs, float* ab, lapack_int ldab,
00424                             float* afb, lapack_int ldafb, lapack_int* ipiv,
00425                             char* equed, float* r, float* c, float* b,
00426                             lapack_int ldb, float* x, lapack_int ldx,
00427                             float* rcond, float* rpvgrw, float* berr,
00428                             lapack_int n_err_bnds, float* err_bnds_norm,
00429                             float* err_bnds_comp, lapack_int nparams,
00430                             float* params );
00431 lapack_int LAPACKE_dgbsvxx( int matrix_order, char fact, char trans,
00432                             lapack_int n, lapack_int kl, lapack_int ku,
00433                             lapack_int nrhs, double* ab, lapack_int ldab,
00434                             double* afb, lapack_int ldafb, lapack_int* ipiv,
00435                             char* equed, double* r, double* c, double* b,
00436                             lapack_int ldb, double* x, lapack_int ldx,
00437                             double* rcond, double* rpvgrw, double* berr,
00438                             lapack_int n_err_bnds, double* err_bnds_norm,
00439                             double* err_bnds_comp, lapack_int nparams,
00440                             double* params );
00441 lapack_int LAPACKE_cgbsvxx( int matrix_order, char fact, char trans,
00442                             lapack_int n, lapack_int kl, lapack_int ku,
00443                             lapack_int nrhs, lapack_complex_float* ab,
00444                             lapack_int ldab, lapack_complex_float* afb,
00445                             lapack_int ldafb, lapack_int* ipiv, char* equed,
00446                             float* r, float* c, lapack_complex_float* b,
00447                             lapack_int ldb, lapack_complex_float* x,
00448                             lapack_int ldx, float* rcond, float* rpvgrw,
00449                             float* berr, lapack_int n_err_bnds,
00450                             float* err_bnds_norm, float* err_bnds_comp,
00451                             lapack_int nparams, float* params );
00452 lapack_int LAPACKE_zgbsvxx( int matrix_order, char fact, char trans,
00453                             lapack_int n, lapack_int kl, lapack_int ku,
00454                             lapack_int nrhs, lapack_complex_double* ab,
00455                             lapack_int ldab, lapack_complex_double* afb,
00456                             lapack_int ldafb, lapack_int* ipiv, char* equed,
00457                             double* r, double* c, lapack_complex_double* b,
00458                             lapack_int ldb, lapack_complex_double* x,
00459                             lapack_int ldx, double* rcond, double* rpvgrw,
00460                             double* berr, lapack_int n_err_bnds,
00461                             double* err_bnds_norm, double* err_bnds_comp,
00462                             lapack_int nparams, double* params );
00463 
00464 lapack_int LAPACKE_sgbtrf( int matrix_order, lapack_int m, lapack_int n,
00465                            lapack_int kl, lapack_int ku, float* ab,
00466                            lapack_int ldab, lapack_int* ipiv );
00467 lapack_int LAPACKE_dgbtrf( int matrix_order, lapack_int m, lapack_int n,
00468                            lapack_int kl, lapack_int ku, double* ab,
00469                            lapack_int ldab, lapack_int* ipiv );
00470 lapack_int LAPACKE_cgbtrf( int matrix_order, lapack_int m, lapack_int n,
00471                            lapack_int kl, lapack_int ku,
00472                            lapack_complex_float* ab, lapack_int ldab,
00473                            lapack_int* ipiv );
00474 lapack_int LAPACKE_zgbtrf( int matrix_order, lapack_int m, lapack_int n,
00475                            lapack_int kl, lapack_int ku,
00476                            lapack_complex_double* ab, lapack_int ldab,
00477                            lapack_int* ipiv );
00478 
00479 lapack_int LAPACKE_sgbtrs( int matrix_order, char trans, lapack_int n,
00480                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00481                            const float* ab, lapack_int ldab,
00482                            const lapack_int* ipiv, float* b, lapack_int ldb );
00483 lapack_int LAPACKE_dgbtrs( int matrix_order, char trans, lapack_int n,
00484                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00485                            const double* ab, lapack_int ldab,
00486                            const lapack_int* ipiv, double* b, lapack_int ldb );
00487 lapack_int LAPACKE_cgbtrs( int matrix_order, char trans, lapack_int n,
00488                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00489                            const lapack_complex_float* ab, lapack_int ldab,
00490                            const lapack_int* ipiv, lapack_complex_float* b,
00491                            lapack_int ldb );
00492 lapack_int LAPACKE_zgbtrs( int matrix_order, char trans, lapack_int n,
00493                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00494                            const lapack_complex_double* ab, lapack_int ldab,
00495                            const lapack_int* ipiv, lapack_complex_double* b,
00496                            lapack_int ldb );
00497 
00498 lapack_int LAPACKE_sgebak( int matrix_order, char job, char side, lapack_int n,
00499                            lapack_int ilo, lapack_int ihi, const float* scale,
00500                            lapack_int m, float* v, lapack_int ldv );
00501 lapack_int LAPACKE_dgebak( int matrix_order, char job, char side, lapack_int n,
00502                            lapack_int ilo, lapack_int ihi, const double* scale,
00503                            lapack_int m, double* v, lapack_int ldv );
00504 lapack_int LAPACKE_cgebak( int matrix_order, char job, char side, lapack_int n,
00505                            lapack_int ilo, lapack_int ihi, const float* scale,
00506                            lapack_int m, lapack_complex_float* v,
00507                            lapack_int ldv );
00508 lapack_int LAPACKE_zgebak( int matrix_order, char job, char side, lapack_int n,
00509                            lapack_int ilo, lapack_int ihi, const double* scale,
00510                            lapack_int m, lapack_complex_double* v,
00511                            lapack_int ldv );
00512 
00513 lapack_int LAPACKE_sgebal( int matrix_order, char job, lapack_int n, float* a,
00514                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
00515                            float* scale );
00516 lapack_int LAPACKE_dgebal( int matrix_order, char job, lapack_int n, double* a,
00517                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
00518                            double* scale );
00519 lapack_int LAPACKE_cgebal( int matrix_order, char job, lapack_int n,
00520                            lapack_complex_float* a, lapack_int lda,
00521                            lapack_int* ilo, lapack_int* ihi, float* scale );
00522 lapack_int LAPACKE_zgebal( int matrix_order, char job, lapack_int n,
00523                            lapack_complex_double* a, lapack_int lda,
00524                            lapack_int* ilo, lapack_int* ihi, double* scale );
00525 
00526 lapack_int LAPACKE_sgebrd( int matrix_order, lapack_int m, lapack_int n,
00527                            float* a, lapack_int lda, float* d, float* e,
00528                            float* tauq, float* taup );
00529 lapack_int LAPACKE_dgebrd( int matrix_order, lapack_int m, lapack_int n,
00530                            double* a, lapack_int lda, double* d, double* e,
00531                            double* tauq, double* taup );
00532 lapack_int LAPACKE_cgebrd( int matrix_order, lapack_int m, lapack_int n,
00533                            lapack_complex_float* a, lapack_int lda, float* d,
00534                            float* e, lapack_complex_float* tauq,
00535                            lapack_complex_float* taup );
00536 lapack_int LAPACKE_zgebrd( int matrix_order, lapack_int m, lapack_int n,
00537                            lapack_complex_double* a, lapack_int lda, double* d,
00538                            double* e, lapack_complex_double* tauq,
00539                            lapack_complex_double* taup );
00540 
00541 lapack_int LAPACKE_sgecon( int matrix_order, char norm, lapack_int n,
00542                            const float* a, lapack_int lda, float anorm,
00543                            float* rcond );
00544 lapack_int LAPACKE_dgecon( int matrix_order, char norm, lapack_int n,
00545                            const double* a, lapack_int lda, double anorm,
00546                            double* rcond );
00547 lapack_int LAPACKE_cgecon( int matrix_order, char norm, lapack_int n,
00548                            const lapack_complex_float* a, lapack_int lda,
00549                            float anorm, float* rcond );
00550 lapack_int LAPACKE_zgecon( int matrix_order, char norm, lapack_int n,
00551                            const lapack_complex_double* a, lapack_int lda,
00552                            double anorm, double* rcond );
00553 
00554 lapack_int LAPACKE_sgeequ( int matrix_order, lapack_int m, lapack_int n,
00555                            const float* a, lapack_int lda, float* r, float* c,
00556                            float* rowcnd, float* colcnd, float* amax );
00557 lapack_int LAPACKE_dgeequ( int matrix_order, lapack_int m, lapack_int n,
00558                            const double* a, lapack_int lda, double* r,
00559                            double* c, double* rowcnd, double* colcnd,
00560                            double* amax );
00561 lapack_int LAPACKE_cgeequ( int matrix_order, lapack_int m, lapack_int n,
00562                            const lapack_complex_float* a, lapack_int lda,
00563                            float* r, float* c, float* rowcnd, float* colcnd,
00564                            float* amax );
00565 lapack_int LAPACKE_zgeequ( int matrix_order, lapack_int m, lapack_int n,
00566                            const lapack_complex_double* a, lapack_int lda,
00567                            double* r, double* c, double* rowcnd, double* colcnd,
00568                            double* amax );
00569 
00570 lapack_int LAPACKE_sgeequb( int matrix_order, lapack_int m, lapack_int n,
00571                             const float* a, lapack_int lda, float* r, float* c,
00572                             float* rowcnd, float* colcnd, float* amax );
00573 lapack_int LAPACKE_dgeequb( int matrix_order, lapack_int m, lapack_int n,
00574                             const double* a, lapack_int lda, double* r,
00575                             double* c, double* rowcnd, double* colcnd,
00576                             double* amax );
00577 lapack_int LAPACKE_cgeequb( int matrix_order, lapack_int m, lapack_int n,
00578                             const lapack_complex_float* a, lapack_int lda,
00579                             float* r, float* c, float* rowcnd, float* colcnd,
00580                             float* amax );
00581 lapack_int LAPACKE_zgeequb( int matrix_order, lapack_int m, lapack_int n,
00582                             const lapack_complex_double* a, lapack_int lda,
00583                             double* r, double* c, double* rowcnd,
00584                             double* colcnd, double* amax );
00585 
00586 lapack_int LAPACKE_sgees( int matrix_order, char jobvs, char sort,
00587                           LAPACK_S_SELECT2 select, lapack_int n, float* a,
00588                           lapack_int lda, lapack_int* sdim, float* wr,
00589                           float* wi, float* vs, lapack_int ldvs );
00590 lapack_int LAPACKE_dgees( int matrix_order, char jobvs, char sort,
00591                           LAPACK_D_SELECT2 select, lapack_int n, double* a,
00592                           lapack_int lda, lapack_int* sdim, double* wr,
00593                           double* wi, double* vs, lapack_int ldvs );
00594 lapack_int LAPACKE_cgees( int matrix_order, char jobvs, char sort,
00595                           LAPACK_C_SELECT1 select, lapack_int n,
00596                           lapack_complex_float* a, lapack_int lda,
00597                           lapack_int* sdim, lapack_complex_float* w,
00598                           lapack_complex_float* vs, lapack_int ldvs );
00599 lapack_int LAPACKE_zgees( int matrix_order, char jobvs, char sort,
00600                           LAPACK_Z_SELECT1 select, lapack_int n,
00601                           lapack_complex_double* a, lapack_int lda,
00602                           lapack_int* sdim, lapack_complex_double* w,
00603                           lapack_complex_double* vs, lapack_int ldvs );
00604 
00605 lapack_int LAPACKE_sgeesx( int matrix_order, char jobvs, char sort,
00606                            LAPACK_S_SELECT2 select, char sense, lapack_int n,
00607                            float* a, lapack_int lda, lapack_int* sdim,
00608                            float* wr, float* wi, float* vs, lapack_int ldvs,
00609                            float* rconde, float* rcondv );
00610 lapack_int LAPACKE_dgeesx( int matrix_order, char jobvs, char sort,
00611                            LAPACK_D_SELECT2 select, char sense, lapack_int n,
00612                            double* a, lapack_int lda, lapack_int* sdim,
00613                            double* wr, double* wi, double* vs, lapack_int ldvs,
00614                            double* rconde, double* rcondv );
00615 lapack_int LAPACKE_cgeesx( int matrix_order, char jobvs, char sort,
00616                            LAPACK_C_SELECT1 select, char sense, lapack_int n,
00617                            lapack_complex_float* a, lapack_int lda,
00618                            lapack_int* sdim, lapack_complex_float* w,
00619                            lapack_complex_float* vs, lapack_int ldvs,
00620                            float* rconde, float* rcondv );
00621 lapack_int LAPACKE_zgeesx( int matrix_order, char jobvs, char sort,
00622                            LAPACK_Z_SELECT1 select, char sense, lapack_int n,
00623                            lapack_complex_double* a, lapack_int lda,
00624                            lapack_int* sdim, lapack_complex_double* w,
00625                            lapack_complex_double* vs, lapack_int ldvs,
00626                            double* rconde, double* rcondv );
00627 
00628 lapack_int LAPACKE_sgeev( int matrix_order, char jobvl, char jobvr,
00629                           lapack_int n, float* a, lapack_int lda, float* wr,
00630                           float* wi, float* vl, lapack_int ldvl, float* vr,
00631                           lapack_int ldvr );
00632 lapack_int LAPACKE_dgeev( int matrix_order, char jobvl, char jobvr,
00633                           lapack_int n, double* a, lapack_int lda, double* wr,
00634                           double* wi, double* vl, lapack_int ldvl, double* vr,
00635                           lapack_int ldvr );
00636 lapack_int LAPACKE_cgeev( int matrix_order, char jobvl, char jobvr,
00637                           lapack_int n, lapack_complex_float* a, lapack_int lda,
00638                           lapack_complex_float* w, lapack_complex_float* vl,
00639                           lapack_int ldvl, lapack_complex_float* vr,
00640                           lapack_int ldvr );
00641 lapack_int LAPACKE_zgeev( int matrix_order, char jobvl, char jobvr,
00642                           lapack_int n, lapack_complex_double* a,
00643                           lapack_int lda, lapack_complex_double* w,
00644                           lapack_complex_double* vl, lapack_int ldvl,
00645                           lapack_complex_double* vr, lapack_int ldvr );
00646 
00647 lapack_int LAPACKE_sgeevx( int matrix_order, char balanc, char jobvl,
00648                            char jobvr, char sense, lapack_int n, float* a,
00649                            lapack_int lda, float* wr, float* wi, float* vl,
00650                            lapack_int ldvl, float* vr, lapack_int ldvr,
00651                            lapack_int* ilo, lapack_int* ihi, float* scale,
00652                            float* abnrm, float* rconde, float* rcondv );
00653 lapack_int LAPACKE_dgeevx( int matrix_order, char balanc, char jobvl,
00654                            char jobvr, char sense, lapack_int n, double* a,
00655                            lapack_int lda, double* wr, double* wi, double* vl,
00656                            lapack_int ldvl, double* vr, lapack_int ldvr,
00657                            lapack_int* ilo, lapack_int* ihi, double* scale,
00658                            double* abnrm, double* rconde, double* rcondv );
00659 lapack_int LAPACKE_cgeevx( int matrix_order, char balanc, char jobvl,
00660                            char jobvr, char sense, lapack_int n,
00661                            lapack_complex_float* a, lapack_int lda,
00662                            lapack_complex_float* w, lapack_complex_float* vl,
00663                            lapack_int ldvl, lapack_complex_float* vr,
00664                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
00665                            float* scale, float* abnrm, float* rconde,
00666                            float* rcondv );
00667 lapack_int LAPACKE_zgeevx( int matrix_order, char balanc, char jobvl,
00668                            char jobvr, char sense, lapack_int n,
00669                            lapack_complex_double* a, lapack_int lda,
00670                            lapack_complex_double* w, lapack_complex_double* vl,
00671                            lapack_int ldvl, lapack_complex_double* vr,
00672                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
00673                            double* scale, double* abnrm, double* rconde,
00674                            double* rcondv );
00675 
00676 lapack_int LAPACKE_sgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00677                            lapack_int ihi, float* a, lapack_int lda,
00678                            float* tau );
00679 lapack_int LAPACKE_dgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00680                            lapack_int ihi, double* a, lapack_int lda,
00681                            double* tau );
00682 lapack_int LAPACKE_cgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00683                            lapack_int ihi, lapack_complex_float* a,
00684                            lapack_int lda, lapack_complex_float* tau );
00685 lapack_int LAPACKE_zgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00686                            lapack_int ihi, lapack_complex_double* a,
00687                            lapack_int lda, lapack_complex_double* tau );
00688 
00689 lapack_int LAPACKE_sgejsv( int matrix_order, char joba, char jobu, char jobv,
00690                            char jobr, char jobt, char jobp, lapack_int m,
00691                            lapack_int n, float* a, lapack_int lda, float* sva,
00692                            float* u, lapack_int ldu, float* v, lapack_int ldv,
00693                            float* stat, lapack_int* istat );
00694 lapack_int LAPACKE_dgejsv( int matrix_order, char joba, char jobu, char jobv,
00695                            char jobr, char jobt, char jobp, lapack_int m,
00696                            lapack_int n, double* a, lapack_int lda, double* sva,
00697                            double* u, lapack_int ldu, double* v, lapack_int ldv,
00698                            double* stat, lapack_int* istat );
00699 
00700 lapack_int LAPACKE_sgelqf( int matrix_order, lapack_int m, lapack_int n,
00701                            float* a, lapack_int lda, float* tau );
00702 lapack_int LAPACKE_dgelqf( int matrix_order, lapack_int m, lapack_int n,
00703                            double* a, lapack_int lda, double* tau );
00704 lapack_int LAPACKE_cgelqf( int matrix_order, lapack_int m, lapack_int n,
00705                            lapack_complex_float* a, lapack_int lda,
00706                            lapack_complex_float* tau );
00707 lapack_int LAPACKE_zgelqf( int matrix_order, lapack_int m, lapack_int n,
00708                            lapack_complex_double* a, lapack_int lda,
00709                            lapack_complex_double* tau );
00710 
00711 lapack_int LAPACKE_sgels( int matrix_order, char trans, lapack_int m,
00712                           lapack_int n, lapack_int nrhs, float* a,
00713                           lapack_int lda, float* b, lapack_int ldb );
00714 lapack_int LAPACKE_dgels( int matrix_order, char trans, lapack_int m,
00715                           lapack_int n, lapack_int nrhs, double* a,
00716                           lapack_int lda, double* b, lapack_int ldb );
00717 lapack_int LAPACKE_cgels( int matrix_order, char trans, lapack_int m,
00718                           lapack_int n, lapack_int nrhs,
00719                           lapack_complex_float* a, lapack_int lda,
00720                           lapack_complex_float* b, lapack_int ldb );
00721 lapack_int LAPACKE_zgels( int matrix_order, char trans, lapack_int m,
00722                           lapack_int n, lapack_int nrhs,
00723                           lapack_complex_double* a, lapack_int lda,
00724                           lapack_complex_double* b, lapack_int ldb );
00725 
00726 lapack_int LAPACKE_sgelsd( int matrix_order, lapack_int m, lapack_int n,
00727                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00728                            lapack_int ldb, float* s, float rcond,
00729                            lapack_int* rank );
00730 lapack_int LAPACKE_dgelsd( int matrix_order, lapack_int m, lapack_int n,
00731                            lapack_int nrhs, double* a, lapack_int lda,
00732                            double* b, lapack_int ldb, double* s, double rcond,
00733                            lapack_int* rank );
00734 lapack_int LAPACKE_cgelsd( int matrix_order, lapack_int m, lapack_int n,
00735                            lapack_int nrhs, lapack_complex_float* a,
00736                            lapack_int lda, lapack_complex_float* b,
00737                            lapack_int ldb, float* s, float rcond,
00738                            lapack_int* rank );
00739 lapack_int LAPACKE_zgelsd( int matrix_order, lapack_int m, lapack_int n,
00740                            lapack_int nrhs, lapack_complex_double* a,
00741                            lapack_int lda, lapack_complex_double* b,
00742                            lapack_int ldb, double* s, double rcond,
00743                            lapack_int* rank );
00744 
00745 lapack_int LAPACKE_sgelss( int matrix_order, lapack_int m, lapack_int n,
00746                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00747                            lapack_int ldb, float* s, float rcond,
00748                            lapack_int* rank );
00749 lapack_int LAPACKE_dgelss( int matrix_order, lapack_int m, lapack_int n,
00750                            lapack_int nrhs, double* a, lapack_int lda,
00751                            double* b, lapack_int ldb, double* s, double rcond,
00752                            lapack_int* rank );
00753 lapack_int LAPACKE_cgelss( int matrix_order, lapack_int m, lapack_int n,
00754                            lapack_int nrhs, lapack_complex_float* a,
00755                            lapack_int lda, lapack_complex_float* b,
00756                            lapack_int ldb, float* s, float rcond,
00757                            lapack_int* rank );
00758 lapack_int LAPACKE_zgelss( int matrix_order, lapack_int m, lapack_int n,
00759                            lapack_int nrhs, lapack_complex_double* a,
00760                            lapack_int lda, lapack_complex_double* b,
00761                            lapack_int ldb, double* s, double rcond,
00762                            lapack_int* rank );
00763 
00764 lapack_int LAPACKE_sgelsy( int matrix_order, lapack_int m, lapack_int n,
00765                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00766                            lapack_int ldb, lapack_int* jpvt, float rcond,
00767                            lapack_int* rank );
00768 lapack_int LAPACKE_dgelsy( int matrix_order, lapack_int m, lapack_int n,
00769                            lapack_int nrhs, double* a, lapack_int lda,
00770                            double* b, lapack_int ldb, lapack_int* jpvt,
00771                            double rcond, lapack_int* rank );
00772 lapack_int LAPACKE_cgelsy( int matrix_order, lapack_int m, lapack_int n,
00773                            lapack_int nrhs, lapack_complex_float* a,
00774                            lapack_int lda, lapack_complex_float* b,
00775                            lapack_int ldb, lapack_int* jpvt, float rcond,
00776                            lapack_int* rank );
00777 lapack_int LAPACKE_zgelsy( int matrix_order, lapack_int m, lapack_int n,
00778                            lapack_int nrhs, lapack_complex_double* a,
00779                            lapack_int lda, lapack_complex_double* b,
00780                            lapack_int ldb, lapack_int* jpvt, double rcond,
00781                            lapack_int* rank );
00782 
00783 lapack_int LAPACKE_sgeqlf( int matrix_order, lapack_int m, lapack_int n,
00784                            float* a, lapack_int lda, float* tau );
00785 lapack_int LAPACKE_dgeqlf( int matrix_order, lapack_int m, lapack_int n,
00786                            double* a, lapack_int lda, double* tau );
00787 lapack_int LAPACKE_cgeqlf( int matrix_order, lapack_int m, lapack_int n,
00788                            lapack_complex_float* a, lapack_int lda,
00789                            lapack_complex_float* tau );
00790 lapack_int LAPACKE_zgeqlf( int matrix_order, lapack_int m, lapack_int n,
00791                            lapack_complex_double* a, lapack_int lda,
00792                            lapack_complex_double* tau );
00793 
00794 lapack_int LAPACKE_sgeqp3( int matrix_order, lapack_int m, lapack_int n,
00795                            float* a, lapack_int lda, lapack_int* jpvt,
00796                            float* tau );
00797 lapack_int LAPACKE_dgeqp3( int matrix_order, lapack_int m, lapack_int n,
00798                            double* a, lapack_int lda, lapack_int* jpvt,
00799                            double* tau );
00800 lapack_int LAPACKE_cgeqp3( int matrix_order, lapack_int m, lapack_int n,
00801                            lapack_complex_float* a, lapack_int lda,
00802                            lapack_int* jpvt, lapack_complex_float* tau );
00803 lapack_int LAPACKE_zgeqp3( int matrix_order, lapack_int m, lapack_int n,
00804                            lapack_complex_double* a, lapack_int lda,
00805                            lapack_int* jpvt, lapack_complex_double* tau );
00806 
00807 lapack_int LAPACKE_sgeqpf( int matrix_order, lapack_int m, lapack_int n,
00808                            float* a, lapack_int lda, lapack_int* jpvt,
00809                            float* tau );
00810 lapack_int LAPACKE_dgeqpf( int matrix_order, lapack_int m, lapack_int n,
00811                            double* a, lapack_int lda, lapack_int* jpvt,
00812                            double* tau );
00813 lapack_int LAPACKE_cgeqpf( int matrix_order, lapack_int m, lapack_int n,
00814                            lapack_complex_float* a, lapack_int lda,
00815                            lapack_int* jpvt, lapack_complex_float* tau );
00816 lapack_int LAPACKE_zgeqpf( int matrix_order, lapack_int m, lapack_int n,
00817                            lapack_complex_double* a, lapack_int lda,
00818                            lapack_int* jpvt, lapack_complex_double* tau );
00819 
00820 lapack_int LAPACKE_sgeqrf( int matrix_order, lapack_int m, lapack_int n,
00821                            float* a, lapack_int lda, float* tau );
00822 lapack_int LAPACKE_dgeqrf( int matrix_order, lapack_int m, lapack_int n,
00823                            double* a, lapack_int lda, double* tau );
00824 lapack_int LAPACKE_cgeqrf( int matrix_order, lapack_int m, lapack_int n,
00825                            lapack_complex_float* a, lapack_int lda,
00826                            lapack_complex_float* tau );
00827 lapack_int LAPACKE_zgeqrf( int matrix_order, lapack_int m, lapack_int n,
00828                            lapack_complex_double* a, lapack_int lda,
00829                            lapack_complex_double* tau );
00830 
00831 lapack_int LAPACKE_sgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00832                             float* a, lapack_int lda, float* tau );
00833 lapack_int LAPACKE_dgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00834                             double* a, lapack_int lda, double* tau );
00835 lapack_int LAPACKE_cgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00836                             lapack_complex_float* a, lapack_int lda,
00837                             lapack_complex_float* tau );
00838 lapack_int LAPACKE_zgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00839                             lapack_complex_double* a, lapack_int lda,
00840                             lapack_complex_double* tau );
00841 
00842 lapack_int LAPACKE_sgerfs( int matrix_order, char trans, lapack_int n,
00843                            lapack_int nrhs, const float* a, lapack_int lda,
00844                            const float* af, lapack_int ldaf,
00845                            const lapack_int* ipiv, const float* b,
00846                            lapack_int ldb, float* x, lapack_int ldx,
00847                            float* ferr, float* berr );
00848 lapack_int LAPACKE_dgerfs( int matrix_order, char trans, lapack_int n,
00849                            lapack_int nrhs, const double* a, lapack_int lda,
00850                            const double* af, lapack_int ldaf,
00851                            const lapack_int* ipiv, const double* b,
00852                            lapack_int ldb, double* x, lapack_int ldx,
00853                            double* ferr, double* berr );
00854 lapack_int LAPACKE_cgerfs( int matrix_order, char trans, lapack_int n,
00855                            lapack_int nrhs, const lapack_complex_float* a,
00856                            lapack_int lda, const lapack_complex_float* af,
00857                            lapack_int ldaf, const lapack_int* ipiv,
00858                            const lapack_complex_float* b, lapack_int ldb,
00859                            lapack_complex_float* x, lapack_int ldx, float* ferr,
00860                            float* berr );
00861 lapack_int LAPACKE_zgerfs( int matrix_order, char trans, lapack_int n,
00862                            lapack_int nrhs, const lapack_complex_double* a,
00863                            lapack_int lda, const lapack_complex_double* af,
00864                            lapack_int ldaf, const lapack_int* ipiv,
00865                            const lapack_complex_double* b, lapack_int ldb,
00866                            lapack_complex_double* x, lapack_int ldx,
00867                            double* ferr, double* berr );
00868 
00869 lapack_int LAPACKE_sgerfsx( int matrix_order, char trans, char equed,
00870                             lapack_int n, lapack_int nrhs, const float* a,
00871                             lapack_int lda, const float* af, lapack_int ldaf,
00872                             const lapack_int* ipiv, const float* r,
00873                             const float* c, const float* b, lapack_int ldb,
00874                             float* x, lapack_int ldx, float* rcond, float* berr,
00875                             lapack_int n_err_bnds, float* err_bnds_norm,
00876                             float* err_bnds_comp, lapack_int nparams,
00877                             float* params );
00878 lapack_int LAPACKE_dgerfsx( int matrix_order, char trans, char equed,
00879                             lapack_int n, lapack_int nrhs, const double* a,
00880                             lapack_int lda, const double* af, lapack_int ldaf,
00881                             const lapack_int* ipiv, const double* r,
00882                             const double* c, const double* b, lapack_int ldb,
00883                             double* x, lapack_int ldx, double* rcond,
00884                             double* berr, lapack_int n_err_bnds,
00885                             double* err_bnds_norm, double* err_bnds_comp,
00886                             lapack_int nparams, double* params );
00887 lapack_int LAPACKE_cgerfsx( int matrix_order, char trans, char equed,
00888                             lapack_int n, lapack_int nrhs,
00889                             const lapack_complex_float* a, lapack_int lda,
00890                             const lapack_complex_float* af, lapack_int ldaf,
00891                             const lapack_int* ipiv, const float* r,
00892                             const float* c, const lapack_complex_float* b,
00893                             lapack_int ldb, lapack_complex_float* x,
00894                             lapack_int ldx, float* rcond, float* berr,
00895                             lapack_int n_err_bnds, float* err_bnds_norm,
00896                             float* err_bnds_comp, lapack_int nparams,
00897                             float* params );
00898 lapack_int LAPACKE_zgerfsx( int matrix_order, char trans, char equed,
00899                             lapack_int n, lapack_int nrhs,
00900                             const lapack_complex_double* a, lapack_int lda,
00901                             const lapack_complex_double* af, lapack_int ldaf,
00902                             const lapack_int* ipiv, const double* r,
00903                             const double* c, const lapack_complex_double* b,
00904                             lapack_int ldb, lapack_complex_double* x,
00905                             lapack_int ldx, double* rcond, double* berr,
00906                             lapack_int n_err_bnds, double* err_bnds_norm,
00907                             double* err_bnds_comp, lapack_int nparams,
00908                             double* params );
00909 
00910 lapack_int LAPACKE_sgerqf( int matrix_order, lapack_int m, lapack_int n,
00911                            float* a, lapack_int lda, float* tau );
00912 lapack_int LAPACKE_dgerqf( int matrix_order, lapack_int m, lapack_int n,
00913                            double* a, lapack_int lda, double* tau );
00914 lapack_int LAPACKE_cgerqf( int matrix_order, lapack_int m, lapack_int n,
00915                            lapack_complex_float* a, lapack_int lda,
00916                            lapack_complex_float* tau );
00917 lapack_int LAPACKE_zgerqf( int matrix_order, lapack_int m, lapack_int n,
00918                            lapack_complex_double* a, lapack_int lda,
00919                            lapack_complex_double* tau );
00920 
00921 lapack_int LAPACKE_sgesdd( int matrix_order, char jobz, lapack_int m,
00922                            lapack_int n, float* a, lapack_int lda, float* s,
00923                            float* u, lapack_int ldu, float* vt,
00924                            lapack_int ldvt );
00925 lapack_int LAPACKE_dgesdd( int matrix_order, char jobz, lapack_int m,
00926                            lapack_int n, double* a, lapack_int lda, double* s,
00927                            double* u, lapack_int ldu, double* vt,
00928                            lapack_int ldvt );
00929 lapack_int LAPACKE_cgesdd( int matrix_order, char jobz, lapack_int m,
00930                            lapack_int n, lapack_complex_float* a,
00931                            lapack_int lda, float* s, lapack_complex_float* u,
00932                            lapack_int ldu, lapack_complex_float* vt,
00933                            lapack_int ldvt );
00934 lapack_int LAPACKE_zgesdd( int matrix_order, char jobz, lapack_int m,
00935                            lapack_int n, lapack_complex_double* a,
00936                            lapack_int lda, double* s, lapack_complex_double* u,
00937                            lapack_int ldu, lapack_complex_double* vt,
00938                            lapack_int ldvt );
00939 
00940 lapack_int LAPACKE_sgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00941                           float* a, lapack_int lda, lapack_int* ipiv, float* b,
00942                           lapack_int ldb );
00943 lapack_int LAPACKE_dgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00944                           double* a, lapack_int lda, lapack_int* ipiv,
00945                           double* b, lapack_int ldb );
00946 lapack_int LAPACKE_cgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00947                           lapack_complex_float* a, lapack_int lda,
00948                           lapack_int* ipiv, lapack_complex_float* b,
00949                           lapack_int ldb );
00950 lapack_int LAPACKE_zgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00951                           lapack_complex_double* a, lapack_int lda,
00952                           lapack_int* ipiv, lapack_complex_double* b,
00953                           lapack_int ldb );
00954 lapack_int LAPACKE_dsgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00955                            double* a, lapack_int lda, lapack_int* ipiv,
00956                            double* b, lapack_int ldb, double* x, lapack_int ldx,
00957                            lapack_int* iter );
00958 lapack_int LAPACKE_zcgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00959                            lapack_complex_double* a, lapack_int lda,
00960                            lapack_int* ipiv, lapack_complex_double* b,
00961                            lapack_int ldb, lapack_complex_double* x,
00962                            lapack_int ldx, lapack_int* iter );
00963 
00964 lapack_int LAPACKE_sgesvd( int matrix_order, char jobu, char jobvt,
00965                            lapack_int m, lapack_int n, float* a, lapack_int lda,
00966                            float* s, float* u, lapack_int ldu, float* vt,
00967                            lapack_int ldvt, float* superb );
00968 lapack_int LAPACKE_dgesvd( int matrix_order, char jobu, char jobvt,
00969                            lapack_int m, lapack_int n, double* a,
00970                            lapack_int lda, double* s, double* u, lapack_int ldu,
00971                            double* vt, lapack_int ldvt, double* superb );
00972 lapack_int LAPACKE_cgesvd( int matrix_order, char jobu, char jobvt,
00973                            lapack_int m, lapack_int n, lapack_complex_float* a,
00974                            lapack_int lda, float* s, lapack_complex_float* u,
00975                            lapack_int ldu, lapack_complex_float* vt,
00976                            lapack_int ldvt, float* superb );
00977 lapack_int LAPACKE_zgesvd( int matrix_order, char jobu, char jobvt,
00978                            lapack_int m, lapack_int n, lapack_complex_double* a,
00979                            lapack_int lda, double* s, lapack_complex_double* u,
00980                            lapack_int ldu, lapack_complex_double* vt,
00981                            lapack_int ldvt, double* superb );
00982 
00983 lapack_int LAPACKE_sgesvj( int matrix_order, char joba, char jobu, char jobv,
00984                            lapack_int m, lapack_int n, float* a, lapack_int lda,
00985                            float* sva, lapack_int mv, float* v, lapack_int ldv,
00986                            float* stat );
00987 lapack_int LAPACKE_dgesvj( int matrix_order, char joba, char jobu, char jobv,
00988                            lapack_int m, lapack_int n, double* a,
00989                            lapack_int lda, double* sva, lapack_int mv,
00990                            double* v, lapack_int ldv, double* stat );
00991 
00992 lapack_int LAPACKE_sgesvx( int matrix_order, char fact, char trans,
00993                            lapack_int n, lapack_int nrhs, float* a,
00994                            lapack_int lda, float* af, lapack_int ldaf,
00995                            lapack_int* ipiv, char* equed, float* r, float* c,
00996                            float* b, lapack_int ldb, float* x, lapack_int ldx,
00997                            float* rcond, float* ferr, float* berr,
00998                            float* rpivot );
00999 lapack_int LAPACKE_dgesvx( int matrix_order, char fact, char trans,
01000                            lapack_int n, lapack_int nrhs, double* a,
01001                            lapack_int lda, double* af, lapack_int ldaf,
01002                            lapack_int* ipiv, char* equed, double* r, double* c,
01003                            double* b, lapack_int ldb, double* x, lapack_int ldx,
01004                            double* rcond, double* ferr, double* berr,
01005                            double* rpivot );
01006 lapack_int LAPACKE_cgesvx( int matrix_order, char fact, char trans,
01007                            lapack_int n, lapack_int nrhs,
01008                            lapack_complex_float* a, lapack_int lda,
01009                            lapack_complex_float* af, lapack_int ldaf,
01010                            lapack_int* ipiv, char* equed, float* r, float* c,
01011                            lapack_complex_float* b, lapack_int ldb,
01012                            lapack_complex_float* x, lapack_int ldx,
01013                            float* rcond, float* ferr, float* berr,
01014                            float* rpivot );
01015 lapack_int LAPACKE_zgesvx( int matrix_order, char fact, char trans,
01016                            lapack_int n, lapack_int nrhs,
01017                            lapack_complex_double* a, lapack_int lda,
01018                            lapack_complex_double* af, lapack_int ldaf,
01019                            lapack_int* ipiv, char* equed, double* r, double* c,
01020                            lapack_complex_double* b, lapack_int ldb,
01021                            lapack_complex_double* x, lapack_int ldx,
01022                            double* rcond, double* ferr, double* berr,
01023                            double* rpivot );
01024 
01025 lapack_int LAPACKE_sgesvxx( int matrix_order, char fact, char trans,
01026                             lapack_int n, lapack_int nrhs, float* a,
01027                             lapack_int lda, float* af, lapack_int ldaf,
01028                             lapack_int* ipiv, char* equed, float* r, float* c,
01029                             float* b, lapack_int ldb, float* x, lapack_int ldx,
01030                             float* rcond, float* rpvgrw, float* berr,
01031                             lapack_int n_err_bnds, float* err_bnds_norm,
01032                             float* err_bnds_comp, lapack_int nparams,
01033                             float* params );
01034 lapack_int LAPACKE_dgesvxx( int matrix_order, char fact, char trans,
01035                             lapack_int n, lapack_int nrhs, double* a,
01036                             lapack_int lda, double* af, lapack_int ldaf,
01037                             lapack_int* ipiv, char* equed, double* r, double* c,
01038                             double* b, lapack_int ldb, double* x,
01039                             lapack_int ldx, double* rcond, double* rpvgrw,
01040                             double* berr, lapack_int n_err_bnds,
01041                             double* err_bnds_norm, double* err_bnds_comp,
01042                             lapack_int nparams, double* params );
01043 lapack_int LAPACKE_cgesvxx( int matrix_order, char fact, char trans,
01044                             lapack_int n, lapack_int nrhs,
01045                             lapack_complex_float* a, lapack_int lda,
01046                             lapack_complex_float* af, lapack_int ldaf,
01047                             lapack_int* ipiv, char* equed, float* r, float* c,
01048                             lapack_complex_float* b, lapack_int ldb,
01049                             lapack_complex_float* x, lapack_int ldx,
01050                             float* rcond, float* rpvgrw, float* berr,
01051                             lapack_int n_err_bnds, float* err_bnds_norm,
01052                             float* err_bnds_comp, lapack_int nparams,
01053                             float* params );
01054 lapack_int LAPACKE_zgesvxx( int matrix_order, char fact, char trans,
01055                             lapack_int n, lapack_int nrhs,
01056                             lapack_complex_double* a, lapack_int lda,
01057                             lapack_complex_double* af, lapack_int ldaf,
01058                             lapack_int* ipiv, char* equed, double* r, double* c,
01059                             lapack_complex_double* b, lapack_int ldb,
01060                             lapack_complex_double* x, lapack_int ldx,
01061                             double* rcond, double* rpvgrw, double* berr,
01062                             lapack_int n_err_bnds, double* err_bnds_norm,
01063                             double* err_bnds_comp, lapack_int nparams,
01064                             double* params );
01065 
01066 lapack_int LAPACKE_sgetrf( int matrix_order, lapack_int m, lapack_int n,
01067                            float* a, lapack_int lda, lapack_int* ipiv );
01068 lapack_int LAPACKE_dgetrf( int matrix_order, lapack_int m, lapack_int n,
01069                            double* a, lapack_int lda, lapack_int* ipiv );
01070 lapack_int LAPACKE_cgetrf( int matrix_order, lapack_int m, lapack_int n,
01071                            lapack_complex_float* a, lapack_int lda,
01072                            lapack_int* ipiv );
01073 lapack_int LAPACKE_zgetrf( int matrix_order, lapack_int m, lapack_int n,
01074                            lapack_complex_double* a, lapack_int lda,
01075                            lapack_int* ipiv );
01076 
01077 lapack_int LAPACKE_sgetri( int matrix_order, lapack_int n, float* a,
01078                            lapack_int lda, const lapack_int* ipiv );
01079 lapack_int LAPACKE_dgetri( int matrix_order, lapack_int n, double* a,
01080                            lapack_int lda, const lapack_int* ipiv );
01081 lapack_int LAPACKE_cgetri( int matrix_order, lapack_int n,
01082                            lapack_complex_float* a, lapack_int lda,
01083                            const lapack_int* ipiv );
01084 lapack_int LAPACKE_zgetri( int matrix_order, lapack_int n,
01085                            lapack_complex_double* a, lapack_int lda,
01086                            const lapack_int* ipiv );
01087 
01088 lapack_int LAPACKE_sgetrs( int matrix_order, char trans, lapack_int n,
01089                            lapack_int nrhs, const float* a, lapack_int lda,
01090                            const lapack_int* ipiv, float* b, lapack_int ldb );
01091 lapack_int LAPACKE_dgetrs( int matrix_order, char trans, lapack_int n,
01092                            lapack_int nrhs, const double* a, lapack_int lda,
01093                            const lapack_int* ipiv, double* b, lapack_int ldb );
01094 lapack_int LAPACKE_cgetrs( int matrix_order, char trans, lapack_int n,
01095                            lapack_int nrhs, const lapack_complex_float* a,
01096                            lapack_int lda, const lapack_int* ipiv,
01097                            lapack_complex_float* b, lapack_int ldb );
01098 lapack_int LAPACKE_zgetrs( int matrix_order, char trans, lapack_int n,
01099                            lapack_int nrhs, const lapack_complex_double* a,
01100                            lapack_int lda, const lapack_int* ipiv,
01101                            lapack_complex_double* b, lapack_int ldb );
01102 
01103 lapack_int LAPACKE_sggbak( int matrix_order, char job, char side, lapack_int n,
01104                            lapack_int ilo, lapack_int ihi, const float* lscale,
01105                            const float* rscale, lapack_int m, float* v,
01106                            lapack_int ldv );
01107 lapack_int LAPACKE_dggbak( int matrix_order, char job, char side, lapack_int n,
01108                            lapack_int ilo, lapack_int ihi, const double* lscale,
01109                            const double* rscale, lapack_int m, double* v,
01110                            lapack_int ldv );
01111 lapack_int LAPACKE_cggbak( int matrix_order, char job, char side, lapack_int n,
01112                            lapack_int ilo, lapack_int ihi, const float* lscale,
01113                            const float* rscale, lapack_int m,
01114                            lapack_complex_float* v, lapack_int ldv );
01115 lapack_int LAPACKE_zggbak( int matrix_order, char job, char side, lapack_int n,
01116                            lapack_int ilo, lapack_int ihi, const double* lscale,
01117                            const double* rscale, lapack_int m,
01118                            lapack_complex_double* v, lapack_int ldv );
01119 
01120 lapack_int LAPACKE_sggbal( int matrix_order, char job, lapack_int n, float* a,
01121                            lapack_int lda, float* b, lapack_int ldb,
01122                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01123                            float* rscale );
01124 lapack_int LAPACKE_dggbal( int matrix_order, char job, lapack_int n, double* a,
01125                            lapack_int lda, double* b, lapack_int ldb,
01126                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01127                            double* rscale );
01128 lapack_int LAPACKE_cggbal( int matrix_order, char job, lapack_int n,
01129                            lapack_complex_float* a, lapack_int lda,
01130                            lapack_complex_float* b, lapack_int ldb,
01131                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01132                            float* rscale );
01133 lapack_int LAPACKE_zggbal( int matrix_order, char job, lapack_int n,
01134                            lapack_complex_double* a, lapack_int lda,
01135                            lapack_complex_double* b, lapack_int ldb,
01136                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01137                            double* rscale );
01138 
01139 lapack_int LAPACKE_sgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01140                           LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
01141                           lapack_int lda, float* b, lapack_int ldb,
01142                           lapack_int* sdim, float* alphar, float* alphai,
01143                           float* beta, float* vsl, lapack_int ldvsl, float* vsr,
01144                           lapack_int ldvsr );
01145 lapack_int LAPACKE_dgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01146                           LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
01147                           lapack_int lda, double* b, lapack_int ldb,
01148                           lapack_int* sdim, double* alphar, double* alphai,
01149                           double* beta, double* vsl, lapack_int ldvsl,
01150                           double* vsr, lapack_int ldvsr );
01151 lapack_int LAPACKE_cgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01152                           LAPACK_C_SELECT2 selctg, lapack_int n,
01153                           lapack_complex_float* a, lapack_int lda,
01154                           lapack_complex_float* b, lapack_int ldb,
01155                           lapack_int* sdim, lapack_complex_float* alpha,
01156                           lapack_complex_float* beta, lapack_complex_float* vsl,
01157                           lapack_int ldvsl, lapack_complex_float* vsr,
01158                           lapack_int ldvsr );
01159 lapack_int LAPACKE_zgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01160                           LAPACK_Z_SELECT2 selctg, lapack_int n,
01161                           lapack_complex_double* a, lapack_int lda,
01162                           lapack_complex_double* b, lapack_int ldb,
01163                           lapack_int* sdim, lapack_complex_double* alpha,
01164                           lapack_complex_double* beta,
01165                           lapack_complex_double* vsl, lapack_int ldvsl,
01166                           lapack_complex_double* vsr, lapack_int ldvsr );
01167 
01168 lapack_int LAPACKE_sggesx( int matrix_order, char jobvsl, char jobvsr,
01169                            char sort, LAPACK_S_SELECT3 selctg, char sense,
01170                            lapack_int n, float* a, lapack_int lda, float* b,
01171                            lapack_int ldb, lapack_int* sdim, float* alphar,
01172                            float* alphai, float* beta, float* vsl,
01173                            lapack_int ldvsl, float* vsr, lapack_int ldvsr,
01174                            float* rconde, float* rcondv );
01175 lapack_int LAPACKE_dggesx( int matrix_order, char jobvsl, char jobvsr,
01176                            char sort, LAPACK_D_SELECT3 selctg, char sense,
01177                            lapack_int n, double* a, lapack_int lda, double* b,
01178                            lapack_int ldb, lapack_int* sdim, double* alphar,
01179                            double* alphai, double* beta, double* vsl,
01180                            lapack_int ldvsl, double* vsr, lapack_int ldvsr,
01181                            double* rconde, double* rcondv );
01182 lapack_int LAPACKE_cggesx( int matrix_order, char jobvsl, char jobvsr,
01183                            char sort, LAPACK_C_SELECT2 selctg, char sense,
01184                            lapack_int n, lapack_complex_float* a,
01185                            lapack_int lda, lapack_complex_float* b,
01186                            lapack_int ldb, lapack_int* sdim,
01187                            lapack_complex_float* alpha,
01188                            lapack_complex_float* beta,
01189                            lapack_complex_float* vsl, lapack_int ldvsl,
01190                            lapack_complex_float* vsr, lapack_int ldvsr,
01191                            float* rconde, float* rcondv );
01192 lapack_int LAPACKE_zggesx( int matrix_order, char jobvsl, char jobvsr,
01193                            char sort, LAPACK_Z_SELECT2 selctg, char sense,
01194                            lapack_int n, lapack_complex_double* a,
01195                            lapack_int lda, lapack_complex_double* b,
01196                            lapack_int ldb, lapack_int* sdim,
01197                            lapack_complex_double* alpha,
01198                            lapack_complex_double* beta,
01199                            lapack_complex_double* vsl, lapack_int ldvsl,
01200                            lapack_complex_double* vsr, lapack_int ldvsr,
01201                            double* rconde, double* rcondv );
01202 
01203 lapack_int LAPACKE_sggev( int matrix_order, char jobvl, char jobvr,
01204                           lapack_int n, float* a, lapack_int lda, float* b,
01205                           lapack_int ldb, float* alphar, float* alphai,
01206                           float* beta, float* vl, lapack_int ldvl, float* vr,
01207                           lapack_int ldvr );
01208 lapack_int LAPACKE_dggev( int matrix_order, char jobvl, char jobvr,
01209                           lapack_int n, double* a, lapack_int lda, double* b,
01210                           lapack_int ldb, double* alphar, double* alphai,
01211                           double* beta, double* vl, lapack_int ldvl, double* vr,
01212                           lapack_int ldvr );
01213 lapack_int LAPACKE_cggev( int matrix_order, char jobvl, char jobvr,
01214                           lapack_int n, lapack_complex_float* a, lapack_int lda,
01215                           lapack_complex_float* b, lapack_int ldb,
01216                           lapack_complex_float* alpha,
01217                           lapack_complex_float* beta, lapack_complex_float* vl,
01218                           lapack_int ldvl, lapack_complex_float* vr,
01219                           lapack_int ldvr );
01220 lapack_int LAPACKE_zggev( int matrix_order, char jobvl, char jobvr,
01221                           lapack_int n, lapack_complex_double* a,
01222                           lapack_int lda, lapack_complex_double* b,
01223                           lapack_int ldb, lapack_complex_double* alpha,
01224                           lapack_complex_double* beta,
01225                           lapack_complex_double* vl, lapack_int ldvl,
01226                           lapack_complex_double* vr, lapack_int ldvr );
01227 
01228 lapack_int LAPACKE_sggevx( int matrix_order, char balanc, char jobvl,
01229                            char jobvr, char sense, lapack_int n, float* a,
01230                            lapack_int lda, float* b, lapack_int ldb,
01231                            float* alphar, float* alphai, float* beta, float* vl,
01232                            lapack_int ldvl, float* vr, lapack_int ldvr,
01233                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01234                            float* rscale, float* abnrm, float* bbnrm,
01235                            float* rconde, float* rcondv );
01236 lapack_int LAPACKE_dggevx( int matrix_order, char balanc, char jobvl,
01237                            char jobvr, char sense, lapack_int n, double* a,
01238                            lapack_int lda, double* b, lapack_int ldb,
01239                            double* alphar, double* alphai, double* beta,
01240                            double* vl, lapack_int ldvl, double* vr,
01241                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
01242                            double* lscale, double* rscale, double* abnrm,
01243                            double* bbnrm, double* rconde, double* rcondv );
01244 lapack_int LAPACKE_cggevx( int matrix_order, char balanc, char jobvl,
01245                            char jobvr, char sense, lapack_int n,
01246                            lapack_complex_float* a, lapack_int lda,
01247                            lapack_complex_float* b, lapack_int ldb,
01248                            lapack_complex_float* alpha,
01249                            lapack_complex_float* beta, lapack_complex_float* vl,
01250                            lapack_int ldvl, lapack_complex_float* vr,
01251                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
01252                            float* lscale, float* rscale, float* abnrm,
01253                            float* bbnrm, float* rconde, float* rcondv );
01254 lapack_int LAPACKE_zggevx( int matrix_order, char balanc, char jobvl,
01255                            char jobvr, char sense, lapack_int n,
01256                            lapack_complex_double* a, lapack_int lda,
01257                            lapack_complex_double* b, lapack_int ldb,
01258                            lapack_complex_double* alpha,
01259                            lapack_complex_double* beta,
01260                            lapack_complex_double* vl, lapack_int ldvl,
01261                            lapack_complex_double* vr, lapack_int ldvr,
01262                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01263                            double* rscale, double* abnrm, double* bbnrm,
01264                            double* rconde, double* rcondv );
01265 
01266 lapack_int LAPACKE_sggglm( int matrix_order, lapack_int n, lapack_int m,
01267                            lapack_int p, float* a, lapack_int lda, float* b,
01268                            lapack_int ldb, float* d, float* x, float* y );
01269 lapack_int LAPACKE_dggglm( int matrix_order, lapack_int n, lapack_int m,
01270                            lapack_int p, double* a, lapack_int lda, double* b,
01271                            lapack_int ldb, double* d, double* x, double* y );
01272 lapack_int LAPACKE_cggglm( int matrix_order, lapack_int n, lapack_int m,
01273                            lapack_int p, lapack_complex_float* a,
01274                            lapack_int lda, lapack_complex_float* b,
01275                            lapack_int ldb, lapack_complex_float* d,
01276                            lapack_complex_float* x, lapack_complex_float* y );
01277 lapack_int LAPACKE_zggglm( int matrix_order, lapack_int n, lapack_int m,
01278                            lapack_int p, lapack_complex_double* a,
01279                            lapack_int lda, lapack_complex_double* b,
01280                            lapack_int ldb, lapack_complex_double* d,
01281                            lapack_complex_double* x, lapack_complex_double* y );
01282 
01283 lapack_int LAPACKE_sgghrd( int matrix_order, char compq, char compz,
01284                            lapack_int n, lapack_int ilo, lapack_int ihi,
01285                            float* a, lapack_int lda, float* b, lapack_int ldb,
01286                            float* q, lapack_int ldq, float* z, lapack_int ldz );
01287 lapack_int LAPACKE_dgghrd( int matrix_order, char compq, char compz,
01288                            lapack_int n, lapack_int ilo, lapack_int ihi,
01289                            double* a, lapack_int lda, double* b, lapack_int ldb,
01290                            double* q, lapack_int ldq, double* z,
01291                            lapack_int ldz );
01292 lapack_int LAPACKE_cgghrd( int matrix_order, char compq, char compz,
01293                            lapack_int n, lapack_int ilo, lapack_int ihi,
01294                            lapack_complex_float* a, lapack_int lda,
01295                            lapack_complex_float* b, lapack_int ldb,
01296                            lapack_complex_float* q, lapack_int ldq,
01297                            lapack_complex_float* z, lapack_int ldz );
01298 lapack_int LAPACKE_zgghrd( int matrix_order, char compq, char compz,
01299                            lapack_int n, lapack_int ilo, lapack_int ihi,
01300                            lapack_complex_double* a, lapack_int lda,
01301                            lapack_complex_double* b, lapack_int ldb,
01302                            lapack_complex_double* q, lapack_int ldq,
01303                            lapack_complex_double* z, lapack_int ldz );
01304 
01305 lapack_int LAPACKE_sgglse( int matrix_order, lapack_int m, lapack_int n,
01306                            lapack_int p, float* a, lapack_int lda, float* b,
01307                            lapack_int ldb, float* c, float* d, float* x );
01308 lapack_int LAPACKE_dgglse( int matrix_order, lapack_int m, lapack_int n,
01309                            lapack_int p, double* a, lapack_int lda, double* b,
01310                            lapack_int ldb, double* c, double* d, double* x );
01311 lapack_int LAPACKE_cgglse( int matrix_order, lapack_int m, lapack_int n,
01312                            lapack_int p, lapack_complex_float* a,
01313                            lapack_int lda, lapack_complex_float* b,
01314                            lapack_int ldb, lapack_complex_float* c,
01315                            lapack_complex_float* d, lapack_complex_float* x );
01316 lapack_int LAPACKE_zgglse( int matrix_order, lapack_int m, lapack_int n,
01317                            lapack_int p, lapack_complex_double* a,
01318                            lapack_int lda, lapack_complex_double* b,
01319                            lapack_int ldb, lapack_complex_double* c,
01320                            lapack_complex_double* d, lapack_complex_double* x );
01321 
01322 lapack_int LAPACKE_sggqrf( int matrix_order, lapack_int n, lapack_int m,
01323                            lapack_int p, float* a, lapack_int lda, float* taua,
01324                            float* b, lapack_int ldb, float* taub );
01325 lapack_int LAPACKE_dggqrf( int matrix_order, lapack_int n, lapack_int m,
01326                            lapack_int p, double* a, lapack_int lda,
01327                            double* taua, double* b, lapack_int ldb,
01328                            double* taub );
01329 lapack_int LAPACKE_cggqrf( int matrix_order, lapack_int n, lapack_int m,
01330                            lapack_int p, lapack_complex_float* a,
01331                            lapack_int lda, lapack_complex_float* taua,
01332                            lapack_complex_float* b, lapack_int ldb,
01333                            lapack_complex_float* taub );
01334 lapack_int LAPACKE_zggqrf( int matrix_order, lapack_int n, lapack_int m,
01335                            lapack_int p, lapack_complex_double* a,
01336                            lapack_int lda, lapack_complex_double* taua,
01337                            lapack_complex_double* b, lapack_int ldb,
01338                            lapack_complex_double* taub );
01339 
01340 lapack_int LAPACKE_sggrqf( int matrix_order, lapack_int m, lapack_int p,
01341                            lapack_int n, float* a, lapack_int lda, float* taua,
01342                            float* b, lapack_int ldb, float* taub );
01343 lapack_int LAPACKE_dggrqf( int matrix_order, lapack_int m, lapack_int p,
01344                            lapack_int n, double* a, lapack_int lda,
01345                            double* taua, double* b, lapack_int ldb,
01346                            double* taub );
01347 lapack_int LAPACKE_cggrqf( int matrix_order, lapack_int m, lapack_int p,
01348                            lapack_int n, lapack_complex_float* a,
01349                            lapack_int lda, lapack_complex_float* taua,
01350                            lapack_complex_float* b, lapack_int ldb,
01351                            lapack_complex_float* taub );
01352 lapack_int LAPACKE_zggrqf( int matrix_order, lapack_int m, lapack_int p,
01353                            lapack_int n, lapack_complex_double* a,
01354                            lapack_int lda, lapack_complex_double* taua,
01355                            lapack_complex_double* b, lapack_int ldb,
01356                            lapack_complex_double* taub );
01357 
01358 lapack_int LAPACKE_sggsvd( int matrix_order, char jobu, char jobv, char jobq,
01359                            lapack_int m, lapack_int n, lapack_int p,
01360                            lapack_int* k, lapack_int* l, float* a,
01361                            lapack_int lda, float* b, lapack_int ldb,
01362                            float* alpha, float* beta, float* u, lapack_int ldu,
01363                            float* v, lapack_int ldv, float* q, lapack_int ldq,
01364                            lapack_int* iwork );
01365 lapack_int LAPACKE_dggsvd( int matrix_order, char jobu, char jobv, char jobq,
01366                            lapack_int m, lapack_int n, lapack_int p,
01367                            lapack_int* k, lapack_int* l, double* a,
01368                            lapack_int lda, double* b, lapack_int ldb,
01369                            double* alpha, double* beta, double* u,
01370                            lapack_int ldu, double* v, lapack_int ldv, double* q,
01371                            lapack_int ldq, lapack_int* iwork );
01372 lapack_int LAPACKE_cggsvd( int matrix_order, char jobu, char jobv, char jobq,
01373                            lapack_int m, lapack_int n, lapack_int p,
01374                            lapack_int* k, lapack_int* l,
01375                            lapack_complex_float* a, lapack_int lda,
01376                            lapack_complex_float* b, lapack_int ldb,
01377                            float* alpha, float* beta, lapack_complex_float* u,
01378                            lapack_int ldu, lapack_complex_float* v,
01379                            lapack_int ldv, lapack_complex_float* q,
01380                            lapack_int ldq, lapack_int* iwork );
01381 lapack_int LAPACKE_zggsvd( int matrix_order, char jobu, char jobv, char jobq,
01382                            lapack_int m, lapack_int n, lapack_int p,
01383                            lapack_int* k, lapack_int* l,
01384                            lapack_complex_double* a, lapack_int lda,
01385                            lapack_complex_double* b, lapack_int ldb,
01386                            double* alpha, double* beta,
01387                            lapack_complex_double* u, lapack_int ldu,
01388                            lapack_complex_double* v, lapack_int ldv,
01389                            lapack_complex_double* q, lapack_int ldq,
01390                            lapack_int* iwork );
01391 
01392 lapack_int LAPACKE_sggsvp( int matrix_order, char jobu, char jobv, char jobq,
01393                            lapack_int m, lapack_int p, lapack_int n, float* a,
01394                            lapack_int lda, float* b, lapack_int ldb, float tola,
01395                            float tolb, lapack_int* k, lapack_int* l, float* u,
01396                            lapack_int ldu, float* v, lapack_int ldv, float* q,
01397                            lapack_int ldq );
01398 lapack_int LAPACKE_dggsvp( int matrix_order, char jobu, char jobv, char jobq,
01399                            lapack_int m, lapack_int p, lapack_int n, double* a,
01400                            lapack_int lda, double* b, lapack_int ldb,
01401                            double tola, double tolb, lapack_int* k,
01402                            lapack_int* l, double* u, lapack_int ldu, double* v,
01403                            lapack_int ldv, double* q, lapack_int ldq );
01404 lapack_int LAPACKE_cggsvp( int matrix_order, char jobu, char jobv, char jobq,
01405                            lapack_int m, lapack_int p, lapack_int n,
01406                            lapack_complex_float* a, lapack_int lda,
01407                            lapack_complex_float* b, lapack_int ldb, float tola,
01408                            float tolb, lapack_int* k, lapack_int* l,
01409                            lapack_complex_float* u, lapack_int ldu,
01410                            lapack_complex_float* v, lapack_int ldv,
01411                            lapack_complex_float* q, lapack_int ldq );
01412 lapack_int LAPACKE_zggsvp( int matrix_order, char jobu, char jobv, char jobq,
01413                            lapack_int m, lapack_int p, lapack_int n,
01414                            lapack_complex_double* a, lapack_int lda,
01415                            lapack_complex_double* b, lapack_int ldb,
01416                            double tola, double tolb, lapack_int* k,
01417                            lapack_int* l, lapack_complex_double* u,
01418                            lapack_int ldu, lapack_complex_double* v,
01419                            lapack_int ldv, lapack_complex_double* q,
01420                            lapack_int ldq );
01421 
01422 lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
01423                            const float* d, const float* du, const float* du2,
01424                            const lapack_int* ipiv, float anorm, float* rcond );
01425 lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
01426                            const double* d, const double* du, const double* du2,
01427                            const lapack_int* ipiv, double anorm,
01428                            double* rcond );
01429 lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
01430                            const lapack_complex_float* dl,
01431                            const lapack_complex_float* d,
01432                            const lapack_complex_float* du,
01433                            const lapack_complex_float* du2,
01434                            const lapack_int* ipiv, float anorm, float* rcond );
01435 lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
01436                            const lapack_complex_double* dl,
01437                            const lapack_complex_double* d,
01438                            const lapack_complex_double* du,
01439                            const lapack_complex_double* du2,
01440                            const lapack_int* ipiv, double anorm,
01441                            double* rcond );
01442 
01443 lapack_int LAPACKE_sgtrfs( int matrix_order, char trans, lapack_int n,
01444                            lapack_int nrhs, const float* dl, const float* d,
01445                            const float* du, const float* dlf, const float* df,
01446                            const float* duf, const float* du2,
01447                            const lapack_int* ipiv, const float* b,
01448                            lapack_int ldb, float* x, lapack_int ldx,
01449                            float* ferr, float* berr );
01450 lapack_int LAPACKE_dgtrfs( int matrix_order, char trans, lapack_int n,
01451                            lapack_int nrhs, const double* dl, const double* d,
01452                            const double* du, const double* dlf,
01453                            const double* df, const double* duf,
01454                            const double* du2, const lapack_int* ipiv,
01455                            const double* b, lapack_int ldb, double* x,
01456                            lapack_int ldx, double* ferr, double* berr );
01457 lapack_int LAPACKE_cgtrfs( int matrix_order, char trans, lapack_int n,
01458                            lapack_int nrhs, const lapack_complex_float* dl,
01459                            const lapack_complex_float* d,
01460                            const lapack_complex_float* du,
01461                            const lapack_complex_float* dlf,
01462                            const lapack_complex_float* df,
01463                            const lapack_complex_float* duf,
01464                            const lapack_complex_float* du2,
01465                            const lapack_int* ipiv,
01466                            const lapack_complex_float* b, lapack_int ldb,
01467                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01468                            float* berr );
01469 lapack_int LAPACKE_zgtrfs( int matrix_order, char trans, lapack_int n,
01470                            lapack_int nrhs, const lapack_complex_double* dl,
01471                            const lapack_complex_double* d,
01472                            const lapack_complex_double* du,
01473                            const lapack_complex_double* dlf,
01474                            const lapack_complex_double* df,
01475                            const lapack_complex_double* duf,
01476                            const lapack_complex_double* du2,
01477                            const lapack_int* ipiv,
01478                            const lapack_complex_double* b, lapack_int ldb,
01479                            lapack_complex_double* x, lapack_int ldx,
01480                            double* ferr, double* berr );
01481 
01482 lapack_int LAPACKE_sgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01483                           float* dl, float* d, float* du, float* b,
01484                           lapack_int ldb );
01485 lapack_int LAPACKE_dgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01486                           double* dl, double* d, double* du, double* b,
01487                           lapack_int ldb );
01488 lapack_int LAPACKE_cgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01489                           lapack_complex_float* dl, lapack_complex_float* d,
01490                           lapack_complex_float* du, lapack_complex_float* b,
01491                           lapack_int ldb );
01492 lapack_int LAPACKE_zgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01493                           lapack_complex_double* dl, lapack_complex_double* d,
01494                           lapack_complex_double* du, lapack_complex_double* b,
01495                           lapack_int ldb );
01496 
01497 lapack_int LAPACKE_sgtsvx( int matrix_order, char fact, char trans,
01498                            lapack_int n, lapack_int nrhs, const float* dl,
01499                            const float* d, const float* du, float* dlf,
01500                            float* df, float* duf, float* du2, lapack_int* ipiv,
01501                            const float* b, lapack_int ldb, float* x,
01502                            lapack_int ldx, float* rcond, float* ferr,
01503                            float* berr );
01504 lapack_int LAPACKE_dgtsvx( int matrix_order, char fact, char trans,
01505                            lapack_int n, lapack_int nrhs, const double* dl,
01506                            const double* d, const double* du, double* dlf,
01507                            double* df, double* duf, double* du2,
01508                            lapack_int* ipiv, const double* b, lapack_int ldb,
01509                            double* x, lapack_int ldx, double* rcond,
01510                            double* ferr, double* berr );
01511 lapack_int LAPACKE_cgtsvx( int matrix_order, char fact, char trans,
01512                            lapack_int n, lapack_int nrhs,
01513                            const lapack_complex_float* dl,
01514                            const lapack_complex_float* d,
01515                            const lapack_complex_float* du,
01516                            lapack_complex_float* dlf, lapack_complex_float* df,
01517                            lapack_complex_float* duf, lapack_complex_float* du2,
01518                            lapack_int* ipiv, const lapack_complex_float* b,
01519                            lapack_int ldb, lapack_complex_float* x,
01520                            lapack_int ldx, float* rcond, float* ferr,
01521                            float* berr );
01522 lapack_int LAPACKE_zgtsvx( int matrix_order, char fact, char trans,
01523                            lapack_int n, lapack_int nrhs,
01524                            const lapack_complex_double* dl,
01525                            const lapack_complex_double* d,
01526                            const lapack_complex_double* du,
01527                            lapack_complex_double* dlf,
01528                            lapack_complex_double* df,
01529                            lapack_complex_double* duf,
01530                            lapack_complex_double* du2, lapack_int* ipiv,
01531                            const lapack_complex_double* b, lapack_int ldb,
01532                            lapack_complex_double* x, lapack_int ldx,
01533                            double* rcond, double* ferr, double* berr );
01534 
01535 lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
01536                            float* du2, lapack_int* ipiv );
01537 lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
01538                            double* du2, lapack_int* ipiv );
01539 lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
01540                            lapack_complex_float* d, lapack_complex_float* du,
01541                            lapack_complex_float* du2, lapack_int* ipiv );
01542 lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
01543                            lapack_complex_double* d, lapack_complex_double* du,
01544                            lapack_complex_double* du2, lapack_int* ipiv );
01545 
01546 lapack_int LAPACKE_sgttrs( int matrix_order, char trans, lapack_int n,
01547                            lapack_int nrhs, const float* dl, const float* d,
01548                            const float* du, const float* du2,
01549                            const lapack_int* ipiv, float* b, lapack_int ldb );
01550 lapack_int LAPACKE_dgttrs( int matrix_order, char trans, lapack_int n,
01551                            lapack_int nrhs, const double* dl, const double* d,
01552                            const double* du, const double* du2,
01553                            const lapack_int* ipiv, double* b, lapack_int ldb );
01554 lapack_int LAPACKE_cgttrs( int matrix_order, char trans, lapack_int n,
01555                            lapack_int nrhs, const lapack_complex_float* dl,
01556                            const lapack_complex_float* d,
01557                            const lapack_complex_float* du,
01558                            const lapack_complex_float* du2,
01559                            const lapack_int* ipiv, lapack_complex_float* b,
01560                            lapack_int ldb );
01561 lapack_int LAPACKE_zgttrs( int matrix_order, char trans, lapack_int n,
01562                            lapack_int nrhs, const lapack_complex_double* dl,
01563                            const lapack_complex_double* d,
01564                            const lapack_complex_double* du,
01565                            const lapack_complex_double* du2,
01566                            const lapack_int* ipiv, lapack_complex_double* b,
01567                            lapack_int ldb );
01568 
01569 lapack_int LAPACKE_chbev( int matrix_order, char jobz, char uplo, lapack_int n,
01570                           lapack_int kd, lapack_complex_float* ab,
01571                           lapack_int ldab, float* w, lapack_complex_float* z,
01572                           lapack_int ldz );
01573 lapack_int LAPACKE_zhbev( int matrix_order, char jobz, char uplo, lapack_int n,
01574                           lapack_int kd, lapack_complex_double* ab,
01575                           lapack_int ldab, double* w, lapack_complex_double* z,
01576                           lapack_int ldz );
01577 
01578 lapack_int LAPACKE_chbevd( int matrix_order, char jobz, char uplo, lapack_int n,
01579                            lapack_int kd, lapack_complex_float* ab,
01580                            lapack_int ldab, float* w, lapack_complex_float* z,
01581                            lapack_int ldz );
01582 lapack_int LAPACKE_zhbevd( int matrix_order, char jobz, char uplo, lapack_int n,
01583                            lapack_int kd, lapack_complex_double* ab,
01584                            lapack_int ldab, double* w, lapack_complex_double* z,
01585                            lapack_int ldz );
01586 
01587 lapack_int LAPACKE_chbevx( int matrix_order, char jobz, char range, char uplo,
01588                            lapack_int n, lapack_int kd,
01589                            lapack_complex_float* ab, lapack_int ldab,
01590                            lapack_complex_float* q, lapack_int ldq, float vl,
01591                            float vu, lapack_int il, lapack_int iu, float abstol,
01592                            lapack_int* m, float* w, lapack_complex_float* z,
01593                            lapack_int ldz, lapack_int* ifail );
01594 lapack_int LAPACKE_zhbevx( int matrix_order, char jobz, char range, char uplo,
01595                            lapack_int n, lapack_int kd,
01596                            lapack_complex_double* ab, lapack_int ldab,
01597                            lapack_complex_double* q, lapack_int ldq, double vl,
01598                            double vu, lapack_int il, lapack_int iu,
01599                            double abstol, lapack_int* m, double* w,
01600                            lapack_complex_double* z, lapack_int ldz,
01601                            lapack_int* ifail );
01602 
01603 lapack_int LAPACKE_chbgst( int matrix_order, char vect, char uplo, lapack_int n,
01604                            lapack_int ka, lapack_int kb,
01605                            lapack_complex_float* ab, lapack_int ldab,
01606                            const lapack_complex_float* bb, lapack_int ldbb,
01607                            lapack_complex_float* x, lapack_int ldx );
01608 lapack_int LAPACKE_zhbgst( int matrix_order, char vect, char uplo, lapack_int n,
01609                            lapack_int ka, lapack_int kb,
01610                            lapack_complex_double* ab, lapack_int ldab,
01611                            const lapack_complex_double* bb, lapack_int ldbb,
01612                            lapack_complex_double* x, lapack_int ldx );
01613 
01614 lapack_int LAPACKE_chbgv( int matrix_order, char jobz, char uplo, lapack_int n,
01615                           lapack_int ka, lapack_int kb,
01616                           lapack_complex_float* ab, lapack_int ldab,
01617                           lapack_complex_float* bb, lapack_int ldbb, float* w,
01618                           lapack_complex_float* z, lapack_int ldz );
01619 lapack_int LAPACKE_zhbgv( int matrix_order, char jobz, char uplo, lapack_int n,
01620                           lapack_int ka, lapack_int kb,
01621                           lapack_complex_double* ab, lapack_int ldab,
01622                           lapack_complex_double* bb, lapack_int ldbb, double* w,
01623                           lapack_complex_double* z, lapack_int ldz );
01624 
01625 lapack_int LAPACKE_chbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
01626                            lapack_int ka, lapack_int kb,
01627                            lapack_complex_float* ab, lapack_int ldab,
01628                            lapack_complex_float* bb, lapack_int ldbb, float* w,
01629                            lapack_complex_float* z, lapack_int ldz );
01630 lapack_int LAPACKE_zhbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
01631                            lapack_int ka, lapack_int kb,
01632                            lapack_complex_double* ab, lapack_int ldab,
01633                            lapack_complex_double* bb, lapack_int ldbb,
01634                            double* w, lapack_complex_double* z,
01635                            lapack_int ldz );
01636 
01637 lapack_int LAPACKE_chbgvx( int matrix_order, char jobz, char range, char uplo,
01638                            lapack_int n, lapack_int ka, lapack_int kb,
01639                            lapack_complex_float* ab, lapack_int ldab,
01640                            lapack_complex_float* bb, lapack_int ldbb,
01641                            lapack_complex_float* q, lapack_int ldq, float vl,
01642                            float vu, lapack_int il, lapack_int iu, float abstol,
01643                            lapack_int* m, float* w, lapack_complex_float* z,
01644                            lapack_int ldz, lapack_int* ifail );
01645 lapack_int LAPACKE_zhbgvx( int matrix_order, char jobz, char range, char uplo,
01646                            lapack_int n, lapack_int ka, lapack_int kb,
01647                            lapack_complex_double* ab, lapack_int ldab,
01648                            lapack_complex_double* bb, lapack_int ldbb,
01649                            lapack_complex_double* q, lapack_int ldq, double vl,
01650                            double vu, lapack_int il, lapack_int iu,
01651                            double abstol, lapack_int* m, double* w,
01652                            lapack_complex_double* z, lapack_int ldz,
01653                            lapack_int* ifail );
01654 
01655 lapack_int LAPACKE_chbtrd( int matrix_order, char vect, char uplo, lapack_int n,
01656                            lapack_int kd, lapack_complex_float* ab,
01657                            lapack_int ldab, float* d, float* e,
01658                            lapack_complex_float* q, lapack_int ldq );
01659 lapack_int LAPACKE_zhbtrd( int matrix_order, char vect, char uplo, lapack_int n,
01660                            lapack_int kd, lapack_complex_double* ab,
01661                            lapack_int ldab, double* d, double* e,
01662                            lapack_complex_double* q, lapack_int ldq );
01663 
01664 lapack_int LAPACKE_checon( int matrix_order, char uplo, lapack_int n,
01665                            const lapack_complex_float* a, lapack_int lda,
01666                            const lapack_int* ipiv, float anorm, float* rcond );
01667 lapack_int LAPACKE_zhecon( int matrix_order, char uplo, lapack_int n,
01668                            const lapack_complex_double* a, lapack_int lda,
01669                            const lapack_int* ipiv, double anorm,
01670                            double* rcond );
01671 
01672 lapack_int LAPACKE_cheequb( int matrix_order, char uplo, lapack_int n,
01673                             const lapack_complex_float* a, lapack_int lda,
01674                             float* s, float* scond, float* amax );
01675 lapack_int LAPACKE_zheequb( int matrix_order, char uplo, lapack_int n,
01676                             const lapack_complex_double* a, lapack_int lda,
01677                             double* s, double* scond, double* amax );
01678 
01679 lapack_int LAPACKE_cheev( int matrix_order, char jobz, char uplo, lapack_int n,
01680                           lapack_complex_float* a, lapack_int lda, float* w );
01681 lapack_int LAPACKE_zheev( int matrix_order, char jobz, char uplo, lapack_int n,
01682                           lapack_complex_double* a, lapack_int lda, double* w );
01683 
01684 lapack_int LAPACKE_cheevd( int matrix_order, char jobz, char uplo, lapack_int n,
01685                            lapack_complex_float* a, lapack_int lda, float* w );
01686 lapack_int LAPACKE_zheevd( int matrix_order, char jobz, char uplo, lapack_int n,
01687                            lapack_complex_double* a, lapack_int lda,
01688                            double* w );
01689 
01690 lapack_int LAPACKE_cheevr( int matrix_order, char jobz, char range, char uplo,
01691                            lapack_int n, lapack_complex_float* a,
01692                            lapack_int lda, float vl, float vu, lapack_int il,
01693                            lapack_int iu, float abstol, lapack_int* m, float* w,
01694                            lapack_complex_float* z, lapack_int ldz,
01695                            lapack_int* isuppz );
01696 lapack_int LAPACKE_zheevr( int matrix_order, char jobz, char range, char uplo,
01697                            lapack_int n, lapack_complex_double* a,
01698                            lapack_int lda, double vl, double vu, lapack_int il,
01699                            lapack_int iu, double abstol, lapack_int* m,
01700                            double* w, lapack_complex_double* z, lapack_int ldz,
01701                            lapack_int* isuppz );
01702 
01703 lapack_int LAPACKE_cheevx( int matrix_order, char jobz, char range, char uplo,
01704                            lapack_int n, lapack_complex_float* a,
01705                            lapack_int lda, float vl, float vu, lapack_int il,
01706                            lapack_int iu, float abstol, lapack_int* m, float* w,
01707                            lapack_complex_float* z, lapack_int ldz,
01708                            lapack_int* ifail );
01709 lapack_int LAPACKE_zheevx( int matrix_order, char jobz, char range, char uplo,
01710                            lapack_int n, lapack_complex_double* a,
01711                            lapack_int lda, double vl, double vu, lapack_int il,
01712                            lapack_int iu, double abstol, lapack_int* m,
01713                            double* w, lapack_complex_double* z, lapack_int ldz,
01714                            lapack_int* ifail );
01715 
01716 lapack_int LAPACKE_chegst( int matrix_order, lapack_int itype, char uplo,
01717                            lapack_int n, lapack_complex_float* a,
01718                            lapack_int lda, const lapack_complex_float* b,
01719                            lapack_int ldb );
01720 lapack_int LAPACKE_zhegst( int matrix_order, lapack_int itype, char uplo,
01721                            lapack_int n, lapack_complex_double* a,
01722                            lapack_int lda, const lapack_complex_double* b,
01723                            lapack_int ldb );
01724 
01725 lapack_int LAPACKE_chegv( int matrix_order, lapack_int itype, char jobz,
01726                           char uplo, lapack_int n, lapack_complex_float* a,
01727                           lapack_int lda, lapack_complex_float* b,
01728                           lapack_int ldb, float* w );
01729 lapack_int LAPACKE_zhegv( int matrix_order, lapack_int itype, char jobz,
01730                           char uplo, lapack_int n, lapack_complex_double* a,
01731                           lapack_int lda, lapack_complex_double* b,
01732                           lapack_int ldb, double* w );
01733 
01734 lapack_int LAPACKE_chegvd( int matrix_order, lapack_int itype, char jobz,
01735                            char uplo, lapack_int n, lapack_complex_float* a,
01736                            lapack_int lda, lapack_complex_float* b,
01737                            lapack_int ldb, float* w );
01738 lapack_int LAPACKE_zhegvd( int matrix_order, lapack_int itype, char jobz,
01739                            char uplo, lapack_int n, lapack_complex_double* a,
01740                            lapack_int lda, lapack_complex_double* b,
01741                            lapack_int ldb, double* w );
01742 
01743 lapack_int LAPACKE_chegvx( int matrix_order, lapack_int itype, char jobz,
01744                            char range, char uplo, lapack_int n,
01745                            lapack_complex_float* a, lapack_int lda,
01746                            lapack_complex_float* b, lapack_int ldb, float vl,
01747                            float vu, lapack_int il, lapack_int iu, float abstol,
01748                            lapack_int* m, float* w, lapack_complex_float* z,
01749                            lapack_int ldz, lapack_int* ifail );
01750 lapack_int LAPACKE_zhegvx( int matrix_order, lapack_int itype, char jobz,
01751                            char range, char uplo, lapack_int n,
01752                            lapack_complex_double* a, lapack_int lda,
01753                            lapack_complex_double* b, lapack_int ldb, double vl,
01754                            double vu, lapack_int il, lapack_int iu,
01755                            double abstol, lapack_int* m, double* w,
01756                            lapack_complex_double* z, lapack_int ldz,
01757                            lapack_int* ifail );
01758 
01759 lapack_int LAPACKE_cherfs( int matrix_order, char uplo, lapack_int n,
01760                            lapack_int nrhs, const lapack_complex_float* a,
01761                            lapack_int lda, const lapack_complex_float* af,
01762                            lapack_int ldaf, const lapack_int* ipiv,
01763                            const lapack_complex_float* b, lapack_int ldb,
01764                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01765                            float* berr );
01766 lapack_int LAPACKE_zherfs( int matrix_order, char uplo, lapack_int n,
01767                            lapack_int nrhs, const lapack_complex_double* a,
01768                            lapack_int lda, const lapack_complex_double* af,
01769                            lapack_int ldaf, const lapack_int* ipiv,
01770                            const lapack_complex_double* b, lapack_int ldb,
01771                            lapack_complex_double* x, lapack_int ldx,
01772                            double* ferr, double* berr );
01773 
01774 lapack_int LAPACKE_cherfsx( int matrix_order, char uplo, char equed,
01775                             lapack_int n, lapack_int nrhs,
01776                             const lapack_complex_float* a, lapack_int lda,
01777                             const lapack_complex_float* af, lapack_int ldaf,
01778                             const lapack_int* ipiv, const float* s,
01779                             const lapack_complex_float* b, lapack_int ldb,
01780                             lapack_complex_float* x, lapack_int ldx,
01781                             float* rcond, float* berr, lapack_int n_err_bnds,
01782                             float* err_bnds_norm, float* err_bnds_comp,
01783                             lapack_int nparams, float* params );
01784 lapack_int LAPACKE_zherfsx( int matrix_order, char uplo, char equed,
01785                             lapack_int n, lapack_int nrhs,
01786                             const lapack_complex_double* a, lapack_int lda,
01787                             const lapack_complex_double* af, lapack_int ldaf,
01788                             const lapack_int* ipiv, const double* s,
01789                             const lapack_complex_double* b, lapack_int ldb,
01790                             lapack_complex_double* x, lapack_int ldx,
01791                             double* rcond, double* berr, lapack_int n_err_bnds,
01792                             double* err_bnds_norm, double* err_bnds_comp,
01793                             lapack_int nparams, double* params );
01794 
01795 lapack_int LAPACKE_chesv( int matrix_order, char uplo, lapack_int n,
01796                           lapack_int nrhs, lapack_complex_float* a,
01797                           lapack_int lda, lapack_int* ipiv,
01798                           lapack_complex_float* b, lapack_int ldb );
01799 lapack_int LAPACKE_zhesv( int matrix_order, char uplo, lapack_int n,
01800                           lapack_int nrhs, lapack_complex_double* a,
01801                           lapack_int lda, lapack_int* ipiv,
01802                           lapack_complex_double* b, lapack_int ldb );
01803 
01804 lapack_int LAPACKE_chesvx( int matrix_order, char fact, char uplo, lapack_int n,
01805                            lapack_int nrhs, const lapack_complex_float* a,
01806                            lapack_int lda, lapack_complex_float* af,
01807                            lapack_int ldaf, lapack_int* ipiv,
01808                            const lapack_complex_float* b, lapack_int ldb,
01809                            lapack_complex_float* x, lapack_int ldx,
01810                            float* rcond, float* ferr, float* berr );
01811 lapack_int LAPACKE_zhesvx( int matrix_order, char fact, char uplo, lapack_int n,
01812                            lapack_int nrhs, const lapack_complex_double* a,
01813                            lapack_int lda, lapack_complex_double* af,
01814                            lapack_int ldaf, lapack_int* ipiv,
01815                            const lapack_complex_double* b, lapack_int ldb,
01816                            lapack_complex_double* x, lapack_int ldx,
01817                            double* rcond, double* ferr, double* berr );
01818 
01819 lapack_int LAPACKE_chesvxx( int matrix_order, char fact, char uplo,
01820                             lapack_int n, lapack_int nrhs,
01821                             lapack_complex_float* a, lapack_int lda,
01822                             lapack_complex_float* af, lapack_int ldaf,
01823                             lapack_int* ipiv, char* equed, float* s,
01824                             lapack_complex_float* b, lapack_int ldb,
01825                             lapack_complex_float* x, lapack_int ldx,
01826                             float* rcond, float* rpvgrw, float* berr,
01827                             lapack_int n_err_bnds, float* err_bnds_norm,
01828                             float* err_bnds_comp, lapack_int nparams,
01829                             float* params );
01830 lapack_int LAPACKE_zhesvxx( int matrix_order, char fact, char uplo,
01831                             lapack_int n, lapack_int nrhs,
01832                             lapack_complex_double* a, lapack_int lda,
01833                             lapack_complex_double* af, lapack_int ldaf,
01834                             lapack_int* ipiv, char* equed, double* s,
01835                             lapack_complex_double* b, lapack_int ldb,
01836                             lapack_complex_double* x, lapack_int ldx,
01837                             double* rcond, double* rpvgrw, double* berr,
01838                             lapack_int n_err_bnds, double* err_bnds_norm,
01839                             double* err_bnds_comp, lapack_int nparams,
01840                             double* params );
01841 
01842 lapack_int LAPACKE_chetrd( int matrix_order, char uplo, lapack_int n,
01843                            lapack_complex_float* a, lapack_int lda, float* d,
01844                            float* e, lapack_complex_float* tau );
01845 lapack_int LAPACKE_zhetrd( int matrix_order, char uplo, lapack_int n,
01846                            lapack_complex_double* a, lapack_int lda, double* d,
01847                            double* e, lapack_complex_double* tau );
01848 
01849 lapack_int LAPACKE_chetrf( int matrix_order, char uplo, lapack_int n,
01850                            lapack_complex_float* a, lapack_int lda,
01851                            lapack_int* ipiv );
01852 lapack_int LAPACKE_zhetrf( int matrix_order, char uplo, lapack_int n,
01853                            lapack_complex_double* a, lapack_int lda,
01854                            lapack_int* ipiv );
01855 
01856 lapack_int LAPACKE_chetri( int matrix_order, char uplo, lapack_int n,
01857                            lapack_complex_float* a, lapack_int lda,
01858                            const lapack_int* ipiv );
01859 lapack_int LAPACKE_zhetri( int matrix_order, char uplo, lapack_int n,
01860                            lapack_complex_double* a, lapack_int lda,
01861                            const lapack_int* ipiv );
01862 
01863 lapack_int LAPACKE_chetrs( int matrix_order, char uplo, lapack_int n,
01864                            lapack_int nrhs, const lapack_complex_float* a,
01865                            lapack_int lda, const lapack_int* ipiv,
01866                            lapack_complex_float* b, lapack_int ldb );
01867 lapack_int LAPACKE_zhetrs( int matrix_order, char uplo, lapack_int n,
01868                            lapack_int nrhs, const lapack_complex_double* a,
01869                            lapack_int lda, const lapack_int* ipiv,
01870                            lapack_complex_double* b, lapack_int ldb );
01871 
01872 lapack_int LAPACKE_chfrk( int matrix_order, char transr, char uplo, char trans,
01873                           lapack_int n, lapack_int k, float alpha,
01874                           const lapack_complex_float* a, lapack_int lda,
01875                           float beta, lapack_complex_float* c );
01876 lapack_int LAPACKE_zhfrk( int matrix_order, char transr, char uplo, char trans,
01877                           lapack_int n, lapack_int k, double alpha,
01878                           const lapack_complex_double* a, lapack_int lda,
01879                           double beta, lapack_complex_double* c );
01880 
01881 lapack_int LAPACKE_shgeqz( int matrix_order, char job, char compq, char compz,
01882                            lapack_int n, lapack_int ilo, lapack_int ihi,
01883                            float* h, lapack_int ldh, float* t, lapack_int ldt,
01884                            float* alphar, float* alphai, float* beta, float* q,
01885                            lapack_int ldq, float* z, lapack_int ldz );
01886 lapack_int LAPACKE_dhgeqz( int matrix_order, char job, char compq, char compz,
01887                            lapack_int n, lapack_int ilo, lapack_int ihi,
01888                            double* h, lapack_int ldh, double* t, lapack_int ldt,
01889                            double* alphar, double* alphai, double* beta,
01890                            double* q, lapack_int ldq, double* z,
01891                            lapack_int ldz );
01892 lapack_int LAPACKE_chgeqz( int matrix_order, char job, char compq, char compz,
01893                            lapack_int n, lapack_int ilo, lapack_int ihi,
01894                            lapack_complex_float* h, lapack_int ldh,
01895                            lapack_complex_float* t, lapack_int ldt,
01896                            lapack_complex_float* alpha,
01897                            lapack_complex_float* beta, lapack_complex_float* q,
01898                            lapack_int ldq, lapack_complex_float* z,
01899                            lapack_int ldz );
01900 lapack_int LAPACKE_zhgeqz( int matrix_order, char job, char compq, char compz,
01901                            lapack_int n, lapack_int ilo, lapack_int ihi,
01902                            lapack_complex_double* h, lapack_int ldh,
01903                            lapack_complex_double* t, lapack_int ldt,
01904                            lapack_complex_double* alpha,
01905                            lapack_complex_double* beta,
01906                            lapack_complex_double* q, lapack_int ldq,
01907                            lapack_complex_double* z, lapack_int ldz );
01908 
01909 lapack_int LAPACKE_chpcon( int matrix_order, char uplo, lapack_int n,
01910                            const lapack_complex_float* ap,
01911                            const lapack_int* ipiv, float anorm, float* rcond );
01912 lapack_int LAPACKE_zhpcon( int matrix_order, char uplo, lapack_int n,
01913                            const lapack_complex_double* ap,
01914                            const lapack_int* ipiv, double anorm,
01915                            double* rcond );
01916 
01917 lapack_int LAPACKE_chpev( int matrix_order, char jobz, char uplo, lapack_int n,
01918                           lapack_complex_float* ap, float* w,
01919                           lapack_complex_float* z, lapack_int ldz );
01920 lapack_int LAPACKE_zhpev( int matrix_order, char jobz, char uplo, lapack_int n,
01921                           lapack_complex_double* ap, double* w,
01922                           lapack_complex_double* z, lapack_int ldz );
01923 
01924 lapack_int LAPACKE_chpevd( int matrix_order, char jobz, char uplo, lapack_int n,
01925                            lapack_complex_float* ap, float* w,
01926                            lapack_complex_float* z, lapack_int ldz );
01927 lapack_int LAPACKE_zhpevd( int matrix_order, char jobz, char uplo, lapack_int n,
01928                            lapack_complex_double* ap, double* w,
01929                            lapack_complex_double* z, lapack_int ldz );
01930 
01931 lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo,
01932                            lapack_int n, lapack_complex_float* ap, float vl,
01933                            float vu, lapack_int il, lapack_int iu, float abstol,
01934                            lapack_int* m, float* w, lapack_complex_float* z,
01935                            lapack_int ldz, lapack_int* ifail );
01936 lapack_int LAPACKE_zhpevx( int matrix_order, char jobz, char range, char uplo,
01937                            lapack_int n, lapack_complex_double* ap, double vl,
01938                            double vu, lapack_int il, lapack_int iu,
01939                            double abstol, lapack_int* m, double* w,
01940                            lapack_complex_double* z, lapack_int ldz,
01941                            lapack_int* ifail );
01942 
01943 lapack_int LAPACKE_chpgst( int matrix_order, lapack_int itype, char uplo,
01944                            lapack_int n, lapack_complex_float* ap,
01945                            const lapack_complex_float* bp );
01946 lapack_int LAPACKE_zhpgst( int matrix_order, lapack_int itype, char uplo,
01947                            lapack_int n, lapack_complex_double* ap,
01948                            const lapack_complex_double* bp );
01949 
01950 lapack_int LAPACKE_chpgv( int matrix_order, lapack_int itype, char jobz,
01951                           char uplo, lapack_int n, lapack_complex_float* ap,
01952                           lapack_complex_float* bp, float* w,
01953                           lapack_complex_float* z, lapack_int ldz );
01954 lapack_int LAPACKE_zhpgv( int matrix_order, lapack_int itype, char jobz,
01955                           char uplo, lapack_int n, lapack_complex_double* ap,
01956                           lapack_complex_double* bp, double* w,
01957                           lapack_complex_double* z, lapack_int ldz );
01958 
01959 lapack_int LAPACKE_chpgvd( int matrix_order, lapack_int itype, char jobz,
01960                            char uplo, lapack_int n, lapack_complex_float* ap,
01961                            lapack_complex_float* bp, float* w,
01962                            lapack_complex_float* z, lapack_int ldz );
01963 lapack_int LAPACKE_zhpgvd( int matrix_order, lapack_int itype, char jobz,
01964                            char uplo, lapack_int n, lapack_complex_double* ap,
01965                            lapack_complex_double* bp, double* w,
01966                            lapack_complex_double* z, lapack_int ldz );
01967 
01968 lapack_int LAPACKE_chpgvx( int matrix_order, lapack_int itype, char jobz,
01969                            char range, char uplo, lapack_int n,
01970                            lapack_complex_float* ap, lapack_complex_float* bp,
01971                            float vl, float vu, lapack_int il, lapack_int iu,
01972                            float abstol, lapack_int* m, float* w,
01973                            lapack_complex_float* z, lapack_int ldz,
01974                            lapack_int* ifail );
01975 lapack_int LAPACKE_zhpgvx( int matrix_order, lapack_int itype, char jobz,
01976                            char range, char uplo, lapack_int n,
01977                            lapack_complex_double* ap, lapack_complex_double* bp,
01978                            double vl, double vu, lapack_int il, lapack_int iu,
01979                            double abstol, lapack_int* m, double* w,
01980                            lapack_complex_double* z, lapack_int ldz,
01981                            lapack_int* ifail );
01982 
01983 lapack_int LAPACKE_chprfs( int matrix_order, char uplo, lapack_int n,
01984                            lapack_int nrhs, const lapack_complex_float* ap,
01985                            const lapack_complex_float* afp,
01986                            const lapack_int* ipiv,
01987                            const lapack_complex_float* b, lapack_int ldb,
01988                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01989                            float* berr );
01990 lapack_int LAPACKE_zhprfs( int matrix_order, char uplo, lapack_int n,
01991                            lapack_int nrhs, const lapack_complex_double* ap,
01992                            const lapack_complex_double* afp,
01993                            const lapack_int* ipiv,
01994                            const lapack_complex_double* b, lapack_int ldb,
01995                            lapack_complex_double* x, lapack_int ldx,
01996                            double* ferr, double* berr );
01997 
01998 lapack_int LAPACKE_chpsv( int matrix_order, char uplo, lapack_int n,
01999                           lapack_int nrhs, lapack_complex_float* ap,
02000                           lapack_int* ipiv, lapack_complex_float* b,
02001                           lapack_int ldb );
02002 lapack_int LAPACKE_zhpsv( int matrix_order, char uplo, lapack_int n,
02003                           lapack_int nrhs, lapack_complex_double* ap,
02004                           lapack_int* ipiv, lapack_complex_double* b,
02005                           lapack_int ldb );
02006 
02007 lapack_int LAPACKE_chpsvx( int matrix_order, char fact, char uplo, lapack_int n,
02008                            lapack_int nrhs, const lapack_complex_float* ap,
02009                            lapack_complex_float* afp, lapack_int* ipiv,
02010                            const lapack_complex_float* b, lapack_int ldb,
02011                            lapack_complex_float* x, lapack_int ldx,
02012                            float* rcond, float* ferr, float* berr );
02013 lapack_int LAPACKE_zhpsvx( int matrix_order, char fact, char uplo, lapack_int n,
02014                            lapack_int nrhs, const lapack_complex_double* ap,
02015                            lapack_complex_double* afp, lapack_int* ipiv,
02016                            const lapack_complex_double* b, lapack_int ldb,
02017                            lapack_complex_double* x, lapack_int ldx,
02018                            double* rcond, double* ferr, double* berr );
02019 
02020 lapack_int LAPACKE_chptrd( int matrix_order, char uplo, lapack_int n,
02021                            lapack_complex_float* ap, float* d, float* e,
02022                            lapack_complex_float* tau );
02023 lapack_int LAPACKE_zhptrd( int matrix_order, char uplo, lapack_int n,
02024                            lapack_complex_double* ap, double* d, double* e,
02025                            lapack_complex_double* tau );
02026 
02027 lapack_int LAPACKE_chptrf( int matrix_order, char uplo, lapack_int n,
02028                            lapack_complex_float* ap, lapack_int* ipiv );
02029 lapack_int LAPACKE_zhptrf( int matrix_order, char uplo, lapack_int n,
02030                            lapack_complex_double* ap, lapack_int* ipiv );
02031 
02032 lapack_int LAPACKE_chptri( int matrix_order, char uplo, lapack_int n,
02033                            lapack_complex_float* ap, const lapack_int* ipiv );
02034 lapack_int LAPACKE_zhptri( int matrix_order, char uplo, lapack_int n,
02035                            lapack_complex_double* ap, const lapack_int* ipiv );
02036 
02037 lapack_int LAPACKE_chptrs( int matrix_order, char uplo, lapack_int n,
02038                            lapack_int nrhs, const lapack_complex_float* ap,
02039                            const lapack_int* ipiv, lapack_complex_float* b,
02040                            lapack_int ldb );
02041 lapack_int LAPACKE_zhptrs( int matrix_order, char uplo, lapack_int n,
02042                            lapack_int nrhs, const lapack_complex_double* ap,
02043                            const lapack_int* ipiv, lapack_complex_double* b,
02044                            lapack_int ldb );
02045 
02046 lapack_int LAPACKE_shsein( int matrix_order, char job, char eigsrc, char initv,
02047                            lapack_logical* select, lapack_int n, const float* h,
02048                            lapack_int ldh, float* wr, const float* wi,
02049                            float* vl, lapack_int ldvl, float* vr,
02050                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02051                            lapack_int* ifaill, lapack_int* ifailr );
02052 lapack_int LAPACKE_dhsein( int matrix_order, char job, char eigsrc, char initv,
02053                            lapack_logical* select, lapack_int n,
02054                            const double* h, lapack_int ldh, double* wr,
02055                            const double* wi, double* vl, lapack_int ldvl,
02056                            double* vr, lapack_int ldvr, lapack_int mm,
02057                            lapack_int* m, lapack_int* ifaill,
02058                            lapack_int* ifailr );
02059 lapack_int LAPACKE_chsein( int matrix_order, char job, char eigsrc, char initv,
02060                            const lapack_logical* select, lapack_int n,
02061                            const lapack_complex_float* h, lapack_int ldh,
02062                            lapack_complex_float* w, lapack_complex_float* vl,
02063                            lapack_int ldvl, lapack_complex_float* vr,
02064                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02065                            lapack_int* ifaill, lapack_int* ifailr );
02066 lapack_int LAPACKE_zhsein( int matrix_order, char job, char eigsrc, char initv,
02067                            const lapack_logical* select, lapack_int n,
02068                            const lapack_complex_double* h, lapack_int ldh,
02069                            lapack_complex_double* w, lapack_complex_double* vl,
02070                            lapack_int ldvl, lapack_complex_double* vr,
02071                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02072                            lapack_int* ifaill, lapack_int* ifailr );
02073 
02074 lapack_int LAPACKE_shseqr( int matrix_order, char job, char compz, lapack_int n,
02075                            lapack_int ilo, lapack_int ihi, float* h,
02076                            lapack_int ldh, float* wr, float* wi, float* z,
02077                            lapack_int ldz );
02078 lapack_int LAPACKE_dhseqr( int matrix_order, char job, char compz, lapack_int n,
02079                            lapack_int ilo, lapack_int ihi, double* h,
02080                            lapack_int ldh, double* wr, double* wi, double* z,
02081                            lapack_int ldz );
02082 lapack_int LAPACKE_chseqr( int matrix_order, char job, char compz, lapack_int n,
02083                            lapack_int ilo, lapack_int ihi,
02084                            lapack_complex_float* h, lapack_int ldh,
02085                            lapack_complex_float* w, lapack_complex_float* z,
02086                            lapack_int ldz );
02087 lapack_int LAPACKE_zhseqr( int matrix_order, char job, char compz, lapack_int n,
02088                            lapack_int ilo, lapack_int ihi,
02089                            lapack_complex_double* h, lapack_int ldh,
02090                            lapack_complex_double* w, lapack_complex_double* z,
02091                            lapack_int ldz );
02092 
02093 lapack_int LAPACKE_sopgtr( int matrix_order, char uplo, lapack_int n,
02094                            const float* ap, const float* tau, float* q,
02095                            lapack_int ldq );
02096 lapack_int LAPACKE_dopgtr( int matrix_order, char uplo, lapack_int n,
02097                            const double* ap, const double* tau, double* q,
02098                            lapack_int ldq );
02099 
02100 lapack_int LAPACKE_sopmtr( int matrix_order, char side, char uplo, char trans,
02101                            lapack_int m, lapack_int n, const float* ap,
02102                            const float* tau, float* c, lapack_int ldc );
02103 lapack_int LAPACKE_dopmtr( int matrix_order, char side, char uplo, char trans,
02104                            lapack_int m, lapack_int n, const double* ap,
02105                            const double* tau, double* c, lapack_int ldc );
02106 
02107 lapack_int LAPACKE_sorgbr( int matrix_order, char vect, lapack_int m,
02108                            lapack_int n, lapack_int k, float* a, lapack_int lda,
02109                            const float* tau );
02110 lapack_int LAPACKE_dorgbr( int matrix_order, char vect, lapack_int m,
02111                            lapack_int n, lapack_int k, double* a,
02112                            lapack_int lda, const double* tau );
02113 
02114 lapack_int LAPACKE_sorghr( int matrix_order, lapack_int n, lapack_int ilo,
02115                            lapack_int ihi, float* a, lapack_int lda,
02116                            const float* tau );
02117 lapack_int LAPACKE_dorghr( int matrix_order, lapack_int n, lapack_int ilo,
02118                            lapack_int ihi, double* a, lapack_int lda,
02119                            const double* tau );
02120 
02121 lapack_int LAPACKE_sorglq( int matrix_order, lapack_int m, lapack_int n,
02122                            lapack_int k, float* a, lapack_int lda,
02123                            const float* tau );
02124 lapack_int LAPACKE_dorglq( int matrix_order, lapack_int m, lapack_int n,
02125                            lapack_int k, double* a, lapack_int lda,
02126                            const double* tau );
02127 
02128 lapack_int LAPACKE_sorgql( int matrix_order, lapack_int m, lapack_int n,
02129                            lapack_int k, float* a, lapack_int lda,
02130                            const float* tau );
02131 lapack_int LAPACKE_dorgql( int matrix_order, lapack_int m, lapack_int n,
02132                            lapack_int k, double* a, lapack_int lda,
02133                            const double* tau );
02134 
02135 lapack_int LAPACKE_sorgqr( int matrix_order, lapack_int m, lapack_int n,
02136                            lapack_int k, float* a, lapack_int lda,
02137                            const float* tau );
02138 lapack_int LAPACKE_dorgqr( int matrix_order, lapack_int m, lapack_int n,
02139                            lapack_int k, double* a, lapack_int lda,
02140                            const double* tau );
02141 
02142 lapack_int LAPACKE_sorgrq( int matrix_order, lapack_int m, lapack_int n,
02143                            lapack_int k, float* a, lapack_int lda,
02144                            const float* tau );
02145 lapack_int LAPACKE_dorgrq( int matrix_order, lapack_int m, lapack_int n,
02146                            lapack_int k, double* a, lapack_int lda,
02147                            const double* tau );
02148 
02149 lapack_int LAPACKE_sorgtr( int matrix_order, char uplo, lapack_int n, float* a,
02150                            lapack_int lda, const float* tau );
02151 lapack_int LAPACKE_dorgtr( int matrix_order, char uplo, lapack_int n, double* a,
02152                            lapack_int lda, const double* tau );
02153 
02154 lapack_int LAPACKE_sormbr( int matrix_order, char vect, char side, char trans,
02155                            lapack_int m, lapack_int n, lapack_int k,
02156                            const float* a, lapack_int lda, const float* tau,
02157                            float* c, lapack_int ldc );
02158 lapack_int LAPACKE_dormbr( int matrix_order, char vect, char side, char trans,
02159                            lapack_int m, lapack_int n, lapack_int k,
02160                            const double* a, lapack_int lda, const double* tau,
02161                            double* c, lapack_int ldc );
02162 
02163 lapack_int LAPACKE_sormhr( int matrix_order, char side, char trans,
02164                            lapack_int m, lapack_int n, lapack_int ilo,
02165                            lapack_int ihi, const float* a, lapack_int lda,
02166                            const float* tau, float* c, lapack_int ldc );
02167 lapack_int LAPACKE_dormhr( int matrix_order, char side, char trans,
02168                            lapack_int m, lapack_int n, lapack_int ilo,
02169                            lapack_int ihi, const double* a, lapack_int lda,
02170                            const double* tau, double* c, lapack_int ldc );
02171 
02172 lapack_int LAPACKE_sormlq( int matrix_order, char side, char trans,
02173                            lapack_int m, lapack_int n, lapack_int k,
02174                            const float* a, lapack_int lda, const float* tau,
02175                            float* c, lapack_int ldc );
02176 lapack_int LAPACKE_dormlq( int matrix_order, char side, char trans,
02177                            lapack_int m, lapack_int n, lapack_int k,
02178                            const double* a, lapack_int lda, const double* tau,
02179                            double* c, lapack_int ldc );
02180 
02181 lapack_int LAPACKE_sormql( int matrix_order, char side, char trans,
02182                            lapack_int m, lapack_int n, lapack_int k,
02183                            const float* a, lapack_int lda, const float* tau,
02184                            float* c, lapack_int ldc );
02185 lapack_int LAPACKE_dormql( int matrix_order, char side, char trans,
02186                            lapack_int m, lapack_int n, lapack_int k,
02187                            const double* a, lapack_int lda, const double* tau,
02188                            double* c, lapack_int ldc );
02189 
02190 lapack_int LAPACKE_sormqr( int matrix_order, char side, char trans,
02191                            lapack_int m, lapack_int n, lapack_int k,
02192                            const float* a, lapack_int lda, const float* tau,
02193                            float* c, lapack_int ldc );
02194 lapack_int LAPACKE_dormqr( int matrix_order, char side, char trans,
02195                            lapack_int m, lapack_int n, lapack_int k,
02196                            const double* a, lapack_int lda, const double* tau,
02197                            double* c, lapack_int ldc );
02198 
02199 lapack_int LAPACKE_sormrq( int matrix_order, char side, char trans,
02200                            lapack_int m, lapack_int n, lapack_int k,
02201                            const float* a, lapack_int lda, const float* tau,
02202                            float* c, lapack_int ldc );
02203 lapack_int LAPACKE_dormrq( int matrix_order, char side, char trans,
02204                            lapack_int m, lapack_int n, lapack_int k,
02205                            const double* a, lapack_int lda, const double* tau,
02206                            double* c, lapack_int ldc );
02207 
02208 lapack_int LAPACKE_sormrz( int matrix_order, char side, char trans,
02209                            lapack_int m, lapack_int n, lapack_int k,
02210                            lapack_int l, const float* a, lapack_int lda,
02211                            const float* tau, float* c, lapack_int ldc );
02212 lapack_int LAPACKE_dormrz( int matrix_order, char side, char trans,
02213                            lapack_int m, lapack_int n, lapack_int k,
02214                            lapack_int l, const double* a, lapack_int lda,
02215                            const double* tau, double* c, lapack_int ldc );
02216 
02217 lapack_int LAPACKE_sormtr( int matrix_order, char side, char uplo, char trans,
02218                            lapack_int m, lapack_int n, const float* a,
02219                            lapack_int lda, const float* tau, float* c,
02220                            lapack_int ldc );
02221 lapack_int LAPACKE_dormtr( int matrix_order, char side, char uplo, char trans,
02222                            lapack_int m, lapack_int n, const double* a,
02223                            lapack_int lda, const double* tau, double* c,
02224                            lapack_int ldc );
02225 
02226 lapack_int LAPACKE_spbcon( int matrix_order, char uplo, lapack_int n,
02227                            lapack_int kd, const float* ab, lapack_int ldab,
02228                            float anorm, float* rcond );
02229 lapack_int LAPACKE_dpbcon( int matrix_order, char uplo, lapack_int n,
02230                            lapack_int kd, const double* ab, lapack_int ldab,
02231                            double anorm, double* rcond );
02232 lapack_int LAPACKE_cpbcon( int matrix_order, char uplo, lapack_int n,
02233                            lapack_int kd, const lapack_complex_float* ab,
02234                            lapack_int ldab, float anorm, float* rcond );
02235 lapack_int LAPACKE_zpbcon( int matrix_order, char uplo, lapack_int n,
02236                            lapack_int kd, const lapack_complex_double* ab,
02237                            lapack_int ldab, double anorm, double* rcond );
02238 
02239 lapack_int LAPACKE_spbequ( int matrix_order, char uplo, lapack_int n,
02240                            lapack_int kd, const float* ab, lapack_int ldab,
02241                            float* s, float* scond, float* amax );
02242 lapack_int LAPACKE_dpbequ( int matrix_order, char uplo, lapack_int n,
02243                            lapack_int kd, const double* ab, lapack_int ldab,
02244                            double* s, double* scond, double* amax );
02245 lapack_int LAPACKE_cpbequ( int matrix_order, char uplo, lapack_int n,
02246                            lapack_int kd, const lapack_complex_float* ab,
02247                            lapack_int ldab, float* s, float* scond,
02248                            float* amax );
02249 lapack_int LAPACKE_zpbequ( int matrix_order, char uplo, lapack_int n,
02250                            lapack_int kd, const lapack_complex_double* ab,
02251                            lapack_int ldab, double* s, double* scond,
02252                            double* amax );
02253 
02254 lapack_int LAPACKE_spbrfs( int matrix_order, char uplo, lapack_int n,
02255                            lapack_int kd, lapack_int nrhs, const float* ab,
02256                            lapack_int ldab, const float* afb, lapack_int ldafb,
02257                            const float* b, lapack_int ldb, float* x,
02258                            lapack_int ldx, float* ferr, float* berr );
02259 lapack_int LAPACKE_dpbrfs( int matrix_order, char uplo, lapack_int n,
02260                            lapack_int kd, lapack_int nrhs, const double* ab,
02261                            lapack_int ldab, const double* afb, lapack_int ldafb,
02262                            const double* b, lapack_int ldb, double* x,
02263                            lapack_int ldx, double* ferr, double* berr );
02264 lapack_int LAPACKE_cpbrfs( int matrix_order, char uplo, lapack_int n,
02265                            lapack_int kd, lapack_int nrhs,
02266                            const lapack_complex_float* ab, lapack_int ldab,
02267                            const lapack_complex_float* afb, lapack_int ldafb,
02268                            const lapack_complex_float* b, lapack_int ldb,
02269                            lapack_complex_float* x, lapack_int ldx, float* ferr,
02270                            float* berr );
02271 lapack_int LAPACKE_zpbrfs( int matrix_order, char uplo, lapack_int n,
02272                            lapack_int kd, lapack_int nrhs,
02273                            const lapack_complex_double* ab, lapack_int ldab,
02274                            const lapack_complex_double* afb, lapack_int ldafb,
02275                            const lapack_complex_double* b, lapack_int ldb,
02276                            lapack_complex_double* x, lapack_int ldx,
02277                            double* ferr, double* berr );
02278 
02279 lapack_int LAPACKE_spbstf( int matrix_order, char uplo, lapack_int n,
02280                            lapack_int kb, float* bb, lapack_int ldbb );
02281 lapack_int LAPACKE_dpbstf( int matrix_order, char uplo, lapack_int n,
02282                            lapack_int kb, double* bb, lapack_int ldbb );
02283 lapack_int LAPACKE_cpbstf( int matrix_order, char uplo, lapack_int n,
02284                            lapack_int kb, lapack_complex_float* bb,
02285                            lapack_int ldbb );
02286 lapack_int LAPACKE_zpbstf( int matrix_order, char uplo, lapack_int n,
02287                            lapack_int kb, lapack_complex_double* bb,
02288                            lapack_int ldbb );
02289 
02290 lapack_int LAPACKE_spbsv( int matrix_order, char uplo, lapack_int n,
02291                           lapack_int kd, lapack_int nrhs, float* ab,
02292                           lapack_int ldab, float* b, lapack_int ldb );
02293 lapack_int LAPACKE_dpbsv( int matrix_order, char uplo, lapack_int n,
02294                           lapack_int kd, lapack_int nrhs, double* ab,
02295                           lapack_int ldab, double* b, lapack_int ldb );
02296 lapack_int LAPACKE_cpbsv( int matrix_order, char uplo, lapack_int n,
02297                           lapack_int kd, lapack_int nrhs,
02298                           lapack_complex_float* ab, lapack_int ldab,
02299                           lapack_complex_float* b, lapack_int ldb );
02300 lapack_int LAPACKE_zpbsv( int matrix_order, char uplo, lapack_int n,
02301                           lapack_int kd, lapack_int nrhs,
02302                           lapack_complex_double* ab, lapack_int ldab,
02303                           lapack_complex_double* b, lapack_int ldb );
02304 
02305 lapack_int LAPACKE_spbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02306                            lapack_int kd, lapack_int nrhs, float* ab,
02307                            lapack_int ldab, float* afb, lapack_int ldafb,
02308                            char* equed, float* s, float* b, lapack_int ldb,
02309                            float* x, lapack_int ldx, float* rcond, float* ferr,
02310                            float* berr );
02311 lapack_int LAPACKE_dpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02312                            lapack_int kd, lapack_int nrhs, double* ab,
02313                            lapack_int ldab, double* afb, lapack_int ldafb,
02314                            char* equed, double* s, double* b, lapack_int ldb,
02315                            double* x, lapack_int ldx, double* rcond,
02316                            double* ferr, double* berr );
02317 lapack_int LAPACKE_cpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02318                            lapack_int kd, lapack_int nrhs,
02319                            lapack_complex_float* ab, lapack_int ldab,
02320                            lapack_complex_float* afb, lapack_int ldafb,
02321                            char* equed, float* s, lapack_complex_float* b,
02322                            lapack_int ldb, lapack_complex_float* x,
02323                            lapack_int ldx, float* rcond, float* ferr,
02324                            float* berr );
02325 lapack_int LAPACKE_zpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02326                            lapack_int kd, lapack_int nrhs,
02327                            lapack_complex_double* ab, lapack_int ldab,
02328                            lapack_complex_double* afb, lapack_int ldafb,
02329                            char* equed, double* s, lapack_complex_double* b,
02330                            lapack_int ldb, lapack_complex_double* x,
02331                            lapack_int ldx, double* rcond, double* ferr,
02332                            double* berr );
02333 
02334 lapack_int LAPACKE_spbtrf( int matrix_order, char uplo, lapack_int n,
02335                            lapack_int kd, float* ab, lapack_int ldab );
02336 lapack_int LAPACKE_dpbtrf( int matrix_order, char uplo, lapack_int n,
02337                            lapack_int kd, double* ab, lapack_int ldab );
02338 lapack_int LAPACKE_cpbtrf( int matrix_order, char uplo, lapack_int n,
02339                            lapack_int kd, lapack_complex_float* ab,
02340                            lapack_int ldab );
02341 lapack_int LAPACKE_zpbtrf( int matrix_order, char uplo, lapack_int n,
02342                            lapack_int kd, lapack_complex_double* ab,
02343                            lapack_int ldab );
02344 
02345 lapack_int LAPACKE_spbtrs( int matrix_order, char uplo, lapack_int n,
02346                            lapack_int kd, lapack_int nrhs, const float* ab,
02347                            lapack_int ldab, float* b, lapack_int ldb );
02348 lapack_int LAPACKE_dpbtrs( int matrix_order, char uplo, lapack_int n,
02349                            lapack_int kd, lapack_int nrhs, const double* ab,
02350                            lapack_int ldab, double* b, lapack_int ldb );
02351 lapack_int LAPACKE_cpbtrs( int matrix_order, char uplo, lapack_int n,
02352                            lapack_int kd, lapack_int nrhs,
02353                            const lapack_complex_float* ab, lapack_int ldab,
02354                            lapack_complex_float* b, lapack_int ldb );
02355 lapack_int LAPACKE_zpbtrs( int matrix_order, char uplo, lapack_int n,
02356                            lapack_int kd, lapack_int nrhs,
02357                            const lapack_complex_double* ab, lapack_int ldab,
02358                            lapack_complex_double* b, lapack_int ldb );
02359 
02360 lapack_int LAPACKE_spftrf( int matrix_order, char transr, char uplo,
02361                            lapack_int n, float* a );
02362 lapack_int LAPACKE_dpftrf( int matrix_order, char transr, char uplo,
02363                            lapack_int n, double* a );
02364 lapack_int LAPACKE_cpftrf( int matrix_order, char transr, char uplo,
02365                            lapack_int n, lapack_complex_float* a );
02366 lapack_int LAPACKE_zpftrf( int matrix_order, char transr, char uplo,
02367                            lapack_int n, lapack_complex_double* a );
02368 
02369 lapack_int LAPACKE_spftri( int matrix_order, char transr, char uplo,
02370                            lapack_int n, float* a );
02371 lapack_int LAPACKE_dpftri( int matrix_order, char transr, char uplo,
02372                            lapack_int n, double* a );
02373 lapack_int LAPACKE_cpftri( int matrix_order, char transr, char uplo,
02374                            lapack_int n, lapack_complex_float* a );
02375 lapack_int LAPACKE_zpftri( int matrix_order, char transr, char uplo,
02376                            lapack_int n, lapack_complex_double* a );
02377 
02378 lapack_int LAPACKE_spftrs( int matrix_order, char transr, char uplo,
02379                            lapack_int n, lapack_int nrhs, const float* a,
02380                            float* b, lapack_int ldb );
02381 lapack_int LAPACKE_dpftrs( int matrix_order, char transr, char uplo,
02382                            lapack_int n, lapack_int nrhs, const double* a,
02383                            double* b, lapack_int ldb );
02384 lapack_int LAPACKE_cpftrs( int matrix_order, char transr, char uplo,
02385                            lapack_int n, lapack_int nrhs,
02386                            const lapack_complex_float* a,
02387                            lapack_complex_float* b, lapack_int ldb );
02388 lapack_int LAPACKE_zpftrs( int matrix_order, char transr, char uplo,
02389                            lapack_int n, lapack_int nrhs,
02390                            const lapack_complex_double* a,
02391                            lapack_complex_double* b, lapack_int ldb );
02392 
02393 lapack_int LAPACKE_spocon( int matrix_order, char uplo, lapack_int n,
02394                            const float* a, lapack_int lda, float anorm,
02395                            float* rcond );
02396 lapack_int LAPACKE_dpocon( int matrix_order, char uplo, lapack_int n,
02397                            const double* a, lapack_int lda, double anorm,
02398                            double* rcond );
02399 lapack_int LAPACKE_cpocon( int matrix_order, char uplo, lapack_int n,
02400                            const lapack_complex_float* a, lapack_int lda,
02401                            float anorm, float* rcond );
02402 lapack_int LAPACKE_zpocon( int matrix_order, char uplo, lapack_int n,
02403                            const lapack_complex_double* a, lapack_int lda,
02404                            double anorm, double* rcond );
02405 
02406 lapack_int LAPACKE_spoequ( int matrix_order, lapack_int n, const float* a,
02407                            lapack_int lda, float* s, float* scond,
02408                            float* amax );
02409 lapack_int LAPACKE_dpoequ( int matrix_order, lapack_int n, const double* a,
02410                            lapack_int lda, double* s, double* scond,
02411                            double* amax );
02412 lapack_int LAPACKE_cpoequ( int matrix_order, lapack_int n,
02413                            const lapack_complex_float* a, lapack_int lda,
02414                            float* s, float* scond, float* amax );
02415 lapack_int LAPACKE_zpoequ( int matrix_order, lapack_int n,
02416                            const lapack_complex_double* a, lapack_int lda,
02417                            double* s, double* scond, double* amax );
02418 
02419 lapack_int LAPACKE_spoequb( int matrix_order, lapack_int n, const float* a,
02420                             lapack_int lda, float* s, float* scond,
02421                             float* amax );
02422 lapack_int LAPACKE_dpoequb( int matrix_order, lapack_int n, const double* a,
02423                             lapack_int lda, double* s, double* scond,
02424                             double* amax );
02425 lapack_int LAPACKE_cpoequb( int matrix_order, lapack_int n,
02426                             const lapack_complex_float* a, lapack_int lda,
02427                             float* s, float* scond, float* amax );
02428 lapack_int LAPACKE_zpoequb( int matrix_order, lapack_int n,
02429                             const lapack_complex_double* a, lapack_int lda,
02430                             double* s, double* scond, double* amax );
02431 
02432 lapack_int LAPACKE_sporfs( int matrix_order, char uplo, lapack_int n,
02433                            lapack_int nrhs, const float* a, lapack_int lda,
02434                            const float* af, lapack_int ldaf, const float* b,
02435                            lapack_int ldb, float* x, lapack_int ldx,
02436                            float* ferr, float* berr );
02437 lapack_int LAPACKE_dporfs( int matrix_order, char uplo, lapack_int n,
02438                            lapack_int nrhs, const double* a, lapack_int lda,
02439                            const double* af, lapack_int ldaf, const double* b,
02440                            lapack_int ldb, double* x, lapack_int ldx,
02441                            double* ferr, double* berr );
02442 lapack_int LAPACKE_cporfs( int matrix_order, char uplo, lapack_int n,
02443                            lapack_int nrhs, const lapack_complex_float* a,
02444                            lapack_int lda, const lapack_complex_float* af,
02445                            lapack_int ldaf, const lapack_complex_float* b,
02446                            lapack_int ldb, lapack_complex_float* x,
02447                            lapack_int ldx, float* ferr, float* berr );
02448 lapack_int LAPACKE_zporfs( int matrix_order, char uplo, lapack_int n,
02449                            lapack_int nrhs, const lapack_complex_double* a,
02450                            lapack_int lda, const lapack_complex_double* af,
02451                            lapack_int ldaf, const lapack_complex_double* b,
02452                            lapack_int ldb, lapack_complex_double* x,
02453                            lapack_int ldx, double* ferr, double* berr );
02454 
02455 lapack_int LAPACKE_sporfsx( int matrix_order, char uplo, char equed,
02456                             lapack_int n, lapack_int nrhs, const float* a,
02457                             lapack_int lda, const float* af, lapack_int ldaf,
02458                             const float* s, const float* b, lapack_int ldb,
02459                             float* x, lapack_int ldx, float* rcond, float* berr,
02460                             lapack_int n_err_bnds, float* err_bnds_norm,
02461                             float* err_bnds_comp, lapack_int nparams,
02462                             float* params );
02463 lapack_int LAPACKE_dporfsx( int matrix_order, char uplo, char equed,
02464                             lapack_int n, lapack_int nrhs, const double* a,
02465                             lapack_int lda, const double* af, lapack_int ldaf,
02466                             const double* s, const double* b, lapack_int ldb,
02467                             double* x, lapack_int ldx, double* rcond,
02468                             double* berr, lapack_int n_err_bnds,
02469                             double* err_bnds_norm, double* err_bnds_comp,
02470                             lapack_int nparams, double* params );
02471 lapack_int LAPACKE_cporfsx( int matrix_order, char uplo, char equed,
02472                             lapack_int n, lapack_int nrhs,
02473                             const lapack_complex_float* a, lapack_int lda,
02474                             const lapack_complex_float* af, lapack_int ldaf,
02475                             const float* s, const lapack_complex_float* b,
02476                             lapack_int ldb, lapack_complex_float* x,
02477                             lapack_int ldx, float* rcond, float* berr,
02478                             lapack_int n_err_bnds, float* err_bnds_norm,
02479                             float* err_bnds_comp, lapack_int nparams,
02480                             float* params );
02481 lapack_int LAPACKE_zporfsx( int matrix_order, char uplo, char equed,
02482                             lapack_int n, lapack_int nrhs,
02483                             const lapack_complex_double* a, lapack_int lda,
02484                             const lapack_complex_double* af, lapack_int ldaf,
02485                             const double* s, const lapack_complex_double* b,
02486                             lapack_int ldb, lapack_complex_double* x,
02487                             lapack_int ldx, double* rcond, double* berr,
02488                             lapack_int n_err_bnds, double* err_bnds_norm,
02489                             double* err_bnds_comp, lapack_int nparams,
02490                             double* params );
02491 
02492 lapack_int LAPACKE_sposv( int matrix_order, char uplo, lapack_int n,
02493                           lapack_int nrhs, float* a, lapack_int lda, float* b,
02494                           lapack_int ldb );
02495 lapack_int LAPACKE_dposv( int matrix_order, char uplo, lapack_int n,
02496                           lapack_int nrhs, double* a, lapack_int lda, double* b,
02497                           lapack_int ldb );
02498 lapack_int LAPACKE_cposv( int matrix_order, char uplo, lapack_int n,
02499                           lapack_int nrhs, lapack_complex_float* a,
02500                           lapack_int lda, lapack_complex_float* b,
02501                           lapack_int ldb );
02502 lapack_int LAPACKE_zposv( int matrix_order, char uplo, lapack_int n,
02503                           lapack_int nrhs, lapack_complex_double* a,
02504                           lapack_int lda, lapack_complex_double* b,
02505                           lapack_int ldb );
02506 lapack_int LAPACKE_dsposv( int matrix_order, char uplo, lapack_int n,
02507                            lapack_int nrhs, double* a, lapack_int lda,
02508                            double* b, lapack_int ldb, double* x, lapack_int ldx,
02509                            lapack_int* iter );
02510 lapack_int LAPACKE_zcposv( int matrix_order, char uplo, lapack_int n,
02511                            lapack_int nrhs, lapack_complex_double* a,
02512                            lapack_int lda, lapack_complex_double* b,
02513                            lapack_int ldb, lapack_complex_double* x,
02514                            lapack_int ldx, lapack_int* iter );
02515 
02516 lapack_int LAPACKE_sposvx( int matrix_order, char fact, char uplo, lapack_int n,
02517                            lapack_int nrhs, float* a, lapack_int lda, float* af,
02518                            lapack_int ldaf, char* equed, float* s, float* b,
02519                            lapack_int ldb, float* x, lapack_int ldx,
02520                            float* rcond, float* ferr, float* berr );
02521 lapack_int LAPACKE_dposvx( int matrix_order, char fact, char uplo, lapack_int n,
02522                            lapack_int nrhs, double* a, lapack_int lda,
02523                            double* af, lapack_int ldaf, char* equed, double* s,
02524                            double* b, lapack_int ldb, double* x, lapack_int ldx,
02525                            double* rcond, double* ferr, double* berr );
02526 lapack_int LAPACKE_cposvx( int matrix_order, char fact, char uplo, lapack_int n,
02527                            lapack_int nrhs, lapack_complex_float* a,
02528                            lapack_int lda, lapack_complex_float* af,
02529                            lapack_int ldaf, char* equed, float* s,
02530                            lapack_complex_float* b, lapack_int ldb,
02531                            lapack_complex_float* x, lapack_int ldx,
02532                            float* rcond, float* ferr, float* berr );
02533 lapack_int LAPACKE_zposvx( int matrix_order, char fact, char uplo, lapack_int n,
02534                            lapack_int nrhs, lapack_complex_double* a,
02535                            lapack_int lda, lapack_complex_double* af,
02536                            lapack_int ldaf, char* equed, double* s,
02537                            lapack_complex_double* b, lapack_int ldb,
02538                            lapack_complex_double* x, lapack_int ldx,
02539                            double* rcond, double* ferr, double* berr );
02540 
02541 lapack_int LAPACKE_sposvxx( int matrix_order, char fact, char uplo,
02542                             lapack_int n, lapack_int nrhs, float* a,
02543                             lapack_int lda, float* af, lapack_int ldaf,
02544                             char* equed, float* s, float* b, lapack_int ldb,
02545                             float* x, lapack_int ldx, float* rcond,
02546                             float* rpvgrw, float* berr, lapack_int n_err_bnds,
02547                             float* err_bnds_norm, float* err_bnds_comp,
02548                             lapack_int nparams, float* params );
02549 lapack_int LAPACKE_dposvxx( int matrix_order, char fact, char uplo,
02550                             lapack_int n, lapack_int nrhs, double* a,
02551                             lapack_int lda, double* af, lapack_int ldaf,
02552                             char* equed, double* s, double* b, lapack_int ldb,
02553                             double* x, lapack_int ldx, double* rcond,
02554                             double* rpvgrw, double* berr, lapack_int n_err_bnds,
02555                             double* err_bnds_norm, double* err_bnds_comp,
02556                             lapack_int nparams, double* params );
02557 lapack_int LAPACKE_cposvxx( int matrix_order, char fact, char uplo,
02558                             lapack_int n, lapack_int nrhs,
02559                             lapack_complex_float* a, lapack_int lda,
02560                             lapack_complex_float* af, lapack_int ldaf,
02561                             char* equed, float* s, lapack_complex_float* b,
02562                             lapack_int ldb, lapack_complex_float* x,
02563                             lapack_int ldx, float* rcond, float* rpvgrw,
02564                             float* berr, lapack_int n_err_bnds,
02565                             float* err_bnds_norm, float* err_bnds_comp,
02566                             lapack_int nparams, float* params );
02567 lapack_int LAPACKE_zposvxx( int matrix_order, char fact, char uplo,
02568                             lapack_int n, lapack_int nrhs,
02569                             lapack_complex_double* a, lapack_int lda,
02570                             lapack_complex_double* af, lapack_int ldaf,
02571                             char* equed, double* s, lapack_complex_double* b,
02572                             lapack_int ldb, lapack_complex_double* x,
02573                             lapack_int ldx, double* rcond, double* rpvgrw,
02574                             double* berr, lapack_int n_err_bnds,
02575                             double* err_bnds_norm, double* err_bnds_comp,
02576                             lapack_int nparams, double* params );
02577 
02578 lapack_int LAPACKE_spotrf( int matrix_order, char uplo, lapack_int n, float* a,
02579                            lapack_int lda );
02580 lapack_int LAPACKE_dpotrf( int matrix_order, char uplo, lapack_int n, double* a,
02581                            lapack_int lda );
02582 lapack_int LAPACKE_cpotrf( int matrix_order, char uplo, lapack_int n,
02583                            lapack_complex_float* a, lapack_int lda );
02584 lapack_int LAPACKE_zpotrf( int matrix_order, char uplo, lapack_int n,
02585                            lapack_complex_double* a, lapack_int lda );
02586 
02587 lapack_int LAPACKE_spotri( int matrix_order, char uplo, lapack_int n, float* a,
02588                            lapack_int lda );
02589 lapack_int LAPACKE_dpotri( int matrix_order, char uplo, lapack_int n, double* a,
02590                            lapack_int lda );
02591 lapack_int LAPACKE_cpotri( int matrix_order, char uplo, lapack_int n,
02592                            lapack_complex_float* a, lapack_int lda );
02593 lapack_int LAPACKE_zpotri( int matrix_order, char uplo, lapack_int n,
02594                            lapack_complex_double* a, lapack_int lda );
02595 
02596 lapack_int LAPACKE_spotrs( int matrix_order, char uplo, lapack_int n,
02597                            lapack_int nrhs, const float* a, lapack_int lda,
02598                            float* b, lapack_int ldb );
02599 lapack_int LAPACKE_dpotrs( int matrix_order, char uplo, lapack_int n,
02600                            lapack_int nrhs, const double* a, lapack_int lda,
02601                            double* b, lapack_int ldb );
02602 lapack_int LAPACKE_cpotrs( int matrix_order, char uplo, lapack_int n,
02603                            lapack_int nrhs, const lapack_complex_float* a,
02604                            lapack_int lda, lapack_complex_float* b,
02605                            lapack_int ldb );
02606 lapack_int LAPACKE_zpotrs( int matrix_order, char uplo, lapack_int n,
02607                            lapack_int nrhs, const lapack_complex_double* a,
02608                            lapack_int lda, lapack_complex_double* b,
02609                            lapack_int ldb );
02610 
02611 lapack_int LAPACKE_sppcon( int matrix_order, char uplo, lapack_int n,
02612                            const float* ap, float anorm, float* rcond );
02613 lapack_int LAPACKE_dppcon( int matrix_order, char uplo, lapack_int n,
02614                            const double* ap, double anorm, double* rcond );
02615 lapack_int LAPACKE_cppcon( int matrix_order, char uplo, lapack_int n,
02616                            const lapack_complex_float* ap, float anorm,
02617                            float* rcond );
02618 lapack_int LAPACKE_zppcon( int matrix_order, char uplo, lapack_int n,
02619                            const lapack_complex_double* ap, double anorm,
02620                            double* rcond );
02621 
02622 lapack_int LAPACKE_sppequ( int matrix_order, char uplo, lapack_int n,
02623                            const float* ap, float* s, float* scond,
02624                            float* amax );
02625 lapack_int LAPACKE_dppequ( int matrix_order, char uplo, lapack_int n,
02626                            const double* ap, double* s, double* scond,
02627                            double* amax );
02628 lapack_int LAPACKE_cppequ( int matrix_order, char uplo, lapack_int n,
02629                            const lapack_complex_float* ap, float* s,
02630                            float* scond, float* amax );
02631 lapack_int LAPACKE_zppequ( int matrix_order, char uplo, lapack_int n,
02632                            const lapack_complex_double* ap, double* s,
02633                            double* scond, double* amax );
02634 
02635 lapack_int LAPACKE_spprfs( int matrix_order, char uplo, lapack_int n,
02636                            lapack_int nrhs, const float* ap, const float* afp,
02637                            const float* b, lapack_int ldb, float* x,
02638                            lapack_int ldx, float* ferr, float* berr );
02639 lapack_int LAPACKE_dpprfs( int matrix_order, char uplo, lapack_int n,
02640                            lapack_int nrhs, const double* ap, const double* afp,
02641                            const double* b, lapack_int ldb, double* x,
02642                            lapack_int ldx, double* ferr, double* berr );
02643 lapack_int LAPACKE_cpprfs( int matrix_order, char uplo, lapack_int n,
02644                            lapack_int nrhs, const lapack_complex_float* ap,
02645                            const lapack_complex_float* afp,
02646                            const lapack_complex_float* b, lapack_int ldb,
02647                            lapack_complex_float* x, lapack_int ldx, float* ferr,
02648                            float* berr );
02649 lapack_int LAPACKE_zpprfs( int matrix_order, char uplo, lapack_int n,
02650                            lapack_int nrhs, const lapack_complex_double* ap,
02651                            const lapack_complex_double* afp,
02652                            const lapack_complex_double* b, lapack_int ldb,
02653                            lapack_complex_double* x, lapack_int ldx,
02654                            double* ferr, double* berr );
02655 
02656 lapack_int LAPACKE_sppsv( int matrix_order, char uplo, lapack_int n,
02657                           lapack_int nrhs, float* ap, float* b,
02658                           lapack_int ldb );
02659 lapack_int LAPACKE_dppsv( int matrix_order, char uplo, lapack_int n,
02660                           lapack_int nrhs, double* ap, double* b,
02661                           lapack_int ldb );
02662 lapack_int LAPACKE_cppsv( int matrix_order, char uplo, lapack_int n,
02663                           lapack_int nrhs, lapack_complex_float* ap,
02664                           lapack_complex_float* b, lapack_int ldb );
02665 lapack_int LAPACKE_zppsv( int matrix_order, char uplo, lapack_int n,
02666                           lapack_int nrhs, lapack_complex_double* ap,
02667                           lapack_complex_double* b, lapack_int ldb );
02668 
02669 lapack_int LAPACKE_sppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02670                            lapack_int nrhs, float* ap, float* afp, char* equed,
02671                            float* s, float* b, lapack_int ldb, float* x,
02672                            lapack_int ldx, float* rcond, float* ferr,
02673                            float* berr );
02674 lapack_int LAPACKE_dppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02675                            lapack_int nrhs, double* ap, double* afp,
02676                            char* equed, double* s, double* b, lapack_int ldb,
02677                            double* x, lapack_int ldx, double* rcond,
02678                            double* ferr, double* berr );
02679 lapack_int LAPACKE_cppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02680                            lapack_int nrhs, lapack_complex_float* ap,
02681                            lapack_complex_float* afp, char* equed, float* s,
02682                            lapack_complex_float* b, lapack_int ldb,
02683                            lapack_complex_float* x, lapack_int ldx,
02684                            float* rcond, float* ferr, float* berr );
02685 lapack_int LAPACKE_zppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02686                            lapack_int nrhs, lapack_complex_double* ap,
02687                            lapack_complex_double* afp, char* equed, double* s,
02688                            lapack_complex_double* b, lapack_int ldb,
02689                            lapack_complex_double* x, lapack_int ldx,
02690                            double* rcond, double* ferr, double* berr );
02691 
02692 lapack_int LAPACKE_spptrf( int matrix_order, char uplo, lapack_int n,
02693                            float* ap );
02694 lapack_int LAPACKE_dpptrf( int matrix_order, char uplo, lapack_int n,
02695                            double* ap );
02696 lapack_int LAPACKE_cpptrf( int matrix_order, char uplo, lapack_int n,
02697                            lapack_complex_float* ap );
02698 lapack_int LAPACKE_zpptrf( int matrix_order, char uplo, lapack_int n,
02699                            lapack_complex_double* ap );
02700 
02701 lapack_int LAPACKE_spptri( int matrix_order, char uplo, lapack_int n,
02702                            float* ap );
02703 lapack_int LAPACKE_dpptri( int matrix_order, char uplo, lapack_int n,
02704                            double* ap );
02705 lapack_int LAPACKE_cpptri( int matrix_order, char uplo, lapack_int n,
02706                            lapack_complex_float* ap );
02707 lapack_int LAPACKE_zpptri( int matrix_order, char uplo, lapack_int n,
02708                            lapack_complex_double* ap );
02709 
02710 lapack_int LAPACKE_spptrs( int matrix_order, char uplo, lapack_int n,
02711                            lapack_int nrhs, const float* ap, float* b,
02712                            lapack_int ldb );
02713 lapack_int LAPACKE_dpptrs( int matrix_order, char uplo, lapack_int n,
02714                            lapack_int nrhs, const double* ap, double* b,
02715                            lapack_int ldb );
02716 lapack_int LAPACKE_cpptrs( int matrix_order, char uplo, lapack_int n,
02717                            lapack_int nrhs, const lapack_complex_float* ap,
02718                            lapack_complex_float* b, lapack_int ldb );
02719 lapack_int LAPACKE_zpptrs( int matrix_order, char uplo, lapack_int n,
02720                            lapack_int nrhs, const lapack_complex_double* ap,
02721                            lapack_complex_double* b, lapack_int ldb );
02722 
02723 lapack_int LAPACKE_spstrf( int matrix_order, char uplo, lapack_int n, float* a,
02724                            lapack_int lda, lapack_int* piv, lapack_int* rank,
02725                            float tol );
02726 lapack_int LAPACKE_dpstrf( int matrix_order, char uplo, lapack_int n, double* a,
02727                            lapack_int lda, lapack_int* piv, lapack_int* rank,
02728                            double tol );
02729 lapack_int LAPACKE_cpstrf( int matrix_order, char uplo, lapack_int n,
02730                            lapack_complex_float* a, lapack_int lda,
02731                            lapack_int* piv, lapack_int* rank, float tol );
02732 lapack_int LAPACKE_zpstrf( int matrix_order, char uplo, lapack_int n,
02733                            lapack_complex_double* a, lapack_int lda,
02734                            lapack_int* piv, lapack_int* rank, double tol );
02735 
02736 lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
02737                            float anorm, float* rcond );
02738 lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
02739                            double anorm, double* rcond );
02740 lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
02741                            const lapack_complex_float* e, float anorm,
02742                            float* rcond );
02743 lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
02744                            const lapack_complex_double* e, double anorm,
02745                            double* rcond );
02746 
02747 lapack_int LAPACKE_spteqr( int matrix_order, char compz, lapack_int n, float* d,
02748                            float* e, float* z, lapack_int ldz );
02749 lapack_int LAPACKE_dpteqr( int matrix_order, char compz, lapack_int n,
02750                            double* d, double* e, double* z, lapack_int ldz );
02751 lapack_int LAPACKE_cpteqr( int matrix_order, char compz, lapack_int n, float* d,
02752                            float* e, lapack_complex_float* z, lapack_int ldz );
02753 lapack_int LAPACKE_zpteqr( int matrix_order, char compz, lapack_int n,
02754                            double* d, double* e, lapack_complex_double* z,
02755                            lapack_int ldz );
02756 
02757 lapack_int LAPACKE_sptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
02758                            const float* d, const float* e, const float* df,
02759                            const float* ef, const float* b, lapack_int ldb,
02760                            float* x, lapack_int ldx, float* ferr, float* berr );
02761 lapack_int LAPACKE_dptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
02762                            const double* d, const double* e, const double* df,
02763                            const double* ef, const double* b, lapack_int ldb,
02764                            double* x, lapack_int ldx, double* ferr,
02765                            double* berr );
02766 lapack_int LAPACKE_cptrfs( int matrix_order, char uplo, lapack_int n,
02767                            lapack_int nrhs, const float* d,
02768                            const lapack_complex_float* e, const float* df,
02769                            const lapack_complex_float* ef,
02770                            const lapack_complex_float* b, lapack_int ldb,
02771                            lapack_complex_float* x, lapack_int ldx, float* ferr,
02772                            float* berr );
02773 lapack_int LAPACKE_zptrfs( int matrix_order, char uplo, lapack_int n,
02774                            lapack_int nrhs, const double* d,
02775                            const lapack_complex_double* e, const double* df,
02776                            const lapack_complex_double* ef,
02777                            const lapack_complex_double* b, lapack_int ldb,
02778                            lapack_complex_double* x, lapack_int ldx,
02779                            double* ferr, double* berr );
02780 
02781 lapack_int LAPACKE_sptsv( int matrix_order, lapack_int n, lapack_int nrhs,
02782                           float* d, float* e, float* b, lapack_int ldb );
02783 lapack_int LAPACKE_dptsv( int matrix_order, lapack_int n, lapack_int nrhs,
02784                           double* d, double* e, double* b, lapack_int ldb );
02785 lapack_int LAPACKE_cptsv( int matrix_order, lapack_int n, lapack_int nrhs,
02786                           float* d, lapack_complex_float* e,
02787                           lapack_complex_float* b, lapack_int ldb );
02788 lapack_int LAPACKE_zptsv( int matrix_order, lapack_int n, lapack_int nrhs,
02789                           double* d, lapack_complex_double* e,
02790                           lapack_complex_double* b, lapack_int ldb );
02791 
02792 lapack_int LAPACKE_sptsvx( int matrix_order, char fact, lapack_int n,
02793                            lapack_int nrhs, const float* d, const float* e,
02794                            float* df, float* ef, const float* b, lapack_int ldb,
02795                            float* x, lapack_int ldx, float* rcond, float* ferr,
02796                            float* berr );
02797 lapack_int LAPACKE_dptsvx( int matrix_order, char fact, lapack_int n,
02798                            lapack_int nrhs, const double* d, const double* e,
02799                            double* df, double* ef, const double* b,
02800                            lapack_int ldb, double* x, lapack_int ldx,
02801                            double* rcond, double* ferr, double* berr );
02802 lapack_int LAPACKE_cptsvx( int matrix_order, char fact, lapack_int n,
02803                            lapack_int nrhs, const float* d,
02804                            const lapack_complex_float* e, float* df,
02805                            lapack_complex_float* ef,
02806                            const lapack_complex_float* b, lapack_int ldb,
02807                            lapack_complex_float* x, lapack_int ldx,
02808                            float* rcond, float* ferr, float* berr );
02809 lapack_int LAPACKE_zptsvx( int matrix_order, char fact, lapack_int n,
02810                            lapack_int nrhs, const double* d,
02811                            const lapack_complex_double* e, double* df,
02812                            lapack_complex_double* ef,
02813                            const lapack_complex_double* b, lapack_int ldb,
02814                            lapack_complex_double* x, lapack_int ldx,
02815                            double* rcond, double* ferr, double* berr );
02816 
02817 lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
02818 lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
02819 lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
02820 lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
02821 
02822 lapack_int LAPACKE_spttrs( int matrix_order, lapack_int n, lapack_int nrhs,
02823                            const float* d, const float* e, float* b,
02824                            lapack_int ldb );
02825 lapack_int LAPACKE_dpttrs( int matrix_order, lapack_int n, lapack_int nrhs,
02826                            const double* d, const double* e, double* b,
02827                            lapack_int ldb );
02828 lapack_int LAPACKE_cpttrs( int matrix_order, char uplo, lapack_int n,
02829                            lapack_int nrhs, const float* d,
02830                            const lapack_complex_float* e,
02831                            lapack_complex_float* b, lapack_int ldb );
02832 lapack_int LAPACKE_zpttrs( int matrix_order, char uplo, lapack_int n,
02833                            lapack_int nrhs, const double* d,
02834                            const lapack_complex_double* e,
02835                            lapack_complex_double* b, lapack_int ldb );
02836 
02837 lapack_int LAPACKE_ssbev( int matrix_order, char jobz, char uplo, lapack_int n,
02838                           lapack_int kd, float* ab, lapack_int ldab, float* w,
02839                           float* z, lapack_int ldz );
02840 lapack_int LAPACKE_dsbev( int matrix_order, char jobz, char uplo, lapack_int n,
02841                           lapack_int kd, double* ab, lapack_int ldab, double* w,
02842                           double* z, lapack_int ldz );
02843 
02844 lapack_int LAPACKE_ssbevd( int matrix_order, char jobz, char uplo, lapack_int n,
02845                            lapack_int kd, float* ab, lapack_int ldab, float* w,
02846                            float* z, lapack_int ldz );
02847 lapack_int LAPACKE_dsbevd( int matrix_order, char jobz, char uplo, lapack_int n,
02848                            lapack_int kd, double* ab, lapack_int ldab,
02849                            double* w, double* z, lapack_int ldz );
02850 
02851 lapack_int LAPACKE_ssbevx( int matrix_order, char jobz, char range, char uplo,
02852                            lapack_int n, lapack_int kd, float* ab,
02853                            lapack_int ldab, float* q, lapack_int ldq, float vl,
02854                            float vu, lapack_int il, lapack_int iu, float abstol,
02855                            lapack_int* m, float* w, float* z, lapack_int ldz,
02856                            lapack_int* ifail );
02857 lapack_int LAPACKE_dsbevx( int matrix_order, char jobz, char range, char uplo,
02858                            lapack_int n, lapack_int kd, double* ab,
02859                            lapack_int ldab, double* q, lapack_int ldq,
02860                            double vl, double vu, lapack_int il, lapack_int iu,
02861                            double abstol, lapack_int* m, double* w, double* z,
02862                            lapack_int ldz, lapack_int* ifail );
02863 
02864 lapack_int LAPACKE_ssbgst( int matrix_order, char vect, char uplo, lapack_int n,
02865                            lapack_int ka, lapack_int kb, float* ab,
02866                            lapack_int ldab, const float* bb, lapack_int ldbb,
02867                            float* x, lapack_int ldx );
02868 lapack_int LAPACKE_dsbgst( int matrix_order, char vect, char uplo, lapack_int n,
02869                            lapack_int ka, lapack_int kb, double* ab,
02870                            lapack_int ldab, const double* bb, lapack_int ldbb,
02871                            double* x, lapack_int ldx );
02872 
02873 lapack_int LAPACKE_ssbgv( int matrix_order, char jobz, char uplo, lapack_int n,
02874                           lapack_int ka, lapack_int kb, float* ab,
02875                           lapack_int ldab, float* bb, lapack_int ldbb, float* w,
02876                           float* z, lapack_int ldz );
02877 lapack_int LAPACKE_dsbgv( int matrix_order, char jobz, char uplo, lapack_int n,
02878                           lapack_int ka, lapack_int kb, double* ab,
02879                           lapack_int ldab, double* bb, lapack_int ldbb,
02880                           double* w, double* z, lapack_int ldz );
02881 
02882 lapack_int LAPACKE_ssbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
02883                            lapack_int ka, lapack_int kb, float* ab,
02884                            lapack_int ldab, float* bb, lapack_int ldbb,
02885                            float* w, float* z, lapack_int ldz );
02886 lapack_int LAPACKE_dsbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
02887                            lapack_int ka, lapack_int kb, double* ab,
02888                            lapack_int ldab, double* bb, lapack_int ldbb,
02889                            double* w, double* z, lapack_int ldz );
02890 
02891 lapack_int LAPACKE_ssbgvx( int matrix_order, char jobz, char range, char uplo,
02892                            lapack_int n, lapack_int ka, lapack_int kb,
02893                            float* ab, lapack_int ldab, float* bb,
02894                            lapack_int ldbb, float* q, lapack_int ldq, float vl,
02895                            float vu, lapack_int il, lapack_int iu, float abstol,
02896                            lapack_int* m, float* w, float* z, lapack_int ldz,
02897                            lapack_int* ifail );
02898 lapack_int LAPACKE_dsbgvx( int matrix_order, char jobz, char range, char uplo,
02899                            lapack_int n, lapack_int ka, lapack_int kb,
02900                            double* ab, lapack_int ldab, double* bb,
02901                            lapack_int ldbb, double* q, lapack_int ldq,
02902                            double vl, double vu, lapack_int il, lapack_int iu,
02903                            double abstol, lapack_int* m, double* w, double* z,
02904                            lapack_int ldz, lapack_int* ifail );
02905 
02906 lapack_int LAPACKE_ssbtrd( int matrix_order, char vect, char uplo, lapack_int n,
02907                            lapack_int kd, float* ab, lapack_int ldab, float* d,
02908                            float* e, float* q, lapack_int ldq );
02909 lapack_int LAPACKE_dsbtrd( int matrix_order, char vect, char uplo, lapack_int n,
02910                            lapack_int kd, double* ab, lapack_int ldab,
02911                            double* d, double* e, double* q, lapack_int ldq );
02912 
02913 lapack_int LAPACKE_ssfrk( int matrix_order, char transr, char uplo, char trans,
02914                           lapack_int n, lapack_int k, float alpha,
02915                           const float* a, lapack_int lda, float beta,
02916                           float* c );
02917 lapack_int LAPACKE_dsfrk( int matrix_order, char transr, char uplo, char trans,
02918                           lapack_int n, lapack_int k, double alpha,
02919                           const double* a, lapack_int lda, double beta,
02920                           double* c );
02921 
02922 lapack_int LAPACKE_sspcon( int matrix_order, char uplo, lapack_int n,
02923                            const float* ap, const lapack_int* ipiv, float anorm,
02924                            float* rcond );
02925 lapack_int LAPACKE_dspcon( int matrix_order, char uplo, lapack_int n,
02926                            const double* ap, const lapack_int* ipiv,
02927                            double anorm, double* rcond );
02928 lapack_int LAPACKE_cspcon( int matrix_order, char uplo, lapack_int n,
02929                            const lapack_complex_float* ap,
02930                            const lapack_int* ipiv, float anorm, float* rcond );
02931 lapack_int LAPACKE_zspcon( int matrix_order, char uplo, lapack_int n,
02932                            const lapack_complex_double* ap,
02933                            const lapack_int* ipiv, double anorm,
02934                            double* rcond );
02935 
02936 lapack_int LAPACKE_sspev( int matrix_order, char jobz, char uplo, lapack_int n,
02937                           float* ap, float* w, float* z, lapack_int ldz );
02938 lapack_int LAPACKE_dspev( int matrix_order, char jobz, char uplo, lapack_int n,
02939                           double* ap, double* w, double* z, lapack_int ldz );
02940 
02941 lapack_int LAPACKE_sspevd( int matrix_order, char jobz, char uplo, lapack_int n,
02942                            float* ap, float* w, float* z, lapack_int ldz );
02943 lapack_int LAPACKE_dspevd( int matrix_order, char jobz, char uplo, lapack_int n,
02944                            double* ap, double* w, double* z, lapack_int ldz );
02945 
02946 lapack_int LAPACKE_sspevx( int matrix_order, char jobz, char range, char uplo,
02947                            lapack_int n, float* ap, float vl, float vu,
02948                            lapack_int il, lapack_int iu, float abstol,
02949                            lapack_int* m, float* w, float* z, lapack_int ldz,
02950                            lapack_int* ifail );
02951 lapack_int LAPACKE_dspevx( int matrix_order, char jobz, char range, char uplo,
02952                            lapack_int n, double* ap, double vl, double vu,
02953                            lapack_int il, lapack_int iu, double abstol,
02954                            lapack_int* m, double* w, double* z, lapack_int ldz,
02955                            lapack_int* ifail );
02956 
02957 lapack_int LAPACKE_sspgst( int matrix_order, lapack_int itype, char uplo,
02958                            lapack_int n, float* ap, const float* bp );
02959 lapack_int LAPACKE_dspgst( int matrix_order, lapack_int itype, char uplo,
02960                            lapack_int n, double* ap, const double* bp );
02961 
02962 lapack_int LAPACKE_sspgv( int matrix_order, lapack_int itype, char jobz,
02963                           char uplo, lapack_int n, float* ap, float* bp,
02964                           float* w, float* z, lapack_int ldz );
02965 lapack_int LAPACKE_dspgv( int matrix_order, lapack_int itype, char jobz,
02966                           char uplo, lapack_int n, double* ap, double* bp,
02967                           double* w, double* z, lapack_int ldz );
02968 
02969 lapack_int LAPACKE_sspgvd( int matrix_order, lapack_int itype, char jobz,
02970                            char uplo, lapack_int n, float* ap, float* bp,
02971                            float* w, float* z, lapack_int ldz );
02972 lapack_int LAPACKE_dspgvd( int matrix_order, lapack_int itype, char jobz,
02973                            char uplo, lapack_int n, double* ap, double* bp,
02974                            double* w, double* z, lapack_int ldz );
02975 
02976 lapack_int LAPACKE_sspgvx( int matrix_order, lapack_int itype, char jobz,
02977                            char range, char uplo, lapack_int n, float* ap,
02978                            float* bp, float vl, float vu, lapack_int il,
02979                            lapack_int iu, float abstol, lapack_int* m, float* w,
02980                            float* z, lapack_int ldz, lapack_int* ifail );
02981 lapack_int LAPACKE_dspgvx( int matrix_order, lapack_int itype, char jobz,
02982                            char range, char uplo, lapack_int n, double* ap,
02983                            double* bp, double vl, double vu, lapack_int il,
02984                            lapack_int iu, double abstol, lapack_int* m,
02985                            double* w, double* z, lapack_int ldz,
02986                            lapack_int* ifail );
02987 
02988 lapack_int LAPACKE_ssprfs( int matrix_order, char uplo, lapack_int n,
02989                            lapack_int nrhs, const float* ap, const float* afp,
02990                            const lapack_int* ipiv, const float* b,
02991                            lapack_int ldb, float* x, lapack_int ldx,
02992                            float* ferr, float* berr );
02993 lapack_int LAPACKE_dsprfs( int matrix_order, char uplo, lapack_int n,
02994                            lapack_int nrhs, const double* ap, const double* afp,
02995                            const lapack_int* ipiv, const double* b,
02996                            lapack_int ldb, double* x, lapack_int ldx,
02997                            double* ferr, double* berr );
02998 lapack_int LAPACKE_csprfs( int matrix_order, char uplo, lapack_int n,
02999                            lapack_int nrhs, const lapack_complex_float* ap,
03000                            const lapack_complex_float* afp,
03001                            const lapack_int* ipiv,
03002                            const lapack_complex_float* b, lapack_int ldb,
03003                            lapack_complex_float* x, lapack_int ldx, float* ferr,
03004                            float* berr );
03005 lapack_int LAPACKE_zsprfs( int matrix_order, char uplo, lapack_int n,
03006                            lapack_int nrhs, const lapack_complex_double* ap,
03007                            const lapack_complex_double* afp,
03008                            const lapack_int* ipiv,
03009                            const lapack_complex_double* b, lapack_int ldb,
03010                            lapack_complex_double* x, lapack_int ldx,
03011                            double* ferr, double* berr );
03012 
03013 lapack_int LAPACKE_sspsv( int matrix_order, char uplo, lapack_int n,
03014                           lapack_int nrhs, float* ap, lapack_int* ipiv,
03015                           float* b, lapack_int ldb );
03016 lapack_int LAPACKE_dspsv( int matrix_order, char uplo, lapack_int n,
03017                           lapack_int nrhs, double* ap, lapack_int* ipiv,
03018                           double* b, lapack_int ldb );
03019 lapack_int LAPACKE_cspsv( int matrix_order, char uplo, lapack_int n,
03020                           lapack_int nrhs, lapack_complex_float* ap,
03021                           lapack_int* ipiv, lapack_complex_float* b,
03022                           lapack_int ldb );
03023 lapack_int LAPACKE_zspsv( int matrix_order, char uplo, lapack_int n,
03024                           lapack_int nrhs, lapack_complex_double* ap,
03025                           lapack_int* ipiv, lapack_complex_double* b,
03026                           lapack_int ldb );
03027 
03028 lapack_int LAPACKE_sspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03029                            lapack_int nrhs, const float* ap, float* afp,
03030                            lapack_int* ipiv, const float* b, lapack_int ldb,
03031                            float* x, lapack_int ldx, float* rcond, float* ferr,
03032                            float* berr );
03033 lapack_int LAPACKE_dspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03034                            lapack_int nrhs, const double* ap, double* afp,
03035                            lapack_int* ipiv, const double* b, lapack_int ldb,
03036                            double* x, lapack_int ldx, double* rcond,
03037                            double* ferr, double* berr );
03038 lapack_int LAPACKE_cspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03039                            lapack_int nrhs, const lapack_complex_float* ap,
03040                            lapack_complex_float* afp, lapack_int* ipiv,
03041                            const lapack_complex_float* b, lapack_int ldb,
03042                            lapack_complex_float* x, lapack_int ldx,
03043                            float* rcond, float* ferr, float* berr );
03044 lapack_int LAPACKE_zspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03045                            lapack_int nrhs, const lapack_complex_double* ap,
03046                            lapack_complex_double* afp, lapack_int* ipiv,
03047                            const lapack_complex_double* b, lapack_int ldb,
03048                            lapack_complex_double* x, lapack_int ldx,
03049                            double* rcond, double* ferr, double* berr );
03050 
03051 lapack_int LAPACKE_ssptrd( int matrix_order, char uplo, lapack_int n, float* ap,
03052                            float* d, float* e, float* tau );
03053 lapack_int LAPACKE_dsptrd( int matrix_order, char uplo, lapack_int n,
03054                            double* ap, double* d, double* e, double* tau );
03055 
03056 lapack_int LAPACKE_ssptrf( int matrix_order, char uplo, lapack_int n, float* ap,
03057                            lapack_int* ipiv );
03058 lapack_int LAPACKE_dsptrf( int matrix_order, char uplo, lapack_int n,
03059                            double* ap, lapack_int* ipiv );
03060 lapack_int LAPACKE_csptrf( int matrix_order, char uplo, lapack_int n,
03061                            lapack_complex_float* ap, lapack_int* ipiv );
03062 lapack_int LAPACKE_zsptrf( int matrix_order, char uplo, lapack_int n,
03063                            lapack_complex_double* ap, lapack_int* ipiv );
03064 
03065 lapack_int LAPACKE_ssptri( int matrix_order, char uplo, lapack_int n, float* ap,
03066                            const lapack_int* ipiv );
03067 lapack_int LAPACKE_dsptri( int matrix_order, char uplo, lapack_int n,
03068                            double* ap, const lapack_int* ipiv );
03069 lapack_int LAPACKE_csptri( int matrix_order, char uplo, lapack_int n,
03070                            lapack_complex_float* ap, const lapack_int* ipiv );
03071 lapack_int LAPACKE_zsptri( int matrix_order, char uplo, lapack_int n,
03072                            lapack_complex_double* ap, const lapack_int* ipiv );
03073 
03074 lapack_int LAPACKE_ssptrs( int matrix_order, char uplo, lapack_int n,
03075                            lapack_int nrhs, const float* ap,
03076                            const lapack_int* ipiv, float* b, lapack_int ldb );
03077 lapack_int LAPACKE_dsptrs( int matrix_order, char uplo, lapack_int n,
03078                            lapack_int nrhs, const double* ap,
03079                            const lapack_int* ipiv, double* b, lapack_int ldb );
03080 lapack_int LAPACKE_csptrs( int matrix_order, char uplo, lapack_int n,
03081                            lapack_int nrhs, const lapack_complex_float* ap,
03082                            const lapack_int* ipiv, lapack_complex_float* b,
03083                            lapack_int ldb );
03084 lapack_int LAPACKE_zsptrs( int matrix_order, char uplo, lapack_int n,
03085                            lapack_int nrhs, const lapack_complex_double* ap,
03086                            const lapack_int* ipiv, lapack_complex_double* b,
03087                            lapack_int ldb );
03088 
03089 lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
03090                            float vu, lapack_int il, lapack_int iu, float abstol,
03091                            const float* d, const float* e, lapack_int* m,
03092                            lapack_int* nsplit, float* w, lapack_int* iblock,
03093                            lapack_int* isplit );
03094 lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
03095                            double vu, lapack_int il, lapack_int iu,
03096                            double abstol, const double* d, const double* e,
03097                            lapack_int* m, lapack_int* nsplit, double* w,
03098                            lapack_int* iblock, lapack_int* isplit );
03099 
03100 lapack_int LAPACKE_sstedc( int matrix_order, char compz, lapack_int n, float* d,
03101                            float* e, float* z, lapack_int ldz );
03102 lapack_int LAPACKE_dstedc( int matrix_order, char compz, lapack_int n,
03103                            double* d, double* e, double* z, lapack_int ldz );
03104 lapack_int LAPACKE_cstedc( int matrix_order, char compz, lapack_int n, float* d,
03105                            float* e, lapack_complex_float* z, lapack_int ldz );
03106 lapack_int LAPACKE_zstedc( int matrix_order, char compz, lapack_int n,
03107                            double* d, double* e, lapack_complex_double* z,
03108                            lapack_int ldz );
03109 
03110 lapack_int LAPACKE_sstegr( int matrix_order, char jobz, char range,
03111                            lapack_int n, float* d, float* e, float vl, float vu,
03112                            lapack_int il, lapack_int iu, float abstol,
03113                            lapack_int* m, float* w, float* z, lapack_int ldz,
03114                            lapack_int* isuppz );
03115 lapack_int LAPACKE_dstegr( int matrix_order, char jobz, char range,
03116                            lapack_int n, double* d, double* e, double vl,
03117                            double vu, lapack_int il, lapack_int iu,
03118                            double abstol, lapack_int* m, double* w, double* z,
03119                            lapack_int ldz, lapack_int* isuppz );
03120 lapack_int LAPACKE_cstegr( int matrix_order, char jobz, char range,
03121                            lapack_int n, float* d, float* e, float vl, float vu,
03122                            lapack_int il, lapack_int iu, float abstol,
03123                            lapack_int* m, float* w, lapack_complex_float* z,
03124                            lapack_int ldz, lapack_int* isuppz );
03125 lapack_int LAPACKE_zstegr( int matrix_order, char jobz, char range,
03126                            lapack_int n, double* d, double* e, double vl,
03127                            double vu, lapack_int il, lapack_int iu,
03128                            double abstol, lapack_int* m, double* w,
03129                            lapack_complex_double* z, lapack_int ldz,
03130                            lapack_int* isuppz );
03131 
03132 lapack_int LAPACKE_sstein( int matrix_order, lapack_int n, const float* d,
03133                            const float* e, lapack_int m, const float* w,
03134                            const lapack_int* iblock, const lapack_int* isplit,
03135                            float* z, lapack_int ldz, lapack_int* ifailv );
03136 lapack_int LAPACKE_dstein( int matrix_order, lapack_int n, const double* d,
03137                            const double* e, lapack_int m, const double* w,
03138                            const lapack_int* iblock, const lapack_int* isplit,
03139                            double* z, lapack_int ldz, lapack_int* ifailv );
03140 lapack_int LAPACKE_cstein( int matrix_order, lapack_int n, const float* d,
03141                            const float* e, lapack_int m, const float* w,
03142                            const lapack_int* iblock, const lapack_int* isplit,
03143                            lapack_complex_float* z, lapack_int ldz,
03144                            lapack_int* ifailv );
03145 lapack_int LAPACKE_zstein( int matrix_order, lapack_int n, const double* d,
03146                            const double* e, lapack_int m, const double* w,
03147                            const lapack_int* iblock, const lapack_int* isplit,
03148                            lapack_complex_double* z, lapack_int ldz,
03149                            lapack_int* ifailv );
03150 
03151 lapack_int LAPACKE_sstemr( int matrix_order, char jobz, char range,
03152                            lapack_int n, float* d, float* e, float vl, float vu,
03153                            lapack_int il, lapack_int iu, lapack_int* m,
03154                            float* w, float* z, lapack_int ldz, lapack_int nzc,
03155                            lapack_int* isuppz, lapack_logical* tryrac );
03156 lapack_int LAPACKE_dstemr( int matrix_order, char jobz, char range,
03157                            lapack_int n, double* d, double* e, double vl,
03158                            double vu, lapack_int il, lapack_int iu,
03159                            lapack_int* m, double* w, double* z, lapack_int ldz,
03160                            lapack_int nzc, lapack_int* isuppz,
03161                            lapack_logical* tryrac );
03162 lapack_int LAPACKE_cstemr( int matrix_order, char jobz, char range,
03163                            lapack_int n, float* d, float* e, float vl, float vu,
03164                            lapack_int il, lapack_int iu, lapack_int* m,
03165                            float* w, lapack_complex_float* z, lapack_int ldz,
03166                            lapack_int nzc, lapack_int* isuppz,
03167                            lapack_logical* tryrac );
03168 lapack_int LAPACKE_zstemr( int matrix_order, char jobz, char range,
03169                            lapack_int n, double* d, double* e, double vl,
03170                            double vu, lapack_int il, lapack_int iu,
03171                            lapack_int* m, double* w, lapack_complex_double* z,
03172                            lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
03173                            lapack_logical* tryrac );
03174 
03175 lapack_int LAPACKE_ssteqr( int matrix_order, char compz, lapack_int n, float* d,
03176                            float* e, float* z, lapack_int ldz );
03177 lapack_int LAPACKE_dsteqr( int matrix_order, char compz, lapack_int n,
03178                            double* d, double* e, double* z, lapack_int ldz );
03179 lapack_int LAPACKE_csteqr( int matrix_order, char compz, lapack_int n, float* d,
03180                            float* e, lapack_complex_float* z, lapack_int ldz );
03181 lapack_int LAPACKE_zsteqr( int matrix_order, char compz, lapack_int n,
03182                            double* d, double* e, lapack_complex_double* z,
03183                            lapack_int ldz );
03184 
03185 lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
03186 lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
03187 
03188 lapack_int LAPACKE_sstev( int matrix_order, char jobz, lapack_int n, float* d,
03189                           float* e, float* z, lapack_int ldz );
03190 lapack_int LAPACKE_dstev( int matrix_order, char jobz, lapack_int n, double* d,
03191                           double* e, double* z, lapack_int ldz );
03192 
03193 lapack_int LAPACKE_sstevd( int matrix_order, char jobz, lapack_int n, float* d,
03194                            float* e, float* z, lapack_int ldz );
03195 lapack_int LAPACKE_dstevd( int matrix_order, char jobz, lapack_int n, double* d,
03196                            double* e, double* z, lapack_int ldz );
03197 
03198 lapack_int LAPACKE_sstevr( int matrix_order, char jobz, char range,
03199                            lapack_int n, float* d, float* e, float vl, float vu,
03200                            lapack_int il, lapack_int iu, float abstol,
03201                            lapack_int* m, float* w, float* z, lapack_int ldz,
03202                            lapack_int* isuppz );
03203 lapack_int LAPACKE_dstevr( int matrix_order, char jobz, char range,
03204                            lapack_int n, double* d, double* e, double vl,
03205                            double vu, lapack_int il, lapack_int iu,
03206                            double abstol, lapack_int* m, double* w, double* z,
03207                            lapack_int ldz, lapack_int* isuppz );
03208 
03209 lapack_int LAPACKE_sstevx( int matrix_order, char jobz, char range,
03210                            lapack_int n, float* d, float* e, float vl, float vu,
03211                            lapack_int il, lapack_int iu, float abstol,
03212                            lapack_int* m, float* w, float* z, lapack_int ldz,
03213                            lapack_int* ifail );
03214 lapack_int LAPACKE_dstevx( int matrix_order, char jobz, char range,
03215                            lapack_int n, double* d, double* e, double vl,
03216                            double vu, lapack_int il, lapack_int iu,
03217                            double abstol, lapack_int* m, double* w, double* z,
03218                            lapack_int ldz, lapack_int* ifail );
03219 
03220 lapack_int LAPACKE_ssycon( int matrix_order, char uplo, lapack_int n,
03221                            const float* a, lapack_int lda,
03222                            const lapack_int* ipiv, float anorm, float* rcond );
03223 lapack_int LAPACKE_dsycon( int matrix_order, char uplo, lapack_int n,
03224                            const double* a, lapack_int lda,
03225                            const lapack_int* ipiv, double anorm,
03226                            double* rcond );
03227 lapack_int LAPACKE_csycon( int matrix_order, char uplo, lapack_int n,
03228                            const lapack_complex_float* a, lapack_int lda,
03229                            const lapack_int* ipiv, float anorm, float* rcond );
03230 lapack_int LAPACKE_zsycon( int matrix_order, char uplo, lapack_int n,
03231                            const lapack_complex_double* a, lapack_int lda,
03232                            const lapack_int* ipiv, double anorm,
03233                            double* rcond );
03234 
03235 lapack_int LAPACKE_ssyequb( int matrix_order, char uplo, lapack_int n,
03236                             const float* a, lapack_int lda, float* s,
03237                             float* scond, float* amax );
03238 lapack_int LAPACKE_dsyequb( int matrix_order, char uplo, lapack_int n,
03239                             const double* a, lapack_int lda, double* s,
03240                             double* scond, double* amax );
03241 lapack_int LAPACKE_csyequb( int matrix_order, char uplo, lapack_int n,
03242                             const lapack_complex_float* a, lapack_int lda,
03243                             float* s, float* scond, float* amax );
03244 lapack_int LAPACKE_zsyequb( int matrix_order, char uplo, lapack_int n,
03245                             const lapack_complex_double* a, lapack_int lda,
03246                             double* s, double* scond, double* amax );
03247 
03248 lapack_int LAPACKE_ssyev( int matrix_order, char jobz, char uplo, lapack_int n,
03249                           float* a, lapack_int lda, float* w );
03250 lapack_int LAPACKE_dsyev( int matrix_order, char jobz, char uplo, lapack_int n,
03251                           double* a, lapack_int lda, double* w );
03252 
03253 lapack_int LAPACKE_ssyevd( int matrix_order, char jobz, char uplo, lapack_int n,
03254                            float* a, lapack_int lda, float* w );
03255 lapack_int LAPACKE_dsyevd( int matrix_order, char jobz, char uplo, lapack_int n,
03256                            double* a, lapack_int lda, double* w );
03257 
03258 lapack_int LAPACKE_ssyevr( int matrix_order, char jobz, char range, char uplo,
03259                            lapack_int n, float* a, lapack_int lda, float vl,
03260                            float vu, lapack_int il, lapack_int iu, float abstol,
03261                            lapack_int* m, float* w, float* z, lapack_int ldz,
03262                            lapack_int* isuppz );
03263 lapack_int LAPACKE_dsyevr( int matrix_order, char jobz, char range, char uplo,
03264                            lapack_int n, double* a, lapack_int lda, double vl,
03265                            double vu, lapack_int il, lapack_int iu,
03266                            double abstol, lapack_int* m, double* w, double* z,
03267                            lapack_int ldz, lapack_int* isuppz );
03268 
03269 lapack_int LAPACKE_ssyevx( int matrix_order, char jobz, char range, char uplo,
03270                            lapack_int n, float* a, lapack_int lda, float vl,
03271                            float vu, lapack_int il, lapack_int iu, float abstol,
03272                            lapack_int* m, float* w, float* z, lapack_int ldz,
03273                            lapack_int* ifail );
03274 lapack_int LAPACKE_dsyevx( int matrix_order, char jobz, char range, char uplo,
03275                            lapack_int n, double* a, lapack_int lda, double vl,
03276                            double vu, lapack_int il, lapack_int iu,
03277                            double abstol, lapack_int* m, double* w, double* z,
03278                            lapack_int ldz, lapack_int* ifail );
03279 
03280 lapack_int LAPACKE_ssygst( int matrix_order, lapack_int itype, char uplo,
03281                            lapack_int n, float* a, lapack_int lda,
03282                            const float* b, lapack_int ldb );
03283 lapack_int LAPACKE_dsygst( int matrix_order, lapack_int itype, char uplo,
03284                            lapack_int n, double* a, lapack_int lda,
03285                            const double* b, lapack_int ldb );
03286 
03287 lapack_int LAPACKE_ssygv( int matrix_order, lapack_int itype, char jobz,
03288                           char uplo, lapack_int n, float* a, lapack_int lda,
03289                           float* b, lapack_int ldb, float* w );
03290 lapack_int LAPACKE_dsygv( int matrix_order, lapack_int itype, char jobz,
03291                           char uplo, lapack_int n, double* a, lapack_int lda,
03292                           double* b, lapack_int ldb, double* w );
03293 
03294 lapack_int LAPACKE_ssygvd( int matrix_order, lapack_int itype, char jobz,
03295                            char uplo, lapack_int n, float* a, lapack_int lda,
03296                            float* b, lapack_int ldb, float* w );
03297 lapack_int LAPACKE_dsygvd( int matrix_order, lapack_int itype, char jobz,
03298                            char uplo, lapack_int n, double* a, lapack_int lda,
03299                            double* b, lapack_int ldb, double* w );
03300 
03301 lapack_int LAPACKE_ssygvx( int matrix_order, lapack_int itype, char jobz,
03302                            char range, char uplo, lapack_int n, float* a,
03303                            lapack_int lda, float* b, lapack_int ldb, float vl,
03304                            float vu, lapack_int il, lapack_int iu, float abstol,
03305                            lapack_int* m, float* w, float* z, lapack_int ldz,
03306                            lapack_int* ifail );
03307 lapack_int LAPACKE_dsygvx( int matrix_order, lapack_int itype, char jobz,
03308                            char range, char uplo, lapack_int n, double* a,
03309                            lapack_int lda, double* b, lapack_int ldb, double vl,
03310                            double vu, lapack_int il, lapack_int iu,
03311                            double abstol, lapack_int* m, double* w, double* z,
03312                            lapack_int ldz, lapack_int* ifail );
03313 
03314 lapack_int LAPACKE_ssyrfs( int matrix_order, char uplo, lapack_int n,
03315                            lapack_int nrhs, const float* a, lapack_int lda,
03316                            const float* af, lapack_int ldaf,
03317                            const lapack_int* ipiv, const float* b,
03318                            lapack_int ldb, float* x, lapack_int ldx,
03319                            float* ferr, float* berr );
03320 lapack_int LAPACKE_dsyrfs( int matrix_order, char uplo, lapack_int n,
03321                            lapack_int nrhs, const double* a, lapack_int lda,
03322                            const double* af, lapack_int ldaf,
03323                            const lapack_int* ipiv, const double* b,
03324                            lapack_int ldb, double* x, lapack_int ldx,
03325                            double* ferr, double* berr );
03326 lapack_int LAPACKE_csyrfs( int matrix_order, char uplo, lapack_int n,
03327                            lapack_int nrhs, const lapack_complex_float* a,
03328                            lapack_int lda, const lapack_complex_float* af,
03329                            lapack_int ldaf, const lapack_int* ipiv,
03330                            const lapack_complex_float* b, lapack_int ldb,
03331                            lapack_complex_float* x, lapack_int ldx, float* ferr,
03332                            float* berr );
03333 lapack_int LAPACKE_zsyrfs( int matrix_order, char uplo, lapack_int n,
03334                            lapack_int nrhs, const lapack_complex_double* a,
03335                            lapack_int lda, const lapack_complex_double* af,
03336                            lapack_int ldaf, const lapack_int* ipiv,
03337                            const lapack_complex_double* b, lapack_int ldb,
03338                            lapack_complex_double* x, lapack_int ldx,
03339                            double* ferr, double* berr );
03340 
03341 lapack_int LAPACKE_ssyrfsx( int matrix_order, char uplo, char equed,
03342                             lapack_int n, lapack_int nrhs, const float* a,
03343                             lapack_int lda, const float* af, lapack_int ldaf,
03344                             const lapack_int* ipiv, const float* s,
03345                             const float* b, lapack_int ldb, float* x,
03346                             lapack_int ldx, float* rcond, float* berr,
03347                             lapack_int n_err_bnds, float* err_bnds_norm,
03348                             float* err_bnds_comp, lapack_int nparams,
03349                             float* params );
03350 lapack_int LAPACKE_dsyrfsx( int matrix_order, char uplo, char equed,
03351                             lapack_int n, lapack_int nrhs, const double* a,
03352                             lapack_int lda, const double* af, lapack_int ldaf,
03353                             const lapack_int* ipiv, const double* s,
03354                             const double* b, lapack_int ldb, double* x,
03355                             lapack_int ldx, double* rcond, double* berr,
03356                             lapack_int n_err_bnds, double* err_bnds_norm,
03357                             double* err_bnds_comp, lapack_int nparams,
03358                             double* params );
03359 lapack_int LAPACKE_csyrfsx( int matrix_order, char uplo, char equed,
03360                             lapack_int n, lapack_int nrhs,
03361                             const lapack_complex_float* a, lapack_int lda,
03362                             const lapack_complex_float* af, lapack_int ldaf,
03363                             const lapack_int* ipiv, const float* s,
03364                             const lapack_complex_float* b, lapack_int ldb,
03365                             lapack_complex_float* x, lapack_int ldx,
03366                             float* rcond, float* berr, lapack_int n_err_bnds,
03367                             float* err_bnds_norm, float* err_bnds_comp,
03368                             lapack_int nparams, float* params );
03369 lapack_int LAPACKE_zsyrfsx( int matrix_order, char uplo, char equed,
03370                             lapack_int n, lapack_int nrhs,
03371                             const lapack_complex_double* a, lapack_int lda,
03372                             const lapack_complex_double* af, lapack_int ldaf,
03373                             const lapack_int* ipiv, const double* s,
03374                             const lapack_complex_double* b, lapack_int ldb,
03375                             lapack_complex_double* x, lapack_int ldx,
03376                             double* rcond, double* berr, lapack_int n_err_bnds,
03377                             double* err_bnds_norm, double* err_bnds_comp,
03378                             lapack_int nparams, double* params );
03379 
03380 lapack_int LAPACKE_ssysv( int matrix_order, char uplo, lapack_int n,
03381                           lapack_int nrhs, float* a, lapack_int lda,
03382                           lapack_int* ipiv, float* b, lapack_int ldb );
03383 lapack_int LAPACKE_dsysv( int matrix_order, char uplo, lapack_int n,
03384                           lapack_int nrhs, double* a, lapack_int lda,
03385                           lapack_int* ipiv, double* b, lapack_int ldb );
03386 lapack_int LAPACKE_csysv( int matrix_order, char uplo, lapack_int n,
03387                           lapack_int nrhs, lapack_complex_float* a,
03388                           lapack_int lda, lapack_int* ipiv,
03389                           lapack_complex_float* b, lapack_int ldb );
03390 lapack_int LAPACKE_zsysv( int matrix_order, char uplo, lapack_int n,
03391                           lapack_int nrhs, lapack_complex_double* a,
03392                           lapack_int lda, lapack_int* ipiv,
03393                           lapack_complex_double* b, lapack_int ldb );
03394 
03395 lapack_int LAPACKE_ssysvx( int matrix_order, char fact, char uplo, lapack_int n,
03396                            lapack_int nrhs, const float* a, lapack_int lda,
03397                            float* af, lapack_int ldaf, lapack_int* ipiv,
03398                            const float* b, lapack_int ldb, float* x,
03399                            lapack_int ldx, float* rcond, float* ferr,
03400                            float* berr );
03401 lapack_int LAPACKE_dsysvx( int matrix_order, char fact, char uplo, lapack_int n,
03402                            lapack_int nrhs, const double* a, lapack_int lda,
03403                            double* af, lapack_int ldaf, lapack_int* ipiv,
03404                            const double* b, lapack_int ldb, double* x,
03405                            lapack_int ldx, double* rcond, double* ferr,
03406                            double* berr );
03407 lapack_int LAPACKE_csysvx( int matrix_order, char fact, char uplo, lapack_int n,
03408                            lapack_int nrhs, const lapack_complex_float* a,
03409                            lapack_int lda, lapack_complex_float* af,
03410                            lapack_int ldaf, lapack_int* ipiv,
03411                            const lapack_complex_float* b, lapack_int ldb,
03412                            lapack_complex_float* x, lapack_int ldx,
03413                            float* rcond, float* ferr, float* berr );
03414 lapack_int LAPACKE_zsysvx( int matrix_order, char fact, char uplo, lapack_int n,
03415                            lapack_int nrhs, const lapack_complex_double* a,
03416                            lapack_int lda, lapack_complex_double* af,
03417                            lapack_int ldaf, lapack_int* ipiv,
03418                            const lapack_complex_double* b, lapack_int ldb,
03419                            lapack_complex_double* x, lapack_int ldx,
03420                            double* rcond, double* ferr, double* berr );
03421 
03422 lapack_int LAPACKE_ssysvxx( int matrix_order, char fact, char uplo,
03423                             lapack_int n, lapack_int nrhs, float* a,
03424                             lapack_int lda, float* af, lapack_int ldaf,
03425                             lapack_int* ipiv, char* equed, float* s, float* b,
03426                             lapack_int ldb, float* x, lapack_int ldx,
03427                             float* rcond, float* rpvgrw, float* berr,
03428                             lapack_int n_err_bnds, float* err_bnds_norm,
03429                             float* err_bnds_comp, lapack_int nparams,
03430                             float* params );
03431 lapack_int LAPACKE_dsysvxx( int matrix_order, char fact, char uplo,
03432                             lapack_int n, lapack_int nrhs, double* a,
03433                             lapack_int lda, double* af, lapack_int ldaf,
03434                             lapack_int* ipiv, char* equed, double* s, double* b,
03435                             lapack_int ldb, double* x, lapack_int ldx,
03436                             double* rcond, double* rpvgrw, double* berr,
03437                             lapack_int n_err_bnds, double* err_bnds_norm,
03438                             double* err_bnds_comp, lapack_int nparams,
03439                             double* params );
03440 lapack_int LAPACKE_csysvxx( int matrix_order, char fact, char uplo,
03441                             lapack_int n, lapack_int nrhs,
03442                             lapack_complex_float* a, lapack_int lda,
03443                             lapack_complex_float* af, lapack_int ldaf,
03444                             lapack_int* ipiv, char* equed, float* s,
03445                             lapack_complex_float* b, lapack_int ldb,
03446                             lapack_complex_float* x, lapack_int ldx,
03447                             float* rcond, float* rpvgrw, float* berr,
03448                             lapack_int n_err_bnds, float* err_bnds_norm,
03449                             float* err_bnds_comp, lapack_int nparams,
03450                             float* params );
03451 lapack_int LAPACKE_zsysvxx( int matrix_order, char fact, char uplo,
03452                             lapack_int n, lapack_int nrhs,
03453                             lapack_complex_double* a, lapack_int lda,
03454                             lapack_complex_double* af, lapack_int ldaf,
03455                             lapack_int* ipiv, char* equed, double* s,
03456                             lapack_complex_double* b, lapack_int ldb,
03457                             lapack_complex_double* x, lapack_int ldx,
03458                             double* rcond, double* rpvgrw, double* berr,
03459                             lapack_int n_err_bnds, double* err_bnds_norm,
03460                             double* err_bnds_comp, lapack_int nparams,
03461                             double* params );
03462 
03463 lapack_int LAPACKE_ssytrd( int matrix_order, char uplo, lapack_int n, float* a,
03464                            lapack_int lda, float* d, float* e, float* tau );
03465 lapack_int LAPACKE_dsytrd( int matrix_order, char uplo, lapack_int n, double* a,
03466                            lapack_int lda, double* d, double* e, double* tau );
03467 
03468 lapack_int LAPACKE_ssytrf( int matrix_order, char uplo, lapack_int n, float* a,
03469                            lapack_int lda, lapack_int* ipiv );
03470 lapack_int LAPACKE_dsytrf( int matrix_order, char uplo, lapack_int n, double* a,
03471                            lapack_int lda, lapack_int* ipiv );
03472 lapack_int LAPACKE_csytrf( int matrix_order, char uplo, lapack_int n,
03473                            lapack_complex_float* a, lapack_int lda,
03474                            lapack_int* ipiv );
03475 lapack_int LAPACKE_zsytrf( int matrix_order, char uplo, lapack_int n,
03476                            lapack_complex_double* a, lapack_int lda,
03477                            lapack_int* ipiv );
03478 
03479 lapack_int LAPACKE_ssytri( int matrix_order, char uplo, lapack_int n, float* a,
03480                            lapack_int lda, const lapack_int* ipiv );
03481 lapack_int LAPACKE_dsytri( int matrix_order, char uplo, lapack_int n, double* a,
03482                            lapack_int lda, const lapack_int* ipiv );
03483 lapack_int LAPACKE_csytri( int matrix_order, char uplo, lapack_int n,
03484                            lapack_complex_float* a, lapack_int lda,
03485                            const lapack_int* ipiv );
03486 lapack_int LAPACKE_zsytri( int matrix_order, char uplo, lapack_int n,
03487                            lapack_complex_double* a, lapack_int lda,
03488                            const lapack_int* ipiv );
03489 
03490 lapack_int LAPACKE_ssytrs( int matrix_order, char uplo, lapack_int n,
03491                            lapack_int nrhs, const float* a, lapack_int lda,
03492                            const lapack_int* ipiv, float* b, lapack_int ldb );
03493 lapack_int LAPACKE_dsytrs( int matrix_order, char uplo, lapack_int n,
03494                            lapack_int nrhs, const double* a, lapack_int lda,
03495                            const lapack_int* ipiv, double* b, lapack_int ldb );
03496 lapack_int LAPACKE_csytrs( int matrix_order, char uplo, lapack_int n,
03497                            lapack_int nrhs, const lapack_complex_float* a,
03498                            lapack_int lda, const lapack_int* ipiv,
03499                            lapack_complex_float* b, lapack_int ldb );
03500 lapack_int LAPACKE_zsytrs( int matrix_order, char uplo, lapack_int n,
03501                            lapack_int nrhs, const lapack_complex_double* a,
03502                            lapack_int lda, const lapack_int* ipiv,
03503                            lapack_complex_double* b, lapack_int ldb );
03504 
03505 lapack_int LAPACKE_stbcon( int matrix_order, char norm, char uplo, char diag,
03506                            lapack_int n, lapack_int kd, const float* ab,
03507                            lapack_int ldab, float* rcond );
03508 lapack_int LAPACKE_dtbcon( int matrix_order, char norm, char uplo, char diag,
03509                            lapack_int n, lapack_int kd, const double* ab,
03510                            lapack_int ldab, double* rcond );
03511 lapack_int LAPACKE_ctbcon( int matrix_order, char norm, char uplo, char diag,
03512                            lapack_int n, lapack_int kd,
03513                            const lapack_complex_float* ab, lapack_int ldab,
03514                            float* rcond );
03515 lapack_int LAPACKE_ztbcon( int matrix_order, char norm, char uplo, char diag,
03516                            lapack_int n, lapack_int kd,
03517                            const lapack_complex_double* ab, lapack_int ldab,
03518                            double* rcond );
03519 
03520 lapack_int LAPACKE_stbrfs( int matrix_order, char uplo, char trans, char diag,
03521                            lapack_int n, lapack_int kd, lapack_int nrhs,
03522                            const float* ab, lapack_int ldab, const float* b,
03523                            lapack_int ldb, const float* x, lapack_int ldx,
03524                            float* ferr, float* berr );
03525 lapack_int LAPACKE_dtbrfs( int matrix_order, char uplo, char trans, char diag,
03526                            lapack_int n, lapack_int kd, lapack_int nrhs,
03527                            const double* ab, lapack_int ldab, const double* b,
03528                            lapack_int ldb, const double* x, lapack_int ldx,
03529                            double* ferr, double* berr );
03530 lapack_int LAPACKE_ctbrfs( int matrix_order, char uplo, char trans, char diag,
03531                            lapack_int n, lapack_int kd, lapack_int nrhs,
03532                            const lapack_complex_float* ab, lapack_int ldab,
03533                            const lapack_complex_float* b, lapack_int ldb,
03534                            const lapack_complex_float* x, lapack_int ldx,
03535                            float* ferr, float* berr );
03536 lapack_int LAPACKE_ztbrfs( int matrix_order, char uplo, char trans, char diag,
03537                            lapack_int n, lapack_int kd, lapack_int nrhs,
03538                            const lapack_complex_double* ab, lapack_int ldab,
03539                            const lapack_complex_double* b, lapack_int ldb,
03540                            const lapack_complex_double* x, lapack_int ldx,
03541                            double* ferr, double* berr );
03542 
03543 lapack_int LAPACKE_stbtrs( int matrix_order, char uplo, char trans, char diag,
03544                            lapack_int n, lapack_int kd, lapack_int nrhs,
03545                            const float* ab, lapack_int ldab, float* b,
03546                            lapack_int ldb );
03547 lapack_int LAPACKE_dtbtrs( int matrix_order, char uplo, char trans, char diag,
03548                            lapack_int n, lapack_int kd, lapack_int nrhs,
03549                            const double* ab, lapack_int ldab, double* b,
03550                            lapack_int ldb );
03551 lapack_int LAPACKE_ctbtrs( int matrix_order, char uplo, char trans, char diag,
03552                            lapack_int n, lapack_int kd, lapack_int nrhs,
03553                            const lapack_complex_float* ab, lapack_int ldab,
03554                            lapack_complex_float* b, lapack_int ldb );
03555 lapack_int LAPACKE_ztbtrs( int matrix_order, char uplo, char trans, char diag,
03556                            lapack_int n, lapack_int kd, lapack_int nrhs,
03557                            const lapack_complex_double* ab, lapack_int ldab,
03558                            lapack_complex_double* b, lapack_int ldb );
03559 
03560 lapack_int LAPACKE_stfsm( int matrix_order, char transr, char side, char uplo,
03561                           char trans, char diag, lapack_int m, lapack_int n,
03562                           float alpha, const float* a, float* b,
03563                           lapack_int ldb );
03564 lapack_int LAPACKE_dtfsm( int matrix_order, char transr, char side, char uplo,
03565                           char trans, char diag, lapack_int m, lapack_int n,
03566                           double alpha, const double* a, double* b,
03567                           lapack_int ldb );
03568 lapack_int LAPACKE_ctfsm( int matrix_order, char transr, char side, char uplo,
03569                           char trans, char diag, lapack_int m, lapack_int n,
03570                           lapack_complex_float alpha,
03571                           const lapack_complex_float* a,
03572                           lapack_complex_float* b, lapack_int ldb );
03573 lapack_int LAPACKE_ztfsm( int matrix_order, char transr, char side, char uplo,
03574                           char trans, char diag, lapack_int m, lapack_int n,
03575                           lapack_complex_double alpha,
03576                           const lapack_complex_double* a,
03577                           lapack_complex_double* b, lapack_int ldb );
03578 
03579 lapack_int LAPACKE_stftri( int matrix_order, char transr, char uplo, char diag,
03580                            lapack_int n, float* a );
03581 lapack_int LAPACKE_dtftri( int matrix_order, char transr, char uplo, char diag,
03582                            lapack_int n, double* a );
03583 lapack_int LAPACKE_ctftri( int matrix_order, char transr, char uplo, char diag,
03584                            lapack_int n, lapack_complex_float* a );
03585 lapack_int LAPACKE_ztftri( int matrix_order, char transr, char uplo, char diag,
03586                            lapack_int n, lapack_complex_double* a );
03587 
03588 lapack_int LAPACKE_stfttp( int matrix_order, char transr, char uplo,
03589                            lapack_int n, const float* arf, float* ap );
03590 lapack_int LAPACKE_dtfttp( int matrix_order, char transr, char uplo,
03591                            lapack_int n, const double* arf, double* ap );
03592 lapack_int LAPACKE_ctfttp( int matrix_order, char transr, char uplo,
03593                            lapack_int n, const lapack_complex_float* arf,
03594                            lapack_complex_float* ap );
03595 lapack_int LAPACKE_ztfttp( int matrix_order, char transr, char uplo,
03596                            lapack_int n, const lapack_complex_double* arf,
03597                            lapack_complex_double* ap );
03598 
03599 lapack_int LAPACKE_stfttr( int matrix_order, char transr, char uplo,
03600                            lapack_int n, const float* arf, float* a,
03601                            lapack_int lda );
03602 lapack_int LAPACKE_dtfttr( int matrix_order, char transr, char uplo,
03603                            lapack_int n, const double* arf, double* a,
03604                            lapack_int lda );
03605 lapack_int LAPACKE_ctfttr( int matrix_order, char transr, char uplo,
03606                            lapack_int n, const lapack_complex_float* arf,
03607                            lapack_complex_float* a, lapack_int lda );
03608 lapack_int LAPACKE_ztfttr( int matrix_order, char transr, char uplo,
03609                            lapack_int n, const lapack_complex_double* arf,
03610                            lapack_complex_double* a, lapack_int lda );
03611 
03612 lapack_int LAPACKE_stgevc( int matrix_order, char side, char howmny,
03613                            const lapack_logical* select, lapack_int n,
03614                            const float* s, lapack_int lds, const float* p,
03615                            lapack_int ldp, float* vl, lapack_int ldvl,
03616                            float* vr, lapack_int ldvr, lapack_int mm,
03617                            lapack_int* m );
03618 lapack_int LAPACKE_dtgevc( int matrix_order, char side, char howmny,
03619                            const lapack_logical* select, lapack_int n,
03620                            const double* s, lapack_int lds, const double* p,
03621                            lapack_int ldp, double* vl, lapack_int ldvl,
03622                            double* vr, lapack_int ldvr, lapack_int mm,
03623                            lapack_int* m );
03624 lapack_int LAPACKE_ctgevc( int matrix_order, char side, char howmny,
03625                            const lapack_logical* select, lapack_int n,
03626                            const lapack_complex_float* s, lapack_int lds,
03627                            const lapack_complex_float* p, lapack_int ldp,
03628                            lapack_complex_float* vl, lapack_int ldvl,
03629                            lapack_complex_float* vr, lapack_int ldvr,
03630                            lapack_int mm, lapack_int* m );
03631 lapack_int LAPACKE_ztgevc( int matrix_order, char side, char howmny,
03632                            const lapack_logical* select, lapack_int n,
03633                            const lapack_complex_double* s, lapack_int lds,
03634                            const lapack_complex_double* p, lapack_int ldp,
03635                            lapack_complex_double* vl, lapack_int ldvl,
03636                            lapack_complex_double* vr, lapack_int ldvr,
03637                            lapack_int mm, lapack_int* m );
03638 
03639 lapack_int LAPACKE_stgexc( int matrix_order, lapack_logical wantq,
03640                            lapack_logical wantz, lapack_int n, float* a,
03641                            lapack_int lda, float* b, lapack_int ldb, float* q,
03642                            lapack_int ldq, float* z, lapack_int ldz,
03643                            lapack_int* ifst, lapack_int* ilst );
03644 lapack_int LAPACKE_dtgexc( int matrix_order, lapack_logical wantq,
03645                            lapack_logical wantz, lapack_int n, double* a,
03646                            lapack_int lda, double* b, lapack_int ldb, double* q,
03647                            lapack_int ldq, double* z, lapack_int ldz,
03648                            lapack_int* ifst, lapack_int* ilst );
03649 lapack_int LAPACKE_ctgexc( int matrix_order, lapack_logical wantq,
03650                            lapack_logical wantz, lapack_int n,
03651                            lapack_complex_float* a, lapack_int lda,
03652                            lapack_complex_float* b, lapack_int ldb,
03653                            lapack_complex_float* q, lapack_int ldq,
03654                            lapack_complex_float* z, lapack_int ldz,
03655                            lapack_int ifst, lapack_int ilst );
03656 lapack_int LAPACKE_ztgexc( int matrix_order, lapack_logical wantq,
03657                            lapack_logical wantz, lapack_int n,
03658                            lapack_complex_double* a, lapack_int lda,
03659                            lapack_complex_double* b, lapack_int ldb,
03660                            lapack_complex_double* q, lapack_int ldq,
03661                            lapack_complex_double* z, lapack_int ldz,
03662                            lapack_int ifst, lapack_int ilst );
03663 
03664 lapack_int LAPACKE_stgsen( int matrix_order, lapack_int ijob,
03665                            lapack_logical wantq, lapack_logical wantz,
03666                            const lapack_logical* select, lapack_int n, float* a,
03667                            lapack_int lda, float* b, lapack_int ldb,
03668                            float* alphar, float* alphai, float* beta, float* q,
03669                            lapack_int ldq, float* z, lapack_int ldz,
03670                            lapack_int* m, float* pl, float* pr, float* dif );
03671 lapack_int LAPACKE_dtgsen( int matrix_order, lapack_int ijob,
03672                            lapack_logical wantq, lapack_logical wantz,
03673                            const lapack_logical* select, lapack_int n,
03674                            double* a, lapack_int lda, double* b, lapack_int ldb,
03675                            double* alphar, double* alphai, double* beta,
03676                            double* q, lapack_int ldq, double* z, lapack_int ldz,
03677                            lapack_int* m, double* pl, double* pr, double* dif );
03678 lapack_int LAPACKE_ctgsen( int matrix_order, lapack_int ijob,
03679                            lapack_logical wantq, lapack_logical wantz,
03680                            const lapack_logical* select, lapack_int n,
03681                            lapack_complex_float* a, lapack_int lda,
03682                            lapack_complex_float* b, lapack_int ldb,
03683                            lapack_complex_float* alpha,
03684                            lapack_complex_float* beta, lapack_complex_float* q,
03685                            lapack_int ldq, lapack_complex_float* z,
03686                            lapack_int ldz, lapack_int* m, float* pl, float* pr,
03687                            float* dif );
03688 lapack_int LAPACKE_ztgsen( int matrix_order, lapack_int ijob,
03689                            lapack_logical wantq, lapack_logical wantz,
03690                            const lapack_logical* select, lapack_int n,
03691                            lapack_complex_double* a, lapack_int lda,
03692                            lapack_complex_double* b, lapack_int ldb,
03693                            lapack_complex_double* alpha,
03694                            lapack_complex_double* beta,
03695                            lapack_complex_double* q, lapack_int ldq,
03696                            lapack_complex_double* z, lapack_int ldz,
03697                            lapack_int* m, double* pl, double* pr, double* dif );
03698 
03699 lapack_int LAPACKE_stgsja( int matrix_order, char jobu, char jobv, char jobq,
03700                            lapack_int m, lapack_int p, lapack_int n,
03701                            lapack_int k, lapack_int l, float* a, lapack_int lda,
03702                            float* b, lapack_int ldb, float tola, float tolb,
03703                            float* alpha, float* beta, float* u, lapack_int ldu,
03704                            float* v, lapack_int ldv, float* q, lapack_int ldq,
03705                            lapack_int* ncycle );
03706 lapack_int LAPACKE_dtgsja( int matrix_order, char jobu, char jobv, char jobq,
03707                            lapack_int m, lapack_int p, lapack_int n,
03708                            lapack_int k, lapack_int l, double* a,
03709                            lapack_int lda, double* b, lapack_int ldb,
03710                            double tola, double tolb, double* alpha,
03711                            double* beta, double* u, lapack_int ldu, double* v,
03712                            lapack_int ldv, double* q, lapack_int ldq,
03713                            lapack_int* ncycle );
03714 lapack_int LAPACKE_ctgsja( int matrix_order, char jobu, char jobv, char jobq,
03715                            lapack_int m, lapack_int p, lapack_int n,
03716                            lapack_int k, lapack_int l, lapack_complex_float* a,
03717                            lapack_int lda, lapack_complex_float* b,
03718                            lapack_int ldb, float tola, float tolb, float* alpha,
03719                            float* beta, lapack_complex_float* u, lapack_int ldu,
03720                            lapack_complex_float* v, lapack_int ldv,
03721                            lapack_complex_float* q, lapack_int ldq,
03722                            lapack_int* ncycle );
03723 lapack_int LAPACKE_ztgsja( int matrix_order, char jobu, char jobv, char jobq,
03724                            lapack_int m, lapack_int p, lapack_int n,
03725                            lapack_int k, lapack_int l, lapack_complex_double* a,
03726                            lapack_int lda, lapack_complex_double* b,
03727                            lapack_int ldb, double tola, double tolb,
03728                            double* alpha, double* beta,
03729                            lapack_complex_double* u, lapack_int ldu,
03730                            lapack_complex_double* v, lapack_int ldv,
03731                            lapack_complex_double* q, lapack_int ldq,
03732                            lapack_int* ncycle );
03733 
03734 lapack_int LAPACKE_stgsna( int matrix_order, char job, char howmny,
03735                            const lapack_logical* select, lapack_int n,
03736                            const float* a, lapack_int lda, const float* b,
03737                            lapack_int ldb, const float* vl, lapack_int ldvl,
03738                            const float* vr, lapack_int ldvr, float* s,
03739                            float* dif, lapack_int mm, lapack_int* m );
03740 lapack_int LAPACKE_dtgsna( int matrix_order, char job, char howmny,
03741                            const lapack_logical* select, lapack_int n,
03742                            const double* a, lapack_int lda, const double* b,
03743                            lapack_int ldb, const double* vl, lapack_int ldvl,
03744                            const double* vr, lapack_int ldvr, double* s,
03745                            double* dif, lapack_int mm, lapack_int* m );
03746 lapack_int LAPACKE_ctgsna( int matrix_order, char job, char howmny,
03747                            const lapack_logical* select, lapack_int n,
03748                            const lapack_complex_float* a, lapack_int lda,
03749                            const lapack_complex_float* b, lapack_int ldb,
03750                            const lapack_complex_float* vl, lapack_int ldvl,
03751                            const lapack_complex_float* vr, lapack_int ldvr,
03752                            float* s, float* dif, lapack_int mm, lapack_int* m );
03753 lapack_int LAPACKE_ztgsna( int matrix_order, char job, char howmny,
03754                            const lapack_logical* select, lapack_int n,
03755                            const lapack_complex_double* a, lapack_int lda,
03756                            const lapack_complex_double* b, lapack_int ldb,
03757                            const lapack_complex_double* vl, lapack_int ldvl,
03758                            const lapack_complex_double* vr, lapack_int ldvr,
03759                            double* s, double* dif, lapack_int mm,
03760                            lapack_int* m );
03761 
03762 lapack_int LAPACKE_stgsyl( int matrix_order, char trans, lapack_int ijob,
03763                            lapack_int m, lapack_int n, const float* a,
03764                            lapack_int lda, const float* b, lapack_int ldb,
03765                            float* c, lapack_int ldc, const float* d,
03766                            lapack_int ldd, const float* e, lapack_int lde,
03767                            float* f, lapack_int ldf, float* scale, float* dif );
03768 lapack_int LAPACKE_dtgsyl( int matrix_order, char trans, lapack_int ijob,
03769                            lapack_int m, lapack_int n, const double* a,
03770                            lapack_int lda, const double* b, lapack_int ldb,
03771                            double* c, lapack_int ldc, const double* d,
03772                            lapack_int ldd, const double* e, lapack_int lde,
03773                            double* f, lapack_int ldf, double* scale,
03774                            double* dif );
03775 lapack_int LAPACKE_ctgsyl( int matrix_order, char trans, lapack_int ijob,
03776                            lapack_int m, lapack_int n,
03777                            const lapack_complex_float* a, lapack_int lda,
03778                            const lapack_complex_float* b, lapack_int ldb,
03779                            lapack_complex_float* c, lapack_int ldc,
03780                            const lapack_complex_float* d, lapack_int ldd,
03781                            const lapack_complex_float* e, lapack_int lde,
03782                            lapack_complex_float* f, lapack_int ldf,
03783                            float* scale, float* dif );
03784 lapack_int LAPACKE_ztgsyl( int matrix_order, char trans, lapack_int ijob,
03785                            lapack_int m, lapack_int n,
03786                            const lapack_complex_double* a, lapack_int lda,
03787                            const lapack_complex_double* b, lapack_int ldb,
03788                            lapack_complex_double* c, lapack_int ldc,
03789                            const lapack_complex_double* d, lapack_int ldd,
03790                            const lapack_complex_double* e, lapack_int lde,
03791                            lapack_complex_double* f, lapack_int ldf,
03792                            double* scale, double* dif );
03793 
03794 lapack_int LAPACKE_stpcon( int matrix_order, char norm, char uplo, char diag,
03795                            lapack_int n, const float* ap, float* rcond );
03796 lapack_int LAPACKE_dtpcon( int matrix_order, char norm, char uplo, char diag,
03797                            lapack_int n, const double* ap, double* rcond );
03798 lapack_int LAPACKE_ctpcon( int matrix_order, char norm, char uplo, char diag,
03799                            lapack_int n, const lapack_complex_float* ap,
03800                            float* rcond );
03801 lapack_int LAPACKE_ztpcon( int matrix_order, char norm, char uplo, char diag,
03802                            lapack_int n, const lapack_complex_double* ap,
03803                            double* rcond );
03804 
03805 lapack_int LAPACKE_stprfs( int matrix_order, char uplo, char trans, char diag,
03806                            lapack_int n, lapack_int nrhs, const float* ap,
03807                            const float* b, lapack_int ldb, const float* x,
03808                            lapack_int ldx, float* ferr, float* berr );
03809 lapack_int LAPACKE_dtprfs( int matrix_order, char uplo, char trans, char diag,
03810                            lapack_int n, lapack_int nrhs, const double* ap,
03811                            const double* b, lapack_int ldb, const double* x,
03812                            lapack_int ldx, double* ferr, double* berr );
03813 lapack_int LAPACKE_ctprfs( int matrix_order, char uplo, char trans, char diag,
03814                            lapack_int n, lapack_int nrhs,
03815                            const lapack_complex_float* ap,
03816                            const lapack_complex_float* b, lapack_int ldb,
03817                            const lapack_complex_float* x, lapack_int ldx,
03818                            float* ferr, float* berr );
03819 lapack_int LAPACKE_ztprfs( int matrix_order, char uplo, char trans, char diag,
03820                            lapack_int n, lapack_int nrhs,
03821                            const lapack_complex_double* ap,
03822                            const lapack_complex_double* b, lapack_int ldb,
03823                            const lapack_complex_double* x, lapack_int ldx,
03824                            double* ferr, double* berr );
03825 
03826 lapack_int LAPACKE_stptri( int matrix_order, char uplo, char diag, lapack_int n,
03827                            float* ap );
03828 lapack_int LAPACKE_dtptri( int matrix_order, char uplo, char diag, lapack_int n,
03829                            double* ap );
03830 lapack_int LAPACKE_ctptri( int matrix_order, char uplo, char diag, lapack_int n,
03831                            lapack_complex_float* ap );
03832 lapack_int LAPACKE_ztptri( int matrix_order, char uplo, char diag, lapack_int n,
03833                            lapack_complex_double* ap );
03834 
03835 lapack_int LAPACKE_stptrs( int matrix_order, char uplo, char trans, char diag,
03836                            lapack_int n, lapack_int nrhs, const float* ap,
03837                            float* b, lapack_int ldb );
03838 lapack_int LAPACKE_dtptrs( int matrix_order, char uplo, char trans, char diag,
03839                            lapack_int n, lapack_int nrhs, const double* ap,
03840                            double* b, lapack_int ldb );
03841 lapack_int LAPACKE_ctptrs( int matrix_order, char uplo, char trans, char diag,
03842                            lapack_int n, lapack_int nrhs,
03843                            const lapack_complex_float* ap,
03844                            lapack_complex_float* b, lapack_int ldb );
03845 lapack_int LAPACKE_ztptrs( int matrix_order, char uplo, char trans, char diag,
03846                            lapack_int n, lapack_int nrhs,
03847                            const lapack_complex_double* ap,
03848                            lapack_complex_double* b, lapack_int ldb );
03849 
03850 lapack_int LAPACKE_stpttf( int matrix_order, char transr, char uplo,
03851                            lapack_int n, const float* ap, float* arf );
03852 lapack_int LAPACKE_dtpttf( int matrix_order, char transr, char uplo,
03853                            lapack_int n, const double* ap, double* arf );
03854 lapack_int LAPACKE_ctpttf( int matrix_order, char transr, char uplo,
03855                            lapack_int n, const lapack_complex_float* ap,
03856                            lapack_complex_float* arf );
03857 lapack_int LAPACKE_ztpttf( int matrix_order, char transr, char uplo,
03858                            lapack_int n, const lapack_complex_double* ap,
03859                            lapack_complex_double* arf );
03860 
03861 lapack_int LAPACKE_stpttr( int matrix_order, char uplo, lapack_int n,
03862                            const float* ap, float* a, lapack_int lda );
03863 lapack_int LAPACKE_dtpttr( int matrix_order, char uplo, lapack_int n,
03864                            const double* ap, double* a, lapack_int lda );
03865 lapack_int LAPACKE_ctpttr( int matrix_order, char uplo, lapack_int n,
03866                            const lapack_complex_float* ap,
03867                            lapack_complex_float* a, lapack_int lda );
03868 lapack_int LAPACKE_ztpttr( int matrix_order, char uplo, lapack_int n,
03869                            const lapack_complex_double* ap,
03870                            lapack_complex_double* a, lapack_int lda );
03871 
03872 lapack_int LAPACKE_strcon( int matrix_order, char norm, char uplo, char diag,
03873                            lapack_int n, const float* a, lapack_int lda,
03874                            float* rcond );
03875 lapack_int LAPACKE_dtrcon( int matrix_order, char norm, char uplo, char diag,
03876                            lapack_int n, const double* a, lapack_int lda,
03877                            double* rcond );
03878 lapack_int LAPACKE_ctrcon( int matrix_order, char norm, char uplo, char diag,
03879                            lapack_int n, const lapack_complex_float* a,
03880                            lapack_int lda, float* rcond );
03881 lapack_int LAPACKE_ztrcon( int matrix_order, char norm, char uplo, char diag,
03882                            lapack_int n, const lapack_complex_double* a,
03883                            lapack_int lda, double* rcond );
03884 
03885 lapack_int LAPACKE_strevc( int matrix_order, char side, char howmny,
03886                            lapack_logical* select, lapack_int n, const float* t,
03887                            lapack_int ldt, float* vl, lapack_int ldvl,
03888                            float* vr, lapack_int ldvr, lapack_int mm,
03889                            lapack_int* m );
03890 lapack_int LAPACKE_dtrevc( int matrix_order, char side, char howmny,
03891                            lapack_logical* select, lapack_int n,
03892                            const double* t, lapack_int ldt, double* vl,
03893                            lapack_int ldvl, double* vr, lapack_int ldvr,
03894                            lapack_int mm, lapack_int* m );
03895 lapack_int LAPACKE_ctrevc( int matrix_order, char side, char howmny,
03896                            const lapack_logical* select, lapack_int n,
03897                            lapack_complex_float* t, lapack_int ldt,
03898                            lapack_complex_float* vl, lapack_int ldvl,
03899                            lapack_complex_float* vr, lapack_int ldvr,
03900                            lapack_int mm, lapack_int* m );
03901 lapack_int LAPACKE_ztrevc( int matrix_order, char side, char howmny,
03902                            const lapack_logical* select, lapack_int n,
03903                            lapack_complex_double* t, lapack_int ldt,
03904                            lapack_complex_double* vl, lapack_int ldvl,
03905                            lapack_complex_double* vr, lapack_int ldvr,
03906                            lapack_int mm, lapack_int* m );
03907 
03908 lapack_int LAPACKE_strexc( int matrix_order, char compq, lapack_int n, float* t,
03909                            lapack_int ldt, float* q, lapack_int ldq,
03910                            lapack_int* ifst, lapack_int* ilst );
03911 lapack_int LAPACKE_dtrexc( int matrix_order, char compq, lapack_int n,
03912                            double* t, lapack_int ldt, double* q, lapack_int ldq,
03913                            lapack_int* ifst, lapack_int* ilst );
03914 lapack_int LAPACKE_ctrexc( int matrix_order, char compq, lapack_int n,
03915                            lapack_complex_float* t, lapack_int ldt,
03916                            lapack_complex_float* q, lapack_int ldq,
03917                            lapack_int ifst, lapack_int ilst );
03918 lapack_int LAPACKE_ztrexc( int matrix_order, char compq, lapack_int n,
03919                            lapack_complex_double* t, lapack_int ldt,
03920                            lapack_complex_double* q, lapack_int ldq,
03921                            lapack_int ifst, lapack_int ilst );
03922 
03923 lapack_int LAPACKE_strrfs( int matrix_order, char uplo, char trans, char diag,
03924                            lapack_int n, lapack_int nrhs, const float* a,
03925                            lapack_int lda, const float* b, lapack_int ldb,
03926                            const float* x, lapack_int ldx, float* ferr,
03927                            float* berr );
03928 lapack_int LAPACKE_dtrrfs( int matrix_order, char uplo, char trans, char diag,
03929                            lapack_int n, lapack_int nrhs, const double* a,
03930                            lapack_int lda, const double* b, lapack_int ldb,
03931                            const double* x, lapack_int ldx, double* ferr,
03932                            double* berr );
03933 lapack_int LAPACKE_ctrrfs( int matrix_order, char uplo, char trans, char diag,
03934                            lapack_int n, lapack_int nrhs,
03935                            const lapack_complex_float* a, lapack_int lda,
03936                            const lapack_complex_float* b, lapack_int ldb,
03937                            const lapack_complex_float* x, lapack_int ldx,
03938                            float* ferr, float* berr );
03939 lapack_int LAPACKE_ztrrfs( int matrix_order, char uplo, char trans, char diag,
03940                            lapack_int n, lapack_int nrhs,
03941                            const lapack_complex_double* a, lapack_int lda,
03942                            const lapack_complex_double* b, lapack_int ldb,
03943                            const lapack_complex_double* x, lapack_int ldx,
03944                            double* ferr, double* berr );
03945 
03946 lapack_int LAPACKE_strsen( int matrix_order, char job, char compq,
03947                            const lapack_logical* select, lapack_int n, float* t,
03948                            lapack_int ldt, float* q, lapack_int ldq, float* wr,
03949                            float* wi, lapack_int* m, float* s, float* sep );
03950 lapack_int LAPACKE_dtrsen( int matrix_order, char job, char compq,
03951                            const lapack_logical* select, lapack_int n,
03952                            double* t, lapack_int ldt, double* q, lapack_int ldq,
03953                            double* wr, double* wi, lapack_int* m, double* s,
03954                            double* sep );
03955 lapack_int LAPACKE_ctrsen( int matrix_order, char job, char compq,
03956                            const lapack_logical* select, lapack_int n,
03957                            lapack_complex_float* t, lapack_int ldt,
03958                            lapack_complex_float* q, lapack_int ldq,
03959                            lapack_complex_float* w, lapack_int* m, float* s,
03960                            float* sep );
03961 lapack_int LAPACKE_ztrsen( int matrix_order, char job, char compq,
03962                            const lapack_logical* select, lapack_int n,
03963                            lapack_complex_double* t, lapack_int ldt,
03964                            lapack_complex_double* q, lapack_int ldq,
03965                            lapack_complex_double* w, lapack_int* m, double* s,
03966                            double* sep );
03967 
03968 lapack_int LAPACKE_strsna( int matrix_order, char job, char howmny,
03969                            const lapack_logical* select, lapack_int n,
03970                            const float* t, lapack_int ldt, const float* vl,
03971                            lapack_int ldvl, const float* vr, lapack_int ldvr,
03972                            float* s, float* sep, lapack_int mm, lapack_int* m );
03973 lapack_int LAPACKE_dtrsna( int matrix_order, char job, char howmny,
03974                            const lapack_logical* select, lapack_int n,
03975                            const double* t, lapack_int ldt, const double* vl,
03976                            lapack_int ldvl, const double* vr, lapack_int ldvr,
03977                            double* s, double* sep, lapack_int mm,
03978                            lapack_int* m );
03979 lapack_int LAPACKE_ctrsna( int matrix_order, char job, char howmny,
03980                            const lapack_logical* select, lapack_int n,
03981                            const lapack_complex_float* t, lapack_int ldt,
03982                            const lapack_complex_float* vl, lapack_int ldvl,
03983                            const lapack_complex_float* vr, lapack_int ldvr,
03984                            float* s, float* sep, lapack_int mm, lapack_int* m );
03985 lapack_int LAPACKE_ztrsna( int matrix_order, char job, char howmny,
03986                            const lapack_logical* select, lapack_int n,
03987                            const lapack_complex_double* t, lapack_int ldt,
03988                            const lapack_complex_double* vl, lapack_int ldvl,
03989                            const lapack_complex_double* vr, lapack_int ldvr,
03990                            double* s, double* sep, lapack_int mm,
03991                            lapack_int* m );
03992 
03993 lapack_int LAPACKE_strsyl( int matrix_order, char trana, char tranb,
03994                            lapack_int isgn, lapack_int m, lapack_int n,
03995                            const float* a, lapack_int lda, const float* b,
03996                            lapack_int ldb, float* c, lapack_int ldc,
03997                            float* scale );
03998 lapack_int LAPACKE_dtrsyl( int matrix_order, char trana, char tranb,
03999                            lapack_int isgn, lapack_int m, lapack_int n,
04000                            const double* a, lapack_int lda, const double* b,
04001                            lapack_int ldb, double* c, lapack_int ldc,
04002                            double* scale );
04003 lapack_int LAPACKE_ctrsyl( int matrix_order, char trana, char tranb,
04004                            lapack_int isgn, lapack_int m, lapack_int n,
04005                            const lapack_complex_float* a, lapack_int lda,
04006                            const lapack_complex_float* b, lapack_int ldb,
04007                            lapack_complex_float* c, lapack_int ldc,
04008                            float* scale );
04009 lapack_int LAPACKE_ztrsyl( int matrix_order, char trana, char tranb,
04010                            lapack_int isgn, lapack_int m, lapack_int n,
04011                            const lapack_complex_double* a, lapack_int lda,
04012                            const lapack_complex_double* b, lapack_int ldb,
04013                            lapack_complex_double* c, lapack_int ldc,
04014                            double* scale );
04015 
04016 lapack_int LAPACKE_strtri( int matrix_order, char uplo, char diag, lapack_int n,
04017                            float* a, lapack_int lda );
04018 lapack_int LAPACKE_dtrtri( int matrix_order, char uplo, char diag, lapack_int n,
04019                            double* a, lapack_int lda );
04020 lapack_int LAPACKE_ctrtri( int matrix_order, char uplo, char diag, lapack_int n,
04021                            lapack_complex_float* a, lapack_int lda );
04022 lapack_int LAPACKE_ztrtri( int matrix_order, char uplo, char diag, lapack_int n,
04023                            lapack_complex_double* a, lapack_int lda );
04024 
04025 lapack_int LAPACKE_strtrs( int matrix_order, char uplo, char trans, char diag,
04026                            lapack_int n, lapack_int nrhs, const float* a,
04027                            lapack_int lda, float* b, lapack_int ldb );
04028 lapack_int LAPACKE_dtrtrs( int matrix_order, char uplo, char trans, char diag,
04029                            lapack_int n, lapack_int nrhs, const double* a,
04030                            lapack_int lda, double* b, lapack_int ldb );
04031 lapack_int LAPACKE_ctrtrs( int matrix_order, char uplo, char trans, char diag,
04032                            lapack_int n, lapack_int nrhs,
04033                            const lapack_complex_float* a, lapack_int lda,
04034                            lapack_complex_float* b, lapack_int ldb );
04035 lapack_int LAPACKE_ztrtrs( int matrix_order, char uplo, char trans, char diag,
04036                            lapack_int n, lapack_int nrhs,
04037                            const lapack_complex_double* a, lapack_int lda,
04038                            lapack_complex_double* b, lapack_int ldb );
04039 
04040 lapack_int LAPACKE_strttf( int matrix_order, char transr, char uplo,
04041                            lapack_int n, const float* a, lapack_int lda,
04042                            float* arf );
04043 lapack_int LAPACKE_dtrttf( int matrix_order, char transr, char uplo,
04044                            lapack_int n, const double* a, lapack_int lda,
04045                            double* arf );
04046 lapack_int LAPACKE_ctrttf( int matrix_order, char transr, char uplo,
04047                            lapack_int n, const lapack_complex_float* a,
04048                            lapack_int lda, lapack_complex_float* arf );
04049 lapack_int LAPACKE_ztrttf( int matrix_order, char transr, char uplo,
04050                            lapack_int n, const lapack_complex_double* a,
04051                            lapack_int lda, lapack_complex_double* arf );
04052 
04053 lapack_int LAPACKE_strttp( int matrix_order, char uplo, lapack_int n,
04054                            const float* a, lapack_int lda, float* ap );
04055 lapack_int LAPACKE_dtrttp( int matrix_order, char uplo, lapack_int n,
04056                            const double* a, lapack_int lda, double* ap );
04057 lapack_int LAPACKE_ctrttp( int matrix_order, char uplo, lapack_int n,
04058                            const lapack_complex_float* a, lapack_int lda,
04059                            lapack_complex_float* ap );
04060 lapack_int LAPACKE_ztrttp( int matrix_order, char uplo, lapack_int n,
04061                            const lapack_complex_double* a, lapack_int lda,
04062                            lapack_complex_double* ap );
04063 
04064 lapack_int LAPACKE_stzrzf( int matrix_order, lapack_int m, lapack_int n,
04065                            float* a, lapack_int lda, float* tau );
04066 lapack_int LAPACKE_dtzrzf( int matrix_order, lapack_int m, lapack_int n,
04067                            double* a, lapack_int lda, double* tau );
04068 lapack_int LAPACKE_ctzrzf( int matrix_order, lapack_int m, lapack_int n,
04069                            lapack_complex_float* a, lapack_int lda,
04070                            lapack_complex_float* tau );
04071 lapack_int LAPACKE_ztzrzf( int matrix_order, lapack_int m, lapack_int n,
04072                            lapack_complex_double* a, lapack_int lda,
04073                            lapack_complex_double* tau );
04074 
04075 lapack_int LAPACKE_cungbr( int matrix_order, char vect, lapack_int m,
04076                            lapack_int n, lapack_int k, lapack_complex_float* a,
04077                            lapack_int lda, const lapack_complex_float* tau );
04078 lapack_int LAPACKE_zungbr( int matrix_order, char vect, lapack_int m,
04079                            lapack_int n, lapack_int k, lapack_complex_double* a,
04080                            lapack_int lda, const lapack_complex_double* tau );
04081 
04082 lapack_int LAPACKE_cunghr( int matrix_order, lapack_int n, lapack_int ilo,
04083                            lapack_int ihi, lapack_complex_float* a,
04084                            lapack_int lda, const lapack_complex_float* tau );
04085 lapack_int LAPACKE_zunghr( int matrix_order, lapack_int n, lapack_int ilo,
04086                            lapack_int ihi, lapack_complex_double* a,
04087                            lapack_int lda, const lapack_complex_double* tau );
04088 
04089 lapack_int LAPACKE_cunglq( int matrix_order, lapack_int m, lapack_int n,
04090                            lapack_int k, lapack_complex_float* a,
04091                            lapack_int lda, const lapack_complex_float* tau );
04092 lapack_int LAPACKE_zunglq( int matrix_order, lapack_int m, lapack_int n,
04093                            lapack_int k, lapack_complex_double* a,
04094                            lapack_int lda, const lapack_complex_double* tau );
04095 
04096 lapack_int LAPACKE_cungql( int matrix_order, lapack_int m, lapack_int n,
04097                            lapack_int k, lapack_complex_float* a,
04098                            lapack_int lda, const lapack_complex_float* tau );
04099 lapack_int LAPACKE_zungql( int matrix_order, lapack_int m, lapack_int n,
04100                            lapack_int k, lapack_complex_double* a,
04101                            lapack_int lda, const lapack_complex_double* tau );
04102 
04103 lapack_int LAPACKE_cungqr( int matrix_order, lapack_int m, lapack_int n,
04104                            lapack_int k, lapack_complex_float* a,
04105                            lapack_int lda, const lapack_complex_float* tau );
04106 lapack_int LAPACKE_zungqr( int matrix_order, lapack_int m, lapack_int n,
04107                            lapack_int k, lapack_complex_double* a,
04108                            lapack_int lda, const lapack_complex_double* tau );
04109 
04110 lapack_int LAPACKE_cungrq( int matrix_order, lapack_int m, lapack_int n,
04111                            lapack_int k, lapack_complex_float* a,
04112                            lapack_int lda, const lapack_complex_float* tau );
04113 lapack_int LAPACKE_zungrq( int matrix_order, lapack_int m, lapack_int n,
04114                            lapack_int k, lapack_complex_double* a,
04115                            lapack_int lda, const lapack_complex_double* tau );
04116 
04117 lapack_int LAPACKE_cungtr( int matrix_order, char uplo, lapack_int n,
04118                            lapack_complex_float* a, lapack_int lda,
04119                            const lapack_complex_float* tau );
04120 lapack_int LAPACKE_zungtr( int matrix_order, char uplo, lapack_int n,
04121                            lapack_complex_double* a, lapack_int lda,
04122                            const lapack_complex_double* tau );
04123 
04124 lapack_int LAPACKE_cunmbr( int matrix_order, char vect, char side, char trans,
04125                            lapack_int m, lapack_int n, lapack_int k,
04126                            const lapack_complex_float* a, lapack_int lda,
04127                            const lapack_complex_float* tau,
04128                            lapack_complex_float* c, lapack_int ldc );
04129 lapack_int LAPACKE_zunmbr( int matrix_order, char vect, char side, char trans,
04130                            lapack_int m, lapack_int n, lapack_int k,
04131                            const lapack_complex_double* a, lapack_int lda,
04132                            const lapack_complex_double* tau,
04133                            lapack_complex_double* c, lapack_int ldc );
04134 
04135 lapack_int LAPACKE_cunmhr( int matrix_order, char side, char trans,
04136                            lapack_int m, lapack_int n, lapack_int ilo,
04137                            lapack_int ihi, const lapack_complex_float* a,
04138                            lapack_int lda, const lapack_complex_float* tau,
04139                            lapack_complex_float* c, lapack_int ldc );
04140 lapack_int LAPACKE_zunmhr( int matrix_order, char side, char trans,
04141                            lapack_int m, lapack_int n, lapack_int ilo,
04142                            lapack_int ihi, const lapack_complex_double* a,
04143                            lapack_int lda, const lapack_complex_double* tau,
04144                            lapack_complex_double* c, lapack_int ldc );
04145 
04146 lapack_int LAPACKE_cunmlq( int matrix_order, char side, char trans,
04147                            lapack_int m, lapack_int n, lapack_int k,
04148                            const lapack_complex_float* a, lapack_int lda,
04149                            const lapack_complex_float* tau,
04150                            lapack_complex_float* c, lapack_int ldc );
04151 lapack_int LAPACKE_zunmlq( int matrix_order, char side, char trans,
04152                            lapack_int m, lapack_int n, lapack_int k,
04153                            const lapack_complex_double* a, lapack_int lda,
04154                            const lapack_complex_double* tau,
04155                            lapack_complex_double* c, lapack_int ldc );
04156 
04157 lapack_int LAPACKE_cunmql( int matrix_order, char side, char trans,
04158                            lapack_int m, lapack_int n, lapack_int k,
04159                            const lapack_complex_float* a, lapack_int lda,
04160                            const lapack_complex_float* tau,
04161                            lapack_complex_float* c, lapack_int ldc );
04162 lapack_int LAPACKE_zunmql( int matrix_order, char side, char trans,
04163                            lapack_int m, lapack_int n, lapack_int k,
04164                            const lapack_complex_double* a, lapack_int lda,
04165                            const lapack_complex_double* tau,
04166                            lapack_complex_double* c, lapack_int ldc );
04167 
04168 lapack_int LAPACKE_cunmqr( int matrix_order, char side, char trans,
04169                            lapack_int m, lapack_int n, lapack_int k,
04170                            const lapack_complex_float* a, lapack_int lda,
04171                            const lapack_complex_float* tau,
04172                            lapack_complex_float* c, lapack_int ldc );
04173 lapack_int LAPACKE_zunmqr( int matrix_order, char side, char trans,
04174                            lapack_int m, lapack_int n, lapack_int k,
04175                            const lapack_complex_double* a, lapack_int lda,
04176                            const lapack_complex_double* tau,
04177                            lapack_complex_double* c, lapack_int ldc );
04178 
04179 lapack_int LAPACKE_cunmrq( int matrix_order, char side, char trans,
04180                            lapack_int m, lapack_int n, lapack_int k,
04181                            const lapack_complex_float* a, lapack_int lda,
04182                            const lapack_complex_float* tau,
04183                            lapack_complex_float* c, lapack_int ldc );
04184 lapack_int LAPACKE_zunmrq( int matrix_order, char side, char trans,
04185                            lapack_int m, lapack_int n, lapack_int k,
04186                            const lapack_complex_double* a, lapack_int lda,
04187                            const lapack_complex_double* tau,
04188                            lapack_complex_double* c, lapack_int ldc );
04189 
04190 lapack_int LAPACKE_cunmrz( int matrix_order, char side, char trans,
04191                            lapack_int m, lapack_int n, lapack_int k,
04192                            lapack_int l, const lapack_complex_float* a,
04193                            lapack_int lda, const lapack_complex_float* tau,
04194                            lapack_complex_float* c, lapack_int ldc );
04195 lapack_int LAPACKE_zunmrz( int matrix_order, char side, char trans,
04196                            lapack_int m, lapack_int n, lapack_int k,
04197                            lapack_int l, const lapack_complex_double* a,
04198                            lapack_int lda, const lapack_complex_double* tau,
04199                            lapack_complex_double* c, lapack_int ldc );
04200 
04201 lapack_int LAPACKE_cunmtr( int matrix_order, char side, char uplo, char trans,
04202                            lapack_int m, lapack_int n,
04203                            const lapack_complex_float* a, lapack_int lda,
04204                            const lapack_complex_float* tau,
04205                            lapack_complex_float* c, lapack_int ldc );
04206 lapack_int LAPACKE_zunmtr( int matrix_order, char side, char uplo, char trans,
04207                            lapack_int m, lapack_int n,
04208                            const lapack_complex_double* a, lapack_int lda,
04209                            const lapack_complex_double* tau,
04210                            lapack_complex_double* c, lapack_int ldc );
04211 
04212 lapack_int LAPACKE_cupgtr( int matrix_order, char uplo, lapack_int n,
04213                            const lapack_complex_float* ap,
04214                            const lapack_complex_float* tau,
04215                            lapack_complex_float* q, lapack_int ldq );
04216 lapack_int LAPACKE_zupgtr( int matrix_order, char uplo, lapack_int n,
04217                            const lapack_complex_double* ap,
04218                            const lapack_complex_double* tau,
04219                            lapack_complex_double* q, lapack_int ldq );
04220 
04221 lapack_int LAPACKE_cupmtr( int matrix_order, char side, char uplo, char trans,
04222                            lapack_int m, lapack_int n,
04223                            const lapack_complex_float* ap,
04224                            const lapack_complex_float* tau,
04225                            lapack_complex_float* c, lapack_int ldc );
04226 lapack_int LAPACKE_zupmtr( int matrix_order, char side, char uplo, char trans,
04227                            lapack_int m, lapack_int n,
04228                            const lapack_complex_double* ap,
04229                            const lapack_complex_double* tau,
04230                            lapack_complex_double* c, lapack_int ldc );
04231 
04232 lapack_int LAPACKE_sbdsdc_work( int matrix_order, char uplo, char compq,
04233                                 lapack_int n, float* d, float* e, float* u,
04234                                 lapack_int ldu, float* vt, lapack_int ldvt,
04235                                 float* q, lapack_int* iq, float* work,
04236                                 lapack_int* iwork );
04237 lapack_int LAPACKE_dbdsdc_work( int matrix_order, char uplo, char compq,
04238                                 lapack_int n, double* d, double* e, double* u,
04239                                 lapack_int ldu, double* vt, lapack_int ldvt,
04240                                 double* q, lapack_int* iq, double* work,
04241                                 lapack_int* iwork );
04242 
04243 lapack_int LAPACKE_sbdsqr_work( int matrix_order, char uplo, lapack_int n,
04244                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04245                                 float* d, float* e, float* vt, lapack_int ldvt,
04246                                 float* u, lapack_int ldu, float* c,
04247                                 lapack_int ldc, float* work );
04248 lapack_int LAPACKE_dbdsqr_work( int matrix_order, char uplo, lapack_int n,
04249                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04250                                 double* d, double* e, double* vt,
04251                                 lapack_int ldvt, double* u, lapack_int ldu,
04252                                 double* c, lapack_int ldc, double* work );
04253 lapack_int LAPACKE_cbdsqr_work( int matrix_order, char uplo, lapack_int n,
04254                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04255                                 float* d, float* e, lapack_complex_float* vt,
04256                                 lapack_int ldvt, lapack_complex_float* u,
04257                                 lapack_int ldu, lapack_complex_float* c,
04258                                 lapack_int ldc, float* work );
04259 lapack_int LAPACKE_zbdsqr_work( int matrix_order, char uplo, lapack_int n,
04260                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04261                                 double* d, double* e, lapack_complex_double* vt,
04262                                 lapack_int ldvt, lapack_complex_double* u,
04263                                 lapack_int ldu, lapack_complex_double* c,
04264                                 lapack_int ldc, double* work );
04265 
04266 lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
04267                                 const float* d, float* sep );
04268 lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
04269                                 const double* d, double* sep );
04270 
04271 lapack_int LAPACKE_sgbbrd_work( int matrix_order, char vect, lapack_int m,
04272                                 lapack_int n, lapack_int ncc, lapack_int kl,
04273                                 lapack_int ku, float* ab, lapack_int ldab,
04274                                 float* d, float* e, float* q, lapack_int ldq,
04275                                 float* pt, lapack_int ldpt, float* c,
04276                                 lapack_int ldc, float* work );
04277 lapack_int LAPACKE_dgbbrd_work( int matrix_order, char vect, lapack_int m,
04278                                 lapack_int n, lapack_int ncc, lapack_int kl,
04279                                 lapack_int ku, double* ab, lapack_int ldab,
04280                                 double* d, double* e, double* q, lapack_int ldq,
04281                                 double* pt, lapack_int ldpt, double* c,
04282                                 lapack_int ldc, double* work );
04283 lapack_int LAPACKE_cgbbrd_work( int matrix_order, char vect, lapack_int m,
04284                                 lapack_int n, lapack_int ncc, lapack_int kl,
04285                                 lapack_int ku, lapack_complex_float* ab,
04286                                 lapack_int ldab, float* d, float* e,
04287                                 lapack_complex_float* q, lapack_int ldq,
04288                                 lapack_complex_float* pt, lapack_int ldpt,
04289                                 lapack_complex_float* c, lapack_int ldc,
04290                                 lapack_complex_float* work, float* rwork );
04291 lapack_int LAPACKE_zgbbrd_work( int matrix_order, char vect, lapack_int m,
04292                                 lapack_int n, lapack_int ncc, lapack_int kl,
04293                                 lapack_int ku, lapack_complex_double* ab,
04294                                 lapack_int ldab, double* d, double* e,
04295                                 lapack_complex_double* q, lapack_int ldq,
04296                                 lapack_complex_double* pt, lapack_int ldpt,
04297                                 lapack_complex_double* c, lapack_int ldc,
04298                                 lapack_complex_double* work, double* rwork );
04299 
04300 lapack_int LAPACKE_sgbcon_work( int matrix_order, char norm, lapack_int n,
04301                                 lapack_int kl, lapack_int ku, const float* ab,
04302                                 lapack_int ldab, const lapack_int* ipiv,
04303                                 float anorm, float* rcond, float* work,
04304                                 lapack_int* iwork );
04305 lapack_int LAPACKE_dgbcon_work( int matrix_order, char norm, lapack_int n,
04306                                 lapack_int kl, lapack_int ku, const double* ab,
04307                                 lapack_int ldab, const lapack_int* ipiv,
04308                                 double anorm, double* rcond, double* work,
04309                                 lapack_int* iwork );
04310 lapack_int LAPACKE_cgbcon_work( int matrix_order, char norm, lapack_int n,
04311                                 lapack_int kl, lapack_int ku,
04312                                 const lapack_complex_float* ab, lapack_int ldab,
04313                                 const lapack_int* ipiv, float anorm,
04314                                 float* rcond, lapack_complex_float* work,
04315                                 float* rwork );
04316 lapack_int LAPACKE_zgbcon_work( int matrix_order, char norm, lapack_int n,
04317                                 lapack_int kl, lapack_int ku,
04318                                 const lapack_complex_double* ab,
04319                                 lapack_int ldab, const lapack_int* ipiv,
04320                                 double anorm, double* rcond,
04321                                 lapack_complex_double* work, double* rwork );
04322 
04323 lapack_int LAPACKE_sgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04324                                 lapack_int kl, lapack_int ku, const float* ab,
04325                                 lapack_int ldab, float* r, float* c,
04326                                 float* rowcnd, float* colcnd, float* amax );
04327 lapack_int LAPACKE_dgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04328                                 lapack_int kl, lapack_int ku, const double* ab,
04329                                 lapack_int ldab, double* r, double* c,
04330                                 double* rowcnd, double* colcnd, double* amax );
04331 lapack_int LAPACKE_cgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04332                                 lapack_int kl, lapack_int ku,
04333                                 const lapack_complex_float* ab, lapack_int ldab,
04334                                 float* r, float* c, float* rowcnd,
04335                                 float* colcnd, float* amax );
04336 lapack_int LAPACKE_zgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04337                                 lapack_int kl, lapack_int ku,
04338                                 const lapack_complex_double* ab,
04339                                 lapack_int ldab, double* r, double* c,
04340                                 double* rowcnd, double* colcnd, double* amax );
04341 
04342 lapack_int LAPACKE_sgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04343                                  lapack_int kl, lapack_int ku, const float* ab,
04344                                  lapack_int ldab, float* r, float* c,
04345                                  float* rowcnd, float* colcnd, float* amax );
04346 lapack_int LAPACKE_dgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04347                                  lapack_int kl, lapack_int ku, const double* ab,
04348                                  lapack_int ldab, double* r, double* c,
04349                                  double* rowcnd, double* colcnd, double* amax );
04350 lapack_int LAPACKE_cgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04351                                  lapack_int kl, lapack_int ku,
04352                                  const lapack_complex_float* ab,
04353                                  lapack_int ldab, float* r, float* c,
04354                                  float* rowcnd, float* colcnd, float* amax );
04355 lapack_int LAPACKE_zgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04356                                  lapack_int kl, lapack_int ku,
04357                                  const lapack_complex_double* ab,
04358                                  lapack_int ldab, double* r, double* c,
04359                                  double* rowcnd, double* colcnd, double* amax );
04360 
04361 lapack_int LAPACKE_sgbrfs_work( int matrix_order, char trans, lapack_int n,
04362                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04363                                 const float* ab, lapack_int ldab,
04364                                 const float* afb, lapack_int ldafb,
04365                                 const lapack_int* ipiv, const float* b,
04366                                 lapack_int ldb, float* x, lapack_int ldx,
04367                                 float* ferr, float* berr, float* work,
04368                                 lapack_int* iwork );
04369 lapack_int LAPACKE_dgbrfs_work( int matrix_order, char trans, lapack_int n,
04370                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04371                                 const double* ab, lapack_int ldab,
04372                                 const double* afb, lapack_int ldafb,
04373                                 const lapack_int* ipiv, const double* b,
04374                                 lapack_int ldb, double* x, lapack_int ldx,
04375                                 double* ferr, double* berr, double* work,
04376                                 lapack_int* iwork );
04377 lapack_int LAPACKE_cgbrfs_work( int matrix_order, char trans, lapack_int n,
04378                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04379                                 const lapack_complex_float* ab, lapack_int ldab,
04380                                 const lapack_complex_float* afb,
04381                                 lapack_int ldafb, const lapack_int* ipiv,
04382                                 const lapack_complex_float* b, lapack_int ldb,
04383                                 lapack_complex_float* x, lapack_int ldx,
04384                                 float* ferr, float* berr,
04385                                 lapack_complex_float* work, float* rwork );
04386 lapack_int LAPACKE_zgbrfs_work( int matrix_order, char trans, lapack_int n,
04387                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04388                                 const lapack_complex_double* ab,
04389                                 lapack_int ldab,
04390                                 const lapack_complex_double* afb,
04391                                 lapack_int ldafb, const lapack_int* ipiv,
04392                                 const lapack_complex_double* b, lapack_int ldb,
04393                                 lapack_complex_double* x, lapack_int ldx,
04394                                 double* ferr, double* berr,
04395                                 lapack_complex_double* work, double* rwork );
04396 
04397 lapack_int LAPACKE_sgbrfsx_work( int matrix_order, char trans, char equed,
04398                                  lapack_int n, lapack_int kl, lapack_int ku,
04399                                  lapack_int nrhs, const float* ab,
04400                                  lapack_int ldab, const float* afb,
04401                                  lapack_int ldafb, const lapack_int* ipiv,
04402                                  const float* r, const float* c, const float* b,
04403                                  lapack_int ldb, float* x, lapack_int ldx,
04404                                  float* rcond, float* berr,
04405                                  lapack_int n_err_bnds, float* err_bnds_norm,
04406                                  float* err_bnds_comp, lapack_int nparams,
04407                                  float* params, float* work,
04408                                  lapack_int* iwork );
04409 lapack_int LAPACKE_dgbrfsx_work( int matrix_order, char trans, char equed,
04410                                  lapack_int n, lapack_int kl, lapack_int ku,
04411                                  lapack_int nrhs, const double* ab,
04412                                  lapack_int ldab, const double* afb,
04413                                  lapack_int ldafb, const lapack_int* ipiv,
04414                                  const double* r, const double* c,
04415                                  const double* b, lapack_int ldb, double* x,
04416                                  lapack_int ldx, double* rcond, double* berr,
04417                                  lapack_int n_err_bnds, double* err_bnds_norm,
04418                                  double* err_bnds_comp, lapack_int nparams,
04419                                  double* params, double* work,
04420                                  lapack_int* iwork );
04421 lapack_int LAPACKE_cgbrfsx_work( int matrix_order, char trans, char equed,
04422                                  lapack_int n, lapack_int kl, lapack_int ku,
04423                                  lapack_int nrhs,
04424                                  const lapack_complex_float* ab,
04425                                  lapack_int ldab,
04426                                  const lapack_complex_float* afb,
04427                                  lapack_int ldafb, const lapack_int* ipiv,
04428                                  const float* r, const float* c,
04429                                  const lapack_complex_float* b, lapack_int ldb,
04430                                  lapack_complex_float* x, lapack_int ldx,
04431                                  float* rcond, float* berr,
04432                                  lapack_int n_err_bnds, float* err_bnds_norm,
04433                                  float* err_bnds_comp, lapack_int nparams,
04434                                  float* params, lapack_complex_float* work,
04435                                  float* rwork );
04436 lapack_int LAPACKE_zgbrfsx_work( int matrix_order, char trans, char equed,
04437                                  lapack_int n, lapack_int kl, lapack_int ku,
04438                                  lapack_int nrhs,
04439                                  const lapack_complex_double* ab,
04440                                  lapack_int ldab,
04441                                  const lapack_complex_double* afb,
04442                                  lapack_int ldafb, const lapack_int* ipiv,
04443                                  const double* r, const double* c,
04444                                  const lapack_complex_double* b, lapack_int ldb,
04445                                  lapack_complex_double* x, lapack_int ldx,
04446                                  double* rcond, double* berr,
04447                                  lapack_int n_err_bnds, double* err_bnds_norm,
04448                                  double* err_bnds_comp, lapack_int nparams,
04449                                  double* params, lapack_complex_double* work,
04450                                  double* rwork );
04451 
04452 lapack_int LAPACKE_sgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04453                                lapack_int ku, lapack_int nrhs, float* ab,
04454                                lapack_int ldab, lapack_int* ipiv, float* b,
04455                                lapack_int ldb );
04456 lapack_int LAPACKE_dgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04457                                lapack_int ku, lapack_int nrhs, double* ab,
04458                                lapack_int ldab, lapack_int* ipiv, double* b,
04459                                lapack_int ldb );
04460 lapack_int LAPACKE_cgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04461                                lapack_int ku, lapack_int nrhs,
04462                                lapack_complex_float* ab, lapack_int ldab,
04463                                lapack_int* ipiv, lapack_complex_float* b,
04464                                lapack_int ldb );
04465 lapack_int LAPACKE_zgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04466                                lapack_int ku, lapack_int nrhs,
04467                                lapack_complex_double* ab, lapack_int ldab,
04468                                lapack_int* ipiv, lapack_complex_double* b,
04469                                lapack_int ldb );
04470 
04471 lapack_int LAPACKE_sgbsvx_work( int matrix_order, char fact, char trans,
04472                                 lapack_int n, lapack_int kl, lapack_int ku,
04473                                 lapack_int nrhs, float* ab, lapack_int ldab,
04474                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
04475                                 char* equed, float* r, float* c, float* b,
04476                                 lapack_int ldb, float* x, lapack_int ldx,
04477                                 float* rcond, float* ferr, float* berr,
04478                                 float* work, lapack_int* iwork );
04479 lapack_int LAPACKE_dgbsvx_work( int matrix_order, char fact, char trans,
04480                                 lapack_int n, lapack_int kl, lapack_int ku,
04481                                 lapack_int nrhs, double* ab, lapack_int ldab,
04482                                 double* afb, lapack_int ldafb, lapack_int* ipiv,
04483                                 char* equed, double* r, double* c, double* b,
04484                                 lapack_int ldb, double* x, lapack_int ldx,
04485                                 double* rcond, double* ferr, double* berr,
04486                                 double* work, lapack_int* iwork );
04487 lapack_int LAPACKE_cgbsvx_work( int matrix_order, char fact, char trans,
04488                                 lapack_int n, lapack_int kl, lapack_int ku,
04489                                 lapack_int nrhs, lapack_complex_float* ab,
04490                                 lapack_int ldab, lapack_complex_float* afb,
04491                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
04492                                 float* r, float* c, lapack_complex_float* b,
04493                                 lapack_int ldb, lapack_complex_float* x,
04494                                 lapack_int ldx, float* rcond, float* ferr,
04495                                 float* berr, lapack_complex_float* work,
04496                                 float* rwork );
04497 lapack_int LAPACKE_zgbsvx_work( int matrix_order, char fact, char trans,
04498                                 lapack_int n, lapack_int kl, lapack_int ku,
04499                                 lapack_int nrhs, lapack_complex_double* ab,
04500                                 lapack_int ldab, lapack_complex_double* afb,
04501                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
04502                                 double* r, double* c, lapack_complex_double* b,
04503                                 lapack_int ldb, lapack_complex_double* x,
04504                                 lapack_int ldx, double* rcond, double* ferr,
04505                                 double* berr, lapack_complex_double* work,
04506                                 double* rwork );
04507 
04508 lapack_int LAPACKE_sgbsvxx_work( int matrix_order, char fact, char trans,
04509                                  lapack_int n, lapack_int kl, lapack_int ku,
04510                                  lapack_int nrhs, float* ab, lapack_int ldab,
04511                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
04512                                  char* equed, float* r, float* c, float* b,
04513                                  lapack_int ldb, float* x, lapack_int ldx,
04514                                  float* rcond, float* rpvgrw, float* berr,
04515                                  lapack_int n_err_bnds, float* err_bnds_norm,
04516                                  float* err_bnds_comp, lapack_int nparams,
04517                                  float* params, float* work,
04518                                  lapack_int* iwork );
04519 lapack_int LAPACKE_dgbsvxx_work( int matrix_order, char fact, char trans,
04520                                  lapack_int n, lapack_int kl, lapack_int ku,
04521                                  lapack_int nrhs, double* ab, lapack_int ldab,
04522                                  double* afb, lapack_int ldafb,
04523                                  lapack_int* ipiv, char* equed, double* r,
04524                                  double* c, double* b, lapack_int ldb,
04525                                  double* x, lapack_int ldx, double* rcond,
04526                                  double* rpvgrw, double* berr,
04527                                  lapack_int n_err_bnds, double* err_bnds_norm,
04528                                  double* err_bnds_comp, lapack_int nparams,
04529                                  double* params, double* work,
04530                                  lapack_int* iwork );
04531 lapack_int LAPACKE_cgbsvxx_work( int matrix_order, char fact, char trans,
04532                                  lapack_int n, lapack_int kl, lapack_int ku,
04533                                  lapack_int nrhs, lapack_complex_float* ab,
04534                                  lapack_int ldab, lapack_complex_float* afb,
04535                                  lapack_int ldafb, lapack_int* ipiv,
04536                                  char* equed, float* r, float* c,
04537                                  lapack_complex_float* b, lapack_int ldb,
04538                                  lapack_complex_float* x, lapack_int ldx,
04539                                  float* rcond, float* rpvgrw, float* berr,
04540                                  lapack_int n_err_bnds, float* err_bnds_norm,
04541                                  float* err_bnds_comp, lapack_int nparams,
04542                                  float* params, lapack_complex_float* work,
04543                                  float* rwork );
04544 lapack_int LAPACKE_zgbsvxx_work( int matrix_order, char fact, char trans,
04545                                  lapack_int n, lapack_int kl, lapack_int ku,
04546                                  lapack_int nrhs, lapack_complex_double* ab,
04547                                  lapack_int ldab, lapack_complex_double* afb,
04548                                  lapack_int ldafb, lapack_int* ipiv,
04549                                  char* equed, double* r, double* c,
04550                                  lapack_complex_double* b, lapack_int ldb,
04551                                  lapack_complex_double* x, lapack_int ldx,
04552                                  double* rcond, double* rpvgrw, double* berr,
04553                                  lapack_int n_err_bnds, double* err_bnds_norm,
04554                                  double* err_bnds_comp, lapack_int nparams,
04555                                  double* params, lapack_complex_double* work,
04556                                  double* rwork );
04557 
04558 lapack_int LAPACKE_sgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04559                                 lapack_int kl, lapack_int ku, float* ab,
04560                                 lapack_int ldab, lapack_int* ipiv );
04561 lapack_int LAPACKE_dgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04562                                 lapack_int kl, lapack_int ku, double* ab,
04563                                 lapack_int ldab, lapack_int* ipiv );
04564 lapack_int LAPACKE_cgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04565                                 lapack_int kl, lapack_int ku,
04566                                 lapack_complex_float* ab, lapack_int ldab,
04567                                 lapack_int* ipiv );
04568 lapack_int LAPACKE_zgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04569                                 lapack_int kl, lapack_int ku,
04570                                 lapack_complex_double* ab, lapack_int ldab,
04571                                 lapack_int* ipiv );
04572 
04573 lapack_int LAPACKE_sgbtrs_work( int matrix_order, char trans, lapack_int n,
04574                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04575                                 const float* ab, lapack_int ldab,
04576                                 const lapack_int* ipiv, float* b,
04577                                 lapack_int ldb );
04578 lapack_int LAPACKE_dgbtrs_work( int matrix_order, char trans, lapack_int n,
04579                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04580                                 const double* ab, lapack_int ldab,
04581                                 const lapack_int* ipiv, double* b,
04582                                 lapack_int ldb );
04583 lapack_int LAPACKE_cgbtrs_work( int matrix_order, char trans, lapack_int n,
04584                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04585                                 const lapack_complex_float* ab, lapack_int ldab,
04586                                 const lapack_int* ipiv, lapack_complex_float* b,
04587                                 lapack_int ldb );
04588 lapack_int LAPACKE_zgbtrs_work( int matrix_order, char trans, lapack_int n,
04589                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04590                                 const lapack_complex_double* ab,
04591                                 lapack_int ldab, const lapack_int* ipiv,
04592                                 lapack_complex_double* b, lapack_int ldb );
04593 
04594 lapack_int LAPACKE_sgebak_work( int matrix_order, char job, char side,
04595                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04596                                 const float* scale, lapack_int m, float* v,
04597                                 lapack_int ldv );
04598 lapack_int LAPACKE_dgebak_work( int matrix_order, char job, char side,
04599                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04600                                 const double* scale, lapack_int m, double* v,
04601                                 lapack_int ldv );
04602 lapack_int LAPACKE_cgebak_work( int matrix_order, char job, char side,
04603                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04604                                 const float* scale, lapack_int m,
04605                                 lapack_complex_float* v, lapack_int ldv );
04606 lapack_int LAPACKE_zgebak_work( int matrix_order, char job, char side,
04607                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04608                                 const double* scale, lapack_int m,
04609                                 lapack_complex_double* v, lapack_int ldv );
04610 
04611 lapack_int LAPACKE_sgebal_work( int matrix_order, char job, lapack_int n,
04612                                 float* a, lapack_int lda, lapack_int* ilo,
04613                                 lapack_int* ihi, float* scale );
04614 lapack_int LAPACKE_dgebal_work( int matrix_order, char job, lapack_int n,
04615                                 double* a, lapack_int lda, lapack_int* ilo,
04616                                 lapack_int* ihi, double* scale );
04617 lapack_int LAPACKE_cgebal_work( int matrix_order, char job, lapack_int n,
04618                                 lapack_complex_float* a, lapack_int lda,
04619                                 lapack_int* ilo, lapack_int* ihi,
04620                                 float* scale );
04621 lapack_int LAPACKE_zgebal_work( int matrix_order, char job, lapack_int n,
04622                                 lapack_complex_double* a, lapack_int lda,
04623                                 lapack_int* ilo, lapack_int* ihi,
04624                                 double* scale );
04625 
04626 lapack_int LAPACKE_sgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04627                                 float* a, lapack_int lda, float* d, float* e,
04628                                 float* tauq, float* taup, float* work,
04629                                 lapack_int lwork );
04630 lapack_int LAPACKE_dgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04631                                 double* a, lapack_int lda, double* d, double* e,
04632                                 double* tauq, double* taup, double* work,
04633                                 lapack_int lwork );
04634 lapack_int LAPACKE_cgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04635                                 lapack_complex_float* a, lapack_int lda,
04636                                 float* d, float* e, lapack_complex_float* tauq,
04637                                 lapack_complex_float* taup,
04638                                 lapack_complex_float* work, lapack_int lwork );
04639 lapack_int LAPACKE_zgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04640                                 lapack_complex_double* a, lapack_int lda,
04641                                 double* d, double* e,
04642                                 lapack_complex_double* tauq,
04643                                 lapack_complex_double* taup,
04644                                 lapack_complex_double* work, lapack_int lwork );
04645 
04646 lapack_int LAPACKE_sgecon_work( int matrix_order, char norm, lapack_int n,
04647                                 const float* a, lapack_int lda, float anorm,
04648                                 float* rcond, float* work, lapack_int* iwork );
04649 lapack_int LAPACKE_dgecon_work( int matrix_order, char norm, lapack_int n,
04650                                 const double* a, lapack_int lda, double anorm,
04651                                 double* rcond, double* work,
04652                                 lapack_int* iwork );
04653 lapack_int LAPACKE_cgecon_work( int matrix_order, char norm, lapack_int n,
04654                                 const lapack_complex_float* a, lapack_int lda,
04655                                 float anorm, float* rcond,
04656                                 lapack_complex_float* work, float* rwork );
04657 lapack_int LAPACKE_zgecon_work( int matrix_order, char norm, lapack_int n,
04658                                 const lapack_complex_double* a, lapack_int lda,
04659                                 double anorm, double* rcond,
04660                                 lapack_complex_double* work, double* rwork );
04661 
04662 lapack_int LAPACKE_sgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04663                                 const float* a, lapack_int lda, float* r,
04664                                 float* c, float* rowcnd, float* colcnd,
04665                                 float* amax );
04666 lapack_int LAPACKE_dgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04667                                 const double* a, lapack_int lda, double* r,
04668                                 double* c, double* rowcnd, double* colcnd,
04669                                 double* amax );
04670 lapack_int LAPACKE_cgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04671                                 const lapack_complex_float* a, lapack_int lda,
04672                                 float* r, float* c, float* rowcnd,
04673                                 float* colcnd, float* amax );
04674 lapack_int LAPACKE_zgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04675                                 const lapack_complex_double* a, lapack_int lda,
04676                                 double* r, double* c, double* rowcnd,
04677                                 double* colcnd, double* amax );
04678 
04679 lapack_int LAPACKE_sgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04680                                  const float* a, lapack_int lda, float* r,
04681                                  float* c, float* rowcnd, float* colcnd,
04682                                  float* amax );
04683 lapack_int LAPACKE_dgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04684                                  const double* a, lapack_int lda, double* r,
04685                                  double* c, double* rowcnd, double* colcnd,
04686                                  double* amax );
04687 lapack_int LAPACKE_cgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04688                                  const lapack_complex_float* a, lapack_int lda,
04689                                  float* r, float* c, float* rowcnd,
04690                                  float* colcnd, float* amax );
04691 lapack_int LAPACKE_zgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04692                                  const lapack_complex_double* a, lapack_int lda,
04693                                  double* r, double* c, double* rowcnd,
04694                                  double* colcnd, double* amax );
04695 
04696 lapack_int LAPACKE_sgees_work( int matrix_order, char jobvs, char sort,
04697                                LAPACK_S_SELECT2 select, lapack_int n, float* a,
04698                                lapack_int lda, lapack_int* sdim, float* wr,
04699                                float* wi, float* vs, lapack_int ldvs,
04700                                float* work, lapack_int lwork,
04701                                lapack_logical* bwork );
04702 lapack_int LAPACKE_dgees_work( int matrix_order, char jobvs, char sort,
04703                                LAPACK_D_SELECT2 select, lapack_int n, double* a,
04704                                lapack_int lda, lapack_int* sdim, double* wr,
04705                                double* wi, double* vs, lapack_int ldvs,
04706                                double* work, lapack_int lwork,
04707                                lapack_logical* bwork );
04708 lapack_int LAPACKE_cgees_work( int matrix_order, char jobvs, char sort,
04709                                LAPACK_C_SELECT1 select, lapack_int n,
04710                                lapack_complex_float* a, lapack_int lda,
04711                                lapack_int* sdim, lapack_complex_float* w,
04712                                lapack_complex_float* vs, lapack_int ldvs,
04713                                lapack_complex_float* work, lapack_int lwork,
04714                                float* rwork, lapack_logical* bwork );
04715 lapack_int LAPACKE_zgees_work( int matrix_order, char jobvs, char sort,
04716                                LAPACK_Z_SELECT1 select, lapack_int n,
04717                                lapack_complex_double* a, lapack_int lda,
04718                                lapack_int* sdim, lapack_complex_double* w,
04719                                lapack_complex_double* vs, lapack_int ldvs,
04720                                lapack_complex_double* work, lapack_int lwork,
04721                                double* rwork, lapack_logical* bwork );
04722 
04723 lapack_int LAPACKE_sgeesx_work( int matrix_order, char jobvs, char sort,
04724                                 LAPACK_S_SELECT2 select, char sense,
04725                                 lapack_int n, float* a, lapack_int lda,
04726                                 lapack_int* sdim, float* wr, float* wi,
04727                                 float* vs, lapack_int ldvs, float* rconde,
04728                                 float* rcondv, float* work, lapack_int lwork,
04729                                 lapack_int* iwork, lapack_int liwork,
04730                                 lapack_logical* bwork );
04731 lapack_int LAPACKE_dgeesx_work( int matrix_order, char jobvs, char sort,
04732                                 LAPACK_D_SELECT2 select, char sense,
04733                                 lapack_int n, double* a, lapack_int lda,
04734                                 lapack_int* sdim, double* wr, double* wi,
04735                                 double* vs, lapack_int ldvs, double* rconde,
04736                                 double* rcondv, double* work, lapack_int lwork,
04737                                 lapack_int* iwork, lapack_int liwork,
04738                                 lapack_logical* bwork );
04739 lapack_int LAPACKE_cgeesx_work( int matrix_order, char jobvs, char sort,
04740                                 LAPACK_C_SELECT1 select, char sense,
04741                                 lapack_int n, lapack_complex_float* a,
04742                                 lapack_int lda, lapack_int* sdim,
04743                                 lapack_complex_float* w,
04744                                 lapack_complex_float* vs, lapack_int ldvs,
04745                                 float* rconde, float* rcondv,
04746                                 lapack_complex_float* work, lapack_int lwork,
04747                                 float* rwork, lapack_logical* bwork );
04748 lapack_int LAPACKE_zgeesx_work( int matrix_order, char jobvs, char sort,
04749                                 LAPACK_Z_SELECT1 select, char sense,
04750                                 lapack_int n, lapack_complex_double* a,
04751                                 lapack_int lda, lapack_int* sdim,
04752                                 lapack_complex_double* w,
04753                                 lapack_complex_double* vs, lapack_int ldvs,
04754                                 double* rconde, double* rcondv,
04755                                 lapack_complex_double* work, lapack_int lwork,
04756                                 double* rwork, lapack_logical* bwork );
04757 
04758 lapack_int LAPACKE_sgeev_work( int matrix_order, char jobvl, char jobvr,
04759                                lapack_int n, float* a, lapack_int lda,
04760                                float* wr, float* wi, float* vl, lapack_int ldvl,
04761                                float* vr, lapack_int ldvr, float* work,
04762                                lapack_int lwork );
04763 lapack_int LAPACKE_dgeev_work( int matrix_order, char jobvl, char jobvr,
04764                                lapack_int n, double* a, lapack_int lda,
04765                                double* wr, double* wi, double* vl,
04766                                lapack_int ldvl, double* vr, lapack_int ldvr,
04767                                double* work, lapack_int lwork );
04768 lapack_int LAPACKE_cgeev_work( int matrix_order, char jobvl, char jobvr,
04769                                lapack_int n, lapack_complex_float* a,
04770                                lapack_int lda, lapack_complex_float* w,
04771                                lapack_complex_float* vl, lapack_int ldvl,
04772                                lapack_complex_float* vr, lapack_int ldvr,
04773                                lapack_complex_float* work, lapack_int lwork,
04774                                float* rwork );
04775 lapack_int LAPACKE_zgeev_work( int matrix_order, char jobvl, char jobvr,
04776                                lapack_int n, lapack_complex_double* a,
04777                                lapack_int lda, lapack_complex_double* w,
04778                                lapack_complex_double* vl, lapack_int ldvl,
04779                                lapack_complex_double* vr, lapack_int ldvr,
04780                                lapack_complex_double* work, lapack_int lwork,
04781                                double* rwork );
04782 
04783 lapack_int LAPACKE_sgeevx_work( int matrix_order, char balanc, char jobvl,
04784                                 char jobvr, char sense, lapack_int n, float* a,
04785                                 lapack_int lda, float* wr, float* wi, float* vl,
04786                                 lapack_int ldvl, float* vr, lapack_int ldvr,
04787                                 lapack_int* ilo, lapack_int* ihi, float* scale,
04788                                 float* abnrm, float* rconde, float* rcondv,
04789                                 float* work, lapack_int lwork,
04790                                 lapack_int* iwork );
04791 lapack_int LAPACKE_dgeevx_work( int matrix_order, char balanc, char jobvl,
04792                                 char jobvr, char sense, lapack_int n, double* a,
04793                                 lapack_int lda, double* wr, double* wi,
04794                                 double* vl, lapack_int ldvl, double* vr,
04795                                 lapack_int ldvr, lapack_int* ilo,
04796                                 lapack_int* ihi, double* scale, double* abnrm,
04797                                 double* rconde, double* rcondv, double* work,
04798                                 lapack_int lwork, lapack_int* iwork );
04799 lapack_int LAPACKE_cgeevx_work( int matrix_order, char balanc, char jobvl,
04800                                 char jobvr, char sense, lapack_int n,
04801                                 lapack_complex_float* a, lapack_int lda,
04802                                 lapack_complex_float* w,
04803                                 lapack_complex_float* vl, lapack_int ldvl,
04804                                 lapack_complex_float* vr, lapack_int ldvr,
04805                                 lapack_int* ilo, lapack_int* ihi, float* scale,
04806                                 float* abnrm, float* rconde, float* rcondv,
04807                                 lapack_complex_float* work, lapack_int lwork,
04808                                 float* rwork );
04809 lapack_int LAPACKE_zgeevx_work( int matrix_order, char balanc, char jobvl,
04810                                 char jobvr, char sense, lapack_int n,
04811                                 lapack_complex_double* a, lapack_int lda,
04812                                 lapack_complex_double* w,
04813                                 lapack_complex_double* vl, lapack_int ldvl,
04814                                 lapack_complex_double* vr, lapack_int ldvr,
04815                                 lapack_int* ilo, lapack_int* ihi, double* scale,
04816                                 double* abnrm, double* rconde, double* rcondv,
04817                                 lapack_complex_double* work, lapack_int lwork,
04818                                 double* rwork );
04819 
04820 lapack_int LAPACKE_sgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
04821                                 lapack_int ihi, float* a, lapack_int lda,
04822                                 float* tau, float* work, lapack_int lwork );
04823 lapack_int LAPACKE_dgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
04824                                 lapack_int ihi, double* a, lapack_int lda,
04825                                 double* tau, double* work, lapack_int lwork );
04826 lapack_int LAPACKE_cgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
04827                                 lapack_int ihi, lapack_complex_float* a,
04828                                 lapack_int lda, lapack_complex_float* tau,
04829                                 lapack_complex_float* work, lapack_int lwork );
04830 lapack_int LAPACKE_zgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
04831                                 lapack_int ihi, lapack_complex_double* a,
04832                                 lapack_int lda, lapack_complex_double* tau,
04833                                 lapack_complex_double* work, lapack_int lwork );
04834 
04835 lapack_int LAPACKE_sgejsv_work( int matrix_order, char joba, char jobu,
04836                                 char jobv, char jobr, char jobt, char jobp,
04837                                 lapack_int m, lapack_int n, float* a,
04838                                 lapack_int lda, float* sva, float* u,
04839                                 lapack_int ldu, float* v, lapack_int ldv,
04840                                 float* work, lapack_int lwork,
04841                                 lapack_int* iwork );
04842 lapack_int LAPACKE_dgejsv_work( int matrix_order, char joba, char jobu,
04843                                 char jobv, char jobr, char jobt, char jobp,
04844                                 lapack_int m, lapack_int n, double* a,
04845                                 lapack_int lda, double* sva, double* u,
04846                                 lapack_int ldu, double* v, lapack_int ldv,
04847                                 double* work, lapack_int lwork,
04848                                 lapack_int* iwork );
04849 
04850 lapack_int LAPACKE_sgelqf_work( int matrix_order, lapack_int m, lapack_int n,
04851                                 float* a, lapack_int lda, float* tau,
04852                                 float* work, lapack_int lwork );
04853 lapack_int LAPACKE_dgelqf_work( int matrix_order, lapack_int m, lapack_int n,
04854                                 double* a, lapack_int lda, double* tau,
04855                                 double* work, lapack_int lwork );
04856 lapack_int LAPACKE_cgelqf_work( int matrix_order, lapack_int m, lapack_int n,
04857                                 lapack_complex_float* a, lapack_int lda,
04858                                 lapack_complex_float* tau,
04859                                 lapack_complex_float* work, lapack_int lwork );
04860 lapack_int LAPACKE_zgelqf_work( int matrix_order, lapack_int m, lapack_int n,
04861                                 lapack_complex_double* a, lapack_int lda,
04862                                 lapack_complex_double* tau,
04863                                 lapack_complex_double* work, lapack_int lwork );
04864 
04865 lapack_int LAPACKE_sgels_work( int matrix_order, char trans, lapack_int m,
04866                                lapack_int n, lapack_int nrhs, float* a,
04867                                lapack_int lda, float* b, lapack_int ldb,
04868                                float* work, lapack_int lwork );
04869 lapack_int LAPACKE_dgels_work( int matrix_order, char trans, lapack_int m,
04870                                lapack_int n, lapack_int nrhs, double* a,
04871                                lapack_int lda, double* b, lapack_int ldb,
04872                                double* work, lapack_int lwork );
04873 lapack_int LAPACKE_cgels_work( int matrix_order, char trans, lapack_int m,
04874                                lapack_int n, lapack_int nrhs,
04875                                lapack_complex_float* a, lapack_int lda,
04876                                lapack_complex_float* b, lapack_int ldb,
04877                                lapack_complex_float* work, lapack_int lwork );
04878 lapack_int LAPACKE_zgels_work( int matrix_order, char trans, lapack_int m,
04879                                lapack_int n, lapack_int nrhs,
04880                                lapack_complex_double* a, lapack_int lda,
04881                                lapack_complex_double* b, lapack_int ldb,
04882                                lapack_complex_double* work, lapack_int lwork );
04883 
04884 lapack_int LAPACKE_sgelsd_work( int matrix_order, lapack_int m, lapack_int n,
04885                                 lapack_int nrhs, float* a, lapack_int lda,
04886                                 float* b, lapack_int ldb, float* s, float rcond,
04887                                 lapack_int* rank, float* work, lapack_int lwork,
04888                                 lapack_int* iwork );
04889 lapack_int LAPACKE_dgelsd_work( int matrix_order, lapack_int m, lapack_int n,
04890                                 lapack_int nrhs, double* a, lapack_int lda,
04891                                 double* b, lapack_int ldb, double* s,
04892                                 double rcond, lapack_int* rank, double* work,
04893                                 lapack_int lwork, lapack_int* iwork );
04894 lapack_int LAPACKE_cgelsd_work( int matrix_order, lapack_int m, lapack_int n,
04895                                 lapack_int nrhs, lapack_complex_float* a,
04896                                 lapack_int lda, lapack_complex_float* b,
04897                                 lapack_int ldb, float* s, float rcond,
04898                                 lapack_int* rank, lapack_complex_float* work,
04899                                 lapack_int lwork, float* rwork,
04900                                 lapack_int* iwork );
04901 lapack_int LAPACKE_zgelsd_work( int matrix_order, lapack_int m, lapack_int n,
04902                                 lapack_int nrhs, lapack_complex_double* a,
04903                                 lapack_int lda, lapack_complex_double* b,
04904                                 lapack_int ldb, double* s, double rcond,
04905                                 lapack_int* rank, lapack_complex_double* work,
04906                                 lapack_int lwork, double* rwork,
04907                                 lapack_int* iwork );
04908 
04909 lapack_int LAPACKE_sgelss_work( int matrix_order, lapack_int m, lapack_int n,
04910                                 lapack_int nrhs, float* a, lapack_int lda,
04911                                 float* b, lapack_int ldb, float* s, float rcond,
04912                                 lapack_int* rank, float* work,
04913                                 lapack_int lwork );
04914 lapack_int LAPACKE_dgelss_work( int matrix_order, lapack_int m, lapack_int n,
04915                                 lapack_int nrhs, double* a, lapack_int lda,
04916                                 double* b, lapack_int ldb, double* s,
04917                                 double rcond, lapack_int* rank, double* work,
04918                                 lapack_int lwork );
04919 lapack_int LAPACKE_cgelss_work( int matrix_order, lapack_int m, lapack_int n,
04920                                 lapack_int nrhs, lapack_complex_float* a,
04921                                 lapack_int lda, lapack_complex_float* b,
04922                                 lapack_int ldb, float* s, float rcond,
04923                                 lapack_int* rank, lapack_complex_float* work,
04924                                 lapack_int lwork, float* rwork );
04925 lapack_int LAPACKE_zgelss_work( int matrix_order, lapack_int m, lapack_int n,
04926                                 lapack_int nrhs, lapack_complex_double* a,
04927                                 lapack_int lda, lapack_complex_double* b,
04928                                 lapack_int ldb, double* s, double rcond,
04929                                 lapack_int* rank, lapack_complex_double* work,
04930                                 lapack_int lwork, double* rwork );
04931 
04932 lapack_int LAPACKE_sgelsy_work( int matrix_order, lapack_int m, lapack_int n,
04933                                 lapack_int nrhs, float* a, lapack_int lda,
04934                                 float* b, lapack_int ldb, lapack_int* jpvt,
04935                                 float rcond, lapack_int* rank, float* work,
04936                                 lapack_int lwork );
04937 lapack_int LAPACKE_dgelsy_work( int matrix_order, lapack_int m, lapack_int n,
04938                                 lapack_int nrhs, double* a, lapack_int lda,
04939                                 double* b, lapack_int ldb, lapack_int* jpvt,
04940                                 double rcond, lapack_int* rank, double* work,
04941                                 lapack_int lwork );
04942 lapack_int LAPACKE_cgelsy_work( int matrix_order, lapack_int m, lapack_int n,
04943                                 lapack_int nrhs, lapack_complex_float* a,
04944                                 lapack_int lda, lapack_complex_float* b,
04945                                 lapack_int ldb, lapack_int* jpvt, float rcond,
04946                                 lapack_int* rank, lapack_complex_float* work,
04947                                 lapack_int lwork, float* rwork );
04948 lapack_int LAPACKE_zgelsy_work( int matrix_order, lapack_int m, lapack_int n,
04949                                 lapack_int nrhs, lapack_complex_double* a,
04950                                 lapack_int lda, lapack_complex_double* b,
04951                                 lapack_int ldb, lapack_int* jpvt, double rcond,
04952                                 lapack_int* rank, lapack_complex_double* work,
04953                                 lapack_int lwork, double* rwork );
04954 
04955 lapack_int LAPACKE_sgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
04956                                 float* a, lapack_int lda, float* tau,
04957                                 float* work, lapack_int lwork );
04958 lapack_int LAPACKE_dgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
04959                                 double* a, lapack_int lda, double* tau,
04960                                 double* work, lapack_int lwork );
04961 lapack_int LAPACKE_cgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
04962                                 lapack_complex_float* a, lapack_int lda,
04963                                 lapack_complex_float* tau,
04964                                 lapack_complex_float* work, lapack_int lwork );
04965 lapack_int LAPACKE_zgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
04966                                 lapack_complex_double* a, lapack_int lda,
04967                                 lapack_complex_double* tau,
04968                                 lapack_complex_double* work, lapack_int lwork );
04969 
04970 lapack_int LAPACKE_sgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
04971                                 float* a, lapack_int lda, lapack_int* jpvt,
04972                                 float* tau, float* work, lapack_int lwork );
04973 lapack_int LAPACKE_dgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
04974                                 double* a, lapack_int lda, lapack_int* jpvt,
04975                                 double* tau, double* work, lapack_int lwork );
04976 lapack_int LAPACKE_cgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
04977                                 lapack_complex_float* a, lapack_int lda,
04978                                 lapack_int* jpvt, lapack_complex_float* tau,
04979                                 lapack_complex_float* work, lapack_int lwork,
04980                                 float* rwork );
04981 lapack_int LAPACKE_zgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
04982                                 lapack_complex_double* a, lapack_int lda,
04983                                 lapack_int* jpvt, lapack_complex_double* tau,
04984                                 lapack_complex_double* work, lapack_int lwork,
04985                                 double* rwork );
04986 
04987 lapack_int LAPACKE_sgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
04988                                 float* a, lapack_int lda, lapack_int* jpvt,
04989                                 float* tau, float* work );
04990 lapack_int LAPACKE_dgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
04991                                 double* a, lapack_int lda, lapack_int* jpvt,
04992                                 double* tau, double* work );
04993 lapack_int LAPACKE_cgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
04994                                 lapack_complex_float* a, lapack_int lda,
04995                                 lapack_int* jpvt, lapack_complex_float* tau,
04996                                 lapack_complex_float* work, float* rwork );
04997 lapack_int LAPACKE_zgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
04998                                 lapack_complex_double* a, lapack_int lda,
04999                                 lapack_int* jpvt, lapack_complex_double* tau,
05000                                 lapack_complex_double* work, double* rwork );
05001 
05002 lapack_int LAPACKE_sgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05003                                 float* a, lapack_int lda, float* tau,
05004                                 float* work, lapack_int lwork );
05005 lapack_int LAPACKE_dgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05006                                 double* a, lapack_int lda, double* tau,
05007                                 double* work, lapack_int lwork );
05008 lapack_int LAPACKE_cgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05009                                 lapack_complex_float* a, lapack_int lda,
05010                                 lapack_complex_float* tau,
05011                                 lapack_complex_float* work, lapack_int lwork );
05012 lapack_int LAPACKE_zgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05013                                 lapack_complex_double* a, lapack_int lda,
05014                                 lapack_complex_double* tau,
05015                                 lapack_complex_double* work, lapack_int lwork );
05016 
05017 lapack_int LAPACKE_sgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05018                                  float* a, lapack_int lda, float* tau,
05019                                  float* work, lapack_int lwork );
05020 lapack_int LAPACKE_dgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05021                                  double* a, lapack_int lda, double* tau,
05022                                  double* work, lapack_int lwork );
05023 lapack_int LAPACKE_cgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05024                                  lapack_complex_float* a, lapack_int lda,
05025                                  lapack_complex_float* tau,
05026                                  lapack_complex_float* work, lapack_int lwork );
05027 lapack_int LAPACKE_zgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05028                                  lapack_complex_double* a, lapack_int lda,
05029                                  lapack_complex_double* tau,
05030                                  lapack_complex_double* work,
05031                                  lapack_int lwork );
05032 
05033 lapack_int LAPACKE_sgerfs_work( int matrix_order, char trans, lapack_int n,
05034                                 lapack_int nrhs, const float* a, lapack_int lda,
05035                                 const float* af, lapack_int ldaf,
05036                                 const lapack_int* ipiv, const float* b,
05037                                 lapack_int ldb, float* x, lapack_int ldx,
05038                                 float* ferr, float* berr, float* work,
05039                                 lapack_int* iwork );
05040 lapack_int LAPACKE_dgerfs_work( int matrix_order, char trans, lapack_int n,
05041                                 lapack_int nrhs, const double* a,
05042                                 lapack_int lda, const double* af,
05043                                 lapack_int ldaf, const lapack_int* ipiv,
05044                                 const double* b, lapack_int ldb, double* x,
05045                                 lapack_int ldx, double* ferr, double* berr,
05046                                 double* work, lapack_int* iwork );
05047 lapack_int LAPACKE_cgerfs_work( int matrix_order, char trans, lapack_int n,
05048                                 lapack_int nrhs, const lapack_complex_float* a,
05049                                 lapack_int lda, const lapack_complex_float* af,
05050                                 lapack_int ldaf, const lapack_int* ipiv,
05051                                 const lapack_complex_float* b, lapack_int ldb,
05052                                 lapack_complex_float* x, lapack_int ldx,
05053                                 float* ferr, float* berr,
05054                                 lapack_complex_float* work, float* rwork );
05055 lapack_int LAPACKE_zgerfs_work( int matrix_order, char trans, lapack_int n,
05056                                 lapack_int nrhs, const lapack_complex_double* a,
05057                                 lapack_int lda, const lapack_complex_double* af,
05058                                 lapack_int ldaf, const lapack_int* ipiv,
05059                                 const lapack_complex_double* b, lapack_int ldb,
05060                                 lapack_complex_double* x, lapack_int ldx,
05061                                 double* ferr, double* berr,
05062                                 lapack_complex_double* work, double* rwork );
05063 
05064 lapack_int LAPACKE_sgerfsx_work( int matrix_order, char trans, char equed,
05065                                  lapack_int n, lapack_int nrhs, const float* a,
05066                                  lapack_int lda, const float* af,
05067                                  lapack_int ldaf, const lapack_int* ipiv,
05068                                  const float* r, const float* c, const float* b,
05069                                  lapack_int ldb, float* x, lapack_int ldx,
05070                                  float* rcond, float* berr,
05071                                  lapack_int n_err_bnds, float* err_bnds_norm,
05072                                  float* err_bnds_comp, lapack_int nparams,
05073                                  float* params, float* work,
05074                                  lapack_int* iwork );
05075 lapack_int LAPACKE_dgerfsx_work( int matrix_order, char trans, char equed,
05076                                  lapack_int n, lapack_int nrhs, const double* a,
05077                                  lapack_int lda, const double* af,
05078                                  lapack_int ldaf, const lapack_int* ipiv,
05079                                  const double* r, const double* c,
05080                                  const double* b, lapack_int ldb, double* x,
05081                                  lapack_int ldx, double* rcond, double* berr,
05082                                  lapack_int n_err_bnds, double* err_bnds_norm,
05083                                  double* err_bnds_comp, lapack_int nparams,
05084                                  double* params, double* work,
05085                                  lapack_int* iwork );
05086 lapack_int LAPACKE_cgerfsx_work( int matrix_order, char trans, char equed,
05087                                  lapack_int n, lapack_int nrhs,
05088                                  const lapack_complex_float* a, lapack_int lda,
05089                                  const lapack_complex_float* af,
05090                                  lapack_int ldaf, const lapack_int* ipiv,
05091                                  const float* r, const float* c,
05092                                  const lapack_complex_float* b, lapack_int ldb,
05093                                  lapack_complex_float* x, lapack_int ldx,
05094                                  float* rcond, float* berr,
05095                                  lapack_int n_err_bnds, float* err_bnds_norm,
05096                                  float* err_bnds_comp, lapack_int nparams,
05097                                  float* params, lapack_complex_float* work,
05098                                  float* rwork );
05099 lapack_int LAPACKE_zgerfsx_work( int matrix_order, char trans, char equed,
05100                                  lapack_int n, lapack_int nrhs,
05101                                  const lapack_complex_double* a, lapack_int lda,
05102                                  const lapack_complex_double* af,
05103                                  lapack_int ldaf, const lapack_int* ipiv,
05104                                  const double* r, const double* c,
05105                                  const lapack_complex_double* b, lapack_int ldb,
05106                                  lapack_complex_double* x, lapack_int ldx,
05107                                  double* rcond, double* berr,
05108                                  lapack_int n_err_bnds, double* err_bnds_norm,
05109                                  double* err_bnds_comp, lapack_int nparams,
05110                                  double* params, lapack_complex_double* work,
05111                                  double* rwork );
05112 
05113 lapack_int LAPACKE_sgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05114                                 float* a, lapack_int lda, float* tau,
05115                                 float* work, lapack_int lwork );
05116 lapack_int LAPACKE_dgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05117                                 double* a, lapack_int lda, double* tau,
05118                                 double* work, lapack_int lwork );
05119 lapack_int LAPACKE_cgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05120                                 lapack_complex_float* a, lapack_int lda,
05121                                 lapack_complex_float* tau,
05122                                 lapack_complex_float* work, lapack_int lwork );
05123 lapack_int LAPACKE_zgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05124                                 lapack_complex_double* a, lapack_int lda,
05125                                 lapack_complex_double* tau,
05126                                 lapack_complex_double* work, lapack_int lwork );
05127 
05128 lapack_int LAPACKE_sgesdd_work( int matrix_order, char jobz, lapack_int m,
05129                                 lapack_int n, float* a, lapack_int lda,
05130                                 float* s, float* u, lapack_int ldu, float* vt,
05131                                 lapack_int ldvt, float* work, lapack_int lwork,
05132                                 lapack_int* iwork );
05133 lapack_int LAPACKE_dgesdd_work( int matrix_order, char jobz, lapack_int m,
05134                                 lapack_int n, double* a, lapack_int lda,
05135                                 double* s, double* u, lapack_int ldu,
05136                                 double* vt, lapack_int ldvt, double* work,
05137                                 lapack_int lwork, lapack_int* iwork );
05138 lapack_int LAPACKE_cgesdd_work( int matrix_order, char jobz, lapack_int m,
05139                                 lapack_int n, lapack_complex_float* a,
05140                                 lapack_int lda, float* s,
05141                                 lapack_complex_float* u, lapack_int ldu,
05142                                 lapack_complex_float* vt, lapack_int ldvt,
05143                                 lapack_complex_float* work, lapack_int lwork,
05144                                 float* rwork, lapack_int* iwork );
05145 lapack_int LAPACKE_zgesdd_work( int matrix_order, char jobz, lapack_int m,
05146                                 lapack_int n, lapack_complex_double* a,
05147                                 lapack_int lda, double* s,
05148                                 lapack_complex_double* u, lapack_int ldu,
05149                                 lapack_complex_double* vt, lapack_int ldvt,
05150                                 lapack_complex_double* work, lapack_int lwork,
05151                                 double* rwork, lapack_int* iwork );
05152 
05153 lapack_int LAPACKE_sgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05154                                float* a, lapack_int lda, lapack_int* ipiv,
05155                                float* b, lapack_int ldb );
05156 lapack_int LAPACKE_dgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05157                                double* a, lapack_int lda, lapack_int* ipiv,
05158                                double* b, lapack_int ldb );
05159 lapack_int LAPACKE_cgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05160                                lapack_complex_float* a, lapack_int lda,
05161                                lapack_int* ipiv, lapack_complex_float* b,
05162                                lapack_int ldb );
05163 lapack_int LAPACKE_zgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05164                                lapack_complex_double* a, lapack_int lda,
05165                                lapack_int* ipiv, lapack_complex_double* b,
05166                                lapack_int ldb );
05167 lapack_int LAPACKE_dsgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05168                                 double* a, lapack_int lda, lapack_int* ipiv,
05169                                 double* b, lapack_int ldb, double* x,
05170                                 lapack_int ldx, double* work, float* swork,
05171                                 lapack_int* iter );
05172 lapack_int LAPACKE_zcgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05173                                 lapack_complex_double* a, lapack_int lda,
05174                                 lapack_int* ipiv, lapack_complex_double* b,
05175                                 lapack_int ldb, lapack_complex_double* x,
05176                                 lapack_int ldx, lapack_complex_double* work,
05177                                 lapack_complex_float* swork, double* rwork,
05178                                 lapack_int* iter );
05179 
05180 lapack_int LAPACKE_sgesvd_work( int matrix_order, char jobu, char jobvt,
05181                                 lapack_int m, lapack_int n, float* a,
05182                                 lapack_int lda, float* s, float* u,
05183                                 lapack_int ldu, float* vt, lapack_int ldvt,
05184                                 float* work, lapack_int lwork );
05185 lapack_int LAPACKE_dgesvd_work( int matrix_order, char jobu, char jobvt,
05186                                 lapack_int m, lapack_int n, double* a,
05187                                 lapack_int lda, double* s, double* u,
05188                                 lapack_int ldu, double* vt, lapack_int ldvt,
05189                                 double* work, lapack_int lwork );
05190 lapack_int LAPACKE_cgesvd_work( int matrix_order, char jobu, char jobvt,
05191                                 lapack_int m, lapack_int n,
05192                                 lapack_complex_float* a, lapack_int lda,
05193                                 float* s, lapack_complex_float* u,
05194                                 lapack_int ldu, lapack_complex_float* vt,
05195                                 lapack_int ldvt, lapack_complex_float* work,
05196                                 lapack_int lwork, float* rwork );
05197 lapack_int LAPACKE_zgesvd_work( int matrix_order, char jobu, char jobvt,
05198                                 lapack_int m, lapack_int n,
05199                                 lapack_complex_double* a, lapack_int lda,
05200                                 double* s, lapack_complex_double* u,
05201                                 lapack_int ldu, lapack_complex_double* vt,
05202                                 lapack_int ldvt, lapack_complex_double* work,
05203                                 lapack_int lwork, double* rwork );
05204 
05205 lapack_int LAPACKE_sgesvj_work( int matrix_order, char joba, char jobu,
05206                                 char jobv, lapack_int m, lapack_int n, float* a,
05207                                 lapack_int lda, float* sva, lapack_int mv,
05208                                 float* v, lapack_int ldv, float* work,
05209                                 lapack_int lwork );
05210 lapack_int LAPACKE_dgesvj_work( int matrix_order, char joba, char jobu,
05211                                 char jobv, lapack_int m, lapack_int n,
05212                                 double* a, lapack_int lda, double* sva,
05213                                 lapack_int mv, double* v, lapack_int ldv,
05214                                 double* work, lapack_int lwork );
05215 
05216 lapack_int LAPACKE_sgesvx_work( int matrix_order, char fact, char trans,
05217                                 lapack_int n, lapack_int nrhs, float* a,
05218                                 lapack_int lda, float* af, lapack_int ldaf,
05219                                 lapack_int* ipiv, char* equed, float* r,
05220                                 float* c, float* b, lapack_int ldb, float* x,
05221                                 lapack_int ldx, float* rcond, float* ferr,
05222                                 float* berr, float* work, lapack_int* iwork );
05223 lapack_int LAPACKE_dgesvx_work( int matrix_order, char fact, char trans,
05224                                 lapack_int n, lapack_int nrhs, double* a,
05225                                 lapack_int lda, double* af, lapack_int ldaf,
05226                                 lapack_int* ipiv, char* equed, double* r,
05227                                 double* c, double* b, lapack_int ldb, double* x,
05228                                 lapack_int ldx, double* rcond, double* ferr,
05229                                 double* berr, double* work, lapack_int* iwork );
05230 lapack_int LAPACKE_cgesvx_work( int matrix_order, char fact, char trans,
05231                                 lapack_int n, lapack_int nrhs,
05232                                 lapack_complex_float* a, lapack_int lda,
05233                                 lapack_complex_float* af, lapack_int ldaf,
05234                                 lapack_int* ipiv, char* equed, float* r,
05235                                 float* c, lapack_complex_float* b,
05236                                 lapack_int ldb, lapack_complex_float* x,
05237                                 lapack_int ldx, float* rcond, float* ferr,
05238                                 float* berr, lapack_complex_float* work,
05239                                 float* rwork );
05240 lapack_int LAPACKE_zgesvx_work( int matrix_order, char fact, char trans,
05241                                 lapack_int n, lapack_int nrhs,
05242                                 lapack_complex_double* a, lapack_int lda,
05243                                 lapack_complex_double* af, lapack_int ldaf,
05244                                 lapack_int* ipiv, char* equed, double* r,
05245                                 double* c, lapack_complex_double* b,
05246                                 lapack_int ldb, lapack_complex_double* x,
05247                                 lapack_int ldx, double* rcond, double* ferr,
05248                                 double* berr, lapack_complex_double* work,
05249                                 double* rwork );
05250 
05251 lapack_int LAPACKE_sgesvxx_work( int matrix_order, char fact, char trans,
05252                                  lapack_int n, lapack_int nrhs, float* a,
05253                                  lapack_int lda, float* af, lapack_int ldaf,
05254                                  lapack_int* ipiv, char* equed, float* r,
05255                                  float* c, float* b, lapack_int ldb, float* x,
05256                                  lapack_int ldx, float* rcond, float* rpvgrw,
05257                                  float* berr, lapack_int n_err_bnds,
05258                                  float* err_bnds_norm, float* err_bnds_comp,
05259                                  lapack_int nparams, float* params, float* work,
05260                                  lapack_int* iwork );
05261 lapack_int LAPACKE_dgesvxx_work( int matrix_order, char fact, char trans,
05262                                  lapack_int n, lapack_int nrhs, double* a,
05263                                  lapack_int lda, double* af, lapack_int ldaf,
05264                                  lapack_int* ipiv, char* equed, double* r,
05265                                  double* c, double* b, lapack_int ldb,
05266                                  double* x, lapack_int ldx, double* rcond,
05267                                  double* rpvgrw, double* berr,
05268                                  lapack_int n_err_bnds, double* err_bnds_norm,
05269                                  double* err_bnds_comp, lapack_int nparams,
05270                                  double* params, double* work,
05271                                  lapack_int* iwork );
05272 lapack_int LAPACKE_cgesvxx_work( int matrix_order, char fact, char trans,
05273                                  lapack_int n, lapack_int nrhs,
05274                                  lapack_complex_float* a, lapack_int lda,
05275                                  lapack_complex_float* af, lapack_int ldaf,
05276                                  lapack_int* ipiv, char* equed, float* r,
05277                                  float* c, lapack_complex_float* b,
05278                                  lapack_int ldb, lapack_complex_float* x,
05279                                  lapack_int ldx, float* rcond, float* rpvgrw,
05280                                  float* berr, lapack_int n_err_bnds,
05281                                  float* err_bnds_norm, float* err_bnds_comp,
05282                                  lapack_int nparams, float* params,
05283                                  lapack_complex_float* work, float* rwork );
05284 lapack_int LAPACKE_zgesvxx_work( int matrix_order, char fact, char trans,
05285                                  lapack_int n, lapack_int nrhs,
05286                                  lapack_complex_double* a, lapack_int lda,
05287                                  lapack_complex_double* af, lapack_int ldaf,
05288                                  lapack_int* ipiv, char* equed, double* r,
05289                                  double* c, lapack_complex_double* b,
05290                                  lapack_int ldb, lapack_complex_double* x,
05291                                  lapack_int ldx, double* rcond, double* rpvgrw,
05292                                  double* berr, lapack_int n_err_bnds,
05293                                  double* err_bnds_norm, double* err_bnds_comp,
05294                                  lapack_int nparams, double* params,
05295                                  lapack_complex_double* work, double* rwork );
05296 
05297 lapack_int LAPACKE_sgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05298                                 float* a, lapack_int lda, lapack_int* ipiv );
05299 lapack_int LAPACKE_dgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05300                                 double* a, lapack_int lda, lapack_int* ipiv );
05301 lapack_int LAPACKE_cgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05302                                 lapack_complex_float* a, lapack_int lda,
05303                                 lapack_int* ipiv );
05304 lapack_int LAPACKE_zgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05305                                 lapack_complex_double* a, lapack_int lda,
05306                                 lapack_int* ipiv );
05307 
05308 lapack_int LAPACKE_sgetri_work( int matrix_order, lapack_int n, float* a,
05309                                 lapack_int lda, const lapack_int* ipiv,
05310                                 float* work, lapack_int lwork );
05311 lapack_int LAPACKE_dgetri_work( int matrix_order, lapack_int n, double* a,
05312                                 lapack_int lda, const lapack_int* ipiv,
05313                                 double* work, lapack_int lwork );
05314 lapack_int LAPACKE_cgetri_work( int matrix_order, lapack_int n,
05315                                 lapack_complex_float* a, lapack_int lda,
05316                                 const lapack_int* ipiv,
05317                                 lapack_complex_float* work, lapack_int lwork );
05318 lapack_int LAPACKE_zgetri_work( int matrix_order, lapack_int n,
05319                                 lapack_complex_double* a, lapack_int lda,
05320                                 const lapack_int* ipiv,
05321                                 lapack_complex_double* work, lapack_int lwork );
05322 
05323 lapack_int LAPACKE_sgetrs_work( int matrix_order, char trans, lapack_int n,
05324                                 lapack_int nrhs, const float* a, lapack_int lda,
05325                                 const lapack_int* ipiv, float* b,
05326                                 lapack_int ldb );
05327 lapack_int LAPACKE_dgetrs_work( int matrix_order, char trans, lapack_int n,
05328                                 lapack_int nrhs, const double* a,
05329                                 lapack_int lda, const lapack_int* ipiv,
05330                                 double* b, lapack_int ldb );
05331 lapack_int LAPACKE_cgetrs_work( int matrix_order, char trans, lapack_int n,
05332                                 lapack_int nrhs, const lapack_complex_float* a,
05333                                 lapack_int lda, const lapack_int* ipiv,
05334                                 lapack_complex_float* b, lapack_int ldb );
05335 lapack_int LAPACKE_zgetrs_work( int matrix_order, char trans, lapack_int n,
05336                                 lapack_int nrhs, const lapack_complex_double* a,
05337                                 lapack_int lda, const lapack_int* ipiv,
05338                                 lapack_complex_double* b, lapack_int ldb );
05339 
05340 lapack_int LAPACKE_sggbak_work( int matrix_order, char job, char side,
05341                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05342                                 const float* lscale, const float* rscale,
05343                                 lapack_int m, float* v, lapack_int ldv );
05344 lapack_int LAPACKE_dggbak_work( int matrix_order, char job, char side,
05345                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05346                                 const double* lscale, const double* rscale,
05347                                 lapack_int m, double* v, lapack_int ldv );
05348 lapack_int LAPACKE_cggbak_work( int matrix_order, char job, char side,
05349                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05350                                 const float* lscale, const float* rscale,
05351                                 lapack_int m, lapack_complex_float* v,
05352                                 lapack_int ldv );
05353 lapack_int LAPACKE_zggbak_work( int matrix_order, char job, char side,
05354                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05355                                 const double* lscale, const double* rscale,
05356                                 lapack_int m, lapack_complex_double* v,
05357                                 lapack_int ldv );
05358 
05359 lapack_int LAPACKE_sggbal_work( int matrix_order, char job, lapack_int n,
05360                                 float* a, lapack_int lda, float* b,
05361                                 lapack_int ldb, lapack_int* ilo,
05362                                 lapack_int* ihi, float* lscale, float* rscale,
05363                                 float* work );
05364 lapack_int LAPACKE_dggbal_work( int matrix_order, char job, lapack_int n,
05365                                 double* a, lapack_int lda, double* b,
05366                                 lapack_int ldb, lapack_int* ilo,
05367                                 lapack_int* ihi, double* lscale, double* rscale,
05368                                 double* work );
05369 lapack_int LAPACKE_cggbal_work( int matrix_order, char job, lapack_int n,
05370                                 lapack_complex_float* a, lapack_int lda,
05371                                 lapack_complex_float* b, lapack_int ldb,
05372                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
05373                                 float* rscale, float* work );
05374 lapack_int LAPACKE_zggbal_work( int matrix_order, char job, lapack_int n,
05375                                 lapack_complex_double* a, lapack_int lda,
05376                                 lapack_complex_double* b, lapack_int ldb,
05377                                 lapack_int* ilo, lapack_int* ihi,
05378                                 double* lscale, double* rscale, double* work );
05379 
05380 lapack_int LAPACKE_sgges_work( int matrix_order, char jobvsl, char jobvsr,
05381                                char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
05382                                float* a, lapack_int lda, float* b,
05383                                lapack_int ldb, lapack_int* sdim, float* alphar,
05384                                float* alphai, float* beta, float* vsl,
05385                                lapack_int ldvsl, float* vsr, lapack_int ldvsr,
05386                                float* work, lapack_int lwork,
05387                                lapack_logical* bwork );
05388 lapack_int LAPACKE_dgges_work( int matrix_order, char jobvsl, char jobvsr,
05389                                char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
05390                                double* a, lapack_int lda, double* b,
05391                                lapack_int ldb, lapack_int* sdim, double* alphar,
05392                                double* alphai, double* beta, double* vsl,
05393                                lapack_int ldvsl, double* vsr, lapack_int ldvsr,
05394                                double* work, lapack_int lwork,
05395                                lapack_logical* bwork );
05396 lapack_int LAPACKE_cgges_work( int matrix_order, char jobvsl, char jobvsr,
05397                                char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
05398                                lapack_complex_float* a, lapack_int lda,
05399                                lapack_complex_float* b, lapack_int ldb,
05400                                lapack_int* sdim, lapack_complex_float* alpha,
05401                                lapack_complex_float* beta,
05402                                lapack_complex_float* vsl, lapack_int ldvsl,
05403                                lapack_complex_float* vsr, lapack_int ldvsr,
05404                                lapack_complex_float* work, lapack_int lwork,
05405                                float* rwork, lapack_logical* bwork );
05406 lapack_int LAPACKE_zgges_work( int matrix_order, char jobvsl, char jobvsr,
05407                                char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
05408                                lapack_complex_double* a, lapack_int lda,
05409                                lapack_complex_double* b, lapack_int ldb,
05410                                lapack_int* sdim, lapack_complex_double* alpha,
05411                                lapack_complex_double* beta,
05412                                lapack_complex_double* vsl, lapack_int ldvsl,
05413                                lapack_complex_double* vsr, lapack_int ldvsr,
05414                                lapack_complex_double* work, lapack_int lwork,
05415                                double* rwork, lapack_logical* bwork );
05416 
05417 lapack_int LAPACKE_sggesx_work( int matrix_order, char jobvsl, char jobvsr,
05418                                 char sort, LAPACK_S_SELECT3 selctg, char sense,
05419                                 lapack_int n, float* a, lapack_int lda,
05420                                 float* b, lapack_int ldb, lapack_int* sdim,
05421                                 float* alphar, float* alphai, float* beta,
05422                                 float* vsl, lapack_int ldvsl, float* vsr,
05423                                 lapack_int ldvsr, float* rconde, float* rcondv,
05424                                 float* work, lapack_int lwork,
05425                                 lapack_int* iwork, lapack_int liwork,
05426                                 lapack_logical* bwork );
05427 lapack_int LAPACKE_dggesx_work( int matrix_order, char jobvsl, char jobvsr,
05428                                 char sort, LAPACK_D_SELECT3 selctg, char sense,
05429                                 lapack_int n, double* a, lapack_int lda,
05430                                 double* b, lapack_int ldb, lapack_int* sdim,
05431                                 double* alphar, double* alphai, double* beta,
05432                                 double* vsl, lapack_int ldvsl, double* vsr,
05433                                 lapack_int ldvsr, double* rconde,
05434                                 double* rcondv, double* work, lapack_int lwork,
05435                                 lapack_int* iwork, lapack_int liwork,
05436                                 lapack_logical* bwork );
05437 lapack_int LAPACKE_cggesx_work( int matrix_order, char jobvsl, char jobvsr,
05438                                 char sort, LAPACK_C_SELECT2 selctg, char sense,
05439                                 lapack_int n, lapack_complex_float* a,
05440                                 lapack_int lda, lapack_complex_float* b,
05441                                 lapack_int ldb, lapack_int* sdim,
05442                                 lapack_complex_float* alpha,
05443                                 lapack_complex_float* beta,
05444                                 lapack_complex_float* vsl, lapack_int ldvsl,
05445                                 lapack_complex_float* vsr, lapack_int ldvsr,
05446                                 float* rconde, float* rcondv,
05447                                 lapack_complex_float* work, lapack_int lwork,
05448                                 float* rwork, lapack_int* iwork,
05449                                 lapack_int liwork, lapack_logical* bwork );
05450 lapack_int LAPACKE_zggesx_work( int matrix_order, char jobvsl, char jobvsr,
05451                                 char sort, LAPACK_Z_SELECT2 selctg, char sense,
05452                                 lapack_int n, lapack_complex_double* a,
05453                                 lapack_int lda, lapack_complex_double* b,
05454                                 lapack_int ldb, lapack_int* sdim,
05455                                 lapack_complex_double* alpha,
05456                                 lapack_complex_double* beta,
05457                                 lapack_complex_double* vsl, lapack_int ldvsl,
05458                                 lapack_complex_double* vsr, lapack_int ldvsr,
05459                                 double* rconde, double* rcondv,
05460                                 lapack_complex_double* work, lapack_int lwork,
05461                                 double* rwork, lapack_int* iwork,
05462                                 lapack_int liwork, lapack_logical* bwork );
05463 
05464 lapack_int LAPACKE_sggev_work( int matrix_order, char jobvl, char jobvr,
05465                                lapack_int n, float* a, lapack_int lda, float* b,
05466                                lapack_int ldb, float* alphar, float* alphai,
05467                                float* beta, float* vl, lapack_int ldvl,
05468                                float* vr, lapack_int ldvr, float* work,
05469                                lapack_int lwork );
05470 lapack_int LAPACKE_dggev_work( int matrix_order, char jobvl, char jobvr,
05471                                lapack_int n, double* a, lapack_int lda,
05472                                double* b, lapack_int ldb, double* alphar,
05473                                double* alphai, double* beta, double* vl,
05474                                lapack_int ldvl, double* vr, lapack_int ldvr,
05475                                double* work, lapack_int lwork );
05476 lapack_int LAPACKE_cggev_work( int matrix_order, char jobvl, char jobvr,
05477                                lapack_int n, lapack_complex_float* a,
05478                                lapack_int lda, lapack_complex_float* b,
05479                                lapack_int ldb, lapack_complex_float* alpha,
05480                                lapack_complex_float* beta,
05481                                lapack_complex_float* vl, lapack_int ldvl,
05482                                lapack_complex_float* vr, lapack_int ldvr,
05483                                lapack_complex_float* work, lapack_int lwork,
05484                                float* rwork );
05485 lapack_int LAPACKE_zggev_work( int matrix_order, char jobvl, char jobvr,
05486                                lapack_int n, lapack_complex_double* a,
05487                                lapack_int lda, lapack_complex_double* b,
05488                                lapack_int ldb, lapack_complex_double* alpha,
05489                                lapack_complex_double* beta,
05490                                lapack_complex_double* vl, lapack_int ldvl,
05491                                lapack_complex_double* vr, lapack_int ldvr,
05492                                lapack_complex_double* work, lapack_int lwork,
05493                                double* rwork );
05494 
05495 lapack_int LAPACKE_sggevx_work( int matrix_order, char balanc, char jobvl,
05496                                 char jobvr, char sense, lapack_int n, float* a,
05497                                 lapack_int lda, float* b, lapack_int ldb,
05498                                 float* alphar, float* alphai, float* beta,
05499                                 float* vl, lapack_int ldvl, float* vr,
05500                                 lapack_int ldvr, lapack_int* ilo,
05501                                 lapack_int* ihi, float* lscale, float* rscale,
05502                                 float* abnrm, float* bbnrm, float* rconde,
05503                                 float* rcondv, float* work, lapack_int lwork,
05504                                 lapack_int* iwork, lapack_logical* bwork );
05505 lapack_int LAPACKE_dggevx_work( int matrix_order, char balanc, char jobvl,
05506                                 char jobvr, char sense, lapack_int n, double* a,
05507                                 lapack_int lda, double* b, lapack_int ldb,
05508                                 double* alphar, double* alphai, double* beta,
05509                                 double* vl, lapack_int ldvl, double* vr,
05510                                 lapack_int ldvr, lapack_int* ilo,
05511                                 lapack_int* ihi, double* lscale, double* rscale,
05512                                 double* abnrm, double* bbnrm, double* rconde,
05513                                 double* rcondv, double* work, lapack_int lwork,
05514                                 lapack_int* iwork, lapack_logical* bwork );
05515 lapack_int LAPACKE_cggevx_work( int matrix_order, char balanc, char jobvl,
05516                                 char jobvr, char sense, lapack_int n,
05517                                 lapack_complex_float* a, lapack_int lda,
05518                                 lapack_complex_float* b, lapack_int ldb,
05519                                 lapack_complex_float* alpha,
05520                                 lapack_complex_float* beta,
05521                                 lapack_complex_float* vl, lapack_int ldvl,
05522                                 lapack_complex_float* vr, lapack_int ldvr,
05523                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
05524                                 float* rscale, float* abnrm, float* bbnrm,
05525                                 float* rconde, float* rcondv,
05526                                 lapack_complex_float* work, lapack_int lwork,
05527                                 float* rwork, lapack_int* iwork,
05528                                 lapack_logical* bwork );
05529 lapack_int LAPACKE_zggevx_work( int matrix_order, char balanc, char jobvl,
05530                                 char jobvr, char sense, lapack_int n,
05531                                 lapack_complex_double* a, lapack_int lda,
05532                                 lapack_complex_double* b, lapack_int ldb,
05533                                 lapack_complex_double* alpha,
05534                                 lapack_complex_double* beta,
05535                                 lapack_complex_double* vl, lapack_int ldvl,
05536                                 lapack_complex_double* vr, lapack_int ldvr,
05537                                 lapack_int* ilo, lapack_int* ihi,
05538                                 double* lscale, double* rscale, double* abnrm,
05539                                 double* bbnrm, double* rconde, double* rcondv,
05540                                 lapack_complex_double* work, lapack_int lwork,
05541                                 double* rwork, lapack_int* iwork,
05542                                 lapack_logical* bwork );
05543 
05544 lapack_int LAPACKE_sggglm_work( int matrix_order, lapack_int n, lapack_int m,
05545                                 lapack_int p, float* a, lapack_int lda,
05546                                 float* b, lapack_int ldb, float* d, float* x,
05547                                 float* y, float* work, lapack_int lwork );
05548 lapack_int LAPACKE_dggglm_work( int matrix_order, lapack_int n, lapack_int m,
05549                                 lapack_int p, double* a, lapack_int lda,
05550                                 double* b, lapack_int ldb, double* d, double* x,
05551                                 double* y, double* work, lapack_int lwork );
05552 lapack_int LAPACKE_cggglm_work( int matrix_order, lapack_int n, lapack_int m,
05553                                 lapack_int p, lapack_complex_float* a,
05554                                 lapack_int lda, lapack_complex_float* b,
05555                                 lapack_int ldb, lapack_complex_float* d,
05556                                 lapack_complex_float* x,
05557                                 lapack_complex_float* y,
05558                                 lapack_complex_float* work, lapack_int lwork );
05559 lapack_int LAPACKE_zggglm_work( int matrix_order, lapack_int n, lapack_int m,
05560                                 lapack_int p, lapack_complex_double* a,
05561                                 lapack_int lda, lapack_complex_double* b,
05562                                 lapack_int ldb, lapack_complex_double* d,
05563                                 lapack_complex_double* x,
05564                                 lapack_complex_double* y,
05565                                 lapack_complex_double* work, lapack_int lwork );
05566 
05567 lapack_int LAPACKE_sgghrd_work( int matrix_order, char compq, char compz,
05568                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05569                                 float* a, lapack_int lda, float* b,
05570                                 lapack_int ldb, float* q, lapack_int ldq,
05571                                 float* z, lapack_int ldz );
05572 lapack_int LAPACKE_dgghrd_work( int matrix_order, char compq, char compz,
05573                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05574                                 double* a, lapack_int lda, double* b,
05575                                 lapack_int ldb, double* q, lapack_int ldq,
05576                                 double* z, lapack_int ldz );
05577 lapack_int LAPACKE_cgghrd_work( int matrix_order, char compq, char compz,
05578                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05579                                 lapack_complex_float* a, lapack_int lda,
05580                                 lapack_complex_float* b, lapack_int ldb,
05581                                 lapack_complex_float* q, lapack_int ldq,
05582                                 lapack_complex_float* z, lapack_int ldz );
05583 lapack_int LAPACKE_zgghrd_work( int matrix_order, char compq, char compz,
05584                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05585                                 lapack_complex_double* a, lapack_int lda,
05586                                 lapack_complex_double* b, lapack_int ldb,
05587                                 lapack_complex_double* q, lapack_int ldq,
05588                                 lapack_complex_double* z, lapack_int ldz );
05589 
05590 lapack_int LAPACKE_sgglse_work( int matrix_order, lapack_int m, lapack_int n,
05591                                 lapack_int p, float* a, lapack_int lda,
05592                                 float* b, lapack_int ldb, float* c, float* d,
05593                                 float* x, float* work, lapack_int lwork );
05594 lapack_int LAPACKE_dgglse_work( int matrix_order, lapack_int m, lapack_int n,
05595                                 lapack_int p, double* a, lapack_int lda,
05596                                 double* b, lapack_int ldb, double* c, double* d,
05597                                 double* x, double* work, lapack_int lwork );
05598 lapack_int LAPACKE_cgglse_work( int matrix_order, lapack_int m, lapack_int n,
05599                                 lapack_int p, lapack_complex_float* a,
05600                                 lapack_int lda, lapack_complex_float* b,
05601                                 lapack_int ldb, lapack_complex_float* c,
05602                                 lapack_complex_float* d,
05603                                 lapack_complex_float* x,
05604                                 lapack_complex_float* work, lapack_int lwork );
05605 lapack_int LAPACKE_zgglse_work( int matrix_order, lapack_int m, lapack_int n,
05606                                 lapack_int p, lapack_complex_double* a,
05607                                 lapack_int lda, lapack_complex_double* b,
05608                                 lapack_int ldb, lapack_complex_double* c,
05609                                 lapack_complex_double* d,
05610                                 lapack_complex_double* x,
05611                                 lapack_complex_double* work, lapack_int lwork );
05612 
05613 lapack_int LAPACKE_sggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05614                                 lapack_int p, float* a, lapack_int lda,
05615                                 float* taua, float* b, lapack_int ldb,
05616                                 float* taub, float* work, lapack_int lwork );
05617 lapack_int LAPACKE_dggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05618                                 lapack_int p, double* a, lapack_int lda,
05619                                 double* taua, double* b, lapack_int ldb,
05620                                 double* taub, double* work, lapack_int lwork );
05621 lapack_int LAPACKE_cggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05622                                 lapack_int p, lapack_complex_float* a,
05623                                 lapack_int lda, lapack_complex_float* taua,
05624                                 lapack_complex_float* b, lapack_int ldb,
05625                                 lapack_complex_float* taub,
05626                                 lapack_complex_float* work, lapack_int lwork );
05627 lapack_int LAPACKE_zggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05628                                 lapack_int p, lapack_complex_double* a,
05629                                 lapack_int lda, lapack_complex_double* taua,
05630                                 lapack_complex_double* b, lapack_int ldb,
05631                                 lapack_complex_double* taub,
05632                                 lapack_complex_double* work, lapack_int lwork );
05633 
05634 lapack_int LAPACKE_sggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05635                                 lapack_int n, float* a, lapack_int lda,
05636                                 float* taua, float* b, lapack_int ldb,
05637                                 float* taub, float* work, lapack_int lwork );
05638 lapack_int LAPACKE_dggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05639                                 lapack_int n, double* a, lapack_int lda,
05640                                 double* taua, double* b, lapack_int ldb,
05641                                 double* taub, double* work, lapack_int lwork );
05642 lapack_int LAPACKE_cggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05643                                 lapack_int n, lapack_complex_float* a,
05644                                 lapack_int lda, lapack_complex_float* taua,
05645                                 lapack_complex_float* b, lapack_int ldb,
05646                                 lapack_complex_float* taub,
05647                                 lapack_complex_float* work, lapack_int lwork );
05648 lapack_int LAPACKE_zggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05649                                 lapack_int n, lapack_complex_double* a,
05650                                 lapack_int lda, lapack_complex_double* taua,
05651                                 lapack_complex_double* b, lapack_int ldb,
05652                                 lapack_complex_double* taub,
05653                                 lapack_complex_double* work, lapack_int lwork );
05654 
05655 lapack_int LAPACKE_sggsvd_work( int matrix_order, char jobu, char jobv,
05656                                 char jobq, lapack_int m, lapack_int n,
05657                                 lapack_int p, lapack_int* k, lapack_int* l,
05658                                 float* a, lapack_int lda, float* b,
05659                                 lapack_int ldb, float* alpha, float* beta,
05660                                 float* u, lapack_int ldu, float* v,
05661                                 lapack_int ldv, float* q, lapack_int ldq,
05662                                 float* work, lapack_int* iwork );
05663 lapack_int LAPACKE_dggsvd_work( int matrix_order, char jobu, char jobv,
05664                                 char jobq, lapack_int m, lapack_int n,
05665                                 lapack_int p, lapack_int* k, lapack_int* l,
05666                                 double* a, lapack_int lda, double* b,
05667                                 lapack_int ldb, double* alpha, double* beta,
05668                                 double* u, lapack_int ldu, double* v,
05669                                 lapack_int ldv, double* q, lapack_int ldq,
05670                                 double* work, lapack_int* iwork );
05671 lapack_int LAPACKE_cggsvd_work( int matrix_order, char jobu, char jobv,
05672                                 char jobq, lapack_int m, lapack_int n,
05673                                 lapack_int p, lapack_int* k, lapack_int* l,
05674                                 lapack_complex_float* a, lapack_int lda,
05675                                 lapack_complex_float* b, lapack_int ldb,
05676                                 float* alpha, float* beta,
05677                                 lapack_complex_float* u, lapack_int ldu,
05678                                 lapack_complex_float* v, lapack_int ldv,
05679                                 lapack_complex_float* q, lapack_int ldq,
05680                                 lapack_complex_float* work, float* rwork,
05681                                 lapack_int* iwork );
05682 lapack_int LAPACKE_zggsvd_work( int matrix_order, char jobu, char jobv,
05683                                 char jobq, lapack_int m, lapack_int n,
05684                                 lapack_int p, lapack_int* k, lapack_int* l,
05685                                 lapack_complex_double* a, lapack_int lda,
05686                                 lapack_complex_double* b, lapack_int ldb,
05687                                 double* alpha, double* beta,
05688                                 lapack_complex_double* u, lapack_int ldu,
05689                                 lapack_complex_double* v, lapack_int ldv,
05690                                 lapack_complex_double* q, lapack_int ldq,
05691                                 lapack_complex_double* work, double* rwork,
05692                                 lapack_int* iwork );
05693 
05694 lapack_int LAPACKE_sggsvp_work( int matrix_order, char jobu, char jobv,
05695                                 char jobq, lapack_int m, lapack_int p,
05696                                 lapack_int n, float* a, lapack_int lda,
05697                                 float* b, lapack_int ldb, float tola,
05698                                 float tolb, lapack_int* k, lapack_int* l,
05699                                 float* u, lapack_int ldu, float* v,
05700                                 lapack_int ldv, float* q, lapack_int ldq,
05701                                 lapack_int* iwork, float* tau, float* work );
05702 lapack_int LAPACKE_dggsvp_work( int matrix_order, char jobu, char jobv,
05703                                 char jobq, lapack_int m, lapack_int p,
05704                                 lapack_int n, double* a, lapack_int lda,
05705                                 double* b, lapack_int ldb, double tola,
05706                                 double tolb, lapack_int* k, lapack_int* l,
05707                                 double* u, lapack_int ldu, double* v,
05708                                 lapack_int ldv, double* q, lapack_int ldq,
05709                                 lapack_int* iwork, double* tau, double* work );
05710 lapack_int LAPACKE_cggsvp_work( int matrix_order, char jobu, char jobv,
05711                                 char jobq, lapack_int m, lapack_int p,
05712                                 lapack_int n, lapack_complex_float* a,
05713                                 lapack_int lda, lapack_complex_float* b,
05714                                 lapack_int ldb, float tola, float tolb,
05715                                 lapack_int* k, lapack_int* l,
05716                                 lapack_complex_float* u, lapack_int ldu,
05717                                 lapack_complex_float* v, lapack_int ldv,
05718                                 lapack_complex_float* q, lapack_int ldq,
05719                                 lapack_int* iwork, float* rwork,
05720                                 lapack_complex_float* tau,
05721                                 lapack_complex_float* work );
05722 lapack_int LAPACKE_zggsvp_work( int matrix_order, char jobu, char jobv,
05723                                 char jobq, lapack_int m, lapack_int p,
05724                                 lapack_int n, lapack_complex_double* a,
05725                                 lapack_int lda, lapack_complex_double* b,
05726                                 lapack_int ldb, double tola, double tolb,
05727                                 lapack_int* k, lapack_int* l,
05728                                 lapack_complex_double* u, lapack_int ldu,
05729                                 lapack_complex_double* v, lapack_int ldv,
05730                                 lapack_complex_double* q, lapack_int ldq,
05731                                 lapack_int* iwork, double* rwork,
05732                                 lapack_complex_double* tau,
05733                                 lapack_complex_double* work );
05734 
05735 lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
05736                                 const float* d, const float* du,
05737                                 const float* du2, const lapack_int* ipiv,
05738                                 float anorm, float* rcond, float* work,
05739                                 lapack_int* iwork );
05740 lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
05741                                 const double* d, const double* du,
05742                                 const double* du2, const lapack_int* ipiv,
05743                                 double anorm, double* rcond, double* work,
05744                                 lapack_int* iwork );
05745 lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
05746                                 const lapack_complex_float* dl,
05747                                 const lapack_complex_float* d,
05748                                 const lapack_complex_float* du,
05749                                 const lapack_complex_float* du2,
05750                                 const lapack_int* ipiv, float anorm,
05751                                 float* rcond, lapack_complex_float* work );
05752 lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
05753                                 const lapack_complex_double* dl,
05754                                 const lapack_complex_double* d,
05755                                 const lapack_complex_double* du,
05756                                 const lapack_complex_double* du2,
05757                                 const lapack_int* ipiv, double anorm,
05758                                 double* rcond, lapack_complex_double* work );
05759 
05760 lapack_int LAPACKE_sgtrfs_work( int matrix_order, char trans, lapack_int n,
05761                                 lapack_int nrhs, const float* dl,
05762                                 const float* d, const float* du,
05763                                 const float* dlf, const float* df,
05764                                 const float* duf, const float* du2,
05765                                 const lapack_int* ipiv, const float* b,
05766                                 lapack_int ldb, float* x, lapack_int ldx,
05767                                 float* ferr, float* berr, float* work,
05768                                 lapack_int* iwork );
05769 lapack_int LAPACKE_dgtrfs_work( int matrix_order, char trans, lapack_int n,
05770                                 lapack_int nrhs, const double* dl,
05771                                 const double* d, const double* du,
05772                                 const double* dlf, const double* df,
05773                                 const double* duf, const double* du2,
05774                                 const lapack_int* ipiv, const double* b,
05775                                 lapack_int ldb, double* x, lapack_int ldx,
05776                                 double* ferr, double* berr, double* work,
05777                                 lapack_int* iwork );
05778 lapack_int LAPACKE_cgtrfs_work( int matrix_order, char trans, lapack_int n,
05779                                 lapack_int nrhs, const lapack_complex_float* dl,
05780                                 const lapack_complex_float* d,
05781                                 const lapack_complex_float* du,
05782                                 const lapack_complex_float* dlf,
05783                                 const lapack_complex_float* df,
05784                                 const lapack_complex_float* duf,
05785                                 const lapack_complex_float* du2,
05786                                 const lapack_int* ipiv,
05787                                 const lapack_complex_float* b, lapack_int ldb,
05788                                 lapack_complex_float* x, lapack_int ldx,
05789                                 float* ferr, float* berr,
05790                                 lapack_complex_float* work, float* rwork );
05791 lapack_int LAPACKE_zgtrfs_work( int matrix_order, char trans, lapack_int n,
05792                                 lapack_int nrhs,
05793                                 const lapack_complex_double* dl,
05794                                 const lapack_complex_double* d,
05795                                 const lapack_complex_double* du,
05796                                 const lapack_complex_double* dlf,
05797                                 const lapack_complex_double* df,
05798                                 const lapack_complex_double* duf,
05799                                 const lapack_complex_double* du2,
05800                                 const lapack_int* ipiv,
05801                                 const lapack_complex_double* b, lapack_int ldb,
05802                                 lapack_complex_double* x, lapack_int ldx,
05803                                 double* ferr, double* berr,
05804                                 lapack_complex_double* work, double* rwork );
05805 
05806 lapack_int LAPACKE_sgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05807                                float* dl, float* d, float* du, float* b,
05808                                lapack_int ldb );
05809 lapack_int LAPACKE_dgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05810                                double* dl, double* d, double* du, double* b,
05811                                lapack_int ldb );
05812 lapack_int LAPACKE_cgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05813                                lapack_complex_float* dl,
05814                                lapack_complex_float* d,
05815                                lapack_complex_float* du,
05816                                lapack_complex_float* b, lapack_int ldb );
05817 lapack_int LAPACKE_zgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05818                                lapack_complex_double* dl,
05819                                lapack_complex_double* d,
05820                                lapack_complex_double* du,
05821                                lapack_complex_double* b, lapack_int ldb );
05822 
05823 lapack_int LAPACKE_sgtsvx_work( int matrix_order, char fact, char trans,
05824                                 lapack_int n, lapack_int nrhs, const float* dl,
05825                                 const float* d, const float* du, float* dlf,
05826                                 float* df, float* duf, float* du2,
05827                                 lapack_int* ipiv, const float* b,
05828                                 lapack_int ldb, float* x, lapack_int ldx,
05829                                 float* rcond, float* ferr, float* berr,
05830                                 float* work, lapack_int* iwork );
05831 lapack_int LAPACKE_dgtsvx_work( int matrix_order, char fact, char trans,
05832                                 lapack_int n, lapack_int nrhs, const double* dl,
05833                                 const double* d, const double* du, double* dlf,
05834                                 double* df, double* duf, double* du2,
05835                                 lapack_int* ipiv, const double* b,
05836                                 lapack_int ldb, double* x, lapack_int ldx,
05837                                 double* rcond, double* ferr, double* berr,
05838                                 double* work, lapack_int* iwork );
05839 lapack_int LAPACKE_cgtsvx_work( int matrix_order, char fact, char trans,
05840                                 lapack_int n, lapack_int nrhs,
05841                                 const lapack_complex_float* dl,
05842                                 const lapack_complex_float* d,
05843                                 const lapack_complex_float* du,
05844                                 lapack_complex_float* dlf,
05845                                 lapack_complex_float* df,
05846                                 lapack_complex_float* duf,
05847                                 lapack_complex_float* du2, lapack_int* ipiv,
05848                                 const lapack_complex_float* b, lapack_int ldb,
05849                                 lapack_complex_float* x, lapack_int ldx,
05850                                 float* rcond, float* ferr, float* berr,
05851                                 lapack_complex_float* work, float* rwork );
05852 lapack_int LAPACKE_zgtsvx_work( int matrix_order, char fact, char trans,
05853                                 lapack_int n, lapack_int nrhs,
05854                                 const lapack_complex_double* dl,
05855                                 const lapack_complex_double* d,
05856                                 const lapack_complex_double* du,
05857                                 lapack_complex_double* dlf,
05858                                 lapack_complex_double* df,
05859                                 lapack_complex_double* duf,
05860                                 lapack_complex_double* du2, lapack_int* ipiv,
05861                                 const lapack_complex_double* b, lapack_int ldb,
05862                                 lapack_complex_double* x, lapack_int ldx,
05863                                 double* rcond, double* ferr, double* berr,
05864                                 lapack_complex_double* work, double* rwork );
05865 
05866 lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
05867                                 float* du2, lapack_int* ipiv );
05868 lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
05869                                 double* du2, lapack_int* ipiv );
05870 lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
05871                                 lapack_complex_float* d,
05872                                 lapack_complex_float* du,
05873                                 lapack_complex_float* du2, lapack_int* ipiv );
05874 lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
05875                                 lapack_complex_double* d,
05876                                 lapack_complex_double* du,
05877                                 lapack_complex_double* du2, lapack_int* ipiv );
05878 
05879 lapack_int LAPACKE_sgttrs_work( int matrix_order, char trans, lapack_int n,
05880                                 lapack_int nrhs, const float* dl,
05881                                 const float* d, const float* du,
05882                                 const float* du2, const lapack_int* ipiv,
05883                                 float* b, lapack_int ldb );
05884 lapack_int LAPACKE_dgttrs_work( int matrix_order, char trans, lapack_int n,
05885                                 lapack_int nrhs, const double* dl,
05886                                 const double* d, const double* du,
05887                                 const double* du2, const lapack_int* ipiv,
05888                                 double* b, lapack_int ldb );
05889 lapack_int LAPACKE_cgttrs_work( int matrix_order, char trans, lapack_int n,
05890                                 lapack_int nrhs, const lapack_complex_float* dl,
05891                                 const lapack_complex_float* d,
05892                                 const lapack_complex_float* du,
05893                                 const lapack_complex_float* du2,
05894                                 const lapack_int* ipiv, lapack_complex_float* b,
05895                                 lapack_int ldb );
05896 lapack_int LAPACKE_zgttrs_work( int matrix_order, char trans, lapack_int n,
05897                                 lapack_int nrhs,
05898                                 const lapack_complex_double* dl,
05899                                 const lapack_complex_double* d,
05900                                 const lapack_complex_double* du,
05901                                 const lapack_complex_double* du2,
05902                                 const lapack_int* ipiv,
05903                                 lapack_complex_double* b, lapack_int ldb );
05904 
05905 lapack_int LAPACKE_chbev_work( int matrix_order, char jobz, char uplo,
05906                                lapack_int n, lapack_int kd,
05907                                lapack_complex_float* ab, lapack_int ldab,
05908                                float* w, lapack_complex_float* z,
05909                                lapack_int ldz, lapack_complex_float* work,
05910                                float* rwork );
05911 lapack_int LAPACKE_zhbev_work( int matrix_order, char jobz, char uplo,
05912                                lapack_int n, lapack_int kd,
05913                                lapack_complex_double* ab, lapack_int ldab,
05914                                double* w, lapack_complex_double* z,
05915                                lapack_int ldz, lapack_complex_double* work,
05916                                double* rwork );
05917 
05918 lapack_int LAPACKE_chbevd_work( int matrix_order, char jobz, char uplo,
05919                                 lapack_int n, lapack_int kd,
05920                                 lapack_complex_float* ab, lapack_int ldab,
05921                                 float* w, lapack_complex_float* z,
05922                                 lapack_int ldz, lapack_complex_float* work,
05923                                 lapack_int lwork, float* rwork,
05924                                 lapack_int lrwork, lapack_int* iwork,
05925                                 lapack_int liwork );
05926 lapack_int LAPACKE_zhbevd_work( int matrix_order, char jobz, char uplo,
05927                                 lapack_int n, lapack_int kd,
05928                                 lapack_complex_double* ab, lapack_int ldab,
05929                                 double* w, lapack_complex_double* z,
05930                                 lapack_int ldz, lapack_complex_double* work,
05931                                 lapack_int lwork, double* rwork,
05932                                 lapack_int lrwork, lapack_int* iwork,
05933                                 lapack_int liwork );
05934 
05935 lapack_int LAPACKE_chbevx_work( int matrix_order, char jobz, char range,
05936                                 char uplo, lapack_int n, lapack_int kd,
05937                                 lapack_complex_float* ab, lapack_int ldab,
05938                                 lapack_complex_float* q, lapack_int ldq,
05939                                 float vl, float vu, lapack_int il,
05940                                 lapack_int iu, float abstol, lapack_int* m,
05941                                 float* w, lapack_complex_float* z,
05942                                 lapack_int ldz, lapack_complex_float* work,
05943                                 float* rwork, lapack_int* iwork,
05944                                 lapack_int* ifail );
05945 lapack_int LAPACKE_zhbevx_work( int matrix_order, char jobz, char range,
05946                                 char uplo, lapack_int n, lapack_int kd,
05947                                 lapack_complex_double* ab, lapack_int ldab,
05948                                 lapack_complex_double* q, lapack_int ldq,
05949                                 double vl, double vu, lapack_int il,
05950                                 lapack_int iu, double abstol, lapack_int* m,
05951                                 double* w, lapack_complex_double* z,
05952                                 lapack_int ldz, lapack_complex_double* work,
05953                                 double* rwork, lapack_int* iwork,
05954                                 lapack_int* ifail );
05955 
05956 lapack_int LAPACKE_chbgst_work( int matrix_order, char vect, char uplo,
05957                                 lapack_int n, lapack_int ka, lapack_int kb,
05958                                 lapack_complex_float* ab, lapack_int ldab,
05959                                 const lapack_complex_float* bb, lapack_int ldbb,
05960                                 lapack_complex_float* x, lapack_int ldx,
05961                                 lapack_complex_float* work, float* rwork );
05962 lapack_int LAPACKE_zhbgst_work( int matrix_order, char vect, char uplo,
05963                                 lapack_int n, lapack_int ka, lapack_int kb,
05964                                 lapack_complex_double* ab, lapack_int ldab,
05965                                 const lapack_complex_double* bb,
05966                                 lapack_int ldbb, lapack_complex_double* x,
05967                                 lapack_int ldx, lapack_complex_double* work,
05968                                 double* rwork );
05969 
05970 lapack_int LAPACKE_chbgv_work( int matrix_order, char jobz, char uplo,
05971                                lapack_int n, lapack_int ka, lapack_int kb,
05972                                lapack_complex_float* ab, lapack_int ldab,
05973                                lapack_complex_float* bb, lapack_int ldbb,
05974                                float* w, lapack_complex_float* z,
05975                                lapack_int ldz, lapack_complex_float* work,
05976                                float* rwork );
05977 lapack_int LAPACKE_zhbgv_work( int matrix_order, char jobz, char uplo,
05978                                lapack_int n, lapack_int ka, lapack_int kb,
05979                                lapack_complex_double* ab, lapack_int ldab,
05980                                lapack_complex_double* bb, lapack_int ldbb,
05981                                double* w, lapack_complex_double* z,
05982                                lapack_int ldz, lapack_complex_double* work,
05983                                double* rwork );
05984 
05985 lapack_int LAPACKE_chbgvd_work( int matrix_order, char jobz, char uplo,
05986                                 lapack_int n, lapack_int ka, lapack_int kb,
05987                                 lapack_complex_float* ab, lapack_int ldab,
05988                                 lapack_complex_float* bb, lapack_int ldbb,
05989                                 float* w, lapack_complex_float* z,
05990                                 lapack_int ldz, lapack_complex_float* work,
05991                                 lapack_int lwork, float* rwork,
05992                                 lapack_int lrwork, lapack_int* iwork,
05993                                 lapack_int liwork );
05994 lapack_int LAPACKE_zhbgvd_work( int matrix_order, char jobz, char uplo,
05995                                 lapack_int n, lapack_int ka, lapack_int kb,
05996                                 lapack_complex_double* ab, lapack_int ldab,
05997                                 lapack_complex_double* bb, lapack_int ldbb,
05998                                 double* w, lapack_complex_double* z,
05999                                 lapack_int ldz, lapack_complex_double* work,
06000                                 lapack_int lwork, double* rwork,
06001                                 lapack_int lrwork, lapack_int* iwork,
06002                                 lapack_int liwork );
06003 
06004 lapack_int LAPACKE_chbgvx_work( int matrix_order, char jobz, char range,
06005                                 char uplo, lapack_int n, lapack_int ka,
06006                                 lapack_int kb, lapack_complex_float* ab,
06007                                 lapack_int ldab, lapack_complex_float* bb,
06008                                 lapack_int ldbb, lapack_complex_float* q,
06009                                 lapack_int ldq, float vl, float vu,
06010                                 lapack_int il, lapack_int iu, float abstol,
06011                                 lapack_int* m, float* w,
06012                                 lapack_complex_float* z, lapack_int ldz,
06013                                 lapack_complex_float* work, float* rwork,
06014                                 lapack_int* iwork, lapack_int* ifail );
06015 lapack_int LAPACKE_zhbgvx_work( int matrix_order, char jobz, char range,
06016                                 char uplo, lapack_int n, lapack_int ka,
06017                                 lapack_int kb, lapack_complex_double* ab,
06018                                 lapack_int ldab, lapack_complex_double* bb,
06019                                 lapack_int ldbb, lapack_complex_double* q,
06020                                 lapack_int ldq, double vl, double vu,
06021                                 lapack_int il, lapack_int iu, double abstol,
06022                                 lapack_int* m, double* w,
06023                                 lapack_complex_double* z, lapack_int ldz,
06024                                 lapack_complex_double* work, double* rwork,
06025                                 lapack_int* iwork, lapack_int* ifail );
06026 
06027 lapack_int LAPACKE_chbtrd_work( int matrix_order, char vect, char uplo,
06028                                 lapack_int n, lapack_int kd,
06029                                 lapack_complex_float* ab, lapack_int ldab,
06030                                 float* d, float* e, lapack_complex_float* q,
06031                                 lapack_int ldq, lapack_complex_float* work );
06032 lapack_int LAPACKE_zhbtrd_work( int matrix_order, char vect, char uplo,
06033                                 lapack_int n, lapack_int kd,
06034                                 lapack_complex_double* ab, lapack_int ldab,
06035                                 double* d, double* e, lapack_complex_double* q,
06036                                 lapack_int ldq, lapack_complex_double* work );
06037 
06038 lapack_int LAPACKE_checon_work( int matrix_order, char uplo, lapack_int n,
06039                                 const lapack_complex_float* a, lapack_int lda,
06040                                 const lapack_int* ipiv, float anorm,
06041                                 float* rcond, lapack_complex_float* work );
06042 lapack_int LAPACKE_zhecon_work( int matrix_order, char uplo, lapack_int n,
06043                                 const lapack_complex_double* a, lapack_int lda,
06044                                 const lapack_int* ipiv, double anorm,
06045                                 double* rcond, lapack_complex_double* work );
06046 
06047 lapack_int LAPACKE_cheequb_work( int matrix_order, char uplo, lapack_int n,
06048                                  const lapack_complex_float* a, lapack_int lda,
06049                                  float* s, float* scond, float* amax,
06050                                  lapack_complex_float* work );
06051 lapack_int LAPACKE_zheequb_work( int matrix_order, char uplo, lapack_int n,
06052                                  const lapack_complex_double* a, lapack_int lda,
06053                                  double* s, double* scond, double* amax,
06054                                  lapack_complex_double* work );
06055 
06056 lapack_int LAPACKE_cheev_work( int matrix_order, char jobz, char uplo,
06057                                lapack_int n, lapack_complex_float* a,
06058                                lapack_int lda, float* w,
06059                                lapack_complex_float* work, lapack_int lwork,
06060                                float* rwork );
06061 lapack_int LAPACKE_zheev_work( int matrix_order, char jobz, char uplo,
06062                                lapack_int n, lapack_complex_double* a,
06063                                lapack_int lda, double* w,
06064                                lapack_complex_double* work, lapack_int lwork,
06065                                double* rwork );
06066 
06067 lapack_int LAPACKE_cheevd_work( int matrix_order, char jobz, char uplo,
06068                                 lapack_int n, lapack_complex_float* a,
06069                                 lapack_int lda, float* w,
06070                                 lapack_complex_float* work, lapack_int lwork,
06071                                 float* rwork, lapack_int lrwork,
06072                                 lapack_int* iwork, lapack_int liwork );
06073 lapack_int LAPACKE_zheevd_work( int matrix_order, char jobz, char uplo,
06074                                 lapack_int n, lapack_complex_double* a,
06075                                 lapack_int lda, double* w,
06076                                 lapack_complex_double* work, lapack_int lwork,
06077                                 double* rwork, lapack_int lrwork,
06078                                 lapack_int* iwork, lapack_int liwork );
06079 
06080 lapack_int LAPACKE_cheevr_work( int matrix_order, char jobz, char range,
06081                                 char uplo, lapack_int n,
06082                                 lapack_complex_float* a, lapack_int lda,
06083                                 float vl, float vu, lapack_int il,
06084                                 lapack_int iu, float abstol, lapack_int* m,
06085                                 float* w, lapack_complex_float* z,
06086                                 lapack_int ldz, lapack_int* isuppz,
06087                                 lapack_complex_float* work, lapack_int lwork,
06088                                 float* rwork, lapack_int lrwork,
06089                                 lapack_int* iwork, lapack_int liwork );
06090 lapack_int LAPACKE_zheevr_work( int matrix_order, char jobz, char range,
06091                                 char uplo, lapack_int n,
06092                                 lapack_complex_double* a, lapack_int lda,
06093                                 double vl, double vu, lapack_int il,
06094                                 lapack_int iu, double abstol, lapack_int* m,
06095                                 double* w, lapack_complex_double* z,
06096                                 lapack_int ldz, lapack_int* isuppz,
06097                                 lapack_complex_double* work, lapack_int lwork,
06098                                 double* rwork, lapack_int lrwork,
06099                                 lapack_int* iwork, lapack_int liwork );
06100 
06101 lapack_int LAPACKE_cheevx_work( int matrix_order, char jobz, char range,
06102                                 char uplo, lapack_int n,
06103                                 lapack_complex_float* a, lapack_int lda,
06104                                 float vl, float vu, lapack_int il,
06105                                 lapack_int iu, float abstol, lapack_int* m,
06106                                 float* w, lapack_complex_float* z,
06107                                 lapack_int ldz, lapack_complex_float* work,
06108                                 lapack_int lwork, float* rwork,
06109                                 lapack_int* iwork, lapack_int* ifail );
06110 lapack_int LAPACKE_zheevx_work( int matrix_order, char jobz, char range,
06111                                 char uplo, lapack_int n,
06112                                 lapack_complex_double* a, lapack_int lda,
06113                                 double vl, double vu, lapack_int il,
06114                                 lapack_int iu, double abstol, lapack_int* m,
06115                                 double* w, lapack_complex_double* z,
06116                                 lapack_int ldz, lapack_complex_double* work,
06117                                 lapack_int lwork, double* rwork,
06118                                 lapack_int* iwork, lapack_int* ifail );
06119 
06120 lapack_int LAPACKE_chegst_work( int matrix_order, lapack_int itype, char uplo,
06121                                 lapack_int n, lapack_complex_float* a,
06122                                 lapack_int lda, const lapack_complex_float* b,
06123                                 lapack_int ldb );
06124 lapack_int LAPACKE_zhegst_work( int matrix_order, lapack_int itype, char uplo,
06125                                 lapack_int n, lapack_complex_double* a,
06126                                 lapack_int lda, const lapack_complex_double* b,
06127                                 lapack_int ldb );
06128 
06129 lapack_int LAPACKE_chegv_work( int matrix_order, lapack_int itype, char jobz,
06130                                char uplo, lapack_int n, lapack_complex_float* a,
06131                                lapack_int lda, lapack_complex_float* b,
06132                                lapack_int ldb, float* w,
06133                                lapack_complex_float* work, lapack_int lwork,
06134                                float* rwork );
06135 lapack_int LAPACKE_zhegv_work( int matrix_order, lapack_int itype, char jobz,
06136                                char uplo, lapack_int n,
06137                                lapack_complex_double* a, lapack_int lda,
06138                                lapack_complex_double* b, lapack_int ldb,
06139                                double* w, lapack_complex_double* work,
06140                                lapack_int lwork, double* rwork );
06141 
06142 lapack_int LAPACKE_chegvd_work( int matrix_order, lapack_int itype, char jobz,
06143                                 char uplo, lapack_int n,
06144                                 lapack_complex_float* a, lapack_int lda,
06145                                 lapack_complex_float* b, lapack_int ldb,
06146                                 float* w, lapack_complex_float* work,
06147                                 lapack_int lwork, float* rwork,
06148                                 lapack_int lrwork, lapack_int* iwork,
06149                                 lapack_int liwork );
06150 lapack_int LAPACKE_zhegvd_work( int matrix_order, lapack_int itype, char jobz,
06151                                 char uplo, lapack_int n,
06152                                 lapack_complex_double* a, lapack_int lda,
06153                                 lapack_complex_double* b, lapack_int ldb,
06154                                 double* w, lapack_complex_double* work,
06155                                 lapack_int lwork, double* rwork,
06156                                 lapack_int lrwork, lapack_int* iwork,
06157                                 lapack_int liwork );
06158 
06159 lapack_int LAPACKE_chegvx_work( int matrix_order, lapack_int itype, char jobz,
06160                                 char range, char uplo, lapack_int n,
06161                                 lapack_complex_float* a, lapack_int lda,
06162                                 lapack_complex_float* b, lapack_int ldb,
06163                                 float vl, float vu, lapack_int il,
06164                                 lapack_int iu, float abstol, lapack_int* m,
06165                                 float* w, lapack_complex_float* z,
06166                                 lapack_int ldz, lapack_complex_float* work,
06167                                 lapack_int lwork, float* rwork,
06168                                 lapack_int* iwork, lapack_int* ifail );
06169 lapack_int LAPACKE_zhegvx_work( int matrix_order, lapack_int itype, char jobz,
06170                                 char range, char uplo, lapack_int n,
06171                                 lapack_complex_double* a, lapack_int lda,
06172                                 lapack_complex_double* b, lapack_int ldb,
06173                                 double vl, double vu, lapack_int il,
06174                                 lapack_int iu, double abstol, lapack_int* m,
06175                                 double* w, lapack_complex_double* z,
06176                                 lapack_int ldz, lapack_complex_double* work,
06177                                 lapack_int lwork, double* rwork,
06178                                 lapack_int* iwork, lapack_int* ifail );
06179 
06180 lapack_int LAPACKE_cherfs_work( int matrix_order, char uplo, lapack_int n,
06181                                 lapack_int nrhs, const lapack_complex_float* a,
06182                                 lapack_int lda, const lapack_complex_float* af,
06183                                 lapack_int ldaf, const lapack_int* ipiv,
06184                                 const lapack_complex_float* b, lapack_int ldb,
06185                                 lapack_complex_float* x, lapack_int ldx,
06186                                 float* ferr, float* berr,
06187                                 lapack_complex_float* work, float* rwork );
06188 lapack_int LAPACKE_zherfs_work( int matrix_order, char uplo, lapack_int n,
06189                                 lapack_int nrhs, const lapack_complex_double* a,
06190                                 lapack_int lda, const lapack_complex_double* af,
06191                                 lapack_int ldaf, const lapack_int* ipiv,
06192                                 const lapack_complex_double* b, lapack_int ldb,
06193                                 lapack_complex_double* x, lapack_int ldx,
06194                                 double* ferr, double* berr,
06195                                 lapack_complex_double* work, double* rwork );
06196 
06197 lapack_int LAPACKE_cherfsx_work( int matrix_order, char uplo, char equed,
06198                                  lapack_int n, lapack_int nrhs,
06199                                  const lapack_complex_float* a, lapack_int lda,
06200                                  const lapack_complex_float* af,
06201                                  lapack_int ldaf, const lapack_int* ipiv,
06202                                  const float* s, const lapack_complex_float* b,
06203                                  lapack_int ldb, lapack_complex_float* x,
06204                                  lapack_int ldx, float* rcond, float* berr,
06205                                  lapack_int n_err_bnds, float* err_bnds_norm,
06206                                  float* err_bnds_comp, lapack_int nparams,
06207                                  float* params, lapack_complex_float* work,
06208                                  float* rwork );
06209 lapack_int LAPACKE_zherfsx_work( int matrix_order, char uplo, char equed,
06210                                  lapack_int n, lapack_int nrhs,
06211                                  const lapack_complex_double* a, lapack_int lda,
06212                                  const lapack_complex_double* af,
06213                                  lapack_int ldaf, const lapack_int* ipiv,
06214                                  const double* s,
06215                                  const lapack_complex_double* b, lapack_int ldb,
06216                                  lapack_complex_double* x, lapack_int ldx,
06217                                  double* rcond, double* berr,
06218                                  lapack_int n_err_bnds, double* err_bnds_norm,
06219                                  double* err_bnds_comp, lapack_int nparams,
06220                                  double* params, lapack_complex_double* work,
06221                                  double* rwork );
06222 
06223 lapack_int LAPACKE_chesv_work( int matrix_order, char uplo, lapack_int n,
06224                                lapack_int nrhs, lapack_complex_float* a,
06225                                lapack_int lda, lapack_int* ipiv,
06226                                lapack_complex_float* b, lapack_int ldb,
06227                                lapack_complex_float* work, lapack_int lwork );
06228 lapack_int LAPACKE_zhesv_work( int matrix_order, char uplo, lapack_int n,
06229                                lapack_int nrhs, lapack_complex_double* a,
06230                                lapack_int lda, lapack_int* ipiv,
06231                                lapack_complex_double* b, lapack_int ldb,
06232                                lapack_complex_double* work, lapack_int lwork );
06233 
06234 lapack_int LAPACKE_chesvx_work( int matrix_order, char fact, char uplo,
06235                                 lapack_int n, lapack_int nrhs,
06236                                 const lapack_complex_float* a, lapack_int lda,
06237                                 lapack_complex_float* af, lapack_int ldaf,
06238                                 lapack_int* ipiv, const lapack_complex_float* b,
06239                                 lapack_int ldb, lapack_complex_float* x,
06240                                 lapack_int ldx, float* rcond, float* ferr,
06241                                 float* berr, lapack_complex_float* work,
06242                                 lapack_int lwork, float* rwork );
06243 lapack_int LAPACKE_zhesvx_work( int matrix_order, char fact, char uplo,
06244                                 lapack_int n, lapack_int nrhs,
06245                                 const lapack_complex_double* a, lapack_int lda,
06246                                 lapack_complex_double* af, lapack_int ldaf,
06247                                 lapack_int* ipiv,
06248                                 const lapack_complex_double* b, lapack_int ldb,
06249                                 lapack_complex_double* x, lapack_int ldx,
06250                                 double* rcond, double* ferr, double* berr,
06251                                 lapack_complex_double* work, lapack_int lwork,
06252                                 double* rwork );
06253 
06254 lapack_int LAPACKE_chesvxx_work( int matrix_order, char fact, char uplo,
06255                                  lapack_int n, lapack_int nrhs,
06256                                  lapack_complex_float* a, lapack_int lda,
06257                                  lapack_complex_float* af, lapack_int ldaf,
06258                                  lapack_int* ipiv, char* equed, float* s,
06259                                  lapack_complex_float* b, lapack_int ldb,
06260                                  lapack_complex_float* x, lapack_int ldx,
06261                                  float* rcond, float* rpvgrw, float* berr,
06262                                  lapack_int n_err_bnds, float* err_bnds_norm,
06263                                  float* err_bnds_comp, lapack_int nparams,
06264                                  float* params, lapack_complex_float* work,
06265                                  float* rwork );
06266 lapack_int LAPACKE_zhesvxx_work( int matrix_order, char fact, char uplo,
06267                                  lapack_int n, lapack_int nrhs,
06268                                  lapack_complex_double* a, lapack_int lda,
06269                                  lapack_complex_double* af, lapack_int ldaf,
06270                                  lapack_int* ipiv, char* equed, double* s,
06271                                  lapack_complex_double* b, lapack_int ldb,
06272                                  lapack_complex_double* x, lapack_int ldx,
06273                                  double* rcond, double* rpvgrw, double* berr,
06274                                  lapack_int n_err_bnds, double* err_bnds_norm,
06275                                  double* err_bnds_comp, lapack_int nparams,
06276                                  double* params, lapack_complex_double* work,
06277                                  double* rwork );
06278 
06279 lapack_int LAPACKE_chetrd_work( int matrix_order, char uplo, lapack_int n,
06280                                 lapack_complex_float* a, lapack_int lda,
06281                                 float* d, float* e, lapack_complex_float* tau,
06282                                 lapack_complex_float* work, lapack_int lwork );
06283 lapack_int LAPACKE_zhetrd_work( int matrix_order, char uplo, lapack_int n,
06284                                 lapack_complex_double* a, lapack_int lda,
06285                                 double* d, double* e,
06286                                 lapack_complex_double* tau,
06287                                 lapack_complex_double* work, lapack_int lwork );
06288 
06289 lapack_int LAPACKE_chetrf_work( int matrix_order, char uplo, lapack_int n,
06290                                 lapack_complex_float* a, lapack_int lda,
06291                                 lapack_int* ipiv, lapack_complex_float* work,
06292                                 lapack_int lwork );
06293 lapack_int LAPACKE_zhetrf_work( int matrix_order, char uplo, lapack_int n,
06294                                 lapack_complex_double* a, lapack_int lda,
06295                                 lapack_int* ipiv, lapack_complex_double* work,
06296                                 lapack_int lwork );
06297 
06298 lapack_int LAPACKE_chetri_work( int matrix_order, char uplo, lapack_int n,
06299                                 lapack_complex_float* a, lapack_int lda,
06300                                 const lapack_int* ipiv,
06301                                 lapack_complex_float* work );
06302 lapack_int LAPACKE_zhetri_work( int matrix_order, char uplo, lapack_int n,
06303                                 lapack_complex_double* a, lapack_int lda,
06304                                 const lapack_int* ipiv,
06305                                 lapack_complex_double* work );
06306 
06307 lapack_int LAPACKE_chetrs_work( int matrix_order, char uplo, lapack_int n,
06308                                 lapack_int nrhs, const lapack_complex_float* a,
06309                                 lapack_int lda, const lapack_int* ipiv,
06310                                 lapack_complex_float* b, lapack_int ldb );
06311 lapack_int LAPACKE_zhetrs_work( int matrix_order, char uplo, lapack_int n,
06312                                 lapack_int nrhs, const lapack_complex_double* a,
06313                                 lapack_int lda, const lapack_int* ipiv,
06314                                 lapack_complex_double* b, lapack_int ldb );
06315 
06316 lapack_int LAPACKE_chfrk_work( int matrix_order, char transr, char uplo,
06317                                char trans, lapack_int n, lapack_int k,
06318                                float alpha, const lapack_complex_float* a,
06319                                lapack_int lda, float beta,
06320                                lapack_complex_float* c );
06321 lapack_int LAPACKE_zhfrk_work( int matrix_order, char transr, char uplo,
06322                                char trans, lapack_int n, lapack_int k,
06323                                double alpha, const lapack_complex_double* a,
06324                                lapack_int lda, double beta,
06325                                lapack_complex_double* c );
06326 
06327 lapack_int LAPACKE_shgeqz_work( int matrix_order, char job, char compq,
06328                                 char compz, lapack_int n, lapack_int ilo,
06329                                 lapack_int ihi, float* h, lapack_int ldh,
06330                                 float* t, lapack_int ldt, float* alphar,
06331                                 float* alphai, float* beta, float* q,
06332                                 lapack_int ldq, float* z, lapack_int ldz,
06333                                 float* work, lapack_int lwork );
06334 lapack_int LAPACKE_dhgeqz_work( int matrix_order, char job, char compq,
06335                                 char compz, lapack_int n, lapack_int ilo,
06336                                 lapack_int ihi, double* h, lapack_int ldh,
06337                                 double* t, lapack_int ldt, double* alphar,
06338                                 double* alphai, double* beta, double* q,
06339                                 lapack_int ldq, double* z, lapack_int ldz,
06340                                 double* work, lapack_int lwork );
06341 lapack_int LAPACKE_chgeqz_work( int matrix_order, char job, char compq,
06342                                 char compz, lapack_int n, lapack_int ilo,
06343                                 lapack_int ihi, lapack_complex_float* h,
06344                                 lapack_int ldh, lapack_complex_float* t,
06345                                 lapack_int ldt, lapack_complex_float* alpha,
06346                                 lapack_complex_float* beta,
06347                                 lapack_complex_float* q, lapack_int ldq,
06348                                 lapack_complex_float* z, lapack_int ldz,
06349                                 lapack_complex_float* work, lapack_int lwork,
06350                                 float* rwork );
06351 lapack_int LAPACKE_zhgeqz_work( int matrix_order, char job, char compq,
06352                                 char compz, lapack_int n, lapack_int ilo,
06353                                 lapack_int ihi, lapack_complex_double* h,
06354                                 lapack_int ldh, lapack_complex_double* t,
06355                                 lapack_int ldt, lapack_complex_double* alpha,
06356                                 lapack_complex_double* beta,
06357                                 lapack_complex_double* q, lapack_int ldq,
06358                                 lapack_complex_double* z, lapack_int ldz,
06359                                 lapack_complex_double* work, lapack_int lwork,
06360                                 double* rwork );
06361 
06362 lapack_int LAPACKE_chpcon_work( int matrix_order, char uplo, lapack_int n,
06363                                 const lapack_complex_float* ap,
06364                                 const lapack_int* ipiv, float anorm,
06365                                 float* rcond, lapack_complex_float* work );
06366 lapack_int LAPACKE_zhpcon_work( int matrix_order, char uplo, lapack_int n,
06367                                 const lapack_complex_double* ap,
06368                                 const lapack_int* ipiv, double anorm,
06369                                 double* rcond, lapack_complex_double* work );
06370 
06371 lapack_int LAPACKE_chpev_work( int matrix_order, char jobz, char uplo,
06372                                lapack_int n, lapack_complex_float* ap, float* w,
06373                                lapack_complex_float* z, lapack_int ldz,
06374                                lapack_complex_float* work, float* rwork );
06375 lapack_int LAPACKE_zhpev_work( int matrix_order, char jobz, char uplo,
06376                                lapack_int n, lapack_complex_double* ap,
06377                                double* w, lapack_complex_double* z,
06378                                lapack_int ldz, lapack_complex_double* work,
06379                                double* rwork );
06380 
06381 lapack_int LAPACKE_chpevd_work( int matrix_order, char jobz, char uplo,
06382                                 lapack_int n, lapack_complex_float* ap,
06383                                 float* w, lapack_complex_float* z,
06384                                 lapack_int ldz, lapack_complex_float* work,
06385                                 lapack_int lwork, float* rwork,
06386                                 lapack_int lrwork, lapack_int* iwork,
06387                                 lapack_int liwork );
06388 lapack_int LAPACKE_zhpevd_work( int matrix_order, char jobz, char uplo,
06389                                 lapack_int n, lapack_complex_double* ap,
06390                                 double* w, lapack_complex_double* z,
06391                                 lapack_int ldz, lapack_complex_double* work,
06392                                 lapack_int lwork, double* rwork,
06393                                 lapack_int lrwork, lapack_int* iwork,
06394                                 lapack_int liwork );
06395 
06396 lapack_int LAPACKE_chpevx_work( int matrix_order, char jobz, char range,
06397                                 char uplo, lapack_int n,
06398                                 lapack_complex_float* ap, float vl, float vu,
06399                                 lapack_int il, lapack_int iu, float abstol,
06400                                 lapack_int* m, float* w,
06401                                 lapack_complex_float* z, lapack_int ldz,
06402                                 lapack_complex_float* work, float* rwork,
06403                                 lapack_int* iwork, lapack_int* ifail );
06404 lapack_int LAPACKE_zhpevx_work( int matrix_order, char jobz, char range,
06405                                 char uplo, lapack_int n,
06406                                 lapack_complex_double* ap, double vl, double vu,
06407                                 lapack_int il, lapack_int iu, double abstol,
06408                                 lapack_int* m, double* w,
06409                                 lapack_complex_double* z, lapack_int ldz,
06410                                 lapack_complex_double* work, double* rwork,
06411                                 lapack_int* iwork, lapack_int* ifail );
06412 
06413 lapack_int LAPACKE_chpgst_work( int matrix_order, lapack_int itype, char uplo,
06414                                 lapack_int n, lapack_complex_float* ap,
06415                                 const lapack_complex_float* bp );
06416 lapack_int LAPACKE_zhpgst_work( int matrix_order, lapack_int itype, char uplo,
06417                                 lapack_int n, lapack_complex_double* ap,
06418                                 const lapack_complex_double* bp );
06419 
06420 lapack_int LAPACKE_chpgv_work( int matrix_order, lapack_int itype, char jobz,
06421                                char uplo, lapack_int n,
06422                                lapack_complex_float* ap,
06423                                lapack_complex_float* bp, float* w,
06424                                lapack_complex_float* z, lapack_int ldz,
06425                                lapack_complex_float* work, float* rwork );
06426 lapack_int LAPACKE_zhpgv_work( int matrix_order, lapack_int itype, char jobz,
06427                                char uplo, lapack_int n,
06428                                lapack_complex_double* ap,
06429                                lapack_complex_double* bp, double* w,
06430                                lapack_complex_double* z, lapack_int ldz,
06431                                lapack_complex_double* work, double* rwork );
06432 
06433 lapack_int LAPACKE_chpgvd_work( int matrix_order, lapack_int itype, char jobz,
06434                                 char uplo, lapack_int n,
06435                                 lapack_complex_float* ap,
06436                                 lapack_complex_float* bp, float* w,
06437                                 lapack_complex_float* z, lapack_int ldz,
06438                                 lapack_complex_float* work, lapack_int lwork,
06439                                 float* rwork, lapack_int lrwork,
06440                                 lapack_int* iwork, lapack_int liwork );
06441 lapack_int LAPACKE_zhpgvd_work( int matrix_order, lapack_int itype, char jobz,
06442                                 char uplo, lapack_int n,
06443                                 lapack_complex_double* ap,
06444                                 lapack_complex_double* bp, double* w,
06445                                 lapack_complex_double* z, lapack_int ldz,
06446                                 lapack_complex_double* work, lapack_int lwork,
06447                                 double* rwork, lapack_int lrwork,
06448                                 lapack_int* iwork, lapack_int liwork );
06449 
06450 lapack_int LAPACKE_chpgvx_work( int matrix_order, lapack_int itype, char jobz,
06451                                 char range, char uplo, lapack_int n,
06452                                 lapack_complex_float* ap,
06453                                 lapack_complex_float* bp, float vl, float vu,
06454                                 lapack_int il, lapack_int iu, float abstol,
06455                                 lapack_int* m, float* w,
06456                                 lapack_complex_float* z, lapack_int ldz,
06457                                 lapack_complex_float* work, float* rwork,
06458                                 lapack_int* iwork, lapack_int* ifail );
06459 lapack_int LAPACKE_zhpgvx_work( int matrix_order, lapack_int itype, char jobz,
06460                                 char range, char uplo, lapack_int n,
06461                                 lapack_complex_double* ap,
06462                                 lapack_complex_double* bp, double vl, double vu,
06463                                 lapack_int il, lapack_int iu, double abstol,
06464                                 lapack_int* m, double* w,
06465                                 lapack_complex_double* z, lapack_int ldz,
06466                                 lapack_complex_double* work, double* rwork,
06467                                 lapack_int* iwork, lapack_int* ifail );
06468 
06469 lapack_int LAPACKE_chprfs_work( int matrix_order, char uplo, lapack_int n,
06470                                 lapack_int nrhs, const lapack_complex_float* ap,
06471                                 const lapack_complex_float* afp,
06472                                 const lapack_int* ipiv,
06473                                 const lapack_complex_float* b, lapack_int ldb,
06474                                 lapack_complex_float* x, lapack_int ldx,
06475                                 float* ferr, float* berr,
06476                                 lapack_complex_float* work, float* rwork );
06477 lapack_int LAPACKE_zhprfs_work( int matrix_order, char uplo, lapack_int n,
06478                                 lapack_int nrhs,
06479                                 const lapack_complex_double* ap,
06480                                 const lapack_complex_double* afp,
06481                                 const lapack_int* ipiv,
06482                                 const lapack_complex_double* b, lapack_int ldb,
06483                                 lapack_complex_double* x, lapack_int ldx,
06484                                 double* ferr, double* berr,
06485                                 lapack_complex_double* work, double* rwork );
06486 
06487 lapack_int LAPACKE_chpsv_work( int matrix_order, char uplo, lapack_int n,
06488                                lapack_int nrhs, lapack_complex_float* ap,
06489                                lapack_int* ipiv, lapack_complex_float* b,
06490                                lapack_int ldb );
06491 lapack_int LAPACKE_zhpsv_work( int matrix_order, char uplo, lapack_int n,
06492                                lapack_int nrhs, lapack_complex_double* ap,
06493                                lapack_int* ipiv, lapack_complex_double* b,
06494                                lapack_int ldb );
06495 
06496 lapack_int LAPACKE_chpsvx_work( int matrix_order, char fact, char uplo,
06497                                 lapack_int n, lapack_int nrhs,
06498                                 const lapack_complex_float* ap,
06499                                 lapack_complex_float* afp, lapack_int* ipiv,
06500                                 const lapack_complex_float* b, lapack_int ldb,
06501                                 lapack_complex_float* x, lapack_int ldx,
06502                                 float* rcond, float* ferr, float* berr,
06503                                 lapack_complex_float* work, float* rwork );
06504 lapack_int LAPACKE_zhpsvx_work( int matrix_order, char fact, char uplo,
06505                                 lapack_int n, lapack_int nrhs,
06506                                 const lapack_complex_double* ap,
06507                                 lapack_complex_double* afp, lapack_int* ipiv,
06508                                 const lapack_complex_double* b, lapack_int ldb,
06509                                 lapack_complex_double* x, lapack_int ldx,
06510                                 double* rcond, double* ferr, double* berr,
06511                                 lapack_complex_double* work, double* rwork );
06512 
06513 lapack_int LAPACKE_chptrd_work( int matrix_order, char uplo, lapack_int n,
06514                                 lapack_complex_float* ap, float* d, float* e,
06515                                 lapack_complex_float* tau );
06516 lapack_int LAPACKE_zhptrd_work( int matrix_order, char uplo, lapack_int n,
06517                                 lapack_complex_double* ap, double* d, double* e,
06518                                 lapack_complex_double* tau );
06519 
06520 lapack_int LAPACKE_chptrf_work( int matrix_order, char uplo, lapack_int n,
06521                                 lapack_complex_float* ap, lapack_int* ipiv );
06522 lapack_int LAPACKE_zhptrf_work( int matrix_order, char uplo, lapack_int n,
06523                                 lapack_complex_double* ap, lapack_int* ipiv );
06524 
06525 lapack_int LAPACKE_chptri_work( int matrix_order, char uplo, lapack_int n,
06526                                 lapack_complex_float* ap,
06527                                 const lapack_int* ipiv,
06528                                 lapack_complex_float* work );
06529 lapack_int LAPACKE_zhptri_work( int matrix_order, char uplo, lapack_int n,
06530                                 lapack_complex_double* ap,
06531                                 const lapack_int* ipiv,
06532                                 lapack_complex_double* work );
06533 
06534 lapack_int LAPACKE_chptrs_work( int matrix_order, char uplo, lapack_int n,
06535                                 lapack_int nrhs, const lapack_complex_float* ap,
06536                                 const lapack_int* ipiv, lapack_complex_float* b,
06537                                 lapack_int ldb );
06538 lapack_int LAPACKE_zhptrs_work( int matrix_order, char uplo, lapack_int n,
06539                                 lapack_int nrhs,
06540                                 const lapack_complex_double* ap,
06541                                 const lapack_int* ipiv,
06542                                 lapack_complex_double* b, lapack_int ldb );
06543 
06544 lapack_int LAPACKE_shsein_work( int matrix_order, char job, char eigsrc,
06545                                 char initv, lapack_logical* select,
06546                                 lapack_int n, const float* h, lapack_int ldh,
06547                                 float* wr, const float* wi, float* vl,
06548                                 lapack_int ldvl, float* vr, lapack_int ldvr,
06549                                 lapack_int mm, lapack_int* m, float* work,
06550                                 lapack_int* ifaill, lapack_int* ifailr );
06551 lapack_int LAPACKE_dhsein_work( int matrix_order, char job, char eigsrc,
06552                                 char initv, lapack_logical* select,
06553                                 lapack_int n, const double* h, lapack_int ldh,
06554                                 double* wr, const double* wi, double* vl,
06555                                 lapack_int ldvl, double* vr, lapack_int ldvr,
06556                                 lapack_int mm, lapack_int* m, double* work,
06557                                 lapack_int* ifaill, lapack_int* ifailr );
06558 lapack_int LAPACKE_chsein_work( int matrix_order, char job, char eigsrc,
06559                                 char initv, const lapack_logical* select,
06560                                 lapack_int n, const lapack_complex_float* h,
06561                                 lapack_int ldh, lapack_complex_float* w,
06562                                 lapack_complex_float* vl, lapack_int ldvl,
06563                                 lapack_complex_float* vr, lapack_int ldvr,
06564                                 lapack_int mm, lapack_int* m,
06565                                 lapack_complex_float* work, float* rwork,
06566                                 lapack_int* ifaill, lapack_int* ifailr );
06567 lapack_int LAPACKE_zhsein_work( int matrix_order, char job, char eigsrc,
06568                                 char initv, const lapack_logical* select,
06569                                 lapack_int n, const lapack_complex_double* h,
06570                                 lapack_int ldh, lapack_complex_double* w,
06571                                 lapack_complex_double* vl, lapack_int ldvl,
06572                                 lapack_complex_double* vr, lapack_int ldvr,
06573                                 lapack_int mm, lapack_int* m,
06574                                 lapack_complex_double* work, double* rwork,
06575                                 lapack_int* ifaill, lapack_int* ifailr );
06576 
06577 lapack_int LAPACKE_shseqr_work( int matrix_order, char job, char compz,
06578                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06579                                 float* h, lapack_int ldh, float* wr, float* wi,
06580                                 float* z, lapack_int ldz, float* work,
06581                                 lapack_int lwork );
06582 lapack_int LAPACKE_dhseqr_work( int matrix_order, char job, char compz,
06583                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06584                                 double* h, lapack_int ldh, double* wr,
06585                                 double* wi, double* z, lapack_int ldz,
06586                                 double* work, lapack_int lwork );
06587 lapack_int LAPACKE_chseqr_work( int matrix_order, char job, char compz,
06588                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06589                                 lapack_complex_float* h, lapack_int ldh,
06590                                 lapack_complex_float* w,
06591                                 lapack_complex_float* z, lapack_int ldz,
06592                                 lapack_complex_float* work, lapack_int lwork );
06593 lapack_int LAPACKE_zhseqr_work( int matrix_order, char job, char compz,
06594                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06595                                 lapack_complex_double* h, lapack_int ldh,
06596                                 lapack_complex_double* w,
06597                                 lapack_complex_double* z, lapack_int ldz,
06598                                 lapack_complex_double* work, lapack_int lwork );
06599 
06600 lapack_int LAPACKE_sopgtr_work( int matrix_order, char uplo, lapack_int n,
06601                                 const float* ap, const float* tau, float* q,
06602                                 lapack_int ldq, float* work );
06603 lapack_int LAPACKE_dopgtr_work( int matrix_order, char uplo, lapack_int n,
06604                                 const double* ap, const double* tau, double* q,
06605                                 lapack_int ldq, double* work );
06606 
06607 lapack_int LAPACKE_sopmtr_work( int matrix_order, char side, char uplo,
06608                                 char trans, lapack_int m, lapack_int n,
06609                                 const float* ap, const float* tau, float* c,
06610                                 lapack_int ldc, float* work );
06611 lapack_int LAPACKE_dopmtr_work( int matrix_order, char side, char uplo,
06612                                 char trans, lapack_int m, lapack_int n,
06613                                 const double* ap, const double* tau, double* c,
06614                                 lapack_int ldc, double* work );
06615 
06616 lapack_int LAPACKE_sorgbr_work( int matrix_order, char vect, lapack_int m,
06617                                 lapack_int n, lapack_int k, float* a,
06618                                 lapack_int lda, const float* tau, float* work,
06619                                 lapack_int lwork );
06620 lapack_int LAPACKE_dorgbr_work( int matrix_order, char vect, lapack_int m,
06621                                 lapack_int n, lapack_int k, double* a,
06622                                 lapack_int lda, const double* tau, double* work,
06623                                 lapack_int lwork );
06624 
06625 lapack_int LAPACKE_sorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
06626                                 lapack_int ihi, float* a, lapack_int lda,
06627                                 const float* tau, float* work,
06628                                 lapack_int lwork );
06629 lapack_int LAPACKE_dorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
06630                                 lapack_int ihi, double* a, lapack_int lda,
06631                                 const double* tau, double* work,
06632                                 lapack_int lwork );
06633 
06634 lapack_int LAPACKE_sorglq_work( int matrix_order, lapack_int m, lapack_int n,
06635                                 lapack_int k, float* a, lapack_int lda,
06636                                 const float* tau, float* work,
06637                                 lapack_int lwork );
06638 lapack_int LAPACKE_dorglq_work( int matrix_order, lapack_int m, lapack_int n,
06639                                 lapack_int k, double* a, lapack_int lda,
06640                                 const double* tau, double* work,
06641                                 lapack_int lwork );
06642 
06643 lapack_int LAPACKE_sorgql_work( int matrix_order, lapack_int m, lapack_int n,
06644                                 lapack_int k, float* a, lapack_int lda,
06645                                 const float* tau, float* work,
06646                                 lapack_int lwork );
06647 lapack_int LAPACKE_dorgql_work( int matrix_order, lapack_int m, lapack_int n,
06648                                 lapack_int k, double* a, lapack_int lda,
06649                                 const double* tau, double* work,
06650                                 lapack_int lwork );
06651 
06652 lapack_int LAPACKE_sorgqr_work( int matrix_order, lapack_int m, lapack_int n,
06653                                 lapack_int k, float* a, lapack_int lda,
06654                                 const float* tau, float* work,
06655                                 lapack_int lwork );
06656 lapack_int LAPACKE_dorgqr_work( int matrix_order, lapack_int m, lapack_int n,
06657                                 lapack_int k, double* a, lapack_int lda,
06658                                 const double* tau, double* work,
06659                                 lapack_int lwork );
06660 
06661 lapack_int LAPACKE_sorgrq_work( int matrix_order, lapack_int m, lapack_int n,
06662                                 lapack_int k, float* a, lapack_int lda,
06663                                 const float* tau, float* work,
06664                                 lapack_int lwork );
06665 lapack_int LAPACKE_dorgrq_work( int matrix_order, lapack_int m, lapack_int n,
06666                                 lapack_int k, double* a, lapack_int lda,
06667                                 const double* tau, double* work,
06668                                 lapack_int lwork );
06669 
06670 lapack_int LAPACKE_sorgtr_work( int matrix_order, char uplo, lapack_int n,
06671                                 float* a, lapack_int lda, const float* tau,
06672                                 float* work, lapack_int lwork );
06673 lapack_int LAPACKE_dorgtr_work( int matrix_order, char uplo, lapack_int n,
06674                                 double* a, lapack_int lda, const double* tau,
06675                                 double* work, lapack_int lwork );
06676 
06677 lapack_int LAPACKE_sormbr_work( int matrix_order, char vect, char side,
06678                                 char trans, lapack_int m, lapack_int n,
06679                                 lapack_int k, const float* a, lapack_int lda,
06680                                 const float* tau, float* c, lapack_int ldc,
06681                                 float* work, lapack_int lwork );
06682 lapack_int LAPACKE_dormbr_work( int matrix_order, char vect, char side,
06683                                 char trans, lapack_int m, lapack_int n,
06684                                 lapack_int k, const double* a, lapack_int lda,
06685                                 const double* tau, double* c, lapack_int ldc,
06686                                 double* work, lapack_int lwork );
06687 
06688 lapack_int LAPACKE_sormhr_work( int matrix_order, char side, char trans,
06689                                 lapack_int m, lapack_int n, lapack_int ilo,
06690                                 lapack_int ihi, const float* a, lapack_int lda,
06691                                 const float* tau, float* c, lapack_int ldc,
06692                                 float* work, lapack_int lwork );
06693 lapack_int LAPACKE_dormhr_work( int matrix_order, char side, char trans,
06694                                 lapack_int m, lapack_int n, lapack_int ilo,
06695                                 lapack_int ihi, const double* a, lapack_int lda,
06696                                 const double* tau, double* c, lapack_int ldc,
06697                                 double* work, lapack_int lwork );
06698 
06699 lapack_int LAPACKE_sormlq_work( int matrix_order, char side, char trans,
06700                                 lapack_int m, lapack_int n, lapack_int k,
06701                                 const float* a, lapack_int lda,
06702                                 const float* tau, float* c, lapack_int ldc,
06703                                 float* work, lapack_int lwork );
06704 lapack_int LAPACKE_dormlq_work( int matrix_order, char side, char trans,
06705                                 lapack_int m, lapack_int n, lapack_int k,
06706                                 const double* a, lapack_int lda,
06707                                 const double* tau, double* c, lapack_int ldc,
06708                                 double* work, lapack_int lwork );
06709 
06710 lapack_int LAPACKE_sormql_work( int matrix_order, char side, char trans,
06711                                 lapack_int m, lapack_int n, lapack_int k,
06712                                 const float* a, lapack_int lda,
06713                                 const float* tau, float* c, lapack_int ldc,
06714                                 float* work, lapack_int lwork );
06715 lapack_int LAPACKE_dormql_work( int matrix_order, char side, char trans,
06716                                 lapack_int m, lapack_int n, lapack_int k,
06717                                 const double* a, lapack_int lda,
06718                                 const double* tau, double* c, lapack_int ldc,
06719                                 double* work, lapack_int lwork );
06720 
06721 lapack_int LAPACKE_sormqr_work( int matrix_order, char side, char trans,
06722                                 lapack_int m, lapack_int n, lapack_int k,
06723                                 const float* a, lapack_int lda,
06724                                 const float* tau, float* c, lapack_int ldc,
06725                                 float* work, lapack_int lwork );
06726 lapack_int LAPACKE_dormqr_work( int matrix_order, char side, char trans,
06727                                 lapack_int m, lapack_int n, lapack_int k,
06728                                 const double* a, lapack_int lda,
06729                                 const double* tau, double* c, lapack_int ldc,
06730                                 double* work, lapack_int lwork );
06731 
06732 lapack_int LAPACKE_sormrq_work( int matrix_order, char side, char trans,
06733                                 lapack_int m, lapack_int n, lapack_int k,
06734                                 const float* a, lapack_int lda,
06735                                 const float* tau, float* c, lapack_int ldc,
06736                                 float* work, lapack_int lwork );
06737 lapack_int LAPACKE_dormrq_work( int matrix_order, char side, char trans,
06738                                 lapack_int m, lapack_int n, lapack_int k,
06739                                 const double* a, lapack_int lda,
06740                                 const double* tau, double* c, lapack_int ldc,
06741                                 double* work, lapack_int lwork );
06742 
06743 lapack_int LAPACKE_sormrz_work( int matrix_order, char side, char trans,
06744                                 lapack_int m, lapack_int n, lapack_int k,
06745                                 lapack_int l, const float* a, lapack_int lda,
06746                                 const float* tau, float* c, lapack_int ldc,
06747                                 float* work, lapack_int lwork );
06748 lapack_int LAPACKE_dormrz_work( int matrix_order, char side, char trans,
06749                                 lapack_int m, lapack_int n, lapack_int k,
06750                                 lapack_int l, const double* a, lapack_int lda,
06751                                 const double* tau, double* c, lapack_int ldc,
06752                                 double* work, lapack_int lwork );
06753 
06754 lapack_int LAPACKE_sormtr_work( int matrix_order, char side, char uplo,
06755                                 char trans, lapack_int m, lapack_int n,
06756                                 const float* a, lapack_int lda,
06757                                 const float* tau, float* c, lapack_int ldc,
06758                                 float* work, lapack_int lwork );
06759 lapack_int LAPACKE_dormtr_work( int matrix_order, char side, char uplo,
06760                                 char trans, lapack_int m, lapack_int n,
06761                                 const double* a, lapack_int lda,
06762                                 const double* tau, double* c, lapack_int ldc,
06763                                 double* work, lapack_int lwork );
06764 
06765 lapack_int LAPACKE_spbcon_work( int matrix_order, char uplo, lapack_int n,
06766                                 lapack_int kd, const float* ab, lapack_int ldab,
06767                                 float anorm, float* rcond, float* work,
06768                                 lapack_int* iwork );
06769 lapack_int LAPACKE_dpbcon_work( int matrix_order, char uplo, lapack_int n,
06770                                 lapack_int kd, const double* ab,
06771                                 lapack_int ldab, double anorm, double* rcond,
06772                                 double* work, lapack_int* iwork );
06773 lapack_int LAPACKE_cpbcon_work( int matrix_order, char uplo, lapack_int n,
06774                                 lapack_int kd, const lapack_complex_float* ab,
06775                                 lapack_int ldab, float anorm, float* rcond,
06776                                 lapack_complex_float* work, float* rwork );
06777 lapack_int LAPACKE_zpbcon_work( int matrix_order, char uplo, lapack_int n,
06778                                 lapack_int kd, const lapack_complex_double* ab,
06779                                 lapack_int ldab, double anorm, double* rcond,
06780                                 lapack_complex_double* work, double* rwork );
06781 
06782 lapack_int LAPACKE_spbequ_work( int matrix_order, char uplo, lapack_int n,
06783                                 lapack_int kd, const float* ab, lapack_int ldab,
06784                                 float* s, float* scond, float* amax );
06785 lapack_int LAPACKE_dpbequ_work( int matrix_order, char uplo, lapack_int n,
06786                                 lapack_int kd, const double* ab,
06787                                 lapack_int ldab, double* s, double* scond,
06788                                 double* amax );
06789 lapack_int LAPACKE_cpbequ_work( int matrix_order, char uplo, lapack_int n,
06790                                 lapack_int kd, const lapack_complex_float* ab,
06791                                 lapack_int ldab, float* s, float* scond,
06792                                 float* amax );
06793 lapack_int LAPACKE_zpbequ_work( int matrix_order, char uplo, lapack_int n,
06794                                 lapack_int kd, const lapack_complex_double* ab,
06795                                 lapack_int ldab, double* s, double* scond,
06796                                 double* amax );
06797 
06798 lapack_int LAPACKE_spbrfs_work( int matrix_order, char uplo, lapack_int n,
06799                                 lapack_int kd, lapack_int nrhs, const float* ab,
06800                                 lapack_int ldab, const float* afb,
06801                                 lapack_int ldafb, const float* b,
06802                                 lapack_int ldb, float* x, lapack_int ldx,
06803                                 float* ferr, float* berr, float* work,
06804                                 lapack_int* iwork );
06805 lapack_int LAPACKE_dpbrfs_work( int matrix_order, char uplo, lapack_int n,
06806                                 lapack_int kd, lapack_int nrhs,
06807                                 const double* ab, lapack_int ldab,
06808                                 const double* afb, lapack_int ldafb,
06809                                 const double* b, lapack_int ldb, double* x,
06810                                 lapack_int ldx, double* ferr, double* berr,
06811                                 double* work, lapack_int* iwork );
06812 lapack_int LAPACKE_cpbrfs_work( int matrix_order, char uplo, lapack_int n,
06813                                 lapack_int kd, lapack_int nrhs,
06814                                 const lapack_complex_float* ab, lapack_int ldab,
06815                                 const lapack_complex_float* afb,
06816                                 lapack_int ldafb, const lapack_complex_float* b,
06817                                 lapack_int ldb, lapack_complex_float* x,
06818                                 lapack_int ldx, float* ferr, float* berr,
06819                                 lapack_complex_float* work, float* rwork );
06820 lapack_int LAPACKE_zpbrfs_work( int matrix_order, char uplo, lapack_int n,
06821                                 lapack_int kd, lapack_int nrhs,
06822                                 const lapack_complex_double* ab,
06823                                 lapack_int ldab,
06824                                 const lapack_complex_double* afb,
06825                                 lapack_int ldafb,
06826                                 const lapack_complex_double* b, lapack_int ldb,
06827                                 lapack_complex_double* x, lapack_int ldx,
06828                                 double* ferr, double* berr,
06829                                 lapack_complex_double* work, double* rwork );
06830 
06831 lapack_int LAPACKE_spbstf_work( int matrix_order, char uplo, lapack_int n,
06832                                 lapack_int kb, float* bb, lapack_int ldbb );
06833 lapack_int LAPACKE_dpbstf_work( int matrix_order, char uplo, lapack_int n,
06834                                 lapack_int kb, double* bb, lapack_int ldbb );
06835 lapack_int LAPACKE_cpbstf_work( int matrix_order, char uplo, lapack_int n,
06836                                 lapack_int kb, lapack_complex_float* bb,
06837                                 lapack_int ldbb );
06838 lapack_int LAPACKE_zpbstf_work( int matrix_order, char uplo, lapack_int n,
06839                                 lapack_int kb, lapack_complex_double* bb,
06840                                 lapack_int ldbb );
06841 
06842 lapack_int LAPACKE_spbsv_work( int matrix_order, char uplo, lapack_int n,
06843                                lapack_int kd, lapack_int nrhs, float* ab,
06844                                lapack_int ldab, float* b, lapack_int ldb );
06845 lapack_int LAPACKE_dpbsv_work( int matrix_order, char uplo, lapack_int n,
06846                                lapack_int kd, lapack_int nrhs, double* ab,
06847                                lapack_int ldab, double* b, lapack_int ldb );
06848 lapack_int LAPACKE_cpbsv_work( int matrix_order, char uplo, lapack_int n,
06849                                lapack_int kd, lapack_int nrhs,
06850                                lapack_complex_float* ab, lapack_int ldab,
06851                                lapack_complex_float* b, lapack_int ldb );
06852 lapack_int LAPACKE_zpbsv_work( int matrix_order, char uplo, lapack_int n,
06853                                lapack_int kd, lapack_int nrhs,
06854                                lapack_complex_double* ab, lapack_int ldab,
06855                                lapack_complex_double* b, lapack_int ldb );
06856 
06857 lapack_int LAPACKE_spbsvx_work( int matrix_order, char fact, char uplo,
06858                                 lapack_int n, lapack_int kd, lapack_int nrhs,
06859                                 float* ab, lapack_int ldab, float* afb,
06860                                 lapack_int ldafb, char* equed, float* s,
06861                                 float* b, lapack_int ldb, float* x,
06862                                 lapack_int ldx, float* rcond, float* ferr,
06863                                 float* berr, float* work, lapack_int* iwork );
06864 lapack_int LAPACKE_dpbsvx_work( int matrix_order, char fact, char uplo,
06865                                 lapack_int n, lapack_int kd, lapack_int nrhs,
06866                                 double* ab, lapack_int ldab, double* afb,
06867                                 lapack_int ldafb, char* equed, double* s,
06868                                 double* b, lapack_int ldb, double* x,
06869                                 lapack_int ldx, double* rcond, double* ferr,
06870                                 double* berr, double* work, lapack_int* iwork );
06871 lapack_int LAPACKE_cpbsvx_work( int matrix_order, char fact, char uplo,
06872                                 lapack_int n, lapack_int kd, lapack_int nrhs,
06873                                 lapack_complex_float* ab, lapack_int ldab,
06874                                 lapack_complex_float* afb, lapack_int ldafb,
06875                                 char* equed, float* s, lapack_complex_float* b,
06876                                 lapack_int ldb, lapack_complex_float* x,
06877                                 lapack_int ldx, float* rcond, float* ferr,
06878                                 float* berr, lapack_complex_float* work,
06879                                 float* rwork );
06880 lapack_int LAPACKE_zpbsvx_work( int matrix_order, char fact, char uplo,
06881                                 lapack_int n, lapack_int kd, lapack_int nrhs,
06882                                 lapack_complex_double* ab, lapack_int ldab,
06883                                 lapack_complex_double* afb, lapack_int ldafb,
06884                                 char* equed, double* s,
06885                                 lapack_complex_double* b, lapack_int ldb,
06886                                 lapack_complex_double* x, lapack_int ldx,
06887                                 double* rcond, double* ferr, double* berr,
06888                                 lapack_complex_double* work, double* rwork );
06889 
06890 lapack_int LAPACKE_spbtrf_work( int matrix_order, char uplo, lapack_int n,
06891                                 lapack_int kd, float* ab, lapack_int ldab );
06892 lapack_int LAPACKE_dpbtrf_work( int matrix_order, char uplo, lapack_int n,
06893                                 lapack_int kd, double* ab, lapack_int ldab );
06894 lapack_int LAPACKE_cpbtrf_work( int matrix_order, char uplo, lapack_int n,
06895                                 lapack_int kd, lapack_complex_float* ab,
06896                                 lapack_int ldab );
06897 lapack_int LAPACKE_zpbtrf_work( int matrix_order, char uplo, lapack_int n,
06898                                 lapack_int kd, lapack_complex_double* ab,
06899                                 lapack_int ldab );
06900 
06901 lapack_int LAPACKE_spbtrs_work( int matrix_order, char uplo, lapack_int n,
06902                                 lapack_int kd, lapack_int nrhs, const float* ab,
06903                                 lapack_int ldab, float* b, lapack_int ldb );
06904 lapack_int LAPACKE_dpbtrs_work( int matrix_order, char uplo, lapack_int n,
06905                                 lapack_int kd, lapack_int nrhs,
06906                                 const double* ab, lapack_int ldab, double* b,
06907                                 lapack_int ldb );
06908 lapack_int LAPACKE_cpbtrs_work( int matrix_order, char uplo, lapack_int n,
06909                                 lapack_int kd, lapack_int nrhs,
06910                                 const lapack_complex_float* ab, lapack_int ldab,
06911                                 lapack_complex_float* b, lapack_int ldb );
06912 lapack_int LAPACKE_zpbtrs_work( int matrix_order, char uplo, lapack_int n,
06913                                 lapack_int kd, lapack_int nrhs,
06914                                 const lapack_complex_double* ab,
06915                                 lapack_int ldab, lapack_complex_double* b,
06916                                 lapack_int ldb );
06917 
06918 lapack_int LAPACKE_spftrf_work( int matrix_order, char transr, char uplo,
06919                                 lapack_int n, float* a );
06920 lapack_int LAPACKE_dpftrf_work( int matrix_order, char transr, char uplo,
06921                                 lapack_int n, double* a );
06922 lapack_int LAPACKE_cpftrf_work( int matrix_order, char transr, char uplo,
06923                                 lapack_int n, lapack_complex_float* a );
06924 lapack_int LAPACKE_zpftrf_work( int matrix_order, char transr, char uplo,
06925                                 lapack_int n, lapack_complex_double* a );
06926 
06927 lapack_int LAPACKE_spftri_work( int matrix_order, char transr, char uplo,
06928                                 lapack_int n, float* a );
06929 lapack_int LAPACKE_dpftri_work( int matrix_order, char transr, char uplo,
06930                                 lapack_int n, double* a );
06931 lapack_int LAPACKE_cpftri_work( int matrix_order, char transr, char uplo,
06932                                 lapack_int n, lapack_complex_float* a );
06933 lapack_int LAPACKE_zpftri_work( int matrix_order, char transr, char uplo,
06934                                 lapack_int n, lapack_complex_double* a );
06935 
06936 lapack_int LAPACKE_spftrs_work( int matrix_order, char transr, char uplo,
06937                                 lapack_int n, lapack_int nrhs, const float* a,
06938                                 float* b, lapack_int ldb );
06939 lapack_int LAPACKE_dpftrs_work( int matrix_order, char transr, char uplo,
06940                                 lapack_int n, lapack_int nrhs, const double* a,
06941                                 double* b, lapack_int ldb );
06942 lapack_int LAPACKE_cpftrs_work( int matrix_order, char transr, char uplo,
06943                                 lapack_int n, lapack_int nrhs,
06944                                 const lapack_complex_float* a,
06945                                 lapack_complex_float* b, lapack_int ldb );
06946 lapack_int LAPACKE_zpftrs_work( int matrix_order, char transr, char uplo,
06947                                 lapack_int n, lapack_int nrhs,
06948                                 const lapack_complex_double* a,
06949                                 lapack_complex_double* b, lapack_int ldb );
06950 
06951 lapack_int LAPACKE_spocon_work( int matrix_order, char uplo, lapack_int n,
06952                                 const float* a, lapack_int lda, float anorm,
06953                                 float* rcond, float* work, lapack_int* iwork );
06954 lapack_int LAPACKE_dpocon_work( int matrix_order, char uplo, lapack_int n,
06955                                 const double* a, lapack_int lda, double anorm,
06956                                 double* rcond, double* work,
06957                                 lapack_int* iwork );
06958 lapack_int LAPACKE_cpocon_work( int matrix_order, char uplo, lapack_int n,
06959                                 const lapack_complex_float* a, lapack_int lda,
06960                                 float anorm, float* rcond,
06961                                 lapack_complex_float* work, float* rwork );
06962 lapack_int LAPACKE_zpocon_work( int matrix_order, char uplo, lapack_int n,
06963                                 const lapack_complex_double* a, lapack_int lda,
06964                                 double anorm, double* rcond,
06965                                 lapack_complex_double* work, double* rwork );
06966 
06967 lapack_int LAPACKE_spoequ_work( int matrix_order, lapack_int n, const float* a,
06968                                 lapack_int lda, float* s, float* scond,
06969                                 float* amax );
06970 lapack_int LAPACKE_dpoequ_work( int matrix_order, lapack_int n, const double* a,
06971                                 lapack_int lda, double* s, double* scond,
06972                                 double* amax );
06973 lapack_int LAPACKE_cpoequ_work( int matrix_order, lapack_int n,
06974                                 const lapack_complex_float* a, lapack_int lda,
06975                                 float* s, float* scond, float* amax );
06976 lapack_int LAPACKE_zpoequ_work( int matrix_order, lapack_int n,
06977                                 const lapack_complex_double* a, lapack_int lda,
06978                                 double* s, double* scond, double* amax );
06979 
06980 lapack_int LAPACKE_spoequb_work( int matrix_order, lapack_int n, const float* a,
06981                                  lapack_int lda, float* s, float* scond,
06982                                  float* amax );
06983 lapack_int LAPACKE_dpoequb_work( int matrix_order, lapack_int n,
06984                                  const double* a, lapack_int lda, double* s,
06985                                  double* scond, double* amax );
06986 lapack_int LAPACKE_cpoequb_work( int matrix_order, lapack_int n,
06987                                  const lapack_complex_float* a, lapack_int lda,
06988                                  float* s, float* scond, float* amax );
06989 lapack_int LAPACKE_zpoequb_work( int matrix_order, lapack_int n,
06990                                  const lapack_complex_double* a, lapack_int lda,
06991                                  double* s, double* scond, double* amax );
06992 
06993 lapack_int LAPACKE_sporfs_work( int matrix_order, char uplo, lapack_int n,
06994                                 lapack_int nrhs, const float* a, lapack_int lda,
06995                                 const float* af, lapack_int ldaf,
06996                                 const float* b, lapack_int ldb, float* x,
06997                                 lapack_int ldx, float* ferr, float* berr,
06998                                 float* work, lapack_int* iwork );
06999 lapack_int LAPACKE_dporfs_work( int matrix_order, char uplo, lapack_int n,
07000                                 lapack_int nrhs, const double* a,
07001                                 lapack_int lda, const double* af,
07002                                 lapack_int ldaf, const double* b,
07003                                 lapack_int ldb, double* x, lapack_int ldx,
07004                                 double* ferr, double* berr, double* work,
07005                                 lapack_int* iwork );
07006 lapack_int LAPACKE_cporfs_work( int matrix_order, char uplo, lapack_int n,
07007                                 lapack_int nrhs, const lapack_complex_float* a,
07008                                 lapack_int lda, const lapack_complex_float* af,
07009                                 lapack_int ldaf, const lapack_complex_float* b,
07010                                 lapack_int ldb, lapack_complex_float* x,
07011                                 lapack_int ldx, float* ferr, float* berr,
07012                                 lapack_complex_float* work, float* rwork );
07013 lapack_int LAPACKE_zporfs_work( int matrix_order, char uplo, lapack_int n,
07014                                 lapack_int nrhs, const lapack_complex_double* a,
07015                                 lapack_int lda, const lapack_complex_double* af,
07016                                 lapack_int ldaf, const lapack_complex_double* b,
07017                                 lapack_int ldb, lapack_complex_double* x,
07018                                 lapack_int ldx, double* ferr, double* berr,
07019                                 lapack_complex_double* work, double* rwork );
07020 
07021 lapack_int LAPACKE_sporfsx_work( int matrix_order, char uplo, char equed,
07022                                  lapack_int n, lapack_int nrhs, const float* a,
07023                                  lapack_int lda, const float* af,
07024                                  lapack_int ldaf, const float* s,
07025                                  const float* b, lapack_int ldb, float* x,
07026                                  lapack_int ldx, float* rcond, float* berr,
07027                                  lapack_int n_err_bnds, float* err_bnds_norm,
07028                                  float* err_bnds_comp, lapack_int nparams,
07029                                  float* params, float* work,
07030                                  lapack_int* iwork );
07031 lapack_int LAPACKE_dporfsx_work( int matrix_order, char uplo, char equed,
07032                                  lapack_int n, lapack_int nrhs, const double* a,
07033                                  lapack_int lda, const double* af,
07034                                  lapack_int ldaf, const double* s,
07035                                  const double* b, lapack_int ldb, double* x,
07036                                  lapack_int ldx, double* rcond, double* berr,
07037                                  lapack_int n_err_bnds, double* err_bnds_norm,
07038                                  double* err_bnds_comp, lapack_int nparams,
07039                                  double* params, double* work,
07040                                  lapack_int* iwork );
07041 lapack_int LAPACKE_cporfsx_work( int matrix_order, char uplo, char equed,
07042                                  lapack_int n, lapack_int nrhs,
07043                                  const lapack_complex_float* a, lapack_int lda,
07044                                  const lapack_complex_float* af,
07045                                  lapack_int ldaf, const float* s,
07046                                  const lapack_complex_float* b, lapack_int ldb,
07047                                  lapack_complex_float* x, lapack_int ldx,
07048                                  float* rcond, float* berr,
07049                                  lapack_int n_err_bnds, float* err_bnds_norm,
07050                                  float* err_bnds_comp, lapack_int nparams,
07051                                  float* params, lapack_complex_float* work,
07052                                  float* rwork );
07053 lapack_int LAPACKE_zporfsx_work( int matrix_order, char uplo, char equed,
07054                                  lapack_int n, lapack_int nrhs,
07055                                  const lapack_complex_double* a, lapack_int lda,
07056                                  const lapack_complex_double* af,
07057                                  lapack_int ldaf, const double* s,
07058                                  const lapack_complex_double* b, lapack_int ldb,
07059                                  lapack_complex_double* x, lapack_int ldx,
07060                                  double* rcond, double* berr,
07061                                  lapack_int n_err_bnds, double* err_bnds_norm,
07062                                  double* err_bnds_comp, lapack_int nparams,
07063                                  double* params, lapack_complex_double* work,
07064                                  double* rwork );
07065 
07066 lapack_int LAPACKE_sposv_work( int matrix_order, char uplo, lapack_int n,
07067                                lapack_int nrhs, float* a, lapack_int lda,
07068                                float* b, lapack_int ldb );
07069 lapack_int LAPACKE_dposv_work( int matrix_order, char uplo, lapack_int n,
07070                                lapack_int nrhs, double* a, lapack_int lda,
07071                                double* b, lapack_int ldb );
07072 lapack_int LAPACKE_cposv_work( int matrix_order, char uplo, lapack_int n,
07073                                lapack_int nrhs, lapack_complex_float* a,
07074                                lapack_int lda, lapack_complex_float* b,
07075                                lapack_int ldb );
07076 lapack_int LAPACKE_zposv_work( int matrix_order, char uplo, lapack_int n,
07077                                lapack_int nrhs, lapack_complex_double* a,
07078                                lapack_int lda, lapack_complex_double* b,
07079                                lapack_int ldb );
07080 lapack_int LAPACKE_dsposv_work( int matrix_order, char uplo, lapack_int n,
07081                                 lapack_int nrhs, double* a, lapack_int lda,
07082                                 double* b, lapack_int ldb, double* x,
07083                                 lapack_int ldx, double* work, float* swork,
07084                                 lapack_int* iter );
07085 lapack_int LAPACKE_zcposv_work( int matrix_order, char uplo, lapack_int n,
07086                                 lapack_int nrhs, lapack_complex_double* a,
07087                                 lapack_int lda, lapack_complex_double* b,
07088                                 lapack_int ldb, lapack_complex_double* x,
07089                                 lapack_int ldx, lapack_complex_double* work,
07090                                 lapack_complex_float* swork, double* rwork,
07091                                 lapack_int* iter );
07092 
07093 lapack_int LAPACKE_sposvx_work( int matrix_order, char fact, char uplo,
07094                                 lapack_int n, lapack_int nrhs, float* a,
07095                                 lapack_int lda, float* af, lapack_int ldaf,
07096                                 char* equed, float* s, float* b, lapack_int ldb,
07097                                 float* x, lapack_int ldx, float* rcond,
07098                                 float* ferr, float* berr, float* work,
07099                                 lapack_int* iwork );
07100 lapack_int LAPACKE_dposvx_work( int matrix_order, char fact, char uplo,
07101                                 lapack_int n, lapack_int nrhs, double* a,
07102                                 lapack_int lda, double* af, lapack_int ldaf,
07103                                 char* equed, double* s, double* b,
07104                                 lapack_int ldb, double* x, lapack_int ldx,
07105                                 double* rcond, double* ferr, double* berr,
07106                                 double* work, lapack_int* iwork );
07107 lapack_int LAPACKE_cposvx_work( int matrix_order, char fact, char uplo,
07108                                 lapack_int n, lapack_int nrhs,
07109                                 lapack_complex_float* a, lapack_int lda,
07110                                 lapack_complex_float* af, lapack_int ldaf,
07111                                 char* equed, float* s, lapack_complex_float* b,
07112                                 lapack_int ldb, lapack_complex_float* x,
07113                                 lapack_int ldx, float* rcond, float* ferr,
07114                                 float* berr, lapack_complex_float* work,
07115                                 float* rwork );
07116 lapack_int LAPACKE_zposvx_work( int matrix_order, char fact, char uplo,
07117                                 lapack_int n, lapack_int nrhs,
07118                                 lapack_complex_double* a, lapack_int lda,
07119                                 lapack_complex_double* af, lapack_int ldaf,
07120                                 char* equed, double* s,
07121                                 lapack_complex_double* b, lapack_int ldb,
07122                                 lapack_complex_double* x, lapack_int ldx,
07123                                 double* rcond, double* ferr, double* berr,
07124                                 lapack_complex_double* work, double* rwork );
07125 
07126 lapack_int LAPACKE_sposvxx_work( int matrix_order, char fact, char uplo,
07127                                  lapack_int n, lapack_int nrhs, float* a,
07128                                  lapack_int lda, float* af, lapack_int ldaf,
07129                                  char* equed, float* s, float* b,
07130                                  lapack_int ldb, float* x, lapack_int ldx,
07131                                  float* rcond, float* rpvgrw, float* berr,
07132                                  lapack_int n_err_bnds, float* err_bnds_norm,
07133                                  float* err_bnds_comp, lapack_int nparams,
07134                                  float* params, float* work,
07135                                  lapack_int* iwork );
07136 lapack_int LAPACKE_dposvxx_work( int matrix_order, char fact, char uplo,
07137                                  lapack_int n, lapack_int nrhs, double* a,
07138                                  lapack_int lda, double* af, lapack_int ldaf,
07139                                  char* equed, double* s, double* b,
07140                                  lapack_int ldb, double* x, lapack_int ldx,
07141                                  double* rcond, double* rpvgrw, double* berr,
07142                                  lapack_int n_err_bnds, double* err_bnds_norm,
07143                                  double* err_bnds_comp, lapack_int nparams,
07144                                  double* params, double* work,
07145                                  lapack_int* iwork );
07146 lapack_int LAPACKE_cposvxx_work( int matrix_order, char fact, char uplo,
07147                                  lapack_int n, lapack_int nrhs,
07148                                  lapack_complex_float* a, lapack_int lda,
07149                                  lapack_complex_float* af, lapack_int ldaf,
07150                                  char* equed, float* s, lapack_complex_float* b,
07151                                  lapack_int ldb, lapack_complex_float* x,
07152                                  lapack_int ldx, float* rcond, float* rpvgrw,
07153                                  float* berr, lapack_int n_err_bnds,
07154                                  float* err_bnds_norm, float* err_bnds_comp,
07155                                  lapack_int nparams, float* params,
07156                                  lapack_complex_float* work, float* rwork );
07157 lapack_int LAPACKE_zposvxx_work( int matrix_order, char fact, char uplo,
07158                                  lapack_int n, lapack_int nrhs,
07159                                  lapack_complex_double* a, lapack_int lda,
07160                                  lapack_complex_double* af, lapack_int ldaf,
07161                                  char* equed, double* s,
07162                                  lapack_complex_double* b, lapack_int ldb,
07163                                  lapack_complex_double* x, lapack_int ldx,
07164                                  double* rcond, double* rpvgrw, double* berr,
07165                                  lapack_int n_err_bnds, double* err_bnds_norm,
07166                                  double* err_bnds_comp, lapack_int nparams,
07167                                  double* params, lapack_complex_double* work,
07168                                  double* rwork );
07169 
07170 lapack_int LAPACKE_spotrf_work( int matrix_order, char uplo, lapack_int n,
07171                                 float* a, lapack_int lda );
07172 lapack_int LAPACKE_dpotrf_work( int matrix_order, char uplo, lapack_int n,
07173                                 double* a, lapack_int lda );
07174 lapack_int LAPACKE_cpotrf_work( int matrix_order, char uplo, lapack_int n,
07175                                 lapack_complex_float* a, lapack_int lda );
07176 lapack_int LAPACKE_zpotrf_work( int matrix_order, char uplo, lapack_int n,
07177                                 lapack_complex_double* a, lapack_int lda );
07178 
07179 lapack_int LAPACKE_spotri_work( int matrix_order, char uplo, lapack_int n,
07180                                 float* a, lapack_int lda );
07181 lapack_int LAPACKE_dpotri_work( int matrix_order, char uplo, lapack_int n,
07182                                 double* a, lapack_int lda );
07183 lapack_int LAPACKE_cpotri_work( int matrix_order, char uplo, lapack_int n,
07184                                 lapack_complex_float* a, lapack_int lda );
07185 lapack_int LAPACKE_zpotri_work( int matrix_order, char uplo, lapack_int n,
07186                                 lapack_complex_double* a, lapack_int lda );
07187 
07188 lapack_int LAPACKE_spotrs_work( int matrix_order, char uplo, lapack_int n,
07189                                 lapack_int nrhs, const float* a, lapack_int lda,
07190                                 float* b, lapack_int ldb );
07191 lapack_int LAPACKE_dpotrs_work( int matrix_order, char uplo, lapack_int n,
07192                                 lapack_int nrhs, const double* a,
07193                                 lapack_int lda, double* b, lapack_int ldb );
07194 lapack_int LAPACKE_cpotrs_work( int matrix_order, char uplo, lapack_int n,
07195                                 lapack_int nrhs, const lapack_complex_float* a,
07196                                 lapack_int lda, lapack_complex_float* b,
07197                                 lapack_int ldb );
07198 lapack_int LAPACKE_zpotrs_work( int matrix_order, char uplo, lapack_int n,
07199                                 lapack_int nrhs, const lapack_complex_double* a,
07200                                 lapack_int lda, lapack_complex_double* b,
07201                                 lapack_int ldb );
07202 
07203 lapack_int LAPACKE_sppcon_work( int matrix_order, char uplo, lapack_int n,
07204                                 const float* ap, float anorm, float* rcond,
07205                                 float* work, lapack_int* iwork );
07206 lapack_int LAPACKE_dppcon_work( int matrix_order, char uplo, lapack_int n,
07207                                 const double* ap, double anorm, double* rcond,
07208                                 double* work, lapack_int* iwork );
07209 lapack_int LAPACKE_cppcon_work( int matrix_order, char uplo, lapack_int n,
07210                                 const lapack_complex_float* ap, float anorm,
07211                                 float* rcond, lapack_complex_float* work,
07212                                 float* rwork );
07213 lapack_int LAPACKE_zppcon_work( int matrix_order, char uplo, lapack_int n,
07214                                 const lapack_complex_double* ap, double anorm,
07215                                 double* rcond, lapack_complex_double* work,
07216                                 double* rwork );
07217 
07218 lapack_int LAPACKE_sppequ_work( int matrix_order, char uplo, lapack_int n,
07219                                 const float* ap, float* s, float* scond,
07220                                 float* amax );
07221 lapack_int LAPACKE_dppequ_work( int matrix_order, char uplo, lapack_int n,
07222                                 const double* ap, double* s, double* scond,
07223                                 double* amax );
07224 lapack_int LAPACKE_cppequ_work( int matrix_order, char uplo, lapack_int n,
07225                                 const lapack_complex_float* ap, float* s,
07226                                 float* scond, float* amax );
07227 lapack_int LAPACKE_zppequ_work( int matrix_order, char uplo, lapack_int n,
07228                                 const lapack_complex_double* ap, double* s,
07229                                 double* scond, double* amax );
07230 
07231 lapack_int LAPACKE_spprfs_work( int matrix_order, char uplo, lapack_int n,
07232                                 lapack_int nrhs, const float* ap,
07233                                 const float* afp, const float* b,
07234                                 lapack_int ldb, float* x, lapack_int ldx,
07235                                 float* ferr, float* berr, float* work,
07236                                 lapack_int* iwork );
07237 lapack_int LAPACKE_dpprfs_work( int matrix_order, char uplo, lapack_int n,
07238                                 lapack_int nrhs, const double* ap,
07239                                 const double* afp, const double* b,
07240                                 lapack_int ldb, double* x, lapack_int ldx,
07241                                 double* ferr, double* berr, double* work,
07242                                 lapack_int* iwork );
07243 lapack_int LAPACKE_cpprfs_work( int matrix_order, char uplo, lapack_int n,
07244                                 lapack_int nrhs, const lapack_complex_float* ap,
07245                                 const lapack_complex_float* afp,
07246                                 const lapack_complex_float* b, lapack_int ldb,
07247                                 lapack_complex_float* x, lapack_int ldx,
07248                                 float* ferr, float* berr,
07249                                 lapack_complex_float* work, float* rwork );
07250 lapack_int LAPACKE_zpprfs_work( int matrix_order, char uplo, lapack_int n,
07251                                 lapack_int nrhs,
07252                                 const lapack_complex_double* ap,
07253                                 const lapack_complex_double* afp,
07254                                 const lapack_complex_double* b, lapack_int ldb,
07255                                 lapack_complex_double* x, lapack_int ldx,
07256                                 double* ferr, double* berr,
07257                                 lapack_complex_double* work, double* rwork );
07258 
07259 lapack_int LAPACKE_sppsv_work( int matrix_order, char uplo, lapack_int n,
07260                                lapack_int nrhs, float* ap, float* b,
07261                                lapack_int ldb );
07262 lapack_int LAPACKE_dppsv_work( int matrix_order, char uplo, lapack_int n,
07263                                lapack_int nrhs, double* ap, double* b,
07264                                lapack_int ldb );
07265 lapack_int LAPACKE_cppsv_work( int matrix_order, char uplo, lapack_int n,
07266                                lapack_int nrhs, lapack_complex_float* ap,
07267                                lapack_complex_float* b, lapack_int ldb );
07268 lapack_int LAPACKE_zppsv_work( int matrix_order, char uplo, lapack_int n,
07269                                lapack_int nrhs, lapack_complex_double* ap,
07270                                lapack_complex_double* b, lapack_int ldb );
07271 
07272 lapack_int LAPACKE_sppsvx_work( int matrix_order, char fact, char uplo,
07273                                 lapack_int n, lapack_int nrhs, float* ap,
07274                                 float* afp, char* equed, float* s, float* b,
07275                                 lapack_int ldb, float* x, lapack_int ldx,
07276                                 float* rcond, float* ferr, float* berr,
07277                                 float* work, lapack_int* iwork );
07278 lapack_int LAPACKE_dppsvx_work( int matrix_order, char fact, char uplo,
07279                                 lapack_int n, lapack_int nrhs, double* ap,
07280                                 double* afp, char* equed, double* s, double* b,
07281                                 lapack_int ldb, double* x, lapack_int ldx,
07282                                 double* rcond, double* ferr, double* berr,
07283                                 double* work, lapack_int* iwork );
07284 lapack_int LAPACKE_cppsvx_work( int matrix_order, char fact, char uplo,
07285                                 lapack_int n, lapack_int nrhs,
07286                                 lapack_complex_float* ap,
07287                                 lapack_complex_float* afp, char* equed,
07288                                 float* s, lapack_complex_float* b,
07289                                 lapack_int ldb, lapack_complex_float* x,
07290                                 lapack_int ldx, float* rcond, float* ferr,
07291                                 float* berr, lapack_complex_float* work,
07292                                 float* rwork );
07293 lapack_int LAPACKE_zppsvx_work( int matrix_order, char fact, char uplo,
07294                                 lapack_int n, lapack_int nrhs,
07295                                 lapack_complex_double* ap,
07296                                 lapack_complex_double* afp, char* equed,
07297                                 double* s, lapack_complex_double* b,
07298                                 lapack_int ldb, lapack_complex_double* x,
07299                                 lapack_int ldx, double* rcond, double* ferr,
07300                                 double* berr, lapack_complex_double* work,
07301                                 double* rwork );
07302 
07303 lapack_int LAPACKE_spptrf_work( int matrix_order, char uplo, lapack_int n,
07304                                 float* ap );
07305 lapack_int LAPACKE_dpptrf_work( int matrix_order, char uplo, lapack_int n,
07306                                 double* ap );
07307 lapack_int LAPACKE_cpptrf_work( int matrix_order, char uplo, lapack_int n,
07308                                 lapack_complex_float* ap );
07309 lapack_int LAPACKE_zpptrf_work( int matrix_order, char uplo, lapack_int n,
07310                                 lapack_complex_double* ap );
07311 
07312 lapack_int LAPACKE_spptri_work( int matrix_order, char uplo, lapack_int n,
07313                                 float* ap );
07314 lapack_int LAPACKE_dpptri_work( int matrix_order, char uplo, lapack_int n,
07315                                 double* ap );
07316 lapack_int LAPACKE_cpptri_work( int matrix_order, char uplo, lapack_int n,
07317                                 lapack_complex_float* ap );
07318 lapack_int LAPACKE_zpptri_work( int matrix_order, char uplo, lapack_int n,
07319                                 lapack_complex_double* ap );
07320 
07321 lapack_int LAPACKE_spptrs_work( int matrix_order, char uplo, lapack_int n,
07322                                 lapack_int nrhs, const float* ap, float* b,
07323                                 lapack_int ldb );
07324 lapack_int LAPACKE_dpptrs_work( int matrix_order, char uplo, lapack_int n,
07325                                 lapack_int nrhs, const double* ap, double* b,
07326                                 lapack_int ldb );
07327 lapack_int LAPACKE_cpptrs_work( int matrix_order, char uplo, lapack_int n,
07328                                 lapack_int nrhs, const lapack_complex_float* ap,
07329                                 lapack_complex_float* b, lapack_int ldb );
07330 lapack_int LAPACKE_zpptrs_work( int matrix_order, char uplo, lapack_int n,
07331                                 lapack_int nrhs,
07332                                 const lapack_complex_double* ap,
07333                                 lapack_complex_double* b, lapack_int ldb );
07334 
07335 lapack_int LAPACKE_spstrf_work( int matrix_order, char uplo, lapack_int n,
07336                                 float* a, lapack_int lda, lapack_int* piv,
07337                                 lapack_int* rank, float tol, float* work );
07338 lapack_int LAPACKE_dpstrf_work( int matrix_order, char uplo, lapack_int n,
07339                                 double* a, lapack_int lda, lapack_int* piv,
07340                                 lapack_int* rank, double tol, double* work );
07341 lapack_int LAPACKE_cpstrf_work( int matrix_order, char uplo, lapack_int n,
07342                                 lapack_complex_float* a, lapack_int lda,
07343                                 lapack_int* piv, lapack_int* rank, float tol,
07344                                 float* work );
07345 lapack_int LAPACKE_zpstrf_work( int matrix_order, char uplo, lapack_int n,
07346                                 lapack_complex_double* a, lapack_int lda,
07347                                 lapack_int* piv, lapack_int* rank, double tol,
07348                                 double* work );
07349 
07350 lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
07351                                 float anorm, float* rcond, float* work );
07352 lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
07353                                 double anorm, double* rcond, double* work );
07354 lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
07355                                 const lapack_complex_float* e, float anorm,
07356                                 float* rcond, float* work );
07357 lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
07358                                 const lapack_complex_double* e, double anorm,
07359                                 double* rcond, double* work );
07360 
07361 lapack_int LAPACKE_spteqr_work( int matrix_order, char compz, lapack_int n,
07362                                 float* d, float* e, float* z, lapack_int ldz,
07363                                 float* work );
07364 lapack_int LAPACKE_dpteqr_work( int matrix_order, char compz, lapack_int n,
07365                                 double* d, double* e, double* z, lapack_int ldz,
07366                                 double* work );
07367 lapack_int LAPACKE_cpteqr_work( int matrix_order, char compz, lapack_int n,
07368                                 float* d, float* e, lapack_complex_float* z,
07369                                 lapack_int ldz, float* work );
07370 lapack_int LAPACKE_zpteqr_work( int matrix_order, char compz, lapack_int n,
07371                                 double* d, double* e, lapack_complex_double* z,
07372                                 lapack_int ldz, double* work );
07373 
07374 lapack_int LAPACKE_sptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07375                                 const float* d, const float* e, const float* df,
07376                                 const float* ef, const float* b, lapack_int ldb,
07377                                 float* x, lapack_int ldx, float* ferr,
07378                                 float* berr, float* work );
07379 lapack_int LAPACKE_dptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07380                                 const double* d, const double* e,
07381                                 const double* df, const double* ef,
07382                                 const double* b, lapack_int ldb, double* x,
07383                                 lapack_int ldx, double* ferr, double* berr,
07384                                 double* work );
07385 lapack_int LAPACKE_cptrfs_work( int matrix_order, char uplo, lapack_int n,
07386                                 lapack_int nrhs, const float* d,
07387                                 const lapack_complex_float* e, const float* df,
07388                                 const lapack_complex_float* ef,
07389                                 const lapack_complex_float* b, lapack_int ldb,
07390                                 lapack_complex_float* x, lapack_int ldx,
07391                                 float* ferr, float* berr,
07392                                 lapack_complex_float* work, float* rwork );
07393 lapack_int LAPACKE_zptrfs_work( int matrix_order, char uplo, lapack_int n,
07394                                 lapack_int nrhs, const double* d,
07395                                 const lapack_complex_double* e,
07396                                 const double* df,
07397                                 const lapack_complex_double* ef,
07398                                 const lapack_complex_double* b, lapack_int ldb,
07399                                 lapack_complex_double* x, lapack_int ldx,
07400                                 double* ferr, double* berr,
07401                                 lapack_complex_double* work, double* rwork );
07402 
07403 lapack_int LAPACKE_sptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
07404                                float* d, float* e, float* b, lapack_int ldb );
07405 lapack_int LAPACKE_dptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
07406                                double* d, double* e, double* b,
07407                                lapack_int ldb );
07408 lapack_int LAPACKE_cptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
07409                                float* d, lapack_complex_float* e,
07410                                lapack_complex_float* b, lapack_int ldb );
07411 lapack_int LAPACKE_zptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
07412                                double* d, lapack_complex_double* e,
07413                                lapack_complex_double* b, lapack_int ldb );
07414 
07415 lapack_int LAPACKE_sptsvx_work( int matrix_order, char fact, lapack_int n,
07416                                 lapack_int nrhs, const float* d, const float* e,
07417                                 float* df, float* ef, const float* b,
07418                                 lapack_int ldb, float* x, lapack_int ldx,
07419                                 float* rcond, float* ferr, float* berr,
07420                                 float* work );
07421 lapack_int LAPACKE_dptsvx_work( int matrix_order, char fact, lapack_int n,
07422                                 lapack_int nrhs, const double* d,
07423                                 const double* e, double* df, double* ef,
07424                                 const double* b, lapack_int ldb, double* x,
07425                                 lapack_int ldx, double* rcond, double* ferr,
07426                                 double* berr, double* work );
07427 lapack_int LAPACKE_cptsvx_work( int matrix_order, char fact, lapack_int n,
07428                                 lapack_int nrhs, const float* d,
07429                                 const lapack_complex_float* e, float* df,
07430                                 lapack_complex_float* ef,
07431                                 const lapack_complex_float* b, lapack_int ldb,
07432                                 lapack_complex_float* x, lapack_int ldx,
07433                                 float* rcond, float* ferr, float* berr,
07434                                 lapack_complex_float* work, float* rwork );
07435 lapack_int LAPACKE_zptsvx_work( int matrix_order, char fact, lapack_int n,
07436                                 lapack_int nrhs, const double* d,
07437                                 const lapack_complex_double* e, double* df,
07438                                 lapack_complex_double* ef,
07439                                 const lapack_complex_double* b, lapack_int ldb,
07440                                 lapack_complex_double* x, lapack_int ldx,
07441                                 double* rcond, double* ferr, double* berr,
07442                                 lapack_complex_double* work, double* rwork );
07443 
07444 lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
07445 lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
07446 lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
07447                                 lapack_complex_float* e );
07448 lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
07449                                 lapack_complex_double* e );
07450 
07451 lapack_int LAPACKE_spttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07452                                 const float* d, const float* e, float* b,
07453                                 lapack_int ldb );
07454 lapack_int LAPACKE_dpttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07455                                 const double* d, const double* e, double* b,
07456                                 lapack_int ldb );
07457 lapack_int LAPACKE_cpttrs_work( int matrix_order, char uplo, lapack_int n,
07458                                 lapack_int nrhs, const float* d,
07459                                 const lapack_complex_float* e,
07460                                 lapack_complex_float* b, lapack_int ldb );
07461 lapack_int LAPACKE_zpttrs_work( int matrix_order, char uplo, lapack_int n,
07462                                 lapack_int nrhs, const double* d,
07463                                 const lapack_complex_double* e,
07464                                 lapack_complex_double* b, lapack_int ldb );
07465 
07466 lapack_int LAPACKE_ssbev_work( int matrix_order, char jobz, char uplo,
07467                                lapack_int n, lapack_int kd, float* ab,
07468                                lapack_int ldab, float* w, float* z,
07469                                lapack_int ldz, float* work );
07470 lapack_int LAPACKE_dsbev_work( int matrix_order, char jobz, char uplo,
07471                                lapack_int n, lapack_int kd, double* ab,
07472                                lapack_int ldab, double* w, double* z,
07473                                lapack_int ldz, double* work );
07474 
07475 lapack_int LAPACKE_ssbevd_work( int matrix_order, char jobz, char uplo,
07476                                 lapack_int n, lapack_int kd, float* ab,
07477                                 lapack_int ldab, float* w, float* z,
07478                                 lapack_int ldz, float* work, lapack_int lwork,
07479                                 lapack_int* iwork, lapack_int liwork );
07480 lapack_int LAPACKE_dsbevd_work( int matrix_order, char jobz, char uplo,
07481                                 lapack_int n, lapack_int kd, double* ab,
07482                                 lapack_int ldab, double* w, double* z,
07483                                 lapack_int ldz, double* work, lapack_int lwork,
07484                                 lapack_int* iwork, lapack_int liwork );
07485 
07486 lapack_int LAPACKE_ssbevx_work( int matrix_order, char jobz, char range,
07487                                 char uplo, lapack_int n, lapack_int kd,
07488                                 float* ab, lapack_int ldab, float* q,
07489                                 lapack_int ldq, float vl, float vu,
07490                                 lapack_int il, lapack_int iu, float abstol,
07491                                 lapack_int* m, float* w, float* z,
07492                                 lapack_int ldz, float* work, lapack_int* iwork,
07493                                 lapack_int* ifail );
07494 lapack_int LAPACKE_dsbevx_work( int matrix_order, char jobz, char range,
07495                                 char uplo, lapack_int n, lapack_int kd,
07496                                 double* ab, lapack_int ldab, double* q,
07497                                 lapack_int ldq, double vl, double vu,
07498                                 lapack_int il, lapack_int iu, double abstol,
07499                                 lapack_int* m, double* w, double* z,
07500                                 lapack_int ldz, double* work, lapack_int* iwork,
07501                                 lapack_int* ifail );
07502 
07503 lapack_int LAPACKE_ssbgst_work( int matrix_order, char vect, char uplo,
07504                                 lapack_int n, lapack_int ka, lapack_int kb,
07505                                 float* ab, lapack_int ldab, const float* bb,
07506                                 lapack_int ldbb, float* x, lapack_int ldx,
07507                                 float* work );
07508 lapack_int LAPACKE_dsbgst_work( int matrix_order, char vect, char uplo,
07509                                 lapack_int n, lapack_int ka, lapack_int kb,
07510                                 double* ab, lapack_int ldab, const double* bb,
07511                                 lapack_int ldbb, double* x, lapack_int ldx,
07512                                 double* work );
07513 
07514 lapack_int LAPACKE_ssbgv_work( int matrix_order, char jobz, char uplo,
07515                                lapack_int n, lapack_int ka, lapack_int kb,
07516                                float* ab, lapack_int ldab, float* bb,
07517                                lapack_int ldbb, float* w, float* z,
07518                                lapack_int ldz, float* work );
07519 lapack_int LAPACKE_dsbgv_work( int matrix_order, char jobz, char uplo,
07520                                lapack_int n, lapack_int ka, lapack_int kb,
07521                                double* ab, lapack_int ldab, double* bb,
07522                                lapack_int ldbb, double* w, double* z,
07523                                lapack_int ldz, double* work );
07524 
07525 lapack_int LAPACKE_ssbgvd_work( int matrix_order, char jobz, char uplo,
07526                                 lapack_int n, lapack_int ka, lapack_int kb,
07527                                 float* ab, lapack_int ldab, float* bb,
07528                                 lapack_int ldbb, float* w, float* z,
07529                                 lapack_int ldz, float* work, lapack_int lwork,
07530                                 lapack_int* iwork, lapack_int liwork );
07531 lapack_int LAPACKE_dsbgvd_work( int matrix_order, char jobz, char uplo,
07532                                 lapack_int n, lapack_int ka, lapack_int kb,
07533                                 double* ab, lapack_int ldab, double* bb,
07534                                 lapack_int ldbb, double* w, double* z,
07535                                 lapack_int ldz, double* work, lapack_int lwork,
07536                                 lapack_int* iwork, lapack_int liwork );
07537 
07538 lapack_int LAPACKE_ssbgvx_work( int matrix_order, char jobz, char range,
07539                                 char uplo, lapack_int n, lapack_int ka,
07540                                 lapack_int kb, float* ab, lapack_int ldab,
07541                                 float* bb, lapack_int ldbb, float* q,
07542                                 lapack_int ldq, float vl, float vu,
07543                                 lapack_int il, lapack_int iu, float abstol,
07544                                 lapack_int* m, float* w, float* z,
07545                                 lapack_int ldz, float* work, lapack_int* iwork,
07546                                 lapack_int* ifail );
07547 lapack_int LAPACKE_dsbgvx_work( int matrix_order, char jobz, char range,
07548                                 char uplo, lapack_int n, lapack_int ka,
07549                                 lapack_int kb, double* ab, lapack_int ldab,
07550                                 double* bb, lapack_int ldbb, double* q,
07551                                 lapack_int ldq, double vl, double vu,
07552                                 lapack_int il, lapack_int iu, double abstol,
07553                                 lapack_int* m, double* w, double* z,
07554                                 lapack_int ldz, double* work, lapack_int* iwork,
07555                                 lapack_int* ifail );
07556 
07557 lapack_int LAPACKE_ssbtrd_work( int matrix_order, char vect, char uplo,
07558                                 lapack_int n, lapack_int kd, float* ab,
07559                                 lapack_int ldab, float* d, float* e, float* q,
07560                                 lapack_int ldq, float* work );
07561 lapack_int LAPACKE_dsbtrd_work( int matrix_order, char vect, char uplo,
07562                                 lapack_int n, lapack_int kd, double* ab,
07563                                 lapack_int ldab, double* d, double* e,
07564                                 double* q, lapack_int ldq, double* work );
07565 
07566 lapack_int LAPACKE_ssfrk_work( int matrix_order, char transr, char uplo,
07567                                char trans, lapack_int n, lapack_int k,
07568                                float alpha, const float* a, lapack_int lda,
07569                                float beta, float* c );
07570 lapack_int LAPACKE_dsfrk_work( int matrix_order, char transr, char uplo,
07571                                char trans, lapack_int n, lapack_int k,
07572                                double alpha, const double* a, lapack_int lda,
07573                                double beta, double* c );
07574 
07575 lapack_int LAPACKE_sspcon_work( int matrix_order, char uplo, lapack_int n,
07576                                 const float* ap, const lapack_int* ipiv,
07577                                 float anorm, float* rcond, float* work,
07578                                 lapack_int* iwork );
07579 lapack_int LAPACKE_dspcon_work( int matrix_order, char uplo, lapack_int n,
07580                                 const double* ap, const lapack_int* ipiv,
07581                                 double anorm, double* rcond, double* work,
07582                                 lapack_int* iwork );
07583 lapack_int LAPACKE_cspcon_work( int matrix_order, char uplo, lapack_int n,
07584                                 const lapack_complex_float* ap,
07585                                 const lapack_int* ipiv, float anorm,
07586                                 float* rcond, lapack_complex_float* work );
07587 lapack_int LAPACKE_zspcon_work( int matrix_order, char uplo, lapack_int n,
07588                                 const lapack_complex_double* ap,
07589                                 const lapack_int* ipiv, double anorm,
07590                                 double* rcond, lapack_complex_double* work );
07591 
07592 lapack_int LAPACKE_sspev_work( int matrix_order, char jobz, char uplo,
07593                                lapack_int n, float* ap, float* w, float* z,
07594                                lapack_int ldz, float* work );
07595 lapack_int LAPACKE_dspev_work( int matrix_order, char jobz, char uplo,
07596                                lapack_int n, double* ap, double* w, double* z,
07597                                lapack_int ldz, double* work );
07598 
07599 lapack_int LAPACKE_sspevd_work( int matrix_order, char jobz, char uplo,
07600                                 lapack_int n, float* ap, float* w, float* z,
07601                                 lapack_int ldz, float* work, lapack_int lwork,
07602                                 lapack_int* iwork, lapack_int liwork );
07603 lapack_int LAPACKE_dspevd_work( int matrix_order, char jobz, char uplo,
07604                                 lapack_int n, double* ap, double* w, double* z,
07605                                 lapack_int ldz, double* work, lapack_int lwork,
07606                                 lapack_int* iwork, lapack_int liwork );
07607 
07608 lapack_int LAPACKE_sspevx_work( int matrix_order, char jobz, char range,
07609                                 char uplo, lapack_int n, float* ap, float vl,
07610                                 float vu, lapack_int il, lapack_int iu,
07611                                 float abstol, lapack_int* m, float* w, float* z,
07612                                 lapack_int ldz, float* work, lapack_int* iwork,
07613                                 lapack_int* ifail );
07614 lapack_int LAPACKE_dspevx_work( int matrix_order, char jobz, char range,
07615                                 char uplo, lapack_int n, double* ap, double vl,
07616                                 double vu, lapack_int il, lapack_int iu,
07617                                 double abstol, lapack_int* m, double* w,
07618                                 double* z, lapack_int ldz, double* work,
07619                                 lapack_int* iwork, lapack_int* ifail );
07620 
07621 lapack_int LAPACKE_sspgst_work( int matrix_order, lapack_int itype, char uplo,
07622                                 lapack_int n, float* ap, const float* bp );
07623 lapack_int LAPACKE_dspgst_work( int matrix_order, lapack_int itype, char uplo,
07624                                 lapack_int n, double* ap, const double* bp );
07625 
07626 lapack_int LAPACKE_sspgv_work( int matrix_order, lapack_int itype, char jobz,
07627                                char uplo, lapack_int n, float* ap, float* bp,
07628                                float* w, float* z, lapack_int ldz,
07629                                float* work );
07630 lapack_int LAPACKE_dspgv_work( int matrix_order, lapack_int itype, char jobz,
07631                                char uplo, lapack_int n, double* ap, double* bp,
07632                                double* w, double* z, lapack_int ldz,
07633                                double* work );
07634 
07635 lapack_int LAPACKE_sspgvd_work( int matrix_order, lapack_int itype, char jobz,
07636                                 char uplo, lapack_int n, float* ap, float* bp,
07637                                 float* w, float* z, lapack_int ldz, float* work,
07638                                 lapack_int lwork, lapack_int* iwork,
07639                                 lapack_int liwork );
07640 lapack_int LAPACKE_dspgvd_work( int matrix_order, lapack_int itype, char jobz,
07641                                 char uplo, lapack_int n, double* ap, double* bp,
07642                                 double* w, double* z, lapack_int ldz,
07643                                 double* work, lapack_int lwork,
07644                                 lapack_int* iwork, lapack_int liwork );
07645 
07646 lapack_int LAPACKE_sspgvx_work( int matrix_order, lapack_int itype, char jobz,
07647                                 char range, char uplo, lapack_int n, float* ap,
07648                                 float* bp, float vl, float vu, lapack_int il,
07649                                 lapack_int iu, float abstol, lapack_int* m,
07650                                 float* w, float* z, lapack_int ldz, float* work,
07651                                 lapack_int* iwork, lapack_int* ifail );
07652 lapack_int LAPACKE_dspgvx_work( int matrix_order, lapack_int itype, char jobz,
07653                                 char range, char uplo, lapack_int n, double* ap,
07654                                 double* bp, double vl, double vu, lapack_int il,
07655                                 lapack_int iu, double abstol, lapack_int* m,
07656                                 double* w, double* z, lapack_int ldz,
07657                                 double* work, lapack_int* iwork,
07658                                 lapack_int* ifail );
07659 
07660 lapack_int LAPACKE_ssprfs_work( int matrix_order, char uplo, lapack_int n,
07661                                 lapack_int nrhs, const float* ap,
07662                                 const float* afp, const lapack_int* ipiv,
07663                                 const float* b, lapack_int ldb, float* x,
07664                                 lapack_int ldx, float* ferr, float* berr,
07665                                 float* work, lapack_int* iwork );
07666 lapack_int LAPACKE_dsprfs_work( int matrix_order, char uplo, lapack_int n,
07667                                 lapack_int nrhs, const double* ap,
07668                                 const double* afp, const lapack_int* ipiv,
07669                                 const double* b, lapack_int ldb, double* x,
07670                                 lapack_int ldx, double* ferr, double* berr,
07671                                 double* work, lapack_int* iwork );
07672 lapack_int LAPACKE_csprfs_work( int matrix_order, char uplo, lapack_int n,
07673                                 lapack_int nrhs, const lapack_complex_float* ap,
07674                                 const lapack_complex_float* afp,
07675                                 const lapack_int* ipiv,
07676                                 const lapack_complex_float* b, lapack_int ldb,
07677                                 lapack_complex_float* x, lapack_int ldx,
07678                                 float* ferr, float* berr,
07679                                 lapack_complex_float* work, float* rwork );
07680 lapack_int LAPACKE_zsprfs_work( int matrix_order, char uplo, lapack_int n,
07681                                 lapack_int nrhs,
07682                                 const lapack_complex_double* ap,
07683                                 const lapack_complex_double* afp,
07684                                 const lapack_int* ipiv,
07685                                 const lapack_complex_double* b, lapack_int ldb,
07686                                 lapack_complex_double* x, lapack_int ldx,
07687                                 double* ferr, double* berr,
07688                                 lapack_complex_double* work, double* rwork );
07689 
07690 lapack_int LAPACKE_sspsv_work( int matrix_order, char uplo, lapack_int n,
07691                                lapack_int nrhs, float* ap, lapack_int* ipiv,
07692                                float* b, lapack_int ldb );
07693 lapack_int LAPACKE_dspsv_work( int matrix_order, char uplo, lapack_int n,
07694                                lapack_int nrhs, double* ap, lapack_int* ipiv,
07695                                double* b, lapack_int ldb );
07696 lapack_int LAPACKE_cspsv_work( int matrix_order, char uplo, lapack_int n,
07697                                lapack_int nrhs, lapack_complex_float* ap,
07698                                lapack_int* ipiv, lapack_complex_float* b,
07699                                lapack_int ldb );
07700 lapack_int LAPACKE_zspsv_work( int matrix_order, char uplo, lapack_int n,
07701                                lapack_int nrhs, lapack_complex_double* ap,
07702                                lapack_int* ipiv, lapack_complex_double* b,
07703                                lapack_int ldb );
07704 
07705 lapack_int LAPACKE_sspsvx_work( int matrix_order, char fact, char uplo,
07706                                 lapack_int n, lapack_int nrhs, const float* ap,
07707                                 float* afp, lapack_int* ipiv, const float* b,
07708                                 lapack_int ldb, float* x, lapack_int ldx,
07709                                 float* rcond, float* ferr, float* berr,
07710                                 float* work, lapack_int* iwork );
07711 lapack_int LAPACKE_dspsvx_work( int matrix_order, char fact, char uplo,
07712                                 lapack_int n, lapack_int nrhs, const double* ap,
07713                                 double* afp, lapack_int* ipiv, const double* b,
07714                                 lapack_int ldb, double* x, lapack_int ldx,
07715                                 double* rcond, double* ferr, double* berr,
07716                                 double* work, lapack_int* iwork );
07717 lapack_int LAPACKE_cspsvx_work( int matrix_order, char fact, char uplo,
07718                                 lapack_int n, lapack_int nrhs,
07719                                 const lapack_complex_float* ap,
07720                                 lapack_complex_float* afp, lapack_int* ipiv,
07721                                 const lapack_complex_float* b, lapack_int ldb,
07722                                 lapack_complex_float* x, lapack_int ldx,
07723                                 float* rcond, float* ferr, float* berr,
07724                                 lapack_complex_float* work, float* rwork );
07725 lapack_int LAPACKE_zspsvx_work( int matrix_order, char fact, char uplo,
07726                                 lapack_int n, lapack_int nrhs,
07727                                 const lapack_complex_double* ap,
07728                                 lapack_complex_double* afp, lapack_int* ipiv,
07729                                 const lapack_complex_double* b, lapack_int ldb,
07730                                 lapack_complex_double* x, lapack_int ldx,
07731                                 double* rcond, double* ferr, double* berr,
07732                                 lapack_complex_double* work, double* rwork );
07733 
07734 lapack_int LAPACKE_ssptrd_work( int matrix_order, char uplo, lapack_int n,
07735                                 float* ap, float* d, float* e, float* tau );
07736 lapack_int LAPACKE_dsptrd_work( int matrix_order, char uplo, lapack_int n,
07737                                 double* ap, double* d, double* e, double* tau );
07738 
07739 lapack_int LAPACKE_ssptrf_work( int matrix_order, char uplo, lapack_int n,
07740                                 float* ap, lapack_int* ipiv );
07741 lapack_int LAPACKE_dsptrf_work( int matrix_order, char uplo, lapack_int n,
07742                                 double* ap, lapack_int* ipiv );
07743 lapack_int LAPACKE_csptrf_work( int matrix_order, char uplo, lapack_int n,
07744                                 lapack_complex_float* ap, lapack_int* ipiv );
07745 lapack_int LAPACKE_zsptrf_work( int matrix_order, char uplo, lapack_int n,
07746                                 lapack_complex_double* ap, lapack_int* ipiv );
07747 
07748 lapack_int LAPACKE_ssptri_work( int matrix_order, char uplo, lapack_int n,
07749                                 float* ap, const lapack_int* ipiv,
07750                                 float* work );
07751 lapack_int LAPACKE_dsptri_work( int matrix_order, char uplo, lapack_int n,
07752                                 double* ap, const lapack_int* ipiv,
07753                                 double* work );
07754 lapack_int LAPACKE_csptri_work( int matrix_order, char uplo, lapack_int n,
07755                                 lapack_complex_float* ap,
07756                                 const lapack_int* ipiv,
07757                                 lapack_complex_float* work );
07758 lapack_int LAPACKE_zsptri_work( int matrix_order, char uplo, lapack_int n,
07759                                 lapack_complex_double* ap,
07760                                 const lapack_int* ipiv,
07761                                 lapack_complex_double* work );
07762 
07763 lapack_int LAPACKE_ssptrs_work( int matrix_order, char uplo, lapack_int n,
07764                                 lapack_int nrhs, const float* ap,
07765                                 const lapack_int* ipiv, float* b,
07766                                 lapack_int ldb );
07767 lapack_int LAPACKE_dsptrs_work( int matrix_order, char uplo, lapack_int n,
07768                                 lapack_int nrhs, const double* ap,
07769                                 const lapack_int* ipiv, double* b,
07770                                 lapack_int ldb );
07771 lapack_int LAPACKE_csptrs_work( int matrix_order, char uplo, lapack_int n,
07772                                 lapack_int nrhs, const lapack_complex_float* ap,
07773                                 const lapack_int* ipiv, lapack_complex_float* b,
07774                                 lapack_int ldb );
07775 lapack_int LAPACKE_zsptrs_work( int matrix_order, char uplo, lapack_int n,
07776                                 lapack_int nrhs,
07777                                 const lapack_complex_double* ap,
07778                                 const lapack_int* ipiv,
07779                                 lapack_complex_double* b, lapack_int ldb );
07780 
07781 lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
07782                                 float vu, lapack_int il, lapack_int iu,
07783                                 float abstol, const float* d, const float* e,
07784                                 lapack_int* m, lapack_int* nsplit, float* w,
07785                                 lapack_int* iblock, lapack_int* isplit,
07786                                 float* work, lapack_int* iwork );
07787 lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
07788                                 double vu, lapack_int il, lapack_int iu,
07789                                 double abstol, const double* d, const double* e,
07790                                 lapack_int* m, lapack_int* nsplit, double* w,
07791                                 lapack_int* iblock, lapack_int* isplit,
07792                                 double* work, lapack_int* iwork );
07793 
07794 lapack_int LAPACKE_sstedc_work( int matrix_order, char compz, lapack_int n,
07795                                 float* d, float* e, float* z, lapack_int ldz,
07796                                 float* work, lapack_int lwork,
07797                                 lapack_int* iwork, lapack_int liwork );
07798 lapack_int LAPACKE_dstedc_work( int matrix_order, char compz, lapack_int n,
07799                                 double* d, double* e, double* z, lapack_int ldz,
07800                                 double* work, lapack_int lwork,
07801                                 lapack_int* iwork, lapack_int liwork );
07802 lapack_int LAPACKE_cstedc_work( int matrix_order, char compz, lapack_int n,
07803                                 float* d, float* e, lapack_complex_float* z,
07804                                 lapack_int ldz, lapack_complex_float* work,
07805                                 lapack_int lwork, float* rwork,
07806                                 lapack_int lrwork, lapack_int* iwork,
07807                                 lapack_int liwork );
07808 lapack_int LAPACKE_zstedc_work( int matrix_order, char compz, lapack_int n,
07809                                 double* d, double* e, lapack_complex_double* z,
07810                                 lapack_int ldz, lapack_complex_double* work,
07811                                 lapack_int lwork, double* rwork,
07812                                 lapack_int lrwork, lapack_int* iwork,
07813                                 lapack_int liwork );
07814 
07815 lapack_int LAPACKE_sstegr_work( int matrix_order, char jobz, char range,
07816                                 lapack_int n, float* d, float* e, float vl,
07817                                 float vu, lapack_int il, lapack_int iu,
07818                                 float abstol, lapack_int* m, float* w, float* z,
07819                                 lapack_int ldz, lapack_int* isuppz, float* work,
07820                                 lapack_int lwork, lapack_int* iwork,
07821                                 lapack_int liwork );
07822 lapack_int LAPACKE_dstegr_work( int matrix_order, char jobz, char range,
07823                                 lapack_int n, double* d, double* e, double vl,
07824                                 double vu, lapack_int il, lapack_int iu,
07825                                 double abstol, lapack_int* m, double* w,
07826                                 double* z, lapack_int ldz, lapack_int* isuppz,
07827                                 double* work, lapack_int lwork,
07828                                 lapack_int* iwork, lapack_int liwork );
07829 lapack_int LAPACKE_cstegr_work( int matrix_order, char jobz, char range,
07830                                 lapack_int n, float* d, float* e, float vl,
07831                                 float vu, lapack_int il, lapack_int iu,
07832                                 float abstol, lapack_int* m, float* w,
07833                                 lapack_complex_float* z, lapack_int ldz,
07834                                 lapack_int* isuppz, float* work,
07835                                 lapack_int lwork, lapack_int* iwork,
07836                                 lapack_int liwork );
07837 lapack_int LAPACKE_zstegr_work( int matrix_order, char jobz, char range,
07838                                 lapack_int n, double* d, double* e, double vl,
07839                                 double vu, lapack_int il, lapack_int iu,
07840                                 double abstol, lapack_int* m, double* w,
07841                                 lapack_complex_double* z, lapack_int ldz,
07842                                 lapack_int* isuppz, double* work,
07843                                 lapack_int lwork, lapack_int* iwork,
07844                                 lapack_int liwork );
07845 
07846 lapack_int LAPACKE_sstein_work( int matrix_order, lapack_int n, const float* d,
07847                                 const float* e, lapack_int m, const float* w,
07848                                 const lapack_int* iblock,
07849                                 const lapack_int* isplit, float* z,
07850                                 lapack_int ldz, float* work, lapack_int* iwork,
07851                                 lapack_int* ifailv );
07852 lapack_int LAPACKE_dstein_work( int matrix_order, lapack_int n, const double* d,
07853                                 const double* e, lapack_int m, const double* w,
07854                                 const lapack_int* iblock,
07855                                 const lapack_int* isplit, double* z,
07856                                 lapack_int ldz, double* work, lapack_int* iwork,
07857                                 lapack_int* ifailv );
07858 lapack_int LAPACKE_cstein_work( int matrix_order, lapack_int n, const float* d,
07859                                 const float* e, lapack_int m, const float* w,
07860                                 const lapack_int* iblock,
07861                                 const lapack_int* isplit,
07862                                 lapack_complex_float* z, lapack_int ldz,
07863                                 float* work, lapack_int* iwork,
07864                                 lapack_int* ifailv );
07865 lapack_int LAPACKE_zstein_work( int matrix_order, lapack_int n, const double* d,
07866                                 const double* e, lapack_int m, const double* w,
07867                                 const lapack_int* iblock,
07868                                 const lapack_int* isplit,
07869                                 lapack_complex_double* z, lapack_int ldz,
07870                                 double* work, lapack_int* iwork,
07871                                 lapack_int* ifailv );
07872 
07873 lapack_int LAPACKE_sstemr_work( int matrix_order, char jobz, char range,
07874                                 lapack_int n, float* d, float* e, float vl,
07875                                 float vu, lapack_int il, lapack_int iu,
07876                                 lapack_int* m, float* w, float* z,
07877                                 lapack_int ldz, lapack_int nzc,
07878                                 lapack_int* isuppz, lapack_logical* tryrac,
07879                                 float* work, lapack_int lwork,
07880                                 lapack_int* iwork, lapack_int liwork );
07881 lapack_int LAPACKE_dstemr_work( int matrix_order, char jobz, char range,
07882                                 lapack_int n, double* d, double* e, double vl,
07883                                 double vu, lapack_int il, lapack_int iu,
07884                                 lapack_int* m, double* w, double* z,
07885                                 lapack_int ldz, lapack_int nzc,
07886                                 lapack_int* isuppz, lapack_logical* tryrac,
07887                                 double* work, lapack_int lwork,
07888                                 lapack_int* iwork, lapack_int liwork );
07889 lapack_int LAPACKE_cstemr_work( int matrix_order, char jobz, char range,
07890                                 lapack_int n, float* d, float* e, float vl,
07891                                 float vu, lapack_int il, lapack_int iu,
07892                                 lapack_int* m, float* w,
07893                                 lapack_complex_float* z, lapack_int ldz,
07894                                 lapack_int nzc, lapack_int* isuppz,
07895                                 lapack_logical* tryrac, float* work,
07896                                 lapack_int lwork, lapack_int* iwork,
07897                                 lapack_int liwork );
07898 lapack_int LAPACKE_zstemr_work( int matrix_order, char jobz, char range,
07899                                 lapack_int n, double* d, double* e, double vl,
07900                                 double vu, lapack_int il, lapack_int iu,
07901                                 lapack_int* m, double* w,
07902                                 lapack_complex_double* z, lapack_int ldz,
07903                                 lapack_int nzc, lapack_int* isuppz,
07904                                 lapack_logical* tryrac, double* work,
07905                                 lapack_int lwork, lapack_int* iwork,
07906                                 lapack_int liwork );
07907 
07908 lapack_int LAPACKE_ssteqr_work( int matrix_order, char compz, lapack_int n,
07909                                 float* d, float* e, float* z, lapack_int ldz,
07910                                 float* work );
07911 lapack_int LAPACKE_dsteqr_work( int matrix_order, char compz, lapack_int n,
07912                                 double* d, double* e, double* z, lapack_int ldz,
07913                                 double* work );
07914 lapack_int LAPACKE_csteqr_work( int matrix_order, char compz, lapack_int n,
07915                                 float* d, float* e, lapack_complex_float* z,
07916                                 lapack_int ldz, float* work );
07917 lapack_int LAPACKE_zsteqr_work( int matrix_order, char compz, lapack_int n,
07918                                 double* d, double* e, lapack_complex_double* z,
07919                                 lapack_int ldz, double* work );
07920 
07921 lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
07922 lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
07923 
07924 lapack_int LAPACKE_sstev_work( int matrix_order, char jobz, lapack_int n,
07925                                float* d, float* e, float* z, lapack_int ldz,
07926                                float* work );
07927 lapack_int LAPACKE_dstev_work( int matrix_order, char jobz, lapack_int n,
07928                                double* d, double* e, double* z, lapack_int ldz,
07929                                double* work );
07930 
07931 lapack_int LAPACKE_sstevd_work( int matrix_order, char jobz, lapack_int n,
07932                                 float* d, float* e, float* z, lapack_int ldz,
07933                                 float* work, lapack_int lwork,
07934                                 lapack_int* iwork, lapack_int liwork );
07935 lapack_int LAPACKE_dstevd_work( int matrix_order, char jobz, lapack_int n,
07936                                 double* d, double* e, double* z, lapack_int ldz,
07937                                 double* work, lapack_int lwork,
07938                                 lapack_int* iwork, lapack_int liwork );
07939 
07940 lapack_int LAPACKE_sstevr_work( int matrix_order, char jobz, char range,
07941                                 lapack_int n, float* d, float* e, float vl,
07942                                 float vu, lapack_int il, lapack_int iu,
07943                                 float abstol, lapack_int* m, float* w, float* z,
07944                                 lapack_int ldz, lapack_int* isuppz, float* work,
07945                                 lapack_int lwork, lapack_int* iwork,
07946                                 lapack_int liwork );
07947 lapack_int LAPACKE_dstevr_work( int matrix_order, char jobz, char range,
07948                                 lapack_int n, double* d, double* e, double vl,
07949                                 double vu, lapack_int il, lapack_int iu,
07950                                 double abstol, lapack_int* m, double* w,
07951                                 double* z, lapack_int ldz, lapack_int* isuppz,
07952                                 double* work, lapack_int lwork,
07953                                 lapack_int* iwork, lapack_int liwork );
07954 
07955 lapack_int LAPACKE_sstevx_work( int matrix_order, char jobz, char range,
07956                                 lapack_int n, float* d, float* e, float vl,
07957                                 float vu, lapack_int il, lapack_int iu,
07958                                 float abstol, lapack_int* m, float* w, float* z,
07959                                 lapack_int ldz, float* work, lapack_int* iwork,
07960                                 lapack_int* ifail );
07961 lapack_int LAPACKE_dstevx_work( int matrix_order, char jobz, char range,
07962                                 lapack_int n, double* d, double* e, double vl,
07963                                 double vu, lapack_int il, lapack_int iu,
07964                                 double abstol, lapack_int* m, double* w,
07965                                 double* z, lapack_int ldz, double* work,
07966                                 lapack_int* iwork, lapack_int* ifail );
07967 
07968 lapack_int LAPACKE_ssycon_work( int matrix_order, char uplo, lapack_int n,
07969                                 const float* a, lapack_int lda,
07970                                 const lapack_int* ipiv, float anorm,
07971                                 float* rcond, float* work, lapack_int* iwork );
07972 lapack_int LAPACKE_dsycon_work( int matrix_order, char uplo, lapack_int n,
07973                                 const double* a, lapack_int lda,
07974                                 const lapack_int* ipiv, double anorm,
07975                                 double* rcond, double* work,
07976                                 lapack_int* iwork );
07977 lapack_int LAPACKE_csycon_work( int matrix_order, char uplo, lapack_int n,
07978                                 const lapack_complex_float* a, lapack_int lda,
07979                                 const lapack_int* ipiv, float anorm,
07980                                 float* rcond, lapack_complex_float* work );
07981 lapack_int LAPACKE_zsycon_work( int matrix_order, char uplo, lapack_int n,
07982                                 const lapack_complex_double* a, lapack_int lda,
07983                                 const lapack_int* ipiv, double anorm,
07984                                 double* rcond, lapack_complex_double* work );
07985 
07986 lapack_int LAPACKE_ssyequb_work( int matrix_order, char uplo, lapack_int n,
07987                                  const float* a, lapack_int lda, float* s,
07988                                  float* scond, float* amax, float* work );
07989 lapack_int LAPACKE_dsyequb_work( int matrix_order, char uplo, lapack_int n,
07990                                  const double* a, lapack_int lda, double* s,
07991                                  double* scond, double* amax, double* work );
07992 lapack_int LAPACKE_csyequb_work( int matrix_order, char uplo, lapack_int n,
07993                                  const lapack_complex_float* a, lapack_int lda,
07994                                  float* s, float* scond, float* amax,
07995                                  lapack_complex_float* work );
07996 lapack_int LAPACKE_zsyequb_work( int matrix_order, char uplo, lapack_int n,
07997                                  const lapack_complex_double* a, lapack_int lda,
07998                                  double* s, double* scond, double* amax,
07999                                  lapack_complex_double* work );
08000 
08001 lapack_int LAPACKE_ssyev_work( int matrix_order, char jobz, char uplo,
08002                                lapack_int n, float* a, lapack_int lda, float* w,
08003                                float* work, lapack_int lwork );
08004 lapack_int LAPACKE_dsyev_work( int matrix_order, char jobz, char uplo,
08005                                lapack_int n, double* a, lapack_int lda,
08006                                double* w, double* work, lapack_int lwork );
08007 
08008 lapack_int LAPACKE_ssyevd_work( int matrix_order, char jobz, char uplo,
08009                                 lapack_int n, float* a, lapack_int lda,
08010                                 float* w, float* work, lapack_int lwork,
08011                                 lapack_int* iwork, lapack_int liwork );
08012 lapack_int LAPACKE_dsyevd_work( int matrix_order, char jobz, char uplo,
08013                                 lapack_int n, double* a, lapack_int lda,
08014                                 double* w, double* work, lapack_int lwork,
08015                                 lapack_int* iwork, lapack_int liwork );
08016 
08017 lapack_int LAPACKE_ssyevr_work( int matrix_order, char jobz, char range,
08018                                 char uplo, lapack_int n, float* a,
08019                                 lapack_int lda, float vl, float vu,
08020                                 lapack_int il, lapack_int iu, float abstol,
08021                                 lapack_int* m, float* w, float* z,
08022                                 lapack_int ldz, lapack_int* isuppz, float* work,
08023                                 lapack_int lwork, lapack_int* iwork,
08024                                 lapack_int liwork );
08025 lapack_int LAPACKE_dsyevr_work( int matrix_order, char jobz, char range,
08026                                 char uplo, lapack_int n, double* a,
08027                                 lapack_int lda, double vl, double vu,
08028                                 lapack_int il, lapack_int iu, double abstol,
08029                                 lapack_int* m, double* w, double* z,
08030                                 lapack_int ldz, lapack_int* isuppz,
08031                                 double* work, lapack_int lwork,
08032                                 lapack_int* iwork, lapack_int liwork );
08033 
08034 lapack_int LAPACKE_ssyevx_work( int matrix_order, char jobz, char range,
08035                                 char uplo, lapack_int n, float* a,
08036                                 lapack_int lda, float vl, float vu,
08037                                 lapack_int il, lapack_int iu, float abstol,
08038                                 lapack_int* m, float* w, float* z,
08039                                 lapack_int ldz, float* work, lapack_int lwork,
08040                                 lapack_int* iwork, lapack_int* ifail );
08041 lapack_int LAPACKE_dsyevx_work( int matrix_order, char jobz, char range,
08042                                 char uplo, lapack_int n, double* a,
08043                                 lapack_int lda, double vl, double vu,
08044                                 lapack_int il, lapack_int iu, double abstol,
08045                                 lapack_int* m, double* w, double* z,
08046                                 lapack_int ldz, double* work, lapack_int lwork,
08047                                 lapack_int* iwork, lapack_int* ifail );
08048 
08049 lapack_int LAPACKE_ssygst_work( int matrix_order, lapack_int itype, char uplo,
08050                                 lapack_int n, float* a, lapack_int lda,
08051                                 const float* b, lapack_int ldb );
08052 lapack_int LAPACKE_dsygst_work( int matrix_order, lapack_int itype, char uplo,
08053                                 lapack_int n, double* a, lapack_int lda,
08054                                 const double* b, lapack_int ldb );
08055 
08056 lapack_int LAPACKE_ssygv_work( int matrix_order, lapack_int itype, char jobz,
08057                                char uplo, lapack_int n, float* a,
08058                                lapack_int lda, float* b, lapack_int ldb,
08059                                float* w, float* work, lapack_int lwork );
08060 lapack_int LAPACKE_dsygv_work( int matrix_order, lapack_int itype, char jobz,
08061                                char uplo, lapack_int n, double* a,
08062                                lapack_int lda, double* b, lapack_int ldb,
08063                                double* w, double* work, lapack_int lwork );
08064 
08065 lapack_int LAPACKE_ssygvd_work( int matrix_order, lapack_int itype, char jobz,
08066                                 char uplo, lapack_int n, float* a,
08067                                 lapack_int lda, float* b, lapack_int ldb,
08068                                 float* w, float* work, lapack_int lwork,
08069                                 lapack_int* iwork, lapack_int liwork );
08070 lapack_int LAPACKE_dsygvd_work( int matrix_order, lapack_int itype, char jobz,
08071                                 char uplo, lapack_int n, double* a,
08072                                 lapack_int lda, double* b, lapack_int ldb,
08073                                 double* w, double* work, lapack_int lwork,
08074                                 lapack_int* iwork, lapack_int liwork );
08075 
08076 lapack_int LAPACKE_ssygvx_work( int matrix_order, lapack_int itype, char jobz,
08077                                 char range, char uplo, lapack_int n, float* a,
08078                                 lapack_int lda, float* b, lapack_int ldb,
08079                                 float vl, float vu, lapack_int il,
08080                                 lapack_int iu, float abstol, lapack_int* m,
08081                                 float* w, float* z, lapack_int ldz, float* work,
08082                                 lapack_int lwork, lapack_int* iwork,
08083                                 lapack_int* ifail );
08084 lapack_int LAPACKE_dsygvx_work( int matrix_order, lapack_int itype, char jobz,
08085                                 char range, char uplo, lapack_int n, double* a,
08086                                 lapack_int lda, double* b, lapack_int ldb,
08087                                 double vl, double vu, lapack_int il,
08088                                 lapack_int iu, double abstol, lapack_int* m,
08089                                 double* w, double* z, lapack_int ldz,
08090                                 double* work, lapack_int lwork,
08091                                 lapack_int* iwork, lapack_int* ifail );
08092 
08093 lapack_int LAPACKE_ssyrfs_work( int matrix_order, char uplo, lapack_int n,
08094                                 lapack_int nrhs, const float* a, lapack_int lda,
08095                                 const float* af, lapack_int ldaf,
08096                                 const lapack_int* ipiv, const float* b,
08097                                 lapack_int ldb, float* x, lapack_int ldx,
08098                                 float* ferr, float* berr, float* work,
08099                                 lapack_int* iwork );
08100 lapack_int LAPACKE_dsyrfs_work( int matrix_order, char uplo, lapack_int n,
08101                                 lapack_int nrhs, const double* a,
08102                                 lapack_int lda, const double* af,
08103                                 lapack_int ldaf, const lapack_int* ipiv,
08104                                 const double* b, lapack_int ldb, double* x,
08105                                 lapack_int ldx, double* ferr, double* berr,
08106                                 double* work, lapack_int* iwork );
08107 lapack_int LAPACKE_csyrfs_work( int matrix_order, char uplo, lapack_int n,
08108                                 lapack_int nrhs, const lapack_complex_float* a,
08109                                 lapack_int lda, const lapack_complex_float* af,
08110                                 lapack_int ldaf, const lapack_int* ipiv,
08111                                 const lapack_complex_float* b, lapack_int ldb,
08112                                 lapack_complex_float* x, lapack_int ldx,
08113                                 float* ferr, float* berr,
08114                                 lapack_complex_float* work, float* rwork );
08115 lapack_int LAPACKE_zsyrfs_work( int matrix_order, char uplo, lapack_int n,
08116                                 lapack_int nrhs, const lapack_complex_double* a,
08117                                 lapack_int lda, const lapack_complex_double* af,
08118                                 lapack_int ldaf, const lapack_int* ipiv,
08119                                 const lapack_complex_double* b, lapack_int ldb,
08120                                 lapack_complex_double* x, lapack_int ldx,
08121                                 double* ferr, double* berr,
08122                                 lapack_complex_double* work, double* rwork );
08123 
08124 lapack_int LAPACKE_ssyrfsx_work( int matrix_order, char uplo, char equed,
08125                                  lapack_int n, lapack_int nrhs, const float* a,
08126                                  lapack_int lda, const float* af,
08127                                  lapack_int ldaf, const lapack_int* ipiv,
08128                                  const float* s, const float* b, lapack_int ldb,
08129                                  float* x, lapack_int ldx, float* rcond,
08130                                  float* berr, lapack_int n_err_bnds,
08131                                  float* err_bnds_norm, float* err_bnds_comp,
08132                                  lapack_int nparams, float* params, float* work,
08133                                  lapack_int* iwork );
08134 lapack_int LAPACKE_dsyrfsx_work( int matrix_order, char uplo, char equed,
08135                                  lapack_int n, lapack_int nrhs, const double* a,
08136                                  lapack_int lda, const double* af,
08137                                  lapack_int ldaf, const lapack_int* ipiv,
08138                                  const double* s, const double* b,
08139                                  lapack_int ldb, double* x, lapack_int ldx,
08140                                  double* rcond, double* berr,
08141                                  lapack_int n_err_bnds, double* err_bnds_norm,
08142                                  double* err_bnds_comp, lapack_int nparams,
08143                                  double* params, double* work,
08144                                  lapack_int* iwork );
08145 lapack_int LAPACKE_csyrfsx_work( int matrix_order, char uplo, char equed,
08146                                  lapack_int n, lapack_int nrhs,
08147                                  const lapack_complex_float* a, lapack_int lda,
08148                                  const lapack_complex_float* af,
08149                                  lapack_int ldaf, const lapack_int* ipiv,
08150                                  const float* s, const lapack_complex_float* b,
08151                                  lapack_int ldb, lapack_complex_float* x,
08152                                  lapack_int ldx, float* rcond, float* berr,
08153                                  lapack_int n_err_bnds, float* err_bnds_norm,
08154                                  float* err_bnds_comp, lapack_int nparams,
08155                                  float* params, lapack_complex_float* work,
08156                                  float* rwork );
08157 lapack_int LAPACKE_zsyrfsx_work( int matrix_order, char uplo, char equed,
08158                                  lapack_int n, lapack_int nrhs,
08159                                  const lapack_complex_double* a, lapack_int lda,
08160                                  const lapack_complex_double* af,
08161                                  lapack_int ldaf, const lapack_int* ipiv,
08162                                  const double* s,
08163                                  const lapack_complex_double* b, lapack_int ldb,
08164                                  lapack_complex_double* x, lapack_int ldx,
08165                                  double* rcond, double* berr,
08166                                  lapack_int n_err_bnds, double* err_bnds_norm,
08167                                  double* err_bnds_comp, lapack_int nparams,
08168                                  double* params, lapack_complex_double* work,
08169                                  double* rwork );
08170 
08171 lapack_int LAPACKE_ssysv_work( int matrix_order, char uplo, lapack_int n,
08172                                lapack_int nrhs, float* a, lapack_int lda,
08173                                lapack_int* ipiv, float* b, lapack_int ldb,
08174                                float* work, lapack_int lwork );
08175 lapack_int LAPACKE_dsysv_work( int matrix_order, char uplo, lapack_int n,
08176                                lapack_int nrhs, double* a, lapack_int lda,
08177                                lapack_int* ipiv, double* b, lapack_int ldb,
08178                                double* work, lapack_int lwork );
08179 lapack_int LAPACKE_csysv_work( int matrix_order, char uplo, lapack_int n,
08180                                lapack_int nrhs, lapack_complex_float* a,
08181                                lapack_int lda, lapack_int* ipiv,
08182                                lapack_complex_float* b, lapack_int ldb,
08183                                lapack_complex_float* work, lapack_int lwork );
08184 lapack_int LAPACKE_zsysv_work( int matrix_order, char uplo, lapack_int n,
08185                                lapack_int nrhs, lapack_complex_double* a,
08186                                lapack_int lda, lapack_int* ipiv,
08187                                lapack_complex_double* b, lapack_int ldb,
08188                                lapack_complex_double* work, lapack_int lwork );
08189 
08190 lapack_int LAPACKE_ssysvx_work( int matrix_order, char fact, char uplo,
08191                                 lapack_int n, lapack_int nrhs, const float* a,
08192                                 lapack_int lda, float* af, lapack_int ldaf,
08193                                 lapack_int* ipiv, const float* b,
08194                                 lapack_int ldb, float* x, lapack_int ldx,
08195                                 float* rcond, float* ferr, float* berr,
08196                                 float* work, lapack_int lwork,
08197                                 lapack_int* iwork );
08198 lapack_int LAPACKE_dsysvx_work( int matrix_order, char fact, char uplo,
08199                                 lapack_int n, lapack_int nrhs, const double* a,
08200                                 lapack_int lda, double* af, lapack_int ldaf,
08201                                 lapack_int* ipiv, const double* b,
08202                                 lapack_int ldb, double* x, lapack_int ldx,
08203                                 double* rcond, double* ferr, double* berr,
08204                                 double* work, lapack_int lwork,
08205                                 lapack_int* iwork );
08206 lapack_int LAPACKE_csysvx_work( int matrix_order, char fact, char uplo,
08207                                 lapack_int n, lapack_int nrhs,
08208                                 const lapack_complex_float* a, lapack_int lda,
08209                                 lapack_complex_float* af, lapack_int ldaf,
08210                                 lapack_int* ipiv, const lapack_complex_float* b,
08211                                 lapack_int ldb, lapack_complex_float* x,
08212                                 lapack_int ldx, float* rcond, float* ferr,
08213                                 float* berr, lapack_complex_float* work,
08214                                 lapack_int lwork, float* rwork );
08215 lapack_int LAPACKE_zsysvx_work( int matrix_order, char fact, char uplo,
08216                                 lapack_int n, lapack_int nrhs,
08217                                 const lapack_complex_double* a, lapack_int lda,
08218                                 lapack_complex_double* af, lapack_int ldaf,
08219                                 lapack_int* ipiv,
08220                                 const lapack_complex_double* b, lapack_int ldb,
08221                                 lapack_complex_double* x, lapack_int ldx,
08222                                 double* rcond, double* ferr, double* berr,
08223                                 lapack_complex_double* work, lapack_int lwork,
08224                                 double* rwork );
08225 
08226 lapack_int LAPACKE_ssysvxx_work( int matrix_order, char fact, char uplo,
08227                                  lapack_int n, lapack_int nrhs, float* a,
08228                                  lapack_int lda, float* af, lapack_int ldaf,
08229                                  lapack_int* ipiv, char* equed, float* s,
08230                                  float* b, lapack_int ldb, float* x,
08231                                  lapack_int ldx, float* rcond, float* rpvgrw,
08232                                  float* berr, lapack_int n_err_bnds,
08233                                  float* err_bnds_norm, float* err_bnds_comp,
08234                                  lapack_int nparams, float* params, float* work,
08235                                  lapack_int* iwork );
08236 lapack_int LAPACKE_dsysvxx_work( int matrix_order, char fact, char uplo,
08237                                  lapack_int n, lapack_int nrhs, double* a,
08238                                  lapack_int lda, double* af, lapack_int ldaf,
08239                                  lapack_int* ipiv, char* equed, double* s,
08240                                  double* b, lapack_int ldb, double* x,
08241                                  lapack_int ldx, double* rcond, double* rpvgrw,
08242                                  double* berr, lapack_int n_err_bnds,
08243                                  double* err_bnds_norm, double* err_bnds_comp,
08244                                  lapack_int nparams, double* params,
08245                                  double* work, lapack_int* iwork );
08246 lapack_int LAPACKE_csysvxx_work( int matrix_order, char fact, char uplo,
08247                                  lapack_int n, lapack_int nrhs,
08248                                  lapack_complex_float* a, lapack_int lda,
08249                                  lapack_complex_float* af, lapack_int ldaf,
08250                                  lapack_int* ipiv, char* equed, float* s,
08251                                  lapack_complex_float* b, lapack_int ldb,
08252                                  lapack_complex_float* x, lapack_int ldx,
08253                                  float* rcond, float* rpvgrw, float* berr,
08254                                  lapack_int n_err_bnds, float* err_bnds_norm,
08255                                  float* err_bnds_comp, lapack_int nparams,
08256                                  float* params, lapack_complex_float* work,
08257                                  float* rwork );
08258 lapack_int LAPACKE_zsysvxx_work( int matrix_order, char fact, char uplo,
08259                                  lapack_int n, lapack_int nrhs,
08260                                  lapack_complex_double* a, lapack_int lda,
08261                                  lapack_complex_double* af, lapack_int ldaf,
08262                                  lapack_int* ipiv, char* equed, double* s,
08263                                  lapack_complex_double* b, lapack_int ldb,
08264                                  lapack_complex_double* x, lapack_int ldx,
08265                                  double* rcond, double* rpvgrw, double* berr,
08266                                  lapack_int n_err_bnds, double* err_bnds_norm,
08267                                  double* err_bnds_comp, lapack_int nparams,
08268                                  double* params, lapack_complex_double* work,
08269                                  double* rwork );
08270 
08271 lapack_int LAPACKE_ssytrd_work( int matrix_order, char uplo, lapack_int n,
08272                                 float* a, lapack_int lda, float* d, float* e,
08273                                 float* tau, float* work, lapack_int lwork );
08274 lapack_int LAPACKE_dsytrd_work( int matrix_order, char uplo, lapack_int n,
08275                                 double* a, lapack_int lda, double* d, double* e,
08276                                 double* tau, double* work, lapack_int lwork );
08277 
08278 lapack_int LAPACKE_ssytrf_work( int matrix_order, char uplo, lapack_int n,
08279                                 float* a, lapack_int lda, lapack_int* ipiv,
08280                                 float* work, lapack_int lwork );
08281 lapack_int LAPACKE_dsytrf_work( int matrix_order, char uplo, lapack_int n,
08282                                 double* a, lapack_int lda, lapack_int* ipiv,
08283                                 double* work, lapack_int lwork );
08284 lapack_int LAPACKE_csytrf_work( int matrix_order, char uplo, lapack_int n,
08285                                 lapack_complex_float* a, lapack_int lda,
08286                                 lapack_int* ipiv, lapack_complex_float* work,
08287                                 lapack_int lwork );
08288 lapack_int LAPACKE_zsytrf_work( int matrix_order, char uplo, lapack_int n,
08289                                 lapack_complex_double* a, lapack_int lda,
08290                                 lapack_int* ipiv, lapack_complex_double* work,
08291                                 lapack_int lwork );
08292 
08293 lapack_int LAPACKE_ssytri_work( int matrix_order, char uplo, lapack_int n,
08294                                 float* a, lapack_int lda,
08295                                 const lapack_int* ipiv, float* work );
08296 lapack_int LAPACKE_dsytri_work( int matrix_order, char uplo, lapack_int n,
08297                                 double* a, lapack_int lda,
08298                                 const lapack_int* ipiv, double* work );
08299 lapack_int LAPACKE_csytri_work( int matrix_order, char uplo, lapack_int n,
08300                                 lapack_complex_float* a, lapack_int lda,
08301                                 const lapack_int* ipiv,
08302                                 lapack_complex_float* work );
08303 lapack_int LAPACKE_zsytri_work( int matrix_order, char uplo, lapack_int n,
08304                                 lapack_complex_double* a, lapack_int lda,
08305                                 const lapack_int* ipiv,
08306                                 lapack_complex_double* work );
08307 
08308 lapack_int LAPACKE_ssytrs_work( int matrix_order, char uplo, lapack_int n,
08309                                 lapack_int nrhs, const float* a, lapack_int lda,
08310                                 const lapack_int* ipiv, float* b,
08311                                 lapack_int ldb );
08312 lapack_int LAPACKE_dsytrs_work( int matrix_order, char uplo, lapack_int n,
08313                                 lapack_int nrhs, const double* a,
08314                                 lapack_int lda, const lapack_int* ipiv,
08315                                 double* b, lapack_int ldb );
08316 lapack_int LAPACKE_csytrs_work( int matrix_order, char uplo, lapack_int n,
08317                                 lapack_int nrhs, const lapack_complex_float* a,
08318                                 lapack_int lda, const lapack_int* ipiv,
08319                                 lapack_complex_float* b, lapack_int ldb );
08320 lapack_int LAPACKE_zsytrs_work( int matrix_order, char uplo, lapack_int n,
08321                                 lapack_int nrhs, const lapack_complex_double* a,
08322                                 lapack_int lda, const lapack_int* ipiv,
08323                                 lapack_complex_double* b, lapack_int ldb );
08324 
08325 lapack_int LAPACKE_stbcon_work( int matrix_order, char norm, char uplo,
08326                                 char diag, lapack_int n, lapack_int kd,
08327                                 const float* ab, lapack_int ldab, float* rcond,
08328                                 float* work, lapack_int* iwork );
08329 lapack_int LAPACKE_dtbcon_work( int matrix_order, char norm, char uplo,
08330                                 char diag, lapack_int n, lapack_int kd,
08331                                 const double* ab, lapack_int ldab,
08332                                 double* rcond, double* work,
08333                                 lapack_int* iwork );
08334 lapack_int LAPACKE_ctbcon_work( int matrix_order, char norm, char uplo,
08335                                 char diag, lapack_int n, lapack_int kd,
08336                                 const lapack_complex_float* ab, lapack_int ldab,
08337                                 float* rcond, lapack_complex_float* work,
08338                                 float* rwork );
08339 lapack_int LAPACKE_ztbcon_work( int matrix_order, char norm, char uplo,
08340                                 char diag, lapack_int n, lapack_int kd,
08341                                 const lapack_complex_double* ab,
08342                                 lapack_int ldab, double* rcond,
08343                                 lapack_complex_double* work, double* rwork );
08344 
08345 lapack_int LAPACKE_stbrfs_work( int matrix_order, char uplo, char trans,
08346                                 char diag, lapack_int n, lapack_int kd,
08347                                 lapack_int nrhs, const float* ab,
08348                                 lapack_int ldab, const float* b, lapack_int ldb,
08349                                 const float* x, lapack_int ldx, float* ferr,
08350                                 float* berr, float* work, lapack_int* iwork );
08351 lapack_int LAPACKE_dtbrfs_work( int matrix_order, char uplo, char trans,
08352                                 char diag, lapack_int n, lapack_int kd,
08353                                 lapack_int nrhs, const double* ab,
08354                                 lapack_int ldab, const double* b,
08355                                 lapack_int ldb, const double* x, lapack_int ldx,
08356                                 double* ferr, double* berr, double* work,
08357                                 lapack_int* iwork );
08358 lapack_int LAPACKE_ctbrfs_work( int matrix_order, char uplo, char trans,
08359                                 char diag, lapack_int n, lapack_int kd,
08360                                 lapack_int nrhs, const lapack_complex_float* ab,
08361                                 lapack_int ldab, const lapack_complex_float* b,
08362                                 lapack_int ldb, const lapack_complex_float* x,
08363                                 lapack_int ldx, float* ferr, float* berr,
08364                                 lapack_complex_float* work, float* rwork );
08365 lapack_int LAPACKE_ztbrfs_work( int matrix_order, char uplo, char trans,
08366                                 char diag, lapack_int n, lapack_int kd,
08367                                 lapack_int nrhs,
08368                                 const lapack_complex_double* ab,
08369                                 lapack_int ldab, const lapack_complex_double* b,
08370                                 lapack_int ldb, const lapack_complex_double* x,
08371                                 lapack_int ldx, double* ferr, double* berr,
08372                                 lapack_complex_double* work, double* rwork );
08373 
08374 lapack_int LAPACKE_stbtrs_work( int matrix_order, char uplo, char trans,
08375                                 char diag, lapack_int n, lapack_int kd,
08376                                 lapack_int nrhs, const float* ab,
08377                                 lapack_int ldab, float* b, lapack_int ldb );
08378 lapack_int LAPACKE_dtbtrs_work( int matrix_order, char uplo, char trans,
08379                                 char diag, lapack_int n, lapack_int kd,
08380                                 lapack_int nrhs, const double* ab,
08381                                 lapack_int ldab, double* b, lapack_int ldb );
08382 lapack_int LAPACKE_ctbtrs_work( int matrix_order, char uplo, char trans,
08383                                 char diag, lapack_int n, lapack_int kd,
08384                                 lapack_int nrhs, const lapack_complex_float* ab,
08385                                 lapack_int ldab, lapack_complex_float* b,
08386                                 lapack_int ldb );
08387 lapack_int LAPACKE_ztbtrs_work( int matrix_order, char uplo, char trans,
08388                                 char diag, lapack_int n, lapack_int kd,
08389                                 lapack_int nrhs,
08390                                 const lapack_complex_double* ab,
08391                                 lapack_int ldab, lapack_complex_double* b,
08392                                 lapack_int ldb );
08393 
08394 lapack_int LAPACKE_stfsm_work( int matrix_order, char transr, char side,
08395                                char uplo, char trans, char diag, lapack_int m,
08396                                lapack_int n, float alpha, const float* a,
08397                                float* b, lapack_int ldb );
08398 lapack_int LAPACKE_dtfsm_work( int matrix_order, char transr, char side,
08399                                char uplo, char trans, char diag, lapack_int m,
08400                                lapack_int n, double alpha, const double* a,
08401                                double* b, lapack_int ldb );
08402 lapack_int LAPACKE_ctfsm_work( int matrix_order, char transr, char side,
08403                                char uplo, char trans, char diag, lapack_int m,
08404                                lapack_int n, lapack_complex_float alpha,
08405                                const lapack_complex_float* a,
08406                                lapack_complex_float* b, lapack_int ldb );
08407 lapack_int LAPACKE_ztfsm_work( int matrix_order, char transr, char side,
08408                                char uplo, char trans, char diag, lapack_int m,
08409                                lapack_int n, lapack_complex_double alpha,
08410                                const lapack_complex_double* a,
08411                                lapack_complex_double* b, lapack_int ldb );
08412 
08413 lapack_int LAPACKE_stftri_work( int matrix_order, char transr, char uplo,
08414                                 char diag, lapack_int n, float* a );
08415 lapack_int LAPACKE_dtftri_work( int matrix_order, char transr, char uplo,
08416                                 char diag, lapack_int n, double* a );
08417 lapack_int LAPACKE_ctftri_work( int matrix_order, char transr, char uplo,
08418                                 char diag, lapack_int n,
08419                                 lapack_complex_float* a );
08420 lapack_int LAPACKE_ztftri_work( int matrix_order, char transr, char uplo,
08421                                 char diag, lapack_int n,
08422                                 lapack_complex_double* a );
08423 
08424 lapack_int LAPACKE_stfttp_work( int matrix_order, char transr, char uplo,
08425                                 lapack_int n, const float* arf, float* ap );
08426 lapack_int LAPACKE_dtfttp_work( int matrix_order, char transr, char uplo,
08427                                 lapack_int n, const double* arf, double* ap );
08428 lapack_int LAPACKE_ctfttp_work( int matrix_order, char transr, char uplo,
08429                                 lapack_int n, const lapack_complex_float* arf,
08430                                 lapack_complex_float* ap );
08431 lapack_int LAPACKE_ztfttp_work( int matrix_order, char transr, char uplo,
08432                                 lapack_int n, const lapack_complex_double* arf,
08433                                 lapack_complex_double* ap );
08434 
08435 lapack_int LAPACKE_stfttr_work( int matrix_order, char transr, char uplo,
08436                                 lapack_int n, const float* arf, float* a,
08437                                 lapack_int lda );
08438 lapack_int LAPACKE_dtfttr_work( int matrix_order, char transr, char uplo,
08439                                 lapack_int n, const double* arf, double* a,
08440                                 lapack_int lda );
08441 lapack_int LAPACKE_ctfttr_work( int matrix_order, char transr, char uplo,
08442                                 lapack_int n, const lapack_complex_float* arf,
08443                                 lapack_complex_float* a, lapack_int lda );
08444 lapack_int LAPACKE_ztfttr_work( int matrix_order, char transr, char uplo,
08445                                 lapack_int n, const lapack_complex_double* arf,
08446                                 lapack_complex_double* a, lapack_int lda );
08447 
08448 lapack_int LAPACKE_stgevc_work( int matrix_order, char side, char howmny,
08449                                 const lapack_logical* select, lapack_int n,
08450                                 const float* s, lapack_int lds, const float* p,
08451                                 lapack_int ldp, float* vl, lapack_int ldvl,
08452                                 float* vr, lapack_int ldvr, lapack_int mm,
08453                                 lapack_int* m, float* work );
08454 lapack_int LAPACKE_dtgevc_work( int matrix_order, char side, char howmny,
08455                                 const lapack_logical* select, lapack_int n,
08456                                 const double* s, lapack_int lds,
08457                                 const double* p, lapack_int ldp, double* vl,
08458                                 lapack_int ldvl, double* vr, lapack_int ldvr,
08459                                 lapack_int mm, lapack_int* m, double* work );
08460 lapack_int LAPACKE_ctgevc_work( int matrix_order, char side, char howmny,
08461                                 const lapack_logical* select, lapack_int n,
08462                                 const lapack_complex_float* s, lapack_int lds,
08463                                 const lapack_complex_float* p, lapack_int ldp,
08464                                 lapack_complex_float* vl, lapack_int ldvl,
08465                                 lapack_complex_float* vr, lapack_int ldvr,
08466                                 lapack_int mm, lapack_int* m,
08467                                 lapack_complex_float* work, float* rwork );
08468 lapack_int LAPACKE_ztgevc_work( int matrix_order, char side, char howmny,
08469                                 const lapack_logical* select, lapack_int n,
08470                                 const lapack_complex_double* s, lapack_int lds,
08471                                 const lapack_complex_double* p, lapack_int ldp,
08472                                 lapack_complex_double* vl, lapack_int ldvl,
08473                                 lapack_complex_double* vr, lapack_int ldvr,
08474                                 lapack_int mm, lapack_int* m,
08475                                 lapack_complex_double* work, double* rwork );
08476 
08477 lapack_int LAPACKE_stgexc_work( int matrix_order, lapack_logical wantq,
08478                                 lapack_logical wantz, lapack_int n, float* a,
08479                                 lapack_int lda, float* b, lapack_int ldb,
08480                                 float* q, lapack_int ldq, float* z,
08481                                 lapack_int ldz, lapack_int* ifst,
08482                                 lapack_int* ilst, float* work,
08483                                 lapack_int lwork );
08484 lapack_int LAPACKE_dtgexc_work( int matrix_order, lapack_logical wantq,
08485                                 lapack_logical wantz, lapack_int n, double* a,
08486                                 lapack_int lda, double* b, lapack_int ldb,
08487                                 double* q, lapack_int ldq, double* z,
08488                                 lapack_int ldz, lapack_int* ifst,
08489                                 lapack_int* ilst, double* work,
08490                                 lapack_int lwork );
08491 lapack_int LAPACKE_ctgexc_work( int matrix_order, lapack_logical wantq,
08492                                 lapack_logical wantz, lapack_int n,
08493                                 lapack_complex_float* a, lapack_int lda,
08494                                 lapack_complex_float* b, lapack_int ldb,
08495                                 lapack_complex_float* q, lapack_int ldq,
08496                                 lapack_complex_float* z, lapack_int ldz,
08497                                 lapack_int ifst, lapack_int ilst );
08498 lapack_int LAPACKE_ztgexc_work( int matrix_order, lapack_logical wantq,
08499                                 lapack_logical wantz, lapack_int n,
08500                                 lapack_complex_double* a, lapack_int lda,
08501                                 lapack_complex_double* b, lapack_int ldb,
08502                                 lapack_complex_double* q, lapack_int ldq,
08503                                 lapack_complex_double* z, lapack_int ldz,
08504                                 lapack_int ifst, lapack_int ilst );
08505 
08506 lapack_int LAPACKE_stgsen_work( int matrix_order, lapack_int ijob,
08507                                 lapack_logical wantq, lapack_logical wantz,
08508                                 const lapack_logical* select, lapack_int n,
08509                                 float* a, lapack_int lda, float* b,
08510                                 lapack_int ldb, float* alphar, float* alphai,
08511                                 float* beta, float* q, lapack_int ldq, float* z,
08512                                 lapack_int ldz, lapack_int* m, float* pl,
08513                                 float* pr, float* dif, float* work,
08514                                 lapack_int lwork, lapack_int* iwork,
08515                                 lapack_int liwork );
08516 lapack_int LAPACKE_dtgsen_work( int matrix_order, lapack_int ijob,
08517                                 lapack_logical wantq, lapack_logical wantz,
08518                                 const lapack_logical* select, lapack_int n,
08519                                 double* a, lapack_int lda, double* b,
08520                                 lapack_int ldb, double* alphar, double* alphai,
08521                                 double* beta, double* q, lapack_int ldq,
08522                                 double* z, lapack_int ldz, lapack_int* m,
08523                                 double* pl, double* pr, double* dif,
08524                                 double* work, lapack_int lwork,
08525                                 lapack_int* iwork, lapack_int liwork );
08526 lapack_int LAPACKE_ctgsen_work( int matrix_order, lapack_int ijob,
08527                                 lapack_logical wantq, lapack_logical wantz,
08528                                 const lapack_logical* select, lapack_int n,
08529                                 lapack_complex_float* a, lapack_int lda,
08530                                 lapack_complex_float* b, lapack_int ldb,
08531                                 lapack_complex_float* alpha,
08532                                 lapack_complex_float* beta,
08533                                 lapack_complex_float* q, lapack_int ldq,
08534                                 lapack_complex_float* z, lapack_int ldz,
08535                                 lapack_int* m, float* pl, float* pr, float* dif,
08536                                 lapack_complex_float* work, lapack_int lwork,
08537                                 lapack_int* iwork, lapack_int liwork );
08538 lapack_int LAPACKE_ztgsen_work( int matrix_order, lapack_int ijob,
08539                                 lapack_logical wantq, lapack_logical wantz,
08540                                 const lapack_logical* select, lapack_int n,
08541                                 lapack_complex_double* a, lapack_int lda,
08542                                 lapack_complex_double* b, lapack_int ldb,
08543                                 lapack_complex_double* alpha,
08544                                 lapack_complex_double* beta,
08545                                 lapack_complex_double* q, lapack_int ldq,
08546                                 lapack_complex_double* z, lapack_int ldz,
08547                                 lapack_int* m, double* pl, double* pr,
08548                                 double* dif, lapack_complex_double* work,
08549                                 lapack_int lwork, lapack_int* iwork,
08550                                 lapack_int liwork );
08551 
08552 lapack_int LAPACKE_stgsja_work( int matrix_order, char jobu, char jobv,
08553                                 char jobq, lapack_int m, lapack_int p,
08554                                 lapack_int n, lapack_int k, lapack_int l,
08555                                 float* a, lapack_int lda, float* b,
08556                                 lapack_int ldb, float tola, float tolb,
08557                                 float* alpha, float* beta, float* u,
08558                                 lapack_int ldu, float* v, lapack_int ldv,
08559                                 float* q, lapack_int ldq, float* work,
08560                                 lapack_int* ncycle );
08561 lapack_int LAPACKE_dtgsja_work( int matrix_order, char jobu, char jobv,
08562                                 char jobq, lapack_int m, lapack_int p,
08563                                 lapack_int n, lapack_int k, lapack_int l,
08564                                 double* a, lapack_int lda, double* b,
08565                                 lapack_int ldb, double tola, double tolb,
08566                                 double* alpha, double* beta, double* u,
08567                                 lapack_int ldu, double* v, lapack_int ldv,
08568                                 double* q, lapack_int ldq, double* work,
08569                                 lapack_int* ncycle );
08570 lapack_int LAPACKE_ctgsja_work( int matrix_order, char jobu, char jobv,
08571                                 char jobq, lapack_int m, lapack_int p,
08572                                 lapack_int n, lapack_int k, lapack_int l,
08573                                 lapack_complex_float* a, lapack_int lda,
08574                                 lapack_complex_float* b, lapack_int ldb,
08575                                 float tola, float tolb, float* alpha,
08576                                 float* beta, lapack_complex_float* u,
08577                                 lapack_int ldu, lapack_complex_float* v,
08578                                 lapack_int ldv, lapack_complex_float* q,
08579                                 lapack_int ldq, lapack_complex_float* work,
08580                                 lapack_int* ncycle );
08581 lapack_int LAPACKE_ztgsja_work( int matrix_order, char jobu, char jobv,
08582                                 char jobq, lapack_int m, lapack_int p,
08583                                 lapack_int n, lapack_int k, lapack_int l,
08584                                 lapack_complex_double* a, lapack_int lda,
08585                                 lapack_complex_double* b, lapack_int ldb,
08586                                 double tola, double tolb, double* alpha,
08587                                 double* beta, lapack_complex_double* u,
08588                                 lapack_int ldu, lapack_complex_double* v,
08589                                 lapack_int ldv, lapack_complex_double* q,
08590                                 lapack_int ldq, lapack_complex_double* work,
08591                                 lapack_int* ncycle );
08592 
08593 lapack_int LAPACKE_stgsna_work( int matrix_order, char job, char howmny,
08594                                 const lapack_logical* select, lapack_int n,
08595                                 const float* a, lapack_int lda, const float* b,
08596                                 lapack_int ldb, const float* vl,
08597                                 lapack_int ldvl, const float* vr,
08598                                 lapack_int ldvr, float* s, float* dif,
08599                                 lapack_int mm, lapack_int* m, float* work,
08600                                 lapack_int lwork, lapack_int* iwork );
08601 lapack_int LAPACKE_dtgsna_work( int matrix_order, char job, char howmny,
08602                                 const lapack_logical* select, lapack_int n,
08603                                 const double* a, lapack_int lda,
08604                                 const double* b, lapack_int ldb,
08605                                 const double* vl, lapack_int ldvl,
08606                                 const double* vr, lapack_int ldvr, double* s,
08607                                 double* dif, lapack_int mm, lapack_int* m,
08608                                 double* work, lapack_int lwork,
08609                                 lapack_int* iwork );
08610 lapack_int LAPACKE_ctgsna_work( int matrix_order, char job, char howmny,
08611                                 const lapack_logical* select, lapack_int n,
08612                                 const lapack_complex_float* a, lapack_int lda,
08613                                 const lapack_complex_float* b, lapack_int ldb,
08614                                 const lapack_complex_float* vl, lapack_int ldvl,
08615                                 const lapack_complex_float* vr, lapack_int ldvr,
08616                                 float* s, float* dif, lapack_int mm,
08617                                 lapack_int* m, lapack_complex_float* work,
08618                                 lapack_int lwork, lapack_int* iwork );
08619 lapack_int LAPACKE_ztgsna_work( int matrix_order, char job, char howmny,
08620                                 const lapack_logical* select, lapack_int n,
08621                                 const lapack_complex_double* a, lapack_int lda,
08622                                 const lapack_complex_double* b, lapack_int ldb,
08623                                 const lapack_complex_double* vl,
08624                                 lapack_int ldvl,
08625                                 const lapack_complex_double* vr,
08626                                 lapack_int ldvr, double* s, double* dif,
08627                                 lapack_int mm, lapack_int* m,
08628                                 lapack_complex_double* work, lapack_int lwork,
08629                                 lapack_int* iwork );
08630 
08631 lapack_int LAPACKE_stgsyl_work( int matrix_order, char trans, lapack_int ijob,
08632                                 lapack_int m, lapack_int n, const float* a,
08633                                 lapack_int lda, const float* b, lapack_int ldb,
08634                                 float* c, lapack_int ldc, const float* d,
08635                                 lapack_int ldd, const float* e, lapack_int lde,
08636                                 float* f, lapack_int ldf, float* scale,
08637                                 float* dif, float* work, lapack_int lwork,
08638                                 lapack_int* iwork );
08639 lapack_int LAPACKE_dtgsyl_work( int matrix_order, char trans, lapack_int ijob,
08640                                 lapack_int m, lapack_int n, const double* a,
08641                                 lapack_int lda, const double* b, lapack_int ldb,
08642                                 double* c, lapack_int ldc, const double* d,
08643                                 lapack_int ldd, const double* e, lapack_int lde,
08644                                 double* f, lapack_int ldf, double* scale,
08645                                 double* dif, double* work, lapack_int lwork,
08646                                 lapack_int* iwork );
08647 lapack_int LAPACKE_ctgsyl_work( int matrix_order, char trans, lapack_int ijob,
08648                                 lapack_int m, lapack_int n,
08649                                 const lapack_complex_float* a, lapack_int lda,
08650                                 const lapack_complex_float* b, lapack_int ldb,
08651                                 lapack_complex_float* c, lapack_int ldc,
08652                                 const lapack_complex_float* d, lapack_int ldd,
08653                                 const lapack_complex_float* e, lapack_int lde,
08654                                 lapack_complex_float* f, lapack_int ldf,
08655                                 float* scale, float* dif,
08656                                 lapack_complex_float* work, lapack_int lwork,
08657                                 lapack_int* iwork );
08658 lapack_int LAPACKE_ztgsyl_work( int matrix_order, char trans, lapack_int ijob,
08659                                 lapack_int m, lapack_int n,
08660                                 const lapack_complex_double* a, lapack_int lda,
08661                                 const lapack_complex_double* b, lapack_int ldb,
08662                                 lapack_complex_double* c, lapack_int ldc,
08663                                 const lapack_complex_double* d, lapack_int ldd,
08664                                 const lapack_complex_double* e, lapack_int lde,
08665                                 lapack_complex_double* f, lapack_int ldf,
08666                                 double* scale, double* dif,
08667                                 lapack_complex_double* work, lapack_int lwork,
08668                                 lapack_int* iwork );
08669 
08670 lapack_int LAPACKE_stpcon_work( int matrix_order, char norm, char uplo,
08671                                 char diag, lapack_int n, const float* ap,
08672                                 float* rcond, float* work, lapack_int* iwork );
08673 lapack_int LAPACKE_dtpcon_work( int matrix_order, char norm, char uplo,
08674                                 char diag, lapack_int n, const double* ap,
08675                                 double* rcond, double* work,
08676                                 lapack_int* iwork );
08677 lapack_int LAPACKE_ctpcon_work( int matrix_order, char norm, char uplo,
08678                                 char diag, lapack_int n,
08679                                 const lapack_complex_float* ap, float* rcond,
08680                                 lapack_complex_float* work, float* rwork );
08681 lapack_int LAPACKE_ztpcon_work( int matrix_order, char norm, char uplo,
08682                                 char diag, lapack_int n,
08683                                 const lapack_complex_double* ap, double* rcond,
08684                                 lapack_complex_double* work, double* rwork );
08685 
08686 lapack_int LAPACKE_stprfs_work( int matrix_order, char uplo, char trans,
08687                                 char diag, lapack_int n, lapack_int nrhs,
08688                                 const float* ap, const float* b, lapack_int ldb,
08689                                 const float* x, lapack_int ldx, float* ferr,
08690                                 float* berr, float* work, lapack_int* iwork );
08691 lapack_int LAPACKE_dtprfs_work( int matrix_order, char uplo, char trans,
08692                                 char diag, lapack_int n, lapack_int nrhs,
08693                                 const double* ap, const double* b,
08694                                 lapack_int ldb, const double* x, lapack_int ldx,
08695                                 double* ferr, double* berr, double* work,
08696                                 lapack_int* iwork );
08697 lapack_int LAPACKE_ctprfs_work( int matrix_order, char uplo, char trans,
08698                                 char diag, lapack_int n, lapack_int nrhs,
08699                                 const lapack_complex_float* ap,
08700                                 const lapack_complex_float* b, lapack_int ldb,
08701                                 const lapack_complex_float* x, lapack_int ldx,
08702                                 float* ferr, float* berr,
08703                                 lapack_complex_float* work, float* rwork );
08704 lapack_int LAPACKE_ztprfs_work( int matrix_order, char uplo, char trans,
08705                                 char diag, lapack_int n, lapack_int nrhs,
08706                                 const lapack_complex_double* ap,
08707                                 const lapack_complex_double* b, lapack_int ldb,
08708                                 const lapack_complex_double* x, lapack_int ldx,
08709                                 double* ferr, double* berr,
08710                                 lapack_complex_double* work, double* rwork );
08711 
08712 lapack_int LAPACKE_stptri_work( int matrix_order, char uplo, char diag,
08713                                 lapack_int n, float* ap );
08714 lapack_int LAPACKE_dtptri_work( int matrix_order, char uplo, char diag,
08715                                 lapack_int n, double* ap );
08716 lapack_int LAPACKE_ctptri_work( int matrix_order, char uplo, char diag,
08717                                 lapack_int n, lapack_complex_float* ap );
08718 lapack_int LAPACKE_ztptri_work( int matrix_order, char uplo, char diag,
08719                                 lapack_int n, lapack_complex_double* ap );
08720 
08721 lapack_int LAPACKE_stptrs_work( int matrix_order, char uplo, char trans,
08722                                 char diag, lapack_int n, lapack_int nrhs,
08723                                 const float* ap, float* b, lapack_int ldb );
08724 lapack_int LAPACKE_dtptrs_work( int matrix_order, char uplo, char trans,
08725                                 char diag, lapack_int n, lapack_int nrhs,
08726                                 const double* ap, double* b, lapack_int ldb );
08727 lapack_int LAPACKE_ctptrs_work( int matrix_order, char uplo, char trans,
08728                                 char diag, lapack_int n, lapack_int nrhs,
08729                                 const lapack_complex_float* ap,
08730                                 lapack_complex_float* b, lapack_int ldb );
08731 lapack_int LAPACKE_ztptrs_work( int matrix_order, char uplo, char trans,
08732                                 char diag, lapack_int n, lapack_int nrhs,
08733                                 const lapack_complex_double* ap,
08734                                 lapack_complex_double* b, lapack_int ldb );
08735 
08736 lapack_int LAPACKE_stpttf_work( int matrix_order, char transr, char uplo,
08737                                 lapack_int n, const float* ap, float* arf );
08738 lapack_int LAPACKE_dtpttf_work( int matrix_order, char transr, char uplo,
08739                                 lapack_int n, const double* ap, double* arf );
08740 lapack_int LAPACKE_ctpttf_work( int matrix_order, char transr, char uplo,
08741                                 lapack_int n, const lapack_complex_float* ap,
08742                                 lapack_complex_float* arf );
08743 lapack_int LAPACKE_ztpttf_work( int matrix_order, char transr, char uplo,
08744                                 lapack_int n, const lapack_complex_double* ap,
08745                                 lapack_complex_double* arf );
08746 
08747 lapack_int LAPACKE_stpttr_work( int matrix_order, char uplo, lapack_int n,
08748                                 const float* ap, float* a, lapack_int lda );
08749 lapack_int LAPACKE_dtpttr_work( int matrix_order, char uplo, lapack_int n,
08750                                 const double* ap, double* a, lapack_int lda );
08751 lapack_int LAPACKE_ctpttr_work( int matrix_order, char uplo, lapack_int n,
08752                                 const lapack_complex_float* ap,
08753                                 lapack_complex_float* a, lapack_int lda );
08754 lapack_int LAPACKE_ztpttr_work( int matrix_order, char uplo, lapack_int n,
08755                                 const lapack_complex_double* ap,
08756                                 lapack_complex_double* a, lapack_int lda );
08757 
08758 lapack_int LAPACKE_strcon_work( int matrix_order, char norm, char uplo,
08759                                 char diag, lapack_int n, const float* a,
08760                                 lapack_int lda, float* rcond, float* work,
08761                                 lapack_int* iwork );
08762 lapack_int LAPACKE_dtrcon_work( int matrix_order, char norm, char uplo,
08763                                 char diag, lapack_int n, const double* a,
08764                                 lapack_int lda, double* rcond, double* work,
08765                                 lapack_int* iwork );
08766 lapack_int LAPACKE_ctrcon_work( int matrix_order, char norm, char uplo,
08767                                 char diag, lapack_int n,
08768                                 const lapack_complex_float* a, lapack_int lda,
08769                                 float* rcond, lapack_complex_float* work,
08770                                 float* rwork );
08771 lapack_int LAPACKE_ztrcon_work( int matrix_order, char norm, char uplo,
08772                                 char diag, lapack_int n,
08773                                 const lapack_complex_double* a, lapack_int lda,
08774                                 double* rcond, lapack_complex_double* work,
08775                                 double* rwork );
08776 
08777 lapack_int LAPACKE_strevc_work( int matrix_order, char side, char howmny,
08778                                 lapack_logical* select, lapack_int n,
08779                                 const float* t, lapack_int ldt, float* vl,
08780                                 lapack_int ldvl, float* vr, lapack_int ldvr,
08781                                 lapack_int mm, lapack_int* m, float* work );
08782 lapack_int LAPACKE_dtrevc_work( int matrix_order, char side, char howmny,
08783                                 lapack_logical* select, lapack_int n,
08784                                 const double* t, lapack_int ldt, double* vl,
08785                                 lapack_int ldvl, double* vr, lapack_int ldvr,
08786                                 lapack_int mm, lapack_int* m, double* work );
08787 lapack_int LAPACKE_ctrevc_work( int matrix_order, char side, char howmny,
08788                                 const lapack_logical* select, lapack_int n,
08789                                 lapack_complex_float* t, lapack_int ldt,
08790                                 lapack_complex_float* vl, lapack_int ldvl,
08791                                 lapack_complex_float* vr, lapack_int ldvr,
08792                                 lapack_int mm, lapack_int* m,
08793                                 lapack_complex_float* work, float* rwork );
08794 lapack_int LAPACKE_ztrevc_work( int matrix_order, char side, char howmny,
08795                                 const lapack_logical* select, lapack_int n,
08796                                 lapack_complex_double* t, lapack_int ldt,
08797                                 lapack_complex_double* vl, lapack_int ldvl,
08798                                 lapack_complex_double* vr, lapack_int ldvr,
08799                                 lapack_int mm, lapack_int* m,
08800                                 lapack_complex_double* work, double* rwork );
08801 
08802 lapack_int LAPACKE_strexc_work( int matrix_order, char compq, lapack_int n,
08803                                 float* t, lapack_int ldt, float* q,
08804                                 lapack_int ldq, lapack_int* ifst,
08805                                 lapack_int* ilst, float* work );
08806 lapack_int LAPACKE_dtrexc_work( int matrix_order, char compq, lapack_int n,
08807                                 double* t, lapack_int ldt, double* q,
08808                                 lapack_int ldq, lapack_int* ifst,
08809                                 lapack_int* ilst, double* work );
08810 lapack_int LAPACKE_ctrexc_work( int matrix_order, char compq, lapack_int n,
08811                                 lapack_complex_float* t, lapack_int ldt,
08812                                 lapack_complex_float* q, lapack_int ldq,
08813                                 lapack_int ifst, lapack_int ilst );
08814 lapack_int LAPACKE_ztrexc_work( int matrix_order, char compq, lapack_int n,
08815                                 lapack_complex_double* t, lapack_int ldt,
08816                                 lapack_complex_double* q, lapack_int ldq,
08817                                 lapack_int ifst, lapack_int ilst );
08818 
08819 lapack_int LAPACKE_strrfs_work( int matrix_order, char uplo, char trans,
08820                                 char diag, lapack_int n, lapack_int nrhs,
08821                                 const float* a, lapack_int lda, const float* b,
08822                                 lapack_int ldb, const float* x, lapack_int ldx,
08823                                 float* ferr, float* berr, float* work,
08824                                 lapack_int* iwork );
08825 lapack_int LAPACKE_dtrrfs_work( int matrix_order, char uplo, char trans,
08826                                 char diag, lapack_int n, lapack_int nrhs,
08827                                 const double* a, lapack_int lda,
08828                                 const double* b, lapack_int ldb,
08829                                 const double* x, lapack_int ldx, double* ferr,
08830                                 double* berr, double* work, lapack_int* iwork );
08831 lapack_int LAPACKE_ctrrfs_work( int matrix_order, char uplo, char trans,
08832                                 char diag, lapack_int n, lapack_int nrhs,
08833                                 const lapack_complex_float* a, lapack_int lda,
08834                                 const lapack_complex_float* b, lapack_int ldb,
08835                                 const lapack_complex_float* x, lapack_int ldx,
08836                                 float* ferr, float* berr,
08837                                 lapack_complex_float* work, float* rwork );
08838 lapack_int LAPACKE_ztrrfs_work( int matrix_order, char uplo, char trans,
08839                                 char diag, lapack_int n, lapack_int nrhs,
08840                                 const lapack_complex_double* a, lapack_int lda,
08841                                 const lapack_complex_double* b, lapack_int ldb,
08842                                 const lapack_complex_double* x, lapack_int ldx,
08843                                 double* ferr, double* berr,
08844                                 lapack_complex_double* work, double* rwork );
08845 
08846 lapack_int LAPACKE_strsen_work( int matrix_order, char job, char compq,
08847                                 const lapack_logical* select, lapack_int n,
08848                                 float* t, lapack_int ldt, float* q,
08849                                 lapack_int ldq, float* wr, float* wi,
08850                                 lapack_int* m, float* s, float* sep,
08851                                 float* work, lapack_int lwork,
08852                                 lapack_int* iwork, lapack_int liwork );
08853 lapack_int LAPACKE_dtrsen_work( int matrix_order, char job, char compq,
08854                                 const lapack_logical* select, lapack_int n,
08855                                 double* t, lapack_int ldt, double* q,
08856                                 lapack_int ldq, double* wr, double* wi,
08857                                 lapack_int* m, double* s, double* sep,
08858                                 double* work, lapack_int lwork,
08859                                 lapack_int* iwork, lapack_int liwork );
08860 lapack_int LAPACKE_ctrsen_work( int matrix_order, char job, char compq,
08861                                 const lapack_logical* select, lapack_int n,
08862                                 lapack_complex_float* t, lapack_int ldt,
08863                                 lapack_complex_float* q, lapack_int ldq,
08864                                 lapack_complex_float* w, lapack_int* m,
08865                                 float* s, float* sep,
08866                                 lapack_complex_float* work, lapack_int lwork );
08867 lapack_int LAPACKE_ztrsen_work( int matrix_order, char job, char compq,
08868                                 const lapack_logical* select, lapack_int n,
08869                                 lapack_complex_double* t, lapack_int ldt,
08870                                 lapack_complex_double* q, lapack_int ldq,
08871                                 lapack_complex_double* w, lapack_int* m,
08872                                 double* s, double* sep,
08873                                 lapack_complex_double* work, lapack_int lwork );
08874 
08875 lapack_int LAPACKE_strsna_work( int matrix_order, char job, char howmny,
08876                                 const lapack_logical* select, lapack_int n,
08877                                 const float* t, lapack_int ldt, const float* vl,
08878                                 lapack_int ldvl, const float* vr,
08879                                 lapack_int ldvr, float* s, float* sep,
08880                                 lapack_int mm, lapack_int* m, float* work,
08881                                 lapack_int ldwork, lapack_int* iwork );
08882 lapack_int LAPACKE_dtrsna_work( int matrix_order, char job, char howmny,
08883                                 const lapack_logical* select, lapack_int n,
08884                                 const double* t, lapack_int ldt,
08885                                 const double* vl, lapack_int ldvl,
08886                                 const double* vr, lapack_int ldvr, double* s,
08887                                 double* sep, lapack_int mm, lapack_int* m,
08888                                 double* work, lapack_int ldwork,
08889                                 lapack_int* iwork );
08890 lapack_int LAPACKE_ctrsna_work( int matrix_order, char job, char howmny,
08891                                 const lapack_logical* select, lapack_int n,
08892                                 const lapack_complex_float* t, lapack_int ldt,
08893                                 const lapack_complex_float* vl, lapack_int ldvl,
08894                                 const lapack_complex_float* vr, lapack_int ldvr,
08895                                 float* s, float* sep, lapack_int mm,
08896                                 lapack_int* m, lapack_complex_float* work,
08897                                 lapack_int ldwork, float* rwork );
08898 lapack_int LAPACKE_ztrsna_work( int matrix_order, char job, char howmny,
08899                                 const lapack_logical* select, lapack_int n,
08900                                 const lapack_complex_double* t, lapack_int ldt,
08901                                 const lapack_complex_double* vl,
08902                                 lapack_int ldvl,
08903                                 const lapack_complex_double* vr,
08904                                 lapack_int ldvr, double* s, double* sep,
08905                                 lapack_int mm, lapack_int* m,
08906                                 lapack_complex_double* work, lapack_int ldwork,
08907                                 double* rwork );
08908 
08909 lapack_int LAPACKE_strsyl_work( int matrix_order, char trana, char tranb,
08910                                 lapack_int isgn, lapack_int m, lapack_int n,
08911                                 const float* a, lapack_int lda, const float* b,
08912                                 lapack_int ldb, float* c, lapack_int ldc,
08913                                 float* scale );
08914 lapack_int LAPACKE_dtrsyl_work( int matrix_order, char trana, char tranb,
08915                                 lapack_int isgn, lapack_int m, lapack_int n,
08916                                 const double* a, lapack_int lda,
08917                                 const double* b, lapack_int ldb, double* c,
08918                                 lapack_int ldc, double* scale );
08919 lapack_int LAPACKE_ctrsyl_work( int matrix_order, char trana, char tranb,
08920                                 lapack_int isgn, lapack_int m, lapack_int n,
08921                                 const lapack_complex_float* a, lapack_int lda,
08922                                 const lapack_complex_float* b, lapack_int ldb,
08923                                 lapack_complex_float* c, lapack_int ldc,
08924                                 float* scale );
08925 lapack_int LAPACKE_ztrsyl_work( int matrix_order, char trana, char tranb,
08926                                 lapack_int isgn, lapack_int m, lapack_int n,
08927                                 const lapack_complex_double* a, lapack_int lda,
08928                                 const lapack_complex_double* b, lapack_int ldb,
08929                                 lapack_complex_double* c, lapack_int ldc,
08930                                 double* scale );
08931 
08932 lapack_int LAPACKE_strtri_work( int matrix_order, char uplo, char diag,
08933                                 lapack_int n, float* a, lapack_int lda );
08934 lapack_int LAPACKE_dtrtri_work( int matrix_order, char uplo, char diag,
08935                                 lapack_int n, double* a, lapack_int lda );
08936 lapack_int LAPACKE_ctrtri_work( int matrix_order, char uplo, char diag,
08937                                 lapack_int n, lapack_complex_float* a,
08938                                 lapack_int lda );
08939 lapack_int LAPACKE_ztrtri_work( int matrix_order, char uplo, char diag,
08940                                 lapack_int n, lapack_complex_double* a,
08941                                 lapack_int lda );
08942 
08943 lapack_int LAPACKE_strtrs_work( int matrix_order, char uplo, char trans,
08944                                 char diag, lapack_int n, lapack_int nrhs,
08945                                 const float* a, lapack_int lda, float* b,
08946                                 lapack_int ldb );
08947 lapack_int LAPACKE_dtrtrs_work( int matrix_order, char uplo, char trans,
08948                                 char diag, lapack_int n, lapack_int nrhs,
08949                                 const double* a, lapack_int lda, double* b,
08950                                 lapack_int ldb );
08951 lapack_int LAPACKE_ctrtrs_work( int matrix_order, char uplo, char trans,
08952                                 char diag, lapack_int n, lapack_int nrhs,
08953                                 const lapack_complex_float* a, lapack_int lda,
08954                                 lapack_complex_float* b, lapack_int ldb );
08955 lapack_int LAPACKE_ztrtrs_work( int matrix_order, char uplo, char trans,
08956                                 char diag, lapack_int n, lapack_int nrhs,
08957                                 const lapack_complex_double* a, lapack_int lda,
08958                                 lapack_complex_double* b, lapack_int ldb );
08959 
08960 lapack_int LAPACKE_strttf_work( int matrix_order, char transr, char uplo,
08961                                 lapack_int n, const float* a, lapack_int lda,
08962                                 float* arf );
08963 lapack_int LAPACKE_dtrttf_work( int matrix_order, char transr, char uplo,
08964                                 lapack_int n, const double* a, lapack_int lda,
08965                                 double* arf );
08966 lapack_int LAPACKE_ctrttf_work( int matrix_order, char transr, char uplo,
08967                                 lapack_int n, const lapack_complex_float* a,
08968                                 lapack_int lda, lapack_complex_float* arf );
08969 lapack_int LAPACKE_ztrttf_work( int matrix_order, char transr, char uplo,
08970                                 lapack_int n, const lapack_complex_double* a,
08971                                 lapack_int lda, lapack_complex_double* arf );
08972 
08973 lapack_int LAPACKE_strttp_work( int matrix_order, char uplo, lapack_int n,
08974                                 const float* a, lapack_int lda, float* ap );
08975 lapack_int LAPACKE_dtrttp_work( int matrix_order, char uplo, lapack_int n,
08976                                 const double* a, lapack_int lda, double* ap );
08977 lapack_int LAPACKE_ctrttp_work( int matrix_order, char uplo, lapack_int n,
08978                                 const lapack_complex_float* a, lapack_int lda,
08979                                 lapack_complex_float* ap );
08980 lapack_int LAPACKE_ztrttp_work( int matrix_order, char uplo, lapack_int n,
08981                                 const lapack_complex_double* a, lapack_int lda,
08982                                 lapack_complex_double* ap );
08983 
08984 lapack_int LAPACKE_stzrzf_work( int matrix_order, lapack_int m, lapack_int n,
08985                                 float* a, lapack_int lda, float* tau,
08986                                 float* work, lapack_int lwork );
08987 lapack_int LAPACKE_dtzrzf_work( int matrix_order, lapack_int m, lapack_int n,
08988                                 double* a, lapack_int lda, double* tau,
08989                                 double* work, lapack_int lwork );
08990 lapack_int LAPACKE_ctzrzf_work( int matrix_order, lapack_int m, lapack_int n,
08991                                 lapack_complex_float* a, lapack_int lda,
08992                                 lapack_complex_float* tau,
08993                                 lapack_complex_float* work, lapack_int lwork );
08994 lapack_int LAPACKE_ztzrzf_work( int matrix_order, lapack_int m, lapack_int n,
08995                                 lapack_complex_double* a, lapack_int lda,
08996                                 lapack_complex_double* tau,
08997                                 lapack_complex_double* work, lapack_int lwork );
08998 
08999 lapack_int LAPACKE_cungbr_work( int matrix_order, char vect, lapack_int m,
09000                                 lapack_int n, lapack_int k,
09001                                 lapack_complex_float* a, lapack_int lda,
09002                                 const lapack_complex_float* tau,
09003                                 lapack_complex_float* work, lapack_int lwork );
09004 lapack_int LAPACKE_zungbr_work( int matrix_order, char vect, lapack_int m,
09005                                 lapack_int n, lapack_int k,
09006                                 lapack_complex_double* a, lapack_int lda,
09007                                 const lapack_complex_double* tau,
09008                                 lapack_complex_double* work, lapack_int lwork );
09009 
09010 lapack_int LAPACKE_cunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
09011                                 lapack_int ihi, lapack_complex_float* a,
09012                                 lapack_int lda, const lapack_complex_float* tau,
09013                                 lapack_complex_float* work, lapack_int lwork );
09014 lapack_int LAPACKE_zunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
09015                                 lapack_int ihi, lapack_complex_double* a,
09016                                 lapack_int lda,
09017                                 const lapack_complex_double* tau,
09018                                 lapack_complex_double* work, lapack_int lwork );
09019 
09020 lapack_int LAPACKE_cunglq_work( int matrix_order, lapack_int m, lapack_int n,
09021                                 lapack_int k, lapack_complex_float* a,
09022                                 lapack_int lda, const lapack_complex_float* tau,
09023                                 lapack_complex_float* work, lapack_int lwork );
09024 lapack_int LAPACKE_zunglq_work( int matrix_order, lapack_int m, lapack_int n,
09025                                 lapack_int k, lapack_complex_double* a,
09026                                 lapack_int lda,
09027                                 const lapack_complex_double* tau,
09028                                 lapack_complex_double* work, lapack_int lwork );
09029 
09030 lapack_int LAPACKE_cungql_work( int matrix_order, lapack_int m, lapack_int n,
09031                                 lapack_int k, lapack_complex_float* a,
09032                                 lapack_int lda, const lapack_complex_float* tau,
09033                                 lapack_complex_float* work, lapack_int lwork );
09034 lapack_int LAPACKE_zungql_work( int matrix_order, lapack_int m, lapack_int n,
09035                                 lapack_int k, lapack_complex_double* a,
09036                                 lapack_int lda,
09037                                 const lapack_complex_double* tau,
09038                                 lapack_complex_double* work, lapack_int lwork );
09039 
09040 lapack_int LAPACKE_cungqr_work( int matrix_order, lapack_int m, lapack_int n,
09041                                 lapack_int k, lapack_complex_float* a,
09042                                 lapack_int lda, const lapack_complex_float* tau,
09043                                 lapack_complex_float* work, lapack_int lwork );
09044 lapack_int LAPACKE_zungqr_work( int matrix_order, lapack_int m, lapack_int n,
09045                                 lapack_int k, lapack_complex_double* a,
09046                                 lapack_int lda,
09047                                 const lapack_complex_double* tau,
09048                                 lapack_complex_double* work, lapack_int lwork );
09049 
09050 lapack_int LAPACKE_cungrq_work( int matrix_order, lapack_int m, lapack_int n,
09051                                 lapack_int k, lapack_complex_float* a,
09052                                 lapack_int lda, const lapack_complex_float* tau,
09053                                 lapack_complex_float* work, lapack_int lwork );
09054 lapack_int LAPACKE_zungrq_work( int matrix_order, lapack_int m, lapack_int n,
09055                                 lapack_int k, lapack_complex_double* a,
09056                                 lapack_int lda,
09057                                 const lapack_complex_double* tau,
09058                                 lapack_complex_double* work, lapack_int lwork );
09059 
09060 lapack_int LAPACKE_cungtr_work( int matrix_order, char uplo, lapack_int n,
09061                                 lapack_complex_float* a, lapack_int lda,
09062                                 const lapack_complex_float* tau,
09063                                 lapack_complex_float* work, lapack_int lwork );
09064 lapack_int LAPACKE_zungtr_work( int matrix_order, char uplo, lapack_int n,
09065                                 lapack_complex_double* a, lapack_int lda,
09066                                 const lapack_complex_double* tau,
09067                                 lapack_complex_double* work, lapack_int lwork );
09068 
09069 lapack_int LAPACKE_cunmbr_work( int matrix_order, char vect, char side,
09070                                 char trans, lapack_int m, lapack_int n,
09071                                 lapack_int k, const lapack_complex_float* a,
09072                                 lapack_int lda, const lapack_complex_float* tau,
09073                                 lapack_complex_float* c, lapack_int ldc,
09074                                 lapack_complex_float* work, lapack_int lwork );
09075 lapack_int LAPACKE_zunmbr_work( int matrix_order, char vect, char side,
09076                                 char trans, lapack_int m, lapack_int n,
09077                                 lapack_int k, const lapack_complex_double* a,
09078                                 lapack_int lda,
09079                                 const lapack_complex_double* tau,
09080                                 lapack_complex_double* c, lapack_int ldc,
09081                                 lapack_complex_double* work, lapack_int lwork );
09082 
09083 lapack_int LAPACKE_cunmhr_work( int matrix_order, char side, char trans,
09084                                 lapack_int m, lapack_int n, lapack_int ilo,
09085                                 lapack_int ihi, const lapack_complex_float* a,
09086                                 lapack_int lda, const lapack_complex_float* tau,
09087                                 lapack_complex_float* c, lapack_int ldc,
09088                                 lapack_complex_float* work, lapack_int lwork );
09089 lapack_int LAPACKE_zunmhr_work( int matrix_order, char side, char trans,
09090                                 lapack_int m, lapack_int n, lapack_int ilo,
09091                                 lapack_int ihi, const lapack_complex_double* a,
09092                                 lapack_int lda,
09093                                 const lapack_complex_double* tau,
09094                                 lapack_complex_double* c, lapack_int ldc,
09095                                 lapack_complex_double* work, lapack_int lwork );
09096 
09097 lapack_int LAPACKE_cunmlq_work( int matrix_order, char side, char trans,
09098                                 lapack_int m, lapack_int n, lapack_int k,
09099                                 const lapack_complex_float* a, lapack_int lda,
09100                                 const lapack_complex_float* tau,
09101                                 lapack_complex_float* c, lapack_int ldc,
09102                                 lapack_complex_float* work, lapack_int lwork );
09103 lapack_int LAPACKE_zunmlq_work( int matrix_order, char side, char trans,
09104                                 lapack_int m, lapack_int n, lapack_int k,
09105                                 const lapack_complex_double* a, lapack_int lda,
09106                                 const lapack_complex_double* tau,
09107                                 lapack_complex_double* c, lapack_int ldc,
09108                                 lapack_complex_double* work, lapack_int lwork );
09109 
09110 lapack_int LAPACKE_cunmql_work( int matrix_order, char side, char trans,
09111                                 lapack_int m, lapack_int n, lapack_int k,
09112                                 const lapack_complex_float* a, lapack_int lda,
09113                                 const lapack_complex_float* tau,
09114                                 lapack_complex_float* c, lapack_int ldc,
09115                                 lapack_complex_float* work, lapack_int lwork );
09116 lapack_int LAPACKE_zunmql_work( int matrix_order, char side, char trans,
09117                                 lapack_int m, lapack_int n, lapack_int k,
09118                                 const lapack_complex_double* a, lapack_int lda,
09119                                 const lapack_complex_double* tau,
09120                                 lapack_complex_double* c, lapack_int ldc,
09121                                 lapack_complex_double* work, lapack_int lwork );
09122 
09123 lapack_int LAPACKE_cunmqr_work( int matrix_order, char side, char trans,
09124                                 lapack_int m, lapack_int n, lapack_int k,
09125                                 const lapack_complex_float* a, lapack_int lda,
09126                                 const lapack_complex_float* tau,
09127                                 lapack_complex_float* c, lapack_int ldc,
09128                                 lapack_complex_float* work, lapack_int lwork );
09129 lapack_int LAPACKE_zunmqr_work( int matrix_order, char side, char trans,
09130                                 lapack_int m, lapack_int n, lapack_int k,
09131                                 const lapack_complex_double* a, lapack_int lda,
09132                                 const lapack_complex_double* tau,
09133                                 lapack_complex_double* c, lapack_int ldc,
09134                                 lapack_complex_double* work, lapack_int lwork );
09135 
09136 lapack_int LAPACKE_cunmrq_work( int matrix_order, char side, char trans,
09137                                 lapack_int m, lapack_int n, lapack_int k,
09138                                 const lapack_complex_float* a, lapack_int lda,
09139                                 const lapack_complex_float* tau,
09140                                 lapack_complex_float* c, lapack_int ldc,
09141                                 lapack_complex_float* work, lapack_int lwork );
09142 lapack_int LAPACKE_zunmrq_work( int matrix_order, char side, char trans,
09143                                 lapack_int m, lapack_int n, lapack_int k,
09144                                 const lapack_complex_double* a, lapack_int lda,
09145                                 const lapack_complex_double* tau,
09146                                 lapack_complex_double* c, lapack_int ldc,
09147                                 lapack_complex_double* work, lapack_int lwork );
09148 
09149 lapack_int LAPACKE_cunmrz_work( int matrix_order, char side, char trans,
09150                                 lapack_int m, lapack_int n, lapack_int k,
09151                                 lapack_int l, const lapack_complex_float* a,
09152                                 lapack_int lda, const lapack_complex_float* tau,
09153                                 lapack_complex_float* c, lapack_int ldc,
09154                                 lapack_complex_float* work, lapack_int lwork );
09155 lapack_int LAPACKE_zunmrz_work( int matrix_order, char side, char trans,
09156                                 lapack_int m, lapack_int n, lapack_int k,
09157                                 lapack_int l, const lapack_complex_double* a,
09158                                 lapack_int lda,
09159                                 const lapack_complex_double* tau,
09160                                 lapack_complex_double* c, lapack_int ldc,
09161                                 lapack_complex_double* work, lapack_int lwork );
09162 
09163 lapack_int LAPACKE_cunmtr_work( int matrix_order, char side, char uplo,
09164                                 char trans, lapack_int m, lapack_int n,
09165                                 const lapack_complex_float* a, lapack_int lda,
09166                                 const lapack_complex_float* tau,
09167                                 lapack_complex_float* c, lapack_int ldc,
09168                                 lapack_complex_float* work, lapack_int lwork );
09169 lapack_int LAPACKE_zunmtr_work( int matrix_order, char side, char uplo,
09170                                 char trans, lapack_int m, lapack_int n,
09171                                 const lapack_complex_double* a, lapack_int lda,
09172                                 const lapack_complex_double* tau,
09173                                 lapack_complex_double* c, lapack_int ldc,
09174                                 lapack_complex_double* work, lapack_int lwork );
09175 
09176 lapack_int LAPACKE_cupgtr_work( int matrix_order, char uplo, lapack_int n,
09177                                 const lapack_complex_float* ap,
09178                                 const lapack_complex_float* tau,
09179                                 lapack_complex_float* q, lapack_int ldq,
09180                                 lapack_complex_float* work );
09181 lapack_int LAPACKE_zupgtr_work( int matrix_order, char uplo, lapack_int n,
09182                                 const lapack_complex_double* ap,
09183                                 const lapack_complex_double* tau,
09184                                 lapack_complex_double* q, lapack_int ldq,
09185                                 lapack_complex_double* work );
09186 
09187 lapack_int LAPACKE_cupmtr_work( int matrix_order, char side, char uplo,
09188                                 char trans, lapack_int m, lapack_int n,
09189                                 const lapack_complex_float* ap,
09190                                 const lapack_complex_float* tau,
09191                                 lapack_complex_float* c, lapack_int ldc,
09192                                 lapack_complex_float* work );
09193 lapack_int LAPACKE_zupmtr_work( int matrix_order, char side, char uplo,
09194                                 char trans, lapack_int m, lapack_int n,
09195                                 const lapack_complex_double* ap,
09196                                 const lapack_complex_double* tau,
09197                                 lapack_complex_double* c, lapack_int ldc,
09198                                 lapack_complex_double* work );
09199 
09200 #define LAPACK_sgetrf LAPACK_NAME(sgetrf,SGETRF)
09201 #define LAPACK_dgetrf LAPACK_NAME(dgetrf,DGETRF)
09202 #define LAPACK_cgetrf LAPACK_NAME(cgetrf,CGETRF)
09203 #define LAPACK_zgetrf LAPACK_NAME(zgetrf,ZGETRF)
09204 #define LAPACK_sgbtrf LAPACK_NAME(sgbtrf,SGBTRF)
09205 #define LAPACK_dgbtrf LAPACK_NAME(dgbtrf,DGBTRF)
09206 #define LAPACK_cgbtrf LAPACK_NAME(cgbtrf,CGBTRF)
09207 #define LAPACK_zgbtrf LAPACK_NAME(zgbtrf,ZGBTRF)
09208 #define LAPACK_sgttrf LAPACK_NAME(sgttrf,SGTTRF)
09209 #define LAPACK_dgttrf LAPACK_NAME(dgttrf,DGTTRF)
09210 #define LAPACK_cgttrf LAPACK_NAME(cgttrf,CGTTRF)
09211 #define LAPACK_zgttrf LAPACK_NAME(zgttrf,ZGTTRF)
09212 #define LAPACK_spotrf LAPACK_NAME(spotrf,SPOTRF)
09213 #define LAPACK_dpotrf LAPACK_NAME(dpotrf,DPOTRF)
09214 #define LAPACK_cpotrf LAPACK_NAME(cpotrf,CPOTRF)
09215 #define LAPACK_zpotrf LAPACK_NAME(zpotrf,ZPOTRF)
09216 #define LAPACK_dpstrf LAPACK_NAME(dpstrf,DPSTRF)
09217 #define LAPACK_spstrf LAPACK_NAME(spstrf,SPSTRF)
09218 #define LAPACK_zpstrf LAPACK_NAME(zpstrf,ZPSTRF)
09219 #define LAPACK_cpstrf LAPACK_NAME(cpstrf,CPSTRF)
09220 #define LAPACK_dpftrf LAPACK_NAME(dpftrf,DPFTRF)
09221 #define LAPACK_spftrf LAPACK_NAME(spftrf,SPFTRF)
09222 #define LAPACK_zpftrf LAPACK_NAME(zpftrf,ZPFTRF)
09223 #define LAPACK_cpftrf LAPACK_NAME(cpftrf,CPFTRF)
09224 #define LAPACK_spptrf LAPACK_NAME(spptrf,SPPTRF)
09225 #define LAPACK_dpptrf LAPACK_NAME(dpptrf,DPPTRF)
09226 #define LAPACK_cpptrf LAPACK_NAME(cpptrf,CPPTRF)
09227 #define LAPACK_zpptrf LAPACK_NAME(zpptrf,ZPPTRF)
09228 #define LAPACK_spbtrf LAPACK_NAME(spbtrf,SPBTRF)
09229 #define LAPACK_dpbtrf LAPACK_NAME(dpbtrf,DPBTRF)
09230 #define LAPACK_cpbtrf LAPACK_NAME(cpbtrf,CPBTRF)
09231 #define LAPACK_zpbtrf LAPACK_NAME(zpbtrf,ZPBTRF)
09232 #define LAPACK_spttrf LAPACK_NAME(spttrf,SPTTRF)
09233 #define LAPACK_dpttrf LAPACK_NAME(dpttrf,DPTTRF)
09234 #define LAPACK_cpttrf LAPACK_NAME(cpttrf,CPTTRF)
09235 #define LAPACK_zpttrf LAPACK_NAME(zpttrf,ZPTTRF)
09236 #define LAPACK_ssytrf LAPACK_NAME(ssytrf,SSYTRF)
09237 #define LAPACK_dsytrf LAPACK_NAME(dsytrf,DSYTRF)
09238 #define LAPACK_csytrf LAPACK_NAME(csytrf,CSYTRF)
09239 #define LAPACK_zsytrf LAPACK_NAME(zsytrf,ZSYTRF)
09240 #define LAPACK_chetrf LAPACK_NAME(chetrf,CHETRF)
09241 #define LAPACK_zhetrf LAPACK_NAME(zhetrf,ZHETRF)
09242 #define LAPACK_ssptrf LAPACK_NAME(ssptrf,SSPTRF)
09243 #define LAPACK_dsptrf LAPACK_NAME(dsptrf,DSPTRF)
09244 #define LAPACK_csptrf LAPACK_NAME(csptrf,CSPTRF)
09245 #define LAPACK_zsptrf LAPACK_NAME(zsptrf,ZSPTRF)
09246 #define LAPACK_chptrf LAPACK_NAME(chptrf,CHPTRF)
09247 #define LAPACK_zhptrf LAPACK_NAME(zhptrf,ZHPTRF)
09248 #define LAPACK_sgetrs LAPACK_NAME(sgetrs,SGETRS)
09249 #define LAPACK_dgetrs LAPACK_NAME(dgetrs,DGETRS)
09250 #define LAPACK_cgetrs LAPACK_NAME(cgetrs,CGETRS)
09251 #define LAPACK_zgetrs LAPACK_NAME(zgetrs,ZGETRS)
09252 #define LAPACK_sgbtrs LAPACK_NAME(sgbtrs,SGBTRS)
09253 #define LAPACK_dgbtrs LAPACK_NAME(dgbtrs,DGBTRS)
09254 #define LAPACK_cgbtrs LAPACK_NAME(cgbtrs,CGBTRS)
09255 #define LAPACK_zgbtrs LAPACK_NAME(zgbtrs,ZGBTRS)
09256 #define LAPACK_sgttrs LAPACK_NAME(sgttrs,SGTTRS)
09257 #define LAPACK_dgttrs LAPACK_NAME(dgttrs,DGTTRS)
09258 #define LAPACK_cgttrs LAPACK_NAME(cgttrs,CGTTRS)
09259 #define LAPACK_zgttrs LAPACK_NAME(zgttrs,ZGTTRS)
09260 #define LAPACK_spotrs LAPACK_NAME(spotrs,SPOTRS)
09261 #define LAPACK_dpotrs LAPACK_NAME(dpotrs,DPOTRS)
09262 #define LAPACK_cpotrs LAPACK_NAME(cpotrs,CPOTRS)
09263 #define LAPACK_zpotrs LAPACK_NAME(zpotrs,ZPOTRS)
09264 #define LAPACK_dpftrs LAPACK_NAME(dpftrs,DPFTRS)
09265 #define LAPACK_spftrs LAPACK_NAME(spftrs,SPFTRS)
09266 #define LAPACK_zpftrs LAPACK_NAME(zpftrs,ZPFTRS)
09267 #define LAPACK_cpftrs LAPACK_NAME(cpftrs,CPFTRS)
09268 #define LAPACK_spptrs LAPACK_NAME(spptrs,SPPTRS)
09269 #define LAPACK_dpptrs LAPACK_NAME(dpptrs,DPPTRS)
09270 #define LAPACK_cpptrs LAPACK_NAME(cpptrs,CPPTRS)
09271 #define LAPACK_zpptrs LAPACK_NAME(zpptrs,ZPPTRS)
09272 #define LAPACK_spbtrs LAPACK_NAME(spbtrs,SPBTRS)
09273 #define LAPACK_dpbtrs LAPACK_NAME(dpbtrs,DPBTRS)
09274 #define LAPACK_cpbtrs LAPACK_NAME(cpbtrs,CPBTRS)
09275 #define LAPACK_zpbtrs LAPACK_NAME(zpbtrs,ZPBTRS)
09276 #define LAPACK_spttrs LAPACK_NAME(spttrs,SPTTRS)
09277 #define LAPACK_dpttrs LAPACK_NAME(dpttrs,DPTTRS)
09278 #define LAPACK_cpttrs LAPACK_NAME(cpttrs,CPTTRS)
09279 #define LAPACK_zpttrs LAPACK_NAME(zpttrs,ZPTTRS)
09280 #define LAPACK_ssytrs LAPACK_NAME(ssytrs,SSYTRS)
09281 #define LAPACK_dsytrs LAPACK_NAME(dsytrs,DSYTRS)
09282 #define LAPACK_csytrs LAPACK_NAME(csytrs,CSYTRS)
09283 #define LAPACK_zsytrs LAPACK_NAME(zsytrs,ZSYTRS)
09284 #define LAPACK_chetrs LAPACK_NAME(chetrs,CHETRS)
09285 #define LAPACK_zhetrs LAPACK_NAME(zhetrs,ZHETRS)
09286 #define LAPACK_ssptrs LAPACK_NAME(ssptrs,SSPTRS)
09287 #define LAPACK_dsptrs LAPACK_NAME(dsptrs,DSPTRS)
09288 #define LAPACK_csptrs LAPACK_NAME(csptrs,CSPTRS)
09289 #define LAPACK_zsptrs LAPACK_NAME(zsptrs,ZSPTRS)
09290 #define LAPACK_chptrs LAPACK_NAME(chptrs,CHPTRS)
09291 #define LAPACK_zhptrs LAPACK_NAME(zhptrs,ZHPTRS)
09292 #define LAPACK_strtrs LAPACK_NAME(strtrs,STRTRS)
09293 #define LAPACK_dtrtrs LAPACK_NAME(dtrtrs,DTRTRS)
09294 #define LAPACK_ctrtrs LAPACK_NAME(ctrtrs,CTRTRS)
09295 #define LAPACK_ztrtrs LAPACK_NAME(ztrtrs,ZTRTRS)
09296 #define LAPACK_stptrs LAPACK_NAME(stptrs,STPTRS)
09297 #define LAPACK_dtptrs LAPACK_NAME(dtptrs,DTPTRS)
09298 #define LAPACK_ctptrs LAPACK_NAME(ctptrs,CTPTRS)
09299 #define LAPACK_ztptrs LAPACK_NAME(ztptrs,ZTPTRS)
09300 #define LAPACK_stbtrs LAPACK_NAME(stbtrs,STBTRS)
09301 #define LAPACK_dtbtrs LAPACK_NAME(dtbtrs,DTBTRS)
09302 #define LAPACK_ctbtrs LAPACK_NAME(ctbtrs,CTBTRS)
09303 #define LAPACK_ztbtrs LAPACK_NAME(ztbtrs,ZTBTRS)
09304 #define LAPACK_sgecon LAPACK_NAME(sgecon,SGECON)
09305 #define LAPACK_dgecon LAPACK_NAME(dgecon,DGECON)
09306 #define LAPACK_cgecon LAPACK_NAME(cgecon,CGECON)
09307 #define LAPACK_zgecon LAPACK_NAME(zgecon,ZGECON)
09308 #define LAPACK_sgbcon LAPACK_NAME(sgbcon,SGBCON)
09309 #define LAPACK_dgbcon LAPACK_NAME(dgbcon,DGBCON)
09310 #define LAPACK_cgbcon LAPACK_NAME(cgbcon,CGBCON)
09311 #define LAPACK_zgbcon LAPACK_NAME(zgbcon,ZGBCON)
09312 #define LAPACK_sgtcon LAPACK_NAME(sgtcon,SGTCON)
09313 #define LAPACK_dgtcon LAPACK_NAME(dgtcon,DGTCON)
09314 #define LAPACK_cgtcon LAPACK_NAME(cgtcon,CGTCON)
09315 #define LAPACK_zgtcon LAPACK_NAME(zgtcon,ZGTCON)
09316 #define LAPACK_spocon LAPACK_NAME(spocon,SPOCON)
09317 #define LAPACK_dpocon LAPACK_NAME(dpocon,DPOCON)
09318 #define LAPACK_cpocon LAPACK_NAME(cpocon,CPOCON)
09319 #define LAPACK_zpocon LAPACK_NAME(zpocon,ZPOCON)
09320 #define LAPACK_sppcon LAPACK_NAME(sppcon,SPPCON)
09321 #define LAPACK_dppcon LAPACK_NAME(dppcon,DPPCON)
09322 #define LAPACK_cppcon LAPACK_NAME(cppcon,CPPCON)
09323 #define LAPACK_zppcon LAPACK_NAME(zppcon,ZPPCON)
09324 #define LAPACK_spbcon LAPACK_NAME(spbcon,SPBCON)
09325 #define LAPACK_dpbcon LAPACK_NAME(dpbcon,DPBCON)
09326 #define LAPACK_cpbcon LAPACK_NAME(cpbcon,CPBCON)
09327 #define LAPACK_zpbcon LAPACK_NAME(zpbcon,ZPBCON)
09328 #define LAPACK_sptcon LAPACK_NAME(sptcon,SPTCON)
09329 #define LAPACK_dptcon LAPACK_NAME(dptcon,DPTCON)
09330 #define LAPACK_cptcon LAPACK_NAME(cptcon,CPTCON)
09331 #define LAPACK_zptcon LAPACK_NAME(zptcon,ZPTCON)
09332 #define LAPACK_ssycon LAPACK_NAME(ssycon,SSYCON)
09333 #define LAPACK_dsycon LAPACK_NAME(dsycon,DSYCON)
09334 #define LAPACK_csycon LAPACK_NAME(csycon,CSYCON)
09335 #define LAPACK_zsycon LAPACK_NAME(zsycon,ZSYCON)
09336 #define LAPACK_checon LAPACK_NAME(checon,CHECON)
09337 #define LAPACK_zhecon LAPACK_NAME(zhecon,ZHECON)
09338 #define LAPACK_sspcon LAPACK_NAME(sspcon,SSPCON)
09339 #define LAPACK_dspcon LAPACK_NAME(dspcon,DSPCON)
09340 #define LAPACK_cspcon LAPACK_NAME(cspcon,CSPCON)
09341 #define LAPACK_zspcon LAPACK_NAME(zspcon,ZSPCON)
09342 #define LAPACK_chpcon LAPACK_NAME(chpcon,CHPCON)
09343 #define LAPACK_zhpcon LAPACK_NAME(zhpcon,ZHPCON)
09344 #define LAPACK_strcon LAPACK_NAME(strcon,STRCON)
09345 #define LAPACK_dtrcon LAPACK_NAME(dtrcon,DTRCON)
09346 #define LAPACK_ctrcon LAPACK_NAME(ctrcon,CTRCON)
09347 #define LAPACK_ztrcon LAPACK_NAME(ztrcon,ZTRCON)
09348 #define LAPACK_stpcon LAPACK_NAME(stpcon,STPCON)
09349 #define LAPACK_dtpcon LAPACK_NAME(dtpcon,DTPCON)
09350 #define LAPACK_ctpcon LAPACK_NAME(ctpcon,CTPCON)
09351 #define LAPACK_ztpcon LAPACK_NAME(ztpcon,ZTPCON)
09352 #define LAPACK_stbcon LAPACK_NAME(stbcon,STBCON)
09353 #define LAPACK_dtbcon LAPACK_NAME(dtbcon,DTBCON)
09354 #define LAPACK_ctbcon LAPACK_NAME(ctbcon,CTBCON)
09355 #define LAPACK_ztbcon LAPACK_NAME(ztbcon,ZTBCON)
09356 #define LAPACK_sgerfs LAPACK_NAME(sgerfs,SGERFS)
09357 #define LAPACK_dgerfs LAPACK_NAME(dgerfs,DGERFS)
09358 #define LAPACK_cgerfs LAPACK_NAME(cgerfs,CGERFS)
09359 #define LAPACK_zgerfs LAPACK_NAME(zgerfs,ZGERFS)
09360 #define LAPACK_dgerfsx LAPACK_NAME(dgerfsx,DGERFSX)
09361 #define LAPACK_sgerfsx LAPACK_NAME(sgerfsx,SGERFSX)
09362 #define LAPACK_zgerfsx LAPACK_NAME(zgerfsx,ZGERFSX)
09363 #define LAPACK_cgerfsx LAPACK_NAME(cgerfsx,CGERFSX)
09364 #define LAPACK_sgbrfs LAPACK_NAME(sgbrfs,SGBRFS)
09365 #define LAPACK_dgbrfs LAPACK_NAME(dgbrfs,DGBRFS)
09366 #define LAPACK_cgbrfs LAPACK_NAME(cgbrfs,CGBRFS)
09367 #define LAPACK_zgbrfs LAPACK_NAME(zgbrfs,ZGBRFS)
09368 #define LAPACK_dgbrfsx LAPACK_NAME(dgbrfsx,DGBRFSX)
09369 #define LAPACK_sgbrfsx LAPACK_NAME(sgbrfsx,SGBRFSX)
09370 #define LAPACK_zgbrfsx LAPACK_NAME(zgbrfsx,ZGBRFSX)
09371 #define LAPACK_cgbrfsx LAPACK_NAME(cgbrfsx,CGBRFSX)
09372 #define LAPACK_sgtrfs LAPACK_NAME(sgtrfs,SGTRFS)
09373 #define LAPACK_dgtrfs LAPACK_NAME(dgtrfs,DGTRFS)
09374 #define LAPACK_cgtrfs LAPACK_NAME(cgtrfs,CGTRFS)
09375 #define LAPACK_zgtrfs LAPACK_NAME(zgtrfs,ZGTRFS)
09376 #define LAPACK_sporfs LAPACK_NAME(sporfs,SPORFS)
09377 #define LAPACK_dporfs LAPACK_NAME(dporfs,DPORFS)
09378 #define LAPACK_cporfs LAPACK_NAME(cporfs,CPORFS)
09379 #define LAPACK_zporfs LAPACK_NAME(zporfs,ZPORFS)
09380 #define LAPACK_dporfsx LAPACK_NAME(dporfsx,DPORFSX)
09381 #define LAPACK_sporfsx LAPACK_NAME(sporfsx,SPORFSX)
09382 #define LAPACK_zporfsx LAPACK_NAME(zporfsx,ZPORFSX)
09383 #define LAPACK_cporfsx LAPACK_NAME(cporfsx,CPORFSX)
09384 #define LAPACK_spprfs LAPACK_NAME(spprfs,SPPRFS)
09385 #define LAPACK_dpprfs LAPACK_NAME(dpprfs,DPPRFS)
09386 #define LAPACK_cpprfs LAPACK_NAME(cpprfs,CPPRFS)
09387 #define LAPACK_zpprfs LAPACK_NAME(zpprfs,ZPPRFS)
09388 #define LAPACK_spbrfs LAPACK_NAME(spbrfs,SPBRFS)
09389 #define LAPACK_dpbrfs LAPACK_NAME(dpbrfs,DPBRFS)
09390 #define LAPACK_cpbrfs LAPACK_NAME(cpbrfs,CPBRFS)
09391 #define LAPACK_zpbrfs LAPACK_NAME(zpbrfs,ZPBRFS)
09392 #define LAPACK_sptrfs LAPACK_NAME(sptrfs,SPTRFS)
09393 #define LAPACK_dptrfs LAPACK_NAME(dptrfs,DPTRFS)
09394 #define LAPACK_cptrfs LAPACK_NAME(cptrfs,CPTRFS)
09395 #define LAPACK_zptrfs LAPACK_NAME(zptrfs,ZPTRFS)
09396 #define LAPACK_ssyrfs LAPACK_NAME(ssyrfs,SSYRFS)
09397 #define LAPACK_dsyrfs LAPACK_NAME(dsyrfs,DSYRFS)
09398 #define LAPACK_csyrfs LAPACK_NAME(csyrfs,CSYRFS)
09399 #define LAPACK_zsyrfs LAPACK_NAME(zsyrfs,ZSYRFS)
09400 #define LAPACK_dsyrfsx LAPACK_NAME(dsyrfsx,DSYRFSX)
09401 #define LAPACK_ssyrfsx LAPACK_NAME(ssyrfsx,SSYRFSX)
09402 #define LAPACK_zsyrfsx LAPACK_NAME(zsyrfsx,ZSYRFSX)
09403 #define LAPACK_csyrfsx LAPACK_NAME(csyrfsx,CSYRFSX)
09404 #define LAPACK_cherfs LAPACK_NAME(cherfs,CHERFS)
09405 #define LAPACK_zherfs LAPACK_NAME(zherfs,ZHERFS)
09406 #define LAPACK_zherfsx LAPACK_NAME(zherfsx,ZHERFSX)
09407 #define LAPACK_cherfsx LAPACK_NAME(cherfsx,CHERFSX)
09408 #define LAPACK_ssprfs LAPACK_NAME(ssprfs,SSPRFS)
09409 #define LAPACK_dsprfs LAPACK_NAME(dsprfs,DSPRFS)
09410 #define LAPACK_csprfs LAPACK_NAME(csprfs,CSPRFS)
09411 #define LAPACK_zsprfs LAPACK_NAME(zsprfs,ZSPRFS)
09412 #define LAPACK_chprfs LAPACK_NAME(chprfs,CHPRFS)
09413 #define LAPACK_zhprfs LAPACK_NAME(zhprfs,ZHPRFS)
09414 #define LAPACK_strrfs LAPACK_NAME(strrfs,STRRFS)
09415 #define LAPACK_dtrrfs LAPACK_NAME(dtrrfs,DTRRFS)
09416 #define LAPACK_ctrrfs LAPACK_NAME(ctrrfs,CTRRFS)
09417 #define LAPACK_ztrrfs LAPACK_NAME(ztrrfs,ZTRRFS)
09418 #define LAPACK_stprfs LAPACK_NAME(stprfs,STPRFS)
09419 #define LAPACK_dtprfs LAPACK_NAME(dtprfs,DTPRFS)
09420 #define LAPACK_ctprfs LAPACK_NAME(ctprfs,CTPRFS)
09421 #define LAPACK_ztprfs LAPACK_NAME(ztprfs,ZTPRFS)
09422 #define LAPACK_stbrfs LAPACK_NAME(stbrfs,STBRFS)
09423 #define LAPACK_dtbrfs LAPACK_NAME(dtbrfs,DTBRFS)
09424 #define LAPACK_ctbrfs LAPACK_NAME(ctbrfs,CTBRFS)
09425 #define LAPACK_ztbrfs LAPACK_NAME(ztbrfs,ZTBRFS)
09426 #define LAPACK_sgetri LAPACK_NAME(sgetri,SGETRI)
09427 #define LAPACK_dgetri LAPACK_NAME(dgetri,DGETRI)
09428 #define LAPACK_cgetri LAPACK_NAME(cgetri,CGETRI)
09429 #define LAPACK_zgetri LAPACK_NAME(zgetri,ZGETRI)
09430 #define LAPACK_spotri LAPACK_NAME(spotri,SPOTRI)
09431 #define LAPACK_dpotri LAPACK_NAME(dpotri,DPOTRI)
09432 #define LAPACK_cpotri LAPACK_NAME(cpotri,CPOTRI)
09433 #define LAPACK_zpotri LAPACK_NAME(zpotri,ZPOTRI)
09434 #define LAPACK_dpftri LAPACK_NAME(dpftri,DPFTRI)
09435 #define LAPACK_spftri LAPACK_NAME(spftri,SPFTRI)
09436 #define LAPACK_zpftri LAPACK_NAME(zpftri,ZPFTRI)
09437 #define LAPACK_cpftri LAPACK_NAME(cpftri,CPFTRI)
09438 #define LAPACK_spptri LAPACK_NAME(spptri,SPPTRI)
09439 #define LAPACK_dpptri LAPACK_NAME(dpptri,DPPTRI)
09440 #define LAPACK_cpptri LAPACK_NAME(cpptri,CPPTRI)
09441 #define LAPACK_zpptri LAPACK_NAME(zpptri,ZPPTRI)
09442 #define LAPACK_ssytri LAPACK_NAME(ssytri,SSYTRI)
09443 #define LAPACK_dsytri LAPACK_NAME(dsytri,DSYTRI)
09444 #define LAPACK_csytri LAPACK_NAME(csytri,CSYTRI)
09445 #define LAPACK_zsytri LAPACK_NAME(zsytri,ZSYTRI)
09446 #define LAPACK_chetri LAPACK_NAME(chetri,CHETRI)
09447 #define LAPACK_zhetri LAPACK_NAME(zhetri,ZHETRI)
09448 #define LAPACK_ssptri LAPACK_NAME(ssptri,SSPTRI)
09449 #define LAPACK_dsptri LAPACK_NAME(dsptri,DSPTRI)
09450 #define LAPACK_csptri LAPACK_NAME(csptri,CSPTRI)
09451 #define LAPACK_zsptri LAPACK_NAME(zsptri,ZSPTRI)
09452 #define LAPACK_chptri LAPACK_NAME(chptri,CHPTRI)
09453 #define LAPACK_zhptri LAPACK_NAME(zhptri,ZHPTRI)
09454 #define LAPACK_strtri LAPACK_NAME(strtri,STRTRI)
09455 #define LAPACK_dtrtri LAPACK_NAME(dtrtri,DTRTRI)
09456 #define LAPACK_ctrtri LAPACK_NAME(ctrtri,CTRTRI)
09457 #define LAPACK_ztrtri LAPACK_NAME(ztrtri,ZTRTRI)
09458 #define LAPACK_dtftri LAPACK_NAME(dtftri,DTFTRI)
09459 #define LAPACK_stftri LAPACK_NAME(stftri,STFTRI)
09460 #define LAPACK_ztftri LAPACK_NAME(ztftri,ZTFTRI)
09461 #define LAPACK_ctftri LAPACK_NAME(ctftri,CTFTRI)
09462 #define LAPACK_stptri LAPACK_NAME(stptri,STPTRI)
09463 #define LAPACK_dtptri LAPACK_NAME(dtptri,DTPTRI)
09464 #define LAPACK_ctptri LAPACK_NAME(ctptri,CTPTRI)
09465 #define LAPACK_ztptri LAPACK_NAME(ztptri,ZTPTRI)
09466 #define LAPACK_sgeequ LAPACK_NAME(sgeequ,SGEEQU)
09467 #define LAPACK_dgeequ LAPACK_NAME(dgeequ,DGEEQU)
09468 #define LAPACK_cgeequ LAPACK_NAME(cgeequ,CGEEQU)
09469 #define LAPACK_zgeequ LAPACK_NAME(zgeequ,ZGEEQU)
09470 #define LAPACK_dgeequb LAPACK_NAME(dgeequb,DGEEQUB)
09471 #define LAPACK_sgeequb LAPACK_NAME(sgeequb,SGEEQUB)
09472 #define LAPACK_zgeequb LAPACK_NAME(zgeequb,ZGEEQUB)
09473 #define LAPACK_cgeequb LAPACK_NAME(cgeequb,CGEEQUB)
09474 #define LAPACK_sgbequ LAPACK_NAME(sgbequ,SGBEQU)
09475 #define LAPACK_dgbequ LAPACK_NAME(dgbequ,DGBEQU)
09476 #define LAPACK_cgbequ LAPACK_NAME(cgbequ,CGBEQU)
09477 #define LAPACK_zgbequ LAPACK_NAME(zgbequ,ZGBEQU)
09478 #define LAPACK_dgbequb LAPACK_NAME(dgbequb,DGBEQUB)
09479 #define LAPACK_sgbequb LAPACK_NAME(sgbequb,SGBEQUB)
09480 #define LAPACK_zgbequb LAPACK_NAME(zgbequb,ZGBEQUB)
09481 #define LAPACK_cgbequb LAPACK_NAME(cgbequb,CGBEQUB)
09482 #define LAPACK_spoequ LAPACK_NAME(spoequ,SPOEQU)
09483 #define LAPACK_dpoequ LAPACK_NAME(dpoequ,DPOEQU)
09484 #define LAPACK_cpoequ LAPACK_NAME(cpoequ,CPOEQU)
09485 #define LAPACK_zpoequ LAPACK_NAME(zpoequ,ZPOEQU)
09486 #define LAPACK_dpoequb LAPACK_NAME(dpoequb,DPOEQUB)
09487 #define LAPACK_spoequb LAPACK_NAME(spoequb,SPOEQUB)
09488 #define LAPACK_zpoequb LAPACK_NAME(zpoequb,ZPOEQUB)
09489 #define LAPACK_cpoequb LAPACK_NAME(cpoequb,CPOEQUB)
09490 #define LAPACK_sppequ LAPACK_NAME(sppequ,SPPEQU)
09491 #define LAPACK_dppequ LAPACK_NAME(dppequ,DPPEQU)
09492 #define LAPACK_cppequ LAPACK_NAME(cppequ,CPPEQU)
09493 #define LAPACK_zppequ LAPACK_NAME(zppequ,ZPPEQU)
09494 #define LAPACK_spbequ LAPACK_NAME(spbequ,SPBEQU)
09495 #define LAPACK_dpbequ LAPACK_NAME(dpbequ,DPBEQU)
09496 #define LAPACK_cpbequ LAPACK_NAME(cpbequ,CPBEQU)
09497 #define LAPACK_zpbequ LAPACK_NAME(zpbequ,ZPBEQU)
09498 #define LAPACK_dsyequb LAPACK_NAME(dsyequb,DSYEQUB)
09499 #define LAPACK_ssyequb LAPACK_NAME(ssyequb,SSYEQUB)
09500 #define LAPACK_zsyequb LAPACK_NAME(zsyequb,ZSYEQUB)
09501 #define LAPACK_csyequb LAPACK_NAME(csyequb,CSYEQUB)
09502 #define LAPACK_zheequb LAPACK_NAME(zheequb,ZHEEQUB)
09503 #define LAPACK_cheequb LAPACK_NAME(cheequb,CHEEQUB)
09504 #define LAPACK_sgesv LAPACK_NAME(sgesv,SGESV)
09505 #define LAPACK_dgesv LAPACK_NAME(dgesv,DGESV)
09506 #define LAPACK_cgesv LAPACK_NAME(cgesv,CGESV)
09507 #define LAPACK_zgesv LAPACK_NAME(zgesv,ZGESV)
09508 #define LAPACK_dsgesv LAPACK_NAME(dsgesv,DSGESV)
09509 #define LAPACK_zcgesv LAPACK_NAME(zcgesv,ZCGESV)
09510 #define LAPACK_sgesvx LAPACK_NAME(sgesvx,SGESVX)
09511 #define LAPACK_dgesvx LAPACK_NAME(dgesvx,DGESVX)
09512 #define LAPACK_cgesvx LAPACK_NAME(cgesvx,CGESVX)
09513 #define LAPACK_zgesvx LAPACK_NAME(zgesvx,ZGESVX)
09514 #define LAPACK_dgesvxx LAPACK_NAME(dgesvxx,DGESVXX)
09515 #define LAPACK_sgesvxx LAPACK_NAME(sgesvxx,SGESVXX)
09516 #define LAPACK_zgesvxx LAPACK_NAME(zgesvxx,ZGESVXX)
09517 #define LAPACK_cgesvxx LAPACK_NAME(cgesvxx,CGESVXX)
09518 #define LAPACK_sgbsv LAPACK_NAME(sgbsv,SGBSV)
09519 #define LAPACK_dgbsv LAPACK_NAME(dgbsv,DGBSV)
09520 #define LAPACK_cgbsv LAPACK_NAME(cgbsv,CGBSV)
09521 #define LAPACK_zgbsv LAPACK_NAME(zgbsv,ZGBSV)
09522 #define LAPACK_sgbsvx LAPACK_NAME(sgbsvx,SGBSVX)
09523 #define LAPACK_dgbsvx LAPACK_NAME(dgbsvx,DGBSVX)
09524 #define LAPACK_cgbsvx LAPACK_NAME(cgbsvx,CGBSVX)
09525 #define LAPACK_zgbsvx LAPACK_NAME(zgbsvx,ZGBSVX)
09526 #define LAPACK_dgbsvxx LAPACK_NAME(dgbsvxx,DGBSVXX)
09527 #define LAPACK_sgbsvxx LAPACK_NAME(sgbsvxx,SGBSVXX)
09528 #define LAPACK_zgbsvxx LAPACK_NAME(zgbsvxx,ZGBSVXX)
09529 #define LAPACK_cgbsvxx LAPACK_NAME(cgbsvxx,CGBSVXX)
09530 #define LAPACK_sgtsv LAPACK_NAME(sgtsv,SGTSV)
09531 #define LAPACK_dgtsv LAPACK_NAME(dgtsv,DGTSV)
09532 #define LAPACK_cgtsv LAPACK_NAME(cgtsv,CGTSV)
09533 #define LAPACK_zgtsv LAPACK_NAME(zgtsv,ZGTSV)
09534 #define LAPACK_sgtsvx LAPACK_NAME(sgtsvx,SGTSVX)
09535 #define LAPACK_dgtsvx LAPACK_NAME(dgtsvx,DGTSVX)
09536 #define LAPACK_cgtsvx LAPACK_NAME(cgtsvx,CGTSVX)
09537 #define LAPACK_zgtsvx LAPACK_NAME(zgtsvx,ZGTSVX)
09538 #define LAPACK_sposv LAPACK_NAME(sposv,SPOSV)
09539 #define LAPACK_dposv LAPACK_NAME(dposv,DPOSV)
09540 #define LAPACK_cposv LAPACK_NAME(cposv,CPOSV)
09541 #define LAPACK_zposv LAPACK_NAME(zposv,ZPOSV)
09542 #define LAPACK_dsposv LAPACK_NAME(dsposv,DSPOSV)
09543 #define LAPACK_zcposv LAPACK_NAME(zcposv,ZCPOSV)
09544 #define LAPACK_sposvx LAPACK_NAME(sposvx,SPOSVX)
09545 #define LAPACK_dposvx LAPACK_NAME(dposvx,DPOSVX)
09546 #define LAPACK_cposvx LAPACK_NAME(cposvx,CPOSVX)
09547 #define LAPACK_zposvx LAPACK_NAME(zposvx,ZPOSVX)
09548 #define LAPACK_dposvxx LAPACK_NAME(dposvxx,DPOSVXX)
09549 #define LAPACK_sposvxx LAPACK_NAME(sposvxx,SPOSVXX)
09550 #define LAPACK_zposvxx LAPACK_NAME(zposvxx,ZPOSVXX)
09551 #define LAPACK_cposvxx LAPACK_NAME(cposvxx,CPOSVXX)
09552 #define LAPACK_sppsv LAPACK_NAME(sppsv,SPPSV)
09553 #define LAPACK_dppsv LAPACK_NAME(dppsv,DPPSV)
09554 #define LAPACK_cppsv LAPACK_NAME(cppsv,CPPSV)
09555 #define LAPACK_zppsv LAPACK_NAME(zppsv,ZPPSV)
09556 #define LAPACK_sppsvx LAPACK_NAME(sppsvx,SPPSVX)
09557 #define LAPACK_dppsvx LAPACK_NAME(dppsvx,DPPSVX)
09558 #define LAPACK_cppsvx LAPACK_NAME(cppsvx,CPPSVX)
09559 #define LAPACK_zppsvx LAPACK_NAME(zppsvx,ZPPSVX)
09560 #define LAPACK_spbsv LAPACK_NAME(spbsv,SPBSV)
09561 #define LAPACK_dpbsv LAPACK_NAME(dpbsv,DPBSV)
09562 #define LAPACK_cpbsv LAPACK_NAME(cpbsv,CPBSV)
09563 #define LAPACK_zpbsv LAPACK_NAME(zpbsv,ZPBSV)
09564 #define LAPACK_spbsvx LAPACK_NAME(spbsvx,SPBSVX)
09565 #define LAPACK_dpbsvx LAPACK_NAME(dpbsvx,DPBSVX)
09566 #define LAPACK_cpbsvx LAPACK_NAME(cpbsvx,CPBSVX)
09567 #define LAPACK_zpbsvx LAPACK_NAME(zpbsvx,ZPBSVX)
09568 #define LAPACK_sptsv LAPACK_NAME(sptsv,SPTSV)
09569 #define LAPACK_dptsv LAPACK_NAME(dptsv,DPTSV)
09570 #define LAPACK_cptsv LAPACK_NAME(cptsv,CPTSV)
09571 #define LAPACK_zptsv LAPACK_NAME(zptsv,ZPTSV)
09572 #define LAPACK_sptsvx LAPACK_NAME(sptsvx,SPTSVX)
09573 #define LAPACK_dptsvx LAPACK_NAME(dptsvx,DPTSVX)
09574 #define LAPACK_cptsvx LAPACK_NAME(cptsvx,CPTSVX)
09575 #define LAPACK_zptsvx LAPACK_NAME(zptsvx,ZPTSVX)
09576 #define LAPACK_ssysv LAPACK_NAME(ssysv,SSYSV)
09577 #define LAPACK_dsysv LAPACK_NAME(dsysv,DSYSV)
09578 #define LAPACK_csysv LAPACK_NAME(csysv,CSYSV)
09579 #define LAPACK_zsysv LAPACK_NAME(zsysv,ZSYSV)
09580 #define LAPACK_ssysvx LAPACK_NAME(ssysvx,SSYSVX)
09581 #define LAPACK_dsysvx LAPACK_NAME(dsysvx,DSYSVX)
09582 #define LAPACK_csysvx LAPACK_NAME(csysvx,CSYSVX)
09583 #define LAPACK_zsysvx LAPACK_NAME(zsysvx,ZSYSVX)
09584 #define LAPACK_dsysvxx LAPACK_NAME(dsysvxx,DSYSVXX)
09585 #define LAPACK_ssysvxx LAPACK_NAME(ssysvxx,SSYSVXX)
09586 #define LAPACK_zsysvxx LAPACK_NAME(zsysvxx,ZSYSVXX)
09587 #define LAPACK_csysvxx LAPACK_NAME(csysvxx,CSYSVXX)
09588 #define LAPACK_chesv LAPACK_NAME(chesv,CHESV)
09589 #define LAPACK_zhesv LAPACK_NAME(zhesv,ZHESV)
09590 #define LAPACK_chesvx LAPACK_NAME(chesvx,CHESVX)
09591 #define LAPACK_zhesvx LAPACK_NAME(zhesvx,ZHESVX)
09592 #define LAPACK_zhesvxx LAPACK_NAME(zhesvxx,ZHESVXX)
09593 #define LAPACK_chesvxx LAPACK_NAME(chesvxx,CHESVXX)
09594 #define LAPACK_sspsv LAPACK_NAME(sspsv,SSPSV)
09595 #define LAPACK_dspsv LAPACK_NAME(dspsv,DSPSV)
09596 #define LAPACK_cspsv LAPACK_NAME(cspsv,CSPSV)
09597 #define LAPACK_zspsv LAPACK_NAME(zspsv,ZSPSV)
09598 #define LAPACK_sspsvx LAPACK_NAME(sspsvx,SSPSVX)
09599 #define LAPACK_dspsvx LAPACK_NAME(dspsvx,DSPSVX)
09600 #define LAPACK_cspsvx LAPACK_NAME(cspsvx,CSPSVX)
09601 #define LAPACK_zspsvx LAPACK_NAME(zspsvx,ZSPSVX)
09602 #define LAPACK_chpsv LAPACK_NAME(chpsv,CHPSV)
09603 #define LAPACK_zhpsv LAPACK_NAME(zhpsv,ZHPSV)
09604 #define LAPACK_chpsvx LAPACK_NAME(chpsvx,CHPSVX)
09605 #define LAPACK_zhpsvx LAPACK_NAME(zhpsvx,ZHPSVX)
09606 #define LAPACK_sgeqrf LAPACK_NAME(sgeqrf,SGEQRF)
09607 #define LAPACK_dgeqrf LAPACK_NAME(dgeqrf,DGEQRF)
09608 #define LAPACK_cgeqrf LAPACK_NAME(cgeqrf,CGEQRF)
09609 #define LAPACK_zgeqrf LAPACK_NAME(zgeqrf,ZGEQRF)
09610 #define LAPACK_sgeqpf LAPACK_NAME(sgeqpf,SGEQPF)
09611 #define LAPACK_dgeqpf LAPACK_NAME(dgeqpf,DGEQPF)
09612 #define LAPACK_cgeqpf LAPACK_NAME(cgeqpf,CGEQPF)
09613 #define LAPACK_zgeqpf LAPACK_NAME(zgeqpf,ZGEQPF)
09614 #define LAPACK_sgeqp3 LAPACK_NAME(sgeqp3,SGEQP3)
09615 #define LAPACK_dgeqp3 LAPACK_NAME(dgeqp3,DGEQP3)
09616 #define LAPACK_cgeqp3 LAPACK_NAME(cgeqp3,CGEQP3)
09617 #define LAPACK_zgeqp3 LAPACK_NAME(zgeqp3,ZGEQP3)
09618 #define LAPACK_sorgqr LAPACK_NAME(sorgqr,SORGQR)
09619 #define LAPACK_dorgqr LAPACK_NAME(dorgqr,DORGQR)
09620 #define LAPACK_sormqr LAPACK_NAME(sormqr,SORMQR)
09621 #define LAPACK_dormqr LAPACK_NAME(dormqr,DORMQR)
09622 #define LAPACK_cungqr LAPACK_NAME(cungqr,CUNGQR)
09623 #define LAPACK_zungqr LAPACK_NAME(zungqr,ZUNGQR)
09624 #define LAPACK_cunmqr LAPACK_NAME(cunmqr,CUNMQR)
09625 #define LAPACK_zunmqr LAPACK_NAME(zunmqr,ZUNMQR)
09626 #define LAPACK_sgelqf LAPACK_NAME(sgelqf,SGELQF)
09627 #define LAPACK_dgelqf LAPACK_NAME(dgelqf,DGELQF)
09628 #define LAPACK_cgelqf LAPACK_NAME(cgelqf,CGELQF)
09629 #define LAPACK_zgelqf LAPACK_NAME(zgelqf,ZGELQF)
09630 #define LAPACK_sorglq LAPACK_NAME(sorglq,SORGLQ)
09631 #define LAPACK_dorglq LAPACK_NAME(dorglq,DORGLQ)
09632 #define LAPACK_sormlq LAPACK_NAME(sormlq,SORMLQ)
09633 #define LAPACK_dormlq LAPACK_NAME(dormlq,DORMLQ)
09634 #define LAPACK_cunglq LAPACK_NAME(cunglq,CUNGLQ)
09635 #define LAPACK_zunglq LAPACK_NAME(zunglq,ZUNGLQ)
09636 #define LAPACK_cunmlq LAPACK_NAME(cunmlq,CUNMLQ)
09637 #define LAPACK_zunmlq LAPACK_NAME(zunmlq,ZUNMLQ)
09638 #define LAPACK_sgeqlf LAPACK_NAME(sgeqlf,SGEQLF)
09639 #define LAPACK_dgeqlf LAPACK_NAME(dgeqlf,DGEQLF)
09640 #define LAPACK_cgeqlf LAPACK_NAME(cgeqlf,CGEQLF)
09641 #define LAPACK_zgeqlf LAPACK_NAME(zgeqlf,ZGEQLF)
09642 #define LAPACK_sorgql LAPACK_NAME(sorgql,SORGQL)
09643 #define LAPACK_dorgql LAPACK_NAME(dorgql,DORGQL)
09644 #define LAPACK_cungql LAPACK_NAME(cungql,CUNGQL)
09645 #define LAPACK_zungql LAPACK_NAME(zungql,ZUNGQL)
09646 #define LAPACK_sormql LAPACK_NAME(sormql,SORMQL)
09647 #define LAPACK_dormql LAPACK_NAME(dormql,DORMQL)
09648 #define LAPACK_cunmql LAPACK_NAME(cunmql,CUNMQL)
09649 #define LAPACK_zunmql LAPACK_NAME(zunmql,ZUNMQL)
09650 #define LAPACK_sgerqf LAPACK_NAME(sgerqf,SGERQF)
09651 #define LAPACK_dgerqf LAPACK_NAME(dgerqf,DGERQF)
09652 #define LAPACK_cgerqf LAPACK_NAME(cgerqf,CGERQF)
09653 #define LAPACK_zgerqf LAPACK_NAME(zgerqf,ZGERQF)
09654 #define LAPACK_sorgrq LAPACK_NAME(sorgrq,SORGRQ)
09655 #define LAPACK_dorgrq LAPACK_NAME(dorgrq,DORGRQ)
09656 #define LAPACK_cungrq LAPACK_NAME(cungrq,CUNGRQ)
09657 #define LAPACK_zungrq LAPACK_NAME(zungrq,ZUNGRQ)
09658 #define LAPACK_sormrq LAPACK_NAME(sormrq,SORMRQ)
09659 #define LAPACK_dormrq LAPACK_NAME(dormrq,DORMRQ)
09660 #define LAPACK_cunmrq LAPACK_NAME(cunmrq,CUNMRQ)
09661 #define LAPACK_zunmrq LAPACK_NAME(zunmrq,ZUNMRQ)
09662 #define LAPACK_stzrzf LAPACK_NAME(stzrzf,STZRZF)
09663 #define LAPACK_dtzrzf LAPACK_NAME(dtzrzf,DTZRZF)
09664 #define LAPACK_ctzrzf LAPACK_NAME(ctzrzf,CTZRZF)
09665 #define LAPACK_ztzrzf LAPACK_NAME(ztzrzf,ZTZRZF)
09666 #define LAPACK_sormrz LAPACK_NAME(sormrz,SORMRZ)
09667 #define LAPACK_dormrz LAPACK_NAME(dormrz,DORMRZ)
09668 #define LAPACK_cunmrz LAPACK_NAME(cunmrz,CUNMRZ)
09669 #define LAPACK_zunmrz LAPACK_NAME(zunmrz,ZUNMRZ)
09670 #define LAPACK_sggqrf LAPACK_NAME(sggqrf,SGGQRF)
09671 #define LAPACK_dggqrf LAPACK_NAME(dggqrf,DGGQRF)
09672 #define LAPACK_cggqrf LAPACK_NAME(cggqrf,CGGQRF)
09673 #define LAPACK_zggqrf LAPACK_NAME(zggqrf,ZGGQRF)
09674 #define LAPACK_sggrqf LAPACK_NAME(sggrqf,SGGRQF)
09675 #define LAPACK_dggrqf LAPACK_NAME(dggrqf,DGGRQF)
09676 #define LAPACK_cggrqf LAPACK_NAME(cggrqf,CGGRQF)
09677 #define LAPACK_zggrqf LAPACK_NAME(zggrqf,ZGGRQF)
09678 #define LAPACK_sgebrd LAPACK_NAME(sgebrd,SGEBRD)
09679 #define LAPACK_dgebrd LAPACK_NAME(dgebrd,DGEBRD)
09680 #define LAPACK_cgebrd LAPACK_NAME(cgebrd,CGEBRD)
09681 #define LAPACK_zgebrd LAPACK_NAME(zgebrd,ZGEBRD)
09682 #define LAPACK_sgbbrd LAPACK_NAME(sgbbrd,SGBBRD)
09683 #define LAPACK_dgbbrd LAPACK_NAME(dgbbrd,DGBBRD)
09684 #define LAPACK_cgbbrd LAPACK_NAME(cgbbrd,CGBBRD)
09685 #define LAPACK_zgbbrd LAPACK_NAME(zgbbrd,ZGBBRD)
09686 #define LAPACK_sorgbr LAPACK_NAME(sorgbr,SORGBR)
09687 #define LAPACK_dorgbr LAPACK_NAME(dorgbr,DORGBR)
09688 #define LAPACK_sormbr LAPACK_NAME(sormbr,SORMBR)
09689 #define LAPACK_dormbr LAPACK_NAME(dormbr,DORMBR)
09690 #define LAPACK_cungbr LAPACK_NAME(cungbr,CUNGBR)
09691 #define LAPACK_zungbr LAPACK_NAME(zungbr,ZUNGBR)
09692 #define LAPACK_cunmbr LAPACK_NAME(cunmbr,CUNMBR)
09693 #define LAPACK_zunmbr LAPACK_NAME(zunmbr,ZUNMBR)
09694 #define LAPACK_sbdsqr LAPACK_NAME(sbdsqr,SBDSQR)
09695 #define LAPACK_dbdsqr LAPACK_NAME(dbdsqr,DBDSQR)
09696 #define LAPACK_cbdsqr LAPACK_NAME(cbdsqr,CBDSQR)
09697 #define LAPACK_zbdsqr LAPACK_NAME(zbdsqr,ZBDSQR)
09698 #define LAPACK_sbdsdc LAPACK_NAME(sbdsdc,SBDSDC)
09699 #define LAPACK_dbdsdc LAPACK_NAME(dbdsdc,DBDSDC)
09700 #define LAPACK_ssytrd LAPACK_NAME(ssytrd,SSYTRD)
09701 #define LAPACK_dsytrd LAPACK_NAME(dsytrd,DSYTRD)
09702 #define LAPACK_sorgtr LAPACK_NAME(sorgtr,SORGTR)
09703 #define LAPACK_dorgtr LAPACK_NAME(dorgtr,DORGTR)
09704 #define LAPACK_sormtr LAPACK_NAME(sormtr,SORMTR)
09705 #define LAPACK_dormtr LAPACK_NAME(dormtr,DORMTR)
09706 #define LAPACK_chetrd LAPACK_NAME(chetrd,CHETRD)
09707 #define LAPACK_zhetrd LAPACK_NAME(zhetrd,ZHETRD)
09708 #define LAPACK_cungtr LAPACK_NAME(cungtr,CUNGTR)
09709 #define LAPACK_zungtr LAPACK_NAME(zungtr,ZUNGTR)
09710 #define LAPACK_cunmtr LAPACK_NAME(cunmtr,CUNMTR)
09711 #define LAPACK_zunmtr LAPACK_NAME(zunmtr,ZUNMTR)
09712 #define LAPACK_ssptrd LAPACK_NAME(ssptrd,SSPTRD)
09713 #define LAPACK_dsptrd LAPACK_NAME(dsptrd,DSPTRD)
09714 #define LAPACK_sopgtr LAPACK_NAME(sopgtr,SOPGTR)
09715 #define LAPACK_dopgtr LAPACK_NAME(dopgtr,DOPGTR)
09716 #define LAPACK_sopmtr LAPACK_NAME(sopmtr,SOPMTR)
09717 #define LAPACK_dopmtr LAPACK_NAME(dopmtr,DOPMTR)
09718 #define LAPACK_chptrd LAPACK_NAME(chptrd,CHPTRD)
09719 #define LAPACK_zhptrd LAPACK_NAME(zhptrd,ZHPTRD)
09720 #define LAPACK_cupgtr LAPACK_NAME(cupgtr,CUPGTR)
09721 #define LAPACK_zupgtr LAPACK_NAME(zupgtr,ZUPGTR)
09722 #define LAPACK_cupmtr LAPACK_NAME(cupmtr,CUPMTR)
09723 #define LAPACK_zupmtr LAPACK_NAME(zupmtr,ZUPMTR)
09724 #define LAPACK_ssbtrd LAPACK_NAME(ssbtrd,SSBTRD)
09725 #define LAPACK_dsbtrd LAPACK_NAME(dsbtrd,DSBTRD)
09726 #define LAPACK_chbtrd LAPACK_NAME(chbtrd,CHBTRD)
09727 #define LAPACK_zhbtrd LAPACK_NAME(zhbtrd,ZHBTRD)
09728 #define LAPACK_ssterf LAPACK_NAME(ssterf,SSTERF)
09729 #define LAPACK_dsterf LAPACK_NAME(dsterf,DSTERF)
09730 #define LAPACK_ssteqr LAPACK_NAME(ssteqr,SSTEQR)
09731 #define LAPACK_dsteqr LAPACK_NAME(dsteqr,DSTEQR)
09732 #define LAPACK_csteqr LAPACK_NAME(csteqr,CSTEQR)
09733 #define LAPACK_zsteqr LAPACK_NAME(zsteqr,ZSTEQR)
09734 #define LAPACK_sstemr LAPACK_NAME(sstemr,SSTEMR)
09735 #define LAPACK_dstemr LAPACK_NAME(dstemr,DSTEMR)
09736 #define LAPACK_cstemr LAPACK_NAME(cstemr,CSTEMR)
09737 #define LAPACK_zstemr LAPACK_NAME(zstemr,ZSTEMR)
09738 #define LAPACK_sstedc LAPACK_NAME(sstedc,SSTEDC)
09739 #define LAPACK_dstedc LAPACK_NAME(dstedc,DSTEDC)
09740 #define LAPACK_cstedc LAPACK_NAME(cstedc,CSTEDC)
09741 #define LAPACK_zstedc LAPACK_NAME(zstedc,ZSTEDC)
09742 #define LAPACK_sstegr LAPACK_NAME(sstegr,SSTEGR)
09743 #define LAPACK_dstegr LAPACK_NAME(dstegr,DSTEGR)
09744 #define LAPACK_cstegr LAPACK_NAME(cstegr,CSTEGR)
09745 #define LAPACK_zstegr LAPACK_NAME(zstegr,ZSTEGR)
09746 #define LAPACK_spteqr LAPACK_NAME(spteqr,SPTEQR)
09747 #define LAPACK_dpteqr LAPACK_NAME(dpteqr,DPTEQR)
09748 #define LAPACK_cpteqr LAPACK_NAME(cpteqr,CPTEQR)
09749 #define LAPACK_zpteqr LAPACK_NAME(zpteqr,ZPTEQR)
09750 #define LAPACK_sstebz LAPACK_NAME(sstebz,SSTEBZ)
09751 #define LAPACK_dstebz LAPACK_NAME(dstebz,DSTEBZ)
09752 #define LAPACK_sstein LAPACK_NAME(sstein,SSTEIN)
09753 #define LAPACK_dstein LAPACK_NAME(dstein,DSTEIN)
09754 #define LAPACK_cstein LAPACK_NAME(cstein,CSTEIN)
09755 #define LAPACK_zstein LAPACK_NAME(zstein,ZSTEIN)
09756 #define LAPACK_sdisna LAPACK_NAME(sdisna,SDISNA)
09757 #define LAPACK_ddisna LAPACK_NAME(ddisna,DDISNA)
09758 #define LAPACK_ssygst LAPACK_NAME(ssygst,SSYGST)
09759 #define LAPACK_dsygst LAPACK_NAME(dsygst,DSYGST)
09760 #define LAPACK_chegst LAPACK_NAME(chegst,CHEGST)
09761 #define LAPACK_zhegst LAPACK_NAME(zhegst,ZHEGST)
09762 #define LAPACK_sspgst LAPACK_NAME(sspgst,SSPGST)
09763 #define LAPACK_dspgst LAPACK_NAME(dspgst,DSPGST)
09764 #define LAPACK_chpgst LAPACK_NAME(chpgst,CHPGST)
09765 #define LAPACK_zhpgst LAPACK_NAME(zhpgst,ZHPGST)
09766 #define LAPACK_ssbgst LAPACK_NAME(ssbgst,SSBGST)
09767 #define LAPACK_dsbgst LAPACK_NAME(dsbgst,DSBGST)
09768 #define LAPACK_chbgst LAPACK_NAME(chbgst,CHBGST)
09769 #define LAPACK_zhbgst LAPACK_NAME(zhbgst,ZHBGST)
09770 #define LAPACK_spbstf LAPACK_NAME(spbstf,SPBSTF)
09771 #define LAPACK_dpbstf LAPACK_NAME(dpbstf,DPBSTF)
09772 #define LAPACK_cpbstf LAPACK_NAME(cpbstf,CPBSTF)
09773 #define LAPACK_zpbstf LAPACK_NAME(zpbstf,ZPBSTF)
09774 #define LAPACK_sgehrd LAPACK_NAME(sgehrd,SGEHRD)
09775 #define LAPACK_dgehrd LAPACK_NAME(dgehrd,DGEHRD)
09776 #define LAPACK_cgehrd LAPACK_NAME(cgehrd,CGEHRD)
09777 #define LAPACK_zgehrd LAPACK_NAME(zgehrd,ZGEHRD)
09778 #define LAPACK_sorghr LAPACK_NAME(sorghr,SORGHR)
09779 #define LAPACK_dorghr LAPACK_NAME(dorghr,DORGHR)
09780 #define LAPACK_sormhr LAPACK_NAME(sormhr,SORMHR)
09781 #define LAPACK_dormhr LAPACK_NAME(dormhr,DORMHR)
09782 #define LAPACK_cunghr LAPACK_NAME(cunghr,CUNGHR)
09783 #define LAPACK_zunghr LAPACK_NAME(zunghr,ZUNGHR)
09784 #define LAPACK_cunmhr LAPACK_NAME(cunmhr,CUNMHR)
09785 #define LAPACK_zunmhr LAPACK_NAME(zunmhr,ZUNMHR)
09786 #define LAPACK_sgebal LAPACK_NAME(sgebal,SGEBAL)
09787 #define LAPACK_dgebal LAPACK_NAME(dgebal,DGEBAL)
09788 #define LAPACK_cgebal LAPACK_NAME(cgebal,CGEBAL)
09789 #define LAPACK_zgebal LAPACK_NAME(zgebal,ZGEBAL)
09790 #define LAPACK_sgebak LAPACK_NAME(sgebak,SGEBAK)
09791 #define LAPACK_dgebak LAPACK_NAME(dgebak,DGEBAK)
09792 #define LAPACK_cgebak LAPACK_NAME(cgebak,CGEBAK)
09793 #define LAPACK_zgebak LAPACK_NAME(zgebak,ZGEBAK)
09794 #define LAPACK_shseqr LAPACK_NAME(shseqr,SHSEQR)
09795 #define LAPACK_dhseqr LAPACK_NAME(dhseqr,DHSEQR)
09796 #define LAPACK_chseqr LAPACK_NAME(chseqr,CHSEQR)
09797 #define LAPACK_zhseqr LAPACK_NAME(zhseqr,ZHSEQR)
09798 #define LAPACK_shsein LAPACK_NAME(shsein,SHSEIN)
09799 #define LAPACK_dhsein LAPACK_NAME(dhsein,DHSEIN)
09800 #define LAPACK_chsein LAPACK_NAME(chsein,CHSEIN)
09801 #define LAPACK_zhsein LAPACK_NAME(zhsein,ZHSEIN)
09802 #define LAPACK_strevc LAPACK_NAME(strevc,STREVC)
09803 #define LAPACK_dtrevc LAPACK_NAME(dtrevc,DTREVC)
09804 #define LAPACK_ctrevc LAPACK_NAME(ctrevc,CTREVC)
09805 #define LAPACK_ztrevc LAPACK_NAME(ztrevc,ZTREVC)
09806 #define LAPACK_strsna LAPACK_NAME(strsna,STRSNA)
09807 #define LAPACK_dtrsna LAPACK_NAME(dtrsna,DTRSNA)
09808 #define LAPACK_ctrsna LAPACK_NAME(ctrsna,CTRSNA)
09809 #define LAPACK_ztrsna LAPACK_NAME(ztrsna,ZTRSNA)
09810 #define LAPACK_strexc LAPACK_NAME(strexc,STREXC)
09811 #define LAPACK_dtrexc LAPACK_NAME(dtrexc,DTREXC)
09812 #define LAPACK_ctrexc LAPACK_NAME(ctrexc,CTREXC)
09813 #define LAPACK_ztrexc LAPACK_NAME(ztrexc,ZTREXC)
09814 #define LAPACK_strsen LAPACK_NAME(strsen,STRSEN)
09815 #define LAPACK_dtrsen LAPACK_NAME(dtrsen,DTRSEN)
09816 #define LAPACK_ctrsen LAPACK_NAME(ctrsen,CTRSEN)
09817 #define LAPACK_ztrsen LAPACK_NAME(ztrsen,ZTRSEN)
09818 #define LAPACK_strsyl LAPACK_NAME(strsyl,STRSYL)
09819 #define LAPACK_dtrsyl LAPACK_NAME(dtrsyl,DTRSYL)
09820 #define LAPACK_ctrsyl LAPACK_NAME(ctrsyl,CTRSYL)
09821 #define LAPACK_ztrsyl LAPACK_NAME(ztrsyl,ZTRSYL)
09822 #define LAPACK_sgghrd LAPACK_NAME(sgghrd,SGGHRD)
09823 #define LAPACK_dgghrd LAPACK_NAME(dgghrd,DGGHRD)
09824 #define LAPACK_cgghrd LAPACK_NAME(cgghrd,CGGHRD)
09825 #define LAPACK_zgghrd LAPACK_NAME(zgghrd,ZGGHRD)
09826 #define LAPACK_sggbal LAPACK_NAME(sggbal,SGGBAL)
09827 #define LAPACK_dggbal LAPACK_NAME(dggbal,DGGBAL)
09828 #define LAPACK_cggbal LAPACK_NAME(cggbal,CGGBAL)
09829 #define LAPACK_zggbal LAPACK_NAME(zggbal,ZGGBAL)
09830 #define LAPACK_sggbak LAPACK_NAME(sggbak,SGGBAK)
09831 #define LAPACK_dggbak LAPACK_NAME(dggbak,DGGBAK)
09832 #define LAPACK_cggbak LAPACK_NAME(cggbak,CGGBAK)
09833 #define LAPACK_zggbak LAPACK_NAME(zggbak,ZGGBAK)
09834 #define LAPACK_shgeqz LAPACK_NAME(shgeqz,SHGEQZ)
09835 #define LAPACK_dhgeqz LAPACK_NAME(dhgeqz,DHGEQZ)
09836 #define LAPACK_chgeqz LAPACK_NAME(chgeqz,CHGEQZ)
09837 #define LAPACK_zhgeqz LAPACK_NAME(zhgeqz,ZHGEQZ)
09838 #define LAPACK_stgevc LAPACK_NAME(stgevc,STGEVC)
09839 #define LAPACK_dtgevc LAPACK_NAME(dtgevc,DTGEVC)
09840 #define LAPACK_ctgevc LAPACK_NAME(ctgevc,CTGEVC)
09841 #define LAPACK_ztgevc LAPACK_NAME(ztgevc,ZTGEVC)
09842 #define LAPACK_stgexc LAPACK_NAME(stgexc,STGEXC)
09843 #define LAPACK_dtgexc LAPACK_NAME(dtgexc,DTGEXC)
09844 #define LAPACK_ctgexc LAPACK_NAME(ctgexc,CTGEXC)
09845 #define LAPACK_ztgexc LAPACK_NAME(ztgexc,ZTGEXC)
09846 #define LAPACK_stgsen LAPACK_NAME(stgsen,STGSEN)
09847 #define LAPACK_dtgsen LAPACK_NAME(dtgsen,DTGSEN)
09848 #define LAPACK_ctgsen LAPACK_NAME(ctgsen,CTGSEN)
09849 #define LAPACK_ztgsen LAPACK_NAME(ztgsen,ZTGSEN)
09850 #define LAPACK_stgsyl LAPACK_NAME(stgsyl,STGSYL)
09851 #define LAPACK_dtgsyl LAPACK_NAME(dtgsyl,DTGSYL)
09852 #define LAPACK_ctgsyl LAPACK_NAME(ctgsyl,CTGSYL)
09853 #define LAPACK_ztgsyl LAPACK_NAME(ztgsyl,ZTGSYL)
09854 #define LAPACK_stgsna LAPACK_NAME(stgsna,STGSNA)
09855 #define LAPACK_dtgsna LAPACK_NAME(dtgsna,DTGSNA)
09856 #define LAPACK_ctgsna LAPACK_NAME(ctgsna,CTGSNA)
09857 #define LAPACK_ztgsna LAPACK_NAME(ztgsna,ZTGSNA)
09858 #define LAPACK_sggsvp LAPACK_NAME(sggsvp,SGGSVP)
09859 #define LAPACK_dggsvp LAPACK_NAME(dggsvp,DGGSVP)
09860 #define LAPACK_cggsvp LAPACK_NAME(cggsvp,CGGSVP)
09861 #define LAPACK_zggsvp LAPACK_NAME(zggsvp,ZGGSVP)
09862 #define LAPACK_stgsja LAPACK_NAME(stgsja,STGSJA)
09863 #define LAPACK_dtgsja LAPACK_NAME(dtgsja,DTGSJA)
09864 #define LAPACK_ctgsja LAPACK_NAME(ctgsja,CTGSJA)
09865 #define LAPACK_ztgsja LAPACK_NAME(ztgsja,ZTGSJA)
09866 #define LAPACK_sgels LAPACK_NAME(sgels,SGELS)
09867 #define LAPACK_dgels LAPACK_NAME(dgels,DGELS)
09868 #define LAPACK_cgels LAPACK_NAME(cgels,CGELS)
09869 #define LAPACK_zgels LAPACK_NAME(zgels,ZGELS)
09870 #define LAPACK_sgelsy LAPACK_NAME(sgelsy,SGELSY)
09871 #define LAPACK_dgelsy LAPACK_NAME(dgelsy,DGELSY)
09872 #define LAPACK_cgelsy LAPACK_NAME(cgelsy,CGELSY)
09873 #define LAPACK_zgelsy LAPACK_NAME(zgelsy,ZGELSY)
09874 #define LAPACK_sgelss LAPACK_NAME(sgelss,SGELSS)
09875 #define LAPACK_dgelss LAPACK_NAME(dgelss,DGELSS)
09876 #define LAPACK_cgelss LAPACK_NAME(cgelss,CGELSS)
09877 #define LAPACK_zgelss LAPACK_NAME(zgelss,ZGELSS)
09878 #define LAPACK_sgelsd LAPACK_NAME(sgelsd,SGELSD)
09879 #define LAPACK_dgelsd LAPACK_NAME(dgelsd,DGELSD)
09880 #define LAPACK_cgelsd LAPACK_NAME(cgelsd,CGELSD)
09881 #define LAPACK_zgelsd LAPACK_NAME(zgelsd,ZGELSD)
09882 #define LAPACK_sgglse LAPACK_NAME(sgglse,SGGLSE)
09883 #define LAPACK_dgglse LAPACK_NAME(dgglse,DGGLSE)
09884 #define LAPACK_cgglse LAPACK_NAME(cgglse,CGGLSE)
09885 #define LAPACK_zgglse LAPACK_NAME(zgglse,ZGGLSE)
09886 #define LAPACK_sggglm LAPACK_NAME(sggglm,SGGGLM)
09887 #define LAPACK_dggglm LAPACK_NAME(dggglm,DGGGLM)
09888 #define LAPACK_cggglm LAPACK_NAME(cggglm,CGGGLM)
09889 #define LAPACK_zggglm LAPACK_NAME(zggglm,ZGGGLM)
09890 #define LAPACK_ssyev LAPACK_NAME(ssyev,SSYEV)
09891 #define LAPACK_dsyev LAPACK_NAME(dsyev,DSYEV)
09892 #define LAPACK_cheev LAPACK_NAME(cheev,CHEEV)
09893 #define LAPACK_zheev LAPACK_NAME(zheev,ZHEEV)
09894 #define LAPACK_ssyevd LAPACK_NAME(ssyevd,SSYEVD)
09895 #define LAPACK_dsyevd LAPACK_NAME(dsyevd,DSYEVD)
09896 #define LAPACK_cheevd LAPACK_NAME(cheevd,CHEEVD)
09897 #define LAPACK_zheevd LAPACK_NAME(zheevd,ZHEEVD)
09898 #define LAPACK_ssyevx LAPACK_NAME(ssyevx,SSYEVX)
09899 #define LAPACK_dsyevx LAPACK_NAME(dsyevx,DSYEVX)
09900 #define LAPACK_cheevx LAPACK_NAME(cheevx,CHEEVX)
09901 #define LAPACK_zheevx LAPACK_NAME(zheevx,ZHEEVX)
09902 #define LAPACK_ssyevr LAPACK_NAME(ssyevr,SSYEVR)
09903 #define LAPACK_dsyevr LAPACK_NAME(dsyevr,DSYEVR)
09904 #define LAPACK_cheevr LAPACK_NAME(cheevr,CHEEVR)
09905 #define LAPACK_zheevr LAPACK_NAME(zheevr,ZHEEVR)
09906 #define LAPACK_sspev LAPACK_NAME(sspev,SSPEV)
09907 #define LAPACK_dspev LAPACK_NAME(dspev,DSPEV)
09908 #define LAPACK_chpev LAPACK_NAME(chpev,CHPEV)
09909 #define LAPACK_zhpev LAPACK_NAME(zhpev,ZHPEV)
09910 #define LAPACK_sspevd LAPACK_NAME(sspevd,SSPEVD)
09911 #define LAPACK_dspevd LAPACK_NAME(dspevd,DSPEVD)
09912 #define LAPACK_chpevd LAPACK_NAME(chpevd,CHPEVD)
09913 #define LAPACK_zhpevd LAPACK_NAME(zhpevd,ZHPEVD)
09914 #define LAPACK_sspevx LAPACK_NAME(sspevx,SSPEVX)
09915 #define LAPACK_dspevx LAPACK_NAME(dspevx,DSPEVX)
09916 #define LAPACK_chpevx LAPACK_NAME(chpevx,CHPEVX)
09917 #define LAPACK_zhpevx LAPACK_NAME(zhpevx,ZHPEVX)
09918 #define LAPACK_ssbev LAPACK_NAME(ssbev,SSBEV)
09919 #define LAPACK_dsbev LAPACK_NAME(dsbev,DSBEV)
09920 #define LAPACK_chbev LAPACK_NAME(chbev,CHBEV)
09921 #define LAPACK_zhbev LAPACK_NAME(zhbev,ZHBEV)
09922 #define LAPACK_ssbevd LAPACK_NAME(ssbevd,SSBEVD)
09923 #define LAPACK_dsbevd LAPACK_NAME(dsbevd,DSBEVD)
09924 #define LAPACK_chbevd LAPACK_NAME(chbevd,CHBEVD)
09925 #define LAPACK_zhbevd LAPACK_NAME(zhbevd,ZHBEVD)
09926 #define LAPACK_ssbevx LAPACK_NAME(ssbevx,SSBEVX)
09927 #define LAPACK_dsbevx LAPACK_NAME(dsbevx,DSBEVX)
09928 #define LAPACK_chbevx LAPACK_NAME(chbevx,CHBEVX)
09929 #define LAPACK_zhbevx LAPACK_NAME(zhbevx,ZHBEVX)
09930 #define LAPACK_sstev LAPACK_NAME(sstev,SSTEV)
09931 #define LAPACK_dstev LAPACK_NAME(dstev,DSTEV)
09932 #define LAPACK_sstevd LAPACK_NAME(sstevd,SSTEVD)
09933 #define LAPACK_dstevd LAPACK_NAME(dstevd,DSTEVD)
09934 #define LAPACK_sstevx LAPACK_NAME(sstevx,SSTEVX)
09935 #define LAPACK_dstevx LAPACK_NAME(dstevx,DSTEVX)
09936 #define LAPACK_sstevr LAPACK_NAME(sstevr,SSTEVR)
09937 #define LAPACK_dstevr LAPACK_NAME(dstevr,DSTEVR)
09938 #define LAPACK_sgees LAPACK_NAME(sgees,SGEES)
09939 #define LAPACK_dgees LAPACK_NAME(dgees,DGEES)
09940 #define LAPACK_cgees LAPACK_NAME(cgees,CGEES)
09941 #define LAPACK_zgees LAPACK_NAME(zgees,ZGEES)
09942 #define LAPACK_sgeesx LAPACK_NAME(sgeesx,SGEESX)
09943 #define LAPACK_dgeesx LAPACK_NAME(dgeesx,DGEESX)
09944 #define LAPACK_cgeesx LAPACK_NAME(cgeesx,CGEESX)
09945 #define LAPACK_zgeesx LAPACK_NAME(zgeesx,ZGEESX)
09946 #define LAPACK_sgeev LAPACK_NAME(sgeev,SGEEV)
09947 #define LAPACK_dgeev LAPACK_NAME(dgeev,DGEEV)
09948 #define LAPACK_cgeev LAPACK_NAME(cgeev,CGEEV)
09949 #define LAPACK_zgeev LAPACK_NAME(zgeev,ZGEEV)
09950 #define LAPACK_sgeevx LAPACK_NAME(sgeevx,SGEEVX)
09951 #define LAPACK_dgeevx LAPACK_NAME(dgeevx,DGEEVX)
09952 #define LAPACK_cgeevx LAPACK_NAME(cgeevx,CGEEVX)
09953 #define LAPACK_zgeevx LAPACK_NAME(zgeevx,ZGEEVX)
09954 #define LAPACK_sgesvd LAPACK_NAME(sgesvd,SGESVD)
09955 #define LAPACK_dgesvd LAPACK_NAME(dgesvd,DGESVD)
09956 #define LAPACK_cgesvd LAPACK_NAME(cgesvd,CGESVD)
09957 #define LAPACK_zgesvd LAPACK_NAME(zgesvd,ZGESVD)
09958 #define LAPACK_sgesdd LAPACK_NAME(sgesdd,SGESDD)
09959 #define LAPACK_dgesdd LAPACK_NAME(dgesdd,DGESDD)
09960 #define LAPACK_cgesdd LAPACK_NAME(cgesdd,CGESDD)
09961 #define LAPACK_zgesdd LAPACK_NAME(zgesdd,ZGESDD)
09962 #define LAPACK_dgejsv LAPACK_NAME(dgejsv,DGEJSV)
09963 #define LAPACK_sgejsv LAPACK_NAME(sgejsv,SGEJSV)
09964 #define LAPACK_dgesvj LAPACK_NAME(dgesvj,DGESVJ)
09965 #define LAPACK_sgesvj LAPACK_NAME(sgesvj,SGESVJ)
09966 #define LAPACK_sggsvd LAPACK_NAME(sggsvd,SGGSVD)
09967 #define LAPACK_dggsvd LAPACK_NAME(dggsvd,DGGSVD)
09968 #define LAPACK_cggsvd LAPACK_NAME(cggsvd,CGGSVD)
09969 #define LAPACK_zggsvd LAPACK_NAME(zggsvd,ZGGSVD)
09970 #define LAPACK_ssygv LAPACK_NAME(ssygv,SSYGV)
09971 #define LAPACK_dsygv LAPACK_NAME(dsygv,DSYGV)
09972 #define LAPACK_chegv LAPACK_NAME(chegv,CHEGV)
09973 #define LAPACK_zhegv LAPACK_NAME(zhegv,ZHEGV)
09974 #define LAPACK_ssygvd LAPACK_NAME(ssygvd,SSYGVD)
09975 #define LAPACK_dsygvd LAPACK_NAME(dsygvd,DSYGVD)
09976 #define LAPACK_chegvd LAPACK_NAME(chegvd,CHEGVD)
09977 #define LAPACK_zhegvd LAPACK_NAME(zhegvd,ZHEGVD)
09978 #define LAPACK_ssygvx LAPACK_NAME(ssygvx,SSYGVX)
09979 #define LAPACK_dsygvx LAPACK_NAME(dsygvx,DSYGVX)
09980 #define LAPACK_chegvx LAPACK_NAME(chegvx,CHEGVX)
09981 #define LAPACK_zhegvx LAPACK_NAME(zhegvx,ZHEGVX)
09982 #define LAPACK_sspgv LAPACK_NAME(sspgv,SSPGV)
09983 #define LAPACK_dspgv LAPACK_NAME(dspgv,DSPGV)
09984 #define LAPACK_chpgv LAPACK_NAME(chpgv,CHPGV)
09985 #define LAPACK_zhpgv LAPACK_NAME(zhpgv,ZHPGV)
09986 #define LAPACK_sspgvd LAPACK_NAME(sspgvd,SSPGVD)
09987 #define LAPACK_dspgvd LAPACK_NAME(dspgvd,DSPGVD)
09988 #define LAPACK_chpgvd LAPACK_NAME(chpgvd,CHPGVD)
09989 #define LAPACK_zhpgvd LAPACK_NAME(zhpgvd,ZHPGVD)
09990 #define LAPACK_sspgvx LAPACK_NAME(sspgvx,SSPGVX)
09991 #define LAPACK_dspgvx LAPACK_NAME(dspgvx,DSPGVX)
09992 #define LAPACK_chpgvx LAPACK_NAME(chpgvx,CHPGVX)
09993 #define LAPACK_zhpgvx LAPACK_NAME(zhpgvx,ZHPGVX)
09994 #define LAPACK_ssbgv LAPACK_NAME(ssbgv,SSBGV)
09995 #define LAPACK_dsbgv LAPACK_NAME(dsbgv,DSBGV)
09996 #define LAPACK_chbgv LAPACK_NAME(chbgv,CHBGV)
09997 #define LAPACK_zhbgv LAPACK_NAME(zhbgv,ZHBGV)
09998 #define LAPACK_ssbgvd LAPACK_NAME(ssbgvd,SSBGVD)
09999 #define LAPACK_dsbgvd LAPACK_NAME(dsbgvd,DSBGVD)
10000 #define LAPACK_chbgvd LAPACK_NAME(chbgvd,CHBGVD)
10001 #define LAPACK_zhbgvd LAPACK_NAME(zhbgvd,ZHBGVD)
10002 #define LAPACK_ssbgvx LAPACK_NAME(ssbgvx,SSBGVX)
10003 #define LAPACK_dsbgvx LAPACK_NAME(dsbgvx,DSBGVX)
10004 #define LAPACK_chbgvx LAPACK_NAME(chbgvx,CHBGVX)
10005 #define LAPACK_zhbgvx LAPACK_NAME(zhbgvx,ZHBGVX)
10006 #define LAPACK_sgges LAPACK_NAME(sgges,SGGES)
10007 #define LAPACK_dgges LAPACK_NAME(dgges,DGGES)
10008 #define LAPACK_cgges LAPACK_NAME(cgges,CGGES)
10009 #define LAPACK_zgges LAPACK_NAME(zgges,ZGGES)
10010 #define LAPACK_sggesx LAPACK_NAME(sggesx,SGGESX)
10011 #define LAPACK_dggesx LAPACK_NAME(dggesx,DGGESX)
10012 #define LAPACK_cggesx LAPACK_NAME(cggesx,CGGESX)
10013 #define LAPACK_zggesx LAPACK_NAME(zggesx,ZGGESX)
10014 #define LAPACK_sggev LAPACK_NAME(sggev,SGGEV)
10015 #define LAPACK_dggev LAPACK_NAME(dggev,DGGEV)
10016 #define LAPACK_cggev LAPACK_NAME(cggev,CGGEV)
10017 #define LAPACK_zggev LAPACK_NAME(zggev,ZGGEV)
10018 #define LAPACK_sggevx LAPACK_NAME(sggevx,SGGEVX)
10019 #define LAPACK_dggevx LAPACK_NAME(dggevx,DGGEVX)
10020 #define LAPACK_cggevx LAPACK_NAME(cggevx,CGGEVX)
10021 #define LAPACK_zggevx LAPACK_NAME(zggevx,ZGGEVX)
10022 #define LAPACK_dsfrk LAPACK_NAME(dsfrk,DSFRK)
10023 #define LAPACK_ssfrk LAPACK_NAME(ssfrk,SSFRK)
10024 #define LAPACK_zhfrk LAPACK_NAME(zhfrk,ZHFRK)
10025 #define LAPACK_chfrk LAPACK_NAME(chfrk,CHFRK)
10026 #define LAPACK_dtfsm LAPACK_NAME(dtfsm,DTFSM)
10027 #define LAPACK_stfsm LAPACK_NAME(stfsm,STFSM)
10028 #define LAPACK_ztfsm LAPACK_NAME(ztfsm,ZTFSM)
10029 #define LAPACK_ctfsm LAPACK_NAME(ctfsm,CTFSM)
10030 #define LAPACK_dtfttp LAPACK_NAME(dtfttp,DTFTTP)
10031 #define LAPACK_stfttp LAPACK_NAME(stfttp,STFTTP)
10032 #define LAPACK_ztfttp LAPACK_NAME(ztfttp,ZTFTTP)
10033 #define LAPACK_ctfttp LAPACK_NAME(ctfttp,CTFTTP)
10034 #define LAPACK_dtfttr LAPACK_NAME(dtfttr,DTFTTR)
10035 #define LAPACK_stfttr LAPACK_NAME(stfttr,STFTTR)
10036 #define LAPACK_ztfttr LAPACK_NAME(ztfttr,ZTFTTR)
10037 #define LAPACK_ctfttr LAPACK_NAME(ctfttr,CTFTTR)
10038 #define LAPACK_dtpttf LAPACK_NAME(dtpttf,DTPTTF)
10039 #define LAPACK_stpttf LAPACK_NAME(stpttf,STPTTF)
10040 #define LAPACK_ztpttf LAPACK_NAME(ztpttf,ZTPTTF)
10041 #define LAPACK_ctpttf LAPACK_NAME(ctpttf,CTPTTF)
10042 #define LAPACK_dtpttr LAPACK_NAME(dtpttr,DTPTTR)
10043 #define LAPACK_stpttr LAPACK_NAME(stpttr,STPTTR)
10044 #define LAPACK_ztpttr LAPACK_NAME(ztpttr,ZTPTTR)
10045 #define LAPACK_ctpttr LAPACK_NAME(ctpttr,CTPTTR)
10046 #define LAPACK_dtrttf LAPACK_NAME(dtrttf,DTRTTF)
10047 #define LAPACK_strttf LAPACK_NAME(strttf,STRTTF)
10048 #define LAPACK_ztrttf LAPACK_NAME(ztrttf,ZTRTTF)
10049 #define LAPACK_ctrttf LAPACK_NAME(ctrttf,CTRTTF)
10050 #define LAPACK_dtrttp LAPACK_NAME(dtrttp,DTRTTP)
10051 #define LAPACK_strttp LAPACK_NAME(strttp,STRTTP)
10052 #define LAPACK_ztrttp LAPACK_NAME(ztrttp,ZTRTTP)
10053 #define LAPACK_ctrttp LAPACK_NAME(ctrttp,CTRTTP)
10054 #define LAPACK_sgeqrfp LAPACK_NAME(sgeqrfp,SGEQRFP)
10055 #define LAPACK_dgeqrfp LAPACK_NAME(dgeqrfp,DGEQRFP)
10056 #define LAPACK_cgeqrfp LAPACK_NAME(cgeqrfp,CGEQRFP)
10057 #define LAPACK_zgeqrfp LAPACK_NAME(zgeqrfp,ZGEQRFP)
10058 
10059 void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
10060                     lapack_int* ipiv, lapack_int *info );
10061 void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
10062                     lapack_int* ipiv, lapack_int *info );
10063 void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
10064                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
10065 void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
10066                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
10067 void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
10068                     lapack_int* ku, float* ab, lapack_int* ldab,
10069                     lapack_int* ipiv, lapack_int *info );
10070 void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
10071                     lapack_int* ku, double* ab, lapack_int* ldab,
10072                     lapack_int* ipiv, lapack_int *info );
10073 void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
10074                     lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
10075                     lapack_int* ipiv, lapack_int *info );
10076 void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
10077                     lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
10078                     lapack_int* ipiv, lapack_int *info );
10079 void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
10080                     lapack_int* ipiv, lapack_int *info );
10081 void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
10082                     double* du2, lapack_int* ipiv, lapack_int *info );
10083 void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
10084                     lapack_complex_float* d, lapack_complex_float* du,
10085                     lapack_complex_float* du2, lapack_int* ipiv,
10086                     lapack_int *info );
10087 void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
10088                     lapack_complex_double* d, lapack_complex_double* du,
10089                     lapack_complex_double* du2, lapack_int* ipiv,
10090                     lapack_int *info );
10091 void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
10092                     lapack_int *info );
10093 void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
10094                     lapack_int *info );
10095 void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
10096                     lapack_int* lda, lapack_int *info );
10097 void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
10098                     lapack_int* lda, lapack_int *info );
10099 void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
10100                     lapack_int* piv, lapack_int* rank, double* tol,
10101                     double* work, lapack_int *info );
10102 void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
10103                     lapack_int* piv, lapack_int* rank, float* tol, float* work,
10104                     lapack_int *info );
10105 void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
10106                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
10107                     double* tol, double* work, lapack_int *info );
10108 void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
10109                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
10110                     float* tol, float* work, lapack_int *info );
10111 void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
10112                     lapack_int *info );
10113 void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
10114                     lapack_int *info );
10115 void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
10116                     lapack_complex_double* a, lapack_int *info );
10117 void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
10118                     lapack_complex_float* a, lapack_int *info );
10119 void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
10120 void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
10121 void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
10122                     lapack_int *info );
10123 void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
10124                     lapack_int *info );
10125 void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
10126                     lapack_int* ldab, lapack_int *info );
10127 void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
10128                     lapack_int* ldab, lapack_int *info );
10129 void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
10130                     lapack_complex_float* ab, lapack_int* ldab,
10131                     lapack_int *info );
10132 void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
10133                     lapack_complex_double* ab, lapack_int* ldab,
10134                     lapack_int *info );
10135 void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
10136 void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
10137 void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
10138                     lapack_int *info );
10139 void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
10140                     lapack_int *info );
10141 void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
10142                     lapack_int* ipiv, float* work, lapack_int* lwork,
10143                     lapack_int *info );
10144 void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
10145                     lapack_int* ipiv, double* work, lapack_int* lwork,
10146                     lapack_int *info );
10147 void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
10148                     lapack_int* lda, lapack_int* ipiv,
10149                     lapack_complex_float* work, lapack_int* lwork,
10150                     lapack_int *info );
10151 void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
10152                     lapack_int* lda, lapack_int* ipiv,
10153                     lapack_complex_double* work, lapack_int* lwork,
10154                     lapack_int *info );
10155 void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
10156                     lapack_int* lda, lapack_int* ipiv,
10157                     lapack_complex_float* work, lapack_int* lwork,
10158                     lapack_int *info );
10159 void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
10160                     lapack_int* lda, lapack_int* ipiv,
10161                     lapack_complex_double* work, lapack_int* lwork,
10162                     lapack_int *info );
10163 void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
10164                     lapack_int *info );
10165 void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
10166                     lapack_int *info );
10167 void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
10168                     lapack_int* ipiv, lapack_int *info );
10169 void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
10170                     lapack_int* ipiv, lapack_int *info );
10171 void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
10172                     lapack_int* ipiv, lapack_int *info );
10173 void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
10174                     lapack_int* ipiv, lapack_int *info );
10175 void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
10176                     const float* a, lapack_int* lda, const lapack_int* ipiv,
10177                     float* b, lapack_int* ldb, lapack_int *info );
10178 void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
10179                     const double* a, lapack_int* lda, const lapack_int* ipiv,
10180                     double* b, lapack_int* ldb, lapack_int *info );
10181 void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
10182                     const lapack_complex_float* a, lapack_int* lda,
10183                     const lapack_int* ipiv, lapack_complex_float* b,
10184                     lapack_int* ldb, lapack_int *info );
10185 void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
10186                     const lapack_complex_double* a, lapack_int* lda,
10187                     const lapack_int* ipiv, lapack_complex_double* b,
10188                     lapack_int* ldb, lapack_int *info );
10189 void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10190                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
10191                     const lapack_int* ipiv, float* b, lapack_int* ldb,
10192                     lapack_int *info );
10193 void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10194                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
10195                     const lapack_int* ipiv, double* b, lapack_int* ldb,
10196                     lapack_int *info );
10197 void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10198                     lapack_int* nrhs, const lapack_complex_float* ab,
10199                     lapack_int* ldab, const lapack_int* ipiv,
10200                     lapack_complex_float* b, lapack_int* ldb,
10201                     lapack_int *info );
10202 void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10203                     lapack_int* nrhs, const lapack_complex_double* ab,
10204                     lapack_int* ldab, const lapack_int* ipiv,
10205                     lapack_complex_double* b, lapack_int* ldb,
10206                     lapack_int *info );
10207 void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
10208                     const float* dl, const float* d, const float* du,
10209                     const float* du2, const lapack_int* ipiv, float* b,
10210                     lapack_int* ldb, lapack_int *info );
10211 void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
10212                     const double* dl, const double* d, const double* du,
10213                     const double* du2, const lapack_int* ipiv, double* b,
10214                     lapack_int* ldb, lapack_int *info );
10215 void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
10216                     const lapack_complex_float* dl,
10217                     const lapack_complex_float* d,
10218                     const lapack_complex_float* du,
10219                     const lapack_complex_float* du2, const lapack_int* ipiv,
10220                     lapack_complex_float* b, lapack_int* ldb,
10221                     lapack_int *info );
10222 void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
10223                     const lapack_complex_double* dl,
10224                     const lapack_complex_double* d,
10225                     const lapack_complex_double* du,
10226                     const lapack_complex_double* du2, const lapack_int* ipiv,
10227                     lapack_complex_double* b, lapack_int* ldb,
10228                     lapack_int *info );
10229 void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
10230                     lapack_int* lda, float* b, lapack_int* ldb,
10231                     lapack_int *info );
10232 void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10233                     const double* a, lapack_int* lda, double* b,
10234                     lapack_int* ldb, lapack_int *info );
10235 void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10236                     const lapack_complex_float* a, lapack_int* lda,
10237                     lapack_complex_float* b, lapack_int* ldb,
10238                     lapack_int *info );
10239 void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10240                     const lapack_complex_double* a, lapack_int* lda,
10241                     lapack_complex_double* b, lapack_int* ldb,
10242                     lapack_int *info );
10243 void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
10244                     const double* a, double* b, lapack_int* ldb,
10245                     lapack_int *info );
10246 void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
10247                     const float* a, float* b, lapack_int* ldb,
10248                     lapack_int *info );
10249 void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
10250                     const lapack_complex_double* a, lapack_complex_double* b,
10251                     lapack_int* ldb, lapack_int *info );
10252 void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
10253                     const lapack_complex_float* a, lapack_complex_float* b,
10254                     lapack_int* ldb, lapack_int *info );
10255 void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10256                     const float* ap, float* b, lapack_int* ldb,
10257                     lapack_int *info );
10258 void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10259                     const double* ap, double* b, lapack_int* ldb,
10260                     lapack_int *info );
10261 void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10262                     const lapack_complex_float* ap, lapack_complex_float* b,
10263                     lapack_int* ldb, lapack_int *info );
10264 void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10265                     const lapack_complex_double* ap, lapack_complex_double* b,
10266                     lapack_int* ldb, lapack_int *info );
10267 void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10268                     const float* ab, lapack_int* ldab, float* b,
10269                     lapack_int* ldb, lapack_int *info );
10270 void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10271                     const double* ab, lapack_int* ldab, double* b,
10272                     lapack_int* ldb, lapack_int *info );
10273 void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10274                     const lapack_complex_float* ab, lapack_int* ldab,
10275                     lapack_complex_float* b, lapack_int* ldb,
10276                     lapack_int *info );
10277 void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10278                     const lapack_complex_double* ab, lapack_int* ldab,
10279                     lapack_complex_double* b, lapack_int* ldb,
10280                     lapack_int *info );
10281 void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
10282                     const float* e, float* b, lapack_int* ldb,
10283                     lapack_int *info );
10284 void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
10285                     const double* e, double* b, lapack_int* ldb,
10286                     lapack_int *info );
10287 void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
10288                     const lapack_complex_float* e, lapack_complex_float* b,
10289                     lapack_int* ldb, lapack_int *info );
10290 void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10291                     const double* d, const lapack_complex_double* e,
10292                     lapack_complex_double* b, lapack_int* ldb,
10293                     lapack_int *info );
10294 void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
10295                     lapack_int* lda, const lapack_int* ipiv, float* b,
10296                     lapack_int* ldb, lapack_int *info );
10297 void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10298                     const double* a, lapack_int* lda, const lapack_int* ipiv,
10299                     double* b, lapack_int* ldb, lapack_int *info );
10300 void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10301                     const lapack_complex_float* a, lapack_int* lda,
10302                     const lapack_int* ipiv, lapack_complex_float* b,
10303                     lapack_int* ldb, lapack_int *info );
10304 void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10305                     const lapack_complex_double* a, lapack_int* lda,
10306                     const lapack_int* ipiv, lapack_complex_double* b,
10307                     lapack_int* ldb, lapack_int *info );
10308 void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10309                     const lapack_complex_float* a, lapack_int* lda,
10310                     const lapack_int* ipiv, lapack_complex_float* b,
10311                     lapack_int* ldb, lapack_int *info );
10312 void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10313                     const lapack_complex_double* a, lapack_int* lda,
10314                     const lapack_int* ipiv, lapack_complex_double* b,
10315                     lapack_int* ldb, lapack_int *info );
10316 void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10317                     const float* ap, const lapack_int* ipiv, float* b,
10318                     lapack_int* ldb, lapack_int *info );
10319 void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10320                     const double* ap, const lapack_int* ipiv, double* b,
10321                     lapack_int* ldb, lapack_int *info );
10322 void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10323                     const lapack_complex_float* ap, const lapack_int* ipiv,
10324                     lapack_complex_float* b, lapack_int* ldb,
10325                     lapack_int *info );
10326 void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10327                     const lapack_complex_double* ap, const lapack_int* ipiv,
10328                     lapack_complex_double* b, lapack_int* ldb,
10329                     lapack_int *info );
10330 void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10331                     const lapack_complex_float* ap, const lapack_int* ipiv,
10332                     lapack_complex_float* b, lapack_int* ldb,
10333                     lapack_int *info );
10334 void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
10335                     const lapack_complex_double* ap, const lapack_int* ipiv,
10336                     lapack_complex_double* b, lapack_int* ldb,
10337                     lapack_int *info );
10338 void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10339                     lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
10340                     lapack_int* ldb, lapack_int *info );
10341 void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10342                     lapack_int* nrhs, const double* a, lapack_int* lda,
10343                     double* b, lapack_int* ldb, lapack_int *info );
10344 void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10345                     lapack_int* nrhs, const lapack_complex_float* a,
10346                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
10347                     lapack_int *info );
10348 void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10349                     lapack_int* nrhs, const lapack_complex_double* a,
10350                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
10351                     lapack_int *info );
10352 void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
10353                     lapack_int* nrhs, const float* ap, float* b,
10354                     lapack_int* ldb, lapack_int *info );
10355 void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
10356                     lapack_int* nrhs, const double* ap, double* b,
10357                     lapack_int* ldb, lapack_int *info );
10358 void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
10359                     lapack_int* nrhs, const lapack_complex_float* ap,
10360                     lapack_complex_float* b, lapack_int* ldb,
10361                     lapack_int *info );
10362 void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
10363                     lapack_int* nrhs, const lapack_complex_double* ap,
10364                     lapack_complex_double* b, lapack_int* ldb,
10365                     lapack_int *info );
10366 void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10367                     lapack_int* kd, lapack_int* nrhs, const float* ab,
10368                     lapack_int* ldab, float* b, lapack_int* ldb,
10369                     lapack_int *info );
10370 void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10371                     lapack_int* kd, lapack_int* nrhs, const double* ab,
10372                     lapack_int* ldab, double* b, lapack_int* ldb,
10373                     lapack_int *info );
10374 void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10375                     lapack_int* kd, lapack_int* nrhs,
10376                     const lapack_complex_float* ab, lapack_int* ldab,
10377                     lapack_complex_float* b, lapack_int* ldb,
10378                     lapack_int *info );
10379 void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
10380                     lapack_int* kd, lapack_int* nrhs,
10381                     const lapack_complex_double* ab, lapack_int* ldab,
10382                     lapack_complex_double* b, lapack_int* ldb,
10383                     lapack_int *info );
10384 void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
10385                     float* anorm, float* rcond, float* work, lapack_int* iwork,
10386                     lapack_int *info );
10387 void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
10388                     double* anorm, double* rcond, double* work,
10389                     lapack_int* iwork, lapack_int *info );
10390 void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
10391                     lapack_int* lda, float* anorm, float* rcond,
10392                     lapack_complex_float* work, float* rwork,
10393                     lapack_int *info );
10394 void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
10395                     lapack_int* lda, double* anorm, double* rcond,
10396                     lapack_complex_double* work, double* rwork,
10397                     lapack_int *info );
10398 void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
10399                     const float* ab, lapack_int* ldab, const lapack_int* ipiv,
10400                     float* anorm, float* rcond, float* work, lapack_int* iwork,
10401                     lapack_int *info );
10402 void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
10403                     const double* ab, lapack_int* ldab, const lapack_int* ipiv,
10404                     double* anorm, double* rcond, double* work,
10405                     lapack_int* iwork, lapack_int *info );
10406 void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
10407                     const lapack_complex_float* ab, lapack_int* ldab,
10408                     const lapack_int* ipiv, float* anorm, float* rcond,
10409                     lapack_complex_float* work, float* rwork,
10410                     lapack_int *info );
10411 void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
10412                     const lapack_complex_double* ab, lapack_int* ldab,
10413                     const lapack_int* ipiv, double* anorm, double* rcond,
10414                     lapack_complex_double* work, double* rwork,
10415                     lapack_int *info );
10416 void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
10417                     const float* du, const float* du2, const lapack_int* ipiv,
10418                     float* anorm, float* rcond, float* work, lapack_int* iwork,
10419                     lapack_int *info );
10420 void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
10421                     const double* d, const double* du, const double* du2,
10422                     const lapack_int* ipiv, double* anorm, double* rcond,
10423                     double* work, lapack_int* iwork, lapack_int *info );
10424 void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
10425                     const lapack_complex_float* d,
10426                     const lapack_complex_float* du,
10427                     const lapack_complex_float* du2, const lapack_int* ipiv,
10428                     float* anorm, float* rcond, lapack_complex_float* work,
10429                     lapack_int *info );
10430 void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
10431                     const lapack_complex_double* d,
10432                     const lapack_complex_double* du,
10433                     const lapack_complex_double* du2, const lapack_int* ipiv,
10434                     double* anorm, double* rcond, lapack_complex_double* work,
10435                     lapack_int *info );
10436 void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
10437                     float* anorm, float* rcond, float* work, lapack_int* iwork,
10438                     lapack_int *info );
10439 void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
10440                     double* anorm, double* rcond, double* work,
10441                     lapack_int* iwork, lapack_int *info );
10442 void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
10443                     lapack_int* lda, float* anorm, float* rcond,
10444                     lapack_complex_float* work, float* rwork,
10445                     lapack_int *info );
10446 void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
10447                     lapack_int* lda, double* anorm, double* rcond,
10448                     lapack_complex_double* work, double* rwork,
10449                     lapack_int *info );
10450 void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
10451                     float* rcond, float* work, lapack_int* iwork,
10452                     lapack_int *info );
10453 void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
10454                     double* rcond, double* work, lapack_int* iwork,
10455                     lapack_int *info );
10456 void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
10457                     float* anorm, float* rcond, lapack_complex_float* work,
10458                     float* rwork, lapack_int *info );
10459 void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
10460                     double* anorm, double* rcond, lapack_complex_double* work,
10461                     double* rwork, lapack_int *info );
10462 void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
10463                     lapack_int* ldab, float* anorm, float* rcond, float* work,
10464                     lapack_int* iwork, lapack_int *info );
10465 void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
10466                     lapack_int* ldab, double* anorm, double* rcond,
10467                     double* work, lapack_int* iwork, lapack_int *info );
10468 void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
10469                     const lapack_complex_float* ab, lapack_int* ldab,
10470                     float* anorm, float* rcond, lapack_complex_float* work,
10471                     float* rwork, lapack_int *info );
10472 void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
10473                     const lapack_complex_double* ab, lapack_int* ldab,
10474                     double* anorm, double* rcond, lapack_complex_double* work,
10475                     double* rwork, lapack_int *info );
10476 void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
10477                     float* rcond, float* work, lapack_int *info );
10478 void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
10479                     double* anorm, double* rcond, double* work,
10480                     lapack_int *info );
10481 void LAPACK_cptcon( lapack_int* n, const float* d,
10482                     const lapack_complex_float* e, float* anorm, float* rcond,
10483                     float* work, lapack_int *info );
10484 void LAPACK_zptcon( lapack_int* n, const double* d,
10485                     const lapack_complex_double* e, double* anorm,
10486                     double* rcond, double* work, lapack_int *info );
10487 void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
10488                     const lapack_int* ipiv, float* anorm, float* rcond,
10489                     float* work, lapack_int* iwork, lapack_int *info );
10490 void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
10491                     const lapack_int* ipiv, double* anorm, double* rcond,
10492                     double* work, lapack_int* iwork, lapack_int *info );
10493 void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
10494                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
10495                     float* rcond, lapack_complex_float* work,
10496                     lapack_int *info );
10497 void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
10498                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
10499                     double* rcond, lapack_complex_double* work,
10500                     lapack_int *info );
10501 void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
10502                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
10503                     float* rcond, lapack_complex_float* work,
10504                     lapack_int *info );
10505 void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
10506                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
10507                     double* rcond, lapack_complex_double* work,
10508                     lapack_int *info );
10509 void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
10510                     const lapack_int* ipiv, float* anorm, float* rcond,
10511                     float* work, lapack_int* iwork, lapack_int *info );
10512 void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
10513                     const lapack_int* ipiv, double* anorm, double* rcond,
10514                     double* work, lapack_int* iwork, lapack_int *info );
10515 void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
10516                     const lapack_int* ipiv, float* anorm, float* rcond,
10517                     lapack_complex_float* work, lapack_int *info );
10518 void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
10519                     const lapack_int* ipiv, double* anorm, double* rcond,
10520                     lapack_complex_double* work, lapack_int *info );
10521 void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
10522                     const lapack_int* ipiv, float* anorm, float* rcond,
10523                     lapack_complex_float* work, lapack_int *info );
10524 void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
10525                     const lapack_int* ipiv, double* anorm, double* rcond,
10526                     lapack_complex_double* work, lapack_int *info );
10527 void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
10528                     const float* a, lapack_int* lda, float* rcond, float* work,
10529                     lapack_int* iwork, lapack_int *info );
10530 void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
10531                     const double* a, lapack_int* lda, double* rcond,
10532                     double* work, lapack_int* iwork, lapack_int *info );
10533 void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
10534                     const lapack_complex_float* a, lapack_int* lda,
10535                     float* rcond, lapack_complex_float* work, float* rwork,
10536                     lapack_int *info );
10537 void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
10538                     const lapack_complex_double* a, lapack_int* lda,
10539                     double* rcond, lapack_complex_double* work, double* rwork,
10540                     lapack_int *info );
10541 void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
10542                     const float* ap, float* rcond, float* work,
10543                     lapack_int* iwork, lapack_int *info );
10544 void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
10545                     const double* ap, double* rcond, double* work,
10546                     lapack_int* iwork, lapack_int *info );
10547 void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
10548                     const lapack_complex_float* ap, float* rcond,
10549                     lapack_complex_float* work, float* rwork,
10550                     lapack_int *info );
10551 void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
10552                     const lapack_complex_double* ap, double* rcond,
10553                     lapack_complex_double* work, double* rwork,
10554                     lapack_int *info );
10555 void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
10556                     lapack_int* kd, const float* ab, lapack_int* ldab,
10557                     float* rcond, float* work, lapack_int* iwork,
10558                     lapack_int *info );
10559 void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
10560                     lapack_int* kd, const double* ab, lapack_int* ldab,
10561                     double* rcond, double* work, lapack_int* iwork,
10562                     lapack_int *info );
10563 void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
10564                     lapack_int* kd, const lapack_complex_float* ab,
10565                     lapack_int* ldab, float* rcond, lapack_complex_float* work,
10566                     float* rwork, lapack_int *info );
10567 void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
10568                     lapack_int* kd, const lapack_complex_double* ab,
10569                     lapack_int* ldab, double* rcond,
10570                     lapack_complex_double* work, double* rwork,
10571                     lapack_int *info );
10572 void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
10573                     const float* a, lapack_int* lda, const float* af,
10574                     lapack_int* ldaf, const lapack_int* ipiv, const float* b,
10575                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
10576                     float* berr, float* work, lapack_int* iwork,
10577                     lapack_int *info );
10578 void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
10579                     const double* a, lapack_int* lda, const double* af,
10580                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
10581                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
10582                     double* berr, double* work, lapack_int* iwork,
10583                     lapack_int *info );
10584 void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
10585                     const lapack_complex_float* a, lapack_int* lda,
10586                     const lapack_complex_float* af, lapack_int* ldaf,
10587                     const lapack_int* ipiv, const lapack_complex_float* b,
10588                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
10589                     float* ferr, float* berr, lapack_complex_float* work,
10590                     float* rwork, lapack_int *info );
10591 void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
10592                     const lapack_complex_double* a, lapack_int* lda,
10593                     const lapack_complex_double* af, lapack_int* ldaf,
10594                     const lapack_int* ipiv, const lapack_complex_double* b,
10595                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
10596                     double* ferr, double* berr, lapack_complex_double* work,
10597                     double* rwork, lapack_int *info );
10598 void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
10599                      const double* a, lapack_int* lda, const double* af,
10600                      lapack_int* ldaf, const lapack_int* ipiv, const double* r,
10601                      const double* c, const double* b, lapack_int* ldb,
10602                      double* x, lapack_int* ldx, double* rcond, double* berr,
10603                      lapack_int* n_err_bnds, double* err_bnds_norm,
10604                      double* err_bnds_comp, lapack_int* nparams, double* params,
10605                      double* work, lapack_int* iwork, lapack_int *info );
10606 void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
10607                      const float* a, lapack_int* lda, const float* af,
10608                      lapack_int* ldaf, const lapack_int* ipiv, const float* r,
10609                      const float* c, const float* b, lapack_int* ldb, float* x,
10610                      lapack_int* ldx, float* rcond, float* berr,
10611                      lapack_int* n_err_bnds, float* err_bnds_norm,
10612                      float* err_bnds_comp, lapack_int* nparams, float* params,
10613                      float* work, lapack_int* iwork, lapack_int *info );
10614 void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
10615                      const lapack_complex_double* a, lapack_int* lda,
10616                      const lapack_complex_double* af, lapack_int* ldaf,
10617                      const lapack_int* ipiv, const double* r, const double* c,
10618                      const lapack_complex_double* b, lapack_int* ldb,
10619                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
10620                      double* berr, lapack_int* n_err_bnds,
10621                      double* err_bnds_norm, double* err_bnds_comp,
10622                      lapack_int* nparams, double* params,
10623                      lapack_complex_double* work, double* rwork,
10624                      lapack_int *info );
10625 void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
10626                      const lapack_complex_float* a, lapack_int* lda,
10627                      const lapack_complex_float* af, lapack_int* ldaf,
10628                      const lapack_int* ipiv, const float* r, const float* c,
10629                      const lapack_complex_float* b, lapack_int* ldb,
10630                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
10631                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
10632                      float* err_bnds_comp, lapack_int* nparams, float* params,
10633                      lapack_complex_float* work, float* rwork,
10634                      lapack_int *info );
10635 void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10636                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
10637                     const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
10638                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10639                     float* ferr, float* berr, float* work, lapack_int* iwork,
10640                     lapack_int *info );
10641 void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10642                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
10643                     const double* afb, lapack_int* ldafb,
10644                     const lapack_int* ipiv, const double* b, lapack_int* ldb,
10645                     double* x, lapack_int* ldx, double* ferr, double* berr,
10646                     double* work, lapack_int* iwork, lapack_int *info );
10647 void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10648                     lapack_int* nrhs, const lapack_complex_float* ab,
10649                     lapack_int* ldab, const lapack_complex_float* afb,
10650                     lapack_int* ldafb, const lapack_int* ipiv,
10651                     const lapack_complex_float* b, lapack_int* ldb,
10652                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10653                     float* berr, lapack_complex_float* work, float* rwork,
10654                     lapack_int *info );
10655 void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
10656                     lapack_int* nrhs, const lapack_complex_double* ab,
10657                     lapack_int* ldab, const lapack_complex_double* afb,
10658                     lapack_int* ldafb, const lapack_int* ipiv,
10659                     const lapack_complex_double* b, lapack_int* ldb,
10660                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10661                     double* berr, lapack_complex_double* work, double* rwork,
10662                     lapack_int *info );
10663 void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
10664                      lapack_int* ku, lapack_int* nrhs, const double* ab,
10665                      lapack_int* ldab, const double* afb, lapack_int* ldafb,
10666                      const lapack_int* ipiv, const double* r, const double* c,
10667                      const double* b, lapack_int* ldb, double* x,
10668                      lapack_int* ldx, double* rcond, double* berr,
10669                      lapack_int* n_err_bnds, double* err_bnds_norm,
10670                      double* err_bnds_comp, lapack_int* nparams, double* params,
10671                      double* work, lapack_int* iwork, lapack_int *info );
10672 void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
10673                      lapack_int* ku, lapack_int* nrhs, const float* ab,
10674                      lapack_int* ldab, const float* afb, lapack_int* ldafb,
10675                      const lapack_int* ipiv, const float* r, const float* c,
10676                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10677                      float* rcond, float* berr, lapack_int* n_err_bnds,
10678                      float* err_bnds_norm, float* err_bnds_comp,
10679                      lapack_int* nparams, float* params, float* work,
10680                      lapack_int* iwork, lapack_int *info );
10681 void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
10682                      lapack_int* ku, lapack_int* nrhs,
10683                      const lapack_complex_double* ab, lapack_int* ldab,
10684                      const lapack_complex_double* afb, lapack_int* ldafb,
10685                      const lapack_int* ipiv, const double* r, const double* c,
10686                      const lapack_complex_double* b, lapack_int* ldb,
10687                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
10688                      double* berr, lapack_int* n_err_bnds,
10689                      double* err_bnds_norm, double* err_bnds_comp,
10690                      lapack_int* nparams, double* params,
10691                      lapack_complex_double* work, double* rwork,
10692                      lapack_int *info );
10693 void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
10694                      lapack_int* ku, lapack_int* nrhs,
10695                      const lapack_complex_float* ab, lapack_int* ldab,
10696                      const lapack_complex_float* afb, lapack_int* ldafb,
10697                      const lapack_int* ipiv, const float* r, const float* c,
10698                      const lapack_complex_float* b, lapack_int* ldb,
10699                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
10700                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
10701                      float* err_bnds_comp, lapack_int* nparams, float* params,
10702                      lapack_complex_float* work, float* rwork,
10703                      lapack_int *info );
10704 void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
10705                     const float* dl, const float* d, const float* du,
10706                     const float* dlf, const float* df, const float* duf,
10707                     const float* du2, const lapack_int* ipiv, const float* b,
10708                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
10709                     float* berr, float* work, lapack_int* iwork,
10710                     lapack_int *info );
10711 void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
10712                     const double* dl, const double* d, const double* du,
10713                     const double* dlf, const double* df, const double* duf,
10714                     const double* du2, const lapack_int* ipiv, const double* b,
10715                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
10716                     double* berr, double* work, lapack_int* iwork,
10717                     lapack_int *info );
10718 void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
10719                     const lapack_complex_float* dl,
10720                     const lapack_complex_float* d,
10721                     const lapack_complex_float* du,
10722                     const lapack_complex_float* dlf,
10723                     const lapack_complex_float* df,
10724                     const lapack_complex_float* duf,
10725                     const lapack_complex_float* du2, const lapack_int* ipiv,
10726                     const lapack_complex_float* b, lapack_int* ldb,
10727                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10728                     float* berr, lapack_complex_float* work, float* rwork,
10729                     lapack_int *info );
10730 void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
10731                     const lapack_complex_double* dl,
10732                     const lapack_complex_double* d,
10733                     const lapack_complex_double* du,
10734                     const lapack_complex_double* dlf,
10735                     const lapack_complex_double* df,
10736                     const lapack_complex_double* duf,
10737                     const lapack_complex_double* du2, const lapack_int* ipiv,
10738                     const lapack_complex_double* b, lapack_int* ldb,
10739                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10740                     double* berr, lapack_complex_double* work, double* rwork,
10741                     lapack_int *info );
10742 void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
10743                     lapack_int* lda, const float* af, lapack_int* ldaf,
10744                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10745                     float* ferr, float* berr, float* work, lapack_int* iwork,
10746                     lapack_int *info );
10747 void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10748                     const double* a, lapack_int* lda, const double* af,
10749                     lapack_int* ldaf, const double* b, lapack_int* ldb,
10750                     double* x, lapack_int* ldx, double* ferr, double* berr,
10751                     double* work, lapack_int* iwork, lapack_int *info );
10752 void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10753                     const lapack_complex_float* a, lapack_int* lda,
10754                     const lapack_complex_float* af, lapack_int* ldaf,
10755                     const lapack_complex_float* b, lapack_int* ldb,
10756                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10757                     float* berr, lapack_complex_float* work, float* rwork,
10758                     lapack_int *info );
10759 void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10760                     const lapack_complex_double* a, lapack_int* lda,
10761                     const lapack_complex_double* af, lapack_int* ldaf,
10762                     const lapack_complex_double* b, lapack_int* ldb,
10763                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10764                     double* berr, lapack_complex_double* work, double* rwork,
10765                     lapack_int *info );
10766 void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10767                      const double* a, lapack_int* lda, const double* af,
10768                      lapack_int* ldaf, const double* s, const double* b,
10769                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
10770                      double* berr, lapack_int* n_err_bnds,
10771                      double* err_bnds_norm, double* err_bnds_comp,
10772                      lapack_int* nparams, double* params, double* work,
10773                      lapack_int* iwork, lapack_int *info );
10774 void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10775                      const float* a, lapack_int* lda, const float* af,
10776                      lapack_int* ldaf, const float* s, const float* b,
10777                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
10778                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
10779                      float* err_bnds_comp, lapack_int* nparams, float* params,
10780                      float* work, lapack_int* iwork, lapack_int *info );
10781 void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10782                      const lapack_complex_double* a, lapack_int* lda,
10783                      const lapack_complex_double* af, lapack_int* ldaf,
10784                      const double* s, const lapack_complex_double* b,
10785                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
10786                      double* rcond, double* berr, lapack_int* n_err_bnds,
10787                      double* err_bnds_norm, double* err_bnds_comp,
10788                      lapack_int* nparams, double* params,
10789                      lapack_complex_double* work, double* rwork,
10790                      lapack_int *info );
10791 void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10792                      const lapack_complex_float* a, lapack_int* lda,
10793                      const lapack_complex_float* af, lapack_int* ldaf,
10794                      const float* s, const lapack_complex_float* b,
10795                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
10796                      float* rcond, float* berr, lapack_int* n_err_bnds,
10797                      float* err_bnds_norm, float* err_bnds_comp,
10798                      lapack_int* nparams, float* params,
10799                      lapack_complex_float* work, float* rwork,
10800                      lapack_int *info );
10801 void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10802                     const float* ap, const float* afp, const float* b,
10803                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
10804                     float* berr, float* work, lapack_int* iwork,
10805                     lapack_int *info );
10806 void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10807                     const double* ap, const double* afp, const double* b,
10808                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
10809                     double* berr, double* work, lapack_int* iwork,
10810                     lapack_int *info );
10811 void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10812                     const lapack_complex_float* ap,
10813                     const lapack_complex_float* afp,
10814                     const lapack_complex_float* b, lapack_int* ldb,
10815                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10816                     float* berr, lapack_complex_float* work, float* rwork,
10817                     lapack_int *info );
10818 void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10819                     const lapack_complex_double* ap,
10820                     const lapack_complex_double* afp,
10821                     const lapack_complex_double* b, lapack_int* ldb,
10822                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10823                     double* berr, lapack_complex_double* work, double* rwork,
10824                     lapack_int *info );
10825 void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10826                     const float* ab, lapack_int* ldab, const float* afb,
10827                     lapack_int* ldafb, const float* b, lapack_int* ldb,
10828                     float* x, lapack_int* ldx, float* ferr, float* berr,
10829                     float* work, lapack_int* iwork, lapack_int *info );
10830 void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10831                     const double* ab, lapack_int* ldab, const double* afb,
10832                     lapack_int* ldafb, const double* b, lapack_int* ldb,
10833                     double* x, lapack_int* ldx, double* ferr, double* berr,
10834                     double* work, lapack_int* iwork, lapack_int *info );
10835 void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10836                     const lapack_complex_float* ab, lapack_int* ldab,
10837                     const lapack_complex_float* afb, lapack_int* ldafb,
10838                     const lapack_complex_float* b, lapack_int* ldb,
10839                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10840                     float* berr, lapack_complex_float* work, float* rwork,
10841                     lapack_int *info );
10842 void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
10843                     const lapack_complex_double* ab, lapack_int* ldab,
10844                     const lapack_complex_double* afb, lapack_int* ldafb,
10845                     const lapack_complex_double* b, lapack_int* ldb,
10846                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10847                     double* berr, lapack_complex_double* work, double* rwork,
10848                     lapack_int *info );
10849 void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
10850                     const float* e, const float* df, const float* ef,
10851                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10852                     float* ferr, float* berr, float* work, lapack_int *info );
10853 void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
10854                     const double* e, const double* df, const double* ef,
10855                     const double* b, lapack_int* ldb, double* x,
10856                     lapack_int* ldx, double* ferr, double* berr, double* work,
10857                     lapack_int *info );
10858 void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
10859                     const lapack_complex_float* e, const float* df,
10860                     const lapack_complex_float* ef,
10861                     const lapack_complex_float* b, lapack_int* ldb,
10862                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10863                     float* berr, lapack_complex_float* work, float* rwork,
10864                     lapack_int *info );
10865 void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10866                     const double* d, const lapack_complex_double* e,
10867                     const double* df, const lapack_complex_double* ef,
10868                     const lapack_complex_double* b, lapack_int* ldb,
10869                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10870                     double* berr, lapack_complex_double* work, double* rwork,
10871                     lapack_int *info );
10872 void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
10873                     lapack_int* lda, const float* af, lapack_int* ldaf,
10874                     const lapack_int* ipiv, const float* b, lapack_int* ldb,
10875                     float* x, lapack_int* ldx, float* ferr, float* berr,
10876                     float* work, lapack_int* iwork, lapack_int *info );
10877 void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10878                     const double* a, lapack_int* lda, const double* af,
10879                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
10880                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
10881                     double* berr, double* work, lapack_int* iwork,
10882                     lapack_int *info );
10883 void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10884                     const lapack_complex_float* a, lapack_int* lda,
10885                     const lapack_complex_float* af, lapack_int* ldaf,
10886                     const lapack_int* ipiv, const lapack_complex_float* b,
10887                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
10888                     float* ferr, float* berr, lapack_complex_float* work,
10889                     float* rwork, lapack_int *info );
10890 void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10891                     const lapack_complex_double* a, lapack_int* lda,
10892                     const lapack_complex_double* af, lapack_int* ldaf,
10893                     const lapack_int* ipiv, const lapack_complex_double* b,
10894                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
10895                     double* ferr, double* berr, lapack_complex_double* work,
10896                     double* rwork, lapack_int *info );
10897 void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10898                      const double* a, lapack_int* lda, const double* af,
10899                      lapack_int* ldaf, const lapack_int* ipiv, const double* s,
10900                      const double* b, lapack_int* ldb, double* x,
10901                      lapack_int* ldx, double* rcond, double* berr,
10902                      lapack_int* n_err_bnds, double* err_bnds_norm,
10903                      double* err_bnds_comp, lapack_int* nparams, double* params,
10904                      double* work, lapack_int* iwork, lapack_int *info );
10905 void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10906                      const float* a, lapack_int* lda, const float* af,
10907                      lapack_int* ldaf, const lapack_int* ipiv, const float* s,
10908                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10909                      float* rcond, float* berr, lapack_int* n_err_bnds,
10910                      float* err_bnds_norm, float* err_bnds_comp,
10911                      lapack_int* nparams, float* params, float* work,
10912                      lapack_int* iwork, lapack_int *info );
10913 void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10914                      const lapack_complex_double* a, lapack_int* lda,
10915                      const lapack_complex_double* af, lapack_int* ldaf,
10916                      const lapack_int* ipiv, const double* s,
10917                      const lapack_complex_double* b, lapack_int* ldb,
10918                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
10919                      double* berr, lapack_int* n_err_bnds,
10920                      double* err_bnds_norm, double* err_bnds_comp,
10921                      lapack_int* nparams, double* params,
10922                      lapack_complex_double* work, double* rwork,
10923                      lapack_int *info );
10924 void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10925                      const lapack_complex_float* a, lapack_int* lda,
10926                      const lapack_complex_float* af, lapack_int* ldaf,
10927                      const lapack_int* ipiv, const float* s,
10928                      const lapack_complex_float* b, lapack_int* ldb,
10929                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
10930                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
10931                      float* err_bnds_comp, lapack_int* nparams, float* params,
10932                      lapack_complex_float* work, float* rwork,
10933                      lapack_int *info );
10934 void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10935                     const lapack_complex_float* a, lapack_int* lda,
10936                     const lapack_complex_float* af, lapack_int* ldaf,
10937                     const lapack_int* ipiv, const lapack_complex_float* b,
10938                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
10939                     float* ferr, float* berr, lapack_complex_float* work,
10940                     float* rwork, lapack_int *info );
10941 void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10942                     const lapack_complex_double* a, lapack_int* lda,
10943                     const lapack_complex_double* af, lapack_int* ldaf,
10944                     const lapack_int* ipiv, const lapack_complex_double* b,
10945                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
10946                     double* ferr, double* berr, lapack_complex_double* work,
10947                     double* rwork, lapack_int *info );
10948 void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10949                      const lapack_complex_double* a, lapack_int* lda,
10950                      const lapack_complex_double* af, lapack_int* ldaf,
10951                      const lapack_int* ipiv, const double* s,
10952                      const lapack_complex_double* b, lapack_int* ldb,
10953                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
10954                      double* berr, lapack_int* n_err_bnds,
10955                      double* err_bnds_norm, double* err_bnds_comp,
10956                      lapack_int* nparams, double* params,
10957                      lapack_complex_double* work, double* rwork,
10958                      lapack_int *info );
10959 void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
10960                      const lapack_complex_float* a, lapack_int* lda,
10961                      const lapack_complex_float* af, lapack_int* ldaf,
10962                      const lapack_int* ipiv, const float* s,
10963                      const lapack_complex_float* b, lapack_int* ldb,
10964                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
10965                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
10966                      float* err_bnds_comp, lapack_int* nparams, float* params,
10967                      lapack_complex_float* work, float* rwork,
10968                      lapack_int *info );
10969 void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10970                     const float* ap, const float* afp, const lapack_int* ipiv,
10971                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
10972                     float* ferr, float* berr, float* work, lapack_int* iwork,
10973                     lapack_int *info );
10974 void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10975                     const double* ap, const double* afp, const lapack_int* ipiv,
10976                     const double* b, lapack_int* ldb, double* x,
10977                     lapack_int* ldx, double* ferr, double* berr, double* work,
10978                     lapack_int* iwork, lapack_int *info );
10979 void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10980                     const lapack_complex_float* ap,
10981                     const lapack_complex_float* afp, const lapack_int* ipiv,
10982                     const lapack_complex_float* b, lapack_int* ldb,
10983                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10984                     float* berr, lapack_complex_float* work, float* rwork,
10985                     lapack_int *info );
10986 void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10987                     const lapack_complex_double* ap,
10988                     const lapack_complex_double* afp, const lapack_int* ipiv,
10989                     const lapack_complex_double* b, lapack_int* ldb,
10990                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
10991                     double* berr, lapack_complex_double* work, double* rwork,
10992                     lapack_int *info );
10993 void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
10994                     const lapack_complex_float* ap,
10995                     const lapack_complex_float* afp, const lapack_int* ipiv,
10996                     const lapack_complex_float* b, lapack_int* ldb,
10997                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
10998                     float* berr, lapack_complex_float* work, float* rwork,
10999                     lapack_int *info );
11000 void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
11001                     const lapack_complex_double* ap,
11002                     const lapack_complex_double* afp, const lapack_int* ipiv,
11003                     const lapack_complex_double* b, lapack_int* ldb,
11004                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
11005                     double* berr, lapack_complex_double* work, double* rwork,
11006                     lapack_int *info );
11007 void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11008                     lapack_int* nrhs, const float* a, lapack_int* lda,
11009                     const float* b, lapack_int* ldb, const float* x,
11010                     lapack_int* ldx, float* ferr, float* berr, float* work,
11011                     lapack_int* iwork, lapack_int *info );
11012 void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11013                     lapack_int* nrhs, const double* a, lapack_int* lda,
11014                     const double* b, lapack_int* ldb, const double* x,
11015                     lapack_int* ldx, double* ferr, double* berr, double* work,
11016                     lapack_int* iwork, lapack_int *info );
11017 void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11018                     lapack_int* nrhs, const lapack_complex_float* a,
11019                     lapack_int* lda, const lapack_complex_float* b,
11020                     lapack_int* ldb, const lapack_complex_float* x,
11021                     lapack_int* ldx, float* ferr, float* berr,
11022                     lapack_complex_float* work, float* rwork,
11023                     lapack_int *info );
11024 void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11025                     lapack_int* nrhs, const lapack_complex_double* a,
11026                     lapack_int* lda, const lapack_complex_double* b,
11027                     lapack_int* ldb, const lapack_complex_double* x,
11028                     lapack_int* ldx, double* ferr, double* berr,
11029                     lapack_complex_double* work, double* rwork,
11030                     lapack_int *info );
11031 void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
11032                     lapack_int* nrhs, const float* ap, const float* b,
11033                     lapack_int* ldb, const float* x, lapack_int* ldx,
11034                     float* ferr, float* berr, float* work, lapack_int* iwork,
11035                     lapack_int *info );
11036 void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
11037                     lapack_int* nrhs, const double* ap, const double* b,
11038                     lapack_int* ldb, const double* x, lapack_int* ldx,
11039                     double* ferr, double* berr, double* work, lapack_int* iwork,
11040                     lapack_int *info );
11041 void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
11042                     lapack_int* nrhs, const lapack_complex_float* ap,
11043                     const lapack_complex_float* b, lapack_int* ldb,
11044                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
11045                     float* berr, lapack_complex_float* work, float* rwork,
11046                     lapack_int *info );
11047 void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
11048                     lapack_int* nrhs, const lapack_complex_double* ap,
11049                     const lapack_complex_double* b, lapack_int* ldb,
11050                     const lapack_complex_double* x, lapack_int* ldx,
11051                     double* ferr, double* berr, lapack_complex_double* work,
11052                     double* rwork, lapack_int *info );
11053 void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11054                     lapack_int* kd, lapack_int* nrhs, const float* ab,
11055                     lapack_int* ldab, const float* b, lapack_int* ldb,
11056                     const float* x, lapack_int* ldx, float* ferr, float* berr,
11057                     float* work, lapack_int* iwork, lapack_int *info );
11058 void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11059                     lapack_int* kd, lapack_int* nrhs, const double* ab,
11060                     lapack_int* ldab, const double* b, lapack_int* ldb,
11061                     const double* x, lapack_int* ldx, double* ferr,
11062                     double* berr, double* work, lapack_int* iwork,
11063                     lapack_int *info );
11064 void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11065                     lapack_int* kd, lapack_int* nrhs,
11066                     const lapack_complex_float* ab, lapack_int* ldab,
11067                     const lapack_complex_float* b, lapack_int* ldb,
11068                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
11069                     float* berr, lapack_complex_float* work, float* rwork,
11070                     lapack_int *info );
11071 void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
11072                     lapack_int* kd, lapack_int* nrhs,
11073                     const lapack_complex_double* ab, lapack_int* ldab,
11074                     const lapack_complex_double* b, lapack_int* ldb,
11075                     const lapack_complex_double* x, lapack_int* ldx,
11076                     double* ferr, double* berr, lapack_complex_double* work,
11077                     double* rwork, lapack_int *info );
11078 void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
11079                     const lapack_int* ipiv, float* work, lapack_int* lwork,
11080                     lapack_int *info );
11081 void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
11082                     const lapack_int* ipiv, double* work, lapack_int* lwork,
11083                     lapack_int *info );
11084 void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
11085                     const lapack_int* ipiv, lapack_complex_float* work,
11086                     lapack_int* lwork, lapack_int *info );
11087 void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
11088                     const lapack_int* ipiv, lapack_complex_double* work,
11089                     lapack_int* lwork, lapack_int *info );
11090 void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11091                     lapack_int *info );
11092 void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11093                     lapack_int *info );
11094 void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
11095                     lapack_int* lda, lapack_int *info );
11096 void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
11097                     lapack_int* lda, lapack_int *info );
11098 void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
11099                     lapack_int *info );
11100 void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
11101                     lapack_int *info );
11102 void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
11103                     lapack_complex_double* a, lapack_int *info );
11104 void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
11105                     lapack_complex_float* a, lapack_int *info );
11106 void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
11107 void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
11108 void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
11109                     lapack_int *info );
11110 void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
11111                     lapack_int *info );
11112 void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11113                     const lapack_int* ipiv, float* work, lapack_int *info );
11114 void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11115                     const lapack_int* ipiv, double* work, lapack_int *info );
11116 void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
11117                     lapack_int* lda, const lapack_int* ipiv,
11118                     lapack_complex_float* work, lapack_int *info );
11119 void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
11120                     lapack_int* lda, const lapack_int* ipiv,
11121                     lapack_complex_double* work, lapack_int *info );
11122 void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
11123                     lapack_int* lda, const lapack_int* ipiv,
11124                     lapack_complex_float* work, lapack_int *info );
11125 void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
11126                     lapack_int* lda, const lapack_int* ipiv,
11127                     lapack_complex_double* work, lapack_int *info );
11128 void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
11129                     const lapack_int* ipiv, float* work, lapack_int *info );
11130 void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
11131                     const lapack_int* ipiv, double* work, lapack_int *info );
11132 void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
11133                     const lapack_int* ipiv, lapack_complex_float* work,
11134                     lapack_int *info );
11135 void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
11136                     const lapack_int* ipiv, lapack_complex_double* work,
11137                     lapack_int *info );
11138 void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
11139                     const lapack_int* ipiv, lapack_complex_float* work,
11140                     lapack_int *info );
11141 void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
11142                     const lapack_int* ipiv, lapack_complex_double* work,
11143                     lapack_int *info );
11144 void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
11145                     lapack_int* lda, lapack_int *info );
11146 void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
11147                     lapack_int* lda, lapack_int *info );
11148 void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
11149                     lapack_complex_float* a, lapack_int* lda,
11150                     lapack_int *info );
11151 void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
11152                     lapack_complex_double* a, lapack_int* lda,
11153                     lapack_int *info );
11154 void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
11155                     double* a, lapack_int *info );
11156 void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
11157                     float* a, lapack_int *info );
11158 void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
11159                     lapack_complex_double* a, lapack_int *info );
11160 void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
11161                     lapack_complex_float* a, lapack_int *info );
11162 void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
11163                     lapack_int *info );
11164 void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
11165                     lapack_int *info );
11166 void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
11167                     lapack_complex_float* ap, lapack_int *info );
11168 void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
11169                     lapack_complex_double* ap, lapack_int *info );
11170 void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
11171                     lapack_int* lda, float* r, float* c, float* rowcnd,
11172                     float* colcnd, float* amax, lapack_int *info );
11173 void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
11174                     lapack_int* lda, double* r, double* c, double* rowcnd,
11175                     double* colcnd, double* amax, lapack_int *info );
11176 void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
11177                     lapack_int* lda, float* r, float* c, float* rowcnd,
11178                     float* colcnd, float* amax, lapack_int *info );
11179 void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
11180                     const lapack_complex_double* a, lapack_int* lda, double* r,
11181                     double* c, double* rowcnd, double* colcnd, double* amax,
11182                     lapack_int *info );
11183 void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
11184                      lapack_int* lda, double* r, double* c, double* rowcnd,
11185                      double* colcnd, double* amax, lapack_int *info );
11186 void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
11187                      lapack_int* lda, float* r, float* c, float* rowcnd,
11188                      float* colcnd, float* amax, lapack_int *info );
11189 void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
11190                      const lapack_complex_double* a, lapack_int* lda, double* r,
11191                      double* c, double* rowcnd, double* colcnd, double* amax,
11192                      lapack_int *info );
11193 void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
11194                      const lapack_complex_float* a, lapack_int* lda, float* r,
11195                      float* c, float* rowcnd, float* colcnd, float* amax,
11196                      lapack_int *info );
11197 void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
11198                     lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
11199                     float* c, float* rowcnd, float* colcnd, float* amax,
11200                     lapack_int *info );
11201 void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
11202                     lapack_int* ku, const double* ab, lapack_int* ldab,
11203                     double* r, double* c, double* rowcnd, double* colcnd,
11204                     double* amax, lapack_int *info );
11205 void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
11206                     lapack_int* ku, const lapack_complex_float* ab,
11207                     lapack_int* ldab, float* r, float* c, float* rowcnd,
11208                     float* colcnd, float* amax, lapack_int *info );
11209 void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
11210                     lapack_int* ku, const lapack_complex_double* ab,
11211                     lapack_int* ldab, double* r, double* c, double* rowcnd,
11212                     double* colcnd, double* amax, lapack_int *info );
11213 void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
11214                      lapack_int* ku, const double* ab, lapack_int* ldab,
11215                      double* r, double* c, double* rowcnd, double* colcnd,
11216                      double* amax, lapack_int *info );
11217 void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
11218                      lapack_int* ku, const float* ab, lapack_int* ldab,
11219                      float* r, float* c, float* rowcnd, float* colcnd,
11220                      float* amax, lapack_int *info );
11221 void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
11222                      lapack_int* ku, const lapack_complex_double* ab,
11223                      lapack_int* ldab, double* r, double* c, double* rowcnd,
11224                      double* colcnd, double* amax, lapack_int *info );
11225 void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
11226                      lapack_int* ku, const lapack_complex_float* ab,
11227                      lapack_int* ldab, float* r, float* c, float* rowcnd,
11228                      float* colcnd, float* amax, lapack_int *info );
11229 void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
11230                     float* scond, float* amax, lapack_int *info );
11231 void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
11232                     double* scond, double* amax, lapack_int *info );
11233 void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
11234                     lapack_int* lda, float* s, float* scond, float* amax,
11235                     lapack_int *info );
11236 void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
11237                     lapack_int* lda, double* s, double* scond, double* amax,
11238                     lapack_int *info );
11239 void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
11240                      double* scond, double* amax, lapack_int *info );
11241 void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
11242                      float* scond, float* amax, lapack_int *info );
11243 void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
11244                      lapack_int* lda, double* s, double* scond, double* amax,
11245                      lapack_int *info );
11246 void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
11247                      lapack_int* lda, float* s, float* scond, float* amax,
11248                      lapack_int *info );
11249 void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
11250                     float* scond, float* amax, lapack_int *info );
11251 void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
11252                     double* scond, double* amax, lapack_int *info );
11253 void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
11254                     float* s, float* scond, float* amax, lapack_int *info );
11255 void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
11256                     double* s, double* scond, double* amax, lapack_int *info );
11257 void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
11258                     lapack_int* ldab, float* s, float* scond, float* amax,
11259                     lapack_int *info );
11260 void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
11261                     lapack_int* ldab, double* s, double* scond, double* amax,
11262                     lapack_int *info );
11263 void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
11264                     const lapack_complex_float* ab, lapack_int* ldab, float* s,
11265                     float* scond, float* amax, lapack_int *info );
11266 void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
11267                     const lapack_complex_double* ab, lapack_int* ldab,
11268                     double* s, double* scond, double* amax, lapack_int *info );
11269 void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
11270                      lapack_int* lda, double* s, double* scond, double* amax,
11271                      double* work, lapack_int *info );
11272 void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
11273                      float* s, float* scond, float* amax, float* work,
11274                      lapack_int *info );
11275 void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
11276                      lapack_int* lda, double* s, double* scond, double* amax,
11277                      lapack_complex_double* work, lapack_int *info );
11278 void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
11279                      lapack_int* lda, float* s, float* scond, float* amax,
11280                      lapack_complex_float* work, lapack_int *info );
11281 void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
11282                      lapack_int* lda, double* s, double* scond, double* amax,
11283                      lapack_complex_double* work, lapack_int *info );
11284 void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
11285                      lapack_int* lda, float* s, float* scond, float* amax,
11286                      lapack_complex_float* work, lapack_int *info );
11287 void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
11288                    lapack_int* ipiv, float* b, lapack_int* ldb,
11289                    lapack_int *info );
11290 void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
11291                    lapack_int* ipiv, double* b, lapack_int* ldb,
11292                    lapack_int *info );
11293 void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
11294                    lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
11295                    lapack_int* ldb, lapack_int *info );
11296 void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
11297                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
11298                    lapack_int* ldb, lapack_int *info );
11299 void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
11300                     lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
11301                     lapack_int* ldx, double* work, float* swork,
11302                     lapack_int* iter, lapack_int *info );
11303 void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
11304                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
11305                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11306                     lapack_complex_double* work, lapack_complex_float* swork,
11307                     double* rwork, lapack_int* iter, lapack_int *info );
11308 void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11309                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
11310                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
11311                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11312                     float* ferr, float* berr, float* work, lapack_int* iwork,
11313                     lapack_int *info );
11314 void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11315                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
11316                     lapack_int* ipiv, char* equed, double* r, double* c,
11317                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
11318                     double* rcond, double* ferr, double* berr, double* work,
11319                     lapack_int* iwork, lapack_int *info );
11320 void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11321                     lapack_complex_float* a, lapack_int* lda,
11322                     lapack_complex_float* af, lapack_int* ldaf,
11323                     lapack_int* ipiv, char* equed, float* r, float* c,
11324                     lapack_complex_float* b, lapack_int* ldb,
11325                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
11326                     float* ferr, float* berr, lapack_complex_float* work,
11327                     float* rwork, lapack_int *info );
11328 void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11329                     lapack_complex_double* a, lapack_int* lda,
11330                     lapack_complex_double* af, lapack_int* ldaf,
11331                     lapack_int* ipiv, char* equed, double* r, double* c,
11332                     lapack_complex_double* b, lapack_int* ldb,
11333                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
11334                     double* ferr, double* berr, lapack_complex_double* work,
11335                     double* rwork, lapack_int *info );
11336 void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11337                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
11338                      lapack_int* ipiv, char* equed, double* r, double* c,
11339                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
11340                      double* rcond, double* rpvgrw, double* berr,
11341                      lapack_int* n_err_bnds, double* err_bnds_norm,
11342                      double* err_bnds_comp, lapack_int* nparams, double* params,
11343                      double* work, lapack_int* iwork, lapack_int *info );
11344 void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11345                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
11346                      lapack_int* ipiv, char* equed, float* r, float* c,
11347                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
11348                      float* rcond, float* rpvgrw, float* berr,
11349                      lapack_int* n_err_bnds, float* err_bnds_norm,
11350                      float* err_bnds_comp, lapack_int* nparams, float* params,
11351                      float* work, lapack_int* iwork, lapack_int *info );
11352 void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11353                      lapack_complex_double* a, lapack_int* lda,
11354                      lapack_complex_double* af, lapack_int* ldaf,
11355                      lapack_int* ipiv, char* equed, double* r, double* c,
11356                      lapack_complex_double* b, lapack_int* ldb,
11357                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
11358                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11359                      double* err_bnds_norm, double* err_bnds_comp,
11360                      lapack_int* nparams, double* params,
11361                      lapack_complex_double* work, double* rwork,
11362                      lapack_int *info );
11363 void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11364                      lapack_complex_float* a, lapack_int* lda,
11365                      lapack_complex_float* af, lapack_int* ldaf,
11366                      lapack_int* ipiv, char* equed, float* r, float* c,
11367                      lapack_complex_float* b, lapack_int* ldb,
11368                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
11369                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11370                      float* err_bnds_norm, float* err_bnds_comp,
11371                      lapack_int* nparams, float* params,
11372                      lapack_complex_float* work, float* rwork,
11373                      lapack_int *info );
11374 void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
11375                    lapack_int* nrhs, float* ab, lapack_int* ldab,
11376                    lapack_int* ipiv, float* b, lapack_int* ldb,
11377                    lapack_int *info );
11378 void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
11379                    lapack_int* nrhs, double* ab, lapack_int* ldab,
11380                    lapack_int* ipiv, double* b, lapack_int* ldb,
11381                    lapack_int *info );
11382 void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
11383                    lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
11384                    lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
11385                    lapack_int *info );
11386 void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
11387                    lapack_int* nrhs, lapack_complex_double* ab,
11388                    lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
11389                    lapack_int* ldb, lapack_int *info );
11390 void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11391                     lapack_int* ku, lapack_int* nrhs, float* ab,
11392                     lapack_int* ldab, float* afb, lapack_int* ldafb,
11393                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
11394                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11395                     float* ferr, float* berr, float* work, lapack_int* iwork,
11396                     lapack_int *info );
11397 void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11398                     lapack_int* ku, lapack_int* nrhs, double* ab,
11399                     lapack_int* ldab, double* afb, lapack_int* ldafb,
11400                     lapack_int* ipiv, char* equed, double* r, double* c,
11401                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
11402                     double* rcond, double* ferr, double* berr, double* work,
11403                     lapack_int* iwork, lapack_int *info );
11404 void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11405                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
11406                     lapack_int* ldab, lapack_complex_float* afb,
11407                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
11408                     float* c, lapack_complex_float* b, lapack_int* ldb,
11409                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
11410                     float* ferr, float* berr, lapack_complex_float* work,
11411                     float* rwork, lapack_int *info );
11412 void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11413                     lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
11414                     lapack_int* ldab, lapack_complex_double* afb,
11415                     lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
11416                     double* c, lapack_complex_double* b, lapack_int* ldb,
11417                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
11418                     double* ferr, double* berr, lapack_complex_double* work,
11419                     double* rwork, lapack_int *info );
11420 void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11421                      lapack_int* ku, lapack_int* nrhs, double* ab,
11422                      lapack_int* ldab, double* afb, lapack_int* ldafb,
11423                      lapack_int* ipiv, char* equed, double* r, double* c,
11424                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
11425                      double* rcond, double* rpvgrw, double* berr,
11426                      lapack_int* n_err_bnds, double* err_bnds_norm,
11427                      double* err_bnds_comp, lapack_int* nparams, double* params,
11428                      double* work, lapack_int* iwork, lapack_int *info );
11429 void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11430                      lapack_int* ku, lapack_int* nrhs, float* ab,
11431                      lapack_int* ldab, float* afb, lapack_int* ldafb,
11432                      lapack_int* ipiv, char* equed, float* r, float* c,
11433                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
11434                      float* rcond, float* rpvgrw, float* berr,
11435                      lapack_int* n_err_bnds, float* err_bnds_norm,
11436                      float* err_bnds_comp, lapack_int* nparams, float* params,
11437                      float* work, lapack_int* iwork, lapack_int *info );
11438 void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11439                      lapack_int* ku, lapack_int* nrhs,
11440                      lapack_complex_double* ab, lapack_int* ldab,
11441                      lapack_complex_double* afb, lapack_int* ldafb,
11442                      lapack_int* ipiv, char* equed, double* r, double* c,
11443                      lapack_complex_double* b, lapack_int* ldb,
11444                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
11445                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11446                      double* err_bnds_norm, double* err_bnds_comp,
11447                      lapack_int* nparams, double* params,
11448                      lapack_complex_double* work, double* rwork,
11449                      lapack_int *info );
11450 void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
11451                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
11452                      lapack_int* ldab, lapack_complex_float* afb,
11453                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
11454                      float* c, lapack_complex_float* b, lapack_int* ldb,
11455                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
11456                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11457                      float* err_bnds_norm, float* err_bnds_comp,
11458                      lapack_int* nparams, float* params,
11459                      lapack_complex_float* work, float* rwork,
11460                      lapack_int *info );
11461 void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
11462                    float* du, float* b, lapack_int* ldb, lapack_int *info );
11463 void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
11464                    double* du, double* b, lapack_int* ldb, lapack_int *info );
11465 void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
11466                    lapack_complex_float* d, lapack_complex_float* du,
11467                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
11468 void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
11469                    lapack_complex_double* d, lapack_complex_double* du,
11470                    lapack_complex_double* b, lapack_int* ldb,
11471                    lapack_int *info );
11472 void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11473                     const float* dl, const float* d, const float* du,
11474                     float* dlf, float* df, float* duf, float* du2,
11475                     lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
11476                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
11477                     float* work, lapack_int* iwork, lapack_int *info );
11478 void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11479                     const double* dl, const double* d, const double* du,
11480                     double* dlf, double* df, double* duf, double* du2,
11481                     lapack_int* ipiv, const double* b, lapack_int* ldb,
11482                     double* x, lapack_int* ldx, double* rcond, double* ferr,
11483                     double* berr, double* work, lapack_int* iwork,
11484                     lapack_int *info );
11485 void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11486                     const lapack_complex_float* dl,
11487                     const lapack_complex_float* d,
11488                     const lapack_complex_float* du, lapack_complex_float* dlf,
11489                     lapack_complex_float* df, lapack_complex_float* duf,
11490                     lapack_complex_float* du2, lapack_int* ipiv,
11491                     const lapack_complex_float* b, lapack_int* ldb,
11492                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
11493                     float* ferr, float* berr, lapack_complex_float* work,
11494                     float* rwork, lapack_int *info );
11495 void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
11496                     const lapack_complex_double* dl,
11497                     const lapack_complex_double* d,
11498                     const lapack_complex_double* du, lapack_complex_double* dlf,
11499                     lapack_complex_double* df, lapack_complex_double* duf,
11500                     lapack_complex_double* du2, lapack_int* ipiv,
11501                     const lapack_complex_double* b, lapack_int* ldb,
11502                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
11503                     double* ferr, double* berr, lapack_complex_double* work,
11504                     double* rwork, lapack_int *info );
11505 void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
11506                    lapack_int* lda, float* b, lapack_int* ldb,
11507                    lapack_int *info );
11508 void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
11509                    lapack_int* lda, double* b, lapack_int* ldb,
11510                    lapack_int *info );
11511 void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
11512                    lapack_complex_float* a, lapack_int* lda,
11513                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
11514 void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
11515                    lapack_complex_double* a, lapack_int* lda,
11516                    lapack_complex_double* b, lapack_int* ldb,
11517                    lapack_int *info );
11518 void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
11519                     lapack_int* lda, double* b, lapack_int* ldb, double* x,
11520                     lapack_int* ldx, double* work, float* swork,
11521                     lapack_int* iter, lapack_int *info );
11522 void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
11523                     lapack_complex_double* a, lapack_int* lda,
11524                     lapack_complex_double* b, lapack_int* ldb,
11525                     lapack_complex_double* x, lapack_int* ldx,
11526                     lapack_complex_double* work, lapack_complex_float* swork,
11527                     double* rwork, lapack_int* iter, lapack_int *info );
11528 void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11529                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
11530                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
11531                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
11532                     float* work, lapack_int* iwork, lapack_int *info );
11533 void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11534                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
11535                     char* equed, double* s, double* b, lapack_int* ldb,
11536                     double* x, lapack_int* ldx, double* rcond, double* ferr,
11537                     double* berr, double* work, lapack_int* iwork,
11538                     lapack_int *info );
11539 void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11540                     lapack_complex_float* a, lapack_int* lda,
11541                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
11542                     float* s, lapack_complex_float* b, lapack_int* ldb,
11543                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
11544                     float* ferr, float* berr, lapack_complex_float* work,
11545                     float* rwork, lapack_int *info );
11546 void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11547                     lapack_complex_double* a, lapack_int* lda,
11548                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
11549                     double* s, lapack_complex_double* b, lapack_int* ldb,
11550                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
11551                     double* ferr, double* berr, lapack_complex_double* work,
11552                     double* rwork, lapack_int *info );
11553 void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11554                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
11555                      char* equed, double* s, double* b, lapack_int* ldb,
11556                      double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
11557                      double* berr, lapack_int* n_err_bnds,
11558                      double* err_bnds_norm, double* err_bnds_comp,
11559                      lapack_int* nparams, double* params, double* work,
11560                      lapack_int* iwork, lapack_int *info );
11561 void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11562                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
11563                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
11564                      lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
11565                      lapack_int* n_err_bnds, float* err_bnds_norm,
11566                      float* err_bnds_comp, lapack_int* nparams, float* params,
11567                      float* work, lapack_int* iwork, lapack_int *info );
11568 void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11569                      lapack_complex_double* a, lapack_int* lda,
11570                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
11571                      double* s, lapack_complex_double* b, lapack_int* ldb,
11572                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
11573                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11574                      double* err_bnds_norm, double* err_bnds_comp,
11575                      lapack_int* nparams, double* params,
11576                      lapack_complex_double* work, double* rwork,
11577                      lapack_int *info );
11578 void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11579                      lapack_complex_float* a, lapack_int* lda,
11580                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
11581                      float* s, lapack_complex_float* b, lapack_int* ldb,
11582                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
11583                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11584                      float* err_bnds_norm, float* err_bnds_comp,
11585                      lapack_int* nparams, float* params,
11586                      lapack_complex_float* work, float* rwork,
11587                      lapack_int *info );
11588 void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
11589                    float* b, lapack_int* ldb, lapack_int *info );
11590 void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
11591                    double* b, lapack_int* ldb, lapack_int *info );
11592 void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11593                    lapack_complex_float* ap, lapack_complex_float* b,
11594                    lapack_int* ldb, lapack_int *info );
11595 void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11596                    lapack_complex_double* ap, lapack_complex_double* b,
11597                    lapack_int* ldb, lapack_int *info );
11598 void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11599                     float* ap, float* afp, char* equed, float* s, float* b,
11600                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11601                     float* ferr, float* berr, float* work, lapack_int* iwork,
11602                     lapack_int *info );
11603 void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11604                     double* ap, double* afp, char* equed, double* s, double* b,
11605                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
11606                     double* ferr, double* berr, double* work, lapack_int* iwork,
11607                     lapack_int *info );
11608 void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11609                     lapack_complex_float* ap, lapack_complex_float* afp,
11610                     char* equed, float* s, lapack_complex_float* b,
11611                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11612                     float* rcond, float* ferr, float* berr,
11613                     lapack_complex_float* work, float* rwork,
11614                     lapack_int *info );
11615 void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11616                     lapack_complex_double* ap, lapack_complex_double* afp,
11617                     char* equed, double* s, lapack_complex_double* b,
11618                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11619                     double* rcond, double* ferr, double* berr,
11620                     lapack_complex_double* work, double* rwork,
11621                     lapack_int *info );
11622 void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11623                    float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
11624                    lapack_int *info );
11625 void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11626                    double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
11627                    lapack_int *info );
11628 void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11629                    lapack_complex_float* ab, lapack_int* ldab,
11630                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
11631 void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11632                    lapack_complex_double* ab, lapack_int* ldab,
11633                    lapack_complex_double* b, lapack_int* ldb,
11634                    lapack_int *info );
11635 void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
11636                     lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
11637                     lapack_int* ldafb, char* equed, float* s, float* b,
11638                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11639                     float* ferr, float* berr, float* work, lapack_int* iwork,
11640                     lapack_int *info );
11641 void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
11642                     lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
11643                     lapack_int* ldafb, char* equed, double* s, double* b,
11644                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
11645                     double* ferr, double* berr, double* work, lapack_int* iwork,
11646                     lapack_int *info );
11647 void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
11648                     lapack_int* nrhs, lapack_complex_float* ab,
11649                     lapack_int* ldab, lapack_complex_float* afb,
11650                     lapack_int* ldafb, char* equed, float* s,
11651                     lapack_complex_float* b, lapack_int* ldb,
11652                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
11653                     float* ferr, float* berr, lapack_complex_float* work,
11654                     float* rwork, lapack_int *info );
11655 void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
11656                     lapack_int* nrhs, lapack_complex_double* ab,
11657                     lapack_int* ldab, lapack_complex_double* afb,
11658                     lapack_int* ldafb, char* equed, double* s,
11659                     lapack_complex_double* b, lapack_int* ldb,
11660                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
11661                     double* ferr, double* berr, lapack_complex_double* work,
11662                     double* rwork, lapack_int *info );
11663 void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
11664                    float* b, lapack_int* ldb, lapack_int *info );
11665 void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
11666                    double* b, lapack_int* ldb, lapack_int *info );
11667 void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
11668                    lapack_complex_float* e, lapack_complex_float* b,
11669                    lapack_int* ldb, lapack_int *info );
11670 void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
11671                    lapack_complex_double* e, lapack_complex_double* b,
11672                    lapack_int* ldb, lapack_int *info );
11673 void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
11674                     const float* e, float* df, float* ef, const float* b,
11675                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11676                     float* ferr, float* berr, float* work, lapack_int *info );
11677 void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
11678                     const double* d, const double* e, double* df, double* ef,
11679                     const double* b, lapack_int* ldb, double* x,
11680                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
11681                     double* work, lapack_int *info );
11682 void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
11683                     const lapack_complex_float* e, float* df,
11684                     lapack_complex_float* ef, const lapack_complex_float* b,
11685                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11686                     float* rcond, float* ferr, float* berr,
11687                     lapack_complex_float* work, float* rwork,
11688                     lapack_int *info );
11689 void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
11690                     const double* d, const lapack_complex_double* e, double* df,
11691                     lapack_complex_double* ef, const lapack_complex_double* b,
11692                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11693                     double* rcond, double* ferr, double* berr,
11694                     lapack_complex_double* work, double* rwork,
11695                     lapack_int *info );
11696 void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
11697                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
11698                    float* work, lapack_int* lwork, lapack_int *info );
11699 void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
11700                    lapack_int* lda, lapack_int* ipiv, double* b,
11701                    lapack_int* ldb, double* work, lapack_int* lwork,
11702                    lapack_int *info );
11703 void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
11704                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
11705                    lapack_complex_float* b, lapack_int* ldb,
11706                    lapack_complex_float* work, lapack_int* lwork,
11707                    lapack_int *info );
11708 void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
11709                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
11710                    lapack_complex_double* b, lapack_int* ldb,
11711                    lapack_complex_double* work, lapack_int* lwork,
11712                    lapack_int *info );
11713 void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11714                     const float* a, lapack_int* lda, float* af,
11715                     lapack_int* ldaf, lapack_int* ipiv, const float* b,
11716                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11717                     float* ferr, float* berr, float* work, lapack_int* lwork,
11718                     lapack_int* iwork, lapack_int *info );
11719 void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11720                     const double* a, lapack_int* lda, double* af,
11721                     lapack_int* ldaf, lapack_int* ipiv, const double* b,
11722                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
11723                     double* ferr, double* berr, double* work, lapack_int* lwork,
11724                     lapack_int* iwork, lapack_int *info );
11725 void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11726                     const lapack_complex_float* a, lapack_int* lda,
11727                     lapack_complex_float* af, lapack_int* ldaf,
11728                     lapack_int* ipiv, const lapack_complex_float* b,
11729                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11730                     float* rcond, float* ferr, float* berr,
11731                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
11732                     lapack_int *info );
11733 void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11734                     const lapack_complex_double* a, lapack_int* lda,
11735                     lapack_complex_double* af, lapack_int* ldaf,
11736                     lapack_int* ipiv, const lapack_complex_double* b,
11737                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11738                     double* rcond, double* ferr, double* berr,
11739                     lapack_complex_double* work, lapack_int* lwork,
11740                     double* rwork, lapack_int *info );
11741 void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11742                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
11743                      lapack_int* ipiv, char* equed, double* s, double* b,
11744                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
11745                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11746                      double* err_bnds_norm, double* err_bnds_comp,
11747                      lapack_int* nparams, double* params, double* work,
11748                      lapack_int* iwork, lapack_int *info );
11749 void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11750                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
11751                      lapack_int* ipiv, char* equed, float* s, float* b,
11752                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
11753                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11754                      float* err_bnds_norm, float* err_bnds_comp,
11755                      lapack_int* nparams, float* params, float* work,
11756                      lapack_int* iwork, lapack_int *info );
11757 void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11758                      lapack_complex_double* a, lapack_int* lda,
11759                      lapack_complex_double* af, lapack_int* ldaf,
11760                      lapack_int* ipiv, char* equed, double* s,
11761                      lapack_complex_double* b, lapack_int* ldb,
11762                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
11763                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11764                      double* err_bnds_norm, double* err_bnds_comp,
11765                      lapack_int* nparams, double* params,
11766                      lapack_complex_double* work, double* rwork,
11767                      lapack_int *info );
11768 void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11769                      lapack_complex_float* a, lapack_int* lda,
11770                      lapack_complex_float* af, lapack_int* ldaf,
11771                      lapack_int* ipiv, char* equed, float* s,
11772                      lapack_complex_float* b, lapack_int* ldb,
11773                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
11774                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11775                      float* err_bnds_norm, float* err_bnds_comp,
11776                      lapack_int* nparams, float* params,
11777                      lapack_complex_float* work, float* rwork,
11778                      lapack_int *info );
11779 void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
11780                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
11781                    lapack_complex_float* b, lapack_int* ldb,
11782                    lapack_complex_float* work, lapack_int* lwork,
11783                    lapack_int *info );
11784 void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
11785                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
11786                    lapack_complex_double* b, lapack_int* ldb,
11787                    lapack_complex_double* work, lapack_int* lwork,
11788                    lapack_int *info );
11789 void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11790                     const lapack_complex_float* a, lapack_int* lda,
11791                     lapack_complex_float* af, lapack_int* ldaf,
11792                     lapack_int* ipiv, const lapack_complex_float* b,
11793                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11794                     float* rcond, float* ferr, float* berr,
11795                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
11796                     lapack_int *info );
11797 void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11798                     const lapack_complex_double* a, lapack_int* lda,
11799                     lapack_complex_double* af, lapack_int* ldaf,
11800                     lapack_int* ipiv, const lapack_complex_double* b,
11801                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11802                     double* rcond, double* ferr, double* berr,
11803                     lapack_complex_double* work, lapack_int* lwork,
11804                     double* rwork, lapack_int *info );
11805 void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11806                      lapack_complex_double* a, lapack_int* lda,
11807                      lapack_complex_double* af, lapack_int* ldaf,
11808                      lapack_int* ipiv, char* equed, double* s,
11809                      lapack_complex_double* b, lapack_int* ldb,
11810                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
11811                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
11812                      double* err_bnds_norm, double* err_bnds_comp,
11813                      lapack_int* nparams, double* params,
11814                      lapack_complex_double* work, double* rwork,
11815                      lapack_int *info );
11816 void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11817                      lapack_complex_float* a, lapack_int* lda,
11818                      lapack_complex_float* af, lapack_int* ldaf,
11819                      lapack_int* ipiv, char* equed, float* s,
11820                      lapack_complex_float* b, lapack_int* ldb,
11821                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
11822                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
11823                      float* err_bnds_norm, float* err_bnds_comp,
11824                      lapack_int* nparams, float* params,
11825                      lapack_complex_float* work, float* rwork,
11826                      lapack_int *info );
11827 void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
11828                    lapack_int* ipiv, float* b, lapack_int* ldb,
11829                    lapack_int *info );
11830 void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
11831                    lapack_int* ipiv, double* b, lapack_int* ldb,
11832                    lapack_int *info );
11833 void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11834                    lapack_complex_float* ap, lapack_int* ipiv,
11835                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
11836 void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11837                    lapack_complex_double* ap, lapack_int* ipiv,
11838                    lapack_complex_double* b, lapack_int* ldb,
11839                    lapack_int *info );
11840 void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11841                     const float* ap, float* afp, lapack_int* ipiv,
11842                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
11843                     float* rcond, float* ferr, float* berr, float* work,
11844                     lapack_int* iwork, lapack_int *info );
11845 void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11846                     const double* ap, double* afp, lapack_int* ipiv,
11847                     const double* b, lapack_int* ldb, double* x,
11848                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
11849                     double* work, lapack_int* iwork, lapack_int *info );
11850 void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11851                     const lapack_complex_float* ap, lapack_complex_float* afp,
11852                     lapack_int* ipiv, const lapack_complex_float* b,
11853                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11854                     float* rcond, float* ferr, float* berr,
11855                     lapack_complex_float* work, float* rwork,
11856                     lapack_int *info );
11857 void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11858                     const lapack_complex_double* ap, lapack_complex_double* afp,
11859                     lapack_int* ipiv, const lapack_complex_double* b,
11860                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11861                     double* rcond, double* ferr, double* berr,
11862                     lapack_complex_double* work, double* rwork,
11863                     lapack_int *info );
11864 void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11865                    lapack_complex_float* ap, lapack_int* ipiv,
11866                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
11867 void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
11868                    lapack_complex_double* ap, lapack_int* ipiv,
11869                    lapack_complex_double* b, lapack_int* ldb,
11870                    lapack_int *info );
11871 void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11872                     const lapack_complex_float* ap, lapack_complex_float* afp,
11873                     lapack_int* ipiv, const lapack_complex_float* b,
11874                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
11875                     float* rcond, float* ferr, float* berr,
11876                     lapack_complex_float* work, float* rwork,
11877                     lapack_int *info );
11878 void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
11879                     const lapack_complex_double* ap, lapack_complex_double* afp,
11880                     lapack_int* ipiv, const lapack_complex_double* b,
11881                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
11882                     double* rcond, double* ferr, double* berr,
11883                     lapack_complex_double* work, double* rwork,
11884                     lapack_int *info );
11885 void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11886                     float* tau, float* work, lapack_int* lwork,
11887                     lapack_int *info );
11888 void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11889                     double* tau, double* work, lapack_int* lwork,
11890                     lapack_int *info );
11891 void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11892                     lapack_int* lda, lapack_complex_float* tau,
11893                     lapack_complex_float* work, lapack_int* lwork,
11894                     lapack_int *info );
11895 void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11896                     lapack_int* lda, lapack_complex_double* tau,
11897                     lapack_complex_double* work, lapack_int* lwork,
11898                     lapack_int *info );
11899 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11900                     lapack_int* jpvt, float* tau, float* work,
11901                     lapack_int *info );
11902 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11903                     lapack_int* jpvt, double* tau, double* work,
11904                     lapack_int *info );
11905 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11906                     lapack_int* lda, lapack_int* jpvt,
11907                     lapack_complex_float* tau, lapack_complex_float* work,
11908                     float* rwork, lapack_int *info );
11909 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11910                     lapack_int* lda, lapack_int* jpvt,
11911                     lapack_complex_double* tau, lapack_complex_double* work,
11912                     double* rwork, lapack_int *info );
11913 void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11914                     lapack_int* jpvt, float* tau, float* work,
11915                     lapack_int* lwork, lapack_int *info );
11916 void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11917                     lapack_int* jpvt, double* tau, double* work,
11918                     lapack_int* lwork, lapack_int *info );
11919 void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11920                     lapack_int* lda, lapack_int* jpvt,
11921                     lapack_complex_float* tau, lapack_complex_float* work,
11922                     lapack_int* lwork, float* rwork, lapack_int *info );
11923 void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11924                     lapack_int* lda, lapack_int* jpvt,
11925                     lapack_complex_double* tau, lapack_complex_double* work,
11926                     lapack_int* lwork, double* rwork, lapack_int *info );
11927 void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
11928                     lapack_int* lda, const float* tau, float* work,
11929                     lapack_int* lwork, lapack_int *info );
11930 void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
11931                     lapack_int* lda, const double* tau, double* work,
11932                     lapack_int* lwork, lapack_int *info );
11933 void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
11934                     lapack_int* k, const float* a, lapack_int* lda,
11935                     const float* tau, float* c, lapack_int* ldc, float* work,
11936                     lapack_int* lwork, lapack_int *info );
11937 void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
11938                     lapack_int* k, const double* a, lapack_int* lda,
11939                     const double* tau, double* c, lapack_int* ldc, double* work,
11940                     lapack_int* lwork, lapack_int *info );
11941 void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
11942                     lapack_complex_float* a, lapack_int* lda,
11943                     const lapack_complex_float* tau, lapack_complex_float* work,
11944                     lapack_int* lwork, lapack_int *info );
11945 void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
11946                     lapack_complex_double* a, lapack_int* lda,
11947                     const lapack_complex_double* tau,
11948                     lapack_complex_double* work, lapack_int* lwork,
11949                     lapack_int *info );
11950 void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
11951                     lapack_int* k, const lapack_complex_float* a,
11952                     lapack_int* lda, const lapack_complex_float* tau,
11953                     lapack_complex_float* c, lapack_int* ldc,
11954                     lapack_complex_float* work, lapack_int* lwork,
11955                     lapack_int *info );
11956 void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
11957                     lapack_int* k, const lapack_complex_double* a,
11958                     lapack_int* lda, const lapack_complex_double* tau,
11959                     lapack_complex_double* c, lapack_int* ldc,
11960                     lapack_complex_double* work, lapack_int* lwork,
11961                     lapack_int *info );
11962 void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11963                     float* tau, float* work, lapack_int* lwork,
11964                     lapack_int *info );
11965 void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11966                     double* tau, double* work, lapack_int* lwork,
11967                     lapack_int *info );
11968 void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11969                     lapack_int* lda, lapack_complex_float* tau,
11970                     lapack_complex_float* work, lapack_int* lwork,
11971                     lapack_int *info );
11972 void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11973                     lapack_int* lda, lapack_complex_double* tau,
11974                     lapack_complex_double* work, lapack_int* lwork,
11975                     lapack_int *info );
11976 void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
11977                     lapack_int* lda, const float* tau, float* work,
11978                     lapack_int* lwork, lapack_int *info );
11979 void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
11980                     lapack_int* lda, const double* tau, double* work,
11981                     lapack_int* lwork, lapack_int *info );
11982 void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
11983                     lapack_int* k, const float* a, lapack_int* lda,
11984                     const float* tau, float* c, lapack_int* ldc, float* work,
11985                     lapack_int* lwork, lapack_int *info );
11986 void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
11987                     lapack_int* k, const double* a, lapack_int* lda,
11988                     const double* tau, double* c, lapack_int* ldc, double* work,
11989                     lapack_int* lwork, lapack_int *info );
11990 void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
11991                     lapack_complex_float* a, lapack_int* lda,
11992                     const lapack_complex_float* tau, lapack_complex_float* work,
11993                     lapack_int* lwork, lapack_int *info );
11994 void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
11995                     lapack_complex_double* a, lapack_int* lda,
11996                     const lapack_complex_double* tau,
11997                     lapack_complex_double* work, lapack_int* lwork,
11998                     lapack_int *info );
11999 void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
12000                     lapack_int* k, const lapack_complex_float* a,
12001                     lapack_int* lda, const lapack_complex_float* tau,
12002                     lapack_complex_float* c, lapack_int* ldc,
12003                     lapack_complex_float* work, lapack_int* lwork,
12004                     lapack_int *info );
12005 void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
12006                     lapack_int* k, const lapack_complex_double* a,
12007                     lapack_int* lda, const lapack_complex_double* tau,
12008                     lapack_complex_double* c, lapack_int* ldc,
12009                     lapack_complex_double* work, lapack_int* lwork,
12010                     lapack_int *info );
12011 void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12012                     float* tau, float* work, lapack_int* lwork,
12013                     lapack_int *info );
12014 void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12015                     double* tau, double* work, lapack_int* lwork,
12016                     lapack_int *info );
12017 void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12018                     lapack_int* lda, lapack_complex_float* tau,
12019                     lapack_complex_float* work, lapack_int* lwork,
12020                     lapack_int *info );
12021 void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12022                     lapack_int* lda, lapack_complex_double* tau,
12023                     lapack_complex_double* work, lapack_int* lwork,
12024                     lapack_int *info );
12025 void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
12026                     lapack_int* lda, const float* tau, float* work,
12027                     lapack_int* lwork, lapack_int *info );
12028 void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
12029                     lapack_int* lda, const double* tau, double* work,
12030                     lapack_int* lwork, lapack_int *info );
12031 void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
12032                     lapack_complex_float* a, lapack_int* lda,
12033                     const lapack_complex_float* tau, lapack_complex_float* work,
12034                     lapack_int* lwork, lapack_int *info );
12035 void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
12036                     lapack_complex_double* a, lapack_int* lda,
12037                     const lapack_complex_double* tau,
12038                     lapack_complex_double* work, lapack_int* lwork,
12039                     lapack_int *info );
12040 void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
12041                     lapack_int* k, const float* a, lapack_int* lda,
12042                     const float* tau, float* c, lapack_int* ldc, float* work,
12043                     lapack_int* lwork, lapack_int *info );
12044 void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
12045                     lapack_int* k, const double* a, lapack_int* lda,
12046                     const double* tau, double* c, lapack_int* ldc, double* work,
12047                     lapack_int* lwork, lapack_int *info );
12048 void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
12049                     lapack_int* k, const lapack_complex_float* a,
12050                     lapack_int* lda, const lapack_complex_float* tau,
12051                     lapack_complex_float* c, lapack_int* ldc,
12052                     lapack_complex_float* work, lapack_int* lwork,
12053                     lapack_int *info );
12054 void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
12055                     lapack_int* k, const lapack_complex_double* a,
12056                     lapack_int* lda, const lapack_complex_double* tau,
12057                     lapack_complex_double* c, lapack_int* ldc,
12058                     lapack_complex_double* work, lapack_int* lwork,
12059                     lapack_int *info );
12060 void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12061                     float* tau, float* work, lapack_int* lwork,
12062                     lapack_int *info );
12063 void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12064                     double* tau, double* work, lapack_int* lwork,
12065                     lapack_int *info );
12066 void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12067                     lapack_int* lda, lapack_complex_float* tau,
12068                     lapack_complex_float* work, lapack_int* lwork,
12069                     lapack_int *info );
12070 void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12071                     lapack_int* lda, lapack_complex_double* tau,
12072                     lapack_complex_double* work, lapack_int* lwork,
12073                     lapack_int *info );
12074 void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
12075                     lapack_int* lda, const float* tau, float* work,
12076                     lapack_int* lwork, lapack_int *info );
12077 void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
12078                     lapack_int* lda, const double* tau, double* work,
12079                     lapack_int* lwork, lapack_int *info );
12080 void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
12081                     lapack_complex_float* a, lapack_int* lda,
12082                     const lapack_complex_float* tau, lapack_complex_float* work,
12083                     lapack_int* lwork, lapack_int *info );
12084 void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
12085                     lapack_complex_double* a, lapack_int* lda,
12086                     const lapack_complex_double* tau,
12087                     lapack_complex_double* work, lapack_int* lwork,
12088                     lapack_int *info );
12089 void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
12090                     lapack_int* k, const float* a, lapack_int* lda,
12091                     const float* tau, float* c, lapack_int* ldc, float* work,
12092                     lapack_int* lwork, lapack_int *info );
12093 void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
12094                     lapack_int* k, const double* a, lapack_int* lda,
12095                     const double* tau, double* c, lapack_int* ldc, double* work,
12096                     lapack_int* lwork, lapack_int *info );
12097 void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
12098                     lapack_int* k, const lapack_complex_float* a,
12099                     lapack_int* lda, const lapack_complex_float* tau,
12100                     lapack_complex_float* c, lapack_int* ldc,
12101                     lapack_complex_float* work, lapack_int* lwork,
12102                     lapack_int *info );
12103 void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
12104                     lapack_int* k, const lapack_complex_double* a,
12105                     lapack_int* lda, const lapack_complex_double* tau,
12106                     lapack_complex_double* c, lapack_int* ldc,
12107                     lapack_complex_double* work, lapack_int* lwork,
12108                     lapack_int *info );
12109 void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12110                     float* tau, float* work, lapack_int* lwork,
12111                     lapack_int *info );
12112 void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12113                     double* tau, double* work, lapack_int* lwork,
12114                     lapack_int *info );
12115 void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12116                     lapack_int* lda, lapack_complex_float* tau,
12117                     lapack_complex_float* work, lapack_int* lwork,
12118                     lapack_int *info );
12119 void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12120                     lapack_int* lda, lapack_complex_double* tau,
12121                     lapack_complex_double* work, lapack_int* lwork,
12122                     lapack_int *info );
12123 void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
12124                     lapack_int* k, lapack_int* l, const float* a,
12125                     lapack_int* lda, const float* tau, float* c,
12126                     lapack_int* ldc, float* work, lapack_int* lwork,
12127                     lapack_int *info );
12128 void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
12129                     lapack_int* k, lapack_int* l, const double* a,
12130                     lapack_int* lda, const double* tau, double* c,
12131                     lapack_int* ldc, double* work, lapack_int* lwork,
12132                     lapack_int *info );
12133 void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
12134                     lapack_int* k, lapack_int* l, const lapack_complex_float* a,
12135                     lapack_int* lda, const lapack_complex_float* tau,
12136                     lapack_complex_float* c, lapack_int* ldc,
12137                     lapack_complex_float* work, lapack_int* lwork,
12138                     lapack_int *info );
12139 void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
12140                     lapack_int* k, lapack_int* l,
12141                     const lapack_complex_double* a, lapack_int* lda,
12142                     const lapack_complex_double* tau, lapack_complex_double* c,
12143                     lapack_int* ldc, lapack_complex_double* work,
12144                     lapack_int* lwork, lapack_int *info );
12145 void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
12146                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
12147                     float* taub, float* work, lapack_int* lwork,
12148                     lapack_int *info );
12149 void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
12150                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
12151                     double* taub, double* work, lapack_int* lwork,
12152                     lapack_int *info );
12153 void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
12154                     lapack_complex_float* a, lapack_int* lda,
12155                     lapack_complex_float* taua, lapack_complex_float* b,
12156                     lapack_int* ldb, lapack_complex_float* taub,
12157                     lapack_complex_float* work, lapack_int* lwork,
12158                     lapack_int *info );
12159 void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
12160                     lapack_complex_double* a, lapack_int* lda,
12161                     lapack_complex_double* taua, lapack_complex_double* b,
12162                     lapack_int* ldb, lapack_complex_double* taub,
12163                     lapack_complex_double* work, lapack_int* lwork,
12164                     lapack_int *info );
12165 void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
12166                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
12167                     float* taub, float* work, lapack_int* lwork,
12168                     lapack_int *info );
12169 void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
12170                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
12171                     double* taub, double* work, lapack_int* lwork,
12172                     lapack_int *info );
12173 void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
12174                     lapack_complex_float* a, lapack_int* lda,
12175                     lapack_complex_float* taua, lapack_complex_float* b,
12176                     lapack_int* ldb, lapack_complex_float* taub,
12177                     lapack_complex_float* work, lapack_int* lwork,
12178                     lapack_int *info );
12179 void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
12180                     lapack_complex_double* a, lapack_int* lda,
12181                     lapack_complex_double* taua, lapack_complex_double* b,
12182                     lapack_int* ldb, lapack_complex_double* taub,
12183                     lapack_complex_double* work, lapack_int* lwork,
12184                     lapack_int *info );
12185 void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12186                     float* d, float* e, float* tauq, float* taup, float* work,
12187                     lapack_int* lwork, lapack_int *info );
12188 void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12189                     double* d, double* e, double* tauq, double* taup,
12190                     double* work, lapack_int* lwork, lapack_int *info );
12191 void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12192                     lapack_int* lda, float* d, float* e,
12193                     lapack_complex_float* tauq, lapack_complex_float* taup,
12194                     lapack_complex_float* work, lapack_int* lwork,
12195                     lapack_int *info );
12196 void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12197                     lapack_int* lda, double* d, double* e,
12198                     lapack_complex_double* tauq, lapack_complex_double* taup,
12199                     lapack_complex_double* work, lapack_int* lwork,
12200                     lapack_int *info );
12201 void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
12202                     lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
12203                     float* d, float* e, float* q, lapack_int* ldq, float* pt,
12204                     lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
12205                     lapack_int *info );
12206 void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
12207                     lapack_int* kl, lapack_int* ku, double* ab,
12208                     lapack_int* ldab, double* d, double* e, double* q,
12209                     lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
12210                     lapack_int* ldc, double* work, lapack_int *info );
12211 void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
12212                     lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
12213                     lapack_int* ldab, float* d, float* e,
12214                     lapack_complex_float* q, lapack_int* ldq,
12215                     lapack_complex_float* pt, lapack_int* ldpt,
12216                     lapack_complex_float* c, lapack_int* ldc,
12217                     lapack_complex_float* work, float* rwork,
12218                     lapack_int *info );
12219 void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
12220                     lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
12221                     lapack_int* ldab, double* d, double* e,
12222                     lapack_complex_double* q, lapack_int* ldq,
12223                     lapack_complex_double* pt, lapack_int* ldpt,
12224                     lapack_complex_double* c, lapack_int* ldc,
12225                     lapack_complex_double* work, double* rwork,
12226                     lapack_int *info );
12227 void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
12228                     float* a, lapack_int* lda, const float* tau, float* work,
12229                     lapack_int* lwork, lapack_int *info );
12230 void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
12231                     double* a, lapack_int* lda, const double* tau, double* work,
12232                     lapack_int* lwork, lapack_int *info );
12233 void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
12234                     lapack_int* n, lapack_int* k, const float* a,
12235                     lapack_int* lda, const float* tau, float* c,
12236                     lapack_int* ldc, float* work, lapack_int* lwork,
12237                     lapack_int *info );
12238 void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
12239                     lapack_int* n, lapack_int* k, const double* a,
12240                     lapack_int* lda, const double* tau, double* c,
12241                     lapack_int* ldc, double* work, lapack_int* lwork,
12242                     lapack_int *info );
12243 void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
12244                     lapack_complex_float* a, lapack_int* lda,
12245                     const lapack_complex_float* tau, lapack_complex_float* work,
12246                     lapack_int* lwork, lapack_int *info );
12247 void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
12248                     lapack_complex_double* a, lapack_int* lda,
12249                     const lapack_complex_double* tau,
12250                     lapack_complex_double* work, lapack_int* lwork,
12251                     lapack_int *info );
12252 void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
12253                     lapack_int* n, lapack_int* k, const lapack_complex_float* a,
12254                     lapack_int* lda, const lapack_complex_float* tau,
12255                     lapack_complex_float* c, lapack_int* ldc,
12256                     lapack_complex_float* work, lapack_int* lwork,
12257                     lapack_int *info );
12258 void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
12259                     lapack_int* n, lapack_int* k,
12260                     const lapack_complex_double* a, lapack_int* lda,
12261                     const lapack_complex_double* tau, lapack_complex_double* c,
12262                     lapack_int* ldc, lapack_complex_double* work,
12263                     lapack_int* lwork, lapack_int *info );
12264 void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
12265                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
12266                     float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
12267                     float* c, lapack_int* ldc, float* work, lapack_int *info );
12268 void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
12269                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
12270                     double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
12271                     double* c, lapack_int* ldc, double* work,
12272                     lapack_int *info );
12273 void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
12274                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
12275                     lapack_complex_float* vt, lapack_int* ldvt,
12276                     lapack_complex_float* u, lapack_int* ldu,
12277                     lapack_complex_float* c, lapack_int* ldc, float* work,
12278                     lapack_int *info );
12279 void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
12280                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
12281                     lapack_complex_double* vt, lapack_int* ldvt,
12282                     lapack_complex_double* u, lapack_int* ldu,
12283                     lapack_complex_double* c, lapack_int* ldc, double* work,
12284                     lapack_int *info );
12285 void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
12286                     float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
12287                     float* q, lapack_int* iq, float* work, lapack_int* iwork,
12288                     lapack_int *info );
12289 void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
12290                     double* e, double* u, lapack_int* ldu, double* vt,
12291                     lapack_int* ldvt, double* q, lapack_int* iq, double* work,
12292                     lapack_int* iwork, lapack_int *info );
12293 void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12294                     float* d, float* e, float* tau, float* work,
12295                     lapack_int* lwork, lapack_int *info );
12296 void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12297                     double* d, double* e, double* tau, double* work,
12298                     lapack_int* lwork, lapack_int *info );
12299 void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12300                     const float* tau, float* work, lapack_int* lwork,
12301                     lapack_int *info );
12302 void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12303                     const double* tau, double* work, lapack_int* lwork,
12304                     lapack_int *info );
12305 void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
12306                     lapack_int* n, const float* a, lapack_int* lda,
12307                     const float* tau, float* c, lapack_int* ldc, float* work,
12308                     lapack_int* lwork, lapack_int *info );
12309 void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
12310                     lapack_int* n, const double* a, lapack_int* lda,
12311                     const double* tau, double* c, lapack_int* ldc, double* work,
12312                     lapack_int* lwork, lapack_int *info );
12313 void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
12314                     lapack_int* lda, float* d, float* e,
12315                     lapack_complex_float* tau, lapack_complex_float* work,
12316                     lapack_int* lwork, lapack_int *info );
12317 void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
12318                     lapack_int* lda, double* d, double* e,
12319                     lapack_complex_double* tau, lapack_complex_double* work,
12320                     lapack_int* lwork, lapack_int *info );
12321 void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
12322                     lapack_int* lda, const lapack_complex_float* tau,
12323                     lapack_complex_float* work, lapack_int* lwork,
12324                     lapack_int *info );
12325 void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
12326                     lapack_int* lda, const lapack_complex_double* tau,
12327                     lapack_complex_double* work, lapack_int* lwork,
12328                     lapack_int *info );
12329 void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
12330                     lapack_int* n, const lapack_complex_float* a,
12331                     lapack_int* lda, const lapack_complex_float* tau,
12332                     lapack_complex_float* c, lapack_int* ldc,
12333                     lapack_complex_float* work, lapack_int* lwork,
12334                     lapack_int *info );
12335 void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
12336                     lapack_int* n, const lapack_complex_double* a,
12337                     lapack_int* lda, const lapack_complex_double* tau,
12338                     lapack_complex_double* c, lapack_int* ldc,
12339                     lapack_complex_double* work, lapack_int* lwork,
12340                     lapack_int *info );
12341 void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
12342                     float* tau, lapack_int *info );
12343 void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
12344                     double* tau, lapack_int *info );
12345 void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
12346                     const float* tau, float* q, lapack_int* ldq, float* work,
12347                     lapack_int *info );
12348 void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
12349                     const double* tau, double* q, lapack_int* ldq, double* work,
12350                     lapack_int *info );
12351 void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
12352                     lapack_int* n, const float* ap, const float* tau, float* c,
12353                     lapack_int* ldc, float* work, lapack_int *info );
12354 void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
12355                     lapack_int* n, const double* ap, const double* tau,
12356                     double* c, lapack_int* ldc, double* work,
12357                     lapack_int *info );
12358 void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
12359                     float* d, float* e, lapack_complex_float* tau,
12360                     lapack_int *info );
12361 void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
12362                     double* d, double* e, lapack_complex_double* tau,
12363                     lapack_int *info );
12364 void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12365                     const lapack_complex_float* tau, lapack_complex_float* q,
12366                     lapack_int* ldq, lapack_complex_float* work,
12367                     lapack_int *info );
12368 void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12369                     const lapack_complex_double* tau, lapack_complex_double* q,
12370                     lapack_int* ldq, lapack_complex_double* work,
12371                     lapack_int *info );
12372 void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
12373                     lapack_int* n, const lapack_complex_float* ap,
12374                     const lapack_complex_float* tau, lapack_complex_float* c,
12375                     lapack_int* ldc, lapack_complex_float* work,
12376                     lapack_int *info );
12377 void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
12378                     lapack_int* n, const lapack_complex_double* ap,
12379                     const lapack_complex_double* tau, lapack_complex_double* c,
12380                     lapack_int* ldc, lapack_complex_double* work,
12381                     lapack_int *info );
12382 void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
12383                     float* ab, lapack_int* ldab, float* d, float* e, float* q,
12384                     lapack_int* ldq, float* work, lapack_int *info );
12385 void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
12386                     double* ab, lapack_int* ldab, double* d, double* e,
12387                     double* q, lapack_int* ldq, double* work,
12388                     lapack_int *info );
12389 void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
12390                     lapack_complex_float* ab, lapack_int* ldab, float* d,
12391                     float* e, lapack_complex_float* q, lapack_int* ldq,
12392                     lapack_complex_float* work, lapack_int *info );
12393 void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
12394                     lapack_complex_double* ab, lapack_int* ldab, double* d,
12395                     double* e, lapack_complex_double* q, lapack_int* ldq,
12396                     lapack_complex_double* work, lapack_int *info );
12397 void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
12398 void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
12399 void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
12400                     lapack_int* ldz, float* work, lapack_int *info );
12401 void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
12402                     lapack_int* ldz, double* work, lapack_int *info );
12403 void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
12404                     lapack_complex_float* z, lapack_int* ldz, float* work,
12405                     lapack_int *info );
12406 void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
12407                     lapack_complex_double* z, lapack_int* ldz, double* work,
12408                     lapack_int *info );
12409 void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
12410                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
12411                     lapack_int* m, float* w, float* z, lapack_int* ldz,
12412                     lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
12413                     float* work, lapack_int* lwork, lapack_int* iwork,
12414                     lapack_int* liwork, lapack_int *info );
12415 void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
12416                     double* e, double* vl, double* vu, lapack_int* il,
12417                     lapack_int* iu, lapack_int* m, double* w, double* z,
12418                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
12419                     lapack_logical* tryrac, double* work, lapack_int* lwork,
12420                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12421 void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
12422                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
12423                     lapack_int* m, float* w, lapack_complex_float* z,
12424                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
12425                     lapack_logical* tryrac, float* work, lapack_int* lwork,
12426                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12427 void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
12428                     double* e, double* vl, double* vu, lapack_int* il,
12429                     lapack_int* iu, lapack_int* m, double* w,
12430                     lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
12431                     lapack_int* isuppz, lapack_logical* tryrac, double* work,
12432                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
12433                     lapack_int *info );
12434 void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
12435                     lapack_int* ldz, float* work, lapack_int* lwork,
12436                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12437 void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
12438                     lapack_int* ldz, double* work, lapack_int* lwork,
12439                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12440 void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
12441                     lapack_complex_float* z, lapack_int* ldz,
12442                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
12443                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
12444                     lapack_int *info );
12445 void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
12446                     lapack_complex_double* z, lapack_int* ldz,
12447                     lapack_complex_double* work, lapack_int* lwork,
12448                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
12449                     lapack_int* liwork, lapack_int *info );
12450 void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
12451                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
12452                     float* abstol, lapack_int* m, float* w, float* z,
12453                     lapack_int* ldz, lapack_int* isuppz, float* work,
12454                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
12455                     lapack_int *info );
12456 void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
12457                     double* e, double* vl, double* vu, lapack_int* il,
12458                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
12459                     double* z, lapack_int* ldz, lapack_int* isuppz,
12460                     double* work, lapack_int* lwork, lapack_int* iwork,
12461                     lapack_int* liwork, lapack_int *info );
12462 void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
12463                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
12464                     float* abstol, lapack_int* m, float* w,
12465                     lapack_complex_float* z, lapack_int* ldz,
12466                     lapack_int* isuppz, float* work, lapack_int* lwork,
12467                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12468 void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
12469                     double* e, double* vl, double* vu, lapack_int* il,
12470                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
12471                     lapack_complex_double* z, lapack_int* ldz,
12472                     lapack_int* isuppz, double* work, lapack_int* lwork,
12473                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12474 void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
12475                     lapack_int* ldz, float* work, lapack_int *info );
12476 void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
12477                     lapack_int* ldz, double* work, lapack_int *info );
12478 void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
12479                     lapack_complex_float* z, lapack_int* ldz, float* work,
12480                     lapack_int *info );
12481 void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
12482                     lapack_complex_double* z, lapack_int* ldz, double* work,
12483                     lapack_int *info );
12484 void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
12485                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
12486                     const float* d, const float* e, lapack_int* m,
12487                     lapack_int* nsplit, float* w, lapack_int* iblock,
12488                     lapack_int* isplit, float* work, lapack_int* iwork,
12489                     lapack_int *info );
12490 void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
12491                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
12492                     const double* d, const double* e, lapack_int* m,
12493                     lapack_int* nsplit, double* w, lapack_int* iblock,
12494                     lapack_int* isplit, double* work, lapack_int* iwork,
12495                     lapack_int *info );
12496 void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
12497                     lapack_int* m, const float* w, const lapack_int* iblock,
12498                     const lapack_int* isplit, float* z, lapack_int* ldz,
12499                     float* work, lapack_int* iwork, lapack_int* ifailv,
12500                     lapack_int *info );
12501 void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
12502                     lapack_int* m, const double* w, const lapack_int* iblock,
12503                     const lapack_int* isplit, double* z, lapack_int* ldz,
12504                     double* work, lapack_int* iwork, lapack_int* ifailv,
12505                     lapack_int *info );
12506 void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
12507                     lapack_int* m, const float* w, const lapack_int* iblock,
12508                     const lapack_int* isplit, lapack_complex_float* z,
12509                     lapack_int* ldz, float* work, lapack_int* iwork,
12510                     lapack_int* ifailv, lapack_int *info );
12511 void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
12512                     lapack_int* m, const double* w, const lapack_int* iblock,
12513                     const lapack_int* isplit, lapack_complex_double* z,
12514                     lapack_int* ldz, double* work, lapack_int* iwork,
12515                     lapack_int* ifailv, lapack_int *info );
12516 void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
12517                     float* sep, lapack_int *info );
12518 void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
12519                     double* sep, lapack_int *info );
12520 void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
12521                     lapack_int* lda, const float* b, lapack_int* ldb,
12522                     lapack_int *info );
12523 void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
12524                     lapack_int* lda, const double* b, lapack_int* ldb,
12525                     lapack_int *info );
12526 void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
12527                     lapack_complex_float* a, lapack_int* lda,
12528                     const lapack_complex_float* b, lapack_int* ldb,
12529                     lapack_int *info );
12530 void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
12531                     lapack_complex_double* a, lapack_int* lda,
12532                     const lapack_complex_double* b, lapack_int* ldb,
12533                     lapack_int *info );
12534 void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
12535                     const float* bp, lapack_int *info );
12536 void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
12537                     const double* bp, lapack_int *info );
12538 void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
12539                     lapack_complex_float* ap, const lapack_complex_float* bp,
12540                     lapack_int *info );
12541 void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
12542                     lapack_complex_double* ap, const lapack_complex_double* bp,
12543                     lapack_int *info );
12544 void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
12545                     lapack_int* kb, float* ab, lapack_int* ldab,
12546                     const float* bb, lapack_int* ldbb, float* x,
12547                     lapack_int* ldx, float* work, lapack_int *info );
12548 void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
12549                     lapack_int* kb, double* ab, lapack_int* ldab,
12550                     const double* bb, lapack_int* ldbb, double* x,
12551                     lapack_int* ldx, double* work, lapack_int *info );
12552 void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
12553                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
12554                     const lapack_complex_float* bb, lapack_int* ldbb,
12555                     lapack_complex_float* x, lapack_int* ldx,
12556                     lapack_complex_float* work, float* rwork,
12557                     lapack_int *info );
12558 void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
12559                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
12560                     const lapack_complex_double* bb, lapack_int* ldbb,
12561                     lapack_complex_double* x, lapack_int* ldx,
12562                     lapack_complex_double* work, double* rwork,
12563                     lapack_int *info );
12564 void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
12565                     lapack_int* ldbb, lapack_int *info );
12566 void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
12567                     lapack_int* ldbb, lapack_int *info );
12568 void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
12569                     lapack_complex_float* bb, lapack_int* ldbb,
12570                     lapack_int *info );
12571 void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
12572                     lapack_complex_double* bb, lapack_int* ldbb,
12573                     lapack_int *info );
12574 void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
12575                     lapack_int* lda, float* tau, float* work, lapack_int* lwork,
12576                     lapack_int *info );
12577 void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
12578                     lapack_int* lda, double* tau, double* work,
12579                     lapack_int* lwork, lapack_int *info );
12580 void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
12581                     lapack_complex_float* a, lapack_int* lda,
12582                     lapack_complex_float* tau, lapack_complex_float* work,
12583                     lapack_int* lwork, lapack_int *info );
12584 void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
12585                     lapack_complex_double* a, lapack_int* lda,
12586                     lapack_complex_double* tau, lapack_complex_double* work,
12587                     lapack_int* lwork, lapack_int *info );
12588 void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
12589                     lapack_int* lda, const float* tau, float* work,
12590                     lapack_int* lwork, lapack_int *info );
12591 void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
12592                     lapack_int* lda, const double* tau, double* work,
12593                     lapack_int* lwork, lapack_int *info );
12594 void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
12595                     lapack_int* ilo, lapack_int* ihi, const float* a,
12596                     lapack_int* lda, const float* tau, float* c,
12597                     lapack_int* ldc, float* work, lapack_int* lwork,
12598                     lapack_int *info );
12599 void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
12600                     lapack_int* ilo, lapack_int* ihi, const double* a,
12601                     lapack_int* lda, const double* tau, double* c,
12602                     lapack_int* ldc, double* work, lapack_int* lwork,
12603                     lapack_int *info );
12604 void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
12605                     lapack_complex_float* a, lapack_int* lda,
12606                     const lapack_complex_float* tau, lapack_complex_float* work,
12607                     lapack_int* lwork, lapack_int *info );
12608 void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
12609                     lapack_complex_double* a, lapack_int* lda,
12610                     const lapack_complex_double* tau,
12611                     lapack_complex_double* work, lapack_int* lwork,
12612                     lapack_int *info );
12613 void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
12614                     lapack_int* ilo, lapack_int* ihi,
12615                     const lapack_complex_float* a, lapack_int* lda,
12616                     const lapack_complex_float* tau, lapack_complex_float* c,
12617                     lapack_int* ldc, lapack_complex_float* work,
12618                     lapack_int* lwork, lapack_int *info );
12619 void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
12620                     lapack_int* ilo, lapack_int* ihi,
12621                     const lapack_complex_double* a, lapack_int* lda,
12622                     const lapack_complex_double* tau, lapack_complex_double* c,
12623                     lapack_int* ldc, lapack_complex_double* work,
12624                     lapack_int* lwork, lapack_int *info );
12625 void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
12626                     lapack_int* ilo, lapack_int* ihi, float* scale,
12627                     lapack_int *info );
12628 void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
12629                     lapack_int* ilo, lapack_int* ihi, double* scale,
12630                     lapack_int *info );
12631 void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
12632                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
12633                     float* scale, lapack_int *info );
12634 void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
12635                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
12636                     double* scale, lapack_int *info );
12637 void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12638                     lapack_int* ihi, const float* scale, lapack_int* m,
12639                     float* v, lapack_int* ldv, lapack_int *info );
12640 void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12641                     lapack_int* ihi, const double* scale, lapack_int* m,
12642                     double* v, lapack_int* ldv, lapack_int *info );
12643 void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12644                     lapack_int* ihi, const float* scale, lapack_int* m,
12645                     lapack_complex_float* v, lapack_int* ldv,
12646                     lapack_int *info );
12647 void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12648                     lapack_int* ihi, const double* scale, lapack_int* m,
12649                     lapack_complex_double* v, lapack_int* ldv,
12650                     lapack_int *info );
12651 void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
12652                     lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
12653                     float* wi, float* z, lapack_int* ldz, float* work,
12654                     lapack_int* lwork, lapack_int *info );
12655 void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
12656                     lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
12657                     double* wi, double* z, lapack_int* ldz, double* work,
12658                     lapack_int* lwork, lapack_int *info );
12659 void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
12660                     lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
12661                     lapack_complex_float* w, lapack_complex_float* z,
12662                     lapack_int* ldz, lapack_complex_float* work,
12663                     lapack_int* lwork, lapack_int *info );
12664 void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
12665                     lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
12666                     lapack_complex_double* w, lapack_complex_double* z,
12667                     lapack_int* ldz, lapack_complex_double* work,
12668                     lapack_int* lwork, lapack_int *info );
12669 void LAPACK_shsein( char* job, char* eigsrc, char* initv,
12670                     lapack_logical* select, lapack_int* n, const float* h,
12671                     lapack_int* ldh, float* wr, const float* wi, float* vl,
12672                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
12673                     lapack_int* mm, lapack_int* m, float* work,
12674                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
12675 void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
12676                     lapack_logical* select, lapack_int* n, const double* h,
12677                     lapack_int* ldh, double* wr, const double* wi, double* vl,
12678                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
12679                     lapack_int* mm, lapack_int* m, double* work,
12680                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
12681 void LAPACK_chsein( char* job, char* eigsrc, char* initv,
12682                     const lapack_logical* select, lapack_int* n,
12683                     const lapack_complex_float* h, lapack_int* ldh,
12684                     lapack_complex_float* w, lapack_complex_float* vl,
12685                     lapack_int* ldvl, lapack_complex_float* vr,
12686                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
12687                     lapack_complex_float* work, float* rwork,
12688                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
12689 void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
12690                     const lapack_logical* select, lapack_int* n,
12691                     const lapack_complex_double* h, lapack_int* ldh,
12692                     lapack_complex_double* w, lapack_complex_double* vl,
12693                     lapack_int* ldvl, lapack_complex_double* vr,
12694                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
12695                     lapack_complex_double* work, double* rwork,
12696                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
12697 void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
12698                     lapack_int* n, const float* t, lapack_int* ldt, float* vl,
12699                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
12700                     lapack_int* mm, lapack_int* m, float* work,
12701                     lapack_int *info );
12702 void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
12703                     lapack_int* n, const double* t, lapack_int* ldt, double* vl,
12704                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
12705                     lapack_int* mm, lapack_int* m, double* work,
12706                     lapack_int *info );
12707 void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
12708                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
12709                     lapack_complex_float* vl, lapack_int* ldvl,
12710                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
12711                     lapack_int* m, lapack_complex_float* work, float* rwork,
12712                     lapack_int *info );
12713 void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
12714                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
12715                     lapack_complex_double* vl, lapack_int* ldvl,
12716                     lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
12717                     lapack_int* m, lapack_complex_double* work, double* rwork,
12718                     lapack_int *info );
12719 void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
12720                     lapack_int* n, const float* t, lapack_int* ldt,
12721                     const float* vl, lapack_int* ldvl, const float* vr,
12722                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
12723                     lapack_int* m, float* work, lapack_int* ldwork,
12724                     lapack_int* iwork, lapack_int *info );
12725 void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
12726                     lapack_int* n, const double* t, lapack_int* ldt,
12727                     const double* vl, lapack_int* ldvl, const double* vr,
12728                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
12729                     lapack_int* m, double* work, lapack_int* ldwork,
12730                     lapack_int* iwork, lapack_int *info );
12731 void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
12732                     lapack_int* n, const lapack_complex_float* t,
12733                     lapack_int* ldt, const lapack_complex_float* vl,
12734                     lapack_int* ldvl, const lapack_complex_float* vr,
12735                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
12736                     lapack_int* m, lapack_complex_float* work,
12737                     lapack_int* ldwork, float* rwork, lapack_int *info );
12738 void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
12739                     lapack_int* n, const lapack_complex_double* t,
12740                     lapack_int* ldt, const lapack_complex_double* vl,
12741                     lapack_int* ldvl, const lapack_complex_double* vr,
12742                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
12743                     lapack_int* m, lapack_complex_double* work,
12744                     lapack_int* ldwork, double* rwork, lapack_int *info );
12745 void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
12746                     float* q, lapack_int* ldq, lapack_int* ifst,
12747                     lapack_int* ilst, float* work, lapack_int *info );
12748 void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
12749                     double* q, lapack_int* ldq, lapack_int* ifst,
12750                     lapack_int* ilst, double* work, lapack_int *info );
12751 void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
12752                     lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
12753                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
12754 void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
12755                     lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
12756                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
12757 void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
12758                     lapack_int* n, float* t, lapack_int* ldt, float* q,
12759                     lapack_int* ldq, float* wr, float* wi, lapack_int* m,
12760                     float* s, float* sep, float* work, lapack_int* lwork,
12761                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12762 void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
12763                     lapack_int* n, double* t, lapack_int* ldt, double* q,
12764                     lapack_int* ldq, double* wr, double* wi, lapack_int* m,
12765                     double* s, double* sep, double* work, lapack_int* lwork,
12766                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12767 void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
12768                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
12769                     lapack_complex_float* q, lapack_int* ldq,
12770                     lapack_complex_float* w, lapack_int* m, float* s,
12771                     float* sep, lapack_complex_float* work, lapack_int* lwork,
12772                     lapack_int *info );
12773 void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
12774                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
12775                     lapack_complex_double* q, lapack_int* ldq,
12776                     lapack_complex_double* w, lapack_int* m, double* s,
12777                     double* sep, lapack_complex_double* work, lapack_int* lwork,
12778                     lapack_int *info );
12779 void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
12780                     lapack_int* n, const float* a, lapack_int* lda,
12781                     const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
12782                     float* scale, lapack_int *info );
12783 void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
12784                     lapack_int* n, const double* a, lapack_int* lda,
12785                     const double* b, lapack_int* ldb, double* c,
12786                     lapack_int* ldc, double* scale, lapack_int *info );
12787 void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
12788                     lapack_int* n, const lapack_complex_float* a,
12789                     lapack_int* lda, const lapack_complex_float* b,
12790                     lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
12791                     float* scale, lapack_int *info );
12792 void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
12793                     lapack_int* n, const lapack_complex_double* a,
12794                     lapack_int* lda, const lapack_complex_double* b,
12795                     lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
12796                     double* scale, lapack_int *info );
12797 void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
12798                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
12799                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
12800                     lapack_int* ldz, lapack_int *info );
12801 void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
12802                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
12803                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
12804                     lapack_int* ldz, lapack_int *info );
12805 void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
12806                     lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
12807                     lapack_complex_float* b, lapack_int* ldb,
12808                     lapack_complex_float* q, lapack_int* ldq,
12809                     lapack_complex_float* z, lapack_int* ldz,
12810                     lapack_int *info );
12811 void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
12812                     lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
12813                     lapack_complex_double* b, lapack_int* ldb,
12814                     lapack_complex_double* q, lapack_int* ldq,
12815                     lapack_complex_double* z, lapack_int* ldz,
12816                     lapack_int *info );
12817 void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
12818                     float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
12819                     float* lscale, float* rscale, float* work,
12820                     lapack_int *info );
12821 void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
12822                     double* b, lapack_int* ldb, lapack_int* ilo,
12823                     lapack_int* ihi, double* lscale, double* rscale,
12824                     double* work, lapack_int *info );
12825 void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
12826                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
12827                     lapack_int* ilo, lapack_int* ihi, float* lscale,
12828                     float* rscale, float* work, lapack_int *info );
12829 void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
12830                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
12831                     lapack_int* ilo, lapack_int* ihi, double* lscale,
12832                     double* rscale, double* work, lapack_int *info );
12833 void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12834                     lapack_int* ihi, const float* lscale, const float* rscale,
12835                     lapack_int* m, float* v, lapack_int* ldv,
12836                     lapack_int *info );
12837 void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12838                     lapack_int* ihi, const double* lscale, const double* rscale,
12839                     lapack_int* m, double* v, lapack_int* ldv,
12840                     lapack_int *info );
12841 void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12842                     lapack_int* ihi, const float* lscale, const float* rscale,
12843                     lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
12844                     lapack_int *info );
12845 void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
12846                     lapack_int* ihi, const double* lscale, const double* rscale,
12847                     lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
12848                     lapack_int *info );
12849 void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
12850                     lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
12851                     float* t, lapack_int* ldt, float* alphar, float* alphai,
12852                     float* beta, float* q, lapack_int* ldq, float* z,
12853                     lapack_int* ldz, float* work, lapack_int* lwork,
12854                     lapack_int *info );
12855 void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
12856                     lapack_int* ilo, lapack_int* ihi, double* h,
12857                     lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
12858                     double* alphai, double* beta, double* q, lapack_int* ldq,
12859                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
12860                     lapack_int *info );
12861 void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
12862                     lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
12863                     lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
12864                     lapack_complex_float* alpha, lapack_complex_float* beta,
12865                     lapack_complex_float* q, lapack_int* ldq,
12866                     lapack_complex_float* z, lapack_int* ldz,
12867                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
12868                     lapack_int *info );
12869 void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
12870                     lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
12871                     lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
12872                     lapack_complex_double* alpha, lapack_complex_double* beta,
12873                     lapack_complex_double* q, lapack_int* ldq,
12874                     lapack_complex_double* z, lapack_int* ldz,
12875                     lapack_complex_double* work, lapack_int* lwork,
12876                     double* rwork, lapack_int *info );
12877 void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
12878                     lapack_int* n, const float* s, lapack_int* lds,
12879                     const float* p, lapack_int* ldp, float* vl,
12880                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
12881                     lapack_int* mm, lapack_int* m, float* work,
12882                     lapack_int *info );
12883 void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
12884                     lapack_int* n, const double* s, lapack_int* lds,
12885                     const double* p, lapack_int* ldp, double* vl,
12886                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
12887                     lapack_int* mm, lapack_int* m, double* work,
12888                     lapack_int *info );
12889 void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
12890                     lapack_int* n, const lapack_complex_float* s,
12891                     lapack_int* lds, const lapack_complex_float* p,
12892                     lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
12893                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
12894                     lapack_int* m, lapack_complex_float* work, float* rwork,
12895                     lapack_int *info );
12896 void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
12897                     lapack_int* n, const lapack_complex_double* s,
12898                     lapack_int* lds, const lapack_complex_double* p,
12899                     lapack_int* ldp, lapack_complex_double* vl,
12900                     lapack_int* ldvl, lapack_complex_double* vr,
12901                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
12902                     lapack_complex_double* work, double* rwork,
12903                     lapack_int *info );
12904 void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
12905                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
12906                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
12907                     lapack_int* ifst, lapack_int* ilst, float* work,
12908                     lapack_int* lwork, lapack_int *info );
12909 void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
12910                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
12911                     double* q, lapack_int* ldq, double* z, lapack_int* ldz,
12912                     lapack_int* ifst, lapack_int* ilst, double* work,
12913                     lapack_int* lwork, lapack_int *info );
12914 void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
12915                     lapack_complex_float* a, lapack_int* lda,
12916                     lapack_complex_float* b, lapack_int* ldb,
12917                     lapack_complex_float* q, lapack_int* ldq,
12918                     lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
12919                     lapack_int* ilst, lapack_int *info );
12920 void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
12921                     lapack_complex_double* a, lapack_int* lda,
12922                     lapack_complex_double* b, lapack_int* ldb,
12923                     lapack_complex_double* q, lapack_int* ldq,
12924                     lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
12925                     lapack_int* ilst, lapack_int *info );
12926 void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
12927                     lapack_logical* wantz, const lapack_logical* select,
12928                     lapack_int* n, float* a, lapack_int* lda, float* b,
12929                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
12930                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
12931                     lapack_int* m, float* pl, float* pr, float* dif,
12932                     float* work, lapack_int* lwork, lapack_int* iwork,
12933                     lapack_int* liwork, lapack_int *info );
12934 void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
12935                     lapack_logical* wantz, const lapack_logical* select,
12936                     lapack_int* n, double* a, lapack_int* lda, double* b,
12937                     lapack_int* ldb, double* alphar, double* alphai,
12938                     double* beta, double* q, lapack_int* ldq, double* z,
12939                     lapack_int* ldz, lapack_int* m, double* pl, double* pr,
12940                     double* dif, double* work, lapack_int* lwork,
12941                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12942 void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
12943                     lapack_logical* wantz, const lapack_logical* select,
12944                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
12945                     lapack_complex_float* b, lapack_int* ldb,
12946                     lapack_complex_float* alpha, lapack_complex_float* beta,
12947                     lapack_complex_float* q, lapack_int* ldq,
12948                     lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
12949                     float* pl, float* pr, float* dif,
12950                     lapack_complex_float* work, lapack_int* lwork,
12951                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12952 void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
12953                     lapack_logical* wantz, const lapack_logical* select,
12954                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
12955                     lapack_complex_double* b, lapack_int* ldb,
12956                     lapack_complex_double* alpha, lapack_complex_double* beta,
12957                     lapack_complex_double* q, lapack_int* ldq,
12958                     lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
12959                     double* pl, double* pr, double* dif,
12960                     lapack_complex_double* work, lapack_int* lwork,
12961                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
12962 void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
12963                     const float* a, lapack_int* lda, const float* b,
12964                     lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
12965                     lapack_int* ldd, const float* e, lapack_int* lde, float* f,
12966                     lapack_int* ldf, float* scale, float* dif, float* work,
12967                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
12968 void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
12969                     const double* a, lapack_int* lda, const double* b,
12970                     lapack_int* ldb, double* c, lapack_int* ldc,
12971                     const double* d, lapack_int* ldd, const double* e,
12972                     lapack_int* lde, double* f, lapack_int* ldf, double* scale,
12973                     double* dif, double* work, lapack_int* lwork,
12974                     lapack_int* iwork, lapack_int *info );
12975 void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
12976                     const lapack_complex_float* a, lapack_int* lda,
12977                     const lapack_complex_float* b, lapack_int* ldb,
12978                     lapack_complex_float* c, lapack_int* ldc,
12979                     const lapack_complex_float* d, lapack_int* ldd,
12980                     const lapack_complex_float* e, lapack_int* lde,
12981                     lapack_complex_float* f, lapack_int* ldf, float* scale,
12982                     float* dif, lapack_complex_float* work, lapack_int* lwork,
12983                     lapack_int* iwork, lapack_int *info );
12984 void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
12985                     const lapack_complex_double* a, lapack_int* lda,
12986                     const lapack_complex_double* b, lapack_int* ldb,
12987                     lapack_complex_double* c, lapack_int* ldc,
12988                     const lapack_complex_double* d, lapack_int* ldd,
12989                     const lapack_complex_double* e, lapack_int* lde,
12990                     lapack_complex_double* f, lapack_int* ldf, double* scale,
12991                     double* dif, lapack_complex_double* work, lapack_int* lwork,
12992                     lapack_int* iwork, lapack_int *info );
12993 void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
12994                     lapack_int* n, const float* a, lapack_int* lda,
12995                     const float* b, lapack_int* ldb, const float* vl,
12996                     lapack_int* ldvl, const float* vr, lapack_int* ldvr,
12997                     float* s, float* dif, lapack_int* mm, lapack_int* m,
12998                     float* work, lapack_int* lwork, lapack_int* iwork,
12999                     lapack_int *info );
13000 void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
13001                     lapack_int* n, const double* a, lapack_int* lda,
13002                     const double* b, lapack_int* ldb, const double* vl,
13003                     lapack_int* ldvl, const double* vr, lapack_int* ldvr,
13004                     double* s, double* dif, lapack_int* mm, lapack_int* m,
13005                     double* work, lapack_int* lwork, lapack_int* iwork,
13006                     lapack_int *info );
13007 void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
13008                     lapack_int* n, const lapack_complex_float* a,
13009                     lapack_int* lda, const lapack_complex_float* b,
13010                     lapack_int* ldb, const lapack_complex_float* vl,
13011                     lapack_int* ldvl, const lapack_complex_float* vr,
13012                     lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
13013                     lapack_int* m, lapack_complex_float* work,
13014                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
13015 void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
13016                     lapack_int* n, const lapack_complex_double* a,
13017                     lapack_int* lda, const lapack_complex_double* b,
13018                     lapack_int* ldb, const lapack_complex_double* vl,
13019                     lapack_int* ldvl, const lapack_complex_double* vr,
13020                     lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
13021                     lapack_int* m, lapack_complex_double* work,
13022                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
13023 void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
13024                     lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
13025                     float* b, lapack_int* ldb, float* tola, float* tolb,
13026                     lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
13027                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
13028                     lapack_int* iwork, float* tau, float* work,
13029                     lapack_int *info );
13030 void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
13031                     lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
13032                     double* b, lapack_int* ldb, double* tola, double* tolb,
13033                     lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
13034                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
13035                     lapack_int* iwork, double* tau, double* work,
13036                     lapack_int *info );
13037 void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
13038                     lapack_int* p, lapack_int* n, lapack_complex_float* a,
13039                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
13040                     float* tola, float* tolb, lapack_int* k, lapack_int* l,
13041                     lapack_complex_float* u, lapack_int* ldu,
13042                     lapack_complex_float* v, lapack_int* ldv,
13043                     lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
13044                     float* rwork, lapack_complex_float* tau,
13045                     lapack_complex_float* work, lapack_int *info );
13046 void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
13047                     lapack_int* p, lapack_int* n, lapack_complex_double* a,
13048                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
13049                     double* tola, double* tolb, lapack_int* k, lapack_int* l,
13050                     lapack_complex_double* u, lapack_int* ldu,
13051                     lapack_complex_double* v, lapack_int* ldv,
13052                     lapack_complex_double* q, lapack_int* ldq,
13053                     lapack_int* iwork, double* rwork,
13054                     lapack_complex_double* tau, lapack_complex_double* work,
13055                     lapack_int *info );
13056 void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
13057                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
13058                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
13059                     float* tola, float* tolb, float* alpha, float* beta,
13060                     float* u, lapack_int* ldu, float* v, lapack_int* ldv,
13061                     float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
13062                     lapack_int *info );
13063 void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
13064                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
13065                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
13066                     double* tola, double* tolb, double* alpha, double* beta,
13067                     double* u, lapack_int* ldu, double* v, lapack_int* ldv,
13068                     double* q, lapack_int* ldq, double* work,
13069                     lapack_int* ncycle, lapack_int *info );
13070 void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
13071                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
13072                     lapack_complex_float* a, lapack_int* lda,
13073                     lapack_complex_float* b, lapack_int* ldb, float* tola,
13074                     float* tolb, float* alpha, float* beta,
13075                     lapack_complex_float* u, lapack_int* ldu,
13076                     lapack_complex_float* v, lapack_int* ldv,
13077                     lapack_complex_float* q, lapack_int* ldq,
13078                     lapack_complex_float* work, lapack_int* ncycle,
13079                     lapack_int *info );
13080 void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
13081                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
13082                     lapack_complex_double* a, lapack_int* lda,
13083                     lapack_complex_double* b, lapack_int* ldb, double* tola,
13084                     double* tolb, double* alpha, double* beta,
13085                     lapack_complex_double* u, lapack_int* ldu,
13086                     lapack_complex_double* v, lapack_int* ldv,
13087                     lapack_complex_double* q, lapack_int* ldq,
13088                     lapack_complex_double* work, lapack_int* ncycle,
13089                     lapack_int *info );
13090 void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
13091                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
13092                    float* work, lapack_int* lwork, lapack_int *info );
13093 void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
13094                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
13095                    double* work, lapack_int* lwork, lapack_int *info );
13096 void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
13097                    lapack_complex_float* a, lapack_int* lda,
13098                    lapack_complex_float* b, lapack_int* ldb,
13099                    lapack_complex_float* work, lapack_int* lwork,
13100                    lapack_int *info );
13101 void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
13102                    lapack_complex_double* a, lapack_int* lda,
13103                    lapack_complex_double* b, lapack_int* ldb,
13104                    lapack_complex_double* work, lapack_int* lwork,
13105                    lapack_int *info );
13106 void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
13107                     lapack_int* lda, float* b, lapack_int* ldb,
13108                     lapack_int* jpvt, float* rcond, lapack_int* rank,
13109                     float* work, lapack_int* lwork, lapack_int *info );
13110 void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
13111                     lapack_int* lda, double* b, lapack_int* ldb,
13112                     lapack_int* jpvt, double* rcond, lapack_int* rank,
13113                     double* work, lapack_int* lwork, lapack_int *info );
13114 void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13115                     lapack_complex_float* a, lapack_int* lda,
13116                     lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
13117                     float* rcond, lapack_int* rank, lapack_complex_float* work,
13118                     lapack_int* lwork, float* rwork, lapack_int *info );
13119 void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13120                     lapack_complex_double* a, lapack_int* lda,
13121                     lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
13122                     double* rcond, lapack_int* rank,
13123                     lapack_complex_double* work, lapack_int* lwork,
13124                     double* rwork, lapack_int *info );
13125 void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
13126                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
13127                     float* rcond, lapack_int* rank, float* work,
13128                     lapack_int* lwork, lapack_int *info );
13129 void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
13130                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
13131                     double* rcond, lapack_int* rank, double* work,
13132                     lapack_int* lwork, lapack_int *info );
13133 void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13134                     lapack_complex_float* a, lapack_int* lda,
13135                     lapack_complex_float* b, lapack_int* ldb, float* s,
13136                     float* rcond, lapack_int* rank, lapack_complex_float* work,
13137                     lapack_int* lwork, float* rwork, lapack_int *info );
13138 void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13139                     lapack_complex_double* a, lapack_int* lda,
13140                     lapack_complex_double* b, lapack_int* ldb, double* s,
13141                     double* rcond, lapack_int* rank,
13142                     lapack_complex_double* work, lapack_int* lwork,
13143                     double* rwork, lapack_int *info );
13144 void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
13145                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
13146                     float* rcond, lapack_int* rank, float* work,
13147                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
13148 void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
13149                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
13150                     double* rcond, lapack_int* rank, double* work,
13151                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
13152 void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13153                     lapack_complex_float* a, lapack_int* lda,
13154                     lapack_complex_float* b, lapack_int* ldb, float* s,
13155                     float* rcond, lapack_int* rank, lapack_complex_float* work,
13156                     lapack_int* lwork, float* rwork, lapack_int* iwork,
13157                     lapack_int *info );
13158 void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
13159                     lapack_complex_double* a, lapack_int* lda,
13160                     lapack_complex_double* b, lapack_int* ldb, double* s,
13161                     double* rcond, lapack_int* rank,
13162                     lapack_complex_double* work, lapack_int* lwork,
13163                     double* rwork, lapack_int* iwork, lapack_int *info );
13164 void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
13165                     lapack_int* lda, float* b, lapack_int* ldb, float* c,
13166                     float* d, float* x, float* work, lapack_int* lwork,
13167                     lapack_int *info );
13168 void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
13169                     lapack_int* lda, double* b, lapack_int* ldb, double* c,
13170                     double* d, double* x, double* work, lapack_int* lwork,
13171                     lapack_int *info );
13172 void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
13173                     lapack_complex_float* a, lapack_int* lda,
13174                     lapack_complex_float* b, lapack_int* ldb,
13175                     lapack_complex_float* c, lapack_complex_float* d,
13176                     lapack_complex_float* x, lapack_complex_float* work,
13177                     lapack_int* lwork, lapack_int *info );
13178 void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
13179                     lapack_complex_double* a, lapack_int* lda,
13180                     lapack_complex_double* b, lapack_int* ldb,
13181                     lapack_complex_double* c, lapack_complex_double* d,
13182                     lapack_complex_double* x, lapack_complex_double* work,
13183                     lapack_int* lwork, lapack_int *info );
13184 void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
13185                     lapack_int* lda, float* b, lapack_int* ldb, float* d,
13186                     float* x, float* y, float* work, lapack_int* lwork,
13187                     lapack_int *info );
13188 void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
13189                     lapack_int* lda, double* b, lapack_int* ldb, double* d,
13190                     double* x, double* y, double* work, lapack_int* lwork,
13191                     lapack_int *info );
13192 void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
13193                     lapack_complex_float* a, lapack_int* lda,
13194                     lapack_complex_float* b, lapack_int* ldb,
13195                     lapack_complex_float* d, lapack_complex_float* x,
13196                     lapack_complex_float* y, lapack_complex_float* work,
13197                     lapack_int* lwork, lapack_int *info );
13198 void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
13199                     lapack_complex_double* a, lapack_int* lda,
13200                     lapack_complex_double* b, lapack_int* ldb,
13201                     lapack_complex_double* d, lapack_complex_double* x,
13202                     lapack_complex_double* y, lapack_complex_double* work,
13203                     lapack_int* lwork, lapack_int *info );
13204 void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
13205                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
13206                    lapack_int *info );
13207 void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
13208                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
13209                    lapack_int *info );
13210 void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
13211                    lapack_complex_float* a, lapack_int* lda, float* w,
13212                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13213                    lapack_int *info );
13214 void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
13215                    lapack_complex_double* a, lapack_int* lda, double* w,
13216                    lapack_complex_double* work, lapack_int* lwork,
13217                    double* rwork, lapack_int *info );
13218 void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
13219                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
13220                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13221 void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
13222                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
13223                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13224 void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
13225                     lapack_complex_float* a, lapack_int* lda, float* w,
13226                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13227                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13228                     lapack_int *info );
13229 void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
13230                     lapack_complex_double* a, lapack_int* lda, double* w,
13231                     lapack_complex_double* work, lapack_int* lwork,
13232                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13233                     lapack_int* liwork, lapack_int *info );
13234 void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
13235                     float* a, lapack_int* lda, float* vl, float* vu,
13236                     lapack_int* il, lapack_int* iu, float* abstol,
13237                     lapack_int* m, float* w, float* z, lapack_int* ldz,
13238                     float* work, lapack_int* lwork, lapack_int* iwork,
13239                     lapack_int* ifail, lapack_int *info );
13240 void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
13241                     double* a, lapack_int* lda, double* vl, double* vu,
13242                     lapack_int* il, lapack_int* iu, double* abstol,
13243                     lapack_int* m, double* w, double* z, lapack_int* ldz,
13244                     double* work, lapack_int* lwork, lapack_int* iwork,
13245                     lapack_int* ifail, lapack_int *info );
13246 void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
13247                     lapack_complex_float* a, lapack_int* lda, float* vl,
13248                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
13249                     lapack_int* m, float* w, lapack_complex_float* z,
13250                     lapack_int* ldz, lapack_complex_float* work,
13251                     lapack_int* lwork, float* rwork, lapack_int* iwork,
13252                     lapack_int* ifail, lapack_int *info );
13253 void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
13254                     lapack_complex_double* a, lapack_int* lda, double* vl,
13255                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
13256                     lapack_int* m, double* w, lapack_complex_double* z,
13257                     lapack_int* ldz, lapack_complex_double* work,
13258                     lapack_int* lwork, double* rwork, lapack_int* iwork,
13259                     lapack_int* ifail, lapack_int *info );
13260 void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
13261                     float* a, lapack_int* lda, float* vl, float* vu,
13262                     lapack_int* il, lapack_int* iu, float* abstol,
13263                     lapack_int* m, float* w, float* z, lapack_int* ldz,
13264                     lapack_int* isuppz, float* work, lapack_int* lwork,
13265                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13266 void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
13267                     double* a, lapack_int* lda, double* vl, double* vu,
13268                     lapack_int* il, lapack_int* iu, double* abstol,
13269                     lapack_int* m, double* w, double* z, lapack_int* ldz,
13270                     lapack_int* isuppz, double* work, lapack_int* lwork,
13271                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13272 void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
13273                     lapack_complex_float* a, lapack_int* lda, float* vl,
13274                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
13275                     lapack_int* m, float* w, lapack_complex_float* z,
13276                     lapack_int* ldz, lapack_int* isuppz,
13277                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13278                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13279                     lapack_int *info );
13280 void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
13281                     lapack_complex_double* a, lapack_int* lda, double* vl,
13282                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
13283                     lapack_int* m, double* w, lapack_complex_double* z,
13284                     lapack_int* ldz, lapack_int* isuppz,
13285                     lapack_complex_double* work, lapack_int* lwork,
13286                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13287                     lapack_int* liwork, lapack_int *info );
13288 void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
13289                    float* z, lapack_int* ldz, float* work, lapack_int *info );
13290 void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
13291                    double* z, lapack_int* ldz, double* work, lapack_int *info );
13292 void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
13293                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
13294                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
13295                    lapack_int *info );
13296 void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
13297                    lapack_complex_double* ap, double* w,
13298                    lapack_complex_double* z, lapack_int* ldz,
13299                    lapack_complex_double* work, double* rwork,
13300                    lapack_int *info );
13301 void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
13302                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
13303                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13304 void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
13305                     double* w, double* z, lapack_int* ldz, double* work,
13306                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
13307                     lapack_int *info );
13308 void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
13309                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
13310                     lapack_int* ldz, lapack_complex_float* work,
13311                     lapack_int* lwork, float* rwork, lapack_int* lrwork,
13312                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13313 void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
13314                     lapack_complex_double* ap, double* w,
13315                     lapack_complex_double* z, lapack_int* ldz,
13316                     lapack_complex_double* work, lapack_int* lwork,
13317                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13318                     lapack_int* liwork, lapack_int *info );
13319 void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
13320                     float* ap, float* vl, float* vu, lapack_int* il,
13321                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
13322                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
13323                     lapack_int* ifail, lapack_int *info );
13324 void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
13325                     double* ap, double* vl, double* vu, lapack_int* il,
13326                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13327                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
13328                     lapack_int* ifail, lapack_int *info );
13329 void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
13330                     lapack_complex_float* ap, float* vl, float* vu,
13331                     lapack_int* il, lapack_int* iu, float* abstol,
13332                     lapack_int* m, float* w, lapack_complex_float* z,
13333                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
13334                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13335 void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
13336                     lapack_complex_double* ap, double* vl, double* vu,
13337                     lapack_int* il, lapack_int* iu, double* abstol,
13338                     lapack_int* m, double* w, lapack_complex_double* z,
13339                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
13340                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13341 void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13342                    float* ab, lapack_int* ldab, float* w, float* z,
13343                    lapack_int* ldz, float* work, lapack_int *info );
13344 void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13345                    double* ab, lapack_int* ldab, double* w, double* z,
13346                    lapack_int* ldz, double* work, lapack_int *info );
13347 void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13348                    lapack_complex_float* ab, lapack_int* ldab, float* w,
13349                    lapack_complex_float* z, lapack_int* ldz,
13350                    lapack_complex_float* work, float* rwork, lapack_int *info );
13351 void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13352                    lapack_complex_double* ab, lapack_int* ldab, double* w,
13353                    lapack_complex_double* z, lapack_int* ldz,
13354                    lapack_complex_double* work, double* rwork,
13355                    lapack_int *info );
13356 void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13357                     float* ab, lapack_int* ldab, float* w, float* z,
13358                     lapack_int* ldz, float* work, lapack_int* lwork,
13359                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13360 void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13361                     double* ab, lapack_int* ldab, double* w, double* z,
13362                     lapack_int* ldz, double* work, lapack_int* lwork,
13363                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13364 void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13365                     lapack_complex_float* ab, lapack_int* ldab, float* w,
13366                     lapack_complex_float* z, lapack_int* ldz,
13367                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13368                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13369                     lapack_int *info );
13370 void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
13371                     lapack_complex_double* ab, lapack_int* ldab, double* w,
13372                     lapack_complex_double* z, lapack_int* ldz,
13373                     lapack_complex_double* work, lapack_int* lwork,
13374                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13375                     lapack_int* liwork, lapack_int *info );
13376 void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
13377                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
13378                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
13379                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
13380                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
13381                     lapack_int* ifail, lapack_int *info );
13382 void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
13383                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
13384                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
13385                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13386                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
13387                     lapack_int* ifail, lapack_int *info );
13388 void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
13389                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
13390                     lapack_complex_float* q, lapack_int* ldq, float* vl,
13391                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
13392                     lapack_int* m, float* w, lapack_complex_float* z,
13393                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
13394                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13395 void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
13396                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
13397                     lapack_complex_double* q, lapack_int* ldq, double* vl,
13398                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
13399                     lapack_int* m, double* w, lapack_complex_double* z,
13400                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
13401                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13402 void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
13403                    lapack_int* ldz, float* work, lapack_int *info );
13404 void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
13405                    lapack_int* ldz, double* work, lapack_int *info );
13406 void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
13407                     lapack_int* ldz, float* work, lapack_int* lwork,
13408                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13409 void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
13410                     lapack_int* ldz, double* work, lapack_int* lwork,
13411                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13412 void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
13413                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
13414                     float* abstol, lapack_int* m, float* w, float* z,
13415                     lapack_int* ldz, float* work, lapack_int* iwork,
13416                     lapack_int* ifail, lapack_int *info );
13417 void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
13418                     double* e, double* vl, double* vu, lapack_int* il,
13419                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13420                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
13421                     lapack_int* ifail, lapack_int *info );
13422 void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
13423                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
13424                     float* abstol, lapack_int* m, float* w, float* z,
13425                     lapack_int* ldz, lapack_int* isuppz, float* work,
13426                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
13427                     lapack_int *info );
13428 void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
13429                     double* e, double* vl, double* vu, lapack_int* il,
13430                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13431                     double* z, lapack_int* ldz, lapack_int* isuppz,
13432                     double* work, lapack_int* lwork, lapack_int* iwork,
13433                     lapack_int* liwork, lapack_int *info );
13434 void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
13435                    lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
13436                    float* wr, float* wi, float* vs, lapack_int* ldvs,
13437                    float* work, lapack_int* lwork, lapack_logical* bwork,
13438                    lapack_int *info );
13439 void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
13440                    lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
13441                    double* wr, double* wi, double* vs, lapack_int* ldvs,
13442                    double* work, lapack_int* lwork, lapack_logical* bwork,
13443                    lapack_int *info );
13444 void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
13445                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
13446                    lapack_int* sdim, lapack_complex_float* w,
13447                    lapack_complex_float* vs, lapack_int* ldvs,
13448                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13449                    lapack_logical* bwork, lapack_int *info );
13450 void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
13451                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
13452                    lapack_int* sdim, lapack_complex_double* w,
13453                    lapack_complex_double* vs, lapack_int* ldvs,
13454                    lapack_complex_double* work, lapack_int* lwork,
13455                    double* rwork, lapack_logical* bwork, lapack_int *info );
13456 void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
13457                     char* sense, lapack_int* n, float* a, lapack_int* lda,
13458                     lapack_int* sdim, float* wr, float* wi, float* vs,
13459                     lapack_int* ldvs, float* rconde, float* rcondv, float* work,
13460                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
13461                     lapack_logical* bwork, lapack_int *info );
13462 void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
13463                     char* sense, lapack_int* n, double* a, lapack_int* lda,
13464                     lapack_int* sdim, double* wr, double* wi, double* vs,
13465                     lapack_int* ldvs, double* rconde, double* rcondv,
13466                     double* work, lapack_int* lwork, lapack_int* iwork,
13467                     lapack_int* liwork, lapack_logical* bwork,
13468                     lapack_int *info );
13469 void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
13470                     char* sense, lapack_int* n, lapack_complex_float* a,
13471                     lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
13472                     lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
13473                     float* rcondv, lapack_complex_float* work,
13474                     lapack_int* lwork, float* rwork, lapack_logical* bwork,
13475                     lapack_int *info );
13476 void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
13477                     char* sense, lapack_int* n, lapack_complex_double* a,
13478                     lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
13479                     lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
13480                     double* rcondv, lapack_complex_double* work,
13481                     lapack_int* lwork, double* rwork, lapack_logical* bwork,
13482                     lapack_int *info );
13483 void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
13484                    lapack_int* lda, float* wr, float* wi, float* vl,
13485                    lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
13486                    lapack_int* lwork, lapack_int *info );
13487 void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
13488                    lapack_int* lda, double* wr, double* wi, double* vl,
13489                    lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
13490                    lapack_int* lwork, lapack_int *info );
13491 void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
13492                    lapack_complex_float* a, lapack_int* lda,
13493                    lapack_complex_float* w, lapack_complex_float* vl,
13494                    lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
13495                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13496                    lapack_int *info );
13497 void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
13498                    lapack_complex_double* a, lapack_int* lda,
13499                    lapack_complex_double* w, lapack_complex_double* vl,
13500                    lapack_int* ldvl, lapack_complex_double* vr,
13501                    lapack_int* ldvr, lapack_complex_double* work,
13502                    lapack_int* lwork, double* rwork, lapack_int *info );
13503 void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13504                     lapack_int* n, float* a, lapack_int* lda, float* wr,
13505                     float* wi, float* vl, lapack_int* ldvl, float* vr,
13506                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
13507                     float* scale, float* abnrm, float* rconde, float* rcondv,
13508                     float* work, lapack_int* lwork, lapack_int* iwork,
13509                     lapack_int *info );
13510 void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13511                     lapack_int* n, double* a, lapack_int* lda, double* wr,
13512                     double* wi, double* vl, lapack_int* ldvl, double* vr,
13513                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
13514                     double* scale, double* abnrm, double* rconde,
13515                     double* rcondv, double* work, lapack_int* lwork,
13516                     lapack_int* iwork, lapack_int *info );
13517 void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13518                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
13519                     lapack_complex_float* w, lapack_complex_float* vl,
13520                     lapack_int* ldvl, lapack_complex_float* vr,
13521                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
13522                     float* scale, float* abnrm, float* rconde, float* rcondv,
13523                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13524                     lapack_int *info );
13525 void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13526                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
13527                     lapack_complex_double* w, lapack_complex_double* vl,
13528                     lapack_int* ldvl, lapack_complex_double* vr,
13529                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
13530                     double* scale, double* abnrm, double* rconde,
13531                     double* rcondv, lapack_complex_double* work,
13532                     lapack_int* lwork, double* rwork, lapack_int *info );
13533 void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
13534                     float* a, lapack_int* lda, float* s, float* u,
13535                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
13536                     lapack_int* lwork, lapack_int *info );
13537 void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
13538                     double* a, lapack_int* lda, double* s, double* u,
13539                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
13540                     lapack_int* lwork, lapack_int *info );
13541 void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
13542                     lapack_complex_float* a, lapack_int* lda, float* s,
13543                     lapack_complex_float* u, lapack_int* ldu,
13544                     lapack_complex_float* vt, lapack_int* ldvt,
13545                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13546                     lapack_int *info );
13547 void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
13548                     lapack_complex_double* a, lapack_int* lda, double* s,
13549                     lapack_complex_double* u, lapack_int* ldu,
13550                     lapack_complex_double* vt, lapack_int* ldvt,
13551                     lapack_complex_double* work, lapack_int* lwork,
13552                     double* rwork, lapack_int *info );
13553 void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
13554                     lapack_int* lda, float* s, float* u, lapack_int* ldu,
13555                     float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
13556                     lapack_int* iwork, lapack_int *info );
13557 void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
13558                     lapack_int* lda, double* s, double* u, lapack_int* ldu,
13559                     double* vt, lapack_int* ldvt, double* work,
13560                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
13561 void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
13562                     lapack_complex_float* a, lapack_int* lda, float* s,
13563                     lapack_complex_float* u, lapack_int* ldu,
13564                     lapack_complex_float* vt, lapack_int* ldvt,
13565                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13566                     lapack_int* iwork, lapack_int *info );
13567 void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
13568                     lapack_complex_double* a, lapack_int* lda, double* s,
13569                     lapack_complex_double* u, lapack_int* ldu,
13570                     lapack_complex_double* vt, lapack_int* ldvt,
13571                     lapack_complex_double* work, lapack_int* lwork,
13572                     double* rwork, lapack_int* iwork, lapack_int *info );
13573 void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
13574                     char* jobp, lapack_int* m, lapack_int* n, double* a,
13575                     lapack_int* lda, double* sva, double* u, lapack_int* ldu,
13576                     double* v, lapack_int* ldv, double* work, lapack_int* lwork,
13577                     lapack_int* iwork, lapack_int *info );
13578 void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
13579                     char* jobp, lapack_int* m, lapack_int* n, float* a,
13580                     lapack_int* lda, float* sva, float* u, lapack_int* ldu,
13581                     float* v, lapack_int* ldv, float* work, lapack_int* lwork,
13582                     lapack_int* iwork, lapack_int *info );
13583 void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
13584                     lapack_int* n, double* a, lapack_int* lda, double* sva,
13585                     lapack_int* mv, double* v, lapack_int* ldv, double* work,
13586                     lapack_int* lwork, lapack_int *info );
13587 void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
13588                     lapack_int* n, float* a, lapack_int* lda, float* sva,
13589                     lapack_int* mv, float* v, lapack_int* ldv, float* work,
13590                     lapack_int* lwork, lapack_int *info );
13591 void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
13592                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
13593                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
13594                     float* alpha, float* beta, float* u, lapack_int* ldu,
13595                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
13596                     float* work, lapack_int* iwork, lapack_int *info );
13597 void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
13598                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
13599                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
13600                     double* alpha, double* beta, double* u, lapack_int* ldu,
13601                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
13602                     double* work, lapack_int* iwork, lapack_int *info );
13603 void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
13604                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
13605                     lapack_complex_float* a, lapack_int* lda,
13606                     lapack_complex_float* b, lapack_int* ldb, float* alpha,
13607                     float* beta, lapack_complex_float* u, lapack_int* ldu,
13608                     lapack_complex_float* v, lapack_int* ldv,
13609                     lapack_complex_float* q, lapack_int* ldq,
13610                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
13611                     lapack_int *info );
13612 void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
13613                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
13614                     lapack_complex_double* a, lapack_int* lda,
13615                     lapack_complex_double* b, lapack_int* ldb, double* alpha,
13616                     double* beta, lapack_complex_double* u, lapack_int* ldu,
13617                     lapack_complex_double* v, lapack_int* ldv,
13618                     lapack_complex_double* q, lapack_int* ldq,
13619                     lapack_complex_double* work, double* rwork,
13620                     lapack_int* iwork, lapack_int *info );
13621 void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13622                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
13623                    float* w, float* work, lapack_int* lwork, lapack_int *info );
13624 void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13625                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
13626                    double* w, double* work, lapack_int* lwork,
13627                    lapack_int *info );
13628 void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13629                    lapack_complex_float* a, lapack_int* lda,
13630                    lapack_complex_float* b, lapack_int* ldb, float* w,
13631                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13632                    lapack_int *info );
13633 void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13634                    lapack_complex_double* a, lapack_int* lda,
13635                    lapack_complex_double* b, lapack_int* ldb, double* w,
13636                    lapack_complex_double* work, lapack_int* lwork,
13637                    double* rwork, lapack_int *info );
13638 void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13639                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
13640                     float* w, float* work, lapack_int* lwork, lapack_int* iwork,
13641                     lapack_int* liwork, lapack_int *info );
13642 void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13643                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
13644                     double* w, double* work, lapack_int* lwork,
13645                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13646 void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13647                     lapack_complex_float* a, lapack_int* lda,
13648                     lapack_complex_float* b, lapack_int* ldb, float* w,
13649                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13650                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13651                     lapack_int *info );
13652 void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13653                     lapack_complex_double* a, lapack_int* lda,
13654                     lapack_complex_double* b, lapack_int* ldb, double* w,
13655                     lapack_complex_double* work, lapack_int* lwork,
13656                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13657                     lapack_int* liwork, lapack_int *info );
13658 void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13659                     lapack_int* n, float* a, lapack_int* lda, float* b,
13660                     lapack_int* ldb, float* vl, float* vu, lapack_int* il,
13661                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
13662                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
13663                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13664 void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13665                     lapack_int* n, double* a, lapack_int* lda, double* b,
13666                     lapack_int* ldb, double* vl, double* vu, lapack_int* il,
13667                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13668                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
13669                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13670 void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13671                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
13672                     lapack_complex_float* b, lapack_int* ldb, float* vl,
13673                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
13674                     lapack_int* m, float* w, lapack_complex_float* z,
13675                     lapack_int* ldz, lapack_complex_float* work,
13676                     lapack_int* lwork, float* rwork, lapack_int* iwork,
13677                     lapack_int* ifail, lapack_int *info );
13678 void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13679                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
13680                     lapack_complex_double* b, lapack_int* ldb, double* vl,
13681                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
13682                     lapack_int* m, double* w, lapack_complex_double* z,
13683                     lapack_int* ldz, lapack_complex_double* work,
13684                     lapack_int* lwork, double* rwork, lapack_int* iwork,
13685                     lapack_int* ifail, lapack_int *info );
13686 void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13687                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
13688                    float* work, lapack_int *info );
13689 void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13690                    double* ap, double* bp, double* w, double* z,
13691                    lapack_int* ldz, double* work, lapack_int *info );
13692 void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13693                    lapack_complex_float* ap, lapack_complex_float* bp, float* w,
13694                    lapack_complex_float* z, lapack_int* ldz,
13695                    lapack_complex_float* work, float* rwork, lapack_int *info );
13696 void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13697                    lapack_complex_double* ap, lapack_complex_double* bp,
13698                    double* w, lapack_complex_double* z, lapack_int* ldz,
13699                    lapack_complex_double* work, double* rwork,
13700                    lapack_int *info );
13701 void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13702                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
13703                     float* work, lapack_int* lwork, lapack_int* iwork,
13704                     lapack_int* liwork, lapack_int *info );
13705 void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13706                     double* ap, double* bp, double* w, double* z,
13707                     lapack_int* ldz, double* work, lapack_int* lwork,
13708                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
13709 void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13710                     lapack_complex_float* ap, lapack_complex_float* bp,
13711                     float* w, lapack_complex_float* z, lapack_int* ldz,
13712                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13713                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13714                     lapack_int *info );
13715 void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
13716                     lapack_complex_double* ap, lapack_complex_double* bp,
13717                     double* w, lapack_complex_double* z, lapack_int* ldz,
13718                     lapack_complex_double* work, lapack_int* lwork,
13719                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13720                     lapack_int* liwork, lapack_int *info );
13721 void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13722                     lapack_int* n, float* ap, float* bp, float* vl, float* vu,
13723                     lapack_int* il, lapack_int* iu, float* abstol,
13724                     lapack_int* m, float* w, float* z, lapack_int* ldz,
13725                     float* work, lapack_int* iwork, lapack_int* ifail,
13726                     lapack_int *info );
13727 void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13728                     lapack_int* n, double* ap, double* bp, double* vl,
13729                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
13730                     lapack_int* m, double* w, double* z, lapack_int* ldz,
13731                     double* work, lapack_int* iwork, lapack_int* ifail,
13732                     lapack_int *info );
13733 void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13734                     lapack_int* n, lapack_complex_float* ap,
13735                     lapack_complex_float* bp, float* vl, float* vu,
13736                     lapack_int* il, lapack_int* iu, float* abstol,
13737                     lapack_int* m, float* w, lapack_complex_float* z,
13738                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
13739                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13740 void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
13741                     lapack_int* n, lapack_complex_double* ap,
13742                     lapack_complex_double* bp, double* vl, double* vu,
13743                     lapack_int* il, lapack_int* iu, double* abstol,
13744                     lapack_int* m, double* w, lapack_complex_double* z,
13745                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
13746                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13747 void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13748                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
13749                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
13750                    float* work, lapack_int *info );
13751 void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13752                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
13753                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
13754                    double* work, lapack_int *info );
13755 void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13756                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
13757                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
13758                    lapack_complex_float* z, lapack_int* ldz,
13759                    lapack_complex_float* work, float* rwork, lapack_int *info );
13760 void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13761                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
13762                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
13763                    lapack_complex_double* z, lapack_int* ldz,
13764                    lapack_complex_double* work, double* rwork,
13765                    lapack_int *info );
13766 void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13767                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
13768                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
13769                     float* work, lapack_int* lwork, lapack_int* iwork,
13770                     lapack_int* liwork, lapack_int *info );
13771 void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13772                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
13773                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
13774                     double* work, lapack_int* lwork, lapack_int* iwork,
13775                     lapack_int* liwork, lapack_int *info );
13776 void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13777                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
13778                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
13779                     lapack_complex_float* z, lapack_int* ldz,
13780                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13781                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
13782                     lapack_int *info );
13783 void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
13784                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
13785                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
13786                     lapack_complex_double* z, lapack_int* ldz,
13787                     lapack_complex_double* work, lapack_int* lwork,
13788                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
13789                     lapack_int* liwork, lapack_int *info );
13790 void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
13791                     lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
13792                     float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
13793                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
13794                     float* abstol, lapack_int* m, float* w, float* z,
13795                     lapack_int* ldz, float* work, lapack_int* iwork,
13796                     lapack_int* ifail, lapack_int *info );
13797 void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
13798                     lapack_int* ka, lapack_int* kb, double* ab,
13799                     lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
13800                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
13801                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
13802                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
13803                     lapack_int* ifail, lapack_int *info );
13804 void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
13805                     lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
13806                     lapack_int* ldab, lapack_complex_float* bb,
13807                     lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
13808                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
13809                     float* abstol, lapack_int* m, float* w,
13810                     lapack_complex_float* z, lapack_int* ldz,
13811                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
13812                     lapack_int* ifail, lapack_int *info );
13813 void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
13814                     lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
13815                     lapack_int* ldab, lapack_complex_double* bb,
13816                     lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
13817                     double* vl, double* vu, lapack_int* il, lapack_int* iu,
13818                     double* abstol, lapack_int* m, double* w,
13819                     lapack_complex_double* z, lapack_int* ldz,
13820                     lapack_complex_double* work, double* rwork,
13821                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
13822 void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
13823                    LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
13824                    lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
13825                    float* alphar, float* alphai, float* beta, float* vsl,
13826                    lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
13827                    float* work, lapack_int* lwork, lapack_logical* bwork,
13828                    lapack_int *info );
13829 void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
13830                    LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
13831                    lapack_int* lda, double* b, lapack_int* ldb,
13832                    lapack_int* sdim, double* alphar, double* alphai,
13833                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
13834                    lapack_int* ldvsr, double* work, lapack_int* lwork,
13835                    lapack_logical* bwork, lapack_int *info );
13836 void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
13837                    LAPACK_C_SELECT2 selctg, lapack_int* n,
13838                    lapack_complex_float* a, lapack_int* lda,
13839                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
13840                    lapack_complex_float* alpha, lapack_complex_float* beta,
13841                    lapack_complex_float* vsl, lapack_int* ldvsl,
13842                    lapack_complex_float* vsr, lapack_int* ldvsr,
13843                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13844                    lapack_logical* bwork, lapack_int *info );
13845 void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
13846                    LAPACK_Z_SELECT2 selctg, lapack_int* n,
13847                    lapack_complex_double* a, lapack_int* lda,
13848                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
13849                    lapack_complex_double* alpha, lapack_complex_double* beta,
13850                    lapack_complex_double* vsl, lapack_int* ldvsl,
13851                    lapack_complex_double* vsr, lapack_int* ldvsr,
13852                    lapack_complex_double* work, lapack_int* lwork,
13853                    double* rwork, lapack_logical* bwork, lapack_int *info );
13854 void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
13855                     LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
13856                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
13857                     lapack_int* sdim, float* alphar, float* alphai, float* beta,
13858                     float* vsl, lapack_int* ldvsl, float* vsr,
13859                     lapack_int* ldvsr, float* rconde, float* rcondv,
13860                     float* work, lapack_int* lwork, lapack_int* iwork,
13861                     lapack_int* liwork, lapack_logical* bwork,
13862                     lapack_int *info );
13863 void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
13864                     LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
13865                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
13866                     lapack_int* sdim, double* alphar, double* alphai,
13867                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
13868                     lapack_int* ldvsr, double* rconde, double* rcondv,
13869                     double* work, lapack_int* lwork, lapack_int* iwork,
13870                     lapack_int* liwork, lapack_logical* bwork,
13871                     lapack_int *info );
13872 void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
13873                     LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
13874                     lapack_complex_float* a, lapack_int* lda,
13875                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
13876                     lapack_complex_float* alpha, lapack_complex_float* beta,
13877                     lapack_complex_float* vsl, lapack_int* ldvsl,
13878                     lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
13879                     float* rcondv, lapack_complex_float* work,
13880                     lapack_int* lwork, float* rwork, lapack_int* iwork,
13881                     lapack_int* liwork, lapack_logical* bwork,
13882                     lapack_int *info );
13883 void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
13884                     LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
13885                     lapack_complex_double* a, lapack_int* lda,
13886                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
13887                     lapack_complex_double* alpha, lapack_complex_double* beta,
13888                     lapack_complex_double* vsl, lapack_int* ldvsl,
13889                     lapack_complex_double* vsr, lapack_int* ldvsr,
13890                     double* rconde, double* rcondv, lapack_complex_double* work,
13891                     lapack_int* lwork, double* rwork, lapack_int* iwork,
13892                     lapack_int* liwork, lapack_logical* bwork,
13893                     lapack_int *info );
13894 void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
13895                    lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
13896                    float* alphai, float* beta, float* vl, lapack_int* ldvl,
13897                    float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
13898                    lapack_int *info );
13899 void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
13900                    lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
13901                    double* alphai, double* beta, double* vl, lapack_int* ldvl,
13902                    double* vr, lapack_int* ldvr, double* work,
13903                    lapack_int* lwork, lapack_int *info );
13904 void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
13905                    lapack_complex_float* a, lapack_int* lda,
13906                    lapack_complex_float* b, lapack_int* ldb,
13907                    lapack_complex_float* alpha, lapack_complex_float* beta,
13908                    lapack_complex_float* vl, lapack_int* ldvl,
13909                    lapack_complex_float* vr, lapack_int* ldvr,
13910                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
13911                    lapack_int *info );
13912 void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
13913                    lapack_complex_double* a, lapack_int* lda,
13914                    lapack_complex_double* b, lapack_int* ldb,
13915                    lapack_complex_double* alpha, lapack_complex_double* beta,
13916                    lapack_complex_double* vl, lapack_int* ldvl,
13917                    lapack_complex_double* vr, lapack_int* ldvr,
13918                    lapack_complex_double* work, lapack_int* lwork,
13919                    double* rwork, lapack_int *info );
13920 void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13921                     lapack_int* n, float* a, lapack_int* lda, float* b,
13922                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
13923                     float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
13924                     lapack_int* ilo, lapack_int* ihi, float* lscale,
13925                     float* rscale, float* abnrm, float* bbnrm, float* rconde,
13926                     float* rcondv, float* work, lapack_int* lwork,
13927                     lapack_int* iwork, lapack_logical* bwork,
13928                     lapack_int *info );
13929 void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13930                     lapack_int* n, double* a, lapack_int* lda, double* b,
13931                     lapack_int* ldb, double* alphar, double* alphai,
13932                     double* beta, double* vl, lapack_int* ldvl, double* vr,
13933                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
13934                     double* lscale, double* rscale, double* abnrm,
13935                     double* bbnrm, double* rconde, double* rcondv, double* work,
13936                     lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
13937                     lapack_int *info );
13938 void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13939                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
13940                     lapack_complex_float* b, lapack_int* ldb,
13941                     lapack_complex_float* alpha, lapack_complex_float* beta,
13942                     lapack_complex_float* vl, lapack_int* ldvl,
13943                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
13944                     lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
13945                     float* bbnrm, float* rconde, float* rcondv,
13946                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13947                     lapack_int* iwork, lapack_logical* bwork,
13948                     lapack_int *info );
13949 void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
13950                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
13951                     lapack_complex_double* b, lapack_int* ldb,
13952                     lapack_complex_double* alpha, lapack_complex_double* beta,
13953                     lapack_complex_double* vl, lapack_int* ldvl,
13954                     lapack_complex_double* vr, lapack_int* ldvr,
13955                     lapack_int* ilo, lapack_int* ihi, double* lscale,
13956                     double* rscale, double* abnrm, double* bbnrm,
13957                     double* rconde, double* rcondv, lapack_complex_double* work,
13958                     lapack_int* lwork, double* rwork, lapack_int* iwork,
13959                     lapack_logical* bwork, lapack_int *info );
13960 void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
13961                    lapack_int* k, double* alpha, const double* a,
13962                    lapack_int* lda, double* beta, double* c );
13963 void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
13964                    lapack_int* k, float* alpha, const float* a, lapack_int* lda,
13965                    float* beta, float* c );
13966 void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
13967                    lapack_int* k, double* alpha, const lapack_complex_double* a,
13968                    lapack_int* lda, double* beta, lapack_complex_double* c );
13969 void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
13970                    lapack_int* k, float* alpha, const lapack_complex_float* a,
13971                    lapack_int* lda, float* beta, lapack_complex_float* c );
13972 void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
13973                    char* diag, lapack_int* m, lapack_int* n, double* alpha,
13974                    const double* a, double* b, lapack_int* ldb );
13975 void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
13976                    char* diag, lapack_int* m, lapack_int* n, float* alpha,
13977                    const float* a, float* b, lapack_int* ldb );
13978 void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
13979                    char* diag, lapack_int* m, lapack_int* n,
13980                    lapack_complex_double* alpha, const lapack_complex_double* a,
13981                    lapack_complex_double* b, lapack_int* ldb );
13982 void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
13983                    char* diag, lapack_int* m, lapack_int* n,
13984                    lapack_complex_float* alpha, const lapack_complex_float* a,
13985                    lapack_complex_float* b, lapack_int* ldb );
13986 void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
13987                     double* ap, lapack_int *info );
13988 void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
13989                     float* ap, lapack_int *info );
13990 void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
13991                     const lapack_complex_double* arf, lapack_complex_double* ap,
13992                     lapack_int *info );
13993 void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
13994                     const lapack_complex_float* arf, lapack_complex_float* ap,
13995                     lapack_int *info );
13996 void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
13997                     double* a, lapack_int* lda, lapack_int *info );
13998 void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
13999                     float* a, lapack_int* lda, lapack_int *info );
14000 void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
14001                     const lapack_complex_double* arf, lapack_complex_double* a,
14002                     lapack_int* lda, lapack_int *info );
14003 void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
14004                     const lapack_complex_float* arf, lapack_complex_float* a,
14005                     lapack_int* lda, lapack_int *info );
14006 void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
14007                     double* arf, lapack_int *info );
14008 void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
14009                     float* arf, lapack_int *info );
14010 void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
14011                     const lapack_complex_double* ap, lapack_complex_double* arf,
14012                     lapack_int *info );
14013 void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
14014                     const lapack_complex_float* ap, lapack_complex_float* arf,
14015                     lapack_int *info );
14016 void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
14017                     lapack_int* lda, lapack_int *info );
14018 void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
14019                     lapack_int* lda, lapack_int *info );
14020 void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14021                     lapack_complex_double* a, lapack_int* lda,
14022                     lapack_int *info );
14023 void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14024                     lapack_complex_float* a, lapack_int* lda,
14025                     lapack_int *info );
14026 void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
14027                     lapack_int* lda, double* arf, lapack_int *info );
14028 void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
14029                     lapack_int* lda, float* arf, lapack_int *info );
14030 void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
14031                     const lapack_complex_double* a, lapack_int* lda,
14032                     lapack_complex_double* arf, lapack_int *info );
14033 void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
14034                     const lapack_complex_float* a, lapack_int* lda,
14035                     lapack_complex_float* arf, lapack_int *info );
14036 void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
14037                     double* ap, lapack_int *info );
14038 void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14039                     float* ap, lapack_int *info );
14040 void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
14041                     lapack_int* lda, lapack_complex_double* ap,
14042                     lapack_int *info );
14043 void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
14044                     lapack_int* lda, lapack_complex_float* ap,
14045                     lapack_int *info );
14046 void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14047                      float* tau, float* work, lapack_int* lwork,
14048                      lapack_int *info );
14049 void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14050                      double* tau, double* work, lapack_int* lwork,
14051                      lapack_int *info );
14052 void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14053                      lapack_int* lda, lapack_complex_float* tau,
14054                      lapack_complex_float* work, lapack_int* lwork,
14055                      lapack_int *info );
14056 void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14057                      lapack_int* lda, lapack_complex_double* tau,
14058                      lapack_complex_double* work, lapack_int* lwork,
14059                      lapack_int *info );
14060 
14061 #ifdef __cplusplus
14062 }
14063 #endif /* __cplusplus */
14064 
14065 #endif /* _LAPACKE_H_ */

swiftnav
Author(s):
autogenerated on Sat Jun 8 2019 18:55:51