Eigen  3.3.3
lapacke.h
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 November, 2011
00032 *****************************************************************************/
00033 
00034 #ifndef _MKL_LAPACKE_H_
00035 
00036 #ifndef _LAPACKE_H_
00037 #define _LAPACKE_H_
00038 
00039 /*
00040 *  Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
00041 */
00042 #ifdef HAVE_LAPACK_CONFIG_H
00043 #include "lapacke_config.h"
00044 #endif
00045 
00046 #ifdef __cplusplus
00047 extern "C" {
00048 #endif /* __cplusplus */
00049 
00050 #include <stdlib.h>
00051 
00052 #ifndef lapack_int
00053 #define lapack_int     int
00054 #endif
00055 
00056 #ifndef lapack_logical
00057 #define lapack_logical lapack_int
00058 #endif
00059 
00060 /* Complex types are structures equivalent to the
00061 * Fortran complex types COMPLEX(4) and COMPLEX(8).
00062 *
00063 * One can also redefine the types with his own types
00064 * for example by including in the code definitions like
00065 *
00066 * #define lapack_complex_float std::complex<float>
00067 * #define lapack_complex_double std::complex<double>
00068 *
00069 * or define these types in the command line:
00070 *
00071 * -Dlapack_complex_float="std::complex<float>"
00072 * -Dlapack_complex_double="std::complex<double>"
00073 */
00074 
00075 #ifndef LAPACK_COMPLEX_CUSTOM
00076 
00077 /* Complex type (single precision) */
00078 #ifndef lapack_complex_float
00079 #include <complex.h>
00080 #define lapack_complex_float    float _Complex
00081 #endif
00082 
00083 #ifndef lapack_complex_float_real
00084 #define lapack_complex_float_real(z)       (creal(z))
00085 #endif
00086 
00087 #ifndef lapack_complex_float_imag
00088 #define lapack_complex_float_imag(z)       (cimag(z))
00089 #endif
00090 
00091 lapack_complex_float lapack_make_complex_float( float re, float im );
00092 
00093 /* Complex type (double precision) */
00094 #ifndef lapack_complex_double
00095 #include <complex.h>
00096 #define lapack_complex_double   double _Complex
00097 #endif
00098 
00099 #ifndef lapack_complex_double_real
00100 #define lapack_complex_double_real(z)      (creal(z))
00101 #endif
00102 
00103 #ifndef lapack_complex_double_imag
00104 #define lapack_complex_double_imag(z)       (cimag(z))
00105 #endif
00106 
00107 lapack_complex_double lapack_make_complex_double( double re, double im );
00108 
00109 #endif
00110 
00111 #ifndef LAPACKE_malloc
00112 #define LAPACKE_malloc( size ) malloc( size )
00113 #endif
00114 #ifndef LAPACKE_free
00115 #define LAPACKE_free( p )      free( p )
00116 #endif
00117 
00118 #define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
00119 #define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
00120 
00121 #define LAPACK_ROW_MAJOR               101
00122 #define LAPACK_COL_MAJOR               102
00123 
00124 #define LAPACK_WORK_MEMORY_ERROR       -1010
00125 #define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
00126 
00127 /* Callback logical functions of one, two, or three arguments are used
00128 *  to select eigenvalues to sort to the top left of the Schur form.
00129 *  The value is selected if function returns TRUE (non-zero). */
00130 
00131 typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
00132 typedef lapack_logical (*LAPACK_S_SELECT3)
00133     ( const float*, const float*, const float* );
00134 typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
00135 typedef lapack_logical (*LAPACK_D_SELECT3)
00136     ( const double*, const double*, const double* );
00137 
00138 typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
00139 typedef lapack_logical (*LAPACK_C_SELECT2)
00140     ( const lapack_complex_float*, const lapack_complex_float* );
00141 typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
00142 typedef lapack_logical (*LAPACK_Z_SELECT2)
00143     ( const lapack_complex_double*, const lapack_complex_double* );
00144 
00145 #include "lapacke_mangling.h"
00146 
00147 #define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
00148 lapack_logical LAPACK_lsame( char* ca,  char* cb,
00149                               lapack_int lca, lapack_int lcb );
00150 
00151 /* C-LAPACK function prototypes */
00152 
00153 lapack_int LAPACKE_sbdsdc( int matrix_order, char uplo, char compq,
00154                            lapack_int n, float* d, float* e, float* u,
00155                            lapack_int ldu, float* vt, lapack_int ldvt, float* q,
00156                            lapack_int* iq );
00157 lapack_int LAPACKE_dbdsdc( int matrix_order, char uplo, char compq,
00158                            lapack_int n, double* d, double* e, double* u,
00159                            lapack_int ldu, double* vt, lapack_int ldvt,
00160                            double* q, lapack_int* iq );
00161 
00162 lapack_int LAPACKE_sbdsqr( int matrix_order, char uplo, lapack_int n,
00163                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00164                            float* d, float* e, float* vt, lapack_int ldvt,
00165                            float* u, lapack_int ldu, float* c, lapack_int ldc );
00166 lapack_int LAPACKE_dbdsqr( int matrix_order, char uplo, lapack_int n,
00167                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00168                            double* d, double* e, double* vt, lapack_int ldvt,
00169                            double* u, lapack_int ldu, double* c,
00170                            lapack_int ldc );
00171 lapack_int LAPACKE_cbdsqr( int matrix_order, char uplo, lapack_int n,
00172                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00173                            float* d, float* e, lapack_complex_float* vt,
00174                            lapack_int ldvt, lapack_complex_float* u,
00175                            lapack_int ldu, lapack_complex_float* c,
00176                            lapack_int ldc );
00177 lapack_int LAPACKE_zbdsqr( int matrix_order, char uplo, lapack_int n,
00178                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
00179                            double* d, double* e, lapack_complex_double* vt,
00180                            lapack_int ldvt, lapack_complex_double* u,
00181                            lapack_int ldu, lapack_complex_double* c,
00182                            lapack_int ldc );
00183 
00184 lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
00185                            float* sep );
00186 lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
00187                            const double* d, double* sep );
00188 
00189 lapack_int LAPACKE_sgbbrd( int matrix_order, char vect, lapack_int m,
00190                            lapack_int n, lapack_int ncc, lapack_int kl,
00191                            lapack_int ku, float* ab, lapack_int ldab, float* d,
00192                            float* e, float* q, lapack_int ldq, float* pt,
00193                            lapack_int ldpt, float* c, lapack_int ldc );
00194 lapack_int LAPACKE_dgbbrd( int matrix_order, char vect, lapack_int m,
00195                            lapack_int n, lapack_int ncc, lapack_int kl,
00196                            lapack_int ku, double* ab, lapack_int ldab,
00197                            double* d, double* e, double* q, lapack_int ldq,
00198                            double* pt, lapack_int ldpt, double* c,
00199                            lapack_int ldc );
00200 lapack_int LAPACKE_cgbbrd( int matrix_order, char vect, lapack_int m,
00201                            lapack_int n, lapack_int ncc, lapack_int kl,
00202                            lapack_int ku, lapack_complex_float* ab,
00203                            lapack_int ldab, float* d, float* e,
00204                            lapack_complex_float* q, lapack_int ldq,
00205                            lapack_complex_float* pt, lapack_int ldpt,
00206                            lapack_complex_float* c, lapack_int ldc );
00207 lapack_int LAPACKE_zgbbrd( int matrix_order, char vect, lapack_int m,
00208                            lapack_int n, lapack_int ncc, lapack_int kl,
00209                            lapack_int ku, lapack_complex_double* ab,
00210                            lapack_int ldab, double* d, double* e,
00211                            lapack_complex_double* q, lapack_int ldq,
00212                            lapack_complex_double* pt, lapack_int ldpt,
00213                            lapack_complex_double* c, lapack_int ldc );
00214 
00215 lapack_int LAPACKE_sgbcon( int matrix_order, char norm, lapack_int n,
00216                            lapack_int kl, lapack_int ku, const float* ab,
00217                            lapack_int ldab, const lapack_int* ipiv, float anorm,
00218                            float* rcond );
00219 lapack_int LAPACKE_dgbcon( int matrix_order, char norm, lapack_int n,
00220                            lapack_int kl, lapack_int ku, const double* ab,
00221                            lapack_int ldab, const lapack_int* ipiv,
00222                            double anorm, double* rcond );
00223 lapack_int LAPACKE_cgbcon( int matrix_order, char norm, lapack_int n,
00224                            lapack_int kl, lapack_int ku,
00225                            const lapack_complex_float* ab, lapack_int ldab,
00226                            const lapack_int* ipiv, float anorm, float* rcond );
00227 lapack_int LAPACKE_zgbcon( int matrix_order, char norm, lapack_int n,
00228                            lapack_int kl, lapack_int ku,
00229                            const lapack_complex_double* ab, lapack_int ldab,
00230                            const lapack_int* ipiv, double anorm,
00231                            double* rcond );
00232 
00233 lapack_int LAPACKE_sgbequ( int matrix_order, lapack_int m, lapack_int n,
00234                            lapack_int kl, lapack_int ku, const float* ab,
00235                            lapack_int ldab, float* r, float* c, float* rowcnd,
00236                            float* colcnd, float* amax );
00237 lapack_int LAPACKE_dgbequ( int matrix_order, lapack_int m, lapack_int n,
00238                            lapack_int kl, lapack_int ku, const double* ab,
00239                            lapack_int ldab, double* r, double* c,
00240                            double* rowcnd, double* colcnd, double* amax );
00241 lapack_int LAPACKE_cgbequ( int matrix_order, lapack_int m, lapack_int n,
00242                            lapack_int kl, lapack_int ku,
00243                            const lapack_complex_float* ab, lapack_int ldab,
00244                            float* r, float* c, float* rowcnd, float* colcnd,
00245                            float* amax );
00246 lapack_int LAPACKE_zgbequ( int matrix_order, lapack_int m, lapack_int n,
00247                            lapack_int kl, lapack_int ku,
00248                            const lapack_complex_double* ab, lapack_int ldab,
00249                            double* r, double* c, double* rowcnd, double* colcnd,
00250                            double* amax );
00251 
00252 lapack_int LAPACKE_sgbequb( int matrix_order, lapack_int m, lapack_int n,
00253                             lapack_int kl, lapack_int ku, const float* ab,
00254                             lapack_int ldab, float* r, float* c, float* rowcnd,
00255                             float* colcnd, float* amax );
00256 lapack_int LAPACKE_dgbequb( int matrix_order, lapack_int m, lapack_int n,
00257                             lapack_int kl, lapack_int ku, const double* ab,
00258                             lapack_int ldab, double* r, double* c,
00259                             double* rowcnd, double* colcnd, double* amax );
00260 lapack_int LAPACKE_cgbequb( int matrix_order, lapack_int m, lapack_int n,
00261                             lapack_int kl, lapack_int ku,
00262                             const lapack_complex_float* ab, lapack_int ldab,
00263                             float* r, float* c, float* rowcnd, float* colcnd,
00264                             float* amax );
00265 lapack_int LAPACKE_zgbequb( int matrix_order, lapack_int m, lapack_int n,
00266                             lapack_int kl, lapack_int ku,
00267                             const lapack_complex_double* ab, lapack_int ldab,
00268                             double* r, double* c, double* rowcnd,
00269                             double* colcnd, double* amax );
00270 
00271 lapack_int LAPACKE_sgbrfs( int matrix_order, char trans, lapack_int n,
00272                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00273                            const float* ab, lapack_int ldab, const float* afb,
00274                            lapack_int ldafb, const lapack_int* ipiv,
00275                            const float* b, lapack_int ldb, float* x,
00276                            lapack_int ldx, float* ferr, float* berr );
00277 lapack_int LAPACKE_dgbrfs( int matrix_order, char trans, lapack_int n,
00278                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00279                            const double* ab, lapack_int ldab, const double* afb,
00280                            lapack_int ldafb, const lapack_int* ipiv,
00281                            const double* b, lapack_int ldb, double* x,
00282                            lapack_int ldx, double* ferr, double* berr );
00283 lapack_int LAPACKE_cgbrfs( int matrix_order, char trans, lapack_int n,
00284                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00285                            const lapack_complex_float* ab, lapack_int ldab,
00286                            const lapack_complex_float* afb, lapack_int ldafb,
00287                            const lapack_int* ipiv,
00288                            const lapack_complex_float* b, lapack_int ldb,
00289                            lapack_complex_float* x, lapack_int ldx, float* ferr,
00290                            float* berr );
00291 lapack_int LAPACKE_zgbrfs( int matrix_order, char trans, lapack_int n,
00292                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00293                            const lapack_complex_double* ab, lapack_int ldab,
00294                            const lapack_complex_double* afb, lapack_int ldafb,
00295                            const lapack_int* ipiv,
00296                            const lapack_complex_double* b, lapack_int ldb,
00297                            lapack_complex_double* x, lapack_int ldx,
00298                            double* ferr, double* berr );
00299 
00300 lapack_int LAPACKE_sgbrfsx( int matrix_order, char trans, char equed,
00301                             lapack_int n, lapack_int kl, lapack_int ku,
00302                             lapack_int nrhs, const float* ab, lapack_int ldab,
00303                             const float* afb, lapack_int ldafb,
00304                             const lapack_int* ipiv, const float* r,
00305                             const float* c, const float* b, lapack_int ldb,
00306                             float* x, lapack_int ldx, float* rcond, float* berr,
00307                             lapack_int n_err_bnds, float* err_bnds_norm,
00308                             float* err_bnds_comp, lapack_int nparams,
00309                             float* params );
00310 lapack_int LAPACKE_dgbrfsx( int matrix_order, char trans, char equed,
00311                             lapack_int n, lapack_int kl, lapack_int ku,
00312                             lapack_int nrhs, const double* ab, lapack_int ldab,
00313                             const double* afb, lapack_int ldafb,
00314                             const lapack_int* ipiv, const double* r,
00315                             const double* c, const double* b, lapack_int ldb,
00316                             double* x, lapack_int ldx, double* rcond,
00317                             double* berr, lapack_int n_err_bnds,
00318                             double* err_bnds_norm, double* err_bnds_comp,
00319                             lapack_int nparams, double* params );
00320 lapack_int LAPACKE_cgbrfsx( int matrix_order, char trans, char equed,
00321                             lapack_int n, lapack_int kl, lapack_int ku,
00322                             lapack_int nrhs, const lapack_complex_float* ab,
00323                             lapack_int ldab, const lapack_complex_float* afb,
00324                             lapack_int ldafb, const lapack_int* ipiv,
00325                             const float* r, const float* c,
00326                             const lapack_complex_float* b, lapack_int ldb,
00327                             lapack_complex_float* x, lapack_int ldx,
00328                             float* rcond, float* berr, lapack_int n_err_bnds,
00329                             float* err_bnds_norm, float* err_bnds_comp,
00330                             lapack_int nparams, float* params );
00331 lapack_int LAPACKE_zgbrfsx( int matrix_order, char trans, char equed,
00332                             lapack_int n, lapack_int kl, lapack_int ku,
00333                             lapack_int nrhs, const lapack_complex_double* ab,
00334                             lapack_int ldab, const lapack_complex_double* afb,
00335                             lapack_int ldafb, const lapack_int* ipiv,
00336                             const double* r, const double* c,
00337                             const lapack_complex_double* b, lapack_int ldb,
00338                             lapack_complex_double* x, lapack_int ldx,
00339                             double* rcond, double* berr, lapack_int n_err_bnds,
00340                             double* err_bnds_norm, double* err_bnds_comp,
00341                             lapack_int nparams, double* params );
00342 
00343 lapack_int LAPACKE_sgbsv( int matrix_order, lapack_int n, lapack_int kl,
00344                           lapack_int ku, lapack_int nrhs, float* ab,
00345                           lapack_int ldab, lapack_int* ipiv, float* b,
00346                           lapack_int ldb );
00347 lapack_int LAPACKE_dgbsv( int matrix_order, lapack_int n, lapack_int kl,
00348                           lapack_int ku, lapack_int nrhs, double* ab,
00349                           lapack_int ldab, lapack_int* ipiv, double* b,
00350                           lapack_int ldb );
00351 lapack_int LAPACKE_cgbsv( int matrix_order, lapack_int n, lapack_int kl,
00352                           lapack_int ku, lapack_int nrhs,
00353                           lapack_complex_float* ab, lapack_int ldab,
00354                           lapack_int* ipiv, lapack_complex_float* b,
00355                           lapack_int ldb );
00356 lapack_int LAPACKE_zgbsv( int matrix_order, lapack_int n, lapack_int kl,
00357                           lapack_int ku, lapack_int nrhs,
00358                           lapack_complex_double* ab, lapack_int ldab,
00359                           lapack_int* ipiv, lapack_complex_double* b,
00360                           lapack_int ldb );
00361 
00362 lapack_int LAPACKE_sgbsvx( int matrix_order, char fact, char trans,
00363                            lapack_int n, lapack_int kl, lapack_int ku,
00364                            lapack_int nrhs, float* ab, lapack_int ldab,
00365                            float* afb, lapack_int ldafb, lapack_int* ipiv,
00366                            char* equed, float* r, float* c, float* b,
00367                            lapack_int ldb, float* x, lapack_int ldx,
00368                            float* rcond, float* ferr, float* berr,
00369                            float* rpivot );
00370 lapack_int LAPACKE_dgbsvx( int matrix_order, char fact, char trans,
00371                            lapack_int n, lapack_int kl, lapack_int ku,
00372                            lapack_int nrhs, double* ab, lapack_int ldab,
00373                            double* afb, lapack_int ldafb, lapack_int* ipiv,
00374                            char* equed, double* r, double* c, double* b,
00375                            lapack_int ldb, double* x, lapack_int ldx,
00376                            double* rcond, double* ferr, double* berr,
00377                            double* rpivot );
00378 lapack_int LAPACKE_cgbsvx( int matrix_order, char fact, char trans,
00379                            lapack_int n, lapack_int kl, lapack_int ku,
00380                            lapack_int nrhs, lapack_complex_float* ab,
00381                            lapack_int ldab, lapack_complex_float* afb,
00382                            lapack_int ldafb, lapack_int* ipiv, char* equed,
00383                            float* r, float* c, lapack_complex_float* b,
00384                            lapack_int ldb, lapack_complex_float* x,
00385                            lapack_int ldx, float* rcond, float* ferr,
00386                            float* berr, float* rpivot );
00387 lapack_int LAPACKE_zgbsvx( int matrix_order, char fact, char trans,
00388                            lapack_int n, lapack_int kl, lapack_int ku,
00389                            lapack_int nrhs, lapack_complex_double* ab,
00390                            lapack_int ldab, lapack_complex_double* afb,
00391                            lapack_int ldafb, lapack_int* ipiv, char* equed,
00392                            double* r, double* c, lapack_complex_double* b,
00393                            lapack_int ldb, lapack_complex_double* x,
00394                            lapack_int ldx, double* rcond, double* ferr,
00395                            double* berr, double* rpivot );
00396 
00397 lapack_int LAPACKE_sgbsvxx( int matrix_order, char fact, char trans,
00398                             lapack_int n, lapack_int kl, lapack_int ku,
00399                             lapack_int nrhs, float* ab, lapack_int ldab,
00400                             float* afb, lapack_int ldafb, lapack_int* ipiv,
00401                             char* equed, float* r, float* c, float* b,
00402                             lapack_int ldb, float* x, lapack_int ldx,
00403                             float* rcond, float* rpvgrw, float* berr,
00404                             lapack_int n_err_bnds, float* err_bnds_norm,
00405                             float* err_bnds_comp, lapack_int nparams,
00406                             float* params );
00407 lapack_int LAPACKE_dgbsvxx( int matrix_order, char fact, char trans,
00408                             lapack_int n, lapack_int kl, lapack_int ku,
00409                             lapack_int nrhs, double* ab, lapack_int ldab,
00410                             double* afb, lapack_int ldafb, lapack_int* ipiv,
00411                             char* equed, double* r, double* c, double* b,
00412                             lapack_int ldb, double* x, lapack_int ldx,
00413                             double* rcond, double* rpvgrw, double* berr,
00414                             lapack_int n_err_bnds, double* err_bnds_norm,
00415                             double* err_bnds_comp, lapack_int nparams,
00416                             double* params );
00417 lapack_int LAPACKE_cgbsvxx( int matrix_order, char fact, char trans,
00418                             lapack_int n, lapack_int kl, lapack_int ku,
00419                             lapack_int nrhs, lapack_complex_float* ab,
00420                             lapack_int ldab, lapack_complex_float* afb,
00421                             lapack_int ldafb, lapack_int* ipiv, char* equed,
00422                             float* r, float* c, lapack_complex_float* b,
00423                             lapack_int ldb, lapack_complex_float* x,
00424                             lapack_int ldx, float* rcond, float* rpvgrw,
00425                             float* berr, lapack_int n_err_bnds,
00426                             float* err_bnds_norm, float* err_bnds_comp,
00427                             lapack_int nparams, float* params );
00428 lapack_int LAPACKE_zgbsvxx( int matrix_order, char fact, char trans,
00429                             lapack_int n, lapack_int kl, lapack_int ku,
00430                             lapack_int nrhs, lapack_complex_double* ab,
00431                             lapack_int ldab, lapack_complex_double* afb,
00432                             lapack_int ldafb, lapack_int* ipiv, char* equed,
00433                             double* r, double* c, lapack_complex_double* b,
00434                             lapack_int ldb, lapack_complex_double* x,
00435                             lapack_int ldx, double* rcond, double* rpvgrw,
00436                             double* berr, lapack_int n_err_bnds,
00437                             double* err_bnds_norm, double* err_bnds_comp,
00438                             lapack_int nparams, double* params );
00439 
00440 lapack_int LAPACKE_sgbtrf( int matrix_order, lapack_int m, lapack_int n,
00441                            lapack_int kl, lapack_int ku, float* ab,
00442                            lapack_int ldab, lapack_int* ipiv );
00443 lapack_int LAPACKE_dgbtrf( int matrix_order, lapack_int m, lapack_int n,
00444                            lapack_int kl, lapack_int ku, double* ab,
00445                            lapack_int ldab, lapack_int* ipiv );
00446 lapack_int LAPACKE_cgbtrf( int matrix_order, lapack_int m, lapack_int n,
00447                            lapack_int kl, lapack_int ku,
00448                            lapack_complex_float* ab, lapack_int ldab,
00449                            lapack_int* ipiv );
00450 lapack_int LAPACKE_zgbtrf( int matrix_order, lapack_int m, lapack_int n,
00451                            lapack_int kl, lapack_int ku,
00452                            lapack_complex_double* ab, lapack_int ldab,
00453                            lapack_int* ipiv );
00454 
00455 lapack_int LAPACKE_sgbtrs( int matrix_order, char trans, lapack_int n,
00456                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00457                            const float* ab, lapack_int ldab,
00458                            const lapack_int* ipiv, float* b, lapack_int ldb );
00459 lapack_int LAPACKE_dgbtrs( int matrix_order, char trans, lapack_int n,
00460                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00461                            const double* ab, lapack_int ldab,
00462                            const lapack_int* ipiv, double* b, lapack_int ldb );
00463 lapack_int LAPACKE_cgbtrs( int matrix_order, char trans, lapack_int n,
00464                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00465                            const lapack_complex_float* ab, lapack_int ldab,
00466                            const lapack_int* ipiv, lapack_complex_float* b,
00467                            lapack_int ldb );
00468 lapack_int LAPACKE_zgbtrs( int matrix_order, char trans, lapack_int n,
00469                            lapack_int kl, lapack_int ku, lapack_int nrhs,
00470                            const lapack_complex_double* ab, lapack_int ldab,
00471                            const lapack_int* ipiv, lapack_complex_double* b,
00472                            lapack_int ldb );
00473 
00474 lapack_int LAPACKE_sgebak( int matrix_order, char job, char side, lapack_int n,
00475                            lapack_int ilo, lapack_int ihi, const float* scale,
00476                            lapack_int m, float* v, lapack_int ldv );
00477 lapack_int LAPACKE_dgebak( int matrix_order, char job, char side, lapack_int n,
00478                            lapack_int ilo, lapack_int ihi, const double* scale,
00479                            lapack_int m, double* v, lapack_int ldv );
00480 lapack_int LAPACKE_cgebak( int matrix_order, char job, char side, lapack_int n,
00481                            lapack_int ilo, lapack_int ihi, const float* scale,
00482                            lapack_int m, lapack_complex_float* v,
00483                            lapack_int ldv );
00484 lapack_int LAPACKE_zgebak( int matrix_order, char job, char side, lapack_int n,
00485                            lapack_int ilo, lapack_int ihi, const double* scale,
00486                            lapack_int m, lapack_complex_double* v,
00487                            lapack_int ldv );
00488 
00489 lapack_int LAPACKE_sgebal( int matrix_order, char job, lapack_int n, float* a,
00490                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
00491                            float* scale );
00492 lapack_int LAPACKE_dgebal( int matrix_order, char job, lapack_int n, double* a,
00493                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
00494                            double* scale );
00495 lapack_int LAPACKE_cgebal( int matrix_order, char job, lapack_int n,
00496                            lapack_complex_float* a, lapack_int lda,
00497                            lapack_int* ilo, lapack_int* ihi, float* scale );
00498 lapack_int LAPACKE_zgebal( int matrix_order, char job, lapack_int n,
00499                            lapack_complex_double* a, lapack_int lda,
00500                            lapack_int* ilo, lapack_int* ihi, double* scale );
00501 
00502 lapack_int LAPACKE_sgebrd( int matrix_order, lapack_int m, lapack_int n,
00503                            float* a, lapack_int lda, float* d, float* e,
00504                            float* tauq, float* taup );
00505 lapack_int LAPACKE_dgebrd( int matrix_order, lapack_int m, lapack_int n,
00506                            double* a, lapack_int lda, double* d, double* e,
00507                            double* tauq, double* taup );
00508 lapack_int LAPACKE_cgebrd( int matrix_order, lapack_int m, lapack_int n,
00509                            lapack_complex_float* a, lapack_int lda, float* d,
00510                            float* e, lapack_complex_float* tauq,
00511                            lapack_complex_float* taup );
00512 lapack_int LAPACKE_zgebrd( int matrix_order, lapack_int m, lapack_int n,
00513                            lapack_complex_double* a, lapack_int lda, double* d,
00514                            double* e, lapack_complex_double* tauq,
00515                            lapack_complex_double* taup );
00516 
00517 lapack_int LAPACKE_sgecon( int matrix_order, char norm, lapack_int n,
00518                            const float* a, lapack_int lda, float anorm,
00519                            float* rcond );
00520 lapack_int LAPACKE_dgecon( int matrix_order, char norm, lapack_int n,
00521                            const double* a, lapack_int lda, double anorm,
00522                            double* rcond );
00523 lapack_int LAPACKE_cgecon( int matrix_order, char norm, lapack_int n,
00524                            const lapack_complex_float* a, lapack_int lda,
00525                            float anorm, float* rcond );
00526 lapack_int LAPACKE_zgecon( int matrix_order, char norm, lapack_int n,
00527                            const lapack_complex_double* a, lapack_int lda,
00528                            double anorm, double* rcond );
00529 
00530 lapack_int LAPACKE_sgeequ( int matrix_order, lapack_int m, lapack_int n,
00531                            const float* a, lapack_int lda, float* r, float* c,
00532                            float* rowcnd, float* colcnd, float* amax );
00533 lapack_int LAPACKE_dgeequ( int matrix_order, lapack_int m, lapack_int n,
00534                            const double* a, lapack_int lda, double* r,
00535                            double* c, double* rowcnd, double* colcnd,
00536                            double* amax );
00537 lapack_int LAPACKE_cgeequ( int matrix_order, lapack_int m, lapack_int n,
00538                            const lapack_complex_float* a, lapack_int lda,
00539                            float* r, float* c, float* rowcnd, float* colcnd,
00540                            float* amax );
00541 lapack_int LAPACKE_zgeequ( int matrix_order, lapack_int m, lapack_int n,
00542                            const lapack_complex_double* a, lapack_int lda,
00543                            double* r, double* c, double* rowcnd, double* colcnd,
00544                            double* amax );
00545 
00546 lapack_int LAPACKE_sgeequb( int matrix_order, lapack_int m, lapack_int n,
00547                             const float* a, lapack_int lda, float* r, float* c,
00548                             float* rowcnd, float* colcnd, float* amax );
00549 lapack_int LAPACKE_dgeequb( int matrix_order, lapack_int m, lapack_int n,
00550                             const double* a, lapack_int lda, double* r,
00551                             double* c, double* rowcnd, double* colcnd,
00552                             double* amax );
00553 lapack_int LAPACKE_cgeequb( int matrix_order, lapack_int m, lapack_int n,
00554                             const lapack_complex_float* a, lapack_int lda,
00555                             float* r, float* c, float* rowcnd, float* colcnd,
00556                             float* amax );
00557 lapack_int LAPACKE_zgeequb( int matrix_order, lapack_int m, lapack_int n,
00558                             const lapack_complex_double* a, lapack_int lda,
00559                             double* r, double* c, double* rowcnd,
00560                             double* colcnd, double* amax );
00561 
00562 lapack_int LAPACKE_sgees( int matrix_order, char jobvs, char sort,
00563                           LAPACK_S_SELECT2 select, lapack_int n, float* a,
00564                           lapack_int lda, lapack_int* sdim, float* wr,
00565                           float* wi, float* vs, lapack_int ldvs );
00566 lapack_int LAPACKE_dgees( int matrix_order, char jobvs, char sort,
00567                           LAPACK_D_SELECT2 select, lapack_int n, double* a,
00568                           lapack_int lda, lapack_int* sdim, double* wr,
00569                           double* wi, double* vs, lapack_int ldvs );
00570 lapack_int LAPACKE_cgees( int matrix_order, char jobvs, char sort,
00571                           LAPACK_C_SELECT1 select, lapack_int n,
00572                           lapack_complex_float* a, lapack_int lda,
00573                           lapack_int* sdim, lapack_complex_float* w,
00574                           lapack_complex_float* vs, lapack_int ldvs );
00575 lapack_int LAPACKE_zgees( int matrix_order, char jobvs, char sort,
00576                           LAPACK_Z_SELECT1 select, lapack_int n,
00577                           lapack_complex_double* a, lapack_int lda,
00578                           lapack_int* sdim, lapack_complex_double* w,
00579                           lapack_complex_double* vs, lapack_int ldvs );
00580 
00581 lapack_int LAPACKE_sgeesx( int matrix_order, char jobvs, char sort,
00582                            LAPACK_S_SELECT2 select, char sense, lapack_int n,
00583                            float* a, lapack_int lda, lapack_int* sdim,
00584                            float* wr, float* wi, float* vs, lapack_int ldvs,
00585                            float* rconde, float* rcondv );
00586 lapack_int LAPACKE_dgeesx( int matrix_order, char jobvs, char sort,
00587                            LAPACK_D_SELECT2 select, char sense, lapack_int n,
00588                            double* a, lapack_int lda, lapack_int* sdim,
00589                            double* wr, double* wi, double* vs, lapack_int ldvs,
00590                            double* rconde, double* rcondv );
00591 lapack_int LAPACKE_cgeesx( int matrix_order, char jobvs, char sort,
00592                            LAPACK_C_SELECT1 select, char sense, lapack_int n,
00593                            lapack_complex_float* a, lapack_int lda,
00594                            lapack_int* sdim, lapack_complex_float* w,
00595                            lapack_complex_float* vs, lapack_int ldvs,
00596                            float* rconde, float* rcondv );
00597 lapack_int LAPACKE_zgeesx( int matrix_order, char jobvs, char sort,
00598                            LAPACK_Z_SELECT1 select, char sense, lapack_int n,
00599                            lapack_complex_double* a, lapack_int lda,
00600                            lapack_int* sdim, lapack_complex_double* w,
00601                            lapack_complex_double* vs, lapack_int ldvs,
00602                            double* rconde, double* rcondv );
00603 
00604 lapack_int LAPACKE_sgeev( int matrix_order, char jobvl, char jobvr,
00605                           lapack_int n, float* a, lapack_int lda, float* wr,
00606                           float* wi, float* vl, lapack_int ldvl, float* vr,
00607                           lapack_int ldvr );
00608 lapack_int LAPACKE_dgeev( int matrix_order, char jobvl, char jobvr,
00609                           lapack_int n, double* a, lapack_int lda, double* wr,
00610                           double* wi, double* vl, lapack_int ldvl, double* vr,
00611                           lapack_int ldvr );
00612 lapack_int LAPACKE_cgeev( int matrix_order, char jobvl, char jobvr,
00613                           lapack_int n, lapack_complex_float* a, lapack_int lda,
00614                           lapack_complex_float* w, lapack_complex_float* vl,
00615                           lapack_int ldvl, lapack_complex_float* vr,
00616                           lapack_int ldvr );
00617 lapack_int LAPACKE_zgeev( int matrix_order, char jobvl, char jobvr,
00618                           lapack_int n, lapack_complex_double* a,
00619                           lapack_int lda, lapack_complex_double* w,
00620                           lapack_complex_double* vl, lapack_int ldvl,
00621                           lapack_complex_double* vr, lapack_int ldvr );
00622 
00623 lapack_int LAPACKE_sgeevx( int matrix_order, char balanc, char jobvl,
00624                            char jobvr, char sense, lapack_int n, float* a,
00625                            lapack_int lda, float* wr, float* wi, float* vl,
00626                            lapack_int ldvl, float* vr, lapack_int ldvr,
00627                            lapack_int* ilo, lapack_int* ihi, float* scale,
00628                            float* abnrm, float* rconde, float* rcondv );
00629 lapack_int LAPACKE_dgeevx( int matrix_order, char balanc, char jobvl,
00630                            char jobvr, char sense, lapack_int n, double* a,
00631                            lapack_int lda, double* wr, double* wi, double* vl,
00632                            lapack_int ldvl, double* vr, lapack_int ldvr,
00633                            lapack_int* ilo, lapack_int* ihi, double* scale,
00634                            double* abnrm, double* rconde, double* rcondv );
00635 lapack_int LAPACKE_cgeevx( int matrix_order, char balanc, char jobvl,
00636                            char jobvr, char sense, lapack_int n,
00637                            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, lapack_int* ilo, lapack_int* ihi,
00641                            float* scale, float* abnrm, float* rconde,
00642                            float* rcondv );
00643 lapack_int LAPACKE_zgeevx( int matrix_order, char balanc, char jobvl,
00644                            char jobvr, char sense, lapack_int n,
00645                            lapack_complex_double* a, lapack_int lda,
00646                            lapack_complex_double* w, lapack_complex_double* vl,
00647                            lapack_int ldvl, lapack_complex_double* vr,
00648                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
00649                            double* scale, double* abnrm, double* rconde,
00650                            double* rcondv );
00651 
00652 lapack_int LAPACKE_sgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00653                            lapack_int ihi, float* a, lapack_int lda,
00654                            float* tau );
00655 lapack_int LAPACKE_dgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00656                            lapack_int ihi, double* a, lapack_int lda,
00657                            double* tau );
00658 lapack_int LAPACKE_cgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00659                            lapack_int ihi, lapack_complex_float* a,
00660                            lapack_int lda, lapack_complex_float* tau );
00661 lapack_int LAPACKE_zgehrd( int matrix_order, lapack_int n, lapack_int ilo,
00662                            lapack_int ihi, lapack_complex_double* a,
00663                            lapack_int lda, lapack_complex_double* tau );
00664 
00665 lapack_int LAPACKE_sgejsv( int matrix_order, char joba, char jobu, char jobv,
00666                            char jobr, char jobt, char jobp, lapack_int m,
00667                            lapack_int n, float* a, lapack_int lda, float* sva,
00668                            float* u, lapack_int ldu, float* v, lapack_int ldv,
00669                            float* stat, lapack_int* istat );
00670 lapack_int LAPACKE_dgejsv( int matrix_order, char joba, char jobu, char jobv,
00671                            char jobr, char jobt, char jobp, lapack_int m,
00672                            lapack_int n, double* a, lapack_int lda, double* sva,
00673                            double* u, lapack_int ldu, double* v, lapack_int ldv,
00674                            double* stat, lapack_int* istat );
00675 
00676 lapack_int LAPACKE_sgelq2( int matrix_order, lapack_int m, lapack_int n,
00677                            float* a, lapack_int lda, float* tau );
00678 lapack_int LAPACKE_dgelq2( int matrix_order, lapack_int m, lapack_int n,
00679                            double* a, lapack_int lda, double* tau );
00680 lapack_int LAPACKE_cgelq2( int matrix_order, lapack_int m, lapack_int n,
00681                            lapack_complex_float* a, lapack_int lda,
00682                            lapack_complex_float* tau );
00683 lapack_int LAPACKE_zgelq2( int matrix_order, lapack_int m, lapack_int n,
00684                            lapack_complex_double* a, lapack_int lda,
00685                            lapack_complex_double* tau );
00686 
00687 lapack_int LAPACKE_sgelqf( int matrix_order, lapack_int m, lapack_int n,
00688                            float* a, lapack_int lda, float* tau );
00689 lapack_int LAPACKE_dgelqf( int matrix_order, lapack_int m, lapack_int n,
00690                            double* a, lapack_int lda, double* tau );
00691 lapack_int LAPACKE_cgelqf( int matrix_order, lapack_int m, lapack_int n,
00692                            lapack_complex_float* a, lapack_int lda,
00693                            lapack_complex_float* tau );
00694 lapack_int LAPACKE_zgelqf( int matrix_order, lapack_int m, lapack_int n,
00695                            lapack_complex_double* a, lapack_int lda,
00696                            lapack_complex_double* tau );
00697 
00698 lapack_int LAPACKE_sgels( int matrix_order, char trans, lapack_int m,
00699                           lapack_int n, lapack_int nrhs, float* a,
00700                           lapack_int lda, float* b, lapack_int ldb );
00701 lapack_int LAPACKE_dgels( int matrix_order, char trans, lapack_int m,
00702                           lapack_int n, lapack_int nrhs, double* a,
00703                           lapack_int lda, double* b, lapack_int ldb );
00704 lapack_int LAPACKE_cgels( int matrix_order, char trans, lapack_int m,
00705                           lapack_int n, lapack_int nrhs,
00706                           lapack_complex_float* a, lapack_int lda,
00707                           lapack_complex_float* b, lapack_int ldb );
00708 lapack_int LAPACKE_zgels( int matrix_order, char trans, lapack_int m,
00709                           lapack_int n, lapack_int nrhs,
00710                           lapack_complex_double* a, lapack_int lda,
00711                           lapack_complex_double* b, lapack_int ldb );
00712 
00713 lapack_int LAPACKE_sgelsd( int matrix_order, lapack_int m, lapack_int n,
00714                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00715                            lapack_int ldb, float* s, float rcond,
00716                            lapack_int* rank );
00717 lapack_int LAPACKE_dgelsd( int matrix_order, lapack_int m, lapack_int n,
00718                            lapack_int nrhs, double* a, lapack_int lda,
00719                            double* b, lapack_int ldb, double* s, double rcond,
00720                            lapack_int* rank );
00721 lapack_int LAPACKE_cgelsd( int matrix_order, lapack_int m, lapack_int n,
00722                            lapack_int nrhs, lapack_complex_float* a,
00723                            lapack_int lda, lapack_complex_float* b,
00724                            lapack_int ldb, float* s, float rcond,
00725                            lapack_int* rank );
00726 lapack_int LAPACKE_zgelsd( int matrix_order, lapack_int m, lapack_int n,
00727                            lapack_int nrhs, lapack_complex_double* a,
00728                            lapack_int lda, lapack_complex_double* b,
00729                            lapack_int ldb, double* s, double rcond,
00730                            lapack_int* rank );
00731 
00732 lapack_int LAPACKE_sgelss( int matrix_order, lapack_int m, lapack_int n,
00733                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00734                            lapack_int ldb, float* s, float rcond,
00735                            lapack_int* rank );
00736 lapack_int LAPACKE_dgelss( int matrix_order, lapack_int m, lapack_int n,
00737                            lapack_int nrhs, double* a, lapack_int lda,
00738                            double* b, lapack_int ldb, double* s, double rcond,
00739                            lapack_int* rank );
00740 lapack_int LAPACKE_cgelss( int matrix_order, lapack_int m, lapack_int n,
00741                            lapack_int nrhs, lapack_complex_float* a,
00742                            lapack_int lda, lapack_complex_float* b,
00743                            lapack_int ldb, float* s, float rcond,
00744                            lapack_int* rank );
00745 lapack_int LAPACKE_zgelss( int matrix_order, lapack_int m, lapack_int n,
00746                            lapack_int nrhs, lapack_complex_double* a,
00747                            lapack_int lda, lapack_complex_double* b,
00748                            lapack_int ldb, double* s, double rcond,
00749                            lapack_int* rank );
00750 
00751 lapack_int LAPACKE_sgelsy( int matrix_order, lapack_int m, lapack_int n,
00752                            lapack_int nrhs, float* a, lapack_int lda, float* b,
00753                            lapack_int ldb, lapack_int* jpvt, float rcond,
00754                            lapack_int* rank );
00755 lapack_int LAPACKE_dgelsy( int matrix_order, lapack_int m, lapack_int n,
00756                            lapack_int nrhs, double* a, lapack_int lda,
00757                            double* b, lapack_int ldb, lapack_int* jpvt,
00758                            double rcond, lapack_int* rank );
00759 lapack_int LAPACKE_cgelsy( int matrix_order, lapack_int m, lapack_int n,
00760                            lapack_int nrhs, lapack_complex_float* a,
00761                            lapack_int lda, lapack_complex_float* b,
00762                            lapack_int ldb, lapack_int* jpvt, float rcond,
00763                            lapack_int* rank );
00764 lapack_int LAPACKE_zgelsy( int matrix_order, lapack_int m, lapack_int n,
00765                            lapack_int nrhs, lapack_complex_double* a,
00766                            lapack_int lda, lapack_complex_double* b,
00767                            lapack_int ldb, lapack_int* jpvt, double rcond,
00768                            lapack_int* rank );
00769 
00770 lapack_int LAPACKE_sgeqlf( int matrix_order, lapack_int m, lapack_int n,
00771                            float* a, lapack_int lda, float* tau );
00772 lapack_int LAPACKE_dgeqlf( int matrix_order, lapack_int m, lapack_int n,
00773                            double* a, lapack_int lda, double* tau );
00774 lapack_int LAPACKE_cgeqlf( int matrix_order, lapack_int m, lapack_int n,
00775                            lapack_complex_float* a, lapack_int lda,
00776                            lapack_complex_float* tau );
00777 lapack_int LAPACKE_zgeqlf( int matrix_order, lapack_int m, lapack_int n,
00778                            lapack_complex_double* a, lapack_int lda,
00779                            lapack_complex_double* tau );
00780 
00781 lapack_int LAPACKE_sgeqp3( int matrix_order, lapack_int m, lapack_int n,
00782                            float* a, lapack_int lda, lapack_int* jpvt,
00783                            float* tau );
00784 lapack_int LAPACKE_dgeqp3( int matrix_order, lapack_int m, lapack_int n,
00785                            double* a, lapack_int lda, lapack_int* jpvt,
00786                            double* tau );
00787 lapack_int LAPACKE_cgeqp3( int matrix_order, lapack_int m, lapack_int n,
00788                            lapack_complex_float* a, lapack_int lda,
00789                            lapack_int* jpvt, lapack_complex_float* tau );
00790 lapack_int LAPACKE_zgeqp3( int matrix_order, lapack_int m, lapack_int n,
00791                            lapack_complex_double* a, lapack_int lda,
00792                            lapack_int* jpvt, lapack_complex_double* tau );
00793 
00794 lapack_int LAPACKE_sgeqpf( 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_dgeqpf( 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_cgeqpf( 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_zgeqpf( 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_sgeqr2( int matrix_order, lapack_int m, lapack_int n,
00808                            float* a, lapack_int lda, float* tau );
00809 lapack_int LAPACKE_dgeqr2( int matrix_order, lapack_int m, lapack_int n,
00810                            double* a, lapack_int lda, double* tau );
00811 lapack_int LAPACKE_cgeqr2( int matrix_order, lapack_int m, lapack_int n,
00812                            lapack_complex_float* a, lapack_int lda,
00813                            lapack_complex_float* tau );
00814 lapack_int LAPACKE_zgeqr2( int matrix_order, lapack_int m, lapack_int n,
00815                            lapack_complex_double* a, lapack_int lda,
00816                            lapack_complex_double* tau );
00817 
00818 lapack_int LAPACKE_sgeqrf( int matrix_order, lapack_int m, lapack_int n,
00819                            float* a, lapack_int lda, float* tau );
00820 lapack_int LAPACKE_dgeqrf( int matrix_order, lapack_int m, lapack_int n,
00821                            double* a, lapack_int lda, double* tau );
00822 lapack_int LAPACKE_cgeqrf( int matrix_order, lapack_int m, lapack_int n,
00823                            lapack_complex_float* a, lapack_int lda,
00824                            lapack_complex_float* tau );
00825 lapack_int LAPACKE_zgeqrf( int matrix_order, lapack_int m, lapack_int n,
00826                            lapack_complex_double* a, lapack_int lda,
00827                            lapack_complex_double* tau );
00828 
00829 lapack_int LAPACKE_sgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00830                             float* a, lapack_int lda, float* tau );
00831 lapack_int LAPACKE_dgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00832                             double* a, lapack_int lda, double* tau );
00833 lapack_int LAPACKE_cgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00834                             lapack_complex_float* a, lapack_int lda,
00835                             lapack_complex_float* tau );
00836 lapack_int LAPACKE_zgeqrfp( int matrix_order, lapack_int m, lapack_int n,
00837                             lapack_complex_double* a, lapack_int lda,
00838                             lapack_complex_double* tau );
00839 
00840 lapack_int LAPACKE_sgerfs( int matrix_order, char trans, lapack_int n,
00841                            lapack_int nrhs, const float* a, lapack_int lda,
00842                            const float* af, lapack_int ldaf,
00843                            const lapack_int* ipiv, const float* b,
00844                            lapack_int ldb, float* x, lapack_int ldx,
00845                            float* ferr, float* berr );
00846 lapack_int LAPACKE_dgerfs( int matrix_order, char trans, lapack_int n,
00847                            lapack_int nrhs, const double* a, lapack_int lda,
00848                            const double* af, lapack_int ldaf,
00849                            const lapack_int* ipiv, const double* b,
00850                            lapack_int ldb, double* x, lapack_int ldx,
00851                            double* ferr, double* berr );
00852 lapack_int LAPACKE_cgerfs( int matrix_order, char trans, lapack_int n,
00853                            lapack_int nrhs, const lapack_complex_float* a,
00854                            lapack_int lda, const lapack_complex_float* af,
00855                            lapack_int ldaf, const lapack_int* ipiv,
00856                            const lapack_complex_float* b, lapack_int ldb,
00857                            lapack_complex_float* x, lapack_int ldx, float* ferr,
00858                            float* berr );
00859 lapack_int LAPACKE_zgerfs( int matrix_order, char trans, lapack_int n,
00860                            lapack_int nrhs, const lapack_complex_double* a,
00861                            lapack_int lda, const lapack_complex_double* af,
00862                            lapack_int ldaf, const lapack_int* ipiv,
00863                            const lapack_complex_double* b, lapack_int ldb,
00864                            lapack_complex_double* x, lapack_int ldx,
00865                            double* ferr, double* berr );
00866 
00867 lapack_int LAPACKE_sgerfsx( int matrix_order, char trans, char equed,
00868                             lapack_int n, lapack_int nrhs, const float* a,
00869                             lapack_int lda, const float* af, lapack_int ldaf,
00870                             const lapack_int* ipiv, const float* r,
00871                             const float* c, const float* b, lapack_int ldb,
00872                             float* x, lapack_int ldx, float* rcond, float* berr,
00873                             lapack_int n_err_bnds, float* err_bnds_norm,
00874                             float* err_bnds_comp, lapack_int nparams,
00875                             float* params );
00876 lapack_int LAPACKE_dgerfsx( int matrix_order, char trans, char equed,
00877                             lapack_int n, lapack_int nrhs, const double* a,
00878                             lapack_int lda, const double* af, lapack_int ldaf,
00879                             const lapack_int* ipiv, const double* r,
00880                             const double* c, const double* b, lapack_int ldb,
00881                             double* x, lapack_int ldx, double* rcond,
00882                             double* berr, lapack_int n_err_bnds,
00883                             double* err_bnds_norm, double* err_bnds_comp,
00884                             lapack_int nparams, double* params );
00885 lapack_int LAPACKE_cgerfsx( int matrix_order, char trans, char equed,
00886                             lapack_int n, lapack_int nrhs,
00887                             const lapack_complex_float* a, lapack_int lda,
00888                             const lapack_complex_float* af, lapack_int ldaf,
00889                             const lapack_int* ipiv, const float* r,
00890                             const float* c, const lapack_complex_float* b,
00891                             lapack_int ldb, lapack_complex_float* x,
00892                             lapack_int ldx, float* rcond, float* berr,
00893                             lapack_int n_err_bnds, float* err_bnds_norm,
00894                             float* err_bnds_comp, lapack_int nparams,
00895                             float* params );
00896 lapack_int LAPACKE_zgerfsx( int matrix_order, char trans, char equed,
00897                             lapack_int n, lapack_int nrhs,
00898                             const lapack_complex_double* a, lapack_int lda,
00899                             const lapack_complex_double* af, lapack_int ldaf,
00900                             const lapack_int* ipiv, const double* r,
00901                             const double* c, const lapack_complex_double* b,
00902                             lapack_int ldb, lapack_complex_double* x,
00903                             lapack_int ldx, double* rcond, double* berr,
00904                             lapack_int n_err_bnds, double* err_bnds_norm,
00905                             double* err_bnds_comp, lapack_int nparams,
00906                             double* params );
00907 
00908 lapack_int LAPACKE_sgerqf( int matrix_order, lapack_int m, lapack_int n,
00909                            float* a, lapack_int lda, float* tau );
00910 lapack_int LAPACKE_dgerqf( int matrix_order, lapack_int m, lapack_int n,
00911                            double* a, lapack_int lda, double* tau );
00912 lapack_int LAPACKE_cgerqf( int matrix_order, lapack_int m, lapack_int n,
00913                            lapack_complex_float* a, lapack_int lda,
00914                            lapack_complex_float* tau );
00915 lapack_int LAPACKE_zgerqf( int matrix_order, lapack_int m, lapack_int n,
00916                            lapack_complex_double* a, lapack_int lda,
00917                            lapack_complex_double* tau );
00918 
00919 lapack_int LAPACKE_sgesdd( int matrix_order, char jobz, lapack_int m,
00920                            lapack_int n, float* a, lapack_int lda, float* s,
00921                            float* u, lapack_int ldu, float* vt,
00922                            lapack_int ldvt );
00923 lapack_int LAPACKE_dgesdd( int matrix_order, char jobz, lapack_int m,
00924                            lapack_int n, double* a, lapack_int lda, double* s,
00925                            double* u, lapack_int ldu, double* vt,
00926                            lapack_int ldvt );
00927 lapack_int LAPACKE_cgesdd( int matrix_order, char jobz, lapack_int m,
00928                            lapack_int n, lapack_complex_float* a,
00929                            lapack_int lda, float* s, lapack_complex_float* u,
00930                            lapack_int ldu, lapack_complex_float* vt,
00931                            lapack_int ldvt );
00932 lapack_int LAPACKE_zgesdd( int matrix_order, char jobz, lapack_int m,
00933                            lapack_int n, lapack_complex_double* a,
00934                            lapack_int lda, double* s, lapack_complex_double* u,
00935                            lapack_int ldu, lapack_complex_double* vt,
00936                            lapack_int ldvt );
00937 
00938 lapack_int LAPACKE_sgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00939                           float* a, lapack_int lda, lapack_int* ipiv, float* b,
00940                           lapack_int ldb );
00941 lapack_int LAPACKE_dgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00942                           double* a, lapack_int lda, lapack_int* ipiv,
00943                           double* b, lapack_int ldb );
00944 lapack_int LAPACKE_cgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00945                           lapack_complex_float* a, lapack_int lda,
00946                           lapack_int* ipiv, lapack_complex_float* b,
00947                           lapack_int ldb );
00948 lapack_int LAPACKE_zgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00949                           lapack_complex_double* a, lapack_int lda,
00950                           lapack_int* ipiv, lapack_complex_double* b,
00951                           lapack_int ldb );
00952 lapack_int LAPACKE_dsgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00953                            double* a, lapack_int lda, lapack_int* ipiv,
00954                            double* b, lapack_int ldb, double* x, lapack_int ldx,
00955                            lapack_int* iter );
00956 lapack_int LAPACKE_zcgesv( int matrix_order, lapack_int n, lapack_int nrhs,
00957                            lapack_complex_double* a, lapack_int lda,
00958                            lapack_int* ipiv, lapack_complex_double* b,
00959                            lapack_int ldb, lapack_complex_double* x,
00960                            lapack_int ldx, lapack_int* iter );
00961 
00962 lapack_int LAPACKE_sgesvd( int matrix_order, char jobu, char jobvt,
00963                            lapack_int m, lapack_int n, float* a, lapack_int lda,
00964                            float* s, float* u, lapack_int ldu, float* vt,
00965                            lapack_int ldvt, float* superb );
00966 lapack_int LAPACKE_dgesvd( int matrix_order, char jobu, char jobvt,
00967                            lapack_int m, lapack_int n, double* a,
00968                            lapack_int lda, double* s, double* u, lapack_int ldu,
00969                            double* vt, lapack_int ldvt, double* superb );
00970 lapack_int LAPACKE_cgesvd( int matrix_order, char jobu, char jobvt,
00971                            lapack_int m, lapack_int n, lapack_complex_float* a,
00972                            lapack_int lda, float* s, lapack_complex_float* u,
00973                            lapack_int ldu, lapack_complex_float* vt,
00974                            lapack_int ldvt, float* superb );
00975 lapack_int LAPACKE_zgesvd( int matrix_order, char jobu, char jobvt,
00976                            lapack_int m, lapack_int n, lapack_complex_double* a,
00977                            lapack_int lda, double* s, lapack_complex_double* u,
00978                            lapack_int ldu, lapack_complex_double* vt,
00979                            lapack_int ldvt, double* superb );
00980 
00981 lapack_int LAPACKE_sgesvj( int matrix_order, char joba, char jobu, char jobv,
00982                            lapack_int m, lapack_int n, float* a, lapack_int lda,
00983                            float* sva, lapack_int mv, float* v, lapack_int ldv,
00984                            float* stat );
00985 lapack_int LAPACKE_dgesvj( int matrix_order, char joba, char jobu, char jobv,
00986                            lapack_int m, lapack_int n, double* a,
00987                            lapack_int lda, double* sva, lapack_int mv,
00988                            double* v, lapack_int ldv, double* stat );
00989 
00990 lapack_int LAPACKE_sgesvx( int matrix_order, char fact, char trans,
00991                            lapack_int n, lapack_int nrhs, float* a,
00992                            lapack_int lda, float* af, lapack_int ldaf,
00993                            lapack_int* ipiv, char* equed, float* r, float* c,
00994                            float* b, lapack_int ldb, float* x, lapack_int ldx,
00995                            float* rcond, float* ferr, float* berr,
00996                            float* rpivot );
00997 lapack_int LAPACKE_dgesvx( int matrix_order, char fact, char trans,
00998                            lapack_int n, lapack_int nrhs, double* a,
00999                            lapack_int lda, double* af, lapack_int ldaf,
01000                            lapack_int* ipiv, char* equed, double* r, double* c,
01001                            double* b, lapack_int ldb, double* x, lapack_int ldx,
01002                            double* rcond, double* ferr, double* berr,
01003                            double* rpivot );
01004 lapack_int LAPACKE_cgesvx( int matrix_order, char fact, char trans,
01005                            lapack_int n, lapack_int nrhs,
01006                            lapack_complex_float* a, lapack_int lda,
01007                            lapack_complex_float* af, lapack_int ldaf,
01008                            lapack_int* ipiv, char* equed, float* r, float* c,
01009                            lapack_complex_float* b, lapack_int ldb,
01010                            lapack_complex_float* x, lapack_int ldx,
01011                            float* rcond, float* ferr, float* berr,
01012                            float* rpivot );
01013 lapack_int LAPACKE_zgesvx( int matrix_order, char fact, char trans,
01014                            lapack_int n, lapack_int nrhs,
01015                            lapack_complex_double* a, lapack_int lda,
01016                            lapack_complex_double* af, lapack_int ldaf,
01017                            lapack_int* ipiv, char* equed, double* r, double* c,
01018                            lapack_complex_double* b, lapack_int ldb,
01019                            lapack_complex_double* x, lapack_int ldx,
01020                            double* rcond, double* ferr, double* berr,
01021                            double* rpivot );
01022 
01023 lapack_int LAPACKE_sgesvxx( int matrix_order, char fact, char trans,
01024                             lapack_int n, lapack_int nrhs, float* a,
01025                             lapack_int lda, float* af, lapack_int ldaf,
01026                             lapack_int* ipiv, char* equed, float* r, float* c,
01027                             float* b, lapack_int ldb, float* x, lapack_int ldx,
01028                             float* rcond, float* rpvgrw, float* berr,
01029                             lapack_int n_err_bnds, float* err_bnds_norm,
01030                             float* err_bnds_comp, lapack_int nparams,
01031                             float* params );
01032 lapack_int LAPACKE_dgesvxx( int matrix_order, char fact, char trans,
01033                             lapack_int n, lapack_int nrhs, double* a,
01034                             lapack_int lda, double* af, lapack_int ldaf,
01035                             lapack_int* ipiv, char* equed, double* r, double* c,
01036                             double* b, lapack_int ldb, double* x,
01037                             lapack_int ldx, double* rcond, double* rpvgrw,
01038                             double* berr, lapack_int n_err_bnds,
01039                             double* err_bnds_norm, double* err_bnds_comp,
01040                             lapack_int nparams, double* params );
01041 lapack_int LAPACKE_cgesvxx( int matrix_order, char fact, char trans,
01042                             lapack_int n, lapack_int nrhs,
01043                             lapack_complex_float* a, lapack_int lda,
01044                             lapack_complex_float* af, lapack_int ldaf,
01045                             lapack_int* ipiv, char* equed, float* r, float* c,
01046                             lapack_complex_float* b, lapack_int ldb,
01047                             lapack_complex_float* x, lapack_int ldx,
01048                             float* rcond, float* rpvgrw, float* berr,
01049                             lapack_int n_err_bnds, float* err_bnds_norm,
01050                             float* err_bnds_comp, lapack_int nparams,
01051                             float* params );
01052 lapack_int LAPACKE_zgesvxx( int matrix_order, char fact, char trans,
01053                             lapack_int n, lapack_int nrhs,
01054                             lapack_complex_double* a, lapack_int lda,
01055                             lapack_complex_double* af, lapack_int ldaf,
01056                             lapack_int* ipiv, char* equed, double* r, double* c,
01057                             lapack_complex_double* b, lapack_int ldb,
01058                             lapack_complex_double* x, lapack_int ldx,
01059                             double* rcond, double* rpvgrw, double* berr,
01060                             lapack_int n_err_bnds, double* err_bnds_norm,
01061                             double* err_bnds_comp, lapack_int nparams,
01062                             double* params );
01063 
01064 lapack_int LAPACKE_sgetf2( int matrix_order, lapack_int m, lapack_int n,
01065                            float* a, lapack_int lda, lapack_int* ipiv );
01066 lapack_int LAPACKE_dgetf2( int matrix_order, lapack_int m, lapack_int n,
01067                            double* a, lapack_int lda, lapack_int* ipiv );
01068 lapack_int LAPACKE_cgetf2( int matrix_order, lapack_int m, lapack_int n,
01069                            lapack_complex_float* a, lapack_int lda,
01070                            lapack_int* ipiv );
01071 lapack_int LAPACKE_zgetf2( int matrix_order, lapack_int m, lapack_int n,
01072                            lapack_complex_double* a, lapack_int lda,
01073                            lapack_int* ipiv );
01074 
01075 lapack_int LAPACKE_sgetrf( int matrix_order, lapack_int m, lapack_int n,
01076                            float* a, lapack_int lda, lapack_int* ipiv );
01077 lapack_int LAPACKE_dgetrf( int matrix_order, lapack_int m, lapack_int n,
01078                            double* a, lapack_int lda, lapack_int* ipiv );
01079 lapack_int LAPACKE_cgetrf( int matrix_order, lapack_int m, lapack_int n,
01080                            lapack_complex_float* a, lapack_int lda,
01081                            lapack_int* ipiv );
01082 lapack_int LAPACKE_zgetrf( int matrix_order, lapack_int m, lapack_int n,
01083                            lapack_complex_double* a, lapack_int lda,
01084                            lapack_int* ipiv );
01085 
01086 lapack_int LAPACKE_sgetri( int matrix_order, lapack_int n, float* a,
01087                            lapack_int lda, const lapack_int* ipiv );
01088 lapack_int LAPACKE_dgetri( int matrix_order, lapack_int n, double* a,
01089                            lapack_int lda, const lapack_int* ipiv );
01090 lapack_int LAPACKE_cgetri( int matrix_order, lapack_int n,
01091                            lapack_complex_float* a, lapack_int lda,
01092                            const lapack_int* ipiv );
01093 lapack_int LAPACKE_zgetri( int matrix_order, lapack_int n,
01094                            lapack_complex_double* a, lapack_int lda,
01095                            const lapack_int* ipiv );
01096 
01097 lapack_int LAPACKE_sgetrs( int matrix_order, char trans, lapack_int n,
01098                            lapack_int nrhs, const float* a, lapack_int lda,
01099                            const lapack_int* ipiv, float* b, lapack_int ldb );
01100 lapack_int LAPACKE_dgetrs( int matrix_order, char trans, lapack_int n,
01101                            lapack_int nrhs, const double* a, lapack_int lda,
01102                            const lapack_int* ipiv, double* b, lapack_int ldb );
01103 lapack_int LAPACKE_cgetrs( int matrix_order, char trans, lapack_int n,
01104                            lapack_int nrhs, const lapack_complex_float* a,
01105                            lapack_int lda, const lapack_int* ipiv,
01106                            lapack_complex_float* b, lapack_int ldb );
01107 lapack_int LAPACKE_zgetrs( int matrix_order, char trans, lapack_int n,
01108                            lapack_int nrhs, const lapack_complex_double* a,
01109                            lapack_int lda, const lapack_int* ipiv,
01110                            lapack_complex_double* b, lapack_int ldb );
01111 
01112 lapack_int LAPACKE_sggbak( int matrix_order, char job, char side, lapack_int n,
01113                            lapack_int ilo, lapack_int ihi, const float* lscale,
01114                            const float* rscale, lapack_int m, float* v,
01115                            lapack_int ldv );
01116 lapack_int LAPACKE_dggbak( int matrix_order, char job, char side, lapack_int n,
01117                            lapack_int ilo, lapack_int ihi, const double* lscale,
01118                            const double* rscale, lapack_int m, double* v,
01119                            lapack_int ldv );
01120 lapack_int LAPACKE_cggbak( int matrix_order, char job, char side, lapack_int n,
01121                            lapack_int ilo, lapack_int ihi, const float* lscale,
01122                            const float* rscale, lapack_int m,
01123                            lapack_complex_float* v, lapack_int ldv );
01124 lapack_int LAPACKE_zggbak( int matrix_order, char job, char side, lapack_int n,
01125                            lapack_int ilo, lapack_int ihi, const double* lscale,
01126                            const double* rscale, lapack_int m,
01127                            lapack_complex_double* v, lapack_int ldv );
01128 
01129 lapack_int LAPACKE_sggbal( int matrix_order, char job, lapack_int n, float* a,
01130                            lapack_int lda, float* b, lapack_int ldb,
01131                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01132                            float* rscale );
01133 lapack_int LAPACKE_dggbal( int matrix_order, char job, lapack_int n, double* a,
01134                            lapack_int lda, double* b, lapack_int ldb,
01135                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01136                            double* rscale );
01137 lapack_int LAPACKE_cggbal( int matrix_order, char job, lapack_int n,
01138                            lapack_complex_float* a, lapack_int lda,
01139                            lapack_complex_float* b, lapack_int ldb,
01140                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01141                            float* rscale );
01142 lapack_int LAPACKE_zggbal( int matrix_order, char job, lapack_int n,
01143                            lapack_complex_double* a, lapack_int lda,
01144                            lapack_complex_double* b, lapack_int ldb,
01145                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01146                            double* rscale );
01147 
01148 lapack_int LAPACKE_sgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01149                           LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
01150                           lapack_int lda, float* b, lapack_int ldb,
01151                           lapack_int* sdim, float* alphar, float* alphai,
01152                           float* beta, float* vsl, lapack_int ldvsl, float* vsr,
01153                           lapack_int ldvsr );
01154 lapack_int LAPACKE_dgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01155                           LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
01156                           lapack_int lda, double* b, lapack_int ldb,
01157                           lapack_int* sdim, double* alphar, double* alphai,
01158                           double* beta, double* vsl, lapack_int ldvsl,
01159                           double* vsr, lapack_int ldvsr );
01160 lapack_int LAPACKE_cgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01161                           LAPACK_C_SELECT2 selctg, lapack_int n,
01162                           lapack_complex_float* a, lapack_int lda,
01163                           lapack_complex_float* b, lapack_int ldb,
01164                           lapack_int* sdim, lapack_complex_float* alpha,
01165                           lapack_complex_float* beta, lapack_complex_float* vsl,
01166                           lapack_int ldvsl, lapack_complex_float* vsr,
01167                           lapack_int ldvsr );
01168 lapack_int LAPACKE_zgges( int matrix_order, char jobvsl, char jobvsr, char sort,
01169                           LAPACK_Z_SELECT2 selctg, lapack_int n,
01170                           lapack_complex_double* a, lapack_int lda,
01171                           lapack_complex_double* b, lapack_int ldb,
01172                           lapack_int* sdim, lapack_complex_double* alpha,
01173                           lapack_complex_double* beta,
01174                           lapack_complex_double* vsl, lapack_int ldvsl,
01175                           lapack_complex_double* vsr, lapack_int ldvsr );
01176 
01177 lapack_int LAPACKE_sggesx( int matrix_order, char jobvsl, char jobvsr,
01178                            char sort, LAPACK_S_SELECT3 selctg, char sense,
01179                            lapack_int n, float* a, lapack_int lda, float* b,
01180                            lapack_int ldb, lapack_int* sdim, float* alphar,
01181                            float* alphai, float* beta, float* vsl,
01182                            lapack_int ldvsl, float* vsr, lapack_int ldvsr,
01183                            float* rconde, float* rcondv );
01184 lapack_int LAPACKE_dggesx( int matrix_order, char jobvsl, char jobvsr,
01185                            char sort, LAPACK_D_SELECT3 selctg, char sense,
01186                            lapack_int n, double* a, lapack_int lda, double* b,
01187                            lapack_int ldb, lapack_int* sdim, double* alphar,
01188                            double* alphai, double* beta, double* vsl,
01189                            lapack_int ldvsl, double* vsr, lapack_int ldvsr,
01190                            double* rconde, double* rcondv );
01191 lapack_int LAPACKE_cggesx( int matrix_order, char jobvsl, char jobvsr,
01192                            char sort, LAPACK_C_SELECT2 selctg, char sense,
01193                            lapack_int n, lapack_complex_float* a,
01194                            lapack_int lda, lapack_complex_float* b,
01195                            lapack_int ldb, lapack_int* sdim,
01196                            lapack_complex_float* alpha,
01197                            lapack_complex_float* beta,
01198                            lapack_complex_float* vsl, lapack_int ldvsl,
01199                            lapack_complex_float* vsr, lapack_int ldvsr,
01200                            float* rconde, float* rcondv );
01201 lapack_int LAPACKE_zggesx( int matrix_order, char jobvsl, char jobvsr,
01202                            char sort, LAPACK_Z_SELECT2 selctg, char sense,
01203                            lapack_int n, lapack_complex_double* a,
01204                            lapack_int lda, lapack_complex_double* b,
01205                            lapack_int ldb, lapack_int* sdim,
01206                            lapack_complex_double* alpha,
01207                            lapack_complex_double* beta,
01208                            lapack_complex_double* vsl, lapack_int ldvsl,
01209                            lapack_complex_double* vsr, lapack_int ldvsr,
01210                            double* rconde, double* rcondv );
01211 
01212 lapack_int LAPACKE_sggev( int matrix_order, char jobvl, char jobvr,
01213                           lapack_int n, float* a, lapack_int lda, float* b,
01214                           lapack_int ldb, float* alphar, float* alphai,
01215                           float* beta, float* vl, lapack_int ldvl, float* vr,
01216                           lapack_int ldvr );
01217 lapack_int LAPACKE_dggev( int matrix_order, char jobvl, char jobvr,
01218                           lapack_int n, double* a, lapack_int lda, double* b,
01219                           lapack_int ldb, double* alphar, double* alphai,
01220                           double* beta, double* vl, lapack_int ldvl, double* vr,
01221                           lapack_int ldvr );
01222 lapack_int LAPACKE_cggev( int matrix_order, char jobvl, char jobvr,
01223                           lapack_int n, lapack_complex_float* a, lapack_int lda,
01224                           lapack_complex_float* b, lapack_int ldb,
01225                           lapack_complex_float* alpha,
01226                           lapack_complex_float* beta, lapack_complex_float* vl,
01227                           lapack_int ldvl, lapack_complex_float* vr,
01228                           lapack_int ldvr );
01229 lapack_int LAPACKE_zggev( int matrix_order, char jobvl, char jobvr,
01230                           lapack_int n, lapack_complex_double* a,
01231                           lapack_int lda, lapack_complex_double* b,
01232                           lapack_int ldb, lapack_complex_double* alpha,
01233                           lapack_complex_double* beta,
01234                           lapack_complex_double* vl, lapack_int ldvl,
01235                           lapack_complex_double* vr, lapack_int ldvr );
01236 
01237 lapack_int LAPACKE_sggevx( int matrix_order, char balanc, char jobvl,
01238                            char jobvr, char sense, lapack_int n, float* a,
01239                            lapack_int lda, float* b, lapack_int ldb,
01240                            float* alphar, float* alphai, float* beta, float* vl,
01241                            lapack_int ldvl, float* vr, lapack_int ldvr,
01242                            lapack_int* ilo, lapack_int* ihi, float* lscale,
01243                            float* rscale, float* abnrm, float* bbnrm,
01244                            float* rconde, float* rcondv );
01245 lapack_int LAPACKE_dggevx( int matrix_order, char balanc, char jobvl,
01246                            char jobvr, char sense, lapack_int n, double* a,
01247                            lapack_int lda, double* b, lapack_int ldb,
01248                            double* alphar, double* alphai, double* beta,
01249                            double* vl, lapack_int ldvl, double* vr,
01250                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
01251                            double* lscale, double* rscale, double* abnrm,
01252                            double* bbnrm, double* rconde, double* rcondv );
01253 lapack_int LAPACKE_cggevx( int matrix_order, char balanc, char jobvl,
01254                            char jobvr, char sense, lapack_int n,
01255                            lapack_complex_float* a, lapack_int lda,
01256                            lapack_complex_float* b, lapack_int ldb,
01257                            lapack_complex_float* alpha,
01258                            lapack_complex_float* beta, lapack_complex_float* vl,
01259                            lapack_int ldvl, lapack_complex_float* vr,
01260                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
01261                            float* lscale, float* rscale, float* abnrm,
01262                            float* bbnrm, float* rconde, float* rcondv );
01263 lapack_int LAPACKE_zggevx( int matrix_order, char balanc, char jobvl,
01264                            char jobvr, char sense, lapack_int n,
01265                            lapack_complex_double* a, lapack_int lda,
01266                            lapack_complex_double* b, lapack_int ldb,
01267                            lapack_complex_double* alpha,
01268                            lapack_complex_double* beta,
01269                            lapack_complex_double* vl, lapack_int ldvl,
01270                            lapack_complex_double* vr, lapack_int ldvr,
01271                            lapack_int* ilo, lapack_int* ihi, double* lscale,
01272                            double* rscale, double* abnrm, double* bbnrm,
01273                            double* rconde, double* rcondv );
01274 
01275 lapack_int LAPACKE_sggglm( int matrix_order, lapack_int n, lapack_int m,
01276                            lapack_int p, float* a, lapack_int lda, float* b,
01277                            lapack_int ldb, float* d, float* x, float* y );
01278 lapack_int LAPACKE_dggglm( int matrix_order, lapack_int n, lapack_int m,
01279                            lapack_int p, double* a, lapack_int lda, double* b,
01280                            lapack_int ldb, double* d, double* x, double* y );
01281 lapack_int LAPACKE_cggglm( int matrix_order, lapack_int n, lapack_int m,
01282                            lapack_int p, lapack_complex_float* a,
01283                            lapack_int lda, lapack_complex_float* b,
01284                            lapack_int ldb, lapack_complex_float* d,
01285                            lapack_complex_float* x, lapack_complex_float* y );
01286 lapack_int LAPACKE_zggglm( int matrix_order, lapack_int n, lapack_int m,
01287                            lapack_int p, lapack_complex_double* a,
01288                            lapack_int lda, lapack_complex_double* b,
01289                            lapack_int ldb, lapack_complex_double* d,
01290                            lapack_complex_double* x, lapack_complex_double* y );
01291 
01292 lapack_int LAPACKE_sgghrd( int matrix_order, char compq, char compz,
01293                            lapack_int n, lapack_int ilo, lapack_int ihi,
01294                            float* a, lapack_int lda, float* b, lapack_int ldb,
01295                            float* q, lapack_int ldq, float* z, lapack_int ldz );
01296 lapack_int LAPACKE_dgghrd( int matrix_order, char compq, char compz,
01297                            lapack_int n, lapack_int ilo, lapack_int ihi,
01298                            double* a, lapack_int lda, double* b, lapack_int ldb,
01299                            double* q, lapack_int ldq, double* z,
01300                            lapack_int ldz );
01301 lapack_int LAPACKE_cgghrd( int matrix_order, char compq, char compz,
01302                            lapack_int n, lapack_int ilo, lapack_int ihi,
01303                            lapack_complex_float* a, lapack_int lda,
01304                            lapack_complex_float* b, lapack_int ldb,
01305                            lapack_complex_float* q, lapack_int ldq,
01306                            lapack_complex_float* z, lapack_int ldz );
01307 lapack_int LAPACKE_zgghrd( int matrix_order, char compq, char compz,
01308                            lapack_int n, lapack_int ilo, lapack_int ihi,
01309                            lapack_complex_double* a, lapack_int lda,
01310                            lapack_complex_double* b, lapack_int ldb,
01311                            lapack_complex_double* q, lapack_int ldq,
01312                            lapack_complex_double* z, lapack_int ldz );
01313 
01314 lapack_int LAPACKE_sgglse( int matrix_order, lapack_int m, lapack_int n,
01315                            lapack_int p, float* a, lapack_int lda, float* b,
01316                            lapack_int ldb, float* c, float* d, float* x );
01317 lapack_int LAPACKE_dgglse( int matrix_order, lapack_int m, lapack_int n,
01318                            lapack_int p, double* a, lapack_int lda, double* b,
01319                            lapack_int ldb, double* c, double* d, double* x );
01320 lapack_int LAPACKE_cgglse( int matrix_order, lapack_int m, lapack_int n,
01321                            lapack_int p, lapack_complex_float* a,
01322                            lapack_int lda, lapack_complex_float* b,
01323                            lapack_int ldb, lapack_complex_float* c,
01324                            lapack_complex_float* d, lapack_complex_float* x );
01325 lapack_int LAPACKE_zgglse( int matrix_order, lapack_int m, lapack_int n,
01326                            lapack_int p, lapack_complex_double* a,
01327                            lapack_int lda, lapack_complex_double* b,
01328                            lapack_int ldb, lapack_complex_double* c,
01329                            lapack_complex_double* d, lapack_complex_double* x );
01330 
01331 lapack_int LAPACKE_sggqrf( int matrix_order, lapack_int n, lapack_int m,
01332                            lapack_int p, float* a, lapack_int lda, float* taua,
01333                            float* b, lapack_int ldb, float* taub );
01334 lapack_int LAPACKE_dggqrf( int matrix_order, lapack_int n, lapack_int m,
01335                            lapack_int p, double* a, lapack_int lda,
01336                            double* taua, double* b, lapack_int ldb,
01337                            double* taub );
01338 lapack_int LAPACKE_cggqrf( int matrix_order, lapack_int n, lapack_int m,
01339                            lapack_int p, lapack_complex_float* a,
01340                            lapack_int lda, lapack_complex_float* taua,
01341                            lapack_complex_float* b, lapack_int ldb,
01342                            lapack_complex_float* taub );
01343 lapack_int LAPACKE_zggqrf( int matrix_order, lapack_int n, lapack_int m,
01344                            lapack_int p, lapack_complex_double* a,
01345                            lapack_int lda, lapack_complex_double* taua,
01346                            lapack_complex_double* b, lapack_int ldb,
01347                            lapack_complex_double* taub );
01348 
01349 lapack_int LAPACKE_sggrqf( int matrix_order, lapack_int m, lapack_int p,
01350                            lapack_int n, float* a, lapack_int lda, float* taua,
01351                            float* b, lapack_int ldb, float* taub );
01352 lapack_int LAPACKE_dggrqf( int matrix_order, lapack_int m, lapack_int p,
01353                            lapack_int n, double* a, lapack_int lda,
01354                            double* taua, double* b, lapack_int ldb,
01355                            double* taub );
01356 lapack_int LAPACKE_cggrqf( int matrix_order, lapack_int m, lapack_int p,
01357                            lapack_int n, lapack_complex_float* a,
01358                            lapack_int lda, lapack_complex_float* taua,
01359                            lapack_complex_float* b, lapack_int ldb,
01360                            lapack_complex_float* taub );
01361 lapack_int LAPACKE_zggrqf( int matrix_order, lapack_int m, lapack_int p,
01362                            lapack_int n, lapack_complex_double* a,
01363                            lapack_int lda, lapack_complex_double* taua,
01364                            lapack_complex_double* b, lapack_int ldb,
01365                            lapack_complex_double* taub );
01366 
01367 lapack_int LAPACKE_sggsvd( int matrix_order, char jobu, char jobv, char jobq,
01368                            lapack_int m, lapack_int n, lapack_int p,
01369                            lapack_int* k, lapack_int* l, float* a,
01370                            lapack_int lda, float* b, lapack_int ldb,
01371                            float* alpha, float* beta, float* u, lapack_int ldu,
01372                            float* v, lapack_int ldv, float* q, lapack_int ldq,
01373                            lapack_int* iwork );
01374 lapack_int LAPACKE_dggsvd( int matrix_order, char jobu, char jobv, char jobq,
01375                            lapack_int m, lapack_int n, lapack_int p,
01376                            lapack_int* k, lapack_int* l, double* a,
01377                            lapack_int lda, double* b, lapack_int ldb,
01378                            double* alpha, double* beta, double* u,
01379                            lapack_int ldu, double* v, lapack_int ldv, double* q,
01380                            lapack_int ldq, lapack_int* iwork );
01381 lapack_int LAPACKE_cggsvd( 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_float* a, lapack_int lda,
01385                            lapack_complex_float* b, lapack_int ldb,
01386                            float* alpha, float* beta, lapack_complex_float* u,
01387                            lapack_int ldu, lapack_complex_float* v,
01388                            lapack_int ldv, lapack_complex_float* q,
01389                            lapack_int ldq, lapack_int* iwork );
01390 lapack_int LAPACKE_zggsvd( int matrix_order, char jobu, char jobv, char jobq,
01391                            lapack_int m, lapack_int n, lapack_int p,
01392                            lapack_int* k, lapack_int* l,
01393                            lapack_complex_double* a, lapack_int lda,
01394                            lapack_complex_double* b, lapack_int ldb,
01395                            double* alpha, double* beta,
01396                            lapack_complex_double* u, lapack_int ldu,
01397                            lapack_complex_double* v, lapack_int ldv,
01398                            lapack_complex_double* q, lapack_int ldq,
01399                            lapack_int* iwork );
01400 
01401 lapack_int LAPACKE_sggsvp( int matrix_order, char jobu, char jobv, char jobq,
01402                            lapack_int m, lapack_int p, lapack_int n, float* a,
01403                            lapack_int lda, float* b, lapack_int ldb, float tola,
01404                            float tolb, lapack_int* k, lapack_int* l, float* u,
01405                            lapack_int ldu, float* v, lapack_int ldv, float* q,
01406                            lapack_int ldq );
01407 lapack_int LAPACKE_dggsvp( int matrix_order, char jobu, char jobv, char jobq,
01408                            lapack_int m, lapack_int p, lapack_int n, double* a,
01409                            lapack_int lda, double* b, lapack_int ldb,
01410                            double tola, double tolb, lapack_int* k,
01411                            lapack_int* l, double* u, lapack_int ldu, double* v,
01412                            lapack_int ldv, double* q, lapack_int ldq );
01413 lapack_int LAPACKE_cggsvp( int matrix_order, char jobu, char jobv, char jobq,
01414                            lapack_int m, lapack_int p, lapack_int n,
01415                            lapack_complex_float* a, lapack_int lda,
01416                            lapack_complex_float* b, lapack_int ldb, float tola,
01417                            float tolb, lapack_int* k, lapack_int* l,
01418                            lapack_complex_float* u, lapack_int ldu,
01419                            lapack_complex_float* v, lapack_int ldv,
01420                            lapack_complex_float* q, lapack_int ldq );
01421 lapack_int LAPACKE_zggsvp( int matrix_order, char jobu, char jobv, char jobq,
01422                            lapack_int m, lapack_int p, lapack_int n,
01423                            lapack_complex_double* a, lapack_int lda,
01424                            lapack_complex_double* b, lapack_int ldb,
01425                            double tola, double tolb, lapack_int* k,
01426                            lapack_int* l, lapack_complex_double* u,
01427                            lapack_int ldu, lapack_complex_double* v,
01428                            lapack_int ldv, lapack_complex_double* q,
01429                            lapack_int ldq );
01430 
01431 lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
01432                            const float* d, const float* du, const float* du2,
01433                            const lapack_int* ipiv, float anorm, float* rcond );
01434 lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
01435                            const double* d, const double* du, const double* du2,
01436                            const lapack_int* ipiv, double anorm,
01437                            double* rcond );
01438 lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
01439                            const lapack_complex_float* dl,
01440                            const lapack_complex_float* d,
01441                            const lapack_complex_float* du,
01442                            const lapack_complex_float* du2,
01443                            const lapack_int* ipiv, float anorm, float* rcond );
01444 lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
01445                            const lapack_complex_double* dl,
01446                            const lapack_complex_double* d,
01447                            const lapack_complex_double* du,
01448                            const lapack_complex_double* du2,
01449                            const lapack_int* ipiv, double anorm,
01450                            double* rcond );
01451 
01452 lapack_int LAPACKE_sgtrfs( int matrix_order, char trans, lapack_int n,
01453                            lapack_int nrhs, const float* dl, const float* d,
01454                            const float* du, const float* dlf, const float* df,
01455                            const float* duf, const float* du2,
01456                            const lapack_int* ipiv, const float* b,
01457                            lapack_int ldb, float* x, lapack_int ldx,
01458                            float* ferr, float* berr );
01459 lapack_int LAPACKE_dgtrfs( int matrix_order, char trans, lapack_int n,
01460                            lapack_int nrhs, const double* dl, const double* d,
01461                            const double* du, const double* dlf,
01462                            const double* df, const double* duf,
01463                            const double* du2, const lapack_int* ipiv,
01464                            const double* b, lapack_int ldb, double* x,
01465                            lapack_int ldx, double* ferr, double* berr );
01466 lapack_int LAPACKE_cgtrfs( int matrix_order, char trans, lapack_int n,
01467                            lapack_int nrhs, const lapack_complex_float* dl,
01468                            const lapack_complex_float* d,
01469                            const lapack_complex_float* du,
01470                            const lapack_complex_float* dlf,
01471                            const lapack_complex_float* df,
01472                            const lapack_complex_float* duf,
01473                            const lapack_complex_float* du2,
01474                            const lapack_int* ipiv,
01475                            const lapack_complex_float* b, lapack_int ldb,
01476                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01477                            float* berr );
01478 lapack_int LAPACKE_zgtrfs( int matrix_order, char trans, lapack_int n,
01479                            lapack_int nrhs, const lapack_complex_double* dl,
01480                            const lapack_complex_double* d,
01481                            const lapack_complex_double* du,
01482                            const lapack_complex_double* dlf,
01483                            const lapack_complex_double* df,
01484                            const lapack_complex_double* duf,
01485                            const lapack_complex_double* du2,
01486                            const lapack_int* ipiv,
01487                            const lapack_complex_double* b, lapack_int ldb,
01488                            lapack_complex_double* x, lapack_int ldx,
01489                            double* ferr, double* berr );
01490 
01491 lapack_int LAPACKE_sgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01492                           float* dl, float* d, float* du, float* b,
01493                           lapack_int ldb );
01494 lapack_int LAPACKE_dgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01495                           double* dl, double* d, double* du, double* b,
01496                           lapack_int ldb );
01497 lapack_int LAPACKE_cgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01498                           lapack_complex_float* dl, lapack_complex_float* d,
01499                           lapack_complex_float* du, lapack_complex_float* b,
01500                           lapack_int ldb );
01501 lapack_int LAPACKE_zgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
01502                           lapack_complex_double* dl, lapack_complex_double* d,
01503                           lapack_complex_double* du, lapack_complex_double* b,
01504                           lapack_int ldb );
01505 
01506 lapack_int LAPACKE_sgtsvx( int matrix_order, char fact, char trans,
01507                            lapack_int n, lapack_int nrhs, const float* dl,
01508                            const float* d, const float* du, float* dlf,
01509                            float* df, float* duf, float* du2, lapack_int* ipiv,
01510                            const float* b, lapack_int ldb, float* x,
01511                            lapack_int ldx, float* rcond, float* ferr,
01512                            float* berr );
01513 lapack_int LAPACKE_dgtsvx( int matrix_order, char fact, char trans,
01514                            lapack_int n, lapack_int nrhs, const double* dl,
01515                            const double* d, const double* du, double* dlf,
01516                            double* df, double* duf, double* du2,
01517                            lapack_int* ipiv, const double* b, lapack_int ldb,
01518                            double* x, lapack_int ldx, double* rcond,
01519                            double* ferr, double* berr );
01520 lapack_int LAPACKE_cgtsvx( int matrix_order, char fact, char trans,
01521                            lapack_int n, lapack_int nrhs,
01522                            const lapack_complex_float* dl,
01523                            const lapack_complex_float* d,
01524                            const lapack_complex_float* du,
01525                            lapack_complex_float* dlf, lapack_complex_float* df,
01526                            lapack_complex_float* duf, lapack_complex_float* du2,
01527                            lapack_int* ipiv, const lapack_complex_float* b,
01528                            lapack_int ldb, lapack_complex_float* x,
01529                            lapack_int ldx, float* rcond, float* ferr,
01530                            float* berr );
01531 lapack_int LAPACKE_zgtsvx( int matrix_order, char fact, char trans,
01532                            lapack_int n, lapack_int nrhs,
01533                            const lapack_complex_double* dl,
01534                            const lapack_complex_double* d,
01535                            const lapack_complex_double* du,
01536                            lapack_complex_double* dlf,
01537                            lapack_complex_double* df,
01538                            lapack_complex_double* duf,
01539                            lapack_complex_double* du2, lapack_int* ipiv,
01540                            const lapack_complex_double* b, lapack_int ldb,
01541                            lapack_complex_double* x, lapack_int ldx,
01542                            double* rcond, double* ferr, double* berr );
01543 
01544 lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
01545                            float* du2, lapack_int* ipiv );
01546 lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
01547                            double* du2, lapack_int* ipiv );
01548 lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
01549                            lapack_complex_float* d, lapack_complex_float* du,
01550                            lapack_complex_float* du2, lapack_int* ipiv );
01551 lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
01552                            lapack_complex_double* d, lapack_complex_double* du,
01553                            lapack_complex_double* du2, lapack_int* ipiv );
01554 
01555 lapack_int LAPACKE_sgttrs( int matrix_order, char trans, lapack_int n,
01556                            lapack_int nrhs, const float* dl, const float* d,
01557                            const float* du, const float* du2,
01558                            const lapack_int* ipiv, float* b, lapack_int ldb );
01559 lapack_int LAPACKE_dgttrs( int matrix_order, char trans, lapack_int n,
01560                            lapack_int nrhs, const double* dl, const double* d,
01561                            const double* du, const double* du2,
01562                            const lapack_int* ipiv, double* b, lapack_int ldb );
01563 lapack_int LAPACKE_cgttrs( int matrix_order, char trans, lapack_int n,
01564                            lapack_int nrhs, const lapack_complex_float* dl,
01565                            const lapack_complex_float* d,
01566                            const lapack_complex_float* du,
01567                            const lapack_complex_float* du2,
01568                            const lapack_int* ipiv, lapack_complex_float* b,
01569                            lapack_int ldb );
01570 lapack_int LAPACKE_zgttrs( int matrix_order, char trans, lapack_int n,
01571                            lapack_int nrhs, const lapack_complex_double* dl,
01572                            const lapack_complex_double* d,
01573                            const lapack_complex_double* du,
01574                            const lapack_complex_double* du2,
01575                            const lapack_int* ipiv, lapack_complex_double* b,
01576                            lapack_int ldb );
01577 
01578 lapack_int LAPACKE_chbev( 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_zhbev( 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_chbevd( int matrix_order, char jobz, char uplo, lapack_int n,
01588                            lapack_int kd, lapack_complex_float* ab,
01589                            lapack_int ldab, float* w, lapack_complex_float* z,
01590                            lapack_int ldz );
01591 lapack_int LAPACKE_zhbevd( int matrix_order, char jobz, char uplo, lapack_int n,
01592                            lapack_int kd, lapack_complex_double* ab,
01593                            lapack_int ldab, double* w, lapack_complex_double* z,
01594                            lapack_int ldz );
01595 
01596 lapack_int LAPACKE_chbevx( int matrix_order, char jobz, char range, char uplo,
01597                            lapack_int n, lapack_int kd,
01598                            lapack_complex_float* ab, lapack_int ldab,
01599                            lapack_complex_float* q, lapack_int ldq, float vl,
01600                            float vu, lapack_int il, lapack_int iu, float abstol,
01601                            lapack_int* m, float* w, lapack_complex_float* z,
01602                            lapack_int ldz, lapack_int* ifail );
01603 lapack_int LAPACKE_zhbevx( int matrix_order, char jobz, char range, char uplo,
01604                            lapack_int n, lapack_int kd,
01605                            lapack_complex_double* ab, lapack_int ldab,
01606                            lapack_complex_double* q, lapack_int ldq, double vl,
01607                            double vu, lapack_int il, lapack_int iu,
01608                            double abstol, lapack_int* m, double* w,
01609                            lapack_complex_double* z, lapack_int ldz,
01610                            lapack_int* ifail );
01611 
01612 lapack_int LAPACKE_chbgst( int matrix_order, char vect, char uplo, lapack_int n,
01613                            lapack_int ka, lapack_int kb,
01614                            lapack_complex_float* ab, lapack_int ldab,
01615                            const lapack_complex_float* bb, lapack_int ldbb,
01616                            lapack_complex_float* x, lapack_int ldx );
01617 lapack_int LAPACKE_zhbgst( int matrix_order, char vect, char uplo, lapack_int n,
01618                            lapack_int ka, lapack_int kb,
01619                            lapack_complex_double* ab, lapack_int ldab,
01620                            const lapack_complex_double* bb, lapack_int ldbb,
01621                            lapack_complex_double* x, lapack_int ldx );
01622 
01623 lapack_int LAPACKE_chbgv( int matrix_order, char jobz, char uplo, lapack_int n,
01624                           lapack_int ka, lapack_int kb,
01625                           lapack_complex_float* ab, lapack_int ldab,
01626                           lapack_complex_float* bb, lapack_int ldbb, float* w,
01627                           lapack_complex_float* z, lapack_int ldz );
01628 lapack_int LAPACKE_zhbgv( int matrix_order, char jobz, char uplo, lapack_int n,
01629                           lapack_int ka, lapack_int kb,
01630                           lapack_complex_double* ab, lapack_int ldab,
01631                           lapack_complex_double* bb, lapack_int ldbb, double* w,
01632                           lapack_complex_double* z, lapack_int ldz );
01633 
01634 lapack_int LAPACKE_chbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
01635                            lapack_int ka, lapack_int kb,
01636                            lapack_complex_float* ab, lapack_int ldab,
01637                            lapack_complex_float* bb, lapack_int ldbb, float* w,
01638                            lapack_complex_float* z, lapack_int ldz );
01639 lapack_int LAPACKE_zhbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
01640                            lapack_int ka, lapack_int kb,
01641                            lapack_complex_double* ab, lapack_int ldab,
01642                            lapack_complex_double* bb, lapack_int ldbb,
01643                            double* w, lapack_complex_double* z,
01644                            lapack_int ldz );
01645 
01646 lapack_int LAPACKE_chbgvx( int matrix_order, char jobz, char range, char uplo,
01647                            lapack_int n, lapack_int ka, lapack_int kb,
01648                            lapack_complex_float* ab, lapack_int ldab,
01649                            lapack_complex_float* bb, lapack_int ldbb,
01650                            lapack_complex_float* q, lapack_int ldq, float vl,
01651                            float vu, lapack_int il, lapack_int iu, float abstol,
01652                            lapack_int* m, float* w, lapack_complex_float* z,
01653                            lapack_int ldz, lapack_int* ifail );
01654 lapack_int LAPACKE_zhbgvx( int matrix_order, char jobz, char range, char uplo,
01655                            lapack_int n, lapack_int ka, lapack_int kb,
01656                            lapack_complex_double* ab, lapack_int ldab,
01657                            lapack_complex_double* bb, lapack_int ldbb,
01658                            lapack_complex_double* q, lapack_int ldq, double vl,
01659                            double vu, lapack_int il, lapack_int iu,
01660                            double abstol, lapack_int* m, double* w,
01661                            lapack_complex_double* z, lapack_int ldz,
01662                            lapack_int* ifail );
01663 
01664 lapack_int LAPACKE_chbtrd( int matrix_order, char vect, char uplo, lapack_int n,
01665                            lapack_int kd, lapack_complex_float* ab,
01666                            lapack_int ldab, float* d, float* e,
01667                            lapack_complex_float* q, lapack_int ldq );
01668 lapack_int LAPACKE_zhbtrd( int matrix_order, char vect, char uplo, lapack_int n,
01669                            lapack_int kd, lapack_complex_double* ab,
01670                            lapack_int ldab, double* d, double* e,
01671                            lapack_complex_double* q, lapack_int ldq );
01672 
01673 lapack_int LAPACKE_checon( int matrix_order, char uplo, lapack_int n,
01674                            const lapack_complex_float* a, lapack_int lda,
01675                            const lapack_int* ipiv, float anorm, float* rcond );
01676 lapack_int LAPACKE_zhecon( int matrix_order, char uplo, lapack_int n,
01677                            const lapack_complex_double* a, lapack_int lda,
01678                            const lapack_int* ipiv, double anorm,
01679                            double* rcond );
01680 
01681 lapack_int LAPACKE_cheequb( int matrix_order, char uplo, lapack_int n,
01682                             const lapack_complex_float* a, lapack_int lda,
01683                             float* s, float* scond, float* amax );
01684 lapack_int LAPACKE_zheequb( int matrix_order, char uplo, lapack_int n,
01685                             const lapack_complex_double* a, lapack_int lda,
01686                             double* s, double* scond, double* amax );
01687 
01688 lapack_int LAPACKE_cheev( int matrix_order, char jobz, char uplo, lapack_int n,
01689                           lapack_complex_float* a, lapack_int lda, float* w );
01690 lapack_int LAPACKE_zheev( int matrix_order, char jobz, char uplo, lapack_int n,
01691                           lapack_complex_double* a, lapack_int lda, double* w );
01692 
01693 lapack_int LAPACKE_cheevd( int matrix_order, char jobz, char uplo, lapack_int n,
01694                            lapack_complex_float* a, lapack_int lda, float* w );
01695 lapack_int LAPACKE_zheevd( int matrix_order, char jobz, char uplo, lapack_int n,
01696                            lapack_complex_double* a, lapack_int lda,
01697                            double* w );
01698 
01699 lapack_int LAPACKE_cheevr( int matrix_order, char jobz, char range, char uplo,
01700                            lapack_int n, lapack_complex_float* a,
01701                            lapack_int lda, float vl, float vu, lapack_int il,
01702                            lapack_int iu, float abstol, lapack_int* m, float* w,
01703                            lapack_complex_float* z, lapack_int ldz,
01704                            lapack_int* isuppz );
01705 lapack_int LAPACKE_zheevr( int matrix_order, char jobz, char range, char uplo,
01706                            lapack_int n, lapack_complex_double* a,
01707                            lapack_int lda, double vl, double vu, lapack_int il,
01708                            lapack_int iu, double abstol, lapack_int* m,
01709                            double* w, lapack_complex_double* z, lapack_int ldz,
01710                            lapack_int* isuppz );
01711 
01712 lapack_int LAPACKE_cheevx( int matrix_order, char jobz, char range, char uplo,
01713                            lapack_int n, lapack_complex_float* a,
01714                            lapack_int lda, float vl, float vu, lapack_int il,
01715                            lapack_int iu, float abstol, lapack_int* m, float* w,
01716                            lapack_complex_float* z, lapack_int ldz,
01717                            lapack_int* ifail );
01718 lapack_int LAPACKE_zheevx( int matrix_order, char jobz, char range, char uplo,
01719                            lapack_int n, lapack_complex_double* a,
01720                            lapack_int lda, double vl, double vu, lapack_int il,
01721                            lapack_int iu, double abstol, lapack_int* m,
01722                            double* w, lapack_complex_double* z, lapack_int ldz,
01723                            lapack_int* ifail );
01724 
01725 lapack_int LAPACKE_chegst( int matrix_order, lapack_int itype, char uplo,
01726                            lapack_int n, lapack_complex_float* a,
01727                            lapack_int lda, const lapack_complex_float* b,
01728                            lapack_int ldb );
01729 lapack_int LAPACKE_zhegst( int matrix_order, lapack_int itype, char uplo,
01730                            lapack_int n, lapack_complex_double* a,
01731                            lapack_int lda, const lapack_complex_double* b,
01732                            lapack_int ldb );
01733 
01734 lapack_int LAPACKE_chegv( 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_zhegv( 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_chegvd( int matrix_order, lapack_int itype, char jobz,
01744                            char uplo, lapack_int n, lapack_complex_float* a,
01745                            lapack_int lda, lapack_complex_float* b,
01746                            lapack_int ldb, float* w );
01747 lapack_int LAPACKE_zhegvd( int matrix_order, lapack_int itype, char jobz,
01748                            char uplo, lapack_int n, lapack_complex_double* a,
01749                            lapack_int lda, lapack_complex_double* b,
01750                            lapack_int ldb, double* w );
01751 
01752 lapack_int LAPACKE_chegvx( int matrix_order, lapack_int itype, char jobz,
01753                            char range, char uplo, lapack_int n,
01754                            lapack_complex_float* a, lapack_int lda,
01755                            lapack_complex_float* b, lapack_int ldb, float vl,
01756                            float vu, lapack_int il, lapack_int iu, float abstol,
01757                            lapack_int* m, float* w, lapack_complex_float* z,
01758                            lapack_int ldz, lapack_int* ifail );
01759 lapack_int LAPACKE_zhegvx( int matrix_order, lapack_int itype, char jobz,
01760                            char range, char uplo, lapack_int n,
01761                            lapack_complex_double* a, lapack_int lda,
01762                            lapack_complex_double* b, lapack_int ldb, double vl,
01763                            double vu, lapack_int il, lapack_int iu,
01764                            double abstol, lapack_int* m, double* w,
01765                            lapack_complex_double* z, lapack_int ldz,
01766                            lapack_int* ifail );
01767 
01768 lapack_int LAPACKE_cherfs( int matrix_order, char uplo, lapack_int n,
01769                            lapack_int nrhs, const lapack_complex_float* a,
01770                            lapack_int lda, const lapack_complex_float* af,
01771                            lapack_int ldaf, const lapack_int* ipiv,
01772                            const lapack_complex_float* b, lapack_int ldb,
01773                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01774                            float* berr );
01775 lapack_int LAPACKE_zherfs( int matrix_order, char uplo, lapack_int n,
01776                            lapack_int nrhs, const lapack_complex_double* a,
01777                            lapack_int lda, const lapack_complex_double* af,
01778                            lapack_int ldaf, const lapack_int* ipiv,
01779                            const lapack_complex_double* b, lapack_int ldb,
01780                            lapack_complex_double* x, lapack_int ldx,
01781                            double* ferr, double* berr );
01782 
01783 lapack_int LAPACKE_cherfsx( int matrix_order, char uplo, char equed,
01784                             lapack_int n, lapack_int nrhs,
01785                             const lapack_complex_float* a, lapack_int lda,
01786                             const lapack_complex_float* af, lapack_int ldaf,
01787                             const lapack_int* ipiv, const float* s,
01788                             const lapack_complex_float* b, lapack_int ldb,
01789                             lapack_complex_float* x, lapack_int ldx,
01790                             float* rcond, float* berr, lapack_int n_err_bnds,
01791                             float* err_bnds_norm, float* err_bnds_comp,
01792                             lapack_int nparams, float* params );
01793 lapack_int LAPACKE_zherfsx( int matrix_order, char uplo, char equed,
01794                             lapack_int n, lapack_int nrhs,
01795                             const lapack_complex_double* a, lapack_int lda,
01796                             const lapack_complex_double* af, lapack_int ldaf,
01797                             const lapack_int* ipiv, const double* s,
01798                             const lapack_complex_double* b, lapack_int ldb,
01799                             lapack_complex_double* x, lapack_int ldx,
01800                             double* rcond, double* berr, lapack_int n_err_bnds,
01801                             double* err_bnds_norm, double* err_bnds_comp,
01802                             lapack_int nparams, double* params );
01803 
01804 lapack_int LAPACKE_chesv( int matrix_order, char uplo, lapack_int n,
01805                           lapack_int nrhs, lapack_complex_float* a,
01806                           lapack_int lda, lapack_int* ipiv,
01807                           lapack_complex_float* b, lapack_int ldb );
01808 lapack_int LAPACKE_zhesv( int matrix_order, char uplo, lapack_int n,
01809                           lapack_int nrhs, lapack_complex_double* a,
01810                           lapack_int lda, lapack_int* ipiv,
01811                           lapack_complex_double* b, lapack_int ldb );
01812 
01813 lapack_int LAPACKE_chesvx( int matrix_order, char fact, char uplo, lapack_int n,
01814                            lapack_int nrhs, const lapack_complex_float* a,
01815                            lapack_int lda, lapack_complex_float* af,
01816                            lapack_int ldaf, lapack_int* ipiv,
01817                            const lapack_complex_float* b, lapack_int ldb,
01818                            lapack_complex_float* x, lapack_int ldx,
01819                            float* rcond, float* ferr, float* berr );
01820 lapack_int LAPACKE_zhesvx( int matrix_order, char fact, char uplo, lapack_int n,
01821                            lapack_int nrhs, const lapack_complex_double* a,
01822                            lapack_int lda, lapack_complex_double* af,
01823                            lapack_int ldaf, lapack_int* ipiv,
01824                            const lapack_complex_double* b, lapack_int ldb,
01825                            lapack_complex_double* x, lapack_int ldx,
01826                            double* rcond, double* ferr, double* berr );
01827 
01828 lapack_int LAPACKE_chesvxx( int matrix_order, char fact, char uplo,
01829                             lapack_int n, lapack_int nrhs,
01830                             lapack_complex_float* a, lapack_int lda,
01831                             lapack_complex_float* af, lapack_int ldaf,
01832                             lapack_int* ipiv, char* equed, float* s,
01833                             lapack_complex_float* b, lapack_int ldb,
01834                             lapack_complex_float* x, lapack_int ldx,
01835                             float* rcond, float* rpvgrw, float* berr,
01836                             lapack_int n_err_bnds, float* err_bnds_norm,
01837                             float* err_bnds_comp, lapack_int nparams,
01838                             float* params );
01839 lapack_int LAPACKE_zhesvxx( int matrix_order, char fact, char uplo,
01840                             lapack_int n, lapack_int nrhs,
01841                             lapack_complex_double* a, lapack_int lda,
01842                             lapack_complex_double* af, lapack_int ldaf,
01843                             lapack_int* ipiv, char* equed, double* s,
01844                             lapack_complex_double* b, lapack_int ldb,
01845                             lapack_complex_double* x, lapack_int ldx,
01846                             double* rcond, double* rpvgrw, double* berr,
01847                             lapack_int n_err_bnds, double* err_bnds_norm,
01848                             double* err_bnds_comp, lapack_int nparams,
01849                             double* params );
01850 
01851 lapack_int LAPACKE_chetrd( int matrix_order, char uplo, lapack_int n,
01852                            lapack_complex_float* a, lapack_int lda, float* d,
01853                            float* e, lapack_complex_float* tau );
01854 lapack_int LAPACKE_zhetrd( int matrix_order, char uplo, lapack_int n,
01855                            lapack_complex_double* a, lapack_int lda, double* d,
01856                            double* e, lapack_complex_double* tau );
01857 
01858 lapack_int LAPACKE_chetrf( int matrix_order, char uplo, lapack_int n,
01859                            lapack_complex_float* a, lapack_int lda,
01860                            lapack_int* ipiv );
01861 lapack_int LAPACKE_zhetrf( int matrix_order, char uplo, lapack_int n,
01862                            lapack_complex_double* a, lapack_int lda,
01863                            lapack_int* ipiv );
01864 
01865 lapack_int LAPACKE_chetri( int matrix_order, char uplo, lapack_int n,
01866                            lapack_complex_float* a, lapack_int lda,
01867                            const lapack_int* ipiv );
01868 lapack_int LAPACKE_zhetri( int matrix_order, char uplo, lapack_int n,
01869                            lapack_complex_double* a, lapack_int lda,
01870                            const lapack_int* ipiv );
01871 
01872 lapack_int LAPACKE_chetrs( int matrix_order, char uplo, lapack_int n,
01873                            lapack_int nrhs, const lapack_complex_float* a,
01874                            lapack_int lda, const lapack_int* ipiv,
01875                            lapack_complex_float* b, lapack_int ldb );
01876 lapack_int LAPACKE_zhetrs( int matrix_order, char uplo, lapack_int n,
01877                            lapack_int nrhs, const lapack_complex_double* a,
01878                            lapack_int lda, const lapack_int* ipiv,
01879                            lapack_complex_double* b, lapack_int ldb );
01880 
01881 lapack_int LAPACKE_chfrk( int matrix_order, char transr, char uplo, char trans,
01882                           lapack_int n, lapack_int k, float alpha,
01883                           const lapack_complex_float* a, lapack_int lda,
01884                           float beta, lapack_complex_float* c );
01885 lapack_int LAPACKE_zhfrk( int matrix_order, char transr, char uplo, char trans,
01886                           lapack_int n, lapack_int k, double alpha,
01887                           const lapack_complex_double* a, lapack_int lda,
01888                           double beta, lapack_complex_double* c );
01889 
01890 lapack_int LAPACKE_shgeqz( int matrix_order, char job, char compq, char compz,
01891                            lapack_int n, lapack_int ilo, lapack_int ihi,
01892                            float* h, lapack_int ldh, float* t, lapack_int ldt,
01893                            float* alphar, float* alphai, float* beta, float* q,
01894                            lapack_int ldq, float* z, lapack_int ldz );
01895 lapack_int LAPACKE_dhgeqz( int matrix_order, char job, char compq, char compz,
01896                            lapack_int n, lapack_int ilo, lapack_int ihi,
01897                            double* h, lapack_int ldh, double* t, lapack_int ldt,
01898                            double* alphar, double* alphai, double* beta,
01899                            double* q, lapack_int ldq, double* z,
01900                            lapack_int ldz );
01901 lapack_int LAPACKE_chgeqz( int matrix_order, char job, char compq, char compz,
01902                            lapack_int n, lapack_int ilo, lapack_int ihi,
01903                            lapack_complex_float* h, lapack_int ldh,
01904                            lapack_complex_float* t, lapack_int ldt,
01905                            lapack_complex_float* alpha,
01906                            lapack_complex_float* beta, lapack_complex_float* q,
01907                            lapack_int ldq, lapack_complex_float* z,
01908                            lapack_int ldz );
01909 lapack_int LAPACKE_zhgeqz( int matrix_order, char job, char compq, char compz,
01910                            lapack_int n, lapack_int ilo, lapack_int ihi,
01911                            lapack_complex_double* h, lapack_int ldh,
01912                            lapack_complex_double* t, lapack_int ldt,
01913                            lapack_complex_double* alpha,
01914                            lapack_complex_double* beta,
01915                            lapack_complex_double* q, lapack_int ldq,
01916                            lapack_complex_double* z, lapack_int ldz );
01917 
01918 lapack_int LAPACKE_chpcon( int matrix_order, char uplo, lapack_int n,
01919                            const lapack_complex_float* ap,
01920                            const lapack_int* ipiv, float anorm, float* rcond );
01921 lapack_int LAPACKE_zhpcon( int matrix_order, char uplo, lapack_int n,
01922                            const lapack_complex_double* ap,
01923                            const lapack_int* ipiv, double anorm,
01924                            double* rcond );
01925 
01926 lapack_int LAPACKE_chpev( int matrix_order, char jobz, char uplo, lapack_int n,
01927                           lapack_complex_float* ap, float* w,
01928                           lapack_complex_float* z, lapack_int ldz );
01929 lapack_int LAPACKE_zhpev( int matrix_order, char jobz, char uplo, lapack_int n,
01930                           lapack_complex_double* ap, double* w,
01931                           lapack_complex_double* z, lapack_int ldz );
01932 
01933 lapack_int LAPACKE_chpevd( int matrix_order, char jobz, char uplo, lapack_int n,
01934                            lapack_complex_float* ap, float* w,
01935                            lapack_complex_float* z, lapack_int ldz );
01936 lapack_int LAPACKE_zhpevd( int matrix_order, char jobz, char uplo, lapack_int n,
01937                            lapack_complex_double* ap, double* w,
01938                            lapack_complex_double* z, lapack_int ldz );
01939 
01940 lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo,
01941                            lapack_int n, lapack_complex_float* ap, float vl,
01942                            float vu, lapack_int il, lapack_int iu, float abstol,
01943                            lapack_int* m, float* w, lapack_complex_float* z,
01944                            lapack_int ldz, lapack_int* ifail );
01945 lapack_int LAPACKE_zhpevx( int matrix_order, char jobz, char range, char uplo,
01946                            lapack_int n, lapack_complex_double* ap, double vl,
01947                            double vu, lapack_int il, lapack_int iu,
01948                            double abstol, lapack_int* m, double* w,
01949                            lapack_complex_double* z, lapack_int ldz,
01950                            lapack_int* ifail );
01951 
01952 lapack_int LAPACKE_chpgst( int matrix_order, lapack_int itype, char uplo,
01953                            lapack_int n, lapack_complex_float* ap,
01954                            const lapack_complex_float* bp );
01955 lapack_int LAPACKE_zhpgst( int matrix_order, lapack_int itype, char uplo,
01956                            lapack_int n, lapack_complex_double* ap,
01957                            const lapack_complex_double* bp );
01958 
01959 lapack_int LAPACKE_chpgv( 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_zhpgv( 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_chpgvd( int matrix_order, lapack_int itype, char jobz,
01969                            char uplo, lapack_int n, lapack_complex_float* ap,
01970                            lapack_complex_float* bp, float* w,
01971                            lapack_complex_float* z, lapack_int ldz );
01972 lapack_int LAPACKE_zhpgvd( int matrix_order, lapack_int itype, char jobz,
01973                            char uplo, lapack_int n, lapack_complex_double* ap,
01974                            lapack_complex_double* bp, double* w,
01975                            lapack_complex_double* z, lapack_int ldz );
01976 
01977 lapack_int LAPACKE_chpgvx( int matrix_order, lapack_int itype, char jobz,
01978                            char range, char uplo, lapack_int n,
01979                            lapack_complex_float* ap, lapack_complex_float* bp,
01980                            float vl, float vu, lapack_int il, lapack_int iu,
01981                            float abstol, lapack_int* m, float* w,
01982                            lapack_complex_float* z, lapack_int ldz,
01983                            lapack_int* ifail );
01984 lapack_int LAPACKE_zhpgvx( int matrix_order, lapack_int itype, char jobz,
01985                            char range, char uplo, lapack_int n,
01986                            lapack_complex_double* ap, lapack_complex_double* bp,
01987                            double vl, double vu, lapack_int il, lapack_int iu,
01988                            double abstol, lapack_int* m, double* w,
01989                            lapack_complex_double* z, lapack_int ldz,
01990                            lapack_int* ifail );
01991 
01992 lapack_int LAPACKE_chprfs( int matrix_order, char uplo, lapack_int n,
01993                            lapack_int nrhs, const lapack_complex_float* ap,
01994                            const lapack_complex_float* afp,
01995                            const lapack_int* ipiv,
01996                            const lapack_complex_float* b, lapack_int ldb,
01997                            lapack_complex_float* x, lapack_int ldx, float* ferr,
01998                            float* berr );
01999 lapack_int LAPACKE_zhprfs( int matrix_order, char uplo, lapack_int n,
02000                            lapack_int nrhs, const lapack_complex_double* ap,
02001                            const lapack_complex_double* afp,
02002                            const lapack_int* ipiv,
02003                            const lapack_complex_double* b, lapack_int ldb,
02004                            lapack_complex_double* x, lapack_int ldx,
02005                            double* ferr, double* berr );
02006 
02007 lapack_int LAPACKE_chpsv( int matrix_order, char uplo, lapack_int n,
02008                           lapack_int nrhs, lapack_complex_float* ap,
02009                           lapack_int* ipiv, lapack_complex_float* b,
02010                           lapack_int ldb );
02011 lapack_int LAPACKE_zhpsv( int matrix_order, char uplo, lapack_int n,
02012                           lapack_int nrhs, lapack_complex_double* ap,
02013                           lapack_int* ipiv, lapack_complex_double* b,
02014                           lapack_int ldb );
02015 
02016 lapack_int LAPACKE_chpsvx( int matrix_order, char fact, char uplo, lapack_int n,
02017                            lapack_int nrhs, const lapack_complex_float* ap,
02018                            lapack_complex_float* afp, lapack_int* ipiv,
02019                            const lapack_complex_float* b, lapack_int ldb,
02020                            lapack_complex_float* x, lapack_int ldx,
02021                            float* rcond, float* ferr, float* berr );
02022 lapack_int LAPACKE_zhpsvx( int matrix_order, char fact, char uplo, lapack_int n,
02023                            lapack_int nrhs, const lapack_complex_double* ap,
02024                            lapack_complex_double* afp, lapack_int* ipiv,
02025                            const lapack_complex_double* b, lapack_int ldb,
02026                            lapack_complex_double* x, lapack_int ldx,
02027                            double* rcond, double* ferr, double* berr );
02028 
02029 lapack_int LAPACKE_chptrd( int matrix_order, char uplo, lapack_int n,
02030                            lapack_complex_float* ap, float* d, float* e,
02031                            lapack_complex_float* tau );
02032 lapack_int LAPACKE_zhptrd( int matrix_order, char uplo, lapack_int n,
02033                            lapack_complex_double* ap, double* d, double* e,
02034                            lapack_complex_double* tau );
02035 
02036 lapack_int LAPACKE_chptrf( int matrix_order, char uplo, lapack_int n,
02037                            lapack_complex_float* ap, lapack_int* ipiv );
02038 lapack_int LAPACKE_zhptrf( int matrix_order, char uplo, lapack_int n,
02039                            lapack_complex_double* ap, lapack_int* ipiv );
02040 
02041 lapack_int LAPACKE_chptri( int matrix_order, char uplo, lapack_int n,
02042                            lapack_complex_float* ap, const lapack_int* ipiv );
02043 lapack_int LAPACKE_zhptri( int matrix_order, char uplo, lapack_int n,
02044                            lapack_complex_double* ap, const lapack_int* ipiv );
02045 
02046 lapack_int LAPACKE_chptrs( int matrix_order, char uplo, lapack_int n,
02047                            lapack_int nrhs, const lapack_complex_float* ap,
02048                            const lapack_int* ipiv, lapack_complex_float* b,
02049                            lapack_int ldb );
02050 lapack_int LAPACKE_zhptrs( int matrix_order, char uplo, lapack_int n,
02051                            lapack_int nrhs, const lapack_complex_double* ap,
02052                            const lapack_int* ipiv, lapack_complex_double* b,
02053                            lapack_int ldb );
02054 
02055 lapack_int LAPACKE_shsein( int matrix_order, char job, char eigsrc, char initv,
02056                            lapack_logical* select, lapack_int n, const float* h,
02057                            lapack_int ldh, float* wr, const float* wi,
02058                            float* vl, lapack_int ldvl, float* vr,
02059                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02060                            lapack_int* ifaill, lapack_int* ifailr );
02061 lapack_int LAPACKE_dhsein( int matrix_order, char job, char eigsrc, char initv,
02062                            lapack_logical* select, lapack_int n,
02063                            const double* h, lapack_int ldh, double* wr,
02064                            const double* wi, double* vl, lapack_int ldvl,
02065                            double* vr, lapack_int ldvr, lapack_int mm,
02066                            lapack_int* m, lapack_int* ifaill,
02067                            lapack_int* ifailr );
02068 lapack_int LAPACKE_chsein( int matrix_order, char job, char eigsrc, char initv,
02069                            const lapack_logical* select, lapack_int n,
02070                            const lapack_complex_float* h, lapack_int ldh,
02071                            lapack_complex_float* w, lapack_complex_float* vl,
02072                            lapack_int ldvl, lapack_complex_float* vr,
02073                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02074                            lapack_int* ifaill, lapack_int* ifailr );
02075 lapack_int LAPACKE_zhsein( int matrix_order, char job, char eigsrc, char initv,
02076                            const lapack_logical* select, lapack_int n,
02077                            const lapack_complex_double* h, lapack_int ldh,
02078                            lapack_complex_double* w, lapack_complex_double* vl,
02079                            lapack_int ldvl, lapack_complex_double* vr,
02080                            lapack_int ldvr, lapack_int mm, lapack_int* m,
02081                            lapack_int* ifaill, lapack_int* ifailr );
02082 
02083 lapack_int LAPACKE_shseqr( int matrix_order, char job, char compz, lapack_int n,
02084                            lapack_int ilo, lapack_int ihi, float* h,
02085                            lapack_int ldh, float* wr, float* wi, float* z,
02086                            lapack_int ldz );
02087 lapack_int LAPACKE_dhseqr( int matrix_order, char job, char compz, lapack_int n,
02088                            lapack_int ilo, lapack_int ihi, double* h,
02089                            lapack_int ldh, double* wr, double* wi, double* z,
02090                            lapack_int ldz );
02091 lapack_int LAPACKE_chseqr( int matrix_order, char job, char compz, lapack_int n,
02092                            lapack_int ilo, lapack_int ihi,
02093                            lapack_complex_float* h, lapack_int ldh,
02094                            lapack_complex_float* w, lapack_complex_float* z,
02095                            lapack_int ldz );
02096 lapack_int LAPACKE_zhseqr( int matrix_order, char job, char compz, lapack_int n,
02097                            lapack_int ilo, lapack_int ihi,
02098                            lapack_complex_double* h, lapack_int ldh,
02099                            lapack_complex_double* w, lapack_complex_double* z,
02100                            lapack_int ldz );
02101 
02102 lapack_int LAPACKE_clacgv( lapack_int n, lapack_complex_float* x,
02103                            lapack_int incx );
02104 lapack_int LAPACKE_zlacgv( lapack_int n, lapack_complex_double* x,
02105                            lapack_int incx );
02106 
02107 lapack_int LAPACKE_slacpy( int matrix_order, char uplo, lapack_int m,
02108                            lapack_int n, const float* a, lapack_int lda, float* b,
02109                            lapack_int ldb );
02110 lapack_int LAPACKE_dlacpy( int matrix_order, char uplo, lapack_int m,
02111                            lapack_int n, const double* a, lapack_int lda, double* b,
02112                            lapack_int ldb );
02113 lapack_int LAPACKE_clacpy( int matrix_order, char uplo, lapack_int m,
02114                            lapack_int n, const lapack_complex_float* a,
02115                            lapack_int lda, lapack_complex_float* b,
02116                            lapack_int ldb );
02117 lapack_int LAPACKE_zlacpy( int matrix_order, char uplo, lapack_int m,
02118                            lapack_int n, const lapack_complex_double* a,
02119                            lapack_int lda, lapack_complex_double* b,
02120                            lapack_int ldb );
02121 
02122 lapack_int LAPACKE_zlag2c( int matrix_order, lapack_int m, lapack_int n,
02123                            const lapack_complex_double* a, lapack_int lda,
02124                            lapack_complex_float* sa, lapack_int ldsa );
02125 
02126 lapack_int LAPACKE_slag2d( int matrix_order, lapack_int m, lapack_int n,
02127                            const float* sa, lapack_int ldsa, double* a,
02128                            lapack_int lda );
02129 
02130 lapack_int LAPACKE_dlag2s( int matrix_order, lapack_int m, lapack_int n,
02131                            const double* a, lapack_int lda, float* sa,
02132                            lapack_int ldsa );
02133 
02134 lapack_int LAPACKE_clag2z( int matrix_order, lapack_int m, lapack_int n,
02135                            const lapack_complex_float* sa, lapack_int ldsa,
02136                            lapack_complex_double* a, lapack_int lda );
02137 
02138 lapack_int LAPACKE_slagge( int matrix_order, lapack_int m, lapack_int n,
02139                            lapack_int kl, lapack_int ku, const float* d,
02140                            float* a, lapack_int lda, lapack_int* iseed );
02141 lapack_int LAPACKE_dlagge( int matrix_order, lapack_int m, lapack_int n,
02142                            lapack_int kl, lapack_int ku, const double* d,
02143                            double* a, lapack_int lda, lapack_int* iseed );
02144 lapack_int LAPACKE_clagge( int matrix_order, lapack_int m, lapack_int n,
02145                            lapack_int kl, lapack_int ku, const float* d,
02146                            lapack_complex_float* a, lapack_int lda,
02147                            lapack_int* iseed );
02148 lapack_int LAPACKE_zlagge( int matrix_order, lapack_int m, lapack_int n,
02149                            lapack_int kl, lapack_int ku, const double* d,
02150                            lapack_complex_double* a, lapack_int lda,
02151                            lapack_int* iseed );
02152 
02153 float LAPACKE_slamch( char cmach );
02154 double LAPACKE_dlamch( char cmach );
02155 
02156 float LAPACKE_slange( int matrix_order, char norm, lapack_int m,
02157                            lapack_int n, const float* a, lapack_int lda );
02158 double LAPACKE_dlange( int matrix_order, char norm, lapack_int m,
02159                            lapack_int n, const double* a, lapack_int lda );
02160 float LAPACKE_clange( int matrix_order, char norm, lapack_int m,
02161                            lapack_int n, const lapack_complex_float* a,
02162                            lapack_int lda );
02163 double LAPACKE_zlange( int matrix_order, char norm, lapack_int m,
02164                            lapack_int n, const lapack_complex_double* a,
02165                            lapack_int lda );
02166 
02167 float LAPACKE_clanhe( int matrix_order, char norm, char uplo, lapack_int n,
02168                            const lapack_complex_float* a, lapack_int lda );
02169 double LAPACKE_zlanhe( int matrix_order, char norm, char uplo, lapack_int n,
02170                            const lapack_complex_double* a, lapack_int lda );
02171 
02172 float LAPACKE_slansy( int matrix_order, char norm, char uplo, lapack_int n,
02173                            const float* a, lapack_int lda );
02174 double LAPACKE_dlansy( int matrix_order, char norm, char uplo, lapack_int n,
02175                            const double* a, lapack_int lda );
02176 float LAPACKE_clansy( int matrix_order, char norm, char uplo, lapack_int n,
02177                            const lapack_complex_float* a, lapack_int lda );
02178 double LAPACKE_zlansy( int matrix_order, char norm, char uplo, lapack_int n,
02179                            const lapack_complex_double* a, lapack_int lda );
02180 
02181 float LAPACKE_slantr( int matrix_order, char norm, char uplo, char diag,
02182                            lapack_int m, lapack_int n, const float* a,
02183                            lapack_int lda );
02184 double LAPACKE_dlantr( int matrix_order, char norm, char uplo, char diag,
02185                            lapack_int m, lapack_int n, const double* a,
02186                            lapack_int lda );
02187 float LAPACKE_clantr( int matrix_order, char norm, char uplo, char diag,
02188                            lapack_int m, lapack_int n, const lapack_complex_float* a,
02189                            lapack_int lda );
02190 double LAPACKE_zlantr( int matrix_order, char norm, char uplo, char diag,
02191                            lapack_int m, lapack_int n, const lapack_complex_double* a,
02192                            lapack_int lda );
02193 
02194 
02195 lapack_int LAPACKE_slarfb( int matrix_order, char side, char trans, char direct,
02196                            char storev, lapack_int m, lapack_int n,
02197                            lapack_int k, const float* v, lapack_int ldv,
02198                            const float* t, lapack_int ldt, float* c,
02199                            lapack_int ldc );
02200 lapack_int LAPACKE_dlarfb( int matrix_order, char side, char trans, char direct,
02201                            char storev, lapack_int m, lapack_int n,
02202                            lapack_int k, const double* v, lapack_int ldv,
02203                            const double* t, lapack_int ldt, double* c,
02204                            lapack_int ldc );
02205 lapack_int LAPACKE_clarfb( int matrix_order, char side, char trans, char direct,
02206                            char storev, lapack_int m, lapack_int n,
02207                            lapack_int k, const lapack_complex_float* v,
02208                            lapack_int ldv, const lapack_complex_float* t,
02209                            lapack_int ldt, lapack_complex_float* c,
02210                            lapack_int ldc );
02211 lapack_int LAPACKE_zlarfb( int matrix_order, char side, char trans, char direct,
02212                            char storev, lapack_int m, lapack_int n,
02213                            lapack_int k, const lapack_complex_double* v,
02214                            lapack_int ldv, const lapack_complex_double* t,
02215                            lapack_int ldt, lapack_complex_double* c,
02216                            lapack_int ldc );
02217 
02218 lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
02219                            lapack_int incx, float* tau );
02220 lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
02221                            lapack_int incx, double* tau );
02222 lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
02223                            lapack_complex_float* x, lapack_int incx,
02224                            lapack_complex_float* tau );
02225 lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
02226                            lapack_complex_double* x, lapack_int incx,
02227                            lapack_complex_double* tau );
02228 
02229 lapack_int LAPACKE_slarft( int matrix_order, char direct, char storev,
02230                            lapack_int n, lapack_int k, const float* v,
02231                            lapack_int ldv, const float* tau, float* t,
02232                            lapack_int ldt );
02233 lapack_int LAPACKE_dlarft( int matrix_order, char direct, char storev,
02234                            lapack_int n, lapack_int k, const double* v,
02235                            lapack_int ldv, const double* tau, double* t,
02236                            lapack_int ldt );
02237 lapack_int LAPACKE_clarft( int matrix_order, char direct, char storev,
02238                            lapack_int n, lapack_int k,
02239                            const lapack_complex_float* v, lapack_int ldv,
02240                            const lapack_complex_float* tau,
02241                            lapack_complex_float* t, lapack_int ldt );
02242 lapack_int LAPACKE_zlarft( int matrix_order, char direct, char storev,
02243                            lapack_int n, lapack_int k,
02244                            const lapack_complex_double* v, lapack_int ldv,
02245                            const lapack_complex_double* tau,
02246                            lapack_complex_double* t, lapack_int ldt );
02247 
02248 lapack_int LAPACKE_slarfx( int matrix_order, char side, lapack_int m,
02249                            lapack_int n, const float* v, float tau, float* c,
02250                            lapack_int ldc, float* work );
02251 lapack_int LAPACKE_dlarfx( int matrix_order, char side, lapack_int m,
02252                            lapack_int n, const double* v, double tau, double* c,
02253                            lapack_int ldc, double* work );
02254 lapack_int LAPACKE_clarfx( int matrix_order, char side, lapack_int m,
02255                            lapack_int n, const lapack_complex_float* v,
02256                            lapack_complex_float tau, lapack_complex_float* c,
02257                            lapack_int ldc, lapack_complex_float* work );
02258 lapack_int LAPACKE_zlarfx( int matrix_order, char side, lapack_int m,
02259                            lapack_int n, const lapack_complex_double* v,
02260                            lapack_complex_double tau, lapack_complex_double* c,
02261                            lapack_int ldc, lapack_complex_double* work );
02262 
02263 lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
02264                            float* x );
02265 lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
02266                            double* x );
02267 lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
02268                            lapack_complex_float* x );
02269 lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
02270                            lapack_complex_double* x );
02271 
02272 lapack_int LAPACKE_slaset( int matrix_order, char uplo, lapack_int m,
02273                            lapack_int n, float alpha, float beta, float* a,
02274                            lapack_int lda );
02275 lapack_int LAPACKE_dlaset( int matrix_order, char uplo, lapack_int m,
02276                            lapack_int n, double alpha, double beta, double* a,
02277                            lapack_int lda );
02278 lapack_int LAPACKE_claset( int matrix_order, char uplo, lapack_int m,
02279                            lapack_int n, lapack_complex_float alpha,
02280                            lapack_complex_float beta, lapack_complex_float* a,
02281                            lapack_int lda );
02282 lapack_int LAPACKE_zlaset( int matrix_order, char uplo, lapack_int m,
02283                            lapack_int n, lapack_complex_double alpha,
02284                            lapack_complex_double beta, lapack_complex_double* a,
02285                            lapack_int lda );
02286 
02287 lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
02288 lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
02289 
02290 lapack_int LAPACKE_slaswp( int matrix_order, lapack_int n, float* a,
02291                            lapack_int lda, lapack_int k1, lapack_int k2,
02292                            const lapack_int* ipiv, lapack_int incx );
02293 lapack_int LAPACKE_dlaswp( int matrix_order, lapack_int n, double* a,
02294                            lapack_int lda, lapack_int k1, lapack_int k2,
02295                            const lapack_int* ipiv, lapack_int incx );
02296 lapack_int LAPACKE_claswp( int matrix_order, lapack_int n,
02297                            lapack_complex_float* a, lapack_int lda,
02298                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
02299                            lapack_int incx );
02300 lapack_int LAPACKE_zlaswp( int matrix_order, lapack_int n,
02301                            lapack_complex_double* a, lapack_int lda,
02302                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
02303                            lapack_int incx );
02304 
02305 lapack_int LAPACKE_slatms( int matrix_order, lapack_int m, lapack_int n,
02306                            char dist, lapack_int* iseed, char sym, float* d,
02307                            lapack_int mode, float cond, float dmax,
02308                            lapack_int kl, lapack_int ku, char pack, float* a,
02309                            lapack_int lda );
02310 lapack_int LAPACKE_dlatms( int matrix_order, lapack_int m, lapack_int n,
02311                            char dist, lapack_int* iseed, char sym, double* d,
02312                            lapack_int mode, double cond, double dmax,
02313                            lapack_int kl, lapack_int ku, char pack, double* a,
02314                            lapack_int lda );
02315 lapack_int LAPACKE_clatms( int matrix_order, lapack_int m, lapack_int n,
02316                            char dist, lapack_int* iseed, char sym, float* d,
02317                            lapack_int mode, float cond, float dmax,
02318                            lapack_int kl, lapack_int ku, char pack,
02319                            lapack_complex_float* a, lapack_int lda );
02320 lapack_int LAPACKE_zlatms( int matrix_order, lapack_int m, lapack_int n,
02321                            char dist, lapack_int* iseed, char sym, double* d,
02322                            lapack_int mode, double cond, double dmax,
02323                            lapack_int kl, lapack_int ku, char pack,
02324                            lapack_complex_double* a, lapack_int lda );
02325 
02326 lapack_int LAPACKE_slauum( int matrix_order, char uplo, lapack_int n, float* a,
02327                            lapack_int lda );
02328 lapack_int LAPACKE_dlauum( int matrix_order, char uplo, lapack_int n, double* a,
02329                            lapack_int lda );
02330 lapack_int LAPACKE_clauum( int matrix_order, char uplo, lapack_int n,
02331                            lapack_complex_float* a, lapack_int lda );
02332 lapack_int LAPACKE_zlauum( int matrix_order, char uplo, lapack_int n,
02333                            lapack_complex_double* a, lapack_int lda );
02334 
02335 lapack_int LAPACKE_sopgtr( int matrix_order, char uplo, lapack_int n,
02336                            const float* ap, const float* tau, float* q,
02337                            lapack_int ldq );
02338 lapack_int LAPACKE_dopgtr( int matrix_order, char uplo, lapack_int n,
02339                            const double* ap, const double* tau, double* q,
02340                            lapack_int ldq );
02341 
02342 lapack_int LAPACKE_sopmtr( int matrix_order, char side, char uplo, char trans,
02343                            lapack_int m, lapack_int n, const float* ap,
02344                            const float* tau, float* c, lapack_int ldc );
02345 lapack_int LAPACKE_dopmtr( int matrix_order, char side, char uplo, char trans,
02346                            lapack_int m, lapack_int n, const double* ap,
02347                            const double* tau, double* c, lapack_int ldc );
02348 
02349 lapack_int LAPACKE_sorgbr( int matrix_order, char vect, lapack_int m,
02350                            lapack_int n, lapack_int k, float* a, lapack_int lda,
02351                            const float* tau );
02352 lapack_int LAPACKE_dorgbr( int matrix_order, char vect, lapack_int m,
02353                            lapack_int n, lapack_int k, double* a,
02354                            lapack_int lda, const double* tau );
02355 
02356 lapack_int LAPACKE_sorghr( int matrix_order, lapack_int n, lapack_int ilo,
02357                            lapack_int ihi, float* a, lapack_int lda,
02358                            const float* tau );
02359 lapack_int LAPACKE_dorghr( int matrix_order, lapack_int n, lapack_int ilo,
02360                            lapack_int ihi, double* a, lapack_int lda,
02361                            const double* tau );
02362 
02363 lapack_int LAPACKE_sorglq( int matrix_order, lapack_int m, lapack_int n,
02364                            lapack_int k, float* a, lapack_int lda,
02365                            const float* tau );
02366 lapack_int LAPACKE_dorglq( int matrix_order, lapack_int m, lapack_int n,
02367                            lapack_int k, double* a, lapack_int lda,
02368                            const double* tau );
02369 
02370 lapack_int LAPACKE_sorgql( int matrix_order, lapack_int m, lapack_int n,
02371                            lapack_int k, float* a, lapack_int lda,
02372                            const float* tau );
02373 lapack_int LAPACKE_dorgql( int matrix_order, lapack_int m, lapack_int n,
02374                            lapack_int k, double* a, lapack_int lda,
02375                            const double* tau );
02376 
02377 lapack_int LAPACKE_sorgqr( int matrix_order, lapack_int m, lapack_int n,
02378                            lapack_int k, float* a, lapack_int lda,
02379                            const float* tau );
02380 lapack_int LAPACKE_dorgqr( int matrix_order, lapack_int m, lapack_int n,
02381                            lapack_int k, double* a, lapack_int lda,
02382                            const double* tau );
02383 
02384 lapack_int LAPACKE_sorgrq( int matrix_order, lapack_int m, lapack_int n,
02385                            lapack_int k, float* a, lapack_int lda,
02386                            const float* tau );
02387 lapack_int LAPACKE_dorgrq( int matrix_order, lapack_int m, lapack_int n,
02388                            lapack_int k, double* a, lapack_int lda,
02389                            const double* tau );
02390 
02391 lapack_int LAPACKE_sorgtr( int matrix_order, char uplo, lapack_int n, float* a,
02392                            lapack_int lda, const float* tau );
02393 lapack_int LAPACKE_dorgtr( int matrix_order, char uplo, lapack_int n, double* a,
02394                            lapack_int lda, const double* tau );
02395 
02396 lapack_int LAPACKE_sormbr( int matrix_order, char vect, char side, char trans,
02397                            lapack_int m, lapack_int n, lapack_int k,
02398                            const float* a, lapack_int lda, const float* tau,
02399                            float* c, lapack_int ldc );
02400 lapack_int LAPACKE_dormbr( int matrix_order, char vect, char side, char trans,
02401                            lapack_int m, lapack_int n, lapack_int k,
02402                            const double* a, lapack_int lda, const double* tau,
02403                            double* c, lapack_int ldc );
02404 
02405 lapack_int LAPACKE_sormhr( int matrix_order, char side, char trans,
02406                            lapack_int m, lapack_int n, lapack_int ilo,
02407                            lapack_int ihi, const float* a, lapack_int lda,
02408                            const float* tau, float* c, lapack_int ldc );
02409 lapack_int LAPACKE_dormhr( int matrix_order, char side, char trans,
02410                            lapack_int m, lapack_int n, lapack_int ilo,
02411                            lapack_int ihi, const double* a, lapack_int lda,
02412                            const double* tau, double* c, lapack_int ldc );
02413 
02414 lapack_int LAPACKE_sormlq( int matrix_order, char side, char trans,
02415                            lapack_int m, lapack_int n, lapack_int k,
02416                            const float* a, lapack_int lda, const float* tau,
02417                            float* c, lapack_int ldc );
02418 lapack_int LAPACKE_dormlq( int matrix_order, char side, char trans,
02419                            lapack_int m, lapack_int n, lapack_int k,
02420                            const double* a, lapack_int lda, const double* tau,
02421                            double* c, lapack_int ldc );
02422 
02423 lapack_int LAPACKE_sormql( int matrix_order, char side, char trans,
02424                            lapack_int m, lapack_int n, lapack_int k,
02425                            const float* a, lapack_int lda, const float* tau,
02426                            float* c, lapack_int ldc );
02427 lapack_int LAPACKE_dormql( int matrix_order, char side, char trans,
02428                            lapack_int m, lapack_int n, lapack_int k,
02429                            const double* a, lapack_int lda, const double* tau,
02430                            double* c, lapack_int ldc );
02431 
02432 lapack_int LAPACKE_sormqr( int matrix_order, char side, char trans,
02433                            lapack_int m, lapack_int n, lapack_int k,
02434                            const float* a, lapack_int lda, const float* tau,
02435                            float* c, lapack_int ldc );
02436 lapack_int LAPACKE_dormqr( int matrix_order, char side, char trans,
02437                            lapack_int m, lapack_int n, lapack_int k,
02438                            const double* a, lapack_int lda, const double* tau,
02439                            double* c, lapack_int ldc );
02440 
02441 lapack_int LAPACKE_sormrq( int matrix_order, char side, char trans,
02442                            lapack_int m, lapack_int n, lapack_int k,
02443                            const float* a, lapack_int lda, const float* tau,
02444                            float* c, lapack_int ldc );
02445 lapack_int LAPACKE_dormrq( int matrix_order, char side, char trans,
02446                            lapack_int m, lapack_int n, lapack_int k,
02447                            const double* a, lapack_int lda, const double* tau,
02448                            double* c, lapack_int ldc );
02449 
02450 lapack_int LAPACKE_sormrz( int matrix_order, char side, char trans,
02451                            lapack_int m, lapack_int n, lapack_int k,
02452                            lapack_int l, const float* a, lapack_int lda,
02453                            const float* tau, float* c, lapack_int ldc );
02454 lapack_int LAPACKE_dormrz( int matrix_order, char side, char trans,
02455                            lapack_int m, lapack_int n, lapack_int k,
02456                            lapack_int l, const double* a, lapack_int lda,
02457                            const double* tau, double* c, lapack_int ldc );
02458 
02459 lapack_int LAPACKE_sormtr( int matrix_order, char side, char uplo, char trans,
02460                            lapack_int m, lapack_int n, const float* a,
02461                            lapack_int lda, const float* tau, float* c,
02462                            lapack_int ldc );
02463 lapack_int LAPACKE_dormtr( int matrix_order, char side, char uplo, char trans,
02464                            lapack_int m, lapack_int n, const double* a,
02465                            lapack_int lda, const double* tau, double* c,
02466                            lapack_int ldc );
02467 
02468 lapack_int LAPACKE_spbcon( int matrix_order, char uplo, lapack_int n,
02469                            lapack_int kd, const float* ab, lapack_int ldab,
02470                            float anorm, float* rcond );
02471 lapack_int LAPACKE_dpbcon( int matrix_order, char uplo, lapack_int n,
02472                            lapack_int kd, const double* ab, lapack_int ldab,
02473                            double anorm, double* rcond );
02474 lapack_int LAPACKE_cpbcon( int matrix_order, char uplo, lapack_int n,
02475                            lapack_int kd, const lapack_complex_float* ab,
02476                            lapack_int ldab, float anorm, float* rcond );
02477 lapack_int LAPACKE_zpbcon( int matrix_order, char uplo, lapack_int n,
02478                            lapack_int kd, const lapack_complex_double* ab,
02479                            lapack_int ldab, double anorm, double* rcond );
02480 
02481 lapack_int LAPACKE_spbequ( int matrix_order, char uplo, lapack_int n,
02482                            lapack_int kd, const float* ab, lapack_int ldab,
02483                            float* s, float* scond, float* amax );
02484 lapack_int LAPACKE_dpbequ( int matrix_order, char uplo, lapack_int n,
02485                            lapack_int kd, const double* ab, lapack_int ldab,
02486                            double* s, double* scond, double* amax );
02487 lapack_int LAPACKE_cpbequ( int matrix_order, char uplo, lapack_int n,
02488                            lapack_int kd, const lapack_complex_float* ab,
02489                            lapack_int ldab, float* s, float* scond,
02490                            float* amax );
02491 lapack_int LAPACKE_zpbequ( int matrix_order, char uplo, lapack_int n,
02492                            lapack_int kd, const lapack_complex_double* ab,
02493                            lapack_int ldab, double* s, double* scond,
02494                            double* amax );
02495 
02496 lapack_int LAPACKE_spbrfs( int matrix_order, char uplo, lapack_int n,
02497                            lapack_int kd, lapack_int nrhs, const float* ab,
02498                            lapack_int ldab, const float* afb, lapack_int ldafb,
02499                            const float* b, lapack_int ldb, float* x,
02500                            lapack_int ldx, float* ferr, float* berr );
02501 lapack_int LAPACKE_dpbrfs( int matrix_order, char uplo, lapack_int n,
02502                            lapack_int kd, lapack_int nrhs, const double* ab,
02503                            lapack_int ldab, const double* afb, lapack_int ldafb,
02504                            const double* b, lapack_int ldb, double* x,
02505                            lapack_int ldx, double* ferr, double* berr );
02506 lapack_int LAPACKE_cpbrfs( int matrix_order, char uplo, lapack_int n,
02507                            lapack_int kd, lapack_int nrhs,
02508                            const lapack_complex_float* ab, lapack_int ldab,
02509                            const lapack_complex_float* afb, lapack_int ldafb,
02510                            const lapack_complex_float* b, lapack_int ldb,
02511                            lapack_complex_float* x, lapack_int ldx, float* ferr,
02512                            float* berr );
02513 lapack_int LAPACKE_zpbrfs( int matrix_order, char uplo, lapack_int n,
02514                            lapack_int kd, lapack_int nrhs,
02515                            const lapack_complex_double* ab, lapack_int ldab,
02516                            const lapack_complex_double* afb, lapack_int ldafb,
02517                            const lapack_complex_double* b, lapack_int ldb,
02518                            lapack_complex_double* x, lapack_int ldx,
02519                            double* ferr, double* berr );
02520 
02521 lapack_int LAPACKE_spbstf( int matrix_order, char uplo, lapack_int n,
02522                            lapack_int kb, float* bb, lapack_int ldbb );
02523 lapack_int LAPACKE_dpbstf( int matrix_order, char uplo, lapack_int n,
02524                            lapack_int kb, double* bb, lapack_int ldbb );
02525 lapack_int LAPACKE_cpbstf( int matrix_order, char uplo, lapack_int n,
02526                            lapack_int kb, lapack_complex_float* bb,
02527                            lapack_int ldbb );
02528 lapack_int LAPACKE_zpbstf( int matrix_order, char uplo, lapack_int n,
02529                            lapack_int kb, lapack_complex_double* bb,
02530                            lapack_int ldbb );
02531 
02532 lapack_int LAPACKE_spbsv( int matrix_order, char uplo, lapack_int n,
02533                           lapack_int kd, lapack_int nrhs, float* ab,
02534                           lapack_int ldab, float* b, lapack_int ldb );
02535 lapack_int LAPACKE_dpbsv( int matrix_order, char uplo, lapack_int n,
02536                           lapack_int kd, lapack_int nrhs, double* ab,
02537                           lapack_int ldab, double* b, lapack_int ldb );
02538 lapack_int LAPACKE_cpbsv( int matrix_order, char uplo, lapack_int n,
02539                           lapack_int kd, lapack_int nrhs,
02540                           lapack_complex_float* ab, lapack_int ldab,
02541                           lapack_complex_float* b, lapack_int ldb );
02542 lapack_int LAPACKE_zpbsv( int matrix_order, char uplo, lapack_int n,
02543                           lapack_int kd, lapack_int nrhs,
02544                           lapack_complex_double* ab, lapack_int ldab,
02545                           lapack_complex_double* b, lapack_int ldb );
02546 
02547 lapack_int LAPACKE_spbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02548                            lapack_int kd, lapack_int nrhs, float* ab,
02549                            lapack_int ldab, float* afb, lapack_int ldafb,
02550                            char* equed, float* s, float* b, lapack_int ldb,
02551                            float* x, lapack_int ldx, float* rcond, float* ferr,
02552                            float* berr );
02553 lapack_int LAPACKE_dpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02554                            lapack_int kd, lapack_int nrhs, double* ab,
02555                            lapack_int ldab, double* afb, lapack_int ldafb,
02556                            char* equed, double* s, double* b, lapack_int ldb,
02557                            double* x, lapack_int ldx, double* rcond,
02558                            double* ferr, double* berr );
02559 lapack_int LAPACKE_cpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02560                            lapack_int kd, lapack_int nrhs,
02561                            lapack_complex_float* ab, lapack_int ldab,
02562                            lapack_complex_float* afb, lapack_int ldafb,
02563                            char* equed, float* s, lapack_complex_float* b,
02564                            lapack_int ldb, lapack_complex_float* x,
02565                            lapack_int ldx, float* rcond, float* ferr,
02566                            float* berr );
02567 lapack_int LAPACKE_zpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
02568                            lapack_int kd, lapack_int nrhs,
02569                            lapack_complex_double* ab, lapack_int ldab,
02570                            lapack_complex_double* afb, lapack_int ldafb,
02571                            char* equed, double* s, lapack_complex_double* b,
02572                            lapack_int ldb, lapack_complex_double* x,
02573                            lapack_int ldx, double* rcond, double* ferr,
02574                            double* berr );
02575 
02576 lapack_int LAPACKE_spbtrf( int matrix_order, char uplo, lapack_int n,
02577                            lapack_int kd, float* ab, lapack_int ldab );
02578 lapack_int LAPACKE_dpbtrf( int matrix_order, char uplo, lapack_int n,
02579                            lapack_int kd, double* ab, lapack_int ldab );
02580 lapack_int LAPACKE_cpbtrf( int matrix_order, char uplo, lapack_int n,
02581                            lapack_int kd, lapack_complex_float* ab,
02582                            lapack_int ldab );
02583 lapack_int LAPACKE_zpbtrf( int matrix_order, char uplo, lapack_int n,
02584                            lapack_int kd, lapack_complex_double* ab,
02585                            lapack_int ldab );
02586 
02587 lapack_int LAPACKE_spbtrs( int matrix_order, char uplo, lapack_int n,
02588                            lapack_int kd, lapack_int nrhs, const float* ab,
02589                            lapack_int ldab, float* b, lapack_int ldb );
02590 lapack_int LAPACKE_dpbtrs( int matrix_order, char uplo, lapack_int n,
02591                            lapack_int kd, lapack_int nrhs, const double* ab,
02592                            lapack_int ldab, double* b, lapack_int ldb );
02593 lapack_int LAPACKE_cpbtrs( int matrix_order, char uplo, lapack_int n,
02594                            lapack_int kd, lapack_int nrhs,
02595                            const lapack_complex_float* ab, lapack_int ldab,
02596                            lapack_complex_float* b, lapack_int ldb );
02597 lapack_int LAPACKE_zpbtrs( int matrix_order, char uplo, lapack_int n,
02598                            lapack_int kd, lapack_int nrhs,
02599                            const lapack_complex_double* ab, lapack_int ldab,
02600                            lapack_complex_double* b, lapack_int ldb );
02601 
02602 lapack_int LAPACKE_spftrf( int matrix_order, char transr, char uplo,
02603                            lapack_int n, float* a );
02604 lapack_int LAPACKE_dpftrf( int matrix_order, char transr, char uplo,
02605                            lapack_int n, double* a );
02606 lapack_int LAPACKE_cpftrf( int matrix_order, char transr, char uplo,
02607                            lapack_int n, lapack_complex_float* a );
02608 lapack_int LAPACKE_zpftrf( int matrix_order, char transr, char uplo,
02609                            lapack_int n, lapack_complex_double* a );
02610 
02611 lapack_int LAPACKE_spftri( int matrix_order, char transr, char uplo,
02612                            lapack_int n, float* a );
02613 lapack_int LAPACKE_dpftri( int matrix_order, char transr, char uplo,
02614                            lapack_int n, double* a );
02615 lapack_int LAPACKE_cpftri( int matrix_order, char transr, char uplo,
02616                            lapack_int n, lapack_complex_float* a );
02617 lapack_int LAPACKE_zpftri( int matrix_order, char transr, char uplo,
02618                            lapack_int n, lapack_complex_double* a );
02619 
02620 lapack_int LAPACKE_spftrs( int matrix_order, char transr, char uplo,
02621                            lapack_int n, lapack_int nrhs, const float* a,
02622                            float* b, lapack_int ldb );
02623 lapack_int LAPACKE_dpftrs( int matrix_order, char transr, char uplo,
02624                            lapack_int n, lapack_int nrhs, const double* a,
02625                            double* b, lapack_int ldb );
02626 lapack_int LAPACKE_cpftrs( int matrix_order, char transr, char uplo,
02627                            lapack_int n, lapack_int nrhs,
02628                            const lapack_complex_float* a,
02629                            lapack_complex_float* b, lapack_int ldb );
02630 lapack_int LAPACKE_zpftrs( int matrix_order, char transr, char uplo,
02631                            lapack_int n, lapack_int nrhs,
02632                            const lapack_complex_double* a,
02633                            lapack_complex_double* b, lapack_int ldb );
02634 
02635 lapack_int LAPACKE_spocon( int matrix_order, char uplo, lapack_int n,
02636                            const float* a, lapack_int lda, float anorm,
02637                            float* rcond );
02638 lapack_int LAPACKE_dpocon( int matrix_order, char uplo, lapack_int n,
02639                            const double* a, lapack_int lda, double anorm,
02640                            double* rcond );
02641 lapack_int LAPACKE_cpocon( int matrix_order, char uplo, lapack_int n,
02642                            const lapack_complex_float* a, lapack_int lda,
02643                            float anorm, float* rcond );
02644 lapack_int LAPACKE_zpocon( int matrix_order, char uplo, lapack_int n,
02645                            const lapack_complex_double* a, lapack_int lda,
02646                            double anorm, double* rcond );
02647 
02648 lapack_int LAPACKE_spoequ( int matrix_order, lapack_int n, const float* a,
02649                            lapack_int lda, float* s, float* scond,
02650                            float* amax );
02651 lapack_int LAPACKE_dpoequ( int matrix_order, lapack_int n, const double* a,
02652                            lapack_int lda, double* s, double* scond,
02653                            double* amax );
02654 lapack_int LAPACKE_cpoequ( int matrix_order, lapack_int n,
02655                            const lapack_complex_float* a, lapack_int lda,
02656                            float* s, float* scond, float* amax );
02657 lapack_int LAPACKE_zpoequ( int matrix_order, lapack_int n,
02658                            const lapack_complex_double* a, lapack_int lda,
02659                            double* s, double* scond, double* amax );
02660 
02661 lapack_int LAPACKE_spoequb( int matrix_order, lapack_int n, const float* a,
02662                             lapack_int lda, float* s, float* scond,
02663                             float* amax );
02664 lapack_int LAPACKE_dpoequb( int matrix_order, lapack_int n, const double* a,
02665                             lapack_int lda, double* s, double* scond,
02666                             double* amax );
02667 lapack_int LAPACKE_cpoequb( int matrix_order, lapack_int n,
02668                             const lapack_complex_float* a, lapack_int lda,
02669                             float* s, float* scond, float* amax );
02670 lapack_int LAPACKE_zpoequb( int matrix_order, lapack_int n,
02671                             const lapack_complex_double* a, lapack_int lda,
02672                             double* s, double* scond, double* amax );
02673 
02674 lapack_int LAPACKE_sporfs( int matrix_order, char uplo, lapack_int n,
02675                            lapack_int nrhs, const float* a, lapack_int lda,
02676                            const float* af, lapack_int ldaf, const float* b,
02677                            lapack_int ldb, float* x, lapack_int ldx,
02678                            float* ferr, float* berr );
02679 lapack_int LAPACKE_dporfs( int matrix_order, char uplo, lapack_int n,
02680                            lapack_int nrhs, const double* a, lapack_int lda,
02681                            const double* af, lapack_int ldaf, const double* b,
02682                            lapack_int ldb, double* x, lapack_int ldx,
02683                            double* ferr, double* berr );
02684 lapack_int LAPACKE_cporfs( int matrix_order, char uplo, lapack_int n,
02685                            lapack_int nrhs, const lapack_complex_float* a,
02686                            lapack_int lda, const lapack_complex_float* af,
02687                            lapack_int ldaf, const lapack_complex_float* b,
02688                            lapack_int ldb, lapack_complex_float* x,
02689                            lapack_int ldx, float* ferr, float* berr );
02690 lapack_int LAPACKE_zporfs( int matrix_order, char uplo, lapack_int n,
02691                            lapack_int nrhs, const lapack_complex_double* a,
02692                            lapack_int lda, const lapack_complex_double* af,
02693                            lapack_int ldaf, const lapack_complex_double* b,
02694                            lapack_int ldb, lapack_complex_double* x,
02695                            lapack_int ldx, double* ferr, double* berr );
02696 
02697 lapack_int LAPACKE_sporfsx( int matrix_order, char uplo, char equed,
02698                             lapack_int n, lapack_int nrhs, const float* a,
02699                             lapack_int lda, const float* af, lapack_int ldaf,
02700                             const float* s, const float* b, lapack_int ldb,
02701                             float* x, lapack_int ldx, float* rcond, float* berr,
02702                             lapack_int n_err_bnds, float* err_bnds_norm,
02703                             float* err_bnds_comp, lapack_int nparams,
02704                             float* params );
02705 lapack_int LAPACKE_dporfsx( int matrix_order, char uplo, char equed,
02706                             lapack_int n, lapack_int nrhs, const double* a,
02707                             lapack_int lda, const double* af, lapack_int ldaf,
02708                             const double* s, const double* b, lapack_int ldb,
02709                             double* x, lapack_int ldx, double* rcond,
02710                             double* berr, lapack_int n_err_bnds,
02711                             double* err_bnds_norm, double* err_bnds_comp,
02712                             lapack_int nparams, double* params );
02713 lapack_int LAPACKE_cporfsx( int matrix_order, char uplo, char equed,
02714                             lapack_int n, lapack_int nrhs,
02715                             const lapack_complex_float* a, lapack_int lda,
02716                             const lapack_complex_float* af, lapack_int ldaf,
02717                             const float* s, const lapack_complex_float* b,
02718                             lapack_int ldb, lapack_complex_float* x,
02719                             lapack_int ldx, float* rcond, float* berr,
02720                             lapack_int n_err_bnds, float* err_bnds_norm,
02721                             float* err_bnds_comp, lapack_int nparams,
02722                             float* params );
02723 lapack_int LAPACKE_zporfsx( int matrix_order, char uplo, char equed,
02724                             lapack_int n, lapack_int nrhs,
02725                             const lapack_complex_double* a, lapack_int lda,
02726                             const lapack_complex_double* af, lapack_int ldaf,
02727                             const double* s, const lapack_complex_double* b,
02728                             lapack_int ldb, lapack_complex_double* x,
02729                             lapack_int ldx, double* rcond, double* berr,
02730                             lapack_int n_err_bnds, double* err_bnds_norm,
02731                             double* err_bnds_comp, lapack_int nparams,
02732                             double* params );
02733 
02734 lapack_int LAPACKE_sposv( int matrix_order, char uplo, lapack_int n,
02735                           lapack_int nrhs, float* a, lapack_int lda, float* b,
02736                           lapack_int ldb );
02737 lapack_int LAPACKE_dposv( int matrix_order, char uplo, lapack_int n,
02738                           lapack_int nrhs, double* a, lapack_int lda, double* b,
02739                           lapack_int ldb );
02740 lapack_int LAPACKE_cposv( int matrix_order, char uplo, lapack_int n,
02741                           lapack_int nrhs, lapack_complex_float* a,
02742                           lapack_int lda, lapack_complex_float* b,
02743                           lapack_int ldb );
02744 lapack_int LAPACKE_zposv( int matrix_order, char uplo, lapack_int n,
02745                           lapack_int nrhs, lapack_complex_double* a,
02746                           lapack_int lda, lapack_complex_double* b,
02747                           lapack_int ldb );
02748 lapack_int LAPACKE_dsposv( int matrix_order, char uplo, lapack_int n,
02749                            lapack_int nrhs, double* a, lapack_int lda,
02750                            double* b, lapack_int ldb, double* x, lapack_int ldx,
02751                            lapack_int* iter );
02752 lapack_int LAPACKE_zcposv( int matrix_order, char uplo, lapack_int n,
02753                            lapack_int nrhs, lapack_complex_double* a,
02754                            lapack_int lda, lapack_complex_double* b,
02755                            lapack_int ldb, lapack_complex_double* x,
02756                            lapack_int ldx, lapack_int* iter );
02757 
02758 lapack_int LAPACKE_sposvx( int matrix_order, char fact, char uplo, lapack_int n,
02759                            lapack_int nrhs, float* a, lapack_int lda, float* af,
02760                            lapack_int ldaf, char* equed, float* s, float* b,
02761                            lapack_int ldb, float* x, lapack_int ldx,
02762                            float* rcond, float* ferr, float* berr );
02763 lapack_int LAPACKE_dposvx( int matrix_order, char fact, char uplo, lapack_int n,
02764                            lapack_int nrhs, double* a, lapack_int lda,
02765                            double* af, lapack_int ldaf, char* equed, double* s,
02766                            double* b, lapack_int ldb, double* x, lapack_int ldx,
02767                            double* rcond, double* ferr, double* berr );
02768 lapack_int LAPACKE_cposvx( int matrix_order, char fact, char uplo, lapack_int n,
02769                            lapack_int nrhs, lapack_complex_float* a,
02770                            lapack_int lda, lapack_complex_float* af,
02771                            lapack_int ldaf, char* equed, float* s,
02772                            lapack_complex_float* b, lapack_int ldb,
02773                            lapack_complex_float* x, lapack_int ldx,
02774                            float* rcond, float* ferr, float* berr );
02775 lapack_int LAPACKE_zposvx( int matrix_order, char fact, char uplo, lapack_int n,
02776                            lapack_int nrhs, lapack_complex_double* a,
02777                            lapack_int lda, lapack_complex_double* af,
02778                            lapack_int ldaf, char* equed, double* s,
02779                            lapack_complex_double* b, lapack_int ldb,
02780                            lapack_complex_double* x, lapack_int ldx,
02781                            double* rcond, double* ferr, double* berr );
02782 
02783 lapack_int LAPACKE_sposvxx( int matrix_order, char fact, char uplo,
02784                             lapack_int n, lapack_int nrhs, float* a,
02785                             lapack_int lda, float* af, lapack_int ldaf,
02786                             char* equed, float* s, float* b, lapack_int ldb,
02787                             float* x, lapack_int ldx, float* rcond,
02788                             float* rpvgrw, float* berr, lapack_int n_err_bnds,
02789                             float* err_bnds_norm, float* err_bnds_comp,
02790                             lapack_int nparams, float* params );
02791 lapack_int LAPACKE_dposvxx( int matrix_order, char fact, char uplo,
02792                             lapack_int n, lapack_int nrhs, double* a,
02793                             lapack_int lda, double* af, lapack_int ldaf,
02794                             char* equed, double* s, double* b, lapack_int ldb,
02795                             double* x, lapack_int ldx, double* rcond,
02796                             double* rpvgrw, double* berr, lapack_int n_err_bnds,
02797                             double* err_bnds_norm, double* err_bnds_comp,
02798                             lapack_int nparams, double* params );
02799 lapack_int LAPACKE_cposvxx( int matrix_order, char fact, char uplo,
02800                             lapack_int n, lapack_int nrhs,
02801                             lapack_complex_float* a, lapack_int lda,
02802                             lapack_complex_float* af, lapack_int ldaf,
02803                             char* equed, float* s, lapack_complex_float* b,
02804                             lapack_int ldb, lapack_complex_float* x,
02805                             lapack_int ldx, float* rcond, float* rpvgrw,
02806                             float* berr, lapack_int n_err_bnds,
02807                             float* err_bnds_norm, float* err_bnds_comp,
02808                             lapack_int nparams, float* params );
02809 lapack_int LAPACKE_zposvxx( int matrix_order, char fact, char uplo,
02810                             lapack_int n, lapack_int nrhs,
02811                             lapack_complex_double* a, lapack_int lda,
02812                             lapack_complex_double* af, lapack_int ldaf,
02813                             char* equed, double* s, lapack_complex_double* b,
02814                             lapack_int ldb, lapack_complex_double* x,
02815                             lapack_int ldx, double* rcond, double* rpvgrw,
02816                             double* berr, lapack_int n_err_bnds,
02817                             double* err_bnds_norm, double* err_bnds_comp,
02818                             lapack_int nparams, double* params );
02819 
02820 lapack_int LAPACKE_spotrf( int matrix_order, char uplo, lapack_int n, float* a,
02821                            lapack_int lda );
02822 lapack_int LAPACKE_dpotrf( int matrix_order, char uplo, lapack_int n, double* a,
02823                            lapack_int lda );
02824 lapack_int LAPACKE_cpotrf( int matrix_order, char uplo, lapack_int n,
02825                            lapack_complex_float* a, lapack_int lda );
02826 lapack_int LAPACKE_zpotrf( int matrix_order, char uplo, lapack_int n,
02827                            lapack_complex_double* a, lapack_int lda );
02828 
02829 lapack_int LAPACKE_spotri( int matrix_order, char uplo, lapack_int n, float* a,
02830                            lapack_int lda );
02831 lapack_int LAPACKE_dpotri( int matrix_order, char uplo, lapack_int n, double* a,
02832                            lapack_int lda );
02833 lapack_int LAPACKE_cpotri( int matrix_order, char uplo, lapack_int n,
02834                            lapack_complex_float* a, lapack_int lda );
02835 lapack_int LAPACKE_zpotri( int matrix_order, char uplo, lapack_int n,
02836                            lapack_complex_double* a, lapack_int lda );
02837 
02838 lapack_int LAPACKE_spotrs( int matrix_order, char uplo, lapack_int n,
02839                            lapack_int nrhs, const float* a, lapack_int lda,
02840                            float* b, lapack_int ldb );
02841 lapack_int LAPACKE_dpotrs( int matrix_order, char uplo, lapack_int n,
02842                            lapack_int nrhs, const double* a, lapack_int lda,
02843                            double* b, lapack_int ldb );
02844 lapack_int LAPACKE_cpotrs( int matrix_order, char uplo, lapack_int n,
02845                            lapack_int nrhs, const lapack_complex_float* a,
02846                            lapack_int lda, lapack_complex_float* b,
02847                            lapack_int ldb );
02848 lapack_int LAPACKE_zpotrs( int matrix_order, char uplo, lapack_int n,
02849                            lapack_int nrhs, const lapack_complex_double* a,
02850                            lapack_int lda, lapack_complex_double* b,
02851                            lapack_int ldb );
02852 
02853 lapack_int LAPACKE_sppcon( int matrix_order, char uplo, lapack_int n,
02854                            const float* ap, float anorm, float* rcond );
02855 lapack_int LAPACKE_dppcon( int matrix_order, char uplo, lapack_int n,
02856                            const double* ap, double anorm, double* rcond );
02857 lapack_int LAPACKE_cppcon( int matrix_order, char uplo, lapack_int n,
02858                            const lapack_complex_float* ap, float anorm,
02859                            float* rcond );
02860 lapack_int LAPACKE_zppcon( int matrix_order, char uplo, lapack_int n,
02861                            const lapack_complex_double* ap, double anorm,
02862                            double* rcond );
02863 
02864 lapack_int LAPACKE_sppequ( int matrix_order, char uplo, lapack_int n,
02865                            const float* ap, float* s, float* scond,
02866                            float* amax );
02867 lapack_int LAPACKE_dppequ( int matrix_order, char uplo, lapack_int n,
02868                            const double* ap, double* s, double* scond,
02869                            double* amax );
02870 lapack_int LAPACKE_cppequ( int matrix_order, char uplo, lapack_int n,
02871                            const lapack_complex_float* ap, float* s,
02872                            float* scond, float* amax );
02873 lapack_int LAPACKE_zppequ( int matrix_order, char uplo, lapack_int n,
02874                            const lapack_complex_double* ap, double* s,
02875                            double* scond, double* amax );
02876 
02877 lapack_int LAPACKE_spprfs( int matrix_order, char uplo, lapack_int n,
02878                            lapack_int nrhs, const float* ap, const float* afp,
02879                            const float* b, lapack_int ldb, float* x,
02880                            lapack_int ldx, float* ferr, float* berr );
02881 lapack_int LAPACKE_dpprfs( int matrix_order, char uplo, lapack_int n,
02882                            lapack_int nrhs, const double* ap, const double* afp,
02883                            const double* b, lapack_int ldb, double* x,
02884                            lapack_int ldx, double* ferr, double* berr );
02885 lapack_int LAPACKE_cpprfs( int matrix_order, char uplo, lapack_int n,
02886                            lapack_int nrhs, const lapack_complex_float* ap,
02887                            const lapack_complex_float* afp,
02888                            const lapack_complex_float* b, lapack_int ldb,
02889                            lapack_complex_float* x, lapack_int ldx, float* ferr,
02890                            float* berr );
02891 lapack_int LAPACKE_zpprfs( int matrix_order, char uplo, lapack_int n,
02892                            lapack_int nrhs, const lapack_complex_double* ap,
02893                            const lapack_complex_double* afp,
02894                            const lapack_complex_double* b, lapack_int ldb,
02895                            lapack_complex_double* x, lapack_int ldx,
02896                            double* ferr, double* berr );
02897 
02898 lapack_int LAPACKE_sppsv( int matrix_order, char uplo, lapack_int n,
02899                           lapack_int nrhs, float* ap, float* b,
02900                           lapack_int ldb );
02901 lapack_int LAPACKE_dppsv( int matrix_order, char uplo, lapack_int n,
02902                           lapack_int nrhs, double* ap, double* b,
02903                           lapack_int ldb );
02904 lapack_int LAPACKE_cppsv( int matrix_order, char uplo, lapack_int n,
02905                           lapack_int nrhs, lapack_complex_float* ap,
02906                           lapack_complex_float* b, lapack_int ldb );
02907 lapack_int LAPACKE_zppsv( int matrix_order, char uplo, lapack_int n,
02908                           lapack_int nrhs, lapack_complex_double* ap,
02909                           lapack_complex_double* b, lapack_int ldb );
02910 
02911 lapack_int LAPACKE_sppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02912                            lapack_int nrhs, float* ap, float* afp, char* equed,
02913                            float* s, float* b, lapack_int ldb, float* x,
02914                            lapack_int ldx, float* rcond, float* ferr,
02915                            float* berr );
02916 lapack_int LAPACKE_dppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02917                            lapack_int nrhs, double* ap, double* afp,
02918                            char* equed, double* s, double* b, lapack_int ldb,
02919                            double* x, lapack_int ldx, double* rcond,
02920                            double* ferr, double* berr );
02921 lapack_int LAPACKE_cppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02922                            lapack_int nrhs, lapack_complex_float* ap,
02923                            lapack_complex_float* afp, char* equed, float* s,
02924                            lapack_complex_float* b, lapack_int ldb,
02925                            lapack_complex_float* x, lapack_int ldx,
02926                            float* rcond, float* ferr, float* berr );
02927 lapack_int LAPACKE_zppsvx( int matrix_order, char fact, char uplo, lapack_int n,
02928                            lapack_int nrhs, lapack_complex_double* ap,
02929                            lapack_complex_double* afp, char* equed, double* s,
02930                            lapack_complex_double* b, lapack_int ldb,
02931                            lapack_complex_double* x, lapack_int ldx,
02932                            double* rcond, double* ferr, double* berr );
02933 
02934 lapack_int LAPACKE_spptrf( int matrix_order, char uplo, lapack_int n,
02935                            float* ap );
02936 lapack_int LAPACKE_dpptrf( int matrix_order, char uplo, lapack_int n,
02937                            double* ap );
02938 lapack_int LAPACKE_cpptrf( int matrix_order, char uplo, lapack_int n,
02939                            lapack_complex_float* ap );
02940 lapack_int LAPACKE_zpptrf( int matrix_order, char uplo, lapack_int n,
02941                            lapack_complex_double* ap );
02942 
02943 lapack_int LAPACKE_spptri( int matrix_order, char uplo, lapack_int n,
02944                            float* ap );
02945 lapack_int LAPACKE_dpptri( int matrix_order, char uplo, lapack_int n,
02946                            double* ap );
02947 lapack_int LAPACKE_cpptri( int matrix_order, char uplo, lapack_int n,
02948                            lapack_complex_float* ap );
02949 lapack_int LAPACKE_zpptri( int matrix_order, char uplo, lapack_int n,
02950                            lapack_complex_double* ap );
02951 
02952 lapack_int LAPACKE_spptrs( int matrix_order, char uplo, lapack_int n,
02953                            lapack_int nrhs, const float* ap, float* b,
02954                            lapack_int ldb );
02955 lapack_int LAPACKE_dpptrs( int matrix_order, char uplo, lapack_int n,
02956                            lapack_int nrhs, const double* ap, double* b,
02957                            lapack_int ldb );
02958 lapack_int LAPACKE_cpptrs( int matrix_order, char uplo, lapack_int n,
02959                            lapack_int nrhs, const lapack_complex_float* ap,
02960                            lapack_complex_float* b, lapack_int ldb );
02961 lapack_int LAPACKE_zpptrs( int matrix_order, char uplo, lapack_int n,
02962                            lapack_int nrhs, const lapack_complex_double* ap,
02963                            lapack_complex_double* b, lapack_int ldb );
02964 
02965 lapack_int LAPACKE_spstrf( int matrix_order, char uplo, lapack_int n, float* a,
02966                            lapack_int lda, lapack_int* piv, lapack_int* rank,
02967                            float tol );
02968 lapack_int LAPACKE_dpstrf( int matrix_order, char uplo, lapack_int n, double* a,
02969                            lapack_int lda, lapack_int* piv, lapack_int* rank,
02970                            double tol );
02971 lapack_int LAPACKE_cpstrf( int matrix_order, char uplo, lapack_int n,
02972                            lapack_complex_float* a, lapack_int lda,
02973                            lapack_int* piv, lapack_int* rank, float tol );
02974 lapack_int LAPACKE_zpstrf( int matrix_order, char uplo, lapack_int n,
02975                            lapack_complex_double* a, lapack_int lda,
02976                            lapack_int* piv, lapack_int* rank, double tol );
02977 
02978 lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
02979                            float anorm, float* rcond );
02980 lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
02981                            double anorm, double* rcond );
02982 lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
02983                            const lapack_complex_float* e, float anorm,
02984                            float* rcond );
02985 lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
02986                            const lapack_complex_double* e, double anorm,
02987                            double* rcond );
02988 
02989 lapack_int LAPACKE_spteqr( int matrix_order, char compz, lapack_int n, float* d,
02990                            float* e, float* z, lapack_int ldz );
02991 lapack_int LAPACKE_dpteqr( int matrix_order, char compz, lapack_int n,
02992                            double* d, double* e, double* z, lapack_int ldz );
02993 lapack_int LAPACKE_cpteqr( int matrix_order, char compz, lapack_int n, float* d,
02994                            float* e, lapack_complex_float* z, lapack_int ldz );
02995 lapack_int LAPACKE_zpteqr( int matrix_order, char compz, lapack_int n,
02996                            double* d, double* e, lapack_complex_double* z,
02997                            lapack_int ldz );
02998 
02999 lapack_int LAPACKE_sptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
03000                            const float* d, const float* e, const float* df,
03001                            const float* ef, const float* b, lapack_int ldb,
03002                            float* x, lapack_int ldx, float* ferr, float* berr );
03003 lapack_int LAPACKE_dptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
03004                            const double* d, const double* e, const double* df,
03005                            const double* ef, const double* b, lapack_int ldb,
03006                            double* x, lapack_int ldx, double* ferr,
03007                            double* berr );
03008 lapack_int LAPACKE_cptrfs( int matrix_order, char uplo, lapack_int n,
03009                            lapack_int nrhs, const float* d,
03010                            const lapack_complex_float* e, const float* df,
03011                            const lapack_complex_float* ef,
03012                            const lapack_complex_float* b, lapack_int ldb,
03013                            lapack_complex_float* x, lapack_int ldx, float* ferr,
03014                            float* berr );
03015 lapack_int LAPACKE_zptrfs( int matrix_order, char uplo, lapack_int n,
03016                            lapack_int nrhs, const double* d,
03017                            const lapack_complex_double* e, const double* df,
03018                            const lapack_complex_double* ef,
03019                            const lapack_complex_double* b, lapack_int ldb,
03020                            lapack_complex_double* x, lapack_int ldx,
03021                            double* ferr, double* berr );
03022 
03023 lapack_int LAPACKE_sptsv( int matrix_order, lapack_int n, lapack_int nrhs,
03024                           float* d, float* e, float* b, lapack_int ldb );
03025 lapack_int LAPACKE_dptsv( int matrix_order, lapack_int n, lapack_int nrhs,
03026                           double* d, double* e, double* b, lapack_int ldb );
03027 lapack_int LAPACKE_cptsv( int matrix_order, lapack_int n, lapack_int nrhs,
03028                           float* d, lapack_complex_float* e,
03029                           lapack_complex_float* b, lapack_int ldb );
03030 lapack_int LAPACKE_zptsv( int matrix_order, lapack_int n, lapack_int nrhs,
03031                           double* d, lapack_complex_double* e,
03032                           lapack_complex_double* b, lapack_int ldb );
03033 
03034 lapack_int LAPACKE_sptsvx( int matrix_order, char fact, lapack_int n,
03035                            lapack_int nrhs, const float* d, const float* e,
03036                            float* df, float* ef, const float* b, lapack_int ldb,
03037                            float* x, lapack_int ldx, float* rcond, float* ferr,
03038                            float* berr );
03039 lapack_int LAPACKE_dptsvx( int matrix_order, char fact, lapack_int n,
03040                            lapack_int nrhs, const double* d, const double* e,
03041                            double* df, double* ef, const double* b,
03042                            lapack_int ldb, double* x, lapack_int ldx,
03043                            double* rcond, double* ferr, double* berr );
03044 lapack_int LAPACKE_cptsvx( int matrix_order, char fact, lapack_int n,
03045                            lapack_int nrhs, const float* d,
03046                            const lapack_complex_float* e, float* df,
03047                            lapack_complex_float* ef,
03048                            const lapack_complex_float* b, lapack_int ldb,
03049                            lapack_complex_float* x, lapack_int ldx,
03050                            float* rcond, float* ferr, float* berr );
03051 lapack_int LAPACKE_zptsvx( int matrix_order, char fact, lapack_int n,
03052                            lapack_int nrhs, const double* d,
03053                            const lapack_complex_double* e, double* df,
03054                            lapack_complex_double* ef,
03055                            const lapack_complex_double* b, lapack_int ldb,
03056                            lapack_complex_double* x, lapack_int ldx,
03057                            double* rcond, double* ferr, double* berr );
03058 
03059 lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
03060 lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
03061 lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
03062 lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
03063 
03064 lapack_int LAPACKE_spttrs( int matrix_order, lapack_int n, lapack_int nrhs,
03065                            const float* d, const float* e, float* b,
03066                            lapack_int ldb );
03067 lapack_int LAPACKE_dpttrs( int matrix_order, lapack_int n, lapack_int nrhs,
03068                            const double* d, const double* e, double* b,
03069                            lapack_int ldb );
03070 lapack_int LAPACKE_cpttrs( int matrix_order, char uplo, lapack_int n,
03071                            lapack_int nrhs, const float* d,
03072                            const lapack_complex_float* e,
03073                            lapack_complex_float* b, lapack_int ldb );
03074 lapack_int LAPACKE_zpttrs( int matrix_order, char uplo, lapack_int n,
03075                            lapack_int nrhs, const double* d,
03076                            const lapack_complex_double* e,
03077                            lapack_complex_double* b, lapack_int ldb );
03078 
03079 lapack_int LAPACKE_ssbev( int matrix_order, char jobz, char uplo, lapack_int n,
03080                           lapack_int kd, float* ab, lapack_int ldab, float* w,
03081                           float* z, lapack_int ldz );
03082 lapack_int LAPACKE_dsbev( int matrix_order, char jobz, char uplo, lapack_int n,
03083                           lapack_int kd, double* ab, lapack_int ldab, double* w,
03084                           double* z, lapack_int ldz );
03085 
03086 lapack_int LAPACKE_ssbevd( int matrix_order, char jobz, char uplo, lapack_int n,
03087                            lapack_int kd, float* ab, lapack_int ldab, float* w,
03088                            float* z, lapack_int ldz );
03089 lapack_int LAPACKE_dsbevd( int matrix_order, char jobz, char uplo, lapack_int n,
03090                            lapack_int kd, double* ab, lapack_int ldab,
03091                            double* w, double* z, lapack_int ldz );
03092 
03093 lapack_int LAPACKE_ssbevx( int matrix_order, char jobz, char range, char uplo,
03094                            lapack_int n, lapack_int kd, float* ab,
03095                            lapack_int ldab, float* q, lapack_int ldq, float vl,
03096                            float vu, lapack_int il, lapack_int iu, float abstol,
03097                            lapack_int* m, float* w, float* z, lapack_int ldz,
03098                            lapack_int* ifail );
03099 lapack_int LAPACKE_dsbevx( int matrix_order, char jobz, char range, char uplo,
03100                            lapack_int n, lapack_int kd, double* ab,
03101                            lapack_int ldab, double* q, lapack_int ldq,
03102                            double vl, double vu, lapack_int il, lapack_int iu,
03103                            double abstol, lapack_int* m, double* w, double* z,
03104                            lapack_int ldz, lapack_int* ifail );
03105 
03106 lapack_int LAPACKE_ssbgst( int matrix_order, char vect, char uplo, lapack_int n,
03107                            lapack_int ka, lapack_int kb, float* ab,
03108                            lapack_int ldab, const float* bb, lapack_int ldbb,
03109                            float* x, lapack_int ldx );
03110 lapack_int LAPACKE_dsbgst( int matrix_order, char vect, char uplo, lapack_int n,
03111                            lapack_int ka, lapack_int kb, double* ab,
03112                            lapack_int ldab, const double* bb, lapack_int ldbb,
03113                            double* x, lapack_int ldx );
03114 
03115 lapack_int LAPACKE_ssbgv( int matrix_order, char jobz, char uplo, lapack_int n,
03116                           lapack_int ka, lapack_int kb, float* ab,
03117                           lapack_int ldab, float* bb, lapack_int ldbb, float* w,
03118                           float* z, lapack_int ldz );
03119 lapack_int LAPACKE_dsbgv( int matrix_order, char jobz, char uplo, lapack_int n,
03120                           lapack_int ka, lapack_int kb, double* ab,
03121                           lapack_int ldab, double* bb, lapack_int ldbb,
03122                           double* w, double* z, lapack_int ldz );
03123 
03124 lapack_int LAPACKE_ssbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
03125                            lapack_int ka, lapack_int kb, float* ab,
03126                            lapack_int ldab, float* bb, lapack_int ldbb,
03127                            float* w, float* z, lapack_int ldz );
03128 lapack_int LAPACKE_dsbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
03129                            lapack_int ka, lapack_int kb, double* ab,
03130                            lapack_int ldab, double* bb, lapack_int ldbb,
03131                            double* w, double* z, lapack_int ldz );
03132 
03133 lapack_int LAPACKE_ssbgvx( int matrix_order, char jobz, char range, char uplo,
03134                            lapack_int n, lapack_int ka, lapack_int kb,
03135                            float* ab, lapack_int ldab, float* bb,
03136                            lapack_int ldbb, float* q, lapack_int ldq, float vl,
03137                            float vu, lapack_int il, lapack_int iu, float abstol,
03138                            lapack_int* m, float* w, float* z, lapack_int ldz,
03139                            lapack_int* ifail );
03140 lapack_int LAPACKE_dsbgvx( int matrix_order, char jobz, char range, char uplo,
03141                            lapack_int n, lapack_int ka, lapack_int kb,
03142                            double* ab, lapack_int ldab, double* bb,
03143                            lapack_int ldbb, double* q, lapack_int ldq,
03144                            double vl, double vu, lapack_int il, lapack_int iu,
03145                            double abstol, lapack_int* m, double* w, double* z,
03146                            lapack_int ldz, lapack_int* ifail );
03147 
03148 lapack_int LAPACKE_ssbtrd( int matrix_order, char vect, char uplo, lapack_int n,
03149                            lapack_int kd, float* ab, lapack_int ldab, float* d,
03150                            float* e, float* q, lapack_int ldq );
03151 lapack_int LAPACKE_dsbtrd( int matrix_order, char vect, char uplo, lapack_int n,
03152                            lapack_int kd, double* ab, lapack_int ldab,
03153                            double* d, double* e, double* q, lapack_int ldq );
03154 
03155 lapack_int LAPACKE_ssfrk( int matrix_order, char transr, char uplo, char trans,
03156                           lapack_int n, lapack_int k, float alpha,
03157                           const float* a, lapack_int lda, float beta,
03158                           float* c );
03159 lapack_int LAPACKE_dsfrk( int matrix_order, char transr, char uplo, char trans,
03160                           lapack_int n, lapack_int k, double alpha,
03161                           const double* a, lapack_int lda, double beta,
03162                           double* c );
03163 
03164 lapack_int LAPACKE_sspcon( int matrix_order, char uplo, lapack_int n,
03165                            const float* ap, const lapack_int* ipiv, float anorm,
03166                            float* rcond );
03167 lapack_int LAPACKE_dspcon( int matrix_order, char uplo, lapack_int n,
03168                            const double* ap, const lapack_int* ipiv,
03169                            double anorm, double* rcond );
03170 lapack_int LAPACKE_cspcon( int matrix_order, char uplo, lapack_int n,
03171                            const lapack_complex_float* ap,
03172                            const lapack_int* ipiv, float anorm, float* rcond );
03173 lapack_int LAPACKE_zspcon( int matrix_order, char uplo, lapack_int n,
03174                            const lapack_complex_double* ap,
03175                            const lapack_int* ipiv, double anorm,
03176                            double* rcond );
03177 
03178 lapack_int LAPACKE_sspev( int matrix_order, char jobz, char uplo, lapack_int n,
03179                           float* ap, float* w, float* z, lapack_int ldz );
03180 lapack_int LAPACKE_dspev( int matrix_order, char jobz, char uplo, lapack_int n,
03181                           double* ap, double* w, double* z, lapack_int ldz );
03182 
03183 lapack_int LAPACKE_sspevd( int matrix_order, char jobz, char uplo, lapack_int n,
03184                            float* ap, float* w, float* z, lapack_int ldz );
03185 lapack_int LAPACKE_dspevd( int matrix_order, char jobz, char uplo, lapack_int n,
03186                            double* ap, double* w, double* z, lapack_int ldz );
03187 
03188 lapack_int LAPACKE_sspevx( int matrix_order, char jobz, char range, char uplo,
03189                            lapack_int n, float* ap, float vl, float vu,
03190                            lapack_int il, lapack_int iu, float abstol,
03191                            lapack_int* m, float* w, float* z, lapack_int ldz,
03192                            lapack_int* ifail );
03193 lapack_int LAPACKE_dspevx( int matrix_order, char jobz, char range, char uplo,
03194                            lapack_int n, double* ap, double vl, double vu,
03195                            lapack_int il, lapack_int iu, double abstol,
03196                            lapack_int* m, double* w, double* z, lapack_int ldz,
03197                            lapack_int* ifail );
03198 
03199 lapack_int LAPACKE_sspgst( int matrix_order, lapack_int itype, char uplo,
03200                            lapack_int n, float* ap, const float* bp );
03201 lapack_int LAPACKE_dspgst( int matrix_order, lapack_int itype, char uplo,
03202                            lapack_int n, double* ap, const double* bp );
03203 
03204 lapack_int LAPACKE_sspgv( int matrix_order, lapack_int itype, char jobz,
03205                           char uplo, lapack_int n, float* ap, float* bp,
03206                           float* w, float* z, lapack_int ldz );
03207 lapack_int LAPACKE_dspgv( int matrix_order, lapack_int itype, char jobz,
03208                           char uplo, lapack_int n, double* ap, double* bp,
03209                           double* w, double* z, lapack_int ldz );
03210 
03211 lapack_int LAPACKE_sspgvd( int matrix_order, lapack_int itype, char jobz,
03212                            char uplo, lapack_int n, float* ap, float* bp,
03213                            float* w, float* z, lapack_int ldz );
03214 lapack_int LAPACKE_dspgvd( int matrix_order, lapack_int itype, char jobz,
03215                            char uplo, lapack_int n, double* ap, double* bp,
03216                            double* w, double* z, lapack_int ldz );
03217 
03218 lapack_int LAPACKE_sspgvx( int matrix_order, lapack_int itype, char jobz,
03219                            char range, char uplo, lapack_int n, float* ap,
03220                            float* bp, float vl, float vu, lapack_int il,
03221                            lapack_int iu, float abstol, lapack_int* m, float* w,
03222                            float* z, lapack_int ldz, lapack_int* ifail );
03223 lapack_int LAPACKE_dspgvx( int matrix_order, lapack_int itype, char jobz,
03224                            char range, char uplo, lapack_int n, double* ap,
03225                            double* bp, double vl, double vu, lapack_int il,
03226                            lapack_int iu, double abstol, lapack_int* m,
03227                            double* w, double* z, lapack_int ldz,
03228                            lapack_int* ifail );
03229 
03230 lapack_int LAPACKE_ssprfs( int matrix_order, char uplo, lapack_int n,
03231                            lapack_int nrhs, const float* ap, const float* afp,
03232                            const lapack_int* ipiv, const float* b,
03233                            lapack_int ldb, float* x, lapack_int ldx,
03234                            float* ferr, float* berr );
03235 lapack_int LAPACKE_dsprfs( int matrix_order, char uplo, lapack_int n,
03236                            lapack_int nrhs, const double* ap, const double* afp,
03237                            const lapack_int* ipiv, const double* b,
03238                            lapack_int ldb, double* x, lapack_int ldx,
03239                            double* ferr, double* berr );
03240 lapack_int LAPACKE_csprfs( int matrix_order, char uplo, lapack_int n,
03241                            lapack_int nrhs, const lapack_complex_float* ap,
03242                            const lapack_complex_float* afp,
03243                            const lapack_int* ipiv,
03244                            const lapack_complex_float* b, lapack_int ldb,
03245                            lapack_complex_float* x, lapack_int ldx, float* ferr,
03246                            float* berr );
03247 lapack_int LAPACKE_zsprfs( int matrix_order, char uplo, lapack_int n,
03248                            lapack_int nrhs, const lapack_complex_double* ap,
03249                            const lapack_complex_double* afp,
03250                            const lapack_int* ipiv,
03251                            const lapack_complex_double* b, lapack_int ldb,
03252                            lapack_complex_double* x, lapack_int ldx,
03253                            double* ferr, double* berr );
03254 
03255 lapack_int LAPACKE_sspsv( int matrix_order, char uplo, lapack_int n,
03256                           lapack_int nrhs, float* ap, lapack_int* ipiv,
03257                           float* b, lapack_int ldb );
03258 lapack_int LAPACKE_dspsv( int matrix_order, char uplo, lapack_int n,
03259                           lapack_int nrhs, double* ap, lapack_int* ipiv,
03260                           double* b, lapack_int ldb );
03261 lapack_int LAPACKE_cspsv( int matrix_order, char uplo, lapack_int n,
03262                           lapack_int nrhs, lapack_complex_float* ap,
03263                           lapack_int* ipiv, lapack_complex_float* b,
03264                           lapack_int ldb );
03265 lapack_int LAPACKE_zspsv( int matrix_order, char uplo, lapack_int n,
03266                           lapack_int nrhs, lapack_complex_double* ap,
03267                           lapack_int* ipiv, lapack_complex_double* b,
03268                           lapack_int ldb );
03269 
03270 lapack_int LAPACKE_sspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03271                            lapack_int nrhs, const float* ap, float* afp,
03272                            lapack_int* ipiv, const float* b, lapack_int ldb,
03273                            float* x, lapack_int ldx, float* rcond, float* ferr,
03274                            float* berr );
03275 lapack_int LAPACKE_dspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03276                            lapack_int nrhs, const double* ap, double* afp,
03277                            lapack_int* ipiv, const double* b, lapack_int ldb,
03278                            double* x, lapack_int ldx, double* rcond,
03279                            double* ferr, double* berr );
03280 lapack_int LAPACKE_cspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03281                            lapack_int nrhs, const lapack_complex_float* ap,
03282                            lapack_complex_float* afp, lapack_int* ipiv,
03283                            const lapack_complex_float* b, lapack_int ldb,
03284                            lapack_complex_float* x, lapack_int ldx,
03285                            float* rcond, float* ferr, float* berr );
03286 lapack_int LAPACKE_zspsvx( int matrix_order, char fact, char uplo, lapack_int n,
03287                            lapack_int nrhs, const lapack_complex_double* ap,
03288                            lapack_complex_double* afp, lapack_int* ipiv,
03289                            const lapack_complex_double* b, lapack_int ldb,
03290                            lapack_complex_double* x, lapack_int ldx,
03291                            double* rcond, double* ferr, double* berr );
03292 
03293 lapack_int LAPACKE_ssptrd( int matrix_order, char uplo, lapack_int n, float* ap,
03294                            float* d, float* e, float* tau );
03295 lapack_int LAPACKE_dsptrd( int matrix_order, char uplo, lapack_int n,
03296                            double* ap, double* d, double* e, double* tau );
03297 
03298 lapack_int LAPACKE_ssptrf( int matrix_order, char uplo, lapack_int n, float* ap,
03299                            lapack_int* ipiv );
03300 lapack_int LAPACKE_dsptrf( int matrix_order, char uplo, lapack_int n,
03301                            double* ap, lapack_int* ipiv );
03302 lapack_int LAPACKE_csptrf( int matrix_order, char uplo, lapack_int n,
03303                            lapack_complex_float* ap, lapack_int* ipiv );
03304 lapack_int LAPACKE_zsptrf( int matrix_order, char uplo, lapack_int n,
03305                            lapack_complex_double* ap, lapack_int* ipiv );
03306 
03307 lapack_int LAPACKE_ssptri( int matrix_order, char uplo, lapack_int n, float* ap,
03308                            const lapack_int* ipiv );
03309 lapack_int LAPACKE_dsptri( int matrix_order, char uplo, lapack_int n,
03310                            double* ap, const lapack_int* ipiv );
03311 lapack_int LAPACKE_csptri( int matrix_order, char uplo, lapack_int n,
03312                            lapack_complex_float* ap, const lapack_int* ipiv );
03313 lapack_int LAPACKE_zsptri( int matrix_order, char uplo, lapack_int n,
03314                            lapack_complex_double* ap, const lapack_int* ipiv );
03315 
03316 lapack_int LAPACKE_ssptrs( int matrix_order, char uplo, lapack_int n,
03317                            lapack_int nrhs, const float* ap,
03318                            const lapack_int* ipiv, float* b, lapack_int ldb );
03319 lapack_int LAPACKE_dsptrs( int matrix_order, char uplo, lapack_int n,
03320                            lapack_int nrhs, const double* ap,
03321                            const lapack_int* ipiv, double* b, lapack_int ldb );
03322 lapack_int LAPACKE_csptrs( int matrix_order, char uplo, lapack_int n,
03323                            lapack_int nrhs, const lapack_complex_float* ap,
03324                            const lapack_int* ipiv, lapack_complex_float* b,
03325                            lapack_int ldb );
03326 lapack_int LAPACKE_zsptrs( int matrix_order, char uplo, lapack_int n,
03327                            lapack_int nrhs, const lapack_complex_double* ap,
03328                            const lapack_int* ipiv, lapack_complex_double* b,
03329                            lapack_int ldb );
03330 
03331 lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
03332                            float vu, lapack_int il, lapack_int iu, float abstol,
03333                            const float* d, const float* e, lapack_int* m,
03334                            lapack_int* nsplit, float* w, lapack_int* iblock,
03335                            lapack_int* isplit );
03336 lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
03337                            double vu, lapack_int il, lapack_int iu,
03338                            double abstol, const double* d, const double* e,
03339                            lapack_int* m, lapack_int* nsplit, double* w,
03340                            lapack_int* iblock, lapack_int* isplit );
03341 
03342 lapack_int LAPACKE_sstedc( int matrix_order, char compz, lapack_int n, float* d,
03343                            float* e, float* z, lapack_int ldz );
03344 lapack_int LAPACKE_dstedc( int matrix_order, char compz, lapack_int n,
03345                            double* d, double* e, double* z, lapack_int ldz );
03346 lapack_int LAPACKE_cstedc( int matrix_order, char compz, lapack_int n, float* d,
03347                            float* e, lapack_complex_float* z, lapack_int ldz );
03348 lapack_int LAPACKE_zstedc( int matrix_order, char compz, lapack_int n,
03349                            double* d, double* e, lapack_complex_double* z,
03350                            lapack_int ldz );
03351 
03352 lapack_int LAPACKE_sstegr( int matrix_order, char jobz, char range,
03353                            lapack_int n, float* d, float* e, float vl, float vu,
03354                            lapack_int il, lapack_int iu, float abstol,
03355                            lapack_int* m, float* w, float* z, lapack_int ldz,
03356                            lapack_int* isuppz );
03357 lapack_int LAPACKE_dstegr( int matrix_order, char jobz, char range,
03358                            lapack_int n, double* d, double* e, double vl,
03359                            double vu, lapack_int il, lapack_int iu,
03360                            double abstol, lapack_int* m, double* w, double* z,
03361                            lapack_int ldz, lapack_int* isuppz );
03362 lapack_int LAPACKE_cstegr( int matrix_order, char jobz, char range,
03363                            lapack_int n, float* d, float* e, float vl, float vu,
03364                            lapack_int il, lapack_int iu, float abstol,
03365                            lapack_int* m, float* w, lapack_complex_float* z,
03366                            lapack_int ldz, lapack_int* isuppz );
03367 lapack_int LAPACKE_zstegr( int matrix_order, char jobz, char range,
03368                            lapack_int n, double* d, double* e, double vl,
03369                            double vu, lapack_int il, lapack_int iu,
03370                            double abstol, lapack_int* m, double* w,
03371                            lapack_complex_double* z, lapack_int ldz,
03372                            lapack_int* isuppz );
03373 
03374 lapack_int LAPACKE_sstein( int matrix_order, lapack_int n, const float* d,
03375                            const float* e, lapack_int m, const float* w,
03376                            const lapack_int* iblock, const lapack_int* isplit,
03377                            float* z, lapack_int ldz, lapack_int* ifailv );
03378 lapack_int LAPACKE_dstein( int matrix_order, lapack_int n, const double* d,
03379                            const double* e, lapack_int m, const double* w,
03380                            const lapack_int* iblock, const lapack_int* isplit,
03381                            double* z, lapack_int ldz, lapack_int* ifailv );
03382 lapack_int LAPACKE_cstein( int matrix_order, lapack_int n, const float* d,
03383                            const float* e, lapack_int m, const float* w,
03384                            const lapack_int* iblock, const lapack_int* isplit,
03385                            lapack_complex_float* z, lapack_int ldz,
03386                            lapack_int* ifailv );
03387 lapack_int LAPACKE_zstein( int matrix_order, lapack_int n, const double* d,
03388                            const double* e, lapack_int m, const double* w,
03389                            const lapack_int* iblock, const lapack_int* isplit,
03390                            lapack_complex_double* z, lapack_int ldz,
03391                            lapack_int* ifailv );
03392 
03393 lapack_int LAPACKE_sstemr( int matrix_order, char jobz, char range,
03394                            lapack_int n, float* d, float* e, float vl, float vu,
03395                            lapack_int il, lapack_int iu, lapack_int* m,
03396                            float* w, float* z, lapack_int ldz, lapack_int nzc,
03397                            lapack_int* isuppz, lapack_logical* tryrac );
03398 lapack_int LAPACKE_dstemr( int matrix_order, char jobz, char range,
03399                            lapack_int n, double* d, double* e, double vl,
03400                            double vu, lapack_int il, lapack_int iu,
03401                            lapack_int* m, double* w, double* z, lapack_int ldz,
03402                            lapack_int nzc, lapack_int* isuppz,
03403                            lapack_logical* tryrac );
03404 lapack_int LAPACKE_cstemr( int matrix_order, char jobz, char range,
03405                            lapack_int n, float* d, float* e, float vl, float vu,
03406                            lapack_int il, lapack_int iu, lapack_int* m,
03407                            float* w, lapack_complex_float* z, lapack_int ldz,
03408                            lapack_int nzc, lapack_int* isuppz,
03409                            lapack_logical* tryrac );
03410 lapack_int LAPACKE_zstemr( int matrix_order, char jobz, char range,
03411                            lapack_int n, double* d, double* e, double vl,
03412                            double vu, lapack_int il, lapack_int iu,
03413                            lapack_int* m, double* w, lapack_complex_double* z,
03414                            lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
03415                            lapack_logical* tryrac );
03416 
03417 lapack_int LAPACKE_ssteqr( int matrix_order, char compz, lapack_int n, float* d,
03418                            float* e, float* z, lapack_int ldz );
03419 lapack_int LAPACKE_dsteqr( int matrix_order, char compz, lapack_int n,
03420                            double* d, double* e, double* z, lapack_int ldz );
03421 lapack_int LAPACKE_csteqr( int matrix_order, char compz, lapack_int n, float* d,
03422                            float* e, lapack_complex_float* z, lapack_int ldz );
03423 lapack_int LAPACKE_zsteqr( int matrix_order, char compz, lapack_int n,
03424                            double* d, double* e, lapack_complex_double* z,
03425                            lapack_int ldz );
03426 
03427 lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
03428 lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
03429 
03430 lapack_int LAPACKE_sstev( int matrix_order, char jobz, lapack_int n, float* d,
03431                           float* e, float* z, lapack_int ldz );
03432 lapack_int LAPACKE_dstev( int matrix_order, char jobz, lapack_int n, double* d,
03433                           double* e, double* z, lapack_int ldz );
03434 
03435 lapack_int LAPACKE_sstevd( int matrix_order, char jobz, lapack_int n, float* d,
03436                            float* e, float* z, lapack_int ldz );
03437 lapack_int LAPACKE_dstevd( int matrix_order, char jobz, lapack_int n, double* d,
03438                            double* e, double* z, lapack_int ldz );
03439 
03440 lapack_int LAPACKE_sstevr( int matrix_order, char jobz, char range,
03441                            lapack_int n, float* d, float* e, float vl, float vu,
03442                            lapack_int il, lapack_int iu, float abstol,
03443                            lapack_int* m, float* w, float* z, lapack_int ldz,
03444                            lapack_int* isuppz );
03445 lapack_int LAPACKE_dstevr( int matrix_order, char jobz, char range,
03446                            lapack_int n, double* d, double* e, double vl,
03447                            double vu, lapack_int il, lapack_int iu,
03448                            double abstol, lapack_int* m, double* w, double* z,
03449                            lapack_int ldz, lapack_int* isuppz );
03450 
03451 lapack_int LAPACKE_sstevx( int matrix_order, char jobz, char range,
03452                            lapack_int n, float* d, float* e, float vl, float vu,
03453                            lapack_int il, lapack_int iu, float abstol,
03454                            lapack_int* m, float* w, float* z, lapack_int ldz,
03455                            lapack_int* ifail );
03456 lapack_int LAPACKE_dstevx( int matrix_order, char jobz, char range,
03457                            lapack_int n, double* d, double* e, double vl,
03458                            double vu, lapack_int il, lapack_int iu,
03459                            double abstol, lapack_int* m, double* w, double* z,
03460                            lapack_int ldz, lapack_int* ifail );
03461 
03462 lapack_int LAPACKE_ssycon( int matrix_order, char uplo, lapack_int n,
03463                            const float* a, lapack_int lda,
03464                            const lapack_int* ipiv, float anorm, float* rcond );
03465 lapack_int LAPACKE_dsycon( int matrix_order, char uplo, lapack_int n,
03466                            const double* a, lapack_int lda,
03467                            const lapack_int* ipiv, double anorm,
03468                            double* rcond );
03469 lapack_int LAPACKE_csycon( int matrix_order, char uplo, lapack_int n,
03470                            const lapack_complex_float* a, lapack_int lda,
03471                            const lapack_int* ipiv, float anorm, float* rcond );
03472 lapack_int LAPACKE_zsycon( int matrix_order, char uplo, lapack_int n,
03473                            const lapack_complex_double* a, lapack_int lda,
03474                            const lapack_int* ipiv, double anorm,
03475                            double* rcond );
03476 
03477 lapack_int LAPACKE_ssyequb( int matrix_order, char uplo, lapack_int n,
03478                             const float* a, lapack_int lda, float* s,
03479                             float* scond, float* amax );
03480 lapack_int LAPACKE_dsyequb( int matrix_order, char uplo, lapack_int n,
03481                             const double* a, lapack_int lda, double* s,
03482                             double* scond, double* amax );
03483 lapack_int LAPACKE_csyequb( int matrix_order, char uplo, lapack_int n,
03484                             const lapack_complex_float* a, lapack_int lda,
03485                             float* s, float* scond, float* amax );
03486 lapack_int LAPACKE_zsyequb( int matrix_order, char uplo, lapack_int n,
03487                             const lapack_complex_double* a, lapack_int lda,
03488                             double* s, double* scond, double* amax );
03489 
03490 lapack_int LAPACKE_ssyev( int matrix_order, char jobz, char uplo, lapack_int n,
03491                           float* a, lapack_int lda, float* w );
03492 lapack_int LAPACKE_dsyev( int matrix_order, char jobz, char uplo, lapack_int n,
03493                           double* a, lapack_int lda, double* w );
03494 
03495 lapack_int LAPACKE_ssyevd( int matrix_order, char jobz, char uplo, lapack_int n,
03496                            float* a, lapack_int lda, float* w );
03497 lapack_int LAPACKE_dsyevd( int matrix_order, char jobz, char uplo, lapack_int n,
03498                            double* a, lapack_int lda, double* w );
03499 
03500 lapack_int LAPACKE_ssyevr( int matrix_order, char jobz, char range, char uplo,
03501                            lapack_int n, float* a, lapack_int lda, float vl,
03502                            float vu, lapack_int il, lapack_int iu, float abstol,
03503                            lapack_int* m, float* w, float* z, lapack_int ldz,
03504                            lapack_int* isuppz );
03505 lapack_int LAPACKE_dsyevr( int matrix_order, char jobz, char range, char uplo,
03506                            lapack_int n, double* a, lapack_int lda, double vl,
03507                            double vu, lapack_int il, lapack_int iu,
03508                            double abstol, lapack_int* m, double* w, double* z,
03509                            lapack_int ldz, lapack_int* isuppz );
03510 
03511 lapack_int LAPACKE_ssyevx( int matrix_order, char jobz, char range, char uplo,
03512                            lapack_int n, float* a, lapack_int lda, float vl,
03513                            float vu, lapack_int il, lapack_int iu, float abstol,
03514                            lapack_int* m, float* w, float* z, lapack_int ldz,
03515                            lapack_int* ifail );
03516 lapack_int LAPACKE_dsyevx( int matrix_order, char jobz, char range, char uplo,
03517                            lapack_int n, double* a, lapack_int lda, double vl,
03518                            double vu, lapack_int il, lapack_int iu,
03519                            double abstol, lapack_int* m, double* w, double* z,
03520                            lapack_int ldz, lapack_int* ifail );
03521 
03522 lapack_int LAPACKE_ssygst( int matrix_order, lapack_int itype, char uplo,
03523                            lapack_int n, float* a, lapack_int lda,
03524                            const float* b, lapack_int ldb );
03525 lapack_int LAPACKE_dsygst( int matrix_order, lapack_int itype, char uplo,
03526                            lapack_int n, double* a, lapack_int lda,
03527                            const double* b, lapack_int ldb );
03528 
03529 lapack_int LAPACKE_ssygv( int matrix_order, lapack_int itype, char jobz,
03530                           char uplo, lapack_int n, float* a, lapack_int lda,
03531                           float* b, lapack_int ldb, float* w );
03532 lapack_int LAPACKE_dsygv( int matrix_order, lapack_int itype, char jobz,
03533                           char uplo, lapack_int n, double* a, lapack_int lda,
03534                           double* b, lapack_int ldb, double* w );
03535 
03536 lapack_int LAPACKE_ssygvd( int matrix_order, lapack_int itype, char jobz,
03537                            char uplo, lapack_int n, float* a, lapack_int lda,
03538                            float* b, lapack_int ldb, float* w );
03539 lapack_int LAPACKE_dsygvd( int matrix_order, lapack_int itype, char jobz,
03540                            char uplo, lapack_int n, double* a, lapack_int lda,
03541                            double* b, lapack_int ldb, double* w );
03542 
03543 lapack_int LAPACKE_ssygvx( int matrix_order, lapack_int itype, char jobz,
03544                            char range, char uplo, lapack_int n, float* a,
03545                            lapack_int lda, float* b, lapack_int ldb, float vl,
03546                            float vu, lapack_int il, lapack_int iu, float abstol,
03547                            lapack_int* m, float* w, float* z, lapack_int ldz,
03548                            lapack_int* ifail );
03549 lapack_int LAPACKE_dsygvx( int matrix_order, lapack_int itype, char jobz,
03550                            char range, char uplo, lapack_int n, double* a,
03551                            lapack_int lda, double* b, lapack_int ldb, double vl,
03552                            double vu, lapack_int il, lapack_int iu,
03553                            double abstol, lapack_int* m, double* w, double* z,
03554                            lapack_int ldz, lapack_int* ifail );
03555 
03556 lapack_int LAPACKE_ssyrfs( int matrix_order, char uplo, lapack_int n,
03557                            lapack_int nrhs, const float* a, lapack_int lda,
03558                            const float* af, lapack_int ldaf,
03559                            const lapack_int* ipiv, const float* b,
03560                            lapack_int ldb, float* x, lapack_int ldx,
03561                            float* ferr, float* berr );
03562 lapack_int LAPACKE_dsyrfs( int matrix_order, char uplo, lapack_int n,
03563                            lapack_int nrhs, const double* a, lapack_int lda,
03564                            const double* af, lapack_int ldaf,
03565                            const lapack_int* ipiv, const double* b,
03566                            lapack_int ldb, double* x, lapack_int ldx,
03567                            double* ferr, double* berr );
03568 lapack_int LAPACKE_csyrfs( int matrix_order, char uplo, lapack_int n,
03569                            lapack_int nrhs, const lapack_complex_float* a,
03570                            lapack_int lda, const lapack_complex_float* af,
03571                            lapack_int ldaf, const lapack_int* ipiv,
03572                            const lapack_complex_float* b, lapack_int ldb,
03573                            lapack_complex_float* x, lapack_int ldx, float* ferr,
03574                            float* berr );
03575 lapack_int LAPACKE_zsyrfs( int matrix_order, char uplo, lapack_int n,
03576                            lapack_int nrhs, const lapack_complex_double* a,
03577                            lapack_int lda, const lapack_complex_double* af,
03578                            lapack_int ldaf, const lapack_int* ipiv,
03579                            const lapack_complex_double* b, lapack_int ldb,
03580                            lapack_complex_double* x, lapack_int ldx,
03581                            double* ferr, double* berr );
03582 
03583 lapack_int LAPACKE_ssyrfsx( int matrix_order, char uplo, char equed,
03584                             lapack_int n, lapack_int nrhs, const float* a,
03585                             lapack_int lda, const float* af, lapack_int ldaf,
03586                             const lapack_int* ipiv, const float* s,
03587                             const float* b, lapack_int ldb, float* x,
03588                             lapack_int ldx, float* rcond, float* berr,
03589                             lapack_int n_err_bnds, float* err_bnds_norm,
03590                             float* err_bnds_comp, lapack_int nparams,
03591                             float* params );
03592 lapack_int LAPACKE_dsyrfsx( int matrix_order, char uplo, char equed,
03593                             lapack_int n, lapack_int nrhs, const double* a,
03594                             lapack_int lda, const double* af, lapack_int ldaf,
03595                             const lapack_int* ipiv, const double* s,
03596                             const double* b, lapack_int ldb, double* x,
03597                             lapack_int ldx, double* rcond, double* berr,
03598                             lapack_int n_err_bnds, double* err_bnds_norm,
03599                             double* err_bnds_comp, lapack_int nparams,
03600                             double* params );
03601 lapack_int LAPACKE_csyrfsx( int matrix_order, char uplo, char equed,
03602                             lapack_int n, lapack_int nrhs,
03603                             const lapack_complex_float* a, lapack_int lda,
03604                             const lapack_complex_float* af, lapack_int ldaf,
03605                             const lapack_int* ipiv, const float* s,
03606                             const lapack_complex_float* b, lapack_int ldb,
03607                             lapack_complex_float* x, lapack_int ldx,
03608                             float* rcond, float* berr, lapack_int n_err_bnds,
03609                             float* err_bnds_norm, float* err_bnds_comp,
03610                             lapack_int nparams, float* params );
03611 lapack_int LAPACKE_zsyrfsx( int matrix_order, char uplo, char equed,
03612                             lapack_int n, lapack_int nrhs,
03613                             const lapack_complex_double* a, lapack_int lda,
03614                             const lapack_complex_double* af, lapack_int ldaf,
03615                             const lapack_int* ipiv, const double* s,
03616                             const lapack_complex_double* b, lapack_int ldb,
03617                             lapack_complex_double* x, lapack_int ldx,
03618                             double* rcond, double* berr, lapack_int n_err_bnds,
03619                             double* err_bnds_norm, double* err_bnds_comp,
03620                             lapack_int nparams, double* params );
03621 
03622 lapack_int LAPACKE_ssysv( int matrix_order, char uplo, lapack_int n,
03623                           lapack_int nrhs, float* a, lapack_int lda,
03624                           lapack_int* ipiv, float* b, lapack_int ldb );
03625 lapack_int LAPACKE_dsysv( int matrix_order, char uplo, lapack_int n,
03626                           lapack_int nrhs, double* a, lapack_int lda,
03627                           lapack_int* ipiv, double* b, lapack_int ldb );
03628 lapack_int LAPACKE_csysv( int matrix_order, char uplo, lapack_int n,
03629                           lapack_int nrhs, lapack_complex_float* a,
03630                           lapack_int lda, lapack_int* ipiv,
03631                           lapack_complex_float* b, lapack_int ldb );
03632 lapack_int LAPACKE_zsysv( int matrix_order, char uplo, lapack_int n,
03633                           lapack_int nrhs, lapack_complex_double* a,
03634                           lapack_int lda, lapack_int* ipiv,
03635                           lapack_complex_double* b, lapack_int ldb );
03636 
03637 lapack_int LAPACKE_ssysvx( int matrix_order, char fact, char uplo, lapack_int n,
03638                            lapack_int nrhs, const float* a, lapack_int lda,
03639                            float* af, lapack_int ldaf, lapack_int* ipiv,
03640                            const float* b, lapack_int ldb, float* x,
03641                            lapack_int ldx, float* rcond, float* ferr,
03642                            float* berr );
03643 lapack_int LAPACKE_dsysvx( int matrix_order, char fact, char uplo, lapack_int n,
03644                            lapack_int nrhs, const double* a, lapack_int lda,
03645                            double* af, lapack_int ldaf, lapack_int* ipiv,
03646                            const double* b, lapack_int ldb, double* x,
03647                            lapack_int ldx, double* rcond, double* ferr,
03648                            double* berr );
03649 lapack_int LAPACKE_csysvx( int matrix_order, char fact, char uplo, lapack_int n,
03650                            lapack_int nrhs, const lapack_complex_float* a,
03651                            lapack_int lda, lapack_complex_float* af,
03652                            lapack_int ldaf, lapack_int* ipiv,
03653                            const lapack_complex_float* b, lapack_int ldb,
03654                            lapack_complex_float* x, lapack_int ldx,
03655                            float* rcond, float* ferr, float* berr );
03656 lapack_int LAPACKE_zsysvx( int matrix_order, char fact, char uplo, lapack_int n,
03657                            lapack_int nrhs, const lapack_complex_double* a,
03658                            lapack_int lda, lapack_complex_double* af,
03659                            lapack_int ldaf, lapack_int* ipiv,
03660                            const lapack_complex_double* b, lapack_int ldb,
03661                            lapack_complex_double* x, lapack_int ldx,
03662                            double* rcond, double* ferr, double* berr );
03663 
03664 lapack_int LAPACKE_ssysvxx( int matrix_order, char fact, char uplo,
03665                             lapack_int n, lapack_int nrhs, float* a,
03666                             lapack_int lda, float* af, lapack_int ldaf,
03667                             lapack_int* ipiv, char* equed, float* s, float* b,
03668                             lapack_int ldb, float* x, lapack_int ldx,
03669                             float* rcond, float* rpvgrw, float* berr,
03670                             lapack_int n_err_bnds, float* err_bnds_norm,
03671                             float* err_bnds_comp, lapack_int nparams,
03672                             float* params );
03673 lapack_int LAPACKE_dsysvxx( int matrix_order, char fact, char uplo,
03674                             lapack_int n, lapack_int nrhs, double* a,
03675                             lapack_int lda, double* af, lapack_int ldaf,
03676                             lapack_int* ipiv, char* equed, double* s, double* b,
03677                             lapack_int ldb, double* x, lapack_int ldx,
03678                             double* rcond, double* rpvgrw, double* berr,
03679                             lapack_int n_err_bnds, double* err_bnds_norm,
03680                             double* err_bnds_comp, lapack_int nparams,
03681                             double* params );
03682 lapack_int LAPACKE_csysvxx( int matrix_order, char fact, char uplo,
03683                             lapack_int n, lapack_int nrhs,
03684                             lapack_complex_float* a, lapack_int lda,
03685                             lapack_complex_float* af, lapack_int ldaf,
03686                             lapack_int* ipiv, char* equed, float* s,
03687                             lapack_complex_float* b, lapack_int ldb,
03688                             lapack_complex_float* x, lapack_int ldx,
03689                             float* rcond, float* rpvgrw, float* berr,
03690                             lapack_int n_err_bnds, float* err_bnds_norm,
03691                             float* err_bnds_comp, lapack_int nparams,
03692                             float* params );
03693 lapack_int LAPACKE_zsysvxx( int matrix_order, char fact, char uplo,
03694                             lapack_int n, lapack_int nrhs,
03695                             lapack_complex_double* a, lapack_int lda,
03696                             lapack_complex_double* af, lapack_int ldaf,
03697                             lapack_int* ipiv, char* equed, double* s,
03698                             lapack_complex_double* b, lapack_int ldb,
03699                             lapack_complex_double* x, lapack_int ldx,
03700                             double* rcond, double* rpvgrw, double* berr,
03701                             lapack_int n_err_bnds, double* err_bnds_norm,
03702                             double* err_bnds_comp, lapack_int nparams,
03703                             double* params );
03704 
03705 lapack_int LAPACKE_ssytrd( int matrix_order, char uplo, lapack_int n, float* a,
03706                            lapack_int lda, float* d, float* e, float* tau );
03707 lapack_int LAPACKE_dsytrd( int matrix_order, char uplo, lapack_int n, double* a,
03708                            lapack_int lda, double* d, double* e, double* tau );
03709 
03710 lapack_int LAPACKE_ssytrf( int matrix_order, char uplo, lapack_int n, float* a,
03711                            lapack_int lda, lapack_int* ipiv );
03712 lapack_int LAPACKE_dsytrf( int matrix_order, char uplo, lapack_int n, double* a,
03713                            lapack_int lda, lapack_int* ipiv );
03714 lapack_int LAPACKE_csytrf( int matrix_order, char uplo, lapack_int n,
03715                            lapack_complex_float* a, lapack_int lda,
03716                            lapack_int* ipiv );
03717 lapack_int LAPACKE_zsytrf( int matrix_order, char uplo, lapack_int n,
03718                            lapack_complex_double* a, lapack_int lda,
03719                            lapack_int* ipiv );
03720 
03721 lapack_int LAPACKE_ssytri( int matrix_order, char uplo, lapack_int n, float* a,
03722                            lapack_int lda, const lapack_int* ipiv );
03723 lapack_int LAPACKE_dsytri( int matrix_order, char uplo, lapack_int n, double* a,
03724                            lapack_int lda, const lapack_int* ipiv );
03725 lapack_int LAPACKE_csytri( int matrix_order, char uplo, lapack_int n,
03726                            lapack_complex_float* a, lapack_int lda,
03727                            const lapack_int* ipiv );
03728 lapack_int LAPACKE_zsytri( int matrix_order, char uplo, lapack_int n,
03729                            lapack_complex_double* a, lapack_int lda,
03730                            const lapack_int* ipiv );
03731 
03732 lapack_int LAPACKE_ssytrs( int matrix_order, char uplo, lapack_int n,
03733                            lapack_int nrhs, const float* a, lapack_int lda,
03734                            const lapack_int* ipiv, float* b, lapack_int ldb );
03735 lapack_int LAPACKE_dsytrs( int matrix_order, char uplo, lapack_int n,
03736                            lapack_int nrhs, const double* a, lapack_int lda,
03737                            const lapack_int* ipiv, double* b, lapack_int ldb );
03738 lapack_int LAPACKE_csytrs( int matrix_order, char uplo, lapack_int n,
03739                            lapack_int nrhs, const lapack_complex_float* a,
03740                            lapack_int lda, const lapack_int* ipiv,
03741                            lapack_complex_float* b, lapack_int ldb );
03742 lapack_int LAPACKE_zsytrs( int matrix_order, char uplo, lapack_int n,
03743                            lapack_int nrhs, const lapack_complex_double* a,
03744                            lapack_int lda, const lapack_int* ipiv,
03745                            lapack_complex_double* b, lapack_int ldb );
03746 
03747 lapack_int LAPACKE_stbcon( int matrix_order, char norm, char uplo, char diag,
03748                            lapack_int n, lapack_int kd, const float* ab,
03749                            lapack_int ldab, float* rcond );
03750 lapack_int LAPACKE_dtbcon( int matrix_order, char norm, char uplo, char diag,
03751                            lapack_int n, lapack_int kd, const double* ab,
03752                            lapack_int ldab, double* rcond );
03753 lapack_int LAPACKE_ctbcon( int matrix_order, char norm, char uplo, char diag,
03754                            lapack_int n, lapack_int kd,
03755                            const lapack_complex_float* ab, lapack_int ldab,
03756                            float* rcond );
03757 lapack_int LAPACKE_ztbcon( int matrix_order, char norm, char uplo, char diag,
03758                            lapack_int n, lapack_int kd,
03759                            const lapack_complex_double* ab, lapack_int ldab,
03760                            double* rcond );
03761 
03762 lapack_int LAPACKE_stbrfs( int matrix_order, char uplo, char trans, char diag,
03763                            lapack_int n, lapack_int kd, lapack_int nrhs,
03764                            const float* ab, lapack_int ldab, const float* b,
03765                            lapack_int ldb, const float* x, lapack_int ldx,
03766                            float* ferr, float* berr );
03767 lapack_int LAPACKE_dtbrfs( int matrix_order, char uplo, char trans, char diag,
03768                            lapack_int n, lapack_int kd, lapack_int nrhs,
03769                            const double* ab, lapack_int ldab, const double* b,
03770                            lapack_int ldb, const double* x, lapack_int ldx,
03771                            double* ferr, double* berr );
03772 lapack_int LAPACKE_ctbrfs( int matrix_order, char uplo, char trans, char diag,
03773                            lapack_int n, lapack_int kd, lapack_int nrhs,
03774                            const lapack_complex_float* ab, lapack_int ldab,
03775                            const lapack_complex_float* b, lapack_int ldb,
03776                            const lapack_complex_float* x, lapack_int ldx,
03777                            float* ferr, float* berr );
03778 lapack_int LAPACKE_ztbrfs( int matrix_order, char uplo, char trans, char diag,
03779                            lapack_int n, lapack_int kd, lapack_int nrhs,
03780                            const lapack_complex_double* ab, lapack_int ldab,
03781                            const lapack_complex_double* b, lapack_int ldb,
03782                            const lapack_complex_double* x, lapack_int ldx,
03783                            double* ferr, double* berr );
03784 
03785 lapack_int LAPACKE_stbtrs( int matrix_order, char uplo, char trans, char diag,
03786                            lapack_int n, lapack_int kd, lapack_int nrhs,
03787                            const float* ab, lapack_int ldab, float* b,
03788                            lapack_int ldb );
03789 lapack_int LAPACKE_dtbtrs( int matrix_order, char uplo, char trans, char diag,
03790                            lapack_int n, lapack_int kd, lapack_int nrhs,
03791                            const double* ab, lapack_int ldab, double* b,
03792                            lapack_int ldb );
03793 lapack_int LAPACKE_ctbtrs( int matrix_order, char uplo, char trans, char diag,
03794                            lapack_int n, lapack_int kd, lapack_int nrhs,
03795                            const lapack_complex_float* ab, lapack_int ldab,
03796                            lapack_complex_float* b, lapack_int ldb );
03797 lapack_int LAPACKE_ztbtrs( int matrix_order, char uplo, char trans, char diag,
03798                            lapack_int n, lapack_int kd, lapack_int nrhs,
03799                            const lapack_complex_double* ab, lapack_int ldab,
03800                            lapack_complex_double* b, lapack_int ldb );
03801 
03802 lapack_int LAPACKE_stfsm( int matrix_order, char transr, char side, char uplo,
03803                           char trans, char diag, lapack_int m, lapack_int n,
03804                           float alpha, const float* a, float* b,
03805                           lapack_int ldb );
03806 lapack_int LAPACKE_dtfsm( int matrix_order, char transr, char side, char uplo,
03807                           char trans, char diag, lapack_int m, lapack_int n,
03808                           double alpha, const double* a, double* b,
03809                           lapack_int ldb );
03810 lapack_int LAPACKE_ctfsm( int matrix_order, char transr, char side, char uplo,
03811                           char trans, char diag, lapack_int m, lapack_int n,
03812                           lapack_complex_float alpha,
03813                           const lapack_complex_float* a,
03814                           lapack_complex_float* b, lapack_int ldb );
03815 lapack_int LAPACKE_ztfsm( int matrix_order, char transr, char side, char uplo,
03816                           char trans, char diag, lapack_int m, lapack_int n,
03817                           lapack_complex_double alpha,
03818                           const lapack_complex_double* a,
03819                           lapack_complex_double* b, lapack_int ldb );
03820 
03821 lapack_int LAPACKE_stftri( int matrix_order, char transr, char uplo, char diag,
03822                            lapack_int n, float* a );
03823 lapack_int LAPACKE_dtftri( int matrix_order, char transr, char uplo, char diag,
03824                            lapack_int n, double* a );
03825 lapack_int LAPACKE_ctftri( int matrix_order, char transr, char uplo, char diag,
03826                            lapack_int n, lapack_complex_float* a );
03827 lapack_int LAPACKE_ztftri( int matrix_order, char transr, char uplo, char diag,
03828                            lapack_int n, lapack_complex_double* a );
03829 
03830 lapack_int LAPACKE_stfttp( int matrix_order, char transr, char uplo,
03831                            lapack_int n, const float* arf, float* ap );
03832 lapack_int LAPACKE_dtfttp( int matrix_order, char transr, char uplo,
03833                            lapack_int n, const double* arf, double* ap );
03834 lapack_int LAPACKE_ctfttp( int matrix_order, char transr, char uplo,
03835                            lapack_int n, const lapack_complex_float* arf,
03836                            lapack_complex_float* ap );
03837 lapack_int LAPACKE_ztfttp( int matrix_order, char transr, char uplo,
03838                            lapack_int n, const lapack_complex_double* arf,
03839                            lapack_complex_double* ap );
03840 
03841 lapack_int LAPACKE_stfttr( int matrix_order, char transr, char uplo,
03842                            lapack_int n, const float* arf, float* a,
03843                            lapack_int lda );
03844 lapack_int LAPACKE_dtfttr( int matrix_order, char transr, char uplo,
03845                            lapack_int n, const double* arf, double* a,
03846                            lapack_int lda );
03847 lapack_int LAPACKE_ctfttr( int matrix_order, char transr, char uplo,
03848                            lapack_int n, const lapack_complex_float* arf,
03849                            lapack_complex_float* a, lapack_int lda );
03850 lapack_int LAPACKE_ztfttr( int matrix_order, char transr, char uplo,
03851                            lapack_int n, const lapack_complex_double* arf,
03852                            lapack_complex_double* a, lapack_int lda );
03853 
03854 lapack_int LAPACKE_stgevc( int matrix_order, char side, char howmny,
03855                            const lapack_logical* select, lapack_int n,
03856                            const float* s, lapack_int lds, const float* p,
03857                            lapack_int ldp, float* vl, lapack_int ldvl,
03858                            float* vr, lapack_int ldvr, lapack_int mm,
03859                            lapack_int* m );
03860 lapack_int LAPACKE_dtgevc( int matrix_order, char side, char howmny,
03861                            const lapack_logical* select, lapack_int n,
03862                            const double* s, lapack_int lds, const double* p,
03863                            lapack_int ldp, double* vl, lapack_int ldvl,
03864                            double* vr, lapack_int ldvr, lapack_int mm,
03865                            lapack_int* m );
03866 lapack_int LAPACKE_ctgevc( int matrix_order, char side, char howmny,
03867                            const lapack_logical* select, lapack_int n,
03868                            const lapack_complex_float* s, lapack_int lds,
03869                            const lapack_complex_float* p, lapack_int ldp,
03870                            lapack_complex_float* vl, lapack_int ldvl,
03871                            lapack_complex_float* vr, lapack_int ldvr,
03872                            lapack_int mm, lapack_int* m );
03873 lapack_int LAPACKE_ztgevc( int matrix_order, char side, char howmny,
03874                            const lapack_logical* select, lapack_int n,
03875                            const lapack_complex_double* s, lapack_int lds,
03876                            const lapack_complex_double* p, lapack_int ldp,
03877                            lapack_complex_double* vl, lapack_int ldvl,
03878                            lapack_complex_double* vr, lapack_int ldvr,
03879                            lapack_int mm, lapack_int* m );
03880 
03881 lapack_int LAPACKE_stgexc( int matrix_order, lapack_logical wantq,
03882                            lapack_logical wantz, lapack_int n, float* a,
03883                            lapack_int lda, float* b, lapack_int ldb, float* q,
03884                            lapack_int ldq, float* z, lapack_int ldz,
03885                            lapack_int* ifst, lapack_int* ilst );
03886 lapack_int LAPACKE_dtgexc( int matrix_order, lapack_logical wantq,
03887                            lapack_logical wantz, lapack_int n, double* a,
03888                            lapack_int lda, double* b, lapack_int ldb, double* q,
03889                            lapack_int ldq, double* z, lapack_int ldz,
03890                            lapack_int* ifst, lapack_int* ilst );
03891 lapack_int LAPACKE_ctgexc( int matrix_order, lapack_logical wantq,
03892                            lapack_logical wantz, lapack_int n,
03893                            lapack_complex_float* a, lapack_int lda,
03894                            lapack_complex_float* b, lapack_int ldb,
03895                            lapack_complex_float* q, lapack_int ldq,
03896                            lapack_complex_float* z, lapack_int ldz,
03897                            lapack_int ifst, lapack_int ilst );
03898 lapack_int LAPACKE_ztgexc( int matrix_order, lapack_logical wantq,
03899                            lapack_logical wantz, lapack_int n,
03900                            lapack_complex_double* a, lapack_int lda,
03901                            lapack_complex_double* b, lapack_int ldb,
03902                            lapack_complex_double* q, lapack_int ldq,
03903                            lapack_complex_double* z, lapack_int ldz,
03904                            lapack_int ifst, lapack_int ilst );
03905 
03906 lapack_int LAPACKE_stgsen( int matrix_order, lapack_int ijob,
03907                            lapack_logical wantq, lapack_logical wantz,
03908                            const lapack_logical* select, lapack_int n, float* a,
03909                            lapack_int lda, float* b, lapack_int ldb,
03910                            float* alphar, float* alphai, float* beta, float* q,
03911                            lapack_int ldq, float* z, lapack_int ldz,
03912                            lapack_int* m, float* pl, float* pr, float* dif );
03913 lapack_int LAPACKE_dtgsen( int matrix_order, lapack_int ijob,
03914                            lapack_logical wantq, lapack_logical wantz,
03915                            const lapack_logical* select, lapack_int n,
03916                            double* a, lapack_int lda, double* b, lapack_int ldb,
03917                            double* alphar, double* alphai, double* beta,
03918                            double* q, lapack_int ldq, double* z, lapack_int ldz,
03919                            lapack_int* m, double* pl, double* pr, double* dif );
03920 lapack_int LAPACKE_ctgsen( int matrix_order, lapack_int ijob,
03921                            lapack_logical wantq, lapack_logical wantz,
03922                            const lapack_logical* select, lapack_int n,
03923                            lapack_complex_float* a, lapack_int lda,
03924                            lapack_complex_float* b, lapack_int ldb,
03925                            lapack_complex_float* alpha,
03926                            lapack_complex_float* beta, lapack_complex_float* q,
03927                            lapack_int ldq, lapack_complex_float* z,
03928                            lapack_int ldz, lapack_int* m, float* pl, float* pr,
03929                            float* dif );
03930 lapack_int LAPACKE_ztgsen( int matrix_order, lapack_int ijob,
03931                            lapack_logical wantq, lapack_logical wantz,
03932                            const lapack_logical* select, lapack_int n,
03933                            lapack_complex_double* a, lapack_int lda,
03934                            lapack_complex_double* b, lapack_int ldb,
03935                            lapack_complex_double* alpha,
03936                            lapack_complex_double* beta,
03937                            lapack_complex_double* q, lapack_int ldq,
03938                            lapack_complex_double* z, lapack_int ldz,
03939                            lapack_int* m, double* pl, double* pr, double* dif );
03940 
03941 lapack_int LAPACKE_stgsja( int matrix_order, char jobu, char jobv, char jobq,
03942                            lapack_int m, lapack_int p, lapack_int n,
03943                            lapack_int k, lapack_int l, float* a, lapack_int lda,
03944                            float* b, lapack_int ldb, float tola, float tolb,
03945                            float* alpha, float* beta, float* u, lapack_int ldu,
03946                            float* v, lapack_int ldv, float* q, lapack_int ldq,
03947                            lapack_int* ncycle );
03948 lapack_int LAPACKE_dtgsja( int matrix_order, char jobu, char jobv, char jobq,
03949                            lapack_int m, lapack_int p, lapack_int n,
03950                            lapack_int k, lapack_int l, double* a,
03951                            lapack_int lda, double* b, lapack_int ldb,
03952                            double tola, double tolb, double* alpha,
03953                            double* beta, double* u, lapack_int ldu, double* v,
03954                            lapack_int ldv, double* q, lapack_int ldq,
03955                            lapack_int* ncycle );
03956 lapack_int LAPACKE_ctgsja( int matrix_order, char jobu, char jobv, char jobq,
03957                            lapack_int m, lapack_int p, lapack_int n,
03958                            lapack_int k, lapack_int l, lapack_complex_float* a,
03959                            lapack_int lda, lapack_complex_float* b,
03960                            lapack_int ldb, float tola, float tolb, float* alpha,
03961                            float* beta, lapack_complex_float* u, lapack_int ldu,
03962                            lapack_complex_float* v, lapack_int ldv,
03963                            lapack_complex_float* q, lapack_int ldq,
03964                            lapack_int* ncycle );
03965 lapack_int LAPACKE_ztgsja( int matrix_order, char jobu, char jobv, char jobq,
03966                            lapack_int m, lapack_int p, lapack_int n,
03967                            lapack_int k, lapack_int l, lapack_complex_double* a,
03968                            lapack_int lda, lapack_complex_double* b,
03969                            lapack_int ldb, double tola, double tolb,
03970                            double* alpha, double* beta,
03971                            lapack_complex_double* u, lapack_int ldu,
03972                            lapack_complex_double* v, lapack_int ldv,
03973                            lapack_complex_double* q, lapack_int ldq,
03974                            lapack_int* ncycle );
03975 
03976 lapack_int LAPACKE_stgsna( int matrix_order, char job, char howmny,
03977                            const lapack_logical* select, lapack_int n,
03978                            const float* a, lapack_int lda, const float* b,
03979                            lapack_int ldb, const float* vl, lapack_int ldvl,
03980                            const float* vr, lapack_int ldvr, float* s,
03981                            float* dif, lapack_int mm, lapack_int* m );
03982 lapack_int LAPACKE_dtgsna( int matrix_order, char job, char howmny,
03983                            const lapack_logical* select, lapack_int n,
03984                            const double* a, lapack_int lda, const double* b,
03985                            lapack_int ldb, const double* vl, lapack_int ldvl,
03986                            const double* vr, lapack_int ldvr, double* s,
03987                            double* dif, lapack_int mm, lapack_int* m );
03988 lapack_int LAPACKE_ctgsna( int matrix_order, char job, char howmny,
03989                            const lapack_logical* select, lapack_int n,
03990                            const lapack_complex_float* a, lapack_int lda,
03991                            const lapack_complex_float* b, lapack_int ldb,
03992                            const lapack_complex_float* vl, lapack_int ldvl,
03993                            const lapack_complex_float* vr, lapack_int ldvr,
03994                            float* s, float* dif, lapack_int mm, lapack_int* m );
03995 lapack_int LAPACKE_ztgsna( int matrix_order, char job, char howmny,
03996                            const lapack_logical* select, lapack_int n,
03997                            const lapack_complex_double* a, lapack_int lda,
03998                            const lapack_complex_double* b, lapack_int ldb,
03999                            const lapack_complex_double* vl, lapack_int ldvl,
04000                            const lapack_complex_double* vr, lapack_int ldvr,
04001                            double* s, double* dif, lapack_int mm,
04002                            lapack_int* m );
04003 
04004 lapack_int LAPACKE_stgsyl( int matrix_order, char trans, lapack_int ijob,
04005                            lapack_int m, lapack_int n, const float* a,
04006                            lapack_int lda, const float* b, lapack_int ldb,
04007                            float* c, lapack_int ldc, const float* d,
04008                            lapack_int ldd, const float* e, lapack_int lde,
04009                            float* f, lapack_int ldf, float* scale, float* dif );
04010 lapack_int LAPACKE_dtgsyl( int matrix_order, char trans, lapack_int ijob,
04011                            lapack_int m, lapack_int n, const double* a,
04012                            lapack_int lda, const double* b, lapack_int ldb,
04013                            double* c, lapack_int ldc, const double* d,
04014                            lapack_int ldd, const double* e, lapack_int lde,
04015                            double* f, lapack_int ldf, double* scale,
04016                            double* dif );
04017 lapack_int LAPACKE_ctgsyl( int matrix_order, char trans, lapack_int ijob,
04018                            lapack_int m, lapack_int n,
04019                            const lapack_complex_float* a, lapack_int lda,
04020                            const lapack_complex_float* b, lapack_int ldb,
04021                            lapack_complex_float* c, lapack_int ldc,
04022                            const lapack_complex_float* d, lapack_int ldd,
04023                            const lapack_complex_float* e, lapack_int lde,
04024                            lapack_complex_float* f, lapack_int ldf,
04025                            float* scale, float* dif );
04026 lapack_int LAPACKE_ztgsyl( int matrix_order, char trans, lapack_int ijob,
04027                            lapack_int m, lapack_int n,
04028                            const lapack_complex_double* a, lapack_int lda,
04029                            const lapack_complex_double* b, lapack_int ldb,
04030                            lapack_complex_double* c, lapack_int ldc,
04031                            const lapack_complex_double* d, lapack_int ldd,
04032                            const lapack_complex_double* e, lapack_int lde,
04033                            lapack_complex_double* f, lapack_int ldf,
04034                            double* scale, double* dif );
04035 
04036 lapack_int LAPACKE_stpcon( int matrix_order, char norm, char uplo, char diag,
04037                            lapack_int n, const float* ap, float* rcond );
04038 lapack_int LAPACKE_dtpcon( int matrix_order, char norm, char uplo, char diag,
04039                            lapack_int n, const double* ap, double* rcond );
04040 lapack_int LAPACKE_ctpcon( int matrix_order, char norm, char uplo, char diag,
04041                            lapack_int n, const lapack_complex_float* ap,
04042                            float* rcond );
04043 lapack_int LAPACKE_ztpcon( int matrix_order, char norm, char uplo, char diag,
04044                            lapack_int n, const lapack_complex_double* ap,
04045                            double* rcond );
04046 
04047 lapack_int LAPACKE_stprfs( int matrix_order, char uplo, char trans, char diag,
04048                            lapack_int n, lapack_int nrhs, const float* ap,
04049                            const float* b, lapack_int ldb, const float* x,
04050                            lapack_int ldx, float* ferr, float* berr );
04051 lapack_int LAPACKE_dtprfs( int matrix_order, char uplo, char trans, char diag,
04052                            lapack_int n, lapack_int nrhs, const double* ap,
04053                            const double* b, lapack_int ldb, const double* x,
04054                            lapack_int ldx, double* ferr, double* berr );
04055 lapack_int LAPACKE_ctprfs( int matrix_order, char uplo, char trans, char diag,
04056                            lapack_int n, lapack_int nrhs,
04057                            const lapack_complex_float* ap,
04058                            const lapack_complex_float* b, lapack_int ldb,
04059                            const lapack_complex_float* x, lapack_int ldx,
04060                            float* ferr, float* berr );
04061 lapack_int LAPACKE_ztprfs( int matrix_order, char uplo, char trans, char diag,
04062                            lapack_int n, lapack_int nrhs,
04063                            const lapack_complex_double* ap,
04064                            const lapack_complex_double* b, lapack_int ldb,
04065                            const lapack_complex_double* x, lapack_int ldx,
04066                            double* ferr, double* berr );
04067 
04068 lapack_int LAPACKE_stptri( int matrix_order, char uplo, char diag, lapack_int n,
04069                            float* ap );
04070 lapack_int LAPACKE_dtptri( int matrix_order, char uplo, char diag, lapack_int n,
04071                            double* ap );
04072 lapack_int LAPACKE_ctptri( int matrix_order, char uplo, char diag, lapack_int n,
04073                            lapack_complex_float* ap );
04074 lapack_int LAPACKE_ztptri( int matrix_order, char uplo, char diag, lapack_int n,
04075                            lapack_complex_double* ap );
04076 
04077 lapack_int LAPACKE_stptrs( int matrix_order, char uplo, char trans, char diag,
04078                            lapack_int n, lapack_int nrhs, const float* ap,
04079                            float* b, lapack_int ldb );
04080 lapack_int LAPACKE_dtptrs( int matrix_order, char uplo, char trans, char diag,
04081                            lapack_int n, lapack_int nrhs, const double* ap,
04082                            double* b, lapack_int ldb );
04083 lapack_int LAPACKE_ctptrs( int matrix_order, char uplo, char trans, char diag,
04084                            lapack_int n, lapack_int nrhs,
04085                            const lapack_complex_float* ap,
04086                            lapack_complex_float* b, lapack_int ldb );
04087 lapack_int LAPACKE_ztptrs( int matrix_order, char uplo, char trans, char diag,
04088                            lapack_int n, lapack_int nrhs,
04089                            const lapack_complex_double* ap,
04090                            lapack_complex_double* b, lapack_int ldb );
04091 
04092 lapack_int LAPACKE_stpttf( int matrix_order, char transr, char uplo,
04093                            lapack_int n, const float* ap, float* arf );
04094 lapack_int LAPACKE_dtpttf( int matrix_order, char transr, char uplo,
04095                            lapack_int n, const double* ap, double* arf );
04096 lapack_int LAPACKE_ctpttf( int matrix_order, char transr, char uplo,
04097                            lapack_int n, const lapack_complex_float* ap,
04098                            lapack_complex_float* arf );
04099 lapack_int LAPACKE_ztpttf( int matrix_order, char transr, char uplo,
04100                            lapack_int n, const lapack_complex_double* ap,
04101                            lapack_complex_double* arf );
04102 
04103 lapack_int LAPACKE_stpttr( int matrix_order, char uplo, lapack_int n,
04104                            const float* ap, float* a, lapack_int lda );
04105 lapack_int LAPACKE_dtpttr( int matrix_order, char uplo, lapack_int n,
04106                            const double* ap, double* a, lapack_int lda );
04107 lapack_int LAPACKE_ctpttr( int matrix_order, char uplo, lapack_int n,
04108                            const lapack_complex_float* ap,
04109                            lapack_complex_float* a, lapack_int lda );
04110 lapack_int LAPACKE_ztpttr( int matrix_order, char uplo, lapack_int n,
04111                            const lapack_complex_double* ap,
04112                            lapack_complex_double* a, lapack_int lda );
04113 
04114 lapack_int LAPACKE_strcon( int matrix_order, char norm, char uplo, char diag,
04115                            lapack_int n, const float* a, lapack_int lda,
04116                            float* rcond );
04117 lapack_int LAPACKE_dtrcon( int matrix_order, char norm, char uplo, char diag,
04118                            lapack_int n, const double* a, lapack_int lda,
04119                            double* rcond );
04120 lapack_int LAPACKE_ctrcon( int matrix_order, char norm, char uplo, char diag,
04121                            lapack_int n, const lapack_complex_float* a,
04122                            lapack_int lda, float* rcond );
04123 lapack_int LAPACKE_ztrcon( int matrix_order, char norm, char uplo, char diag,
04124                            lapack_int n, const lapack_complex_double* a,
04125                            lapack_int lda, double* rcond );
04126 
04127 lapack_int LAPACKE_strevc( int matrix_order, char side, char howmny,
04128                            lapack_logical* select, lapack_int n, const float* t,
04129                            lapack_int ldt, float* vl, lapack_int ldvl,
04130                            float* vr, lapack_int ldvr, lapack_int mm,
04131                            lapack_int* m );
04132 lapack_int LAPACKE_dtrevc( int matrix_order, char side, char howmny,
04133                            lapack_logical* select, lapack_int n,
04134                            const double* t, lapack_int ldt, double* vl,
04135                            lapack_int ldvl, double* vr, lapack_int ldvr,
04136                            lapack_int mm, lapack_int* m );
04137 lapack_int LAPACKE_ctrevc( int matrix_order, char side, char howmny,
04138                            const lapack_logical* select, lapack_int n,
04139                            lapack_complex_float* t, lapack_int ldt,
04140                            lapack_complex_float* vl, lapack_int ldvl,
04141                            lapack_complex_float* vr, lapack_int ldvr,
04142                            lapack_int mm, lapack_int* m );
04143 lapack_int LAPACKE_ztrevc( int matrix_order, char side, char howmny,
04144                            const lapack_logical* select, lapack_int n,
04145                            lapack_complex_double* t, lapack_int ldt,
04146                            lapack_complex_double* vl, lapack_int ldvl,
04147                            lapack_complex_double* vr, lapack_int ldvr,
04148                            lapack_int mm, lapack_int* m );
04149 
04150 lapack_int LAPACKE_strexc( int matrix_order, char compq, lapack_int n, float* t,
04151                            lapack_int ldt, float* q, lapack_int ldq,
04152                            lapack_int* ifst, lapack_int* ilst );
04153 lapack_int LAPACKE_dtrexc( int matrix_order, char compq, lapack_int n,
04154                            double* t, lapack_int ldt, double* q, lapack_int ldq,
04155                            lapack_int* ifst, lapack_int* ilst );
04156 lapack_int LAPACKE_ctrexc( int matrix_order, char compq, lapack_int n,
04157                            lapack_complex_float* t, lapack_int ldt,
04158                            lapack_complex_float* q, lapack_int ldq,
04159                            lapack_int ifst, lapack_int ilst );
04160 lapack_int LAPACKE_ztrexc( int matrix_order, char compq, lapack_int n,
04161                            lapack_complex_double* t, lapack_int ldt,
04162                            lapack_complex_double* q, lapack_int ldq,
04163                            lapack_int ifst, lapack_int ilst );
04164 
04165 lapack_int LAPACKE_strrfs( int matrix_order, char uplo, char trans, char diag,
04166                            lapack_int n, lapack_int nrhs, const float* a,
04167                            lapack_int lda, const float* b, lapack_int ldb,
04168                            const float* x, lapack_int ldx, float* ferr,
04169                            float* berr );
04170 lapack_int LAPACKE_dtrrfs( int matrix_order, char uplo, char trans, char diag,
04171                            lapack_int n, lapack_int nrhs, const double* a,
04172                            lapack_int lda, const double* b, lapack_int ldb,
04173                            const double* x, lapack_int ldx, double* ferr,
04174                            double* berr );
04175 lapack_int LAPACKE_ctrrfs( int matrix_order, char uplo, char trans, char diag,
04176                            lapack_int n, lapack_int nrhs,
04177                            const lapack_complex_float* a, lapack_int lda,
04178                            const lapack_complex_float* b, lapack_int ldb,
04179                            const lapack_complex_float* x, lapack_int ldx,
04180                            float* ferr, float* berr );
04181 lapack_int LAPACKE_ztrrfs( int matrix_order, char uplo, char trans, char diag,
04182                            lapack_int n, lapack_int nrhs,
04183                            const lapack_complex_double* a, lapack_int lda,
04184                            const lapack_complex_double* b, lapack_int ldb,
04185                            const lapack_complex_double* x, lapack_int ldx,
04186                            double* ferr, double* berr );
04187 
04188 lapack_int LAPACKE_strsen( int matrix_order, char job, char compq,
04189                            const lapack_logical* select, lapack_int n, float* t,
04190                            lapack_int ldt, float* q, lapack_int ldq, float* wr,
04191                            float* wi, lapack_int* m, float* s, float* sep );
04192 lapack_int LAPACKE_dtrsen( int matrix_order, char job, char compq,
04193                            const lapack_logical* select, lapack_int n,
04194                            double* t, lapack_int ldt, double* q, lapack_int ldq,
04195                            double* wr, double* wi, lapack_int* m, double* s,
04196                            double* sep );
04197 lapack_int LAPACKE_ctrsen( int matrix_order, char job, char compq,
04198                            const lapack_logical* select, lapack_int n,
04199                            lapack_complex_float* t, lapack_int ldt,
04200                            lapack_complex_float* q, lapack_int ldq,
04201                            lapack_complex_float* w, lapack_int* m, float* s,
04202                            float* sep );
04203 lapack_int LAPACKE_ztrsen( int matrix_order, char job, char compq,
04204                            const lapack_logical* select, lapack_int n,
04205                            lapack_complex_double* t, lapack_int ldt,
04206                            lapack_complex_double* q, lapack_int ldq,
04207                            lapack_complex_double* w, lapack_int* m, double* s,
04208                            double* sep );
04209 
04210 lapack_int LAPACKE_strsna( int matrix_order, char job, char howmny,
04211                            const lapack_logical* select, lapack_int n,
04212                            const float* t, lapack_int ldt, const float* vl,
04213                            lapack_int ldvl, const float* vr, lapack_int ldvr,
04214                            float* s, float* sep, lapack_int mm, lapack_int* m );
04215 lapack_int LAPACKE_dtrsna( int matrix_order, char job, char howmny,
04216                            const lapack_logical* select, lapack_int n,
04217                            const double* t, lapack_int ldt, const double* vl,
04218                            lapack_int ldvl, const double* vr, lapack_int ldvr,
04219                            double* s, double* sep, lapack_int mm,
04220                            lapack_int* m );
04221 lapack_int LAPACKE_ctrsna( int matrix_order, char job, char howmny,
04222                            const lapack_logical* select, lapack_int n,
04223                            const lapack_complex_float* t, lapack_int ldt,
04224                            const lapack_complex_float* vl, lapack_int ldvl,
04225                            const lapack_complex_float* vr, lapack_int ldvr,
04226                            float* s, float* sep, lapack_int mm, lapack_int* m );
04227 lapack_int LAPACKE_ztrsna( int matrix_order, char job, char howmny,
04228                            const lapack_logical* select, lapack_int n,
04229                            const lapack_complex_double* t, lapack_int ldt,
04230                            const lapack_complex_double* vl, lapack_int ldvl,
04231                            const lapack_complex_double* vr, lapack_int ldvr,
04232                            double* s, double* sep, lapack_int mm,
04233                            lapack_int* m );
04234 
04235 lapack_int LAPACKE_strsyl( int matrix_order, char trana, char tranb,
04236                            lapack_int isgn, lapack_int m, lapack_int n,
04237                            const float* a, lapack_int lda, const float* b,
04238                            lapack_int ldb, float* c, lapack_int ldc,
04239                            float* scale );
04240 lapack_int LAPACKE_dtrsyl( int matrix_order, char trana, char tranb,
04241                            lapack_int isgn, lapack_int m, lapack_int n,
04242                            const double* a, lapack_int lda, const double* b,
04243                            lapack_int ldb, double* c, lapack_int ldc,
04244                            double* scale );
04245 lapack_int LAPACKE_ctrsyl( int matrix_order, char trana, char tranb,
04246                            lapack_int isgn, lapack_int m, lapack_int n,
04247                            const lapack_complex_float* a, lapack_int lda,
04248                            const lapack_complex_float* b, lapack_int ldb,
04249                            lapack_complex_float* c, lapack_int ldc,
04250                            float* scale );
04251 lapack_int LAPACKE_ztrsyl( int matrix_order, char trana, char tranb,
04252                            lapack_int isgn, lapack_int m, lapack_int n,
04253                            const lapack_complex_double* a, lapack_int lda,
04254                            const lapack_complex_double* b, lapack_int ldb,
04255                            lapack_complex_double* c, lapack_int ldc,
04256                            double* scale );
04257 
04258 lapack_int LAPACKE_strtri( int matrix_order, char uplo, char diag, lapack_int n,
04259                            float* a, lapack_int lda );
04260 lapack_int LAPACKE_dtrtri( int matrix_order, char uplo, char diag, lapack_int n,
04261                            double* a, lapack_int lda );
04262 lapack_int LAPACKE_ctrtri( int matrix_order, char uplo, char diag, lapack_int n,
04263                            lapack_complex_float* a, lapack_int lda );
04264 lapack_int LAPACKE_ztrtri( int matrix_order, char uplo, char diag, lapack_int n,
04265                            lapack_complex_double* a, lapack_int lda );
04266 
04267 lapack_int LAPACKE_strtrs( int matrix_order, char uplo, char trans, char diag,
04268                            lapack_int n, lapack_int nrhs, const float* a,
04269                            lapack_int lda, float* b, lapack_int ldb );
04270 lapack_int LAPACKE_dtrtrs( int matrix_order, char uplo, char trans, char diag,
04271                            lapack_int n, lapack_int nrhs, const double* a,
04272                            lapack_int lda, double* b, lapack_int ldb );
04273 lapack_int LAPACKE_ctrtrs( int matrix_order, char uplo, char trans, char diag,
04274                            lapack_int n, lapack_int nrhs,
04275                            const lapack_complex_float* a, lapack_int lda,
04276                            lapack_complex_float* b, lapack_int ldb );
04277 lapack_int LAPACKE_ztrtrs( int matrix_order, char uplo, char trans, char diag,
04278                            lapack_int n, lapack_int nrhs,
04279                            const lapack_complex_double* a, lapack_int lda,
04280                            lapack_complex_double* b, lapack_int ldb );
04281 
04282 lapack_int LAPACKE_strttf( int matrix_order, char transr, char uplo,
04283                            lapack_int n, const float* a, lapack_int lda,
04284                            float* arf );
04285 lapack_int LAPACKE_dtrttf( int matrix_order, char transr, char uplo,
04286                            lapack_int n, const double* a, lapack_int lda,
04287                            double* arf );
04288 lapack_int LAPACKE_ctrttf( int matrix_order, char transr, char uplo,
04289                            lapack_int n, const lapack_complex_float* a,
04290                            lapack_int lda, lapack_complex_float* arf );
04291 lapack_int LAPACKE_ztrttf( int matrix_order, char transr, char uplo,
04292                            lapack_int n, const lapack_complex_double* a,
04293                            lapack_int lda, lapack_complex_double* arf );
04294 
04295 lapack_int LAPACKE_strttp( int matrix_order, char uplo, lapack_int n,
04296                            const float* a, lapack_int lda, float* ap );
04297 lapack_int LAPACKE_dtrttp( int matrix_order, char uplo, lapack_int n,
04298                            const double* a, lapack_int lda, double* ap );
04299 lapack_int LAPACKE_ctrttp( int matrix_order, char uplo, lapack_int n,
04300                            const lapack_complex_float* a, lapack_int lda,
04301                            lapack_complex_float* ap );
04302 lapack_int LAPACKE_ztrttp( int matrix_order, char uplo, lapack_int n,
04303                            const lapack_complex_double* a, lapack_int lda,
04304                            lapack_complex_double* ap );
04305 
04306 lapack_int LAPACKE_stzrzf( int matrix_order, lapack_int m, lapack_int n,
04307                            float* a, lapack_int lda, float* tau );
04308 lapack_int LAPACKE_dtzrzf( int matrix_order, lapack_int m, lapack_int n,
04309                            double* a, lapack_int lda, double* tau );
04310 lapack_int LAPACKE_ctzrzf( int matrix_order, lapack_int m, lapack_int n,
04311                            lapack_complex_float* a, lapack_int lda,
04312                            lapack_complex_float* tau );
04313 lapack_int LAPACKE_ztzrzf( int matrix_order, lapack_int m, lapack_int n,
04314                            lapack_complex_double* a, lapack_int lda,
04315                            lapack_complex_double* tau );
04316 
04317 lapack_int LAPACKE_cungbr( int matrix_order, char vect, lapack_int m,
04318                            lapack_int n, lapack_int k, lapack_complex_float* a,
04319                            lapack_int lda, const lapack_complex_float* tau );
04320 lapack_int LAPACKE_zungbr( int matrix_order, char vect, lapack_int m,
04321                            lapack_int n, lapack_int k, lapack_complex_double* a,
04322                            lapack_int lda, const lapack_complex_double* tau );
04323 
04324 lapack_int LAPACKE_cunghr( int matrix_order, lapack_int n, lapack_int ilo,
04325                            lapack_int ihi, lapack_complex_float* a,
04326                            lapack_int lda, const lapack_complex_float* tau );
04327 lapack_int LAPACKE_zunghr( int matrix_order, lapack_int n, lapack_int ilo,
04328                            lapack_int ihi, lapack_complex_double* a,
04329                            lapack_int lda, const lapack_complex_double* tau );
04330 
04331 lapack_int LAPACKE_cunglq( int matrix_order, lapack_int m, lapack_int n,
04332                            lapack_int k, lapack_complex_float* a,
04333                            lapack_int lda, const lapack_complex_float* tau );
04334 lapack_int LAPACKE_zunglq( int matrix_order, lapack_int m, lapack_int n,
04335                            lapack_int k, lapack_complex_double* a,
04336                            lapack_int lda, const lapack_complex_double* tau );
04337 
04338 lapack_int LAPACKE_cungql( int matrix_order, lapack_int m, lapack_int n,
04339                            lapack_int k, lapack_complex_float* a,
04340                            lapack_int lda, const lapack_complex_float* tau );
04341 lapack_int LAPACKE_zungql( int matrix_order, lapack_int m, lapack_int n,
04342                            lapack_int k, lapack_complex_double* a,
04343                            lapack_int lda, const lapack_complex_double* tau );
04344 
04345 lapack_int LAPACKE_cungqr( int matrix_order, lapack_int m, lapack_int n,
04346                            lapack_int k, lapack_complex_float* a,
04347                            lapack_int lda, const lapack_complex_float* tau );
04348 lapack_int LAPACKE_zungqr( int matrix_order, lapack_int m, lapack_int n,
04349                            lapack_int k, lapack_complex_double* a,
04350                            lapack_int lda, const lapack_complex_double* tau );
04351 
04352 lapack_int LAPACKE_cungrq( int matrix_order, lapack_int m, lapack_int n,
04353                            lapack_int k, lapack_complex_float* a,
04354                            lapack_int lda, const lapack_complex_float* tau );
04355 lapack_int LAPACKE_zungrq( int matrix_order, lapack_int m, lapack_int n,
04356                            lapack_int k, lapack_complex_double* a,
04357                            lapack_int lda, const lapack_complex_double* tau );
04358 
04359 lapack_int LAPACKE_cungtr( int matrix_order, char uplo, lapack_int n,
04360                            lapack_complex_float* a, lapack_int lda,
04361                            const lapack_complex_float* tau );
04362 lapack_int LAPACKE_zungtr( int matrix_order, char uplo, lapack_int n,
04363                            lapack_complex_double* a, lapack_int lda,
04364                            const lapack_complex_double* tau );
04365 
04366 lapack_int LAPACKE_cunmbr( int matrix_order, char vect, char side, char trans,
04367                            lapack_int m, lapack_int n, lapack_int k,
04368                            const lapack_complex_float* a, lapack_int lda,
04369                            const lapack_complex_float* tau,
04370                            lapack_complex_float* c, lapack_int ldc );
04371 lapack_int LAPACKE_zunmbr( int matrix_order, char vect, char side, char trans,
04372                            lapack_int m, lapack_int n, lapack_int k,
04373                            const lapack_complex_double* a, lapack_int lda,
04374                            const lapack_complex_double* tau,
04375                            lapack_complex_double* c, lapack_int ldc );
04376 
04377 lapack_int LAPACKE_cunmhr( int matrix_order, char side, char trans,
04378                            lapack_int m, lapack_int n, lapack_int ilo,
04379                            lapack_int ihi, const lapack_complex_float* a,
04380                            lapack_int lda, const lapack_complex_float* tau,
04381                            lapack_complex_float* c, lapack_int ldc );
04382 lapack_int LAPACKE_zunmhr( int matrix_order, char side, char trans,
04383                            lapack_int m, lapack_int n, lapack_int ilo,
04384                            lapack_int ihi, const lapack_complex_double* a,
04385                            lapack_int lda, const lapack_complex_double* tau,
04386                            lapack_complex_double* c, lapack_int ldc );
04387 
04388 lapack_int LAPACKE_cunmlq( int matrix_order, char side, char trans,
04389                            lapack_int m, lapack_int n, lapack_int k,
04390                            const lapack_complex_float* a, lapack_int lda,
04391                            const lapack_complex_float* tau,
04392                            lapack_complex_float* c, lapack_int ldc );
04393 lapack_int LAPACKE_zunmlq( int matrix_order, char side, char trans,
04394                            lapack_int m, lapack_int n, lapack_int k,
04395                            const lapack_complex_double* a, lapack_int lda,
04396                            const lapack_complex_double* tau,
04397                            lapack_complex_double* c, lapack_int ldc );
04398 
04399 lapack_int LAPACKE_cunmql( int matrix_order, char side, char trans,
04400                            lapack_int m, lapack_int n, lapack_int k,
04401                            const lapack_complex_float* a, lapack_int lda,
04402                            const lapack_complex_float* tau,
04403                            lapack_complex_float* c, lapack_int ldc );
04404 lapack_int LAPACKE_zunmql( int matrix_order, char side, char trans,
04405                            lapack_int m, lapack_int n, lapack_int k,
04406                            const lapack_complex_double* a, lapack_int lda,
04407                            const lapack_complex_double* tau,
04408                            lapack_complex_double* c, lapack_int ldc );
04409 
04410 lapack_int LAPACKE_cunmqr( int matrix_order, char side, char trans,
04411                            lapack_int m, lapack_int n, lapack_int k,
04412                            const lapack_complex_float* a, lapack_int lda,
04413                            const lapack_complex_float* tau,
04414                            lapack_complex_float* c, lapack_int ldc );
04415 lapack_int LAPACKE_zunmqr( int matrix_order, char side, char trans,
04416                            lapack_int m, lapack_int n, lapack_int k,
04417                            const lapack_complex_double* a, lapack_int lda,
04418                            const lapack_complex_double* tau,
04419                            lapack_complex_double* c, lapack_int ldc );
04420 
04421 lapack_int LAPACKE_cunmrq( int matrix_order, char side, char trans,
04422                            lapack_int m, lapack_int n, lapack_int k,
04423                            const lapack_complex_float* a, lapack_int lda,
04424                            const lapack_complex_float* tau,
04425                            lapack_complex_float* c, lapack_int ldc );
04426 lapack_int LAPACKE_zunmrq( int matrix_order, char side, char trans,
04427                            lapack_int m, lapack_int n, lapack_int k,
04428                            const lapack_complex_double* a, lapack_int lda,
04429                            const lapack_complex_double* tau,
04430                            lapack_complex_double* c, lapack_int ldc );
04431 
04432 lapack_int LAPACKE_cunmrz( int matrix_order, char side, char trans,
04433                            lapack_int m, lapack_int n, lapack_int k,
04434                            lapack_int l, const lapack_complex_float* a,
04435                            lapack_int lda, const lapack_complex_float* tau,
04436                            lapack_complex_float* c, lapack_int ldc );
04437 lapack_int LAPACKE_zunmrz( int matrix_order, char side, char trans,
04438                            lapack_int m, lapack_int n, lapack_int k,
04439                            lapack_int l, const lapack_complex_double* a,
04440                            lapack_int lda, const lapack_complex_double* tau,
04441                            lapack_complex_double* c, lapack_int ldc );
04442 
04443 lapack_int LAPACKE_cunmtr( int matrix_order, char side, char uplo, char trans,
04444                            lapack_int m, lapack_int n,
04445                            const lapack_complex_float* a, lapack_int lda,
04446                            const lapack_complex_float* tau,
04447                            lapack_complex_float* c, lapack_int ldc );
04448 lapack_int LAPACKE_zunmtr( int matrix_order, char side, char uplo, char trans,
04449                            lapack_int m, lapack_int n,
04450                            const lapack_complex_double* a, lapack_int lda,
04451                            const lapack_complex_double* tau,
04452                            lapack_complex_double* c, lapack_int ldc );
04453 
04454 lapack_int LAPACKE_cupgtr( int matrix_order, char uplo, lapack_int n,
04455                            const lapack_complex_float* ap,
04456                            const lapack_complex_float* tau,
04457                            lapack_complex_float* q, lapack_int ldq );
04458 lapack_int LAPACKE_zupgtr( int matrix_order, char uplo, lapack_int n,
04459                            const lapack_complex_double* ap,
04460                            const lapack_complex_double* tau,
04461                            lapack_complex_double* q, lapack_int ldq );
04462 
04463 lapack_int LAPACKE_cupmtr( int matrix_order, char side, char uplo, char trans,
04464                            lapack_int m, lapack_int n,
04465                            const lapack_complex_float* ap,
04466                            const lapack_complex_float* tau,
04467                            lapack_complex_float* c, lapack_int ldc );
04468 lapack_int LAPACKE_zupmtr( int matrix_order, char side, char uplo, char trans,
04469                            lapack_int m, lapack_int n,
04470                            const lapack_complex_double* ap,
04471                            const lapack_complex_double* tau,
04472                            lapack_complex_double* c, lapack_int ldc );
04473 
04474 lapack_int LAPACKE_sbdsdc_work( int matrix_order, char uplo, char compq,
04475                                 lapack_int n, float* d, float* e, float* u,
04476                                 lapack_int ldu, float* vt, lapack_int ldvt,
04477                                 float* q, lapack_int* iq, float* work,
04478                                 lapack_int* iwork );
04479 lapack_int LAPACKE_dbdsdc_work( int matrix_order, char uplo, char compq,
04480                                 lapack_int n, double* d, double* e, double* u,
04481                                 lapack_int ldu, double* vt, lapack_int ldvt,
04482                                 double* q, lapack_int* iq, double* work,
04483                                 lapack_int* iwork );
04484 
04485 lapack_int LAPACKE_sbdsqr_work( int matrix_order, char uplo, lapack_int n,
04486                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04487                                 float* d, float* e, float* vt, lapack_int ldvt,
04488                                 float* u, lapack_int ldu, float* c,
04489                                 lapack_int ldc, float* work );
04490 lapack_int LAPACKE_dbdsqr_work( int matrix_order, char uplo, lapack_int n,
04491                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04492                                 double* d, double* e, double* vt,
04493                                 lapack_int ldvt, double* u, lapack_int ldu,
04494                                 double* c, lapack_int ldc, double* work );
04495 lapack_int LAPACKE_cbdsqr_work( int matrix_order, char uplo, lapack_int n,
04496                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04497                                 float* d, float* e, lapack_complex_float* vt,
04498                                 lapack_int ldvt, lapack_complex_float* u,
04499                                 lapack_int ldu, lapack_complex_float* c,
04500                                 lapack_int ldc, float* work );
04501 lapack_int LAPACKE_zbdsqr_work( int matrix_order, char uplo, lapack_int n,
04502                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
04503                                 double* d, double* e, lapack_complex_double* vt,
04504                                 lapack_int ldvt, lapack_complex_double* u,
04505                                 lapack_int ldu, lapack_complex_double* c,
04506                                 lapack_int ldc, double* work );
04507 
04508 lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
04509                                 const float* d, float* sep );
04510 lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
04511                                 const double* d, double* sep );
04512 
04513 lapack_int LAPACKE_sgbbrd_work( int matrix_order, char vect, lapack_int m,
04514                                 lapack_int n, lapack_int ncc, lapack_int kl,
04515                                 lapack_int ku, float* ab, lapack_int ldab,
04516                                 float* d, float* e, float* q, lapack_int ldq,
04517                                 float* pt, lapack_int ldpt, float* c,
04518                                 lapack_int ldc, float* work );
04519 lapack_int LAPACKE_dgbbrd_work( int matrix_order, char vect, lapack_int m,
04520                                 lapack_int n, lapack_int ncc, lapack_int kl,
04521                                 lapack_int ku, double* ab, lapack_int ldab,
04522                                 double* d, double* e, double* q, lapack_int ldq,
04523                                 double* pt, lapack_int ldpt, double* c,
04524                                 lapack_int ldc, double* work );
04525 lapack_int LAPACKE_cgbbrd_work( int matrix_order, char vect, lapack_int m,
04526                                 lapack_int n, lapack_int ncc, lapack_int kl,
04527                                 lapack_int ku, lapack_complex_float* ab,
04528                                 lapack_int ldab, float* d, float* e,
04529                                 lapack_complex_float* q, lapack_int ldq,
04530                                 lapack_complex_float* pt, lapack_int ldpt,
04531                                 lapack_complex_float* c, lapack_int ldc,
04532                                 lapack_complex_float* work, float* rwork );
04533 lapack_int LAPACKE_zgbbrd_work( int matrix_order, char vect, lapack_int m,
04534                                 lapack_int n, lapack_int ncc, lapack_int kl,
04535                                 lapack_int ku, lapack_complex_double* ab,
04536                                 lapack_int ldab, double* d, double* e,
04537                                 lapack_complex_double* q, lapack_int ldq,
04538                                 lapack_complex_double* pt, lapack_int ldpt,
04539                                 lapack_complex_double* c, lapack_int ldc,
04540                                 lapack_complex_double* work, double* rwork );
04541 
04542 lapack_int LAPACKE_sgbcon_work( int matrix_order, char norm, lapack_int n,
04543                                 lapack_int kl, lapack_int ku, const float* ab,
04544                                 lapack_int ldab, const lapack_int* ipiv,
04545                                 float anorm, float* rcond, float* work,
04546                                 lapack_int* iwork );
04547 lapack_int LAPACKE_dgbcon_work( int matrix_order, char norm, lapack_int n,
04548                                 lapack_int kl, lapack_int ku, const double* ab,
04549                                 lapack_int ldab, const lapack_int* ipiv,
04550                                 double anorm, double* rcond, double* work,
04551                                 lapack_int* iwork );
04552 lapack_int LAPACKE_cgbcon_work( int matrix_order, char norm, lapack_int n,
04553                                 lapack_int kl, lapack_int ku,
04554                                 const lapack_complex_float* ab, lapack_int ldab,
04555                                 const lapack_int* ipiv, float anorm,
04556                                 float* rcond, lapack_complex_float* work,
04557                                 float* rwork );
04558 lapack_int LAPACKE_zgbcon_work( int matrix_order, char norm, lapack_int n,
04559                                 lapack_int kl, lapack_int ku,
04560                                 const lapack_complex_double* ab,
04561                                 lapack_int ldab, const lapack_int* ipiv,
04562                                 double anorm, double* rcond,
04563                                 lapack_complex_double* work, double* rwork );
04564 
04565 lapack_int LAPACKE_sgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04566                                 lapack_int kl, lapack_int ku, const float* ab,
04567                                 lapack_int ldab, float* r, float* c,
04568                                 float* rowcnd, float* colcnd, float* amax );
04569 lapack_int LAPACKE_dgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04570                                 lapack_int kl, lapack_int ku, const double* ab,
04571                                 lapack_int ldab, double* r, double* c,
04572                                 double* rowcnd, double* colcnd, double* amax );
04573 lapack_int LAPACKE_cgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04574                                 lapack_int kl, lapack_int ku,
04575                                 const lapack_complex_float* ab, lapack_int ldab,
04576                                 float* r, float* c, float* rowcnd,
04577                                 float* colcnd, float* amax );
04578 lapack_int LAPACKE_zgbequ_work( int matrix_order, lapack_int m, lapack_int n,
04579                                 lapack_int kl, lapack_int ku,
04580                                 const lapack_complex_double* ab,
04581                                 lapack_int ldab, double* r, double* c,
04582                                 double* rowcnd, double* colcnd, double* amax );
04583 
04584 lapack_int LAPACKE_sgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04585                                  lapack_int kl, lapack_int ku, const float* ab,
04586                                  lapack_int ldab, float* r, float* c,
04587                                  float* rowcnd, float* colcnd, float* amax );
04588 lapack_int LAPACKE_dgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04589                                  lapack_int kl, lapack_int ku, const double* ab,
04590                                  lapack_int ldab, double* r, double* c,
04591                                  double* rowcnd, double* colcnd, double* amax );
04592 lapack_int LAPACKE_cgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04593                                  lapack_int kl, lapack_int ku,
04594                                  const lapack_complex_float* ab,
04595                                  lapack_int ldab, float* r, float* c,
04596                                  float* rowcnd, float* colcnd, float* amax );
04597 lapack_int LAPACKE_zgbequb_work( int matrix_order, lapack_int m, lapack_int n,
04598                                  lapack_int kl, lapack_int ku,
04599                                  const lapack_complex_double* ab,
04600                                  lapack_int ldab, double* r, double* c,
04601                                  double* rowcnd, double* colcnd, double* amax );
04602 
04603 lapack_int LAPACKE_sgbrfs_work( int matrix_order, char trans, lapack_int n,
04604                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04605                                 const float* ab, lapack_int ldab,
04606                                 const float* afb, lapack_int ldafb,
04607                                 const lapack_int* ipiv, const float* b,
04608                                 lapack_int ldb, float* x, lapack_int ldx,
04609                                 float* ferr, float* berr, float* work,
04610                                 lapack_int* iwork );
04611 lapack_int LAPACKE_dgbrfs_work( int matrix_order, char trans, lapack_int n,
04612                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04613                                 const double* ab, lapack_int ldab,
04614                                 const double* afb, lapack_int ldafb,
04615                                 const lapack_int* ipiv, const double* b,
04616                                 lapack_int ldb, double* x, lapack_int ldx,
04617                                 double* ferr, double* berr, double* work,
04618                                 lapack_int* iwork );
04619 lapack_int LAPACKE_cgbrfs_work( int matrix_order, char trans, lapack_int n,
04620                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04621                                 const lapack_complex_float* ab, lapack_int ldab,
04622                                 const lapack_complex_float* afb,
04623                                 lapack_int ldafb, const lapack_int* ipiv,
04624                                 const lapack_complex_float* b, lapack_int ldb,
04625                                 lapack_complex_float* x, lapack_int ldx,
04626                                 float* ferr, float* berr,
04627                                 lapack_complex_float* work, float* rwork );
04628 lapack_int LAPACKE_zgbrfs_work( int matrix_order, char trans, lapack_int n,
04629                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04630                                 const lapack_complex_double* ab,
04631                                 lapack_int ldab,
04632                                 const lapack_complex_double* afb,
04633                                 lapack_int ldafb, const lapack_int* ipiv,
04634                                 const lapack_complex_double* b, lapack_int ldb,
04635                                 lapack_complex_double* x, lapack_int ldx,
04636                                 double* ferr, double* berr,
04637                                 lapack_complex_double* work, double* rwork );
04638 
04639 lapack_int LAPACKE_sgbrfsx_work( int matrix_order, char trans, char equed,
04640                                  lapack_int n, lapack_int kl, lapack_int ku,
04641                                  lapack_int nrhs, const float* ab,
04642                                  lapack_int ldab, const float* afb,
04643                                  lapack_int ldafb, const lapack_int* ipiv,
04644                                  const float* r, const float* c, const float* b,
04645                                  lapack_int ldb, float* x, lapack_int ldx,
04646                                  float* rcond, float* berr,
04647                                  lapack_int n_err_bnds, float* err_bnds_norm,
04648                                  float* err_bnds_comp, lapack_int nparams,
04649                                  float* params, float* work,
04650                                  lapack_int* iwork );
04651 lapack_int LAPACKE_dgbrfsx_work( int matrix_order, char trans, char equed,
04652                                  lapack_int n, lapack_int kl, lapack_int ku,
04653                                  lapack_int nrhs, const double* ab,
04654                                  lapack_int ldab, const double* afb,
04655                                  lapack_int ldafb, const lapack_int* ipiv,
04656                                  const double* r, const double* c,
04657                                  const double* b, lapack_int ldb, double* x,
04658                                  lapack_int ldx, double* rcond, double* berr,
04659                                  lapack_int n_err_bnds, double* err_bnds_norm,
04660                                  double* err_bnds_comp, lapack_int nparams,
04661                                  double* params, double* work,
04662                                  lapack_int* iwork );
04663 lapack_int LAPACKE_cgbrfsx_work( int matrix_order, char trans, char equed,
04664                                  lapack_int n, lapack_int kl, lapack_int ku,
04665                                  lapack_int nrhs,
04666                                  const lapack_complex_float* ab,
04667                                  lapack_int ldab,
04668                                  const lapack_complex_float* afb,
04669                                  lapack_int ldafb, const lapack_int* ipiv,
04670                                  const float* r, const float* c,
04671                                  const lapack_complex_float* b, lapack_int ldb,
04672                                  lapack_complex_float* x, lapack_int ldx,
04673                                  float* rcond, float* berr,
04674                                  lapack_int n_err_bnds, float* err_bnds_norm,
04675                                  float* err_bnds_comp, lapack_int nparams,
04676                                  float* params, lapack_complex_float* work,
04677                                  float* rwork );
04678 lapack_int LAPACKE_zgbrfsx_work( int matrix_order, char trans, char equed,
04679                                  lapack_int n, lapack_int kl, lapack_int ku,
04680                                  lapack_int nrhs,
04681                                  const lapack_complex_double* ab,
04682                                  lapack_int ldab,
04683                                  const lapack_complex_double* afb,
04684                                  lapack_int ldafb, const lapack_int* ipiv,
04685                                  const double* r, const double* c,
04686                                  const lapack_complex_double* b, lapack_int ldb,
04687                                  lapack_complex_double* x, lapack_int ldx,
04688                                  double* rcond, double* berr,
04689                                  lapack_int n_err_bnds, double* err_bnds_norm,
04690                                  double* err_bnds_comp, lapack_int nparams,
04691                                  double* params, lapack_complex_double* work,
04692                                  double* rwork );
04693 
04694 lapack_int LAPACKE_sgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04695                                lapack_int ku, lapack_int nrhs, float* ab,
04696                                lapack_int ldab, lapack_int* ipiv, float* b,
04697                                lapack_int ldb );
04698 lapack_int LAPACKE_dgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04699                                lapack_int ku, lapack_int nrhs, double* ab,
04700                                lapack_int ldab, lapack_int* ipiv, double* b,
04701                                lapack_int ldb );
04702 lapack_int LAPACKE_cgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04703                                lapack_int ku, lapack_int nrhs,
04704                                lapack_complex_float* ab, lapack_int ldab,
04705                                lapack_int* ipiv, lapack_complex_float* b,
04706                                lapack_int ldb );
04707 lapack_int LAPACKE_zgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
04708                                lapack_int ku, lapack_int nrhs,
04709                                lapack_complex_double* ab, lapack_int ldab,
04710                                lapack_int* ipiv, lapack_complex_double* b,
04711                                lapack_int ldb );
04712 
04713 lapack_int LAPACKE_sgbsvx_work( int matrix_order, char fact, char trans,
04714                                 lapack_int n, lapack_int kl, lapack_int ku,
04715                                 lapack_int nrhs, float* ab, lapack_int ldab,
04716                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
04717                                 char* equed, float* r, float* c, float* b,
04718                                 lapack_int ldb, float* x, lapack_int ldx,
04719                                 float* rcond, float* ferr, float* berr,
04720                                 float* work, lapack_int* iwork );
04721 lapack_int LAPACKE_dgbsvx_work( int matrix_order, char fact, char trans,
04722                                 lapack_int n, lapack_int kl, lapack_int ku,
04723                                 lapack_int nrhs, double* ab, lapack_int ldab,
04724                                 double* afb, lapack_int ldafb, lapack_int* ipiv,
04725                                 char* equed, double* r, double* c, double* b,
04726                                 lapack_int ldb, double* x, lapack_int ldx,
04727                                 double* rcond, double* ferr, double* berr,
04728                                 double* work, lapack_int* iwork );
04729 lapack_int LAPACKE_cgbsvx_work( int matrix_order, char fact, char trans,
04730                                 lapack_int n, lapack_int kl, lapack_int ku,
04731                                 lapack_int nrhs, lapack_complex_float* ab,
04732                                 lapack_int ldab, lapack_complex_float* afb,
04733                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
04734                                 float* r, float* c, lapack_complex_float* b,
04735                                 lapack_int ldb, lapack_complex_float* x,
04736                                 lapack_int ldx, float* rcond, float* ferr,
04737                                 float* berr, lapack_complex_float* work,
04738                                 float* rwork );
04739 lapack_int LAPACKE_zgbsvx_work( int matrix_order, char fact, char trans,
04740                                 lapack_int n, lapack_int kl, lapack_int ku,
04741                                 lapack_int nrhs, lapack_complex_double* ab,
04742                                 lapack_int ldab, lapack_complex_double* afb,
04743                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
04744                                 double* r, double* c, lapack_complex_double* b,
04745                                 lapack_int ldb, lapack_complex_double* x,
04746                                 lapack_int ldx, double* rcond, double* ferr,
04747                                 double* berr, lapack_complex_double* work,
04748                                 double* rwork );
04749 
04750 lapack_int LAPACKE_sgbsvxx_work( int matrix_order, char fact, char trans,
04751                                  lapack_int n, lapack_int kl, lapack_int ku,
04752                                  lapack_int nrhs, float* ab, lapack_int ldab,
04753                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
04754                                  char* equed, float* r, float* c, float* b,
04755                                  lapack_int ldb, float* x, lapack_int ldx,
04756                                  float* rcond, float* rpvgrw, float* berr,
04757                                  lapack_int n_err_bnds, float* err_bnds_norm,
04758                                  float* err_bnds_comp, lapack_int nparams,
04759                                  float* params, float* work,
04760                                  lapack_int* iwork );
04761 lapack_int LAPACKE_dgbsvxx_work( int matrix_order, char fact, char trans,
04762                                  lapack_int n, lapack_int kl, lapack_int ku,
04763                                  lapack_int nrhs, double* ab, lapack_int ldab,
04764                                  double* afb, lapack_int ldafb,
04765                                  lapack_int* ipiv, char* equed, double* r,
04766                                  double* c, double* b, lapack_int ldb,
04767                                  double* x, lapack_int ldx, double* rcond,
04768                                  double* rpvgrw, double* berr,
04769                                  lapack_int n_err_bnds, double* err_bnds_norm,
04770                                  double* err_bnds_comp, lapack_int nparams,
04771                                  double* params, double* work,
04772                                  lapack_int* iwork );
04773 lapack_int LAPACKE_cgbsvxx_work( int matrix_order, char fact, char trans,
04774                                  lapack_int n, lapack_int kl, lapack_int ku,
04775                                  lapack_int nrhs, lapack_complex_float* ab,
04776                                  lapack_int ldab, lapack_complex_float* afb,
04777                                  lapack_int ldafb, lapack_int* ipiv,
04778                                  char* equed, float* r, float* c,
04779                                  lapack_complex_float* b, lapack_int ldb,
04780                                  lapack_complex_float* x, lapack_int ldx,
04781                                  float* rcond, float* rpvgrw, float* berr,
04782                                  lapack_int n_err_bnds, float* err_bnds_norm,
04783                                  float* err_bnds_comp, lapack_int nparams,
04784                                  float* params, lapack_complex_float* work,
04785                                  float* rwork );
04786 lapack_int LAPACKE_zgbsvxx_work( int matrix_order, char fact, char trans,
04787                                  lapack_int n, lapack_int kl, lapack_int ku,
04788                                  lapack_int nrhs, lapack_complex_double* ab,
04789                                  lapack_int ldab, lapack_complex_double* afb,
04790                                  lapack_int ldafb, lapack_int* ipiv,
04791                                  char* equed, double* r, double* c,
04792                                  lapack_complex_double* b, lapack_int ldb,
04793                                  lapack_complex_double* x, lapack_int ldx,
04794                                  double* rcond, double* rpvgrw, double* berr,
04795                                  lapack_int n_err_bnds, double* err_bnds_norm,
04796                                  double* err_bnds_comp, lapack_int nparams,
04797                                  double* params, lapack_complex_double* work,
04798                                  double* rwork );
04799 
04800 lapack_int LAPACKE_sgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04801                                 lapack_int kl, lapack_int ku, float* ab,
04802                                 lapack_int ldab, lapack_int* ipiv );
04803 lapack_int LAPACKE_dgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04804                                 lapack_int kl, lapack_int ku, double* ab,
04805                                 lapack_int ldab, lapack_int* ipiv );
04806 lapack_int LAPACKE_cgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04807                                 lapack_int kl, lapack_int ku,
04808                                 lapack_complex_float* ab, lapack_int ldab,
04809                                 lapack_int* ipiv );
04810 lapack_int LAPACKE_zgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
04811                                 lapack_int kl, lapack_int ku,
04812                                 lapack_complex_double* ab, lapack_int ldab,
04813                                 lapack_int* ipiv );
04814 
04815 lapack_int LAPACKE_sgbtrs_work( int matrix_order, char trans, lapack_int n,
04816                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04817                                 const float* ab, lapack_int ldab,
04818                                 const lapack_int* ipiv, float* b,
04819                                 lapack_int ldb );
04820 lapack_int LAPACKE_dgbtrs_work( int matrix_order, char trans, lapack_int n,
04821                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04822                                 const double* ab, lapack_int ldab,
04823                                 const lapack_int* ipiv, double* b,
04824                                 lapack_int ldb );
04825 lapack_int LAPACKE_cgbtrs_work( int matrix_order, char trans, lapack_int n,
04826                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04827                                 const lapack_complex_float* ab, lapack_int ldab,
04828                                 const lapack_int* ipiv, lapack_complex_float* b,
04829                                 lapack_int ldb );
04830 lapack_int LAPACKE_zgbtrs_work( int matrix_order, char trans, lapack_int n,
04831                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
04832                                 const lapack_complex_double* ab,
04833                                 lapack_int ldab, const lapack_int* ipiv,
04834                                 lapack_complex_double* b, lapack_int ldb );
04835 
04836 lapack_int LAPACKE_sgebak_work( int matrix_order, char job, char side,
04837                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04838                                 const float* scale, lapack_int m, float* v,
04839                                 lapack_int ldv );
04840 lapack_int LAPACKE_dgebak_work( int matrix_order, char job, char side,
04841                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04842                                 const double* scale, lapack_int m, double* v,
04843                                 lapack_int ldv );
04844 lapack_int LAPACKE_cgebak_work( int matrix_order, char job, char side,
04845                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04846                                 const float* scale, lapack_int m,
04847                                 lapack_complex_float* v, lapack_int ldv );
04848 lapack_int LAPACKE_zgebak_work( int matrix_order, char job, char side,
04849                                 lapack_int n, lapack_int ilo, lapack_int ihi,
04850                                 const double* scale, lapack_int m,
04851                                 lapack_complex_double* v, lapack_int ldv );
04852 
04853 lapack_int LAPACKE_sgebal_work( int matrix_order, char job, lapack_int n,
04854                                 float* a, lapack_int lda, lapack_int* ilo,
04855                                 lapack_int* ihi, float* scale );
04856 lapack_int LAPACKE_dgebal_work( int matrix_order, char job, lapack_int n,
04857                                 double* a, lapack_int lda, lapack_int* ilo,
04858                                 lapack_int* ihi, double* scale );
04859 lapack_int LAPACKE_cgebal_work( int matrix_order, char job, lapack_int n,
04860                                 lapack_complex_float* a, lapack_int lda,
04861                                 lapack_int* ilo, lapack_int* ihi,
04862                                 float* scale );
04863 lapack_int LAPACKE_zgebal_work( int matrix_order, char job, lapack_int n,
04864                                 lapack_complex_double* a, lapack_int lda,
04865                                 lapack_int* ilo, lapack_int* ihi,
04866                                 double* scale );
04867 
04868 lapack_int LAPACKE_sgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04869                                 float* a, lapack_int lda, float* d, float* e,
04870                                 float* tauq, float* taup, float* work,
04871                                 lapack_int lwork );
04872 lapack_int LAPACKE_dgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04873                                 double* a, lapack_int lda, double* d, double* e,
04874                                 double* tauq, double* taup, double* work,
04875                                 lapack_int lwork );
04876 lapack_int LAPACKE_cgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04877                                 lapack_complex_float* a, lapack_int lda,
04878                                 float* d, float* e, lapack_complex_float* tauq,
04879                                 lapack_complex_float* taup,
04880                                 lapack_complex_float* work, lapack_int lwork );
04881 lapack_int LAPACKE_zgebrd_work( int matrix_order, lapack_int m, lapack_int n,
04882                                 lapack_complex_double* a, lapack_int lda,
04883                                 double* d, double* e,
04884                                 lapack_complex_double* tauq,
04885                                 lapack_complex_double* taup,
04886                                 lapack_complex_double* work, lapack_int lwork );
04887 
04888 lapack_int LAPACKE_sgecon_work( int matrix_order, char norm, lapack_int n,
04889                                 const float* a, lapack_int lda, float anorm,
04890                                 float* rcond, float* work, lapack_int* iwork );
04891 lapack_int LAPACKE_dgecon_work( int matrix_order, char norm, lapack_int n,
04892                                 const double* a, lapack_int lda, double anorm,
04893                                 double* rcond, double* work,
04894                                 lapack_int* iwork );
04895 lapack_int LAPACKE_cgecon_work( int matrix_order, char norm, lapack_int n,
04896                                 const lapack_complex_float* a, lapack_int lda,
04897                                 float anorm, float* rcond,
04898                                 lapack_complex_float* work, float* rwork );
04899 lapack_int LAPACKE_zgecon_work( int matrix_order, char norm, lapack_int n,
04900                                 const lapack_complex_double* a, lapack_int lda,
04901                                 double anorm, double* rcond,
04902                                 lapack_complex_double* work, double* rwork );
04903 
04904 lapack_int LAPACKE_sgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04905                                 const float* a, lapack_int lda, float* r,
04906                                 float* c, float* rowcnd, float* colcnd,
04907                                 float* amax );
04908 lapack_int LAPACKE_dgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04909                                 const double* a, lapack_int lda, double* r,
04910                                 double* c, double* rowcnd, double* colcnd,
04911                                 double* amax );
04912 lapack_int LAPACKE_cgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04913                                 const lapack_complex_float* a, lapack_int lda,
04914                                 float* r, float* c, float* rowcnd,
04915                                 float* colcnd, float* amax );
04916 lapack_int LAPACKE_zgeequ_work( int matrix_order, lapack_int m, lapack_int n,
04917                                 const lapack_complex_double* a, lapack_int lda,
04918                                 double* r, double* c, double* rowcnd,
04919                                 double* colcnd, double* amax );
04920 
04921 lapack_int LAPACKE_sgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04922                                  const float* a, lapack_int lda, float* r,
04923                                  float* c, float* rowcnd, float* colcnd,
04924                                  float* amax );
04925 lapack_int LAPACKE_dgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04926                                  const double* a, lapack_int lda, double* r,
04927                                  double* c, double* rowcnd, double* colcnd,
04928                                  double* amax );
04929 lapack_int LAPACKE_cgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04930                                  const lapack_complex_float* a, lapack_int lda,
04931                                  float* r, float* c, float* rowcnd,
04932                                  float* colcnd, float* amax );
04933 lapack_int LAPACKE_zgeequb_work( int matrix_order, lapack_int m, lapack_int n,
04934                                  const lapack_complex_double* a, lapack_int lda,
04935                                  double* r, double* c, double* rowcnd,
04936                                  double* colcnd, double* amax );
04937 
04938 lapack_int LAPACKE_sgees_work( int matrix_order, char jobvs, char sort,
04939                                LAPACK_S_SELECT2 select, lapack_int n, float* a,
04940                                lapack_int lda, lapack_int* sdim, float* wr,
04941                                float* wi, float* vs, lapack_int ldvs,
04942                                float* work, lapack_int lwork,
04943                                lapack_logical* bwork );
04944 lapack_int LAPACKE_dgees_work( int matrix_order, char jobvs, char sort,
04945                                LAPACK_D_SELECT2 select, lapack_int n, double* a,
04946                                lapack_int lda, lapack_int* sdim, double* wr,
04947                                double* wi, double* vs, lapack_int ldvs,
04948                                double* work, lapack_int lwork,
04949                                lapack_logical* bwork );
04950 lapack_int LAPACKE_cgees_work( int matrix_order, char jobvs, char sort,
04951                                LAPACK_C_SELECT1 select, lapack_int n,
04952                                lapack_complex_float* a, lapack_int lda,
04953                                lapack_int* sdim, lapack_complex_float* w,
04954                                lapack_complex_float* vs, lapack_int ldvs,
04955                                lapack_complex_float* work, lapack_int lwork,
04956                                float* rwork, lapack_logical* bwork );
04957 lapack_int LAPACKE_zgees_work( int matrix_order, char jobvs, char sort,
04958                                LAPACK_Z_SELECT1 select, lapack_int n,
04959                                lapack_complex_double* a, lapack_int lda,
04960                                lapack_int* sdim, lapack_complex_double* w,
04961                                lapack_complex_double* vs, lapack_int ldvs,
04962                                lapack_complex_double* work, lapack_int lwork,
04963                                double* rwork, lapack_logical* bwork );
04964 
04965 lapack_int LAPACKE_sgeesx_work( int matrix_order, char jobvs, char sort,
04966                                 LAPACK_S_SELECT2 select, char sense,
04967                                 lapack_int n, float* a, lapack_int lda,
04968                                 lapack_int* sdim, float* wr, float* wi,
04969                                 float* vs, lapack_int ldvs, float* rconde,
04970                                 float* rcondv, float* work, lapack_int lwork,
04971                                 lapack_int* iwork, lapack_int liwork,
04972                                 lapack_logical* bwork );
04973 lapack_int LAPACKE_dgeesx_work( int matrix_order, char jobvs, char sort,
04974                                 LAPACK_D_SELECT2 select, char sense,
04975                                 lapack_int n, double* a, lapack_int lda,
04976                                 lapack_int* sdim, double* wr, double* wi,
04977                                 double* vs, lapack_int ldvs, double* rconde,
04978                                 double* rcondv, double* work, lapack_int lwork,
04979                                 lapack_int* iwork, lapack_int liwork,
04980                                 lapack_logical* bwork );
04981 lapack_int LAPACKE_cgeesx_work( int matrix_order, char jobvs, char sort,
04982                                 LAPACK_C_SELECT1 select, char sense,
04983                                 lapack_int n, lapack_complex_float* a,
04984                                 lapack_int lda, lapack_int* sdim,
04985                                 lapack_complex_float* w,
04986                                 lapack_complex_float* vs, lapack_int ldvs,
04987                                 float* rconde, float* rcondv,
04988                                 lapack_complex_float* work, lapack_int lwork,
04989                                 float* rwork, lapack_logical* bwork );
04990 lapack_int LAPACKE_zgeesx_work( int matrix_order, char jobvs, char sort,
04991                                 LAPACK_Z_SELECT1 select, char sense,
04992                                 lapack_int n, lapack_complex_double* a,
04993                                 lapack_int lda, lapack_int* sdim,
04994                                 lapack_complex_double* w,
04995                                 lapack_complex_double* vs, lapack_int ldvs,
04996                                 double* rconde, double* rcondv,
04997                                 lapack_complex_double* work, lapack_int lwork,
04998                                 double* rwork, lapack_logical* bwork );
04999 
05000 lapack_int LAPACKE_sgeev_work( int matrix_order, char jobvl, char jobvr,
05001                                lapack_int n, float* a, lapack_int lda,
05002                                float* wr, float* wi, float* vl, lapack_int ldvl,
05003                                float* vr, lapack_int ldvr, float* work,
05004                                lapack_int lwork );
05005 lapack_int LAPACKE_dgeev_work( int matrix_order, char jobvl, char jobvr,
05006                                lapack_int n, double* a, lapack_int lda,
05007                                double* wr, double* wi, double* vl,
05008                                lapack_int ldvl, double* vr, lapack_int ldvr,
05009                                double* work, lapack_int lwork );
05010 lapack_int LAPACKE_cgeev_work( int matrix_order, char jobvl, char jobvr,
05011                                lapack_int n, lapack_complex_float* a,
05012                                lapack_int lda, lapack_complex_float* w,
05013                                lapack_complex_float* vl, lapack_int ldvl,
05014                                lapack_complex_float* vr, lapack_int ldvr,
05015                                lapack_complex_float* work, lapack_int lwork,
05016                                float* rwork );
05017 lapack_int LAPACKE_zgeev_work( int matrix_order, char jobvl, char jobvr,
05018                                lapack_int n, lapack_complex_double* a,
05019                                lapack_int lda, lapack_complex_double* w,
05020                                lapack_complex_double* vl, lapack_int ldvl,
05021                                lapack_complex_double* vr, lapack_int ldvr,
05022                                lapack_complex_double* work, lapack_int lwork,
05023                                double* rwork );
05024 
05025 lapack_int LAPACKE_sgeevx_work( int matrix_order, char balanc, char jobvl,
05026                                 char jobvr, char sense, lapack_int n, float* a,
05027                                 lapack_int lda, float* wr, float* wi, float* vl,
05028                                 lapack_int ldvl, float* vr, lapack_int ldvr,
05029                                 lapack_int* ilo, lapack_int* ihi, float* scale,
05030                                 float* abnrm, float* rconde, float* rcondv,
05031                                 float* work, lapack_int lwork,
05032                                 lapack_int* iwork );
05033 lapack_int LAPACKE_dgeevx_work( int matrix_order, char balanc, char jobvl,
05034                                 char jobvr, char sense, lapack_int n, double* a,
05035                                 lapack_int lda, double* wr, double* wi,
05036                                 double* vl, lapack_int ldvl, double* vr,
05037                                 lapack_int ldvr, lapack_int* ilo,
05038                                 lapack_int* ihi, double* scale, double* abnrm,
05039                                 double* rconde, double* rcondv, double* work,
05040                                 lapack_int lwork, lapack_int* iwork );
05041 lapack_int LAPACKE_cgeevx_work( int matrix_order, char balanc, char jobvl,
05042                                 char jobvr, char sense, lapack_int n,
05043                                 lapack_complex_float* a, lapack_int lda,
05044                                 lapack_complex_float* w,
05045                                 lapack_complex_float* vl, lapack_int ldvl,
05046                                 lapack_complex_float* vr, lapack_int ldvr,
05047                                 lapack_int* ilo, lapack_int* ihi, float* scale,
05048                                 float* abnrm, float* rconde, float* rcondv,
05049                                 lapack_complex_float* work, lapack_int lwork,
05050                                 float* rwork );
05051 lapack_int LAPACKE_zgeevx_work( int matrix_order, char balanc, char jobvl,
05052                                 char jobvr, char sense, lapack_int n,
05053                                 lapack_complex_double* a, lapack_int lda,
05054                                 lapack_complex_double* w,
05055                                 lapack_complex_double* vl, lapack_int ldvl,
05056                                 lapack_complex_double* vr, lapack_int ldvr,
05057                                 lapack_int* ilo, lapack_int* ihi, double* scale,
05058                                 double* abnrm, double* rconde, double* rcondv,
05059                                 lapack_complex_double* work, lapack_int lwork,
05060                                 double* rwork );
05061 
05062 lapack_int LAPACKE_sgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
05063                                 lapack_int ihi, float* a, lapack_int lda,
05064                                 float* tau, float* work, lapack_int lwork );
05065 lapack_int LAPACKE_dgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
05066                                 lapack_int ihi, double* a, lapack_int lda,
05067                                 double* tau, double* work, lapack_int lwork );
05068 lapack_int LAPACKE_cgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
05069                                 lapack_int ihi, lapack_complex_float* a,
05070                                 lapack_int lda, lapack_complex_float* tau,
05071                                 lapack_complex_float* work, lapack_int lwork );
05072 lapack_int LAPACKE_zgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
05073                                 lapack_int ihi, lapack_complex_double* a,
05074                                 lapack_int lda, lapack_complex_double* tau,
05075                                 lapack_complex_double* work, lapack_int lwork );
05076 
05077 lapack_int LAPACKE_sgejsv_work( int matrix_order, char joba, char jobu,
05078                                 char jobv, char jobr, char jobt, char jobp,
05079                                 lapack_int m, lapack_int n, float* a,
05080                                 lapack_int lda, float* sva, float* u,
05081                                 lapack_int ldu, float* v, lapack_int ldv,
05082                                 float* work, lapack_int lwork,
05083                                 lapack_int* iwork );
05084 lapack_int LAPACKE_dgejsv_work( int matrix_order, char joba, char jobu,
05085                                 char jobv, char jobr, char jobt, char jobp,
05086                                 lapack_int m, lapack_int n, double* a,
05087                                 lapack_int lda, double* sva, double* u,
05088                                 lapack_int ldu, double* v, lapack_int ldv,
05089                                 double* work, lapack_int lwork,
05090                                 lapack_int* iwork );
05091 
05092 lapack_int LAPACKE_sgelq2_work( int matrix_order, lapack_int m, lapack_int n,
05093                                 float* a, lapack_int lda, float* tau,
05094                                 float* work );
05095 lapack_int LAPACKE_dgelq2_work( int matrix_order, lapack_int m, lapack_int n,
05096                                 double* a, lapack_int lda, double* tau,
05097                                 double* work );
05098 lapack_int LAPACKE_cgelq2_work( int matrix_order, lapack_int m, lapack_int n,
05099                                 lapack_complex_float* a, lapack_int lda,
05100                                 lapack_complex_float* tau,
05101                                 lapack_complex_float* work );
05102 lapack_int LAPACKE_zgelq2_work( int matrix_order, lapack_int m, lapack_int n,
05103                                 lapack_complex_double* a, lapack_int lda,
05104                                 lapack_complex_double* tau,
05105                                 lapack_complex_double* work );
05106 
05107 lapack_int LAPACKE_sgelqf_work( int matrix_order, lapack_int m, lapack_int n,
05108                                 float* a, lapack_int lda, float* tau,
05109                                 float* work, lapack_int lwork );
05110 lapack_int LAPACKE_dgelqf_work( int matrix_order, lapack_int m, lapack_int n,
05111                                 double* a, lapack_int lda, double* tau,
05112                                 double* work, lapack_int lwork );
05113 lapack_int LAPACKE_cgelqf_work( int matrix_order, lapack_int m, lapack_int n,
05114                                 lapack_complex_float* a, lapack_int lda,
05115                                 lapack_complex_float* tau,
05116                                 lapack_complex_float* work, lapack_int lwork );
05117 lapack_int LAPACKE_zgelqf_work( int matrix_order, lapack_int m, lapack_int n,
05118                                 lapack_complex_double* a, lapack_int lda,
05119                                 lapack_complex_double* tau,
05120                                 lapack_complex_double* work, lapack_int lwork );
05121 
05122 lapack_int LAPACKE_sgels_work( int matrix_order, char trans, lapack_int m,
05123                                lapack_int n, lapack_int nrhs, float* a,
05124                                lapack_int lda, float* b, lapack_int ldb,
05125                                float* work, lapack_int lwork );
05126 lapack_int LAPACKE_dgels_work( int matrix_order, char trans, lapack_int m,
05127                                lapack_int n, lapack_int nrhs, double* a,
05128                                lapack_int lda, double* b, lapack_int ldb,
05129                                double* work, lapack_int lwork );
05130 lapack_int LAPACKE_cgels_work( int matrix_order, char trans, lapack_int m,
05131                                lapack_int n, lapack_int nrhs,
05132                                lapack_complex_float* a, lapack_int lda,
05133                                lapack_complex_float* b, lapack_int ldb,
05134                                lapack_complex_float* work, lapack_int lwork );
05135 lapack_int LAPACKE_zgels_work( int matrix_order, char trans, lapack_int m,
05136                                lapack_int n, lapack_int nrhs,
05137                                lapack_complex_double* a, lapack_int lda,
05138                                lapack_complex_double* b, lapack_int ldb,
05139                                lapack_complex_double* work, lapack_int lwork );
05140 
05141 lapack_int LAPACKE_sgelsd_work( int matrix_order, lapack_int m, lapack_int n,
05142                                 lapack_int nrhs, float* a, lapack_int lda,
05143                                 float* b, lapack_int ldb, float* s, float rcond,
05144                                 lapack_int* rank, float* work, lapack_int lwork,
05145                                 lapack_int* iwork );
05146 lapack_int LAPACKE_dgelsd_work( int matrix_order, lapack_int m, lapack_int n,
05147                                 lapack_int nrhs, double* a, lapack_int lda,
05148                                 double* b, lapack_int ldb, double* s,
05149                                 double rcond, lapack_int* rank, double* work,
05150                                 lapack_int lwork, lapack_int* iwork );
05151 lapack_int LAPACKE_cgelsd_work( int matrix_order, lapack_int m, lapack_int n,
05152                                 lapack_int nrhs, lapack_complex_float* a,
05153                                 lapack_int lda, lapack_complex_float* b,
05154                                 lapack_int ldb, float* s, float rcond,
05155                                 lapack_int* rank, lapack_complex_float* work,
05156                                 lapack_int lwork, float* rwork,
05157                                 lapack_int* iwork );
05158 lapack_int LAPACKE_zgelsd_work( int matrix_order, lapack_int m, lapack_int n,
05159                                 lapack_int nrhs, lapack_complex_double* a,
05160                                 lapack_int lda, lapack_complex_double* b,
05161                                 lapack_int ldb, double* s, double rcond,
05162                                 lapack_int* rank, lapack_complex_double* work,
05163                                 lapack_int lwork, double* rwork,
05164                                 lapack_int* iwork );
05165 
05166 lapack_int LAPACKE_sgelss_work( int matrix_order, lapack_int m, lapack_int n,
05167                                 lapack_int nrhs, float* a, lapack_int lda,
05168                                 float* b, lapack_int ldb, float* s, float rcond,
05169                                 lapack_int* rank, float* work,
05170                                 lapack_int lwork );
05171 lapack_int LAPACKE_dgelss_work( int matrix_order, lapack_int m, lapack_int n,
05172                                 lapack_int nrhs, double* a, lapack_int lda,
05173                                 double* b, lapack_int ldb, double* s,
05174                                 double rcond, lapack_int* rank, double* work,
05175                                 lapack_int lwork );
05176 lapack_int LAPACKE_cgelss_work( int matrix_order, lapack_int m, lapack_int n,
05177                                 lapack_int nrhs, lapack_complex_float* a,
05178                                 lapack_int lda, lapack_complex_float* b,
05179                                 lapack_int ldb, float* s, float rcond,
05180                                 lapack_int* rank, lapack_complex_float* work,
05181                                 lapack_int lwork, float* rwork );
05182 lapack_int LAPACKE_zgelss_work( int matrix_order, lapack_int m, lapack_int n,
05183                                 lapack_int nrhs, lapack_complex_double* a,
05184                                 lapack_int lda, lapack_complex_double* b,
05185                                 lapack_int ldb, double* s, double rcond,
05186                                 lapack_int* rank, lapack_complex_double* work,
05187                                 lapack_int lwork, double* rwork );
05188 
05189 lapack_int LAPACKE_sgelsy_work( int matrix_order, lapack_int m, lapack_int n,
05190                                 lapack_int nrhs, float* a, lapack_int lda,
05191                                 float* b, lapack_int ldb, lapack_int* jpvt,
05192                                 float rcond, lapack_int* rank, float* work,
05193                                 lapack_int lwork );
05194 lapack_int LAPACKE_dgelsy_work( int matrix_order, lapack_int m, lapack_int n,
05195                                 lapack_int nrhs, double* a, lapack_int lda,
05196                                 double* b, lapack_int ldb, lapack_int* jpvt,
05197                                 double rcond, lapack_int* rank, double* work,
05198                                 lapack_int lwork );
05199 lapack_int LAPACKE_cgelsy_work( int matrix_order, lapack_int m, lapack_int n,
05200                                 lapack_int nrhs, lapack_complex_float* a,
05201                                 lapack_int lda, lapack_complex_float* b,
05202                                 lapack_int ldb, lapack_int* jpvt, float rcond,
05203                                 lapack_int* rank, lapack_complex_float* work,
05204                                 lapack_int lwork, float* rwork );
05205 lapack_int LAPACKE_zgelsy_work( int matrix_order, lapack_int m, lapack_int n,
05206                                 lapack_int nrhs, lapack_complex_double* a,
05207                                 lapack_int lda, lapack_complex_double* b,
05208                                 lapack_int ldb, lapack_int* jpvt, double rcond,
05209                                 lapack_int* rank, lapack_complex_double* work,
05210                                 lapack_int lwork, double* rwork );
05211 
05212 lapack_int LAPACKE_sgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
05213                                 float* a, lapack_int lda, float* tau,
05214                                 float* work, lapack_int lwork );
05215 lapack_int LAPACKE_dgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
05216                                 double* a, lapack_int lda, double* tau,
05217                                 double* work, lapack_int lwork );
05218 lapack_int LAPACKE_cgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
05219                                 lapack_complex_float* a, lapack_int lda,
05220                                 lapack_complex_float* tau,
05221                                 lapack_complex_float* work, lapack_int lwork );
05222 lapack_int LAPACKE_zgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
05223                                 lapack_complex_double* a, lapack_int lda,
05224                                 lapack_complex_double* tau,
05225                                 lapack_complex_double* work, lapack_int lwork );
05226 
05227 lapack_int LAPACKE_sgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
05228                                 float* a, lapack_int lda, lapack_int* jpvt,
05229                                 float* tau, float* work, lapack_int lwork );
05230 lapack_int LAPACKE_dgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
05231                                 double* a, lapack_int lda, lapack_int* jpvt,
05232                                 double* tau, double* work, lapack_int lwork );
05233 lapack_int LAPACKE_cgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
05234                                 lapack_complex_float* a, lapack_int lda,
05235                                 lapack_int* jpvt, lapack_complex_float* tau,
05236                                 lapack_complex_float* work, lapack_int lwork,
05237                                 float* rwork );
05238 lapack_int LAPACKE_zgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
05239                                 lapack_complex_double* a, lapack_int lda,
05240                                 lapack_int* jpvt, lapack_complex_double* tau,
05241                                 lapack_complex_double* work, lapack_int lwork,
05242                                 double* rwork );
05243 
05244 lapack_int LAPACKE_sgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
05245                                 float* a, lapack_int lda, lapack_int* jpvt,
05246                                 float* tau, float* work );
05247 lapack_int LAPACKE_dgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
05248                                 double* a, lapack_int lda, lapack_int* jpvt,
05249                                 double* tau, double* work );
05250 lapack_int LAPACKE_cgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
05251                                 lapack_complex_float* a, lapack_int lda,
05252                                 lapack_int* jpvt, lapack_complex_float* tau,
05253                                 lapack_complex_float* work, float* rwork );
05254 lapack_int LAPACKE_zgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
05255                                 lapack_complex_double* a, lapack_int lda,
05256                                 lapack_int* jpvt, lapack_complex_double* tau,
05257                                 lapack_complex_double* work, double* rwork );
05258 
05259 lapack_int LAPACKE_sgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
05260                                 float* a, lapack_int lda, float* tau,
05261                                 float* work );
05262 lapack_int LAPACKE_dgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
05263                                 double* a, lapack_int lda, double* tau,
05264                                 double* work );
05265 lapack_int LAPACKE_cgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
05266                                 lapack_complex_float* a, lapack_int lda,
05267                                 lapack_complex_float* tau,
05268                                 lapack_complex_float* work );
05269 lapack_int LAPACKE_zgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
05270                                 lapack_complex_double* a, lapack_int lda,
05271                                 lapack_complex_double* tau,
05272                                 lapack_complex_double* work );
05273 
05274 lapack_int LAPACKE_sgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05275                                 float* a, lapack_int lda, float* tau,
05276                                 float* work, lapack_int lwork );
05277 lapack_int LAPACKE_dgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05278                                 double* a, lapack_int lda, double* tau,
05279                                 double* work, lapack_int lwork );
05280 lapack_int LAPACKE_cgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05281                                 lapack_complex_float* a, lapack_int lda,
05282                                 lapack_complex_float* tau,
05283                                 lapack_complex_float* work, lapack_int lwork );
05284 lapack_int LAPACKE_zgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
05285                                 lapack_complex_double* a, lapack_int lda,
05286                                 lapack_complex_double* tau,
05287                                 lapack_complex_double* work, lapack_int lwork );
05288 
05289 lapack_int LAPACKE_sgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05290                                  float* a, lapack_int lda, float* tau,
05291                                  float* work, lapack_int lwork );
05292 lapack_int LAPACKE_dgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05293                                  double* a, lapack_int lda, double* tau,
05294                                  double* work, lapack_int lwork );
05295 lapack_int LAPACKE_cgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05296                                  lapack_complex_float* a, lapack_int lda,
05297                                  lapack_complex_float* tau,
05298                                  lapack_complex_float* work, lapack_int lwork );
05299 lapack_int LAPACKE_zgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
05300                                  lapack_complex_double* a, lapack_int lda,
05301                                  lapack_complex_double* tau,
05302                                  lapack_complex_double* work,
05303                                  lapack_int lwork );
05304 
05305 lapack_int LAPACKE_sgerfs_work( int matrix_order, char trans, lapack_int n,
05306                                 lapack_int nrhs, const float* a, lapack_int lda,
05307                                 const float* af, lapack_int ldaf,
05308                                 const lapack_int* ipiv, const float* b,
05309                                 lapack_int ldb, float* x, lapack_int ldx,
05310                                 float* ferr, float* berr, float* work,
05311                                 lapack_int* iwork );
05312 lapack_int LAPACKE_dgerfs_work( int matrix_order, char trans, lapack_int n,
05313                                 lapack_int nrhs, const double* a,
05314                                 lapack_int lda, const double* af,
05315                                 lapack_int ldaf, const lapack_int* ipiv,
05316                                 const double* b, lapack_int ldb, double* x,
05317                                 lapack_int ldx, double* ferr, double* berr,
05318                                 double* work, lapack_int* iwork );
05319 lapack_int LAPACKE_cgerfs_work( int matrix_order, char trans, lapack_int n,
05320                                 lapack_int nrhs, const lapack_complex_float* a,
05321                                 lapack_int lda, const lapack_complex_float* af,
05322                                 lapack_int ldaf, const lapack_int* ipiv,
05323                                 const lapack_complex_float* b, lapack_int ldb,
05324                                 lapack_complex_float* x, lapack_int ldx,
05325                                 float* ferr, float* berr,
05326                                 lapack_complex_float* work, float* rwork );
05327 lapack_int LAPACKE_zgerfs_work( int matrix_order, char trans, lapack_int n,
05328                                 lapack_int nrhs, const lapack_complex_double* a,
05329                                 lapack_int lda, const lapack_complex_double* af,
05330                                 lapack_int ldaf, const lapack_int* ipiv,
05331                                 const lapack_complex_double* b, lapack_int ldb,
05332                                 lapack_complex_double* x, lapack_int ldx,
05333                                 double* ferr, double* berr,
05334                                 lapack_complex_double* work, double* rwork );
05335 
05336 lapack_int LAPACKE_sgerfsx_work( int matrix_order, char trans, char equed,
05337                                  lapack_int n, lapack_int nrhs, const float* a,
05338                                  lapack_int lda, const float* af,
05339                                  lapack_int ldaf, const lapack_int* ipiv,
05340                                  const float* r, const float* c, const float* b,
05341                                  lapack_int ldb, float* x, lapack_int ldx,
05342                                  float* rcond, float* berr,
05343                                  lapack_int n_err_bnds, float* err_bnds_norm,
05344                                  float* err_bnds_comp, lapack_int nparams,
05345                                  float* params, float* work,
05346                                  lapack_int* iwork );
05347 lapack_int LAPACKE_dgerfsx_work( int matrix_order, char trans, char equed,
05348                                  lapack_int n, lapack_int nrhs, const double* a,
05349                                  lapack_int lda, const double* af,
05350                                  lapack_int ldaf, const lapack_int* ipiv,
05351                                  const double* r, const double* c,
05352                                  const double* b, lapack_int ldb, double* x,
05353                                  lapack_int ldx, double* rcond, double* berr,
05354                                  lapack_int n_err_bnds, double* err_bnds_norm,
05355                                  double* err_bnds_comp, lapack_int nparams,
05356                                  double* params, double* work,
05357                                  lapack_int* iwork );
05358 lapack_int LAPACKE_cgerfsx_work( int matrix_order, char trans, char equed,
05359                                  lapack_int n, lapack_int nrhs,
05360                                  const lapack_complex_float* a, lapack_int lda,
05361                                  const lapack_complex_float* af,
05362                                  lapack_int ldaf, const lapack_int* ipiv,
05363                                  const float* r, const float* c,
05364                                  const lapack_complex_float* b, lapack_int ldb,
05365                                  lapack_complex_float* x, lapack_int ldx,
05366                                  float* rcond, float* berr,
05367                                  lapack_int n_err_bnds, float* err_bnds_norm,
05368                                  float* err_bnds_comp, lapack_int nparams,
05369                                  float* params, lapack_complex_float* work,
05370                                  float* rwork );
05371 lapack_int LAPACKE_zgerfsx_work( int matrix_order, char trans, char equed,
05372                                  lapack_int n, lapack_int nrhs,
05373                                  const lapack_complex_double* a, lapack_int lda,
05374                                  const lapack_complex_double* af,
05375                                  lapack_int ldaf, const lapack_int* ipiv,
05376                                  const double* r, const double* c,
05377                                  const lapack_complex_double* b, lapack_int ldb,
05378                                  lapack_complex_double* x, lapack_int ldx,
05379                                  double* rcond, double* berr,
05380                                  lapack_int n_err_bnds, double* err_bnds_norm,
05381                                  double* err_bnds_comp, lapack_int nparams,
05382                                  double* params, lapack_complex_double* work,
05383                                  double* rwork );
05384 
05385 lapack_int LAPACKE_sgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05386                                 float* a, lapack_int lda, float* tau,
05387                                 float* work, lapack_int lwork );
05388 lapack_int LAPACKE_dgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05389                                 double* a, lapack_int lda, double* tau,
05390                                 double* work, lapack_int lwork );
05391 lapack_int LAPACKE_cgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05392                                 lapack_complex_float* a, lapack_int lda,
05393                                 lapack_complex_float* tau,
05394                                 lapack_complex_float* work, lapack_int lwork );
05395 lapack_int LAPACKE_zgerqf_work( int matrix_order, lapack_int m, lapack_int n,
05396                                 lapack_complex_double* a, lapack_int lda,
05397                                 lapack_complex_double* tau,
05398                                 lapack_complex_double* work, lapack_int lwork );
05399 
05400 lapack_int LAPACKE_sgesdd_work( int matrix_order, char jobz, lapack_int m,
05401                                 lapack_int n, float* a, lapack_int lda,
05402                                 float* s, float* u, lapack_int ldu, float* vt,
05403                                 lapack_int ldvt, float* work, lapack_int lwork,
05404                                 lapack_int* iwork );
05405 lapack_int LAPACKE_dgesdd_work( int matrix_order, char jobz, lapack_int m,
05406                                 lapack_int n, double* a, lapack_int lda,
05407                                 double* s, double* u, lapack_int ldu,
05408                                 double* vt, lapack_int ldvt, double* work,
05409                                 lapack_int lwork, lapack_int* iwork );
05410 lapack_int LAPACKE_cgesdd_work( int matrix_order, char jobz, lapack_int m,
05411                                 lapack_int n, lapack_complex_float* a,
05412                                 lapack_int lda, float* s,
05413                                 lapack_complex_float* u, lapack_int ldu,
05414                                 lapack_complex_float* vt, lapack_int ldvt,
05415                                 lapack_complex_float* work, lapack_int lwork,
05416                                 float* rwork, lapack_int* iwork );
05417 lapack_int LAPACKE_zgesdd_work( int matrix_order, char jobz, lapack_int m,
05418                                 lapack_int n, lapack_complex_double* a,
05419                                 lapack_int lda, double* s,
05420                                 lapack_complex_double* u, lapack_int ldu,
05421                                 lapack_complex_double* vt, lapack_int ldvt,
05422                                 lapack_complex_double* work, lapack_int lwork,
05423                                 double* rwork, lapack_int* iwork );
05424 
05425 lapack_int LAPACKE_sgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05426                                float* a, lapack_int lda, lapack_int* ipiv,
05427                                float* b, lapack_int ldb );
05428 lapack_int LAPACKE_dgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05429                                double* a, lapack_int lda, lapack_int* ipiv,
05430                                double* b, lapack_int ldb );
05431 lapack_int LAPACKE_cgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05432                                lapack_complex_float* a, lapack_int lda,
05433                                lapack_int* ipiv, lapack_complex_float* b,
05434                                lapack_int ldb );
05435 lapack_int LAPACKE_zgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05436                                lapack_complex_double* a, lapack_int lda,
05437                                lapack_int* ipiv, lapack_complex_double* b,
05438                                lapack_int ldb );
05439 lapack_int LAPACKE_dsgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05440                                 double* a, lapack_int lda, lapack_int* ipiv,
05441                                 double* b, lapack_int ldb, double* x,
05442                                 lapack_int ldx, double* work, float* swork,
05443                                 lapack_int* iter );
05444 lapack_int LAPACKE_zcgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
05445                                 lapack_complex_double* a, lapack_int lda,
05446                                 lapack_int* ipiv, lapack_complex_double* b,
05447                                 lapack_int ldb, lapack_complex_double* x,
05448                                 lapack_int ldx, lapack_complex_double* work,
05449                                 lapack_complex_float* swork, double* rwork,
05450                                 lapack_int* iter );
05451 
05452 lapack_int LAPACKE_sgesvd_work( int matrix_order, char jobu, char jobvt,
05453                                 lapack_int m, lapack_int n, float* a,
05454                                 lapack_int lda, float* s, float* u,
05455                                 lapack_int ldu, float* vt, lapack_int ldvt,
05456                                 float* work, lapack_int lwork );
05457 lapack_int LAPACKE_dgesvd_work( int matrix_order, char jobu, char jobvt,
05458                                 lapack_int m, lapack_int n, double* a,
05459                                 lapack_int lda, double* s, double* u,
05460                                 lapack_int ldu, double* vt, lapack_int ldvt,
05461                                 double* work, lapack_int lwork );
05462 lapack_int LAPACKE_cgesvd_work( int matrix_order, char jobu, char jobvt,
05463                                 lapack_int m, lapack_int n,
05464                                 lapack_complex_float* a, lapack_int lda,
05465                                 float* s, lapack_complex_float* u,
05466                                 lapack_int ldu, lapack_complex_float* vt,
05467                                 lapack_int ldvt, lapack_complex_float* work,
05468                                 lapack_int lwork, float* rwork );
05469 lapack_int LAPACKE_zgesvd_work( int matrix_order, char jobu, char jobvt,
05470                                 lapack_int m, lapack_int n,
05471                                 lapack_complex_double* a, lapack_int lda,
05472                                 double* s, lapack_complex_double* u,
05473                                 lapack_int ldu, lapack_complex_double* vt,
05474                                 lapack_int ldvt, lapack_complex_double* work,
05475                                 lapack_int lwork, double* rwork );
05476 
05477 lapack_int LAPACKE_sgesvj_work( int matrix_order, char joba, char jobu,
05478                                 char jobv, lapack_int m, lapack_int n, float* a,
05479                                 lapack_int lda, float* sva, lapack_int mv,
05480                                 float* v, lapack_int ldv, float* work,
05481                                 lapack_int lwork );
05482 lapack_int LAPACKE_dgesvj_work( int matrix_order, char joba, char jobu,
05483                                 char jobv, lapack_int m, lapack_int n,
05484                                 double* a, lapack_int lda, double* sva,
05485                                 lapack_int mv, double* v, lapack_int ldv,
05486                                 double* work, lapack_int lwork );
05487 
05488 lapack_int LAPACKE_sgesvx_work( int matrix_order, char fact, char trans,
05489                                 lapack_int n, lapack_int nrhs, float* a,
05490                                 lapack_int lda, float* af, lapack_int ldaf,
05491                                 lapack_int* ipiv, char* equed, float* r,
05492                                 float* c, float* b, lapack_int ldb, float* x,
05493                                 lapack_int ldx, float* rcond, float* ferr,
05494                                 float* berr, float* work, lapack_int* iwork );
05495 lapack_int LAPACKE_dgesvx_work( int matrix_order, char fact, char trans,
05496                                 lapack_int n, lapack_int nrhs, double* a,
05497                                 lapack_int lda, double* af, lapack_int ldaf,
05498                                 lapack_int* ipiv, char* equed, double* r,
05499                                 double* c, double* b, lapack_int ldb, double* x,
05500                                 lapack_int ldx, double* rcond, double* ferr,
05501                                 double* berr, double* work, lapack_int* iwork );
05502 lapack_int LAPACKE_cgesvx_work( int matrix_order, char fact, char trans,
05503                                 lapack_int n, lapack_int nrhs,
05504                                 lapack_complex_float* a, lapack_int lda,
05505                                 lapack_complex_float* af, lapack_int ldaf,
05506                                 lapack_int* ipiv, char* equed, float* r,
05507                                 float* c, lapack_complex_float* b,
05508                                 lapack_int ldb, lapack_complex_float* x,
05509                                 lapack_int ldx, float* rcond, float* ferr,
05510                                 float* berr, lapack_complex_float* work,
05511                                 float* rwork );
05512 lapack_int LAPACKE_zgesvx_work( int matrix_order, char fact, char trans,
05513                                 lapack_int n, lapack_int nrhs,
05514                                 lapack_complex_double* a, lapack_int lda,
05515                                 lapack_complex_double* af, lapack_int ldaf,
05516                                 lapack_int* ipiv, char* equed, double* r,
05517                                 double* c, lapack_complex_double* b,
05518                                 lapack_int ldb, lapack_complex_double* x,
05519                                 lapack_int ldx, double* rcond, double* ferr,
05520                                 double* berr, lapack_complex_double* work,
05521                                 double* rwork );
05522 
05523 lapack_int LAPACKE_sgesvxx_work( int matrix_order, char fact, char trans,
05524                                  lapack_int n, lapack_int nrhs, float* a,
05525                                  lapack_int lda, float* af, lapack_int ldaf,
05526                                  lapack_int* ipiv, char* equed, float* r,
05527                                  float* c, float* b, lapack_int ldb, float* x,
05528                                  lapack_int ldx, float* rcond, float* rpvgrw,
05529                                  float* berr, lapack_int n_err_bnds,
05530                                  float* err_bnds_norm, float* err_bnds_comp,
05531                                  lapack_int nparams, float* params, float* work,
05532                                  lapack_int* iwork );
05533 lapack_int LAPACKE_dgesvxx_work( int matrix_order, char fact, char trans,
05534                                  lapack_int n, lapack_int nrhs, double* a,
05535                                  lapack_int lda, double* af, lapack_int ldaf,
05536                                  lapack_int* ipiv, char* equed, double* r,
05537                                  double* c, double* b, lapack_int ldb,
05538                                  double* x, lapack_int ldx, double* rcond,
05539                                  double* rpvgrw, double* berr,
05540                                  lapack_int n_err_bnds, double* err_bnds_norm,
05541                                  double* err_bnds_comp, lapack_int nparams,
05542                                  double* params, double* work,
05543                                  lapack_int* iwork );
05544 lapack_int LAPACKE_cgesvxx_work( int matrix_order, char fact, char trans,
05545                                  lapack_int n, lapack_int nrhs,
05546                                  lapack_complex_float* a, lapack_int lda,
05547                                  lapack_complex_float* af, lapack_int ldaf,
05548                                  lapack_int* ipiv, char* equed, float* r,
05549                                  float* c, lapack_complex_float* b,
05550                                  lapack_int ldb, lapack_complex_float* x,
05551                                  lapack_int ldx, float* rcond, float* rpvgrw,
05552                                  float* berr, lapack_int n_err_bnds,
05553                                  float* err_bnds_norm, float* err_bnds_comp,
05554                                  lapack_int nparams, float* params,
05555                                  lapack_complex_float* work, float* rwork );
05556 lapack_int LAPACKE_zgesvxx_work( int matrix_order, char fact, char trans,
05557                                  lapack_int n, lapack_int nrhs,
05558                                  lapack_complex_double* a, lapack_int lda,
05559                                  lapack_complex_double* af, lapack_int ldaf,
05560                                  lapack_int* ipiv, char* equed, double* r,
05561                                  double* c, lapack_complex_double* b,
05562                                  lapack_int ldb, lapack_complex_double* x,
05563                                  lapack_int ldx, double* rcond, double* rpvgrw,
05564                                  double* berr, lapack_int n_err_bnds,
05565                                  double* err_bnds_norm, double* err_bnds_comp,
05566                                  lapack_int nparams, double* params,
05567                                  lapack_complex_double* work, double* rwork );
05568 
05569 lapack_int LAPACKE_sgetf2_work( int matrix_order, lapack_int m, lapack_int n,
05570                                 float* a, lapack_int lda, lapack_int* ipiv );
05571 lapack_int LAPACKE_dgetf2_work( int matrix_order, lapack_int m, lapack_int n,
05572                                 double* a, lapack_int lda, lapack_int* ipiv );
05573 lapack_int LAPACKE_cgetf2_work( int matrix_order, lapack_int m, lapack_int n,
05574                                 lapack_complex_float* a, lapack_int lda,
05575                                 lapack_int* ipiv );
05576 lapack_int LAPACKE_zgetf2_work( int matrix_order, lapack_int m, lapack_int n,
05577                                 lapack_complex_double* a, lapack_int lda,
05578                                 lapack_int* ipiv );
05579 
05580 lapack_int LAPACKE_sgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05581                                 float* a, lapack_int lda, lapack_int* ipiv );
05582 lapack_int LAPACKE_dgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05583                                 double* a, lapack_int lda, lapack_int* ipiv );
05584 lapack_int LAPACKE_cgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05585                                 lapack_complex_float* a, lapack_int lda,
05586                                 lapack_int* ipiv );
05587 lapack_int LAPACKE_zgetrf_work( int matrix_order, lapack_int m, lapack_int n,
05588                                 lapack_complex_double* a, lapack_int lda,
05589                                 lapack_int* ipiv );
05590 
05591 lapack_int LAPACKE_sgetri_work( int matrix_order, lapack_int n, float* a,
05592                                 lapack_int lda, const lapack_int* ipiv,
05593                                 float* work, lapack_int lwork );
05594 lapack_int LAPACKE_dgetri_work( int matrix_order, lapack_int n, double* a,
05595                                 lapack_int lda, const lapack_int* ipiv,
05596                                 double* work, lapack_int lwork );
05597 lapack_int LAPACKE_cgetri_work( int matrix_order, lapack_int n,
05598                                 lapack_complex_float* a, lapack_int lda,
05599                                 const lapack_int* ipiv,
05600                                 lapack_complex_float* work, lapack_int lwork );
05601 lapack_int LAPACKE_zgetri_work( int matrix_order, lapack_int n,
05602                                 lapack_complex_double* a, lapack_int lda,
05603                                 const lapack_int* ipiv,
05604                                 lapack_complex_double* work, lapack_int lwork );
05605 
05606 lapack_int LAPACKE_sgetrs_work( int matrix_order, char trans, lapack_int n,
05607                                 lapack_int nrhs, const float* a, lapack_int lda,
05608                                 const lapack_int* ipiv, float* b,
05609                                 lapack_int ldb );
05610 lapack_int LAPACKE_dgetrs_work( int matrix_order, char trans, lapack_int n,
05611                                 lapack_int nrhs, const double* a,
05612                                 lapack_int lda, const lapack_int* ipiv,
05613                                 double* b, lapack_int ldb );
05614 lapack_int LAPACKE_cgetrs_work( int matrix_order, char trans, lapack_int n,
05615                                 lapack_int nrhs, const lapack_complex_float* a,
05616                                 lapack_int lda, const lapack_int* ipiv,
05617                                 lapack_complex_float* b, lapack_int ldb );
05618 lapack_int LAPACKE_zgetrs_work( int matrix_order, char trans, lapack_int n,
05619                                 lapack_int nrhs, const lapack_complex_double* a,
05620                                 lapack_int lda, const lapack_int* ipiv,
05621                                 lapack_complex_double* b, lapack_int ldb );
05622 
05623 lapack_int LAPACKE_sggbak_work( int matrix_order, char job, char side,
05624                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05625                                 const float* lscale, const float* rscale,
05626                                 lapack_int m, float* v, lapack_int ldv );
05627 lapack_int LAPACKE_dggbak_work( int matrix_order, char job, char side,
05628                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05629                                 const double* lscale, const double* rscale,
05630                                 lapack_int m, double* v, lapack_int ldv );
05631 lapack_int LAPACKE_cggbak_work( int matrix_order, char job, char side,
05632                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05633                                 const float* lscale, const float* rscale,
05634                                 lapack_int m, lapack_complex_float* v,
05635                                 lapack_int ldv );
05636 lapack_int LAPACKE_zggbak_work( int matrix_order, char job, char side,
05637                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05638                                 const double* lscale, const double* rscale,
05639                                 lapack_int m, lapack_complex_double* v,
05640                                 lapack_int ldv );
05641 
05642 lapack_int LAPACKE_sggbal_work( int matrix_order, char job, lapack_int n,
05643                                 float* a, lapack_int lda, float* b,
05644                                 lapack_int ldb, lapack_int* ilo,
05645                                 lapack_int* ihi, float* lscale, float* rscale,
05646                                 float* work );
05647 lapack_int LAPACKE_dggbal_work( int matrix_order, char job, lapack_int n,
05648                                 double* a, lapack_int lda, double* b,
05649                                 lapack_int ldb, lapack_int* ilo,
05650                                 lapack_int* ihi, double* lscale, double* rscale,
05651                                 double* work );
05652 lapack_int LAPACKE_cggbal_work( int matrix_order, char job, lapack_int n,
05653                                 lapack_complex_float* a, lapack_int lda,
05654                                 lapack_complex_float* b, lapack_int ldb,
05655                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
05656                                 float* rscale, float* work );
05657 lapack_int LAPACKE_zggbal_work( int matrix_order, char job, lapack_int n,
05658                                 lapack_complex_double* a, lapack_int lda,
05659                                 lapack_complex_double* b, lapack_int ldb,
05660                                 lapack_int* ilo, lapack_int* ihi,
05661                                 double* lscale, double* rscale, double* work );
05662 
05663 lapack_int LAPACKE_sgges_work( int matrix_order, char jobvsl, char jobvsr,
05664                                char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
05665                                float* a, lapack_int lda, float* b,
05666                                lapack_int ldb, lapack_int* sdim, float* alphar,
05667                                float* alphai, float* beta, float* vsl,
05668                                lapack_int ldvsl, float* vsr, lapack_int ldvsr,
05669                                float* work, lapack_int lwork,
05670                                lapack_logical* bwork );
05671 lapack_int LAPACKE_dgges_work( int matrix_order, char jobvsl, char jobvsr,
05672                                char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
05673                                double* a, lapack_int lda, double* b,
05674                                lapack_int ldb, lapack_int* sdim, double* alphar,
05675                                double* alphai, double* beta, double* vsl,
05676                                lapack_int ldvsl, double* vsr, lapack_int ldvsr,
05677                                double* work, lapack_int lwork,
05678                                lapack_logical* bwork );
05679 lapack_int LAPACKE_cgges_work( int matrix_order, char jobvsl, char jobvsr,
05680                                char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
05681                                lapack_complex_float* a, lapack_int lda,
05682                                lapack_complex_float* b, lapack_int ldb,
05683                                lapack_int* sdim, lapack_complex_float* alpha,
05684                                lapack_complex_float* beta,
05685                                lapack_complex_float* vsl, lapack_int ldvsl,
05686                                lapack_complex_float* vsr, lapack_int ldvsr,
05687                                lapack_complex_float* work, lapack_int lwork,
05688                                float* rwork, lapack_logical* bwork );
05689 lapack_int LAPACKE_zgges_work( int matrix_order, char jobvsl, char jobvsr,
05690                                char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
05691                                lapack_complex_double* a, lapack_int lda,
05692                                lapack_complex_double* b, lapack_int ldb,
05693                                lapack_int* sdim, lapack_complex_double* alpha,
05694                                lapack_complex_double* beta,
05695                                lapack_complex_double* vsl, lapack_int ldvsl,
05696                                lapack_complex_double* vsr, lapack_int ldvsr,
05697                                lapack_complex_double* work, lapack_int lwork,
05698                                double* rwork, lapack_logical* bwork );
05699 
05700 lapack_int LAPACKE_sggesx_work( int matrix_order, char jobvsl, char jobvsr,
05701                                 char sort, LAPACK_S_SELECT3 selctg, char sense,
05702                                 lapack_int n, float* a, lapack_int lda,
05703                                 float* b, lapack_int ldb, lapack_int* sdim,
05704                                 float* alphar, float* alphai, float* beta,
05705                                 float* vsl, lapack_int ldvsl, float* vsr,
05706                                 lapack_int ldvsr, float* rconde, float* rcondv,
05707                                 float* work, lapack_int lwork,
05708                                 lapack_int* iwork, lapack_int liwork,
05709                                 lapack_logical* bwork );
05710 lapack_int LAPACKE_dggesx_work( int matrix_order, char jobvsl, char jobvsr,
05711                                 char sort, LAPACK_D_SELECT3 selctg, char sense,
05712                                 lapack_int n, double* a, lapack_int lda,
05713                                 double* b, lapack_int ldb, lapack_int* sdim,
05714                                 double* alphar, double* alphai, double* beta,
05715                                 double* vsl, lapack_int ldvsl, double* vsr,
05716                                 lapack_int ldvsr, double* rconde,
05717                                 double* rcondv, double* work, lapack_int lwork,
05718                                 lapack_int* iwork, lapack_int liwork,
05719                                 lapack_logical* bwork );
05720 lapack_int LAPACKE_cggesx_work( int matrix_order, char jobvsl, char jobvsr,
05721                                 char sort, LAPACK_C_SELECT2 selctg, char sense,
05722                                 lapack_int n, lapack_complex_float* a,
05723                                 lapack_int lda, lapack_complex_float* b,
05724                                 lapack_int ldb, lapack_int* sdim,
05725                                 lapack_complex_float* alpha,
05726                                 lapack_complex_float* beta,
05727                                 lapack_complex_float* vsl, lapack_int ldvsl,
05728                                 lapack_complex_float* vsr, lapack_int ldvsr,
05729                                 float* rconde, float* rcondv,
05730                                 lapack_complex_float* work, lapack_int lwork,
05731                                 float* rwork, lapack_int* iwork,
05732                                 lapack_int liwork, lapack_logical* bwork );
05733 lapack_int LAPACKE_zggesx_work( int matrix_order, char jobvsl, char jobvsr,
05734                                 char sort, LAPACK_Z_SELECT2 selctg, char sense,
05735                                 lapack_int n, lapack_complex_double* a,
05736                                 lapack_int lda, lapack_complex_double* b,
05737                                 lapack_int ldb, lapack_int* sdim,
05738                                 lapack_complex_double* alpha,
05739                                 lapack_complex_double* beta,
05740                                 lapack_complex_double* vsl, lapack_int ldvsl,
05741                                 lapack_complex_double* vsr, lapack_int ldvsr,
05742                                 double* rconde, double* rcondv,
05743                                 lapack_complex_double* work, lapack_int lwork,
05744                                 double* rwork, lapack_int* iwork,
05745                                 lapack_int liwork, lapack_logical* bwork );
05746 
05747 lapack_int LAPACKE_sggev_work( int matrix_order, char jobvl, char jobvr,
05748                                lapack_int n, float* a, lapack_int lda, float* b,
05749                                lapack_int ldb, float* alphar, float* alphai,
05750                                float* beta, float* vl, lapack_int ldvl,
05751                                float* vr, lapack_int ldvr, float* work,
05752                                lapack_int lwork );
05753 lapack_int LAPACKE_dggev_work( int matrix_order, char jobvl, char jobvr,
05754                                lapack_int n, double* a, lapack_int lda,
05755                                double* b, lapack_int ldb, double* alphar,
05756                                double* alphai, double* beta, double* vl,
05757                                lapack_int ldvl, double* vr, lapack_int ldvr,
05758                                double* work, lapack_int lwork );
05759 lapack_int LAPACKE_cggev_work( int matrix_order, char jobvl, char jobvr,
05760                                lapack_int n, lapack_complex_float* a,
05761                                lapack_int lda, lapack_complex_float* b,
05762                                lapack_int ldb, lapack_complex_float* alpha,
05763                                lapack_complex_float* beta,
05764                                lapack_complex_float* vl, lapack_int ldvl,
05765                                lapack_complex_float* vr, lapack_int ldvr,
05766                                lapack_complex_float* work, lapack_int lwork,
05767                                float* rwork );
05768 lapack_int LAPACKE_zggev_work( int matrix_order, char jobvl, char jobvr,
05769                                lapack_int n, lapack_complex_double* a,
05770                                lapack_int lda, lapack_complex_double* b,
05771                                lapack_int ldb, lapack_complex_double* alpha,
05772                                lapack_complex_double* beta,
05773                                lapack_complex_double* vl, lapack_int ldvl,
05774                                lapack_complex_double* vr, lapack_int ldvr,
05775                                lapack_complex_double* work, lapack_int lwork,
05776                                double* rwork );
05777 
05778 lapack_int LAPACKE_sggevx_work( int matrix_order, char balanc, char jobvl,
05779                                 char jobvr, char sense, lapack_int n, float* a,
05780                                 lapack_int lda, float* b, lapack_int ldb,
05781                                 float* alphar, float* alphai, float* beta,
05782                                 float* vl, lapack_int ldvl, float* vr,
05783                                 lapack_int ldvr, lapack_int* ilo,
05784                                 lapack_int* ihi, float* lscale, float* rscale,
05785                                 float* abnrm, float* bbnrm, float* rconde,
05786                                 float* rcondv, float* work, lapack_int lwork,
05787                                 lapack_int* iwork, lapack_logical* bwork );
05788 lapack_int LAPACKE_dggevx_work( int matrix_order, char balanc, char jobvl,
05789                                 char jobvr, char sense, lapack_int n, double* a,
05790                                 lapack_int lda, double* b, lapack_int ldb,
05791                                 double* alphar, double* alphai, double* beta,
05792                                 double* vl, lapack_int ldvl, double* vr,
05793                                 lapack_int ldvr, lapack_int* ilo,
05794                                 lapack_int* ihi, double* lscale, double* rscale,
05795                                 double* abnrm, double* bbnrm, double* rconde,
05796                                 double* rcondv, double* work, lapack_int lwork,
05797                                 lapack_int* iwork, lapack_logical* bwork );
05798 lapack_int LAPACKE_cggevx_work( int matrix_order, char balanc, char jobvl,
05799                                 char jobvr, char sense, lapack_int n,
05800                                 lapack_complex_float* a, lapack_int lda,
05801                                 lapack_complex_float* b, lapack_int ldb,
05802                                 lapack_complex_float* alpha,
05803                                 lapack_complex_float* beta,
05804                                 lapack_complex_float* vl, lapack_int ldvl,
05805                                 lapack_complex_float* vr, lapack_int ldvr,
05806                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
05807                                 float* rscale, float* abnrm, float* bbnrm,
05808                                 float* rconde, float* rcondv,
05809                                 lapack_complex_float* work, lapack_int lwork,
05810                                 float* rwork, lapack_int* iwork,
05811                                 lapack_logical* bwork );
05812 lapack_int LAPACKE_zggevx_work( int matrix_order, char balanc, char jobvl,
05813                                 char jobvr, char sense, lapack_int n,
05814                                 lapack_complex_double* a, lapack_int lda,
05815                                 lapack_complex_double* b, lapack_int ldb,
05816                                 lapack_complex_double* alpha,
05817                                 lapack_complex_double* beta,
05818                                 lapack_complex_double* vl, lapack_int ldvl,
05819                                 lapack_complex_double* vr, lapack_int ldvr,
05820                                 lapack_int* ilo, lapack_int* ihi,
05821                                 double* lscale, double* rscale, double* abnrm,
05822                                 double* bbnrm, double* rconde, double* rcondv,
05823                                 lapack_complex_double* work, lapack_int lwork,
05824                                 double* rwork, lapack_int* iwork,
05825                                 lapack_logical* bwork );
05826 
05827 lapack_int LAPACKE_sggglm_work( int matrix_order, lapack_int n, lapack_int m,
05828                                 lapack_int p, float* a, lapack_int lda,
05829                                 float* b, lapack_int ldb, float* d, float* x,
05830                                 float* y, float* work, lapack_int lwork );
05831 lapack_int LAPACKE_dggglm_work( int matrix_order, lapack_int n, lapack_int m,
05832                                 lapack_int p, double* a, lapack_int lda,
05833                                 double* b, lapack_int ldb, double* d, double* x,
05834                                 double* y, double* work, lapack_int lwork );
05835 lapack_int LAPACKE_cggglm_work( int matrix_order, lapack_int n, lapack_int m,
05836                                 lapack_int p, lapack_complex_float* a,
05837                                 lapack_int lda, lapack_complex_float* b,
05838                                 lapack_int ldb, lapack_complex_float* d,
05839                                 lapack_complex_float* x,
05840                                 lapack_complex_float* y,
05841                                 lapack_complex_float* work, lapack_int lwork );
05842 lapack_int LAPACKE_zggglm_work( int matrix_order, lapack_int n, lapack_int m,
05843                                 lapack_int p, lapack_complex_double* a,
05844                                 lapack_int lda, lapack_complex_double* b,
05845                                 lapack_int ldb, lapack_complex_double* d,
05846                                 lapack_complex_double* x,
05847                                 lapack_complex_double* y,
05848                                 lapack_complex_double* work, lapack_int lwork );
05849 
05850 lapack_int LAPACKE_sgghrd_work( int matrix_order, char compq, char compz,
05851                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05852                                 float* a, lapack_int lda, float* b,
05853                                 lapack_int ldb, float* q, lapack_int ldq,
05854                                 float* z, lapack_int ldz );
05855 lapack_int LAPACKE_dgghrd_work( int matrix_order, char compq, char compz,
05856                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05857                                 double* a, lapack_int lda, double* b,
05858                                 lapack_int ldb, double* q, lapack_int ldq,
05859                                 double* z, lapack_int ldz );
05860 lapack_int LAPACKE_cgghrd_work( int matrix_order, char compq, char compz,
05861                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05862                                 lapack_complex_float* a, lapack_int lda,
05863                                 lapack_complex_float* b, lapack_int ldb,
05864                                 lapack_complex_float* q, lapack_int ldq,
05865                                 lapack_complex_float* z, lapack_int ldz );
05866 lapack_int LAPACKE_zgghrd_work( int matrix_order, char compq, char compz,
05867                                 lapack_int n, lapack_int ilo, lapack_int ihi,
05868                                 lapack_complex_double* a, lapack_int lda,
05869                                 lapack_complex_double* b, lapack_int ldb,
05870                                 lapack_complex_double* q, lapack_int ldq,
05871                                 lapack_complex_double* z, lapack_int ldz );
05872 
05873 lapack_int LAPACKE_sgglse_work( int matrix_order, lapack_int m, lapack_int n,
05874                                 lapack_int p, float* a, lapack_int lda,
05875                                 float* b, lapack_int ldb, float* c, float* d,
05876                                 float* x, float* work, lapack_int lwork );
05877 lapack_int LAPACKE_dgglse_work( int matrix_order, lapack_int m, lapack_int n,
05878                                 lapack_int p, double* a, lapack_int lda,
05879                                 double* b, lapack_int ldb, double* c, double* d,
05880                                 double* x, double* work, lapack_int lwork );
05881 lapack_int LAPACKE_cgglse_work( int matrix_order, lapack_int m, lapack_int n,
05882                                 lapack_int p, lapack_complex_float* a,
05883                                 lapack_int lda, lapack_complex_float* b,
05884                                 lapack_int ldb, lapack_complex_float* c,
05885                                 lapack_complex_float* d,
05886                                 lapack_complex_float* x,
05887                                 lapack_complex_float* work, lapack_int lwork );
05888 lapack_int LAPACKE_zgglse_work( int matrix_order, lapack_int m, lapack_int n,
05889                                 lapack_int p, lapack_complex_double* a,
05890                                 lapack_int lda, lapack_complex_double* b,
05891                                 lapack_int ldb, lapack_complex_double* c,
05892                                 lapack_complex_double* d,
05893                                 lapack_complex_double* x,
05894                                 lapack_complex_double* work, lapack_int lwork );
05895 
05896 lapack_int LAPACKE_sggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05897                                 lapack_int p, float* a, lapack_int lda,
05898                                 float* taua, float* b, lapack_int ldb,
05899                                 float* taub, float* work, lapack_int lwork );
05900 lapack_int LAPACKE_dggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05901                                 lapack_int p, double* a, lapack_int lda,
05902                                 double* taua, double* b, lapack_int ldb,
05903                                 double* taub, double* work, lapack_int lwork );
05904 lapack_int LAPACKE_cggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05905                                 lapack_int p, lapack_complex_float* a,
05906                                 lapack_int lda, lapack_complex_float* taua,
05907                                 lapack_complex_float* b, lapack_int ldb,
05908                                 lapack_complex_float* taub,
05909                                 lapack_complex_float* work, lapack_int lwork );
05910 lapack_int LAPACKE_zggqrf_work( int matrix_order, lapack_int n, lapack_int m,
05911                                 lapack_int p, lapack_complex_double* a,
05912                                 lapack_int lda, lapack_complex_double* taua,
05913                                 lapack_complex_double* b, lapack_int ldb,
05914                                 lapack_complex_double* taub,
05915                                 lapack_complex_double* work, lapack_int lwork );
05916 
05917 lapack_int LAPACKE_sggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05918                                 lapack_int n, float* a, lapack_int lda,
05919                                 float* taua, float* b, lapack_int ldb,
05920                                 float* taub, float* work, lapack_int lwork );
05921 lapack_int LAPACKE_dggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05922                                 lapack_int n, double* a, lapack_int lda,
05923                                 double* taua, double* b, lapack_int ldb,
05924                                 double* taub, double* work, lapack_int lwork );
05925 lapack_int LAPACKE_cggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05926                                 lapack_int n, lapack_complex_float* a,
05927                                 lapack_int lda, lapack_complex_float* taua,
05928                                 lapack_complex_float* b, lapack_int ldb,
05929                                 lapack_complex_float* taub,
05930                                 lapack_complex_float* work, lapack_int lwork );
05931 lapack_int LAPACKE_zggrqf_work( int matrix_order, lapack_int m, lapack_int p,
05932                                 lapack_int n, lapack_complex_double* a,
05933                                 lapack_int lda, lapack_complex_double* taua,
05934                                 lapack_complex_double* b, lapack_int ldb,
05935                                 lapack_complex_double* taub,
05936                                 lapack_complex_double* work, lapack_int lwork );
05937 
05938 lapack_int LAPACKE_sggsvd_work( int matrix_order, char jobu, char jobv,
05939                                 char jobq, lapack_int m, lapack_int n,
05940                                 lapack_int p, lapack_int* k, lapack_int* l,
05941                                 float* a, lapack_int lda, float* b,
05942                                 lapack_int ldb, float* alpha, float* beta,
05943                                 float* u, lapack_int ldu, float* v,
05944                                 lapack_int ldv, float* q, lapack_int ldq,
05945                                 float* work, lapack_int* iwork );
05946 lapack_int LAPACKE_dggsvd_work( int matrix_order, char jobu, char jobv,
05947                                 char jobq, lapack_int m, lapack_int n,
05948                                 lapack_int p, lapack_int* k, lapack_int* l,
05949                                 double* a, lapack_int lda, double* b,
05950                                 lapack_int ldb, double* alpha, double* beta,
05951                                 double* u, lapack_int ldu, double* v,
05952                                 lapack_int ldv, double* q, lapack_int ldq,
05953                                 double* work, lapack_int* iwork );
05954 lapack_int LAPACKE_cggsvd_work( int matrix_order, char jobu, char jobv,
05955                                 char jobq, lapack_int m, lapack_int n,
05956                                 lapack_int p, lapack_int* k, lapack_int* l,
05957                                 lapack_complex_float* a, lapack_int lda,
05958                                 lapack_complex_float* b, lapack_int ldb,
05959                                 float* alpha, float* beta,
05960                                 lapack_complex_float* u, lapack_int ldu,
05961                                 lapack_complex_float* v, lapack_int ldv,
05962                                 lapack_complex_float* q, lapack_int ldq,
05963                                 lapack_complex_float* work, float* rwork,
05964                                 lapack_int* iwork );
05965 lapack_int LAPACKE_zggsvd_work( int matrix_order, char jobu, char jobv,
05966                                 char jobq, lapack_int m, lapack_int n,
05967                                 lapack_int p, lapack_int* k, lapack_int* l,
05968                                 lapack_complex_double* a, lapack_int lda,
05969                                 lapack_complex_double* b, lapack_int ldb,
05970                                 double* alpha, double* beta,
05971                                 lapack_complex_double* u, lapack_int ldu,
05972                                 lapack_complex_double* v, lapack_int ldv,
05973                                 lapack_complex_double* q, lapack_int ldq,
05974                                 lapack_complex_double* work, double* rwork,
05975                                 lapack_int* iwork );
05976 
05977 lapack_int LAPACKE_sggsvp_work( int matrix_order, char jobu, char jobv,
05978                                 char jobq, lapack_int m, lapack_int p,
05979                                 lapack_int n, float* a, lapack_int lda,
05980                                 float* b, lapack_int ldb, float tola,
05981                                 float tolb, lapack_int* k, lapack_int* l,
05982                                 float* u, lapack_int ldu, float* v,
05983                                 lapack_int ldv, float* q, lapack_int ldq,
05984                                 lapack_int* iwork, float* tau, float* work );
05985 lapack_int LAPACKE_dggsvp_work( int matrix_order, char jobu, char jobv,
05986                                 char jobq, lapack_int m, lapack_int p,
05987                                 lapack_int n, double* a, lapack_int lda,
05988                                 double* b, lapack_int ldb, double tola,
05989                                 double tolb, lapack_int* k, lapack_int* l,
05990                                 double* u, lapack_int ldu, double* v,
05991                                 lapack_int ldv, double* q, lapack_int ldq,
05992                                 lapack_int* iwork, double* tau, double* work );
05993 lapack_int LAPACKE_cggsvp_work( int matrix_order, char jobu, char jobv,
05994                                 char jobq, lapack_int m, lapack_int p,
05995                                 lapack_int n, lapack_complex_float* a,
05996                                 lapack_int lda, lapack_complex_float* b,
05997                                 lapack_int ldb, float tola, float tolb,
05998                                 lapack_int* k, lapack_int* l,
05999                                 lapack_complex_float* u, lapack_int ldu,
06000                                 lapack_complex_float* v, lapack_int ldv,
06001                                 lapack_complex_float* q, lapack_int ldq,
06002                                 lapack_int* iwork, float* rwork,
06003                                 lapack_complex_float* tau,
06004                                 lapack_complex_float* work );
06005 lapack_int LAPACKE_zggsvp_work( int matrix_order, char jobu, char jobv,
06006                                 char jobq, lapack_int m, lapack_int p,
06007                                 lapack_int n, lapack_complex_double* a,
06008                                 lapack_int lda, lapack_complex_double* b,
06009                                 lapack_int ldb, double tola, double tolb,
06010                                 lapack_int* k, lapack_int* l,
06011                                 lapack_complex_double* u, lapack_int ldu,
06012                                 lapack_complex_double* v, lapack_int ldv,
06013                                 lapack_complex_double* q, lapack_int ldq,
06014                                 lapack_int* iwork, double* rwork,
06015                                 lapack_complex_double* tau,
06016                                 lapack_complex_double* work );
06017 
06018 lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
06019                                 const float* d, const float* du,
06020                                 const float* du2, const lapack_int* ipiv,
06021                                 float anorm, float* rcond, float* work,
06022                                 lapack_int* iwork );
06023 lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
06024                                 const double* d, const double* du,
06025                                 const double* du2, const lapack_int* ipiv,
06026                                 double anorm, double* rcond, double* work,
06027                                 lapack_int* iwork );
06028 lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
06029                                 const lapack_complex_float* dl,
06030                                 const lapack_complex_float* d,
06031                                 const lapack_complex_float* du,
06032                                 const lapack_complex_float* du2,
06033                                 const lapack_int* ipiv, float anorm,
06034                                 float* rcond, lapack_complex_float* work );
06035 lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
06036                                 const lapack_complex_double* dl,
06037                                 const lapack_complex_double* d,
06038                                 const lapack_complex_double* du,
06039                                 const lapack_complex_double* du2,
06040                                 const lapack_int* ipiv, double anorm,
06041                                 double* rcond, lapack_complex_double* work );
06042 
06043 lapack_int LAPACKE_sgtrfs_work( int matrix_order, char trans, lapack_int n,
06044                                 lapack_int nrhs, const float* dl,
06045                                 const float* d, const float* du,
06046                                 const float* dlf, const float* df,
06047                                 const float* duf, const float* du2,
06048                                 const lapack_int* ipiv, const float* b,
06049                                 lapack_int ldb, float* x, lapack_int ldx,
06050                                 float* ferr, float* berr, float* work,
06051                                 lapack_int* iwork );
06052 lapack_int LAPACKE_dgtrfs_work( int matrix_order, char trans, lapack_int n,
06053                                 lapack_int nrhs, const double* dl,
06054                                 const double* d, const double* du,
06055                                 const double* dlf, const double* df,
06056                                 const double* duf, const double* du2,
06057                                 const lapack_int* ipiv, const double* b,
06058                                 lapack_int ldb, double* x, lapack_int ldx,
06059                                 double* ferr, double* berr, double* work,
06060                                 lapack_int* iwork );
06061 lapack_int LAPACKE_cgtrfs_work( int matrix_order, char trans, lapack_int n,
06062                                 lapack_int nrhs, const lapack_complex_float* dl,
06063                                 const lapack_complex_float* d,
06064                                 const lapack_complex_float* du,
06065                                 const lapack_complex_float* dlf,
06066                                 const lapack_complex_float* df,
06067                                 const lapack_complex_float* duf,
06068                                 const lapack_complex_float* du2,
06069                                 const lapack_int* ipiv,
06070                                 const lapack_complex_float* b, lapack_int ldb,
06071                                 lapack_complex_float* x, lapack_int ldx,
06072                                 float* ferr, float* berr,
06073                                 lapack_complex_float* work, float* rwork );
06074 lapack_int LAPACKE_zgtrfs_work( int matrix_order, char trans, lapack_int n,
06075                                 lapack_int nrhs,
06076                                 const lapack_complex_double* dl,
06077                                 const lapack_complex_double* d,
06078                                 const lapack_complex_double* du,
06079                                 const lapack_complex_double* dlf,
06080                                 const lapack_complex_double* df,
06081                                 const lapack_complex_double* duf,
06082                                 const lapack_complex_double* du2,
06083                                 const lapack_int* ipiv,
06084                                 const lapack_complex_double* b, lapack_int ldb,
06085                                 lapack_complex_double* x, lapack_int ldx,
06086                                 double* ferr, double* berr,
06087                                 lapack_complex_double* work, double* rwork );
06088 
06089 lapack_int LAPACKE_sgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
06090                                float* dl, float* d, float* du, float* b,
06091                                lapack_int ldb );
06092 lapack_int LAPACKE_dgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
06093                                double* dl, double* d, double* du, double* b,
06094                                lapack_int ldb );
06095 lapack_int LAPACKE_cgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
06096                                lapack_complex_float* dl,
06097                                lapack_complex_float* d,
06098                                lapack_complex_float* du,
06099                                lapack_complex_float* b, lapack_int ldb );
06100 lapack_int LAPACKE_zgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
06101                                lapack_complex_double* dl,
06102                                lapack_complex_double* d,
06103                                lapack_complex_double* du,
06104                                lapack_complex_double* b, lapack_int ldb );
06105 
06106 lapack_int LAPACKE_sgtsvx_work( int matrix_order, char fact, char trans,
06107                                 lapack_int n, lapack_int nrhs, const float* dl,
06108                                 const float* d, const float* du, float* dlf,
06109                                 float* df, float* duf, float* du2,
06110                                 lapack_int* ipiv, const float* b,
06111                                 lapack_int ldb, float* x, lapack_int ldx,
06112                                 float* rcond, float* ferr, float* berr,
06113                                 float* work, lapack_int* iwork );
06114 lapack_int LAPACKE_dgtsvx_work( int matrix_order, char fact, char trans,
06115                                 lapack_int n, lapack_int nrhs, const double* dl,
06116                                 const double* d, const double* du, double* dlf,
06117                                 double* df, double* duf, double* du2,
06118                                 lapack_int* ipiv, const double* b,
06119                                 lapack_int ldb, double* x, lapack_int ldx,
06120                                 double* rcond, double* ferr, double* berr,
06121                                 double* work, lapack_int* iwork );
06122 lapack_int LAPACKE_cgtsvx_work( int matrix_order, char fact, char trans,
06123                                 lapack_int n, lapack_int nrhs,
06124                                 const lapack_complex_float* dl,
06125                                 const lapack_complex_float* d,
06126                                 const lapack_complex_float* du,
06127                                 lapack_complex_float* dlf,
06128                                 lapack_complex_float* df,
06129                                 lapack_complex_float* duf,
06130                                 lapack_complex_float* du2, lapack_int* ipiv,
06131                                 const lapack_complex_float* b, lapack_int ldb,
06132                                 lapack_complex_float* x, lapack_int ldx,
06133                                 float* rcond, float* ferr, float* berr,
06134                                 lapack_complex_float* work, float* rwork );
06135 lapack_int LAPACKE_zgtsvx_work( int matrix_order, char fact, char trans,
06136                                 lapack_int n, lapack_int nrhs,
06137                                 const lapack_complex_double* dl,
06138                                 const lapack_complex_double* d,
06139                                 const lapack_complex_double* du,
06140                                 lapack_complex_double* dlf,
06141                                 lapack_complex_double* df,
06142                                 lapack_complex_double* duf,
06143                                 lapack_complex_double* du2, lapack_int* ipiv,
06144                                 const lapack_complex_double* b, lapack_int ldb,
06145                                 lapack_complex_double* x, lapack_int ldx,
06146                                 double* rcond, double* ferr, double* berr,
06147                                 lapack_complex_double* work, double* rwork );
06148 
06149 lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
06150                                 float* du2, lapack_int* ipiv );
06151 lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
06152                                 double* du2, lapack_int* ipiv );
06153 lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
06154                                 lapack_complex_float* d,
06155                                 lapack_complex_float* du,
06156                                 lapack_complex_float* du2, lapack_int* ipiv );
06157 lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
06158                                 lapack_complex_double* d,
06159                                 lapack_complex_double* du,
06160                                 lapack_complex_double* du2, lapack_int* ipiv );
06161 
06162 lapack_int LAPACKE_sgttrs_work( int matrix_order, char trans, lapack_int n,
06163                                 lapack_int nrhs, const float* dl,
06164                                 const float* d, const float* du,
06165                                 const float* du2, const lapack_int* ipiv,
06166                                 float* b, lapack_int ldb );
06167 lapack_int LAPACKE_dgttrs_work( int matrix_order, char trans, lapack_int n,
06168                                 lapack_int nrhs, const double* dl,
06169                                 const double* d, const double* du,
06170                                 const double* du2, const lapack_int* ipiv,
06171                                 double* b, lapack_int ldb );
06172 lapack_int LAPACKE_cgttrs_work( int matrix_order, char trans, lapack_int n,
06173                                 lapack_int nrhs, const lapack_complex_float* dl,
06174                                 const lapack_complex_float* d,
06175                                 const lapack_complex_float* du,
06176                                 const lapack_complex_float* du2,
06177                                 const lapack_int* ipiv, lapack_complex_float* b,
06178                                 lapack_int ldb );
06179 lapack_int LAPACKE_zgttrs_work( int matrix_order, char trans, lapack_int n,
06180                                 lapack_int nrhs,
06181                                 const lapack_complex_double* dl,
06182                                 const lapack_complex_double* d,
06183                                 const lapack_complex_double* du,
06184                                 const lapack_complex_double* du2,
06185                                 const lapack_int* ipiv,
06186                                 lapack_complex_double* b, lapack_int ldb );
06187 
06188 lapack_int LAPACKE_chbev_work( int matrix_order, char jobz, char uplo,
06189                                lapack_int n, lapack_int kd,
06190                                lapack_complex_float* ab, lapack_int ldab,
06191                                float* w, lapack_complex_float* z,
06192                                lapack_int ldz, lapack_complex_float* work,
06193                                float* rwork );
06194 lapack_int LAPACKE_zhbev_work( int matrix_order, char jobz, char uplo,
06195                                lapack_int n, lapack_int kd,
06196                                lapack_complex_double* ab, lapack_int ldab,
06197                                double* w, lapack_complex_double* z,
06198                                lapack_int ldz, lapack_complex_double* work,
06199                                double* rwork );
06200 
06201 lapack_int LAPACKE_chbevd_work( int matrix_order, char jobz, char uplo,
06202                                 lapack_int n, lapack_int kd,
06203                                 lapack_complex_float* ab, lapack_int ldab,
06204                                 float* w, lapack_complex_float* z,
06205                                 lapack_int ldz, lapack_complex_float* work,
06206                                 lapack_int lwork, float* rwork,
06207                                 lapack_int lrwork, lapack_int* iwork,
06208                                 lapack_int liwork );
06209 lapack_int LAPACKE_zhbevd_work( int matrix_order, char jobz, char uplo,
06210                                 lapack_int n, lapack_int kd,
06211                                 lapack_complex_double* ab, lapack_int ldab,
06212                                 double* w, lapack_complex_double* z,
06213                                 lapack_int ldz, lapack_complex_double* work,
06214                                 lapack_int lwork, double* rwork,
06215                                 lapack_int lrwork, lapack_int* iwork,
06216                                 lapack_int liwork );
06217 
06218 lapack_int LAPACKE_chbevx_work( int matrix_order, char jobz, char range,
06219                                 char uplo, lapack_int n, lapack_int kd,
06220                                 lapack_complex_float* ab, lapack_int ldab,
06221                                 lapack_complex_float* q, lapack_int ldq,
06222                                 float vl, float vu, lapack_int il,
06223                                 lapack_int iu, float abstol, lapack_int* m,
06224                                 float* w, lapack_complex_float* z,
06225                                 lapack_int ldz, lapack_complex_float* work,
06226                                 float* rwork, lapack_int* iwork,
06227                                 lapack_int* ifail );
06228 lapack_int LAPACKE_zhbevx_work( int matrix_order, char jobz, char range,
06229                                 char uplo, lapack_int n, lapack_int kd,
06230                                 lapack_complex_double* ab, lapack_int ldab,
06231                                 lapack_complex_double* q, lapack_int ldq,
06232                                 double vl, double vu, lapack_int il,
06233                                 lapack_int iu, double abstol, lapack_int* m,
06234                                 double* w, lapack_complex_double* z,
06235                                 lapack_int ldz, lapack_complex_double* work,
06236                                 double* rwork, lapack_int* iwork,
06237                                 lapack_int* ifail );
06238 
06239 lapack_int LAPACKE_chbgst_work( int matrix_order, char vect, char uplo,
06240                                 lapack_int n, lapack_int ka, lapack_int kb,
06241                                 lapack_complex_float* ab, lapack_int ldab,
06242                                 const lapack_complex_float* bb, lapack_int ldbb,
06243                                 lapack_complex_float* x, lapack_int ldx,
06244                                 lapack_complex_float* work, float* rwork );
06245 lapack_int LAPACKE_zhbgst_work( int matrix_order, char vect, char uplo,
06246                                 lapack_int n, lapack_int ka, lapack_int kb,
06247                                 lapack_complex_double* ab, lapack_int ldab,
06248                                 const lapack_complex_double* bb,
06249                                 lapack_int ldbb, lapack_complex_double* x,
06250                                 lapack_int ldx, lapack_complex_double* work,
06251                                 double* rwork );
06252 
06253 lapack_int LAPACKE_chbgv_work( int matrix_order, char jobz, char uplo,
06254                                lapack_int n, lapack_int ka, lapack_int kb,
06255                                lapack_complex_float* ab, lapack_int ldab,
06256                                lapack_complex_float* bb, lapack_int ldbb,
06257                                float* w, lapack_complex_float* z,
06258                                lapack_int ldz, lapack_complex_float* work,
06259                                float* rwork );
06260 lapack_int LAPACKE_zhbgv_work( int matrix_order, char jobz, char uplo,
06261                                lapack_int n, lapack_int ka, lapack_int kb,
06262                                lapack_complex_double* ab, lapack_int ldab,
06263                                lapack_complex_double* bb, lapack_int ldbb,
06264                                double* w, lapack_complex_double* z,
06265                                lapack_int ldz, lapack_complex_double* work,
06266                                double* rwork );
06267 
06268 lapack_int LAPACKE_chbgvd_work( int matrix_order, char jobz, char uplo,
06269                                 lapack_int n, lapack_int ka, lapack_int kb,
06270                                 lapack_complex_float* ab, lapack_int ldab,
06271                                 lapack_complex_float* bb, lapack_int ldbb,
06272                                 float* w, lapack_complex_float* z,
06273                                 lapack_int ldz, lapack_complex_float* work,
06274                                 lapack_int lwork, float* rwork,
06275                                 lapack_int lrwork, lapack_int* iwork,
06276                                 lapack_int liwork );
06277 lapack_int LAPACKE_zhbgvd_work( int matrix_order, char jobz, char uplo,
06278                                 lapack_int n, lapack_int ka, lapack_int kb,
06279                                 lapack_complex_double* ab, lapack_int ldab,
06280                                 lapack_complex_double* bb, lapack_int ldbb,
06281                                 double* w, lapack_complex_double* z,
06282                                 lapack_int ldz, lapack_complex_double* work,
06283                                 lapack_int lwork, double* rwork,
06284                                 lapack_int lrwork, lapack_int* iwork,
06285                                 lapack_int liwork );
06286 
06287 lapack_int LAPACKE_chbgvx_work( int matrix_order, char jobz, char range,
06288                                 char uplo, lapack_int n, lapack_int ka,
06289                                 lapack_int kb, lapack_complex_float* ab,
06290                                 lapack_int ldab, lapack_complex_float* bb,
06291                                 lapack_int ldbb, lapack_complex_float* q,
06292                                 lapack_int ldq, float vl, float vu,
06293                                 lapack_int il, lapack_int iu, float abstol,
06294                                 lapack_int* m, float* w,
06295                                 lapack_complex_float* z, lapack_int ldz,
06296                                 lapack_complex_float* work, float* rwork,
06297                                 lapack_int* iwork, lapack_int* ifail );
06298 lapack_int LAPACKE_zhbgvx_work( int matrix_order, char jobz, char range,
06299                                 char uplo, lapack_int n, lapack_int ka,
06300                                 lapack_int kb, lapack_complex_double* ab,
06301                                 lapack_int ldab, lapack_complex_double* bb,
06302                                 lapack_int ldbb, lapack_complex_double* q,
06303                                 lapack_int ldq, double vl, double vu,
06304                                 lapack_int il, lapack_int iu, double abstol,
06305                                 lapack_int* m, double* w,
06306                                 lapack_complex_double* z, lapack_int ldz,
06307                                 lapack_complex_double* work, double* rwork,
06308                                 lapack_int* iwork, lapack_int* ifail );
06309 
06310 lapack_int LAPACKE_chbtrd_work( int matrix_order, char vect, char uplo,
06311                                 lapack_int n, lapack_int kd,
06312                                 lapack_complex_float* ab, lapack_int ldab,
06313                                 float* d, float* e, lapack_complex_float* q,
06314                                 lapack_int ldq, lapack_complex_float* work );
06315 lapack_int LAPACKE_zhbtrd_work( int matrix_order, char vect, char uplo,
06316                                 lapack_int n, lapack_int kd,
06317                                 lapack_complex_double* ab, lapack_int ldab,
06318                                 double* d, double* e, lapack_complex_double* q,
06319                                 lapack_int ldq, lapack_complex_double* work );
06320 
06321 lapack_int LAPACKE_checon_work( int matrix_order, char uplo, lapack_int n,
06322                                 const lapack_complex_float* a, lapack_int lda,
06323                                 const lapack_int* ipiv, float anorm,
06324                                 float* rcond, lapack_complex_float* work );
06325 lapack_int LAPACKE_zhecon_work( int matrix_order, char uplo, lapack_int n,
06326                                 const lapack_complex_double* a, lapack_int lda,
06327                                 const lapack_int* ipiv, double anorm,
06328                                 double* rcond, lapack_complex_double* work );
06329 
06330 lapack_int LAPACKE_cheequb_work( int matrix_order, char uplo, lapack_int n,
06331                                  const lapack_complex_float* a, lapack_int lda,
06332                                  float* s, float* scond, float* amax,
06333                                  lapack_complex_float* work );
06334 lapack_int LAPACKE_zheequb_work( int matrix_order, char uplo, lapack_int n,
06335                                  const lapack_complex_double* a, lapack_int lda,
06336                                  double* s, double* scond, double* amax,
06337                                  lapack_complex_double* work );
06338 
06339 lapack_int LAPACKE_cheev_work( int matrix_order, char jobz, char uplo,
06340                                lapack_int n, lapack_complex_float* a,
06341                                lapack_int lda, float* w,
06342                                lapack_complex_float* work, lapack_int lwork,
06343                                float* rwork );
06344 lapack_int LAPACKE_zheev_work( int matrix_order, char jobz, char uplo,
06345                                lapack_int n, lapack_complex_double* a,
06346                                lapack_int lda, double* w,
06347                                lapack_complex_double* work, lapack_int lwork,
06348                                double* rwork );
06349 
06350 lapack_int LAPACKE_cheevd_work( int matrix_order, char jobz, char uplo,
06351                                 lapack_int n, lapack_complex_float* a,
06352                                 lapack_int lda, float* w,
06353                                 lapack_complex_float* work, lapack_int lwork,
06354                                 float* rwork, lapack_int lrwork,
06355                                 lapack_int* iwork, lapack_int liwork );
06356 lapack_int LAPACKE_zheevd_work( int matrix_order, char jobz, char uplo,
06357                                 lapack_int n, lapack_complex_double* a,
06358                                 lapack_int lda, double* w,
06359                                 lapack_complex_double* work, lapack_int lwork,
06360                                 double* rwork, lapack_int lrwork,
06361                                 lapack_int* iwork, lapack_int liwork );
06362 
06363 lapack_int LAPACKE_cheevr_work( int matrix_order, char jobz, char range,
06364                                 char uplo, lapack_int n,
06365                                 lapack_complex_float* a, lapack_int lda,
06366                                 float vl, float vu, lapack_int il,
06367                                 lapack_int iu, float abstol, lapack_int* m,
06368                                 float* w, lapack_complex_float* z,
06369                                 lapack_int ldz, lapack_int* isuppz,
06370                                 lapack_complex_float* work, lapack_int lwork,
06371                                 float* rwork, lapack_int lrwork,
06372                                 lapack_int* iwork, lapack_int liwork );
06373 lapack_int LAPACKE_zheevr_work( int matrix_order, char jobz, char range,
06374                                 char uplo, lapack_int n,
06375                                 lapack_complex_double* a, lapack_int lda,
06376                                 double vl, double vu, lapack_int il,
06377                                 lapack_int iu, double abstol, lapack_int* m,
06378                                 double* w, lapack_complex_double* z,
06379                                 lapack_int ldz, lapack_int* isuppz,
06380                                 lapack_complex_double* work, lapack_int lwork,
06381                                 double* rwork, lapack_int lrwork,
06382                                 lapack_int* iwork, lapack_int liwork );
06383 
06384 lapack_int LAPACKE_cheevx_work( int matrix_order, char jobz, char range,
06385                                 char uplo, lapack_int n,
06386                                 lapack_complex_float* a, lapack_int lda,
06387                                 float vl, float vu, lapack_int il,
06388                                 lapack_int iu, float abstol, lapack_int* m,
06389                                 float* w, lapack_complex_float* z,
06390                                 lapack_int ldz, lapack_complex_float* work,
06391                                 lapack_int lwork, float* rwork,
06392                                 lapack_int* iwork, lapack_int* ifail );
06393 lapack_int LAPACKE_zheevx_work( int matrix_order, char jobz, char range,
06394                                 char uplo, lapack_int n,
06395                                 lapack_complex_double* a, lapack_int lda,
06396                                 double vl, double vu, lapack_int il,
06397                                 lapack_int iu, double abstol, lapack_int* m,
06398                                 double* w, lapack_complex_double* z,
06399                                 lapack_int ldz, lapack_complex_double* work,
06400                                 lapack_int lwork, double* rwork,
06401                                 lapack_int* iwork, lapack_int* ifail );
06402 
06403 lapack_int LAPACKE_chegst_work( int matrix_order, lapack_int itype, char uplo,
06404                                 lapack_int n, lapack_complex_float* a,
06405                                 lapack_int lda, const lapack_complex_float* b,
06406                                 lapack_int ldb );
06407 lapack_int LAPACKE_zhegst_work( int matrix_order, lapack_int itype, char uplo,
06408                                 lapack_int n, lapack_complex_double* a,
06409                                 lapack_int lda, const lapack_complex_double* b,
06410                                 lapack_int ldb );
06411 
06412 lapack_int LAPACKE_chegv_work( int matrix_order, lapack_int itype, char jobz,
06413                                char uplo, lapack_int n, lapack_complex_float* a,
06414                                lapack_int lda, lapack_complex_float* b,
06415                                lapack_int ldb, float* w,
06416                                lapack_complex_float* work, lapack_int lwork,
06417                                float* rwork );
06418 lapack_int LAPACKE_zhegv_work( int matrix_order, lapack_int itype, char jobz,
06419                                char uplo, lapack_int n,
06420                                lapack_complex_double* a, lapack_int lda,
06421                                lapack_complex_double* b, lapack_int ldb,
06422                                double* w, lapack_complex_double* work,
06423                                lapack_int lwork, double* rwork );
06424 
06425 lapack_int LAPACKE_chegvd_work( int matrix_order, lapack_int itype, char jobz,
06426                                 char uplo, lapack_int n,
06427                                 lapack_complex_float* a, lapack_int lda,
06428                                 lapack_complex_float* b, lapack_int ldb,
06429                                 float* w, lapack_complex_float* work,
06430                                 lapack_int lwork, float* rwork,
06431                                 lapack_int lrwork, lapack_int* iwork,
06432                                 lapack_int liwork );
06433 lapack_int LAPACKE_zhegvd_work( int matrix_order, lapack_int itype, char jobz,
06434                                 char uplo, lapack_int n,
06435                                 lapack_complex_double* a, lapack_int lda,
06436                                 lapack_complex_double* b, lapack_int ldb,
06437                                 double* w, lapack_complex_double* work,
06438                                 lapack_int lwork, double* rwork,
06439                                 lapack_int lrwork, lapack_int* iwork,
06440                                 lapack_int liwork );
06441 
06442 lapack_int LAPACKE_chegvx_work( int matrix_order, lapack_int itype, char jobz,
06443                                 char range, char uplo, lapack_int n,
06444                                 lapack_complex_float* a, lapack_int lda,
06445                                 lapack_complex_float* b, lapack_int ldb,
06446                                 float vl, float vu, lapack_int il,
06447                                 lapack_int iu, float abstol, lapack_int* m,
06448                                 float* w, lapack_complex_float* z,
06449                                 lapack_int ldz, lapack_complex_float* work,
06450                                 lapack_int lwork, float* rwork,
06451                                 lapack_int* iwork, lapack_int* ifail );
06452 lapack_int LAPACKE_zhegvx_work( int matrix_order, lapack_int itype, char jobz,
06453                                 char range, char uplo, lapack_int n,
06454                                 lapack_complex_double* a, lapack_int lda,
06455                                 lapack_complex_double* b, lapack_int ldb,
06456                                 double vl, double vu, lapack_int il,
06457                                 lapack_int iu, double abstol, lapack_int* m,
06458                                 double* w, lapack_complex_double* z,
06459                                 lapack_int ldz, lapack_complex_double* work,
06460                                 lapack_int lwork, double* rwork,
06461                                 lapack_int* iwork, lapack_int* ifail );
06462 
06463 lapack_int LAPACKE_cherfs_work( int matrix_order, char uplo, lapack_int n,
06464                                 lapack_int nrhs, const lapack_complex_float* a,
06465                                 lapack_int lda, const lapack_complex_float* af,
06466                                 lapack_int ldaf, const lapack_int* ipiv,
06467                                 const lapack_complex_float* b, lapack_int ldb,
06468                                 lapack_complex_float* x, lapack_int ldx,
06469                                 float* ferr, float* berr,
06470                                 lapack_complex_float* work, float* rwork );
06471 lapack_int LAPACKE_zherfs_work( int matrix_order, char uplo, lapack_int n,
06472                                 lapack_int nrhs, const lapack_complex_double* a,
06473                                 lapack_int lda, const lapack_complex_double* af,
06474                                 lapack_int ldaf, const lapack_int* ipiv,
06475                                 const lapack_complex_double* b, lapack_int ldb,
06476                                 lapack_complex_double* x, lapack_int ldx,
06477                                 double* ferr, double* berr,
06478                                 lapack_complex_double* work, double* rwork );
06479 
06480 lapack_int LAPACKE_cherfsx_work( int matrix_order, char uplo, char equed,
06481                                  lapack_int n, lapack_int nrhs,
06482                                  const lapack_complex_float* a, lapack_int lda,
06483                                  const lapack_complex_float* af,
06484                                  lapack_int ldaf, const lapack_int* ipiv,
06485                                  const float* s, const lapack_complex_float* b,
06486                                  lapack_int ldb, lapack_complex_float* x,
06487                                  lapack_int ldx, float* rcond, float* berr,
06488                                  lapack_int n_err_bnds, float* err_bnds_norm,
06489                                  float* err_bnds_comp, lapack_int nparams,
06490                                  float* params, lapack_complex_float* work,
06491                                  float* rwork );
06492 lapack_int LAPACKE_zherfsx_work( int matrix_order, char uplo, char equed,
06493                                  lapack_int n, lapack_int nrhs,
06494                                  const lapack_complex_double* a, lapack_int lda,
06495                                  const lapack_complex_double* af,
06496                                  lapack_int ldaf, const lapack_int* ipiv,
06497                                  const double* s,
06498                                  const lapack_complex_double* b, lapack_int ldb,
06499                                  lapack_complex_double* x, lapack_int ldx,
06500                                  double* rcond, double* berr,
06501                                  lapack_int n_err_bnds, double* err_bnds_norm,
06502                                  double* err_bnds_comp, lapack_int nparams,
06503                                  double* params, lapack_complex_double* work,
06504                                  double* rwork );
06505 
06506 lapack_int LAPACKE_chesv_work( int matrix_order, char uplo, lapack_int n,
06507                                lapack_int nrhs, lapack_complex_float* a,
06508                                lapack_int lda, lapack_int* ipiv,
06509                                lapack_complex_float* b, lapack_int ldb,
06510                                lapack_complex_float* work, lapack_int lwork );
06511 lapack_int LAPACKE_zhesv_work( int matrix_order, char uplo, lapack_int n,
06512                                lapack_int nrhs, lapack_complex_double* a,
06513                                lapack_int lda, lapack_int* ipiv,
06514                                lapack_complex_double* b, lapack_int ldb,
06515                                lapack_complex_double* work, lapack_int lwork );
06516 
06517 lapack_int LAPACKE_chesvx_work( int matrix_order, char fact, char uplo,
06518                                 lapack_int n, lapack_int nrhs,
06519                                 const lapack_complex_float* a, lapack_int lda,
06520                                 lapack_complex_float* af, lapack_int ldaf,
06521                                 lapack_int* ipiv, const lapack_complex_float* b,
06522                                 lapack_int ldb, lapack_complex_float* x,
06523                                 lapack_int ldx, float* rcond, float* ferr,
06524                                 float* berr, lapack_complex_float* work,
06525                                 lapack_int lwork, float* rwork );
06526 lapack_int LAPACKE_zhesvx_work( int matrix_order, char fact, char uplo,
06527                                 lapack_int n, lapack_int nrhs,
06528                                 const lapack_complex_double* a, lapack_int lda,
06529                                 lapack_complex_double* af, lapack_int ldaf,
06530                                 lapack_int* ipiv,
06531                                 const lapack_complex_double* b, lapack_int ldb,
06532                                 lapack_complex_double* x, lapack_int ldx,
06533                                 double* rcond, double* ferr, double* berr,
06534                                 lapack_complex_double* work, lapack_int lwork,
06535                                 double* rwork );
06536 
06537 lapack_int LAPACKE_chesvxx_work( int matrix_order, char fact, char uplo,
06538                                  lapack_int n, lapack_int nrhs,
06539                                  lapack_complex_float* a, lapack_int lda,
06540                                  lapack_complex_float* af, lapack_int ldaf,
06541                                  lapack_int* ipiv, char* equed, float* s,
06542                                  lapack_complex_float* b, lapack_int ldb,
06543                                  lapack_complex_float* x, lapack_int ldx,
06544                                  float* rcond, float* rpvgrw, float* berr,
06545                                  lapack_int n_err_bnds, float* err_bnds_norm,
06546                                  float* err_bnds_comp, lapack_int nparams,
06547                                  float* params, lapack_complex_float* work,
06548                                  float* rwork );
06549 lapack_int LAPACKE_zhesvxx_work( int matrix_order, char fact, char uplo,
06550                                  lapack_int n, lapack_int nrhs,
06551                                  lapack_complex_double* a, lapack_int lda,
06552                                  lapack_complex_double* af, lapack_int ldaf,
06553                                  lapack_int* ipiv, char* equed, double* s,
06554                                  lapack_complex_double* b, lapack_int ldb,
06555                                  lapack_complex_double* x, lapack_int ldx,
06556                                  double* rcond, double* rpvgrw, double* berr,
06557                                  lapack_int n_err_bnds, double* err_bnds_norm,
06558                                  double* err_bnds_comp, lapack_int nparams,
06559                                  double* params, lapack_complex_double* work,
06560                                  double* rwork );
06561 
06562 lapack_int LAPACKE_chetrd_work( int matrix_order, char uplo, lapack_int n,
06563                                 lapack_complex_float* a, lapack_int lda,
06564                                 float* d, float* e, lapack_complex_float* tau,
06565                                 lapack_complex_float* work, lapack_int lwork );
06566 lapack_int LAPACKE_zhetrd_work( int matrix_order, char uplo, lapack_int n,
06567                                 lapack_complex_double* a, lapack_int lda,
06568                                 double* d, double* e,
06569                                 lapack_complex_double* tau,
06570                                 lapack_complex_double* work, lapack_int lwork );
06571 
06572 lapack_int LAPACKE_chetrf_work( int matrix_order, char uplo, lapack_int n,
06573                                 lapack_complex_float* a, lapack_int lda,
06574                                 lapack_int* ipiv, lapack_complex_float* work,
06575                                 lapack_int lwork );
06576 lapack_int LAPACKE_zhetrf_work( int matrix_order, char uplo, lapack_int n,
06577                                 lapack_complex_double* a, lapack_int lda,
06578                                 lapack_int* ipiv, lapack_complex_double* work,
06579                                 lapack_int lwork );
06580 
06581 lapack_int LAPACKE_chetri_work( int matrix_order, char uplo, lapack_int n,
06582                                 lapack_complex_float* a, lapack_int lda,
06583                                 const lapack_int* ipiv,
06584                                 lapack_complex_float* work );
06585 lapack_int LAPACKE_zhetri_work( int matrix_order, char uplo, lapack_int n,
06586                                 lapack_complex_double* a, lapack_int lda,
06587                                 const lapack_int* ipiv,
06588                                 lapack_complex_double* work );
06589 
06590 lapack_int LAPACKE_chetrs_work( int matrix_order, char uplo, lapack_int n,
06591                                 lapack_int nrhs, const lapack_complex_float* a,
06592                                 lapack_int lda, const lapack_int* ipiv,
06593                                 lapack_complex_float* b, lapack_int ldb );
06594 lapack_int LAPACKE_zhetrs_work( int matrix_order, char uplo, lapack_int n,
06595                                 lapack_int nrhs, const lapack_complex_double* a,
06596                                 lapack_int lda, const lapack_int* ipiv,
06597                                 lapack_complex_double* b, lapack_int ldb );
06598 
06599 lapack_int LAPACKE_chfrk_work( int matrix_order, char transr, char uplo,
06600                                char trans, lapack_int n, lapack_int k,
06601                                float alpha, const lapack_complex_float* a,
06602                                lapack_int lda, float beta,
06603                                lapack_complex_float* c );
06604 lapack_int LAPACKE_zhfrk_work( int matrix_order, char transr, char uplo,
06605                                char trans, lapack_int n, lapack_int k,
06606                                double alpha, const lapack_complex_double* a,
06607                                lapack_int lda, double beta,
06608                                lapack_complex_double* c );
06609 
06610 lapack_int LAPACKE_shgeqz_work( int matrix_order, char job, char compq,
06611                                 char compz, lapack_int n, lapack_int ilo,
06612                                 lapack_int ihi, float* h, lapack_int ldh,
06613                                 float* t, lapack_int ldt, float* alphar,
06614                                 float* alphai, float* beta, float* q,
06615                                 lapack_int ldq, float* z, lapack_int ldz,
06616                                 float* work, lapack_int lwork );
06617 lapack_int LAPACKE_dhgeqz_work( int matrix_order, char job, char compq,
06618                                 char compz, lapack_int n, lapack_int ilo,
06619                                 lapack_int ihi, double* h, lapack_int ldh,
06620                                 double* t, lapack_int ldt, double* alphar,
06621                                 double* alphai, double* beta, double* q,
06622                                 lapack_int ldq, double* z, lapack_int ldz,
06623                                 double* work, lapack_int lwork );
06624 lapack_int LAPACKE_chgeqz_work( int matrix_order, char job, char compq,
06625                                 char compz, lapack_int n, lapack_int ilo,
06626                                 lapack_int ihi, lapack_complex_float* h,
06627                                 lapack_int ldh, lapack_complex_float* t,
06628                                 lapack_int ldt, lapack_complex_float* alpha,
06629                                 lapack_complex_float* beta,
06630                                 lapack_complex_float* q, lapack_int ldq,
06631                                 lapack_complex_float* z, lapack_int ldz,
06632                                 lapack_complex_float* work, lapack_int lwork,
06633                                 float* rwork );
06634 lapack_int LAPACKE_zhgeqz_work( int matrix_order, char job, char compq,
06635                                 char compz, lapack_int n, lapack_int ilo,
06636                                 lapack_int ihi, lapack_complex_double* h,
06637                                 lapack_int ldh, lapack_complex_double* t,
06638                                 lapack_int ldt, lapack_complex_double* alpha,
06639                                 lapack_complex_double* beta,
06640                                 lapack_complex_double* q, lapack_int ldq,
06641                                 lapack_complex_double* z, lapack_int ldz,
06642                                 lapack_complex_double* work, lapack_int lwork,
06643                                 double* rwork );
06644 
06645 lapack_int LAPACKE_chpcon_work( int matrix_order, char uplo, lapack_int n,
06646                                 const lapack_complex_float* ap,
06647                                 const lapack_int* ipiv, float anorm,
06648                                 float* rcond, lapack_complex_float* work );
06649 lapack_int LAPACKE_zhpcon_work( int matrix_order, char uplo, lapack_int n,
06650                                 const lapack_complex_double* ap,
06651                                 const lapack_int* ipiv, double anorm,
06652                                 double* rcond, lapack_complex_double* work );
06653 
06654 lapack_int LAPACKE_chpev_work( int matrix_order, char jobz, char uplo,
06655                                lapack_int n, lapack_complex_float* ap, float* w,
06656                                lapack_complex_float* z, lapack_int ldz,
06657                                lapack_complex_float* work, float* rwork );
06658 lapack_int LAPACKE_zhpev_work( int matrix_order, char jobz, char uplo,
06659                                lapack_int n, lapack_complex_double* ap,
06660                                double* w, lapack_complex_double* z,
06661                                lapack_int ldz, lapack_complex_double* work,
06662                                double* rwork );
06663 
06664 lapack_int LAPACKE_chpevd_work( int matrix_order, char jobz, char uplo,
06665                                 lapack_int n, lapack_complex_float* ap,
06666                                 float* w, lapack_complex_float* z,
06667                                 lapack_int ldz, lapack_complex_float* work,
06668                                 lapack_int lwork, float* rwork,
06669                                 lapack_int lrwork, lapack_int* iwork,
06670                                 lapack_int liwork );
06671 lapack_int LAPACKE_zhpevd_work( int matrix_order, char jobz, char uplo,
06672                                 lapack_int n, lapack_complex_double* ap,
06673                                 double* w, lapack_complex_double* z,
06674                                 lapack_int ldz, lapack_complex_double* work,
06675                                 lapack_int lwork, double* rwork,
06676                                 lapack_int lrwork, lapack_int* iwork,
06677                                 lapack_int liwork );
06678 
06679 lapack_int LAPACKE_chpevx_work( int matrix_order, char jobz, char range,
06680                                 char uplo, lapack_int n,
06681                                 lapack_complex_float* ap, float vl, float vu,
06682                                 lapack_int il, lapack_int iu, float abstol,
06683                                 lapack_int* m, float* w,
06684                                 lapack_complex_float* z, lapack_int ldz,
06685                                 lapack_complex_float* work, float* rwork,
06686                                 lapack_int* iwork, lapack_int* ifail );
06687 lapack_int LAPACKE_zhpevx_work( int matrix_order, char jobz, char range,
06688                                 char uplo, lapack_int n,
06689                                 lapack_complex_double* ap, double vl, double vu,
06690                                 lapack_int il, lapack_int iu, double abstol,
06691                                 lapack_int* m, double* w,
06692                                 lapack_complex_double* z, lapack_int ldz,
06693                                 lapack_complex_double* work, double* rwork,
06694                                 lapack_int* iwork, lapack_int* ifail );
06695 
06696 lapack_int LAPACKE_chpgst_work( int matrix_order, lapack_int itype, char uplo,
06697                                 lapack_int n, lapack_complex_float* ap,
06698                                 const lapack_complex_float* bp );
06699 lapack_int LAPACKE_zhpgst_work( int matrix_order, lapack_int itype, char uplo,
06700                                 lapack_int n, lapack_complex_double* ap,
06701                                 const lapack_complex_double* bp );
06702 
06703 lapack_int LAPACKE_chpgv_work( int matrix_order, lapack_int itype, char jobz,
06704                                char uplo, lapack_int n,
06705                                lapack_complex_float* ap,
06706                                lapack_complex_float* bp, float* w,
06707                                lapack_complex_float* z, lapack_int ldz,
06708                                lapack_complex_float* work, float* rwork );
06709 lapack_int LAPACKE_zhpgv_work( int matrix_order, lapack_int itype, char jobz,
06710                                char uplo, lapack_int n,
06711                                lapack_complex_double* ap,
06712                                lapack_complex_double* bp, double* w,
06713                                lapack_complex_double* z, lapack_int ldz,
06714                                lapack_complex_double* work, double* rwork );
06715 
06716 lapack_int LAPACKE_chpgvd_work( int matrix_order, lapack_int itype, char jobz,
06717                                 char uplo, lapack_int n,
06718                                 lapack_complex_float* ap,
06719                                 lapack_complex_float* bp, float* w,
06720                                 lapack_complex_float* z, lapack_int ldz,
06721                                 lapack_complex_float* work, lapack_int lwork,
06722                                 float* rwork, lapack_int lrwork,
06723                                 lapack_int* iwork, lapack_int liwork );
06724 lapack_int LAPACKE_zhpgvd_work( int matrix_order, lapack_int itype, char jobz,
06725                                 char uplo, lapack_int n,
06726                                 lapack_complex_double* ap,
06727                                 lapack_complex_double* bp, double* w,
06728                                 lapack_complex_double* z, lapack_int ldz,
06729                                 lapack_complex_double* work, lapack_int lwork,
06730                                 double* rwork, lapack_int lrwork,
06731                                 lapack_int* iwork, lapack_int liwork );
06732 
06733 lapack_int LAPACKE_chpgvx_work( int matrix_order, lapack_int itype, char jobz,
06734                                 char range, char uplo, lapack_int n,
06735                                 lapack_complex_float* ap,
06736                                 lapack_complex_float* bp, float vl, float vu,
06737                                 lapack_int il, lapack_int iu, float abstol,
06738                                 lapack_int* m, float* w,
06739                                 lapack_complex_float* z, lapack_int ldz,
06740                                 lapack_complex_float* work, float* rwork,
06741                                 lapack_int* iwork, lapack_int* ifail );
06742 lapack_int LAPACKE_zhpgvx_work( int matrix_order, lapack_int itype, char jobz,
06743                                 char range, char uplo, lapack_int n,
06744                                 lapack_complex_double* ap,
06745                                 lapack_complex_double* bp, double vl, double vu,
06746                                 lapack_int il, lapack_int iu, double abstol,
06747                                 lapack_int* m, double* w,
06748                                 lapack_complex_double* z, lapack_int ldz,
06749                                 lapack_complex_double* work, double* rwork,
06750                                 lapack_int* iwork, lapack_int* ifail );
06751 
06752 lapack_int LAPACKE_chprfs_work( int matrix_order, char uplo, lapack_int n,
06753                                 lapack_int nrhs, const lapack_complex_float* ap,
06754                                 const lapack_complex_float* afp,
06755                                 const lapack_int* ipiv,
06756                                 const lapack_complex_float* b, lapack_int ldb,
06757                                 lapack_complex_float* x, lapack_int ldx,
06758                                 float* ferr, float* berr,
06759                                 lapack_complex_float* work, float* rwork );
06760 lapack_int LAPACKE_zhprfs_work( int matrix_order, char uplo, lapack_int n,
06761                                 lapack_int nrhs,
06762                                 const lapack_complex_double* ap,
06763                                 const lapack_complex_double* afp,
06764                                 const lapack_int* ipiv,
06765                                 const lapack_complex_double* b, lapack_int ldb,
06766                                 lapack_complex_double* x, lapack_int ldx,
06767                                 double* ferr, double* berr,
06768                                 lapack_complex_double* work, double* rwork );
06769 
06770 lapack_int LAPACKE_chpsv_work( int matrix_order, char uplo, lapack_int n,
06771                                lapack_int nrhs, lapack_complex_float* ap,
06772                                lapack_int* ipiv, lapack_complex_float* b,
06773                                lapack_int ldb );
06774 lapack_int LAPACKE_zhpsv_work( int matrix_order, char uplo, lapack_int n,
06775                                lapack_int nrhs, lapack_complex_double* ap,
06776                                lapack_int* ipiv, lapack_complex_double* b,
06777                                lapack_int ldb );
06778 
06779 lapack_int LAPACKE_chpsvx_work( int matrix_order, char fact, char uplo,
06780                                 lapack_int n, lapack_int nrhs,
06781                                 const lapack_complex_float* ap,
06782                                 lapack_complex_float* afp, lapack_int* ipiv,
06783                                 const lapack_complex_float* b, lapack_int ldb,
06784                                 lapack_complex_float* x, lapack_int ldx,
06785                                 float* rcond, float* ferr, float* berr,
06786                                 lapack_complex_float* work, float* rwork );
06787 lapack_int LAPACKE_zhpsvx_work( int matrix_order, char fact, char uplo,
06788                                 lapack_int n, lapack_int nrhs,
06789                                 const lapack_complex_double* ap,
06790                                 lapack_complex_double* afp, lapack_int* ipiv,
06791                                 const lapack_complex_double* b, lapack_int ldb,
06792                                 lapack_complex_double* x, lapack_int ldx,
06793                                 double* rcond, double* ferr, double* berr,
06794                                 lapack_complex_double* work, double* rwork );
06795 
06796 lapack_int LAPACKE_chptrd_work( int matrix_order, char uplo, lapack_int n,
06797                                 lapack_complex_float* ap, float* d, float* e,
06798                                 lapack_complex_float* tau );
06799 lapack_int LAPACKE_zhptrd_work( int matrix_order, char uplo, lapack_int n,
06800                                 lapack_complex_double* ap, double* d, double* e,
06801                                 lapack_complex_double* tau );
06802 
06803 lapack_int LAPACKE_chptrf_work( int matrix_order, char uplo, lapack_int n,
06804                                 lapack_complex_float* ap, lapack_int* ipiv );
06805 lapack_int LAPACKE_zhptrf_work( int matrix_order, char uplo, lapack_int n,
06806                                 lapack_complex_double* ap, lapack_int* ipiv );
06807 
06808 lapack_int LAPACKE_chptri_work( int matrix_order, char uplo, lapack_int n,
06809                                 lapack_complex_float* ap,
06810                                 const lapack_int* ipiv,
06811                                 lapack_complex_float* work );
06812 lapack_int LAPACKE_zhptri_work( int matrix_order, char uplo, lapack_int n,
06813                                 lapack_complex_double* ap,
06814                                 const lapack_int* ipiv,
06815                                 lapack_complex_double* work );
06816 
06817 lapack_int LAPACKE_chptrs_work( int matrix_order, char uplo, lapack_int n,
06818                                 lapack_int nrhs, const lapack_complex_float* ap,
06819                                 const lapack_int* ipiv, lapack_complex_float* b,
06820                                 lapack_int ldb );
06821 lapack_int LAPACKE_zhptrs_work( int matrix_order, char uplo, lapack_int n,
06822                                 lapack_int nrhs,
06823                                 const lapack_complex_double* ap,
06824                                 const lapack_int* ipiv,
06825                                 lapack_complex_double* b, lapack_int ldb );
06826 
06827 lapack_int LAPACKE_shsein_work( int matrix_order, char job, char eigsrc,
06828                                 char initv, lapack_logical* select,
06829                                 lapack_int n, const float* h, lapack_int ldh,
06830                                 float* wr, const float* wi, float* vl,
06831                                 lapack_int ldvl, float* vr, lapack_int ldvr,
06832                                 lapack_int mm, lapack_int* m, float* work,
06833                                 lapack_int* ifaill, lapack_int* ifailr );
06834 lapack_int LAPACKE_dhsein_work( int matrix_order, char job, char eigsrc,
06835                                 char initv, lapack_logical* select,
06836                                 lapack_int n, const double* h, lapack_int ldh,
06837                                 double* wr, const double* wi, double* vl,
06838                                 lapack_int ldvl, double* vr, lapack_int ldvr,
06839                                 lapack_int mm, lapack_int* m, double* work,
06840                                 lapack_int* ifaill, lapack_int* ifailr );
06841 lapack_int LAPACKE_chsein_work( int matrix_order, char job, char eigsrc,
06842                                 char initv, const lapack_logical* select,
06843                                 lapack_int n, const lapack_complex_float* h,
06844                                 lapack_int ldh, lapack_complex_float* w,
06845                                 lapack_complex_float* vl, lapack_int ldvl,
06846                                 lapack_complex_float* vr, lapack_int ldvr,
06847                                 lapack_int mm, lapack_int* m,
06848                                 lapack_complex_float* work, float* rwork,
06849                                 lapack_int* ifaill, lapack_int* ifailr );
06850 lapack_int LAPACKE_zhsein_work( int matrix_order, char job, char eigsrc,
06851                                 char initv, const lapack_logical* select,
06852                                 lapack_int n, const lapack_complex_double* h,
06853                                 lapack_int ldh, lapack_complex_double* w,
06854                                 lapack_complex_double* vl, lapack_int ldvl,
06855                                 lapack_complex_double* vr, lapack_int ldvr,
06856                                 lapack_int mm, lapack_int* m,
06857                                 lapack_complex_double* work, double* rwork,
06858                                 lapack_int* ifaill, lapack_int* ifailr );
06859 
06860 lapack_int LAPACKE_shseqr_work( int matrix_order, char job, char compz,
06861                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06862                                 float* h, lapack_int ldh, float* wr, float* wi,
06863                                 float* z, lapack_int ldz, float* work,
06864                                 lapack_int lwork );
06865 lapack_int LAPACKE_dhseqr_work( int matrix_order, char job, char compz,
06866                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06867                                 double* h, lapack_int ldh, double* wr,
06868                                 double* wi, double* z, lapack_int ldz,
06869                                 double* work, lapack_int lwork );
06870 lapack_int LAPACKE_chseqr_work( int matrix_order, char job, char compz,
06871                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06872                                 lapack_complex_float* h, lapack_int ldh,
06873                                 lapack_complex_float* w,
06874                                 lapack_complex_float* z, lapack_int ldz,
06875                                 lapack_complex_float* work, lapack_int lwork );
06876 lapack_int LAPACKE_zhseqr_work( int matrix_order, char job, char compz,
06877                                 lapack_int n, lapack_int ilo, lapack_int ihi,
06878                                 lapack_complex_double* h, lapack_int ldh,
06879                                 lapack_complex_double* w,
06880                                 lapack_complex_double* z, lapack_int ldz,
06881                                 lapack_complex_double* work, lapack_int lwork );
06882 
06883 lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
06884                                 lapack_int incx );
06885 lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
06886                                 lapack_int incx );
06887 
06888 lapack_int LAPACKE_slacpy_work( int matrix_order, char uplo, lapack_int m,
06889                                 lapack_int n, const float* a, lapack_int lda,
06890                                 float* b, lapack_int ldb );
06891 lapack_int LAPACKE_dlacpy_work( int matrix_order, char uplo, lapack_int m,
06892                                 lapack_int n, const double* a, lapack_int lda,
06893                                 double* b, lapack_int ldb );
06894 lapack_int LAPACKE_clacpy_work( int matrix_order, char uplo, lapack_int m,
06895                                 lapack_int n, const lapack_complex_float* a,
06896                                 lapack_int lda, lapack_complex_float* b,
06897                                 lapack_int ldb );
06898 lapack_int LAPACKE_zlacpy_work( int matrix_order, char uplo, lapack_int m,
06899                                 lapack_int n, const lapack_complex_double* a,
06900                                 lapack_int lda, lapack_complex_double* b,
06901                                 lapack_int ldb );
06902 
06903 lapack_int LAPACKE_zlag2c_work( int matrix_order, lapack_int m, lapack_int n,
06904                                 const lapack_complex_double* a, lapack_int lda,
06905                                 lapack_complex_float* sa, lapack_int ldsa );
06906 
06907 lapack_int LAPACKE_slag2d_work( int matrix_order, lapack_int m, lapack_int n,
06908                                 const float* sa, lapack_int ldsa, double* a,
06909                                 lapack_int lda );
06910 
06911 lapack_int LAPACKE_dlag2s_work( int matrix_order, lapack_int m, lapack_int n,
06912                                 const double* a, lapack_int lda, float* sa,
06913                                 lapack_int ldsa );
06914 
06915 lapack_int LAPACKE_clag2z_work( int matrix_order, lapack_int m, lapack_int n,
06916                                 const lapack_complex_float* sa, lapack_int ldsa,
06917                                 lapack_complex_double* a, lapack_int lda );
06918 
06919 lapack_int LAPACKE_slagge_work( int matrix_order, lapack_int m, lapack_int n,
06920                                 lapack_int kl, lapack_int ku, const float* d,
06921                                 float* a, lapack_int lda, lapack_int* iseed,
06922                                 float* work );
06923 lapack_int LAPACKE_dlagge_work( int matrix_order, lapack_int m, lapack_int n,
06924                                 lapack_int kl, lapack_int ku, const double* d,
06925                                 double* a, lapack_int lda, lapack_int* iseed,
06926                                 double* work );
06927 lapack_int LAPACKE_clagge_work( int matrix_order, lapack_int m, lapack_int n,
06928                                 lapack_int kl, lapack_int ku, const float* d,
06929                                 lapack_complex_float* a, lapack_int lda,
06930                                 lapack_int* iseed, lapack_complex_float* work );
06931 lapack_int LAPACKE_zlagge_work( int matrix_order, lapack_int m, lapack_int n,
06932                                 lapack_int kl, lapack_int ku, const double* d,
06933                                 lapack_complex_double* a, lapack_int lda,
06934                                 lapack_int* iseed,
06935                                 lapack_complex_double* work );
06936                                 
06937 lapack_int LAPACKE_claghe_work( int matrix_order, lapack_int n, lapack_int k,
06938                                 const float* d, lapack_complex_float* a,
06939                                 lapack_int lda, lapack_int* iseed,
06940                                 lapack_complex_float* work );
06941 lapack_int LAPACKE_zlaghe_work( int matrix_order, lapack_int n, lapack_int k,
06942                                 const double* d, lapack_complex_double* a,
06943                                 lapack_int lda, lapack_int* iseed,
06944                                 lapack_complex_double* work );
06945 
06946 lapack_int LAPACKE_slagsy_work( int matrix_order, lapack_int n, lapack_int k,
06947                                 const float* d, float* a, lapack_int lda,
06948                                 lapack_int* iseed, float* work );
06949 lapack_int LAPACKE_dlagsy_work( int matrix_order, lapack_int n, lapack_int k,
06950                                 const double* d, double* a, lapack_int lda,
06951                                 lapack_int* iseed, double* work );
06952 lapack_int LAPACKE_clagsy_work( int matrix_order, lapack_int n, lapack_int k,
06953                                 const float* d, lapack_complex_float* a,
06954                                 lapack_int lda, lapack_int* iseed,
06955                                 lapack_complex_float* work );
06956 lapack_int LAPACKE_zlagsy_work( int matrix_order, lapack_int n, lapack_int k,
06957                                 const double* d, lapack_complex_double* a,
06958                                 lapack_int lda, lapack_int* iseed,
06959                                 lapack_complex_double* work );
06960 
06961 lapack_int LAPACKE_slapmr_work( int matrix_order, lapack_logical forwrd,
06962                                 lapack_int m, lapack_int n, float* x,
06963                                 lapack_int ldx, lapack_int* k );
06964 lapack_int LAPACKE_dlapmr_work( int matrix_order, lapack_logical forwrd,
06965                                 lapack_int m, lapack_int n, double* x,
06966                                 lapack_int ldx, lapack_int* k );
06967 lapack_int LAPACKE_clapmr_work( int matrix_order, lapack_logical forwrd,
06968                                 lapack_int m, lapack_int n,
06969                                 lapack_complex_float* x, lapack_int ldx,
06970                                 lapack_int* k );
06971 lapack_int LAPACKE_zlapmr_work( int matrix_order, lapack_logical forwrd,
06972                                 lapack_int m, lapack_int n,
06973                                 lapack_complex_double* x, lapack_int ldx,
06974                                 lapack_int* k );
06975 
06976 lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
06977                                  float* r );
06978 lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
06979                                  double* r );
06980 
06981 lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
06982                                  float* sn );
06983 lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
06984                                  double* sn );
06985                                 
06986 float LAPACKE_slapy2_work( float x, float y );
06987 double LAPACKE_dlapy2_work( double x, double y );
06988 
06989 float LAPACKE_slapy3_work( float x, float y, float z );
06990 double LAPACKE_dlapy3_work( double x, double y, double z );
06991 
06992 float LAPACKE_slamch_work( char cmach );
06993 double LAPACKE_dlamch_work( char cmach );
06994 
06995 float LAPACKE_slange_work( int matrix_order, char norm, lapack_int m,
06996                                 lapack_int n, const float* a, lapack_int lda,
06997                                 float* work );
06998 double LAPACKE_dlange_work( int matrix_order, char norm, lapack_int m,
06999                                 lapack_int n, const double* a, lapack_int lda,
07000                                 double* work );
07001 float LAPACKE_clange_work( int matrix_order, char norm, lapack_int m,
07002                                 lapack_int n, const lapack_complex_float* a,
07003                                 lapack_int lda, float* work );
07004 double LAPACKE_zlange_work( int matrix_order, char norm, lapack_int m,
07005                                 lapack_int n, const lapack_complex_double* a,
07006                                 lapack_int lda, double* work );
07007 
07008 float LAPACKE_clanhe_work( int matrix_order, char norm, char uplo,
07009                                 lapack_int n, const lapack_complex_float* a,
07010                                 lapack_int lda, float* work );
07011 double LAPACKE_zlanhe_work( int matrix_order, char norm, char uplo,
07012                                 lapack_int n, const lapack_complex_double* a,
07013                                 lapack_int lda, double* work );
07014 
07015 float LAPACKE_slansy_work( int matrix_order, char norm, char uplo,
07016                                 lapack_int n, const float* a, lapack_int lda,
07017                                 float* work );
07018 double LAPACKE_dlansy_work( int matrix_order, char norm, char uplo,
07019                                 lapack_int n, const double* a, lapack_int lda,
07020                                 double* work );
07021 float LAPACKE_clansy_work( int matrix_order, char norm, char uplo,
07022                                 lapack_int n, const lapack_complex_float* a,
07023                                 lapack_int lda, float* work );
07024 double LAPACKE_zlansy_work( int matrix_order, char norm, char uplo,
07025                                 lapack_int n, const lapack_complex_double* a,
07026                                 lapack_int lda, double* work );
07027 
07028 float LAPACKE_slantr_work( int matrix_order, char norm, char uplo,
07029                                 char diag, lapack_int m, lapack_int n, const float* a,
07030                                 lapack_int lda, float* work );
07031 double LAPACKE_dlantr_work( int matrix_order, char norm, char uplo,
07032                                 char diag, lapack_int m, lapack_int n,
07033                                 const double* a, lapack_int lda, double* work );
07034 float LAPACKE_clantr_work( int matrix_order, char norm, char uplo,
07035                                 char diag, lapack_int m, lapack_int n,
07036                                 const lapack_complex_float* a, lapack_int lda,
07037                                 float* work );
07038 double LAPACKE_zlantr_work( int matrix_order, char norm, char uplo,
07039                                 char diag, lapack_int m, lapack_int n,
07040                                 const lapack_complex_double* a, lapack_int lda,
07041                                 double* work );
07042 
07043 lapack_int LAPACKE_slarfb_work( int matrix_order, char side, char trans,
07044                                 char direct, char storev, lapack_int m,
07045                                 lapack_int n, lapack_int k, const float* v,
07046                                 lapack_int ldv, const float* t, lapack_int ldt,
07047                                 float* c, lapack_int ldc, float* work,
07048                                 lapack_int ldwork );
07049 lapack_int LAPACKE_dlarfb_work( int matrix_order, char side, char trans,
07050                                 char direct, char storev, lapack_int m,
07051                                 lapack_int n, lapack_int k, const double* v,
07052                                 lapack_int ldv, const double* t, lapack_int ldt,
07053                                 double* c, lapack_int ldc, double* work,
07054                                 lapack_int ldwork );
07055 lapack_int LAPACKE_clarfb_work( int matrix_order, char side, char trans,
07056                                 char direct, char storev, lapack_int m,
07057                                 lapack_int n, lapack_int k,
07058                                 const lapack_complex_float* v, lapack_int ldv,
07059                                 const lapack_complex_float* t, lapack_int ldt,
07060                                 lapack_complex_float* c, lapack_int ldc,
07061                                 lapack_complex_float* work, lapack_int ldwork );
07062 lapack_int LAPACKE_zlarfb_work( int matrix_order, char side, char trans,
07063                                 char direct, char storev, lapack_int m,
07064                                 lapack_int n, lapack_int k,
07065                                 const lapack_complex_double* v, lapack_int ldv,
07066                                 const lapack_complex_double* t, lapack_int ldt,
07067                                 lapack_complex_double* c, lapack_int ldc,
07068                                 lapack_complex_double* work,
07069                                 lapack_int ldwork );
07070 
07071 lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
07072                                 lapack_int incx, float* tau );
07073 lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
07074                                 lapack_int incx, double* tau );
07075 lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
07076                                 lapack_complex_float* x, lapack_int incx,
07077                                 lapack_complex_float* tau );
07078 lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
07079                                 lapack_complex_double* x, lapack_int incx,
07080                                 lapack_complex_double* tau );
07081 
07082 lapack_int LAPACKE_slarft_work( int matrix_order, char direct, char storev,
07083                                 lapack_int n, lapack_int k, const float* v,
07084                                 lapack_int ldv, const float* tau, float* t,
07085                                 lapack_int ldt );
07086 lapack_int LAPACKE_dlarft_work( int matrix_order, char direct, char storev,
07087                                 lapack_int n, lapack_int k, const double* v,
07088                                 lapack_int ldv, const double* tau, double* t,
07089                                 lapack_int ldt );
07090 lapack_int LAPACKE_clarft_work( int matrix_order, char direct, char storev,
07091                                 lapack_int n, lapack_int k,
07092                                 const lapack_complex_float* v, lapack_int ldv,
07093                                 const lapack_complex_float* tau,
07094                                 lapack_complex_float* t, lapack_int ldt );
07095 lapack_int LAPACKE_zlarft_work( int matrix_order, char direct, char storev,
07096                                 lapack_int n, lapack_int k,
07097                                 const lapack_complex_double* v, lapack_int ldv,
07098                                 const lapack_complex_double* tau,
07099                                 lapack_complex_double* t, lapack_int ldt );
07100 
07101 lapack_int LAPACKE_slarfx_work( int matrix_order, char side, lapack_int m,
07102                                 lapack_int n, const float* v, float tau,
07103                                 float* c, lapack_int ldc, float* work );
07104 lapack_int LAPACKE_dlarfx_work( int matrix_order, char side, lapack_int m,
07105                                 lapack_int n, const double* v, double tau,
07106                                 double* c, lapack_int ldc, double* work );
07107 lapack_int LAPACKE_clarfx_work( int matrix_order, char side, lapack_int m,
07108                                 lapack_int n, const lapack_complex_float* v,
07109                                 lapack_complex_float tau,
07110                                 lapack_complex_float* c, lapack_int ldc,
07111                                 lapack_complex_float* work );
07112 lapack_int LAPACKE_zlarfx_work( int matrix_order, char side, lapack_int m,
07113                                 lapack_int n, const lapack_complex_double* v,
07114                                 lapack_complex_double tau,
07115                                 lapack_complex_double* c, lapack_int ldc,
07116                                 lapack_complex_double* work );
07117 
07118 lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
07119                                 lapack_int n, float* x );
07120 lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
07121                                 lapack_int n, double* x );
07122 lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
07123                                 lapack_int n, lapack_complex_float* x );
07124 lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
07125                                 lapack_int n, lapack_complex_double* x );
07126 
07127 lapack_int LAPACKE_slaset_work( int matrix_order, char uplo, lapack_int m,
07128                                 lapack_int n, float alpha, float beta, float* a,
07129                                 lapack_int lda );
07130 lapack_int LAPACKE_dlaset_work( int matrix_order, char uplo, lapack_int m,
07131                                 lapack_int n, double alpha, double beta,
07132                                 double* a, lapack_int lda );
07133 lapack_int LAPACKE_claset_work( int matrix_order, char uplo, lapack_int m,
07134                                 lapack_int n, lapack_complex_float alpha,
07135                                 lapack_complex_float beta,
07136                                 lapack_complex_float* a, lapack_int lda );
07137 lapack_int LAPACKE_zlaset_work( int matrix_order, char uplo, lapack_int m,
07138                                 lapack_int n, lapack_complex_double alpha,
07139                                 lapack_complex_double beta,
07140                                 lapack_complex_double* a, lapack_int lda );
07141 
07142 lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
07143 lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
07144 
07145 lapack_int LAPACKE_slaswp_work( int matrix_order, lapack_int n, float* a,
07146                                 lapack_int lda, lapack_int k1, lapack_int k2,
07147                                 const lapack_int* ipiv, lapack_int incx );
07148 lapack_int LAPACKE_dlaswp_work( int matrix_order, lapack_int n, double* a,
07149                                 lapack_int lda, lapack_int k1, lapack_int k2,
07150                                 const lapack_int* ipiv, lapack_int incx );
07151 lapack_int LAPACKE_claswp_work( int matrix_order, lapack_int n,
07152                                 lapack_complex_float* a, lapack_int lda,
07153                                 lapack_int k1, lapack_int k2,
07154                                 const lapack_int* ipiv, lapack_int incx );
07155 lapack_int LAPACKE_zlaswp_work( int matrix_order, lapack_int n,
07156                                 lapack_complex_double* a, lapack_int lda,
07157                                 lapack_int k1, lapack_int k2,
07158                                 const lapack_int* ipiv, lapack_int incx );
07159 
07160 lapack_int LAPACKE_slatms_work( int matrix_order, lapack_int m, lapack_int n,
07161                                 char dist, lapack_int* iseed, char sym,
07162                                 float* d, lapack_int mode, float cond,
07163                                 float dmax, lapack_int kl, lapack_int ku,
07164                                 char pack, float* a, lapack_int lda,
07165                                 float* work );
07166 lapack_int LAPACKE_dlatms_work( int matrix_order, lapack_int m, lapack_int n,
07167                                 char dist, lapack_int* iseed, char sym,
07168                                 double* d, lapack_int mode, double cond,
07169                                 double dmax, lapack_int kl, lapack_int ku,
07170                                 char pack, double* a, lapack_int lda,
07171                                 double* work );
07172 lapack_int LAPACKE_clatms_work( int matrix_order, lapack_int m, lapack_int n,
07173                                 char dist, lapack_int* iseed, char sym,
07174                                 float* d, lapack_int mode, float cond,
07175                                 float dmax, lapack_int kl, lapack_int ku,
07176                                 char pack, lapack_complex_float* a,
07177                                 lapack_int lda, lapack_complex_float* work );
07178 lapack_int LAPACKE_zlatms_work( int matrix_order, lapack_int m, lapack_int n,
07179                                 char dist, lapack_int* iseed, char sym,
07180                                 double* d, lapack_int mode, double cond,
07181                                 double dmax, lapack_int kl, lapack_int ku,
07182                                 char pack, lapack_complex_double* a,
07183                                 lapack_int lda, lapack_complex_double* work );
07184 
07185 lapack_int LAPACKE_slauum_work( int matrix_order, char uplo, lapack_int n,
07186                                 float* a, lapack_int lda );
07187 lapack_int LAPACKE_dlauum_work( int matrix_order, char uplo, lapack_int n,
07188                                 double* a, lapack_int lda );
07189 lapack_int LAPACKE_clauum_work( int matrix_order, char uplo, lapack_int n,
07190                                 lapack_complex_float* a, lapack_int lda );
07191 lapack_int LAPACKE_zlauum_work( int matrix_order, char uplo, lapack_int n,
07192                                 lapack_complex_double* a, lapack_int lda );
07193 
07194 lapack_int LAPACKE_sopgtr_work( int matrix_order, char uplo, lapack_int n,
07195                                 const float* ap, const float* tau, float* q,
07196                                 lapack_int ldq, float* work );
07197 lapack_int LAPACKE_dopgtr_work( int matrix_order, char uplo, lapack_int n,
07198                                 const double* ap, const double* tau, double* q,
07199                                 lapack_int ldq, double* work );
07200 
07201 lapack_int LAPACKE_sopmtr_work( int matrix_order, char side, char uplo,
07202                                 char trans, lapack_int m, lapack_int n,
07203                                 const float* ap, const float* tau, float* c,
07204                                 lapack_int ldc, float* work );
07205 lapack_int LAPACKE_dopmtr_work( int matrix_order, char side, char uplo,
07206                                 char trans, lapack_int m, lapack_int n,
07207                                 const double* ap, const double* tau, double* c,
07208                                 lapack_int ldc, double* work );
07209 
07210 lapack_int LAPACKE_sorgbr_work( int matrix_order, char vect, lapack_int m,
07211                                 lapack_int n, lapack_int k, float* a,
07212                                 lapack_int lda, const float* tau, float* work,
07213                                 lapack_int lwork );
07214 lapack_int LAPACKE_dorgbr_work( int matrix_order, char vect, lapack_int m,
07215                                 lapack_int n, lapack_int k, double* a,
07216                                 lapack_int lda, const double* tau, double* work,
07217                                 lapack_int lwork );
07218 
07219 lapack_int LAPACKE_sorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
07220                                 lapack_int ihi, float* a, lapack_int lda,
07221                                 const float* tau, float* work,
07222                                 lapack_int lwork );
07223 lapack_int LAPACKE_dorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
07224                                 lapack_int ihi, double* a, lapack_int lda,
07225                                 const double* tau, double* work,
07226                                 lapack_int lwork );
07227 
07228 lapack_int LAPACKE_sorglq_work( int matrix_order, lapack_int m, lapack_int n,
07229                                 lapack_int k, float* a, lapack_int lda,
07230                                 const float* tau, float* work,
07231                                 lapack_int lwork );
07232 lapack_int LAPACKE_dorglq_work( int matrix_order, lapack_int m, lapack_int n,
07233                                 lapack_int k, double* a, lapack_int lda,
07234                                 const double* tau, double* work,
07235                                 lapack_int lwork );
07236 
07237 lapack_int LAPACKE_sorgql_work( int matrix_order, lapack_int m, lapack_int n,
07238                                 lapack_int k, float* a, lapack_int lda,
07239                                 const float* tau, float* work,
07240                                 lapack_int lwork );
07241 lapack_int LAPACKE_dorgql_work( int matrix_order, lapack_int m, lapack_int n,
07242                                 lapack_int k, double* a, lapack_int lda,
07243                                 const double* tau, double* work,
07244                                 lapack_int lwork );
07245 
07246 lapack_int LAPACKE_sorgqr_work( int matrix_order, lapack_int m, lapack_int n,
07247                                 lapack_int k, float* a, lapack_int lda,
07248                                 const float* tau, float* work,
07249                                 lapack_int lwork );
07250 lapack_int LAPACKE_dorgqr_work( int matrix_order, lapack_int m, lapack_int n,
07251                                 lapack_int k, double* a, lapack_int lda,
07252                                 const double* tau, double* work,
07253                                 lapack_int lwork );
07254 
07255 lapack_int LAPACKE_sorgrq_work( int matrix_order, lapack_int m, lapack_int n,
07256                                 lapack_int k, float* a, lapack_int lda,
07257                                 const float* tau, float* work,
07258                                 lapack_int lwork );
07259 lapack_int LAPACKE_dorgrq_work( int matrix_order, lapack_int m, lapack_int n,
07260                                 lapack_int k, double* a, lapack_int lda,
07261                                 const double* tau, double* work,
07262                                 lapack_int lwork );
07263 
07264 lapack_int LAPACKE_sorgtr_work( int matrix_order, char uplo, lapack_int n,
07265                                 float* a, lapack_int lda, const float* tau,
07266                                 float* work, lapack_int lwork );
07267 lapack_int LAPACKE_dorgtr_work( int matrix_order, char uplo, lapack_int n,
07268                                 double* a, lapack_int lda, const double* tau,
07269                                 double* work, lapack_int lwork );
07270 
07271 lapack_int LAPACKE_sormbr_work( int matrix_order, char vect, char side,
07272                                 char trans, lapack_int m, lapack_int n,
07273                                 lapack_int k, const float* a, lapack_int lda,
07274                                 const float* tau, float* c, lapack_int ldc,
07275                                 float* work, lapack_int lwork );
07276 lapack_int LAPACKE_dormbr_work( int matrix_order, char vect, char side,
07277                                 char trans, lapack_int m, lapack_int n,
07278                                 lapack_int k, const double* a, lapack_int lda,
07279                                 const double* tau, double* c, lapack_int ldc,
07280                                 double* work, lapack_int lwork );
07281 
07282 lapack_int LAPACKE_sormhr_work( int matrix_order, char side, char trans,
07283                                 lapack_int m, lapack_int n, lapack_int ilo,
07284                                 lapack_int ihi, const float* a, lapack_int lda,
07285                                 const float* tau, float* c, lapack_int ldc,
07286                                 float* work, lapack_int lwork );
07287 lapack_int LAPACKE_dormhr_work( int matrix_order, char side, char trans,
07288                                 lapack_int m, lapack_int n, lapack_int ilo,
07289                                 lapack_int ihi, const double* a, lapack_int lda,
07290                                 const double* tau, double* c, lapack_int ldc,
07291                                 double* work, lapack_int lwork );
07292 
07293 lapack_int LAPACKE_sormlq_work( int matrix_order, char side, char trans,
07294                                 lapack_int m, lapack_int n, lapack_int k,
07295                                 const float* a, lapack_int lda,
07296                                 const float* tau, float* c, lapack_int ldc,
07297                                 float* work, lapack_int lwork );
07298 lapack_int LAPACKE_dormlq_work( int matrix_order, char side, char trans,
07299                                 lapack_int m, lapack_int n, lapack_int k,
07300                                 const double* a, lapack_int lda,
07301                                 const double* tau, double* c, lapack_int ldc,
07302                                 double* work, lapack_int lwork );
07303 
07304 lapack_int LAPACKE_sormql_work( int matrix_order, char side, char trans,
07305                                 lapack_int m, lapack_int n, lapack_int k,
07306                                 const float* a, lapack_int lda,
07307                                 const float* tau, float* c, lapack_int ldc,
07308                                 float* work, lapack_int lwork );
07309 lapack_int LAPACKE_dormql_work( int matrix_order, char side, char trans,
07310                                 lapack_int m, lapack_int n, lapack_int k,
07311                                 const double* a, lapack_int lda,
07312                                 const double* tau, double* c, lapack_int ldc,
07313                                 double* work, lapack_int lwork );
07314 
07315 lapack_int LAPACKE_sormqr_work( int matrix_order, char side, char trans,
07316                                 lapack_int m, lapack_int n, lapack_int k,
07317                                 const float* a, lapack_int lda,
07318                                 const float* tau, float* c, lapack_int ldc,
07319                                 float* work, lapack_int lwork );
07320 lapack_int LAPACKE_dormqr_work( int matrix_order, char side, char trans,
07321                                 lapack_int m, lapack_int n, lapack_int k,
07322                                 const double* a, lapack_int lda,
07323                                 const double* tau, double* c, lapack_int ldc,
07324                                 double* work, lapack_int lwork );
07325 
07326 lapack_int LAPACKE_sormrq_work( int matrix_order, char side, char trans,
07327                                 lapack_int m, lapack_int n, lapack_int k,
07328                                 const float* a, lapack_int lda,
07329                                 const float* tau, float* c, lapack_int ldc,
07330                                 float* work, lapack_int lwork );
07331 lapack_int LAPACKE_dormrq_work( int matrix_order, char side, char trans,
07332                                 lapack_int m, lapack_int n, lapack_int k,
07333                                 const double* a, lapack_int lda,
07334                                 const double* tau, double* c, lapack_int ldc,
07335                                 double* work, lapack_int lwork );
07336 
07337 lapack_int LAPACKE_sormrz_work( int matrix_order, char side, char trans,
07338                                 lapack_int m, lapack_int n, lapack_int k,
07339                                 lapack_int l, const float* a, lapack_int lda,
07340                                 const float* tau, float* c, lapack_int ldc,
07341                                 float* work, lapack_int lwork );
07342 lapack_int LAPACKE_dormrz_work( int matrix_order, char side, char trans,
07343                                 lapack_int m, lapack_int n, lapack_int k,
07344                                 lapack_int l, const double* a, lapack_int lda,
07345                                 const double* tau, double* c, lapack_int ldc,
07346                                 double* work, lapack_int lwork );
07347 
07348 lapack_int LAPACKE_sormtr_work( int matrix_order, char side, char uplo,
07349                                 char trans, lapack_int m, lapack_int n,
07350                                 const float* a, lapack_int lda,
07351                                 const float* tau, float* c, lapack_int ldc,
07352                                 float* work, lapack_int lwork );
07353 lapack_int LAPACKE_dormtr_work( int matrix_order, char side, char uplo,
07354                                 char trans, lapack_int m, lapack_int n,
07355                                 const double* a, lapack_int lda,
07356                                 const double* tau, double* c, lapack_int ldc,
07357                                 double* work, lapack_int lwork );
07358 
07359 lapack_int LAPACKE_spbcon_work( int matrix_order, char uplo, lapack_int n,
07360                                 lapack_int kd, const float* ab, lapack_int ldab,
07361                                 float anorm, float* rcond, float* work,
07362                                 lapack_int* iwork );
07363 lapack_int LAPACKE_dpbcon_work( int matrix_order, char uplo, lapack_int n,
07364                                 lapack_int kd, const double* ab,
07365                                 lapack_int ldab, double anorm, double* rcond,
07366                                 double* work, lapack_int* iwork );
07367 lapack_int LAPACKE_cpbcon_work( int matrix_order, char uplo, lapack_int n,
07368                                 lapack_int kd, const lapack_complex_float* ab,
07369                                 lapack_int ldab, float anorm, float* rcond,
07370                                 lapack_complex_float* work, float* rwork );
07371 lapack_int LAPACKE_zpbcon_work( int matrix_order, char uplo, lapack_int n,
07372                                 lapack_int kd, const lapack_complex_double* ab,
07373                                 lapack_int ldab, double anorm, double* rcond,
07374                                 lapack_complex_double* work, double* rwork );
07375 
07376 lapack_int LAPACKE_spbequ_work( int matrix_order, char uplo, lapack_int n,
07377                                 lapack_int kd, const float* ab, lapack_int ldab,
07378                                 float* s, float* scond, float* amax );
07379 lapack_int LAPACKE_dpbequ_work( int matrix_order, char uplo, lapack_int n,
07380                                 lapack_int kd, const double* ab,
07381                                 lapack_int ldab, double* s, double* scond,
07382                                 double* amax );
07383 lapack_int LAPACKE_cpbequ_work( int matrix_order, char uplo, lapack_int n,
07384                                 lapack_int kd, const lapack_complex_float* ab,
07385                                 lapack_int ldab, float* s, float* scond,
07386                                 float* amax );
07387 lapack_int LAPACKE_zpbequ_work( int matrix_order, char uplo, lapack_int n,
07388                                 lapack_int kd, const lapack_complex_double* ab,
07389                                 lapack_int ldab, double* s, double* scond,
07390                                 double* amax );
07391 
07392 lapack_int LAPACKE_spbrfs_work( int matrix_order, char uplo, lapack_int n,
07393                                 lapack_int kd, lapack_int nrhs, const float* ab,
07394                                 lapack_int ldab, const float* afb,
07395                                 lapack_int ldafb, const float* b,
07396                                 lapack_int ldb, float* x, lapack_int ldx,
07397                                 float* ferr, float* berr, float* work,
07398                                 lapack_int* iwork );
07399 lapack_int LAPACKE_dpbrfs_work( int matrix_order, char uplo, lapack_int n,
07400                                 lapack_int kd, lapack_int nrhs,
07401                                 const double* ab, lapack_int ldab,
07402                                 const double* afb, lapack_int ldafb,
07403                                 const double* b, lapack_int ldb, double* x,
07404                                 lapack_int ldx, double* ferr, double* berr,
07405                                 double* work, lapack_int* iwork );
07406 lapack_int LAPACKE_cpbrfs_work( int matrix_order, char uplo, lapack_int n,
07407                                 lapack_int kd, lapack_int nrhs,
07408                                 const lapack_complex_float* ab, lapack_int ldab,
07409                                 const lapack_complex_float* afb,
07410                                 lapack_int ldafb, const lapack_complex_float* b,
07411                                 lapack_int ldb, lapack_complex_float* x,
07412                                 lapack_int ldx, float* ferr, float* berr,
07413                                 lapack_complex_float* work, float* rwork );
07414 lapack_int LAPACKE_zpbrfs_work( int matrix_order, char uplo, lapack_int n,
07415                                 lapack_int kd, lapack_int nrhs,
07416                                 const lapack_complex_double* ab,
07417                                 lapack_int ldab,
07418                                 const lapack_complex_double* afb,
07419                                 lapack_int ldafb,
07420                                 const lapack_complex_double* b, lapack_int ldb,
07421                                 lapack_complex_double* x, lapack_int ldx,
07422                                 double* ferr, double* berr,
07423                                 lapack_complex_double* work, double* rwork );
07424 
07425 lapack_int LAPACKE_spbstf_work( int matrix_order, char uplo, lapack_int n,
07426                                 lapack_int kb, float* bb, lapack_int ldbb );
07427 lapack_int LAPACKE_dpbstf_work( int matrix_order, char uplo, lapack_int n,
07428                                 lapack_int kb, double* bb, lapack_int ldbb );
07429 lapack_int LAPACKE_cpbstf_work( int matrix_order, char uplo, lapack_int n,
07430                                 lapack_int kb, lapack_complex_float* bb,
07431                                 lapack_int ldbb );
07432 lapack_int LAPACKE_zpbstf_work( int matrix_order, char uplo, lapack_int n,
07433                                 lapack_int kb, lapack_complex_double* bb,
07434                                 lapack_int ldbb );
07435 
07436 lapack_int LAPACKE_spbsv_work( int matrix_order, char uplo, lapack_int n,
07437                                lapack_int kd, lapack_int nrhs, float* ab,
07438                                lapack_int ldab, float* b, lapack_int ldb );
07439 lapack_int LAPACKE_dpbsv_work( int matrix_order, char uplo, lapack_int n,
07440                                lapack_int kd, lapack_int nrhs, double* ab,
07441                                lapack_int ldab, double* b, lapack_int ldb );
07442 lapack_int LAPACKE_cpbsv_work( int matrix_order, char uplo, lapack_int n,
07443                                lapack_int kd, lapack_int nrhs,
07444                                lapack_complex_float* ab, lapack_int ldab,
07445                                lapack_complex_float* b, lapack_int ldb );
07446 lapack_int LAPACKE_zpbsv_work( int matrix_order, char uplo, lapack_int n,
07447                                lapack_int kd, lapack_int nrhs,
07448                                lapack_complex_double* ab, lapack_int ldab,
07449                                lapack_complex_double* b, lapack_int ldb );
07450 
07451 lapack_int LAPACKE_spbsvx_work( int matrix_order, char fact, char uplo,
07452                                 lapack_int n, lapack_int kd, lapack_int nrhs,
07453                                 float* ab, lapack_int ldab, float* afb,
07454                                 lapack_int ldafb, char* equed, float* s,
07455                                 float* b, lapack_int ldb, float* x,
07456                                 lapack_int ldx, float* rcond, float* ferr,
07457                                 float* berr, float* work, lapack_int* iwork );
07458 lapack_int LAPACKE_dpbsvx_work( int matrix_order, char fact, char uplo,
07459                                 lapack_int n, lapack_int kd, lapack_int nrhs,
07460                                 double* ab, lapack_int ldab, double* afb,
07461                                 lapack_int ldafb, char* equed, double* s,
07462                                 double* b, lapack_int ldb, double* x,
07463                                 lapack_int ldx, double* rcond, double* ferr,
07464                                 double* berr, double* work, lapack_int* iwork );
07465 lapack_int LAPACKE_cpbsvx_work( int matrix_order, char fact, char uplo,
07466                                 lapack_int n, lapack_int kd, lapack_int nrhs,
07467                                 lapack_complex_float* ab, lapack_int ldab,
07468                                 lapack_complex_float* afb, lapack_int ldafb,
07469                                 char* equed, float* s, lapack_complex_float* b,
07470                                 lapack_int ldb, lapack_complex_float* x,
07471                                 lapack_int ldx, float* rcond, float* ferr,
07472                                 float* berr, lapack_complex_float* work,
07473                                 float* rwork );
07474 lapack_int LAPACKE_zpbsvx_work( int matrix_order, char fact, char uplo,
07475                                 lapack_int n, lapack_int kd, lapack_int nrhs,
07476                                 lapack_complex_double* ab, lapack_int ldab,
07477                                 lapack_complex_double* afb, lapack_int ldafb,
07478                                 char* equed, double* s,
07479                                 lapack_complex_double* b, lapack_int ldb,
07480                                 lapack_complex_double* x, lapack_int ldx,
07481                                 double* rcond, double* ferr, double* berr,
07482                                 lapack_complex_double* work, double* rwork );
07483 
07484 lapack_int LAPACKE_spbtrf_work( int matrix_order, char uplo, lapack_int n,
07485                                 lapack_int kd, float* ab, lapack_int ldab );
07486 lapack_int LAPACKE_dpbtrf_work( int matrix_order, char uplo, lapack_int n,
07487                                 lapack_int kd, double* ab, lapack_int ldab );
07488 lapack_int LAPACKE_cpbtrf_work( int matrix_order, char uplo, lapack_int n,
07489                                 lapack_int kd, lapack_complex_float* ab,
07490                                 lapack_int ldab );
07491 lapack_int LAPACKE_zpbtrf_work( int matrix_order, char uplo, lapack_int n,
07492                                 lapack_int kd, lapack_complex_double* ab,
07493                                 lapack_int ldab );
07494 
07495 lapack_int LAPACKE_spbtrs_work( int matrix_order, char uplo, lapack_int n,
07496                                 lapack_int kd, lapack_int nrhs, const float* ab,
07497                                 lapack_int ldab, float* b, lapack_int ldb );
07498 lapack_int LAPACKE_dpbtrs_work( int matrix_order, char uplo, lapack_int n,
07499                                 lapack_int kd, lapack_int nrhs,
07500                                 const double* ab, lapack_int ldab, double* b,
07501                                 lapack_int ldb );
07502 lapack_int LAPACKE_cpbtrs_work( int matrix_order, char uplo, lapack_int n,
07503                                 lapack_int kd, lapack_int nrhs,
07504                                 const lapack_complex_float* ab, lapack_int ldab,
07505                                 lapack_complex_float* b, lapack_int ldb );
07506 lapack_int LAPACKE_zpbtrs_work( int matrix_order, char uplo, lapack_int n,
07507                                 lapack_int kd, lapack_int nrhs,
07508                                 const lapack_complex_double* ab,
07509                                 lapack_int ldab, lapack_complex_double* b,
07510                                 lapack_int ldb );
07511 
07512 lapack_int LAPACKE_spftrf_work( int matrix_order, char transr, char uplo,
07513                                 lapack_int n, float* a );
07514 lapack_int LAPACKE_dpftrf_work( int matrix_order, char transr, char uplo,
07515                                 lapack_int n, double* a );
07516 lapack_int LAPACKE_cpftrf_work( int matrix_order, char transr, char uplo,
07517                                 lapack_int n, lapack_complex_float* a );
07518 lapack_int LAPACKE_zpftrf_work( int matrix_order, char transr, char uplo,
07519                                 lapack_int n, lapack_complex_double* a );
07520 
07521 lapack_int LAPACKE_spftri_work( int matrix_order, char transr, char uplo,
07522                                 lapack_int n, float* a );
07523 lapack_int LAPACKE_dpftri_work( int matrix_order, char transr, char uplo,
07524                                 lapack_int n, double* a );
07525 lapack_int LAPACKE_cpftri_work( int matrix_order, char transr, char uplo,
07526                                 lapack_int n, lapack_complex_float* a );
07527 lapack_int LAPACKE_zpftri_work( int matrix_order, char transr, char uplo,
07528                                 lapack_int n, lapack_complex_double* a );
07529 
07530 lapack_int LAPACKE_spftrs_work( int matrix_order, char transr, char uplo,
07531                                 lapack_int n, lapack_int nrhs, const float* a,
07532                                 float* b, lapack_int ldb );
07533 lapack_int LAPACKE_dpftrs_work( int matrix_order, char transr, char uplo,
07534                                 lapack_int n, lapack_int nrhs, const double* a,
07535                                 double* b, lapack_int ldb );
07536 lapack_int LAPACKE_cpftrs_work( int matrix_order, char transr, char uplo,
07537                                 lapack_int n, lapack_int nrhs,
07538                                 const lapack_complex_float* a,
07539                                 lapack_complex_float* b, lapack_int ldb );
07540 lapack_int LAPACKE_zpftrs_work( int matrix_order, char transr, char uplo,
07541                                 lapack_int n, lapack_int nrhs,
07542                                 const lapack_complex_double* a,
07543                                 lapack_complex_double* b, lapack_int ldb );
07544 
07545 lapack_int LAPACKE_spocon_work( int matrix_order, char uplo, lapack_int n,
07546                                 const float* a, lapack_int lda, float anorm,
07547                                 float* rcond, float* work, lapack_int* iwork );
07548 lapack_int LAPACKE_dpocon_work( int matrix_order, char uplo, lapack_int n,
07549                                 const double* a, lapack_int lda, double anorm,
07550                                 double* rcond, double* work,
07551                                 lapack_int* iwork );
07552 lapack_int LAPACKE_cpocon_work( int matrix_order, char uplo, lapack_int n,
07553                                 const lapack_complex_float* a, lapack_int lda,
07554                                 float anorm, float* rcond,
07555                                 lapack_complex_float* work, float* rwork );
07556 lapack_int LAPACKE_zpocon_work( int matrix_order, char uplo, lapack_int n,
07557                                 const lapack_complex_double* a, lapack_int lda,
07558                                 double anorm, double* rcond,
07559                                 lapack_complex_double* work, double* rwork );
07560 
07561 lapack_int LAPACKE_spoequ_work( int matrix_order, lapack_int n, const float* a,
07562                                 lapack_int lda, float* s, float* scond,
07563                                 float* amax );
07564 lapack_int LAPACKE_dpoequ_work( int matrix_order, lapack_int n, const double* a,
07565                                 lapack_int lda, double* s, double* scond,
07566                                 double* amax );
07567 lapack_int LAPACKE_cpoequ_work( int matrix_order, lapack_int n,
07568                                 const lapack_complex_float* a, lapack_int lda,
07569                                 float* s, float* scond, float* amax );
07570 lapack_int LAPACKE_zpoequ_work( int matrix_order, lapack_int n,
07571                                 const lapack_complex_double* a, lapack_int lda,
07572                                 double* s, double* scond, double* amax );
07573 
07574 lapack_int LAPACKE_spoequb_work( int matrix_order, lapack_int n, const float* a,
07575                                  lapack_int lda, float* s, float* scond,
07576                                  float* amax );
07577 lapack_int LAPACKE_dpoequb_work( int matrix_order, lapack_int n,
07578                                  const double* a, lapack_int lda, double* s,
07579                                  double* scond, double* amax );
07580 lapack_int LAPACKE_cpoequb_work( int matrix_order, lapack_int n,
07581                                  const lapack_complex_float* a, lapack_int lda,
07582                                  float* s, float* scond, float* amax );
07583 lapack_int LAPACKE_zpoequb_work( int matrix_order, lapack_int n,
07584                                  const lapack_complex_double* a, lapack_int lda,
07585                                  double* s, double* scond, double* amax );
07586 
07587 lapack_int LAPACKE_sporfs_work( int matrix_order, char uplo, lapack_int n,
07588                                 lapack_int nrhs, const float* a, lapack_int lda,
07589                                 const float* af, lapack_int ldaf,
07590                                 const float* b, lapack_int ldb, float* x,
07591                                 lapack_int ldx, float* ferr, float* berr,
07592                                 float* work, lapack_int* iwork );
07593 lapack_int LAPACKE_dporfs_work( int matrix_order, char uplo, lapack_int n,
07594                                 lapack_int nrhs, const double* a,
07595                                 lapack_int lda, const double* af,
07596                                 lapack_int ldaf, const double* b,
07597                                 lapack_int ldb, double* x, lapack_int ldx,
07598                                 double* ferr, double* berr, double* work,
07599                                 lapack_int* iwork );
07600 lapack_int LAPACKE_cporfs_work( int matrix_order, char uplo, lapack_int n,
07601                                 lapack_int nrhs, const lapack_complex_float* a,
07602                                 lapack_int lda, const lapack_complex_float* af,
07603                                 lapack_int ldaf, const lapack_complex_float* b,
07604                                 lapack_int ldb, lapack_complex_float* x,
07605                                 lapack_int ldx, float* ferr, float* berr,
07606                                 lapack_complex_float* work, float* rwork );
07607 lapack_int LAPACKE_zporfs_work( int matrix_order, char uplo, lapack_int n,
07608                                 lapack_int nrhs, const lapack_complex_double* a,
07609                                 lapack_int lda, const lapack_complex_double* af,
07610                                 lapack_int ldaf, const lapack_complex_double* b,
07611                                 lapack_int ldb, lapack_complex_double* x,
07612                                 lapack_int ldx, double* ferr, double* berr,
07613                                 lapack_complex_double* work, double* rwork );
07614 
07615 lapack_int LAPACKE_sporfsx_work( int matrix_order, char uplo, char equed,
07616                                  lapack_int n, lapack_int nrhs, const float* a,
07617                                  lapack_int lda, const float* af,
07618                                  lapack_int ldaf, const float* s,
07619                                  const float* b, lapack_int ldb, float* x,
07620                                  lapack_int ldx, float* rcond, float* berr,
07621                                  lapack_int n_err_bnds, float* err_bnds_norm,
07622                                  float* err_bnds_comp, lapack_int nparams,
07623                                  float* params, float* work,
07624                                  lapack_int* iwork );
07625 lapack_int LAPACKE_dporfsx_work( int matrix_order, char uplo, char equed,
07626                                  lapack_int n, lapack_int nrhs, const double* a,
07627                                  lapack_int lda, const double* af,
07628                                  lapack_int ldaf, const double* s,
07629                                  const double* b, lapack_int ldb, double* x,
07630                                  lapack_int ldx, double* rcond, double* berr,
07631                                  lapack_int n_err_bnds, double* err_bnds_norm,
07632                                  double* err_bnds_comp, lapack_int nparams,
07633                                  double* params, double* work,
07634                                  lapack_int* iwork );
07635 lapack_int LAPACKE_cporfsx_work( int matrix_order, char uplo, char equed,
07636                                  lapack_int n, lapack_int nrhs,
07637                                  const lapack_complex_float* a, lapack_int lda,
07638                                  const lapack_complex_float* af,
07639                                  lapack_int ldaf, const float* s,
07640                                  const lapack_complex_float* b, lapack_int ldb,
07641                                  lapack_complex_float* x, lapack_int ldx,
07642                                  float* rcond, float* berr,
07643                                  lapack_int n_err_bnds, float* err_bnds_norm,
07644                                  float* err_bnds_comp, lapack_int nparams,
07645                                  float* params, lapack_complex_float* work,
07646                                  float* rwork );
07647 lapack_int LAPACKE_zporfsx_work( int matrix_order, char uplo, char equed,
07648                                  lapack_int n, lapack_int nrhs,
07649                                  const lapack_complex_double* a, lapack_int lda,
07650                                  const lapack_complex_double* af,
07651                                  lapack_int ldaf, const double* s,
07652                                  const lapack_complex_double* b, lapack_int ldb,
07653                                  lapack_complex_double* x, lapack_int ldx,
07654                                  double* rcond, double* berr,
07655                                  lapack_int n_err_bnds, double* err_bnds_norm,
07656                                  double* err_bnds_comp, lapack_int nparams,
07657                                  double* params, lapack_complex_double* work,
07658                                  double* rwork );
07659 
07660 lapack_int LAPACKE_sposv_work( int matrix_order, char uplo, lapack_int n,
07661                                lapack_int nrhs, float* a, lapack_int lda,
07662                                float* b, lapack_int ldb );
07663 lapack_int LAPACKE_dposv_work( int matrix_order, char uplo, lapack_int n,
07664                                lapack_int nrhs, double* a, lapack_int lda,
07665                                double* b, lapack_int ldb );
07666 lapack_int LAPACKE_cposv_work( int matrix_order, char uplo, lapack_int n,
07667                                lapack_int nrhs, lapack_complex_float* a,
07668                                lapack_int lda, lapack_complex_float* b,
07669                                lapack_int ldb );
07670 lapack_int LAPACKE_zposv_work( int matrix_order, char uplo, lapack_int n,
07671                                lapack_int nrhs, lapack_complex_double* a,
07672                                lapack_int lda, lapack_complex_double* b,
07673                                lapack_int ldb );
07674 lapack_int LAPACKE_dsposv_work( int matrix_order, char uplo, lapack_int n,
07675                                 lapack_int nrhs, double* a, lapack_int lda,
07676                                 double* b, lapack_int ldb, double* x,
07677                                 lapack_int ldx, double* work, float* swork,
07678                                 lapack_int* iter );
07679 lapack_int LAPACKE_zcposv_work( int matrix_order, char uplo, lapack_int n,
07680                                 lapack_int nrhs, lapack_complex_double* a,
07681                                 lapack_int lda, lapack_complex_double* b,
07682                                 lapack_int ldb, lapack_complex_double* x,
07683                                 lapack_int ldx, lapack_complex_double* work,
07684                                 lapack_complex_float* swork, double* rwork,
07685                                 lapack_int* iter );
07686 
07687 lapack_int LAPACKE_sposvx_work( int matrix_order, char fact, char uplo,
07688                                 lapack_int n, lapack_int nrhs, float* a,
07689                                 lapack_int lda, float* af, lapack_int ldaf,
07690                                 char* equed, float* s, float* b, lapack_int ldb,
07691                                 float* x, lapack_int ldx, float* rcond,
07692                                 float* ferr, float* berr, float* work,
07693                                 lapack_int* iwork );
07694 lapack_int LAPACKE_dposvx_work( int matrix_order, char fact, char uplo,
07695                                 lapack_int n, lapack_int nrhs, double* a,
07696                                 lapack_int lda, double* af, lapack_int ldaf,
07697                                 char* equed, double* s, double* b,
07698                                 lapack_int ldb, double* x, lapack_int ldx,
07699                                 double* rcond, double* ferr, double* berr,
07700                                 double* work, lapack_int* iwork );
07701 lapack_int LAPACKE_cposvx_work( int matrix_order, char fact, char uplo,
07702                                 lapack_int n, lapack_int nrhs,
07703                                 lapack_complex_float* a, lapack_int lda,
07704                                 lapack_complex_float* af, lapack_int ldaf,
07705                                 char* equed, float* s, lapack_complex_float* b,
07706                                 lapack_int ldb, lapack_complex_float* x,
07707                                 lapack_int ldx, float* rcond, float* ferr,
07708                                 float* berr, lapack_complex_float* work,
07709                                 float* rwork );
07710 lapack_int LAPACKE_zposvx_work( int matrix_order, char fact, char uplo,
07711                                 lapack_int n, lapack_int nrhs,
07712                                 lapack_complex_double* a, lapack_int lda,
07713                                 lapack_complex_double* af, lapack_int ldaf,
07714                                 char* equed, double* s,
07715                                 lapack_complex_double* b, lapack_int ldb,
07716                                 lapack_complex_double* x, lapack_int ldx,
07717                                 double* rcond, double* ferr, double* berr,
07718                                 lapack_complex_double* work, double* rwork );
07719 
07720 lapack_int LAPACKE_sposvxx_work( int matrix_order, char fact, char uplo,
07721                                  lapack_int n, lapack_int nrhs, float* a,
07722                                  lapack_int lda, float* af, lapack_int ldaf,
07723                                  char* equed, float* s, float* b,
07724                                  lapack_int ldb, float* x, lapack_int ldx,
07725                                  float* rcond, float* rpvgrw, float* berr,
07726                                  lapack_int n_err_bnds, float* err_bnds_norm,
07727                                  float* err_bnds_comp, lapack_int nparams,
07728                                  float* params, float* work,
07729                                  lapack_int* iwork );
07730 lapack_int LAPACKE_dposvxx_work( int matrix_order, char fact, char uplo,
07731                                  lapack_int n, lapack_int nrhs, double* a,
07732                                  lapack_int lda, double* af, lapack_int ldaf,
07733                                  char* equed, double* s, double* b,
07734                                  lapack_int ldb, double* x, lapack_int ldx,
07735                                  double* rcond, double* rpvgrw, double* berr,
07736                                  lapack_int n_err_bnds, double* err_bnds_norm,
07737                                  double* err_bnds_comp, lapack_int nparams,
07738                                  double* params, double* work,
07739                                  lapack_int* iwork );
07740 lapack_int LAPACKE_cposvxx_work( int matrix_order, char fact, char uplo,
07741                                  lapack_int n, lapack_int nrhs,
07742                                  lapack_complex_float* a, lapack_int lda,
07743                                  lapack_complex_float* af, lapack_int ldaf,
07744                                  char* equed, float* s, lapack_complex_float* b,
07745                                  lapack_int ldb, lapack_complex_float* x,
07746                                  lapack_int ldx, float* rcond, float* rpvgrw,
07747                                  float* berr, lapack_int n_err_bnds,
07748                                  float* err_bnds_norm, float* err_bnds_comp,
07749                                  lapack_int nparams, float* params,
07750                                  lapack_complex_float* work, float* rwork );
07751 lapack_int LAPACKE_zposvxx_work( int matrix_order, char fact, char uplo,
07752                                  lapack_int n, lapack_int nrhs,
07753                                  lapack_complex_double* a, lapack_int lda,
07754                                  lapack_complex_double* af, lapack_int ldaf,
07755                                  char* equed, double* s,
07756                                  lapack_complex_double* b, lapack_int ldb,
07757                                  lapack_complex_double* x, lapack_int ldx,
07758                                  double* rcond, double* rpvgrw, double* berr,
07759                                  lapack_int n_err_bnds, double* err_bnds_norm,
07760                                  double* err_bnds_comp, lapack_int nparams,
07761                                  double* params, lapack_complex_double* work,
07762                                  double* rwork );
07763 
07764 lapack_int LAPACKE_spotrf_work( int matrix_order, char uplo, lapack_int n,
07765                                 float* a, lapack_int lda );
07766 lapack_int LAPACKE_dpotrf_work( int matrix_order, char uplo, lapack_int n,
07767                                 double* a, lapack_int lda );
07768 lapack_int LAPACKE_cpotrf_work( int matrix_order, char uplo, lapack_int n,
07769                                 lapack_complex_float* a, lapack_int lda );
07770 lapack_int LAPACKE_zpotrf_work( int matrix_order, char uplo, lapack_int n,
07771                                 lapack_complex_double* a, lapack_int lda );
07772 
07773 lapack_int LAPACKE_spotri_work( int matrix_order, char uplo, lapack_int n,
07774                                 float* a, lapack_int lda );
07775 lapack_int LAPACKE_dpotri_work( int matrix_order, char uplo, lapack_int n,
07776                                 double* a, lapack_int lda );
07777 lapack_int LAPACKE_cpotri_work( int matrix_order, char uplo, lapack_int n,
07778                                 lapack_complex_float* a, lapack_int lda );
07779 lapack_int LAPACKE_zpotri_work( int matrix_order, char uplo, lapack_int n,
07780                                 lapack_complex_double* a, lapack_int lda );
07781 
07782 lapack_int LAPACKE_spotrs_work( int matrix_order, char uplo, lapack_int n,
07783                                 lapack_int nrhs, const float* a, lapack_int lda,
07784                                 float* b, lapack_int ldb );
07785 lapack_int LAPACKE_dpotrs_work( int matrix_order, char uplo, lapack_int n,
07786                                 lapack_int nrhs, const double* a,
07787                                 lapack_int lda, double* b, lapack_int ldb );
07788 lapack_int LAPACKE_cpotrs_work( int matrix_order, char uplo, lapack_int n,
07789                                 lapack_int nrhs, const lapack_complex_float* a,
07790                                 lapack_int lda, lapack_complex_float* b,
07791                                 lapack_int ldb );
07792 lapack_int LAPACKE_zpotrs_work( int matrix_order, char uplo, lapack_int n,
07793                                 lapack_int nrhs, const lapack_complex_double* a,
07794                                 lapack_int lda, lapack_complex_double* b,
07795                                 lapack_int ldb );
07796 
07797 lapack_int LAPACKE_sppcon_work( int matrix_order, char uplo, lapack_int n,
07798                                 const float* ap, float anorm, float* rcond,
07799                                 float* work, lapack_int* iwork );
07800 lapack_int LAPACKE_dppcon_work( int matrix_order, char uplo, lapack_int n,
07801                                 const double* ap, double anorm, double* rcond,
07802                                 double* work, lapack_int* iwork );
07803 lapack_int LAPACKE_cppcon_work( int matrix_order, char uplo, lapack_int n,
07804                                 const lapack_complex_float* ap, float anorm,
07805                                 float* rcond, lapack_complex_float* work,
07806                                 float* rwork );
07807 lapack_int LAPACKE_zppcon_work( int matrix_order, char uplo, lapack_int n,
07808                                 const lapack_complex_double* ap, double anorm,
07809                                 double* rcond, lapack_complex_double* work,
07810                                 double* rwork );
07811 
07812 lapack_int LAPACKE_sppequ_work( int matrix_order, char uplo, lapack_int n,
07813                                 const float* ap, float* s, float* scond,
07814                                 float* amax );
07815 lapack_int LAPACKE_dppequ_work( int matrix_order, char uplo, lapack_int n,
07816                                 const double* ap, double* s, double* scond,
07817                                 double* amax );
07818 lapack_int LAPACKE_cppequ_work( int matrix_order, char uplo, lapack_int n,
07819                                 const lapack_complex_float* ap, float* s,
07820                                 float* scond, float* amax );
07821 lapack_int LAPACKE_zppequ_work( int matrix_order, char uplo, lapack_int n,
07822                                 const lapack_complex_double* ap, double* s,
07823                                 double* scond, double* amax );
07824 
07825 lapack_int LAPACKE_spprfs_work( int matrix_order, char uplo, lapack_int n,
07826                                 lapack_int nrhs, const float* ap,
07827                                 const float* afp, const float* b,
07828                                 lapack_int ldb, float* x, lapack_int ldx,
07829                                 float* ferr, float* berr, float* work,
07830                                 lapack_int* iwork );
07831 lapack_int LAPACKE_dpprfs_work( int matrix_order, char uplo, lapack_int n,
07832                                 lapack_int nrhs, const double* ap,
07833                                 const double* afp, const double* b,
07834                                 lapack_int ldb, double* x, lapack_int ldx,
07835                                 double* ferr, double* berr, double* work,
07836                                 lapack_int* iwork );
07837 lapack_int LAPACKE_cpprfs_work( int matrix_order, char uplo, lapack_int n,
07838                                 lapack_int nrhs, const lapack_complex_float* ap,
07839                                 const lapack_complex_float* afp,
07840                                 const lapack_complex_float* b, lapack_int ldb,
07841                                 lapack_complex_float* x, lapack_int ldx,
07842                                 float* ferr, float* berr,
07843                                 lapack_complex_float* work, float* rwork );
07844 lapack_int LAPACKE_zpprfs_work( int matrix_order, char uplo, lapack_int n,
07845                                 lapack_int nrhs,
07846                                 const lapack_complex_double* ap,
07847                                 const lapack_complex_double* afp,
07848                                 const lapack_complex_double* b, lapack_int ldb,
07849                                 lapack_complex_double* x, lapack_int ldx,
07850                                 double* ferr, double* berr,
07851                                 lapack_complex_double* work, double* rwork );
07852 
07853 lapack_int LAPACKE_sppsv_work( int matrix_order, char uplo, lapack_int n,
07854                                lapack_int nrhs, float* ap, float* b,
07855                                lapack_int ldb );
07856 lapack_int LAPACKE_dppsv_work( int matrix_order, char uplo, lapack_int n,
07857                                lapack_int nrhs, double* ap, double* b,
07858                                lapack_int ldb );
07859 lapack_int LAPACKE_cppsv_work( int matrix_order, char uplo, lapack_int n,
07860                                lapack_int nrhs, lapack_complex_float* ap,
07861                                lapack_complex_float* b, lapack_int ldb );
07862 lapack_int LAPACKE_zppsv_work( int matrix_order, char uplo, lapack_int n,
07863                                lapack_int nrhs, lapack_complex_double* ap,
07864                                lapack_complex_double* b, lapack_int ldb );
07865 
07866 lapack_int LAPACKE_sppsvx_work( int matrix_order, char fact, char uplo,
07867                                 lapack_int n, lapack_int nrhs, float* ap,
07868                                 float* afp, char* equed, float* s, float* b,
07869                                 lapack_int ldb, float* x, lapack_int ldx,
07870                                 float* rcond, float* ferr, float* berr,
07871                                 float* work, lapack_int* iwork );
07872 lapack_int LAPACKE_dppsvx_work( int matrix_order, char fact, char uplo,
07873                                 lapack_int n, lapack_int nrhs, double* ap,
07874                                 double* afp, char* equed, double* s, double* b,
07875                                 lapack_int ldb, double* x, lapack_int ldx,
07876                                 double* rcond, double* ferr, double* berr,
07877                                 double* work, lapack_int* iwork );
07878 lapack_int LAPACKE_cppsvx_work( int matrix_order, char fact, char uplo,
07879                                 lapack_int n, lapack_int nrhs,
07880                                 lapack_complex_float* ap,
07881                                 lapack_complex_float* afp, char* equed,
07882                                 float* s, lapack_complex_float* b,
07883                                 lapack_int ldb, lapack_complex_float* x,
07884                                 lapack_int ldx, float* rcond, float* ferr,
07885                                 float* berr, lapack_complex_float* work,
07886                                 float* rwork );
07887 lapack_int LAPACKE_zppsvx_work( int matrix_order, char fact, char uplo,
07888                                 lapack_int n, lapack_int nrhs,
07889                                 lapack_complex_double* ap,
07890                                 lapack_complex_double* afp, char* equed,
07891                                 double* s, lapack_complex_double* b,
07892                                 lapack_int ldb, lapack_complex_double* x,
07893                                 lapack_int ldx, double* rcond, double* ferr,
07894                                 double* berr, lapack_complex_double* work,
07895                                 double* rwork );
07896 
07897 lapack_int LAPACKE_spptrf_work( int matrix_order, char uplo, lapack_int n,
07898                                 float* ap );
07899 lapack_int LAPACKE_dpptrf_work( int matrix_order, char uplo, lapack_int n,
07900                                 double* ap );
07901 lapack_int LAPACKE_cpptrf_work( int matrix_order, char uplo, lapack_int n,
07902                                 lapack_complex_float* ap );
07903 lapack_int LAPACKE_zpptrf_work( int matrix_order, char uplo, lapack_int n,
07904                                 lapack_complex_double* ap );
07905 
07906 lapack_int LAPACKE_spptri_work( int matrix_order, char uplo, lapack_int n,
07907                                 float* ap );
07908 lapack_int LAPACKE_dpptri_work( int matrix_order, char uplo, lapack_int n,
07909                                 double* ap );
07910 lapack_int LAPACKE_cpptri_work( int matrix_order, char uplo, lapack_int n,
07911                                 lapack_complex_float* ap );
07912 lapack_int LAPACKE_zpptri_work( int matrix_order, char uplo, lapack_int n,
07913                                 lapack_complex_double* ap );
07914 
07915 lapack_int LAPACKE_spptrs_work( int matrix_order, char uplo, lapack_int n,
07916                                 lapack_int nrhs, const float* ap, float* b,
07917                                 lapack_int ldb );
07918 lapack_int LAPACKE_dpptrs_work( int matrix_order, char uplo, lapack_int n,
07919                                 lapack_int nrhs, const double* ap, double* b,
07920                                 lapack_int ldb );
07921 lapack_int LAPACKE_cpptrs_work( int matrix_order, char uplo, lapack_int n,
07922                                 lapack_int nrhs, const lapack_complex_float* ap,
07923                                 lapack_complex_float* b, lapack_int ldb );
07924 lapack_int LAPACKE_zpptrs_work( int matrix_order, char uplo, lapack_int n,
07925                                 lapack_int nrhs,
07926                                 const lapack_complex_double* ap,
07927                                 lapack_complex_double* b, lapack_int ldb );
07928 
07929 lapack_int LAPACKE_spstrf_work( int matrix_order, char uplo, lapack_int n,
07930                                 float* a, lapack_int lda, lapack_int* piv,
07931                                 lapack_int* rank, float tol, float* work );
07932 lapack_int LAPACKE_dpstrf_work( int matrix_order, char uplo, lapack_int n,
07933                                 double* a, lapack_int lda, lapack_int* piv,
07934                                 lapack_int* rank, double tol, double* work );
07935 lapack_int LAPACKE_cpstrf_work( int matrix_order, char uplo, lapack_int n,
07936                                 lapack_complex_float* a, lapack_int lda,
07937                                 lapack_int* piv, lapack_int* rank, float tol,
07938                                 float* work );
07939 lapack_int LAPACKE_zpstrf_work( int matrix_order, char uplo, lapack_int n,
07940                                 lapack_complex_double* a, lapack_int lda,
07941                                 lapack_int* piv, lapack_int* rank, double tol,
07942                                 double* work );
07943 
07944 lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
07945                                 float anorm, float* rcond, float* work );
07946 lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
07947                                 double anorm, double* rcond, double* work );
07948 lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
07949                                 const lapack_complex_float* e, float anorm,
07950                                 float* rcond, float* work );
07951 lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
07952                                 const lapack_complex_double* e, double anorm,
07953                                 double* rcond, double* work );
07954 
07955 lapack_int LAPACKE_spteqr_work( int matrix_order, char compz, lapack_int n,
07956                                 float* d, float* e, float* z, lapack_int ldz,
07957                                 float* work );
07958 lapack_int LAPACKE_dpteqr_work( int matrix_order, char compz, lapack_int n,
07959                                 double* d, double* e, double* z, lapack_int ldz,
07960                                 double* work );
07961 lapack_int LAPACKE_cpteqr_work( int matrix_order, char compz, lapack_int n,
07962                                 float* d, float* e, lapack_complex_float* z,
07963                                 lapack_int ldz, float* work );
07964 lapack_int LAPACKE_zpteqr_work( int matrix_order, char compz, lapack_int n,
07965                                 double* d, double* e, lapack_complex_double* z,
07966                                 lapack_int ldz, double* work );
07967 
07968 lapack_int LAPACKE_sptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07969                                 const float* d, const float* e, const float* df,
07970                                 const float* ef, const float* b, lapack_int ldb,
07971                                 float* x, lapack_int ldx, float* ferr,
07972                                 float* berr, float* work );
07973 lapack_int LAPACKE_dptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
07974                                 const double* d, const double* e,
07975                                 const double* df, const double* ef,
07976                                 const double* b, lapack_int ldb, double* x,
07977                                 lapack_int ldx, double* ferr, double* berr,
07978                                 double* work );
07979 lapack_int LAPACKE_cptrfs_work( int matrix_order, char uplo, lapack_int n,
07980                                 lapack_int nrhs, const float* d,
07981                                 const lapack_complex_float* e, const float* df,
07982                                 const lapack_complex_float* ef,
07983                                 const lapack_complex_float* b, lapack_int ldb,
07984                                 lapack_complex_float* x, lapack_int ldx,
07985                                 float* ferr, float* berr,
07986                                 lapack_complex_float* work, float* rwork );
07987 lapack_int LAPACKE_zptrfs_work( int matrix_order, char uplo, lapack_int n,
07988                                 lapack_int nrhs, const double* d,
07989                                 const lapack_complex_double* e,
07990                                 const double* df,
07991                                 const lapack_complex_double* ef,
07992                                 const lapack_complex_double* b, lapack_int ldb,
07993                                 lapack_complex_double* x, lapack_int ldx,
07994                                 double* ferr, double* berr,
07995                                 lapack_complex_double* work, double* rwork );
07996 
07997 lapack_int LAPACKE_sptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
07998                                float* d, float* e, float* b, lapack_int ldb );
07999 lapack_int LAPACKE_dptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
08000                                double* d, double* e, double* b,
08001                                lapack_int ldb );
08002 lapack_int LAPACKE_cptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
08003                                float* d, lapack_complex_float* e,
08004                                lapack_complex_float* b, lapack_int ldb );
08005 lapack_int LAPACKE_zptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
08006                                double* d, lapack_complex_double* e,
08007                                lapack_complex_double* b, lapack_int ldb );
08008 
08009 lapack_int LAPACKE_sptsvx_work( int matrix_order, char fact, lapack_int n,
08010                                 lapack_int nrhs, const float* d, const float* e,
08011                                 float* df, float* ef, const float* b,
08012                                 lapack_int ldb, float* x, lapack_int ldx,
08013                                 float* rcond, float* ferr, float* berr,
08014                                 float* work );
08015 lapack_int LAPACKE_dptsvx_work( int matrix_order, char fact, lapack_int n,
08016                                 lapack_int nrhs, const double* d,
08017                                 const double* e, double* df, double* ef,
08018                                 const double* b, lapack_int ldb, double* x,
08019                                 lapack_int ldx, double* rcond, double* ferr,
08020                                 double* berr, double* work );
08021 lapack_int LAPACKE_cptsvx_work( int matrix_order, char fact, lapack_int n,
08022                                 lapack_int nrhs, const float* d,
08023                                 const lapack_complex_float* e, float* df,
08024                                 lapack_complex_float* ef,
08025                                 const lapack_complex_float* b, lapack_int ldb,
08026                                 lapack_complex_float* x, lapack_int ldx,
08027                                 float* rcond, float* ferr, float* berr,
08028                                 lapack_complex_float* work, float* rwork );
08029 lapack_int LAPACKE_zptsvx_work( int matrix_order, char fact, lapack_int n,
08030                                 lapack_int nrhs, const double* d,
08031                                 const lapack_complex_double* e, double* df,
08032                                 lapack_complex_double* ef,
08033                                 const lapack_complex_double* b, lapack_int ldb,
08034                                 lapack_complex_double* x, lapack_int ldx,
08035                                 double* rcond, double* ferr, double* berr,
08036                                 lapack_complex_double* work, double* rwork );
08037 
08038 lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
08039 lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
08040 lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
08041                                 lapack_complex_float* e );
08042 lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
08043                                 lapack_complex_double* e );
08044 
08045 lapack_int LAPACKE_spttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
08046                                 const float* d, const float* e, float* b,
08047                                 lapack_int ldb );
08048 lapack_int LAPACKE_dpttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
08049                                 const double* d, const double* e, double* b,
08050                                 lapack_int ldb );
08051 lapack_int LAPACKE_cpttrs_work( int matrix_order, char uplo, lapack_int n,
08052                                 lapack_int nrhs, const float* d,
08053                                 const lapack_complex_float* e,
08054                                 lapack_complex_float* b, lapack_int ldb );
08055 lapack_int LAPACKE_zpttrs_work( int matrix_order, char uplo, lapack_int n,
08056                                 lapack_int nrhs, const double* d,
08057                                 const lapack_complex_double* e,
08058                                 lapack_complex_double* b, lapack_int ldb );
08059 
08060 lapack_int LAPACKE_ssbev_work( int matrix_order, char jobz, char uplo,
08061                                lapack_int n, lapack_int kd, float* ab,
08062                                lapack_int ldab, float* w, float* z,
08063                                lapack_int ldz, float* work );
08064 lapack_int LAPACKE_dsbev_work( int matrix_order, char jobz, char uplo,
08065                                lapack_int n, lapack_int kd, double* ab,
08066                                lapack_int ldab, double* w, double* z,
08067                                lapack_int ldz, double* work );
08068 
08069 lapack_int LAPACKE_ssbevd_work( int matrix_order, char jobz, char uplo,
08070                                 lapack_int n, lapack_int kd, float* ab,
08071                                 lapack_int ldab, float* w, float* z,
08072                                 lapack_int ldz, float* work, lapack_int lwork,
08073                                 lapack_int* iwork, lapack_int liwork );
08074 lapack_int LAPACKE_dsbevd_work( int matrix_order, char jobz, char uplo,
08075                                 lapack_int n, lapack_int kd, double* ab,
08076                                 lapack_int ldab, double* w, double* z,
08077                                 lapack_int ldz, double* work, lapack_int lwork,
08078                                 lapack_int* iwork, lapack_int liwork );
08079 
08080 lapack_int LAPACKE_ssbevx_work( int matrix_order, char jobz, char range,
08081                                 char uplo, lapack_int n, lapack_int kd,
08082                                 float* ab, lapack_int ldab, float* q,
08083                                 lapack_int ldq, float vl, float vu,
08084                                 lapack_int il, lapack_int iu, float abstol,
08085                                 lapack_int* m, float* w, float* z,
08086                                 lapack_int ldz, float* work, lapack_int* iwork,
08087                                 lapack_int* ifail );
08088 lapack_int LAPACKE_dsbevx_work( int matrix_order, char jobz, char range,
08089                                 char uplo, lapack_int n, lapack_int kd,
08090                                 double* ab, lapack_int ldab, double* q,
08091                                 lapack_int ldq, double vl, double vu,
08092                                 lapack_int il, lapack_int iu, double abstol,
08093                                 lapack_int* m, double* w, double* z,
08094                                 lapack_int ldz, double* work, lapack_int* iwork,
08095                                 lapack_int* ifail );
08096 
08097 lapack_int LAPACKE_ssbgst_work( int matrix_order, char vect, char uplo,
08098                                 lapack_int n, lapack_int ka, lapack_int kb,
08099                                 float* ab, lapack_int ldab, const float* bb,
08100                                 lapack_int ldbb, float* x, lapack_int ldx,
08101                                 float* work );
08102 lapack_int LAPACKE_dsbgst_work( int matrix_order, char vect, char uplo,
08103                                 lapack_int n, lapack_int ka, lapack_int kb,
08104                                 double* ab, lapack_int ldab, const double* bb,
08105                                 lapack_int ldbb, double* x, lapack_int ldx,
08106                                 double* work );
08107 
08108 lapack_int LAPACKE_ssbgv_work( int matrix_order, char jobz, char uplo,
08109                                lapack_int n, lapack_int ka, lapack_int kb,
08110                                float* ab, lapack_int ldab, float* bb,
08111                                lapack_int ldbb, float* w, float* z,
08112                                lapack_int ldz, float* work );
08113 lapack_int LAPACKE_dsbgv_work( int matrix_order, char jobz, char uplo,
08114                                lapack_int n, lapack_int ka, lapack_int kb,
08115                                double* ab, lapack_int ldab, double* bb,
08116                                lapack_int ldbb, double* w, double* z,
08117                                lapack_int ldz, double* work );
08118 
08119 lapack_int LAPACKE_ssbgvd_work( int matrix_order, char jobz, char uplo,
08120                                 lapack_int n, lapack_int ka, lapack_int kb,
08121                                 float* ab, lapack_int ldab, float* bb,
08122                                 lapack_int ldbb, float* w, float* z,
08123                                 lapack_int ldz, float* work, lapack_int lwork,
08124                                 lapack_int* iwork, lapack_int liwork );
08125 lapack_int LAPACKE_dsbgvd_work( int matrix_order, char jobz, char uplo,
08126                                 lapack_int n, lapack_int ka, lapack_int kb,
08127                                 double* ab, lapack_int ldab, double* bb,
08128                                 lapack_int ldbb, double* w, double* z,
08129                                 lapack_int ldz, double* work, lapack_int lwork,
08130                                 lapack_int* iwork, lapack_int liwork );
08131 
08132 lapack_int LAPACKE_ssbgvx_work( int matrix_order, char jobz, char range,
08133                                 char uplo, lapack_int n, lapack_int ka,
08134                                 lapack_int kb, float* ab, lapack_int ldab,
08135                                 float* bb, lapack_int ldbb, float* q,
08136                                 lapack_int ldq, float vl, float vu,
08137                                 lapack_int il, lapack_int iu, float abstol,
08138                                 lapack_int* m, float* w, float* z,
08139                                 lapack_int ldz, float* work, lapack_int* iwork,
08140                                 lapack_int* ifail );
08141 lapack_int LAPACKE_dsbgvx_work( int matrix_order, char jobz, char range,
08142                                 char uplo, lapack_int n, lapack_int ka,
08143                                 lapack_int kb, double* ab, lapack_int ldab,
08144                                 double* bb, lapack_int ldbb, double* q,
08145                                 lapack_int ldq, double vl, double vu,
08146                                 lapack_int il, lapack_int iu, double abstol,
08147                                 lapack_int* m, double* w, double* z,
08148                                 lapack_int ldz, double* work, lapack_int* iwork,
08149                                 lapack_int* ifail );
08150 
08151 lapack_int LAPACKE_ssbtrd_work( int matrix_order, char vect, char uplo,
08152                                 lapack_int n, lapack_int kd, float* ab,
08153                                 lapack_int ldab, float* d, float* e, float* q,
08154                                 lapack_int ldq, float* work );
08155 lapack_int LAPACKE_dsbtrd_work( int matrix_order, char vect, char uplo,
08156                                 lapack_int n, lapack_int kd, double* ab,
08157                                 lapack_int ldab, double* d, double* e,
08158                                 double* q, lapack_int ldq, double* work );
08159 
08160 lapack_int LAPACKE_ssfrk_work( int matrix_order, char transr, char uplo,
08161                                char trans, lapack_int n, lapack_int k,
08162                                float alpha, const float* a, lapack_int lda,
08163                                float beta, float* c );
08164 lapack_int LAPACKE_dsfrk_work( int matrix_order, char transr, char uplo,
08165                                char trans, lapack_int n, lapack_int k,
08166                                double alpha, const double* a, lapack_int lda,
08167                                double beta, double* c );
08168 
08169 lapack_int LAPACKE_sspcon_work( int matrix_order, char uplo, lapack_int n,
08170                                 const float* ap, const lapack_int* ipiv,
08171                                 float anorm, float* rcond, float* work,
08172                                 lapack_int* iwork );
08173 lapack_int LAPACKE_dspcon_work( int matrix_order, char uplo, lapack_int n,
08174                                 const double* ap, const lapack_int* ipiv,
08175                                 double anorm, double* rcond, double* work,
08176                                 lapack_int* iwork );
08177 lapack_int LAPACKE_cspcon_work( int matrix_order, char uplo, lapack_int n,
08178                                 const lapack_complex_float* ap,
08179                                 const lapack_int* ipiv, float anorm,
08180                                 float* rcond, lapack_complex_float* work );
08181 lapack_int LAPACKE_zspcon_work( int matrix_order, char uplo, lapack_int n,
08182                                 const lapack_complex_double* ap,
08183                                 const lapack_int* ipiv, double anorm,
08184                                 double* rcond, lapack_complex_double* work );
08185 
08186 lapack_int LAPACKE_sspev_work( int matrix_order, char jobz, char uplo,
08187                                lapack_int n, float* ap, float* w, float* z,
08188                                lapack_int ldz, float* work );
08189 lapack_int LAPACKE_dspev_work( int matrix_order, char jobz, char uplo,
08190                                lapack_int n, double* ap, double* w, double* z,
08191                                lapack_int ldz, double* work );
08192 
08193 lapack_int LAPACKE_sspevd_work( int matrix_order, char jobz, char uplo,
08194                                 lapack_int n, float* ap, float* w, float* z,
08195                                 lapack_int ldz, float* work, lapack_int lwork,
08196                                 lapack_int* iwork, lapack_int liwork );
08197 lapack_int LAPACKE_dspevd_work( int matrix_order, char jobz, char uplo,
08198                                 lapack_int n, double* ap, double* w, double* z,
08199                                 lapack_int ldz, double* work, lapack_int lwork,
08200                                 lapack_int* iwork, lapack_int liwork );
08201 
08202 lapack_int LAPACKE_sspevx_work( int matrix_order, char jobz, char range,
08203                                 char uplo, lapack_int n, float* ap, float vl,
08204                                 float vu, lapack_int il, lapack_int iu,
08205                                 float abstol, lapack_int* m, float* w, float* z,
08206                                 lapack_int ldz, float* work, lapack_int* iwork,
08207                                 lapack_int* ifail );
08208 lapack_int LAPACKE_dspevx_work( int matrix_order, char jobz, char range,
08209                                 char uplo, lapack_int n, double* ap, double vl,
08210                                 double vu, lapack_int il, lapack_int iu,
08211                                 double abstol, lapack_int* m, double* w,
08212                                 double* z, lapack_int ldz, double* work,
08213                                 lapack_int* iwork, lapack_int* ifail );
08214 
08215 lapack_int LAPACKE_sspgst_work( int matrix_order, lapack_int itype, char uplo,
08216                                 lapack_int n, float* ap, const float* bp );
08217 lapack_int LAPACKE_dspgst_work( int matrix_order, lapack_int itype, char uplo,
08218                                 lapack_int n, double* ap, const double* bp );
08219 
08220 lapack_int LAPACKE_sspgv_work( int matrix_order, lapack_int itype, char jobz,
08221                                char uplo, lapack_int n, float* ap, float* bp,
08222                                float* w, float* z, lapack_int ldz,
08223                                float* work );
08224 lapack_int LAPACKE_dspgv_work( int matrix_order, lapack_int itype, char jobz,
08225                                char uplo, lapack_int n, double* ap, double* bp,
08226                                double* w, double* z, lapack_int ldz,
08227                                double* work );
08228 
08229 lapack_int LAPACKE_sspgvd_work( int matrix_order, lapack_int itype, char jobz,
08230                                 char uplo, lapack_int n, float* ap, float* bp,
08231                                 float* w, float* z, lapack_int ldz, float* work,
08232                                 lapack_int lwork, lapack_int* iwork,
08233                                 lapack_int liwork );
08234 lapack_int LAPACKE_dspgvd_work( int matrix_order, lapack_int itype, char jobz,
08235                                 char uplo, lapack_int n, double* ap, double* bp,
08236                                 double* w, double* z, lapack_int ldz,
08237                                 double* work, lapack_int lwork,
08238                                 lapack_int* iwork, lapack_int liwork );
08239 
08240 lapack_int LAPACKE_sspgvx_work( int matrix_order, lapack_int itype, char jobz,
08241                                 char range, char uplo, lapack_int n, float* ap,
08242                                 float* bp, float vl, float vu, lapack_int il,
08243                                 lapack_int iu, float abstol, lapack_int* m,
08244                                 float* w, float* z, lapack_int ldz, float* work,
08245                                 lapack_int* iwork, lapack_int* ifail );
08246 lapack_int LAPACKE_dspgvx_work( int matrix_order, lapack_int itype, char jobz,
08247                                 char range, char uplo, lapack_int n, double* ap,
08248                                 double* bp, double vl, double vu, lapack_int il,
08249                                 lapack_int iu, double abstol, lapack_int* m,
08250                                 double* w, double* z, lapack_int ldz,
08251                                 double* work, lapack_int* iwork,
08252                                 lapack_int* ifail );
08253 
08254 lapack_int LAPACKE_ssprfs_work( int matrix_order, char uplo, lapack_int n,
08255                                 lapack_int nrhs, const float* ap,
08256                                 const float* afp, const lapack_int* ipiv,
08257                                 const float* b, lapack_int ldb, float* x,
08258                                 lapack_int ldx, float* ferr, float* berr,
08259                                 float* work, lapack_int* iwork );
08260 lapack_int LAPACKE_dsprfs_work( int matrix_order, char uplo, lapack_int n,
08261                                 lapack_int nrhs, const double* ap,
08262                                 const double* afp, const lapack_int* ipiv,
08263                                 const double* b, lapack_int ldb, double* x,
08264                                 lapack_int ldx, double* ferr, double* berr,
08265                                 double* work, lapack_int* iwork );
08266 lapack_int LAPACKE_csprfs_work( int matrix_order, char uplo, lapack_int n,
08267                                 lapack_int nrhs, const lapack_complex_float* ap,
08268                                 const lapack_complex_float* afp,
08269                                 const lapack_int* ipiv,
08270                                 const lapack_complex_float* b, lapack_int ldb,
08271                                 lapack_complex_float* x, lapack_int ldx,
08272                                 float* ferr, float* berr,
08273                                 lapack_complex_float* work, float* rwork );
08274 lapack_int LAPACKE_zsprfs_work( int matrix_order, char uplo, lapack_int n,
08275                                 lapack_int nrhs,
08276                                 const lapack_complex_double* ap,
08277                                 const lapack_complex_double* afp,
08278                                 const lapack_int* ipiv,
08279                                 const lapack_complex_double* b, lapack_int ldb,
08280                                 lapack_complex_double* x, lapack_int ldx,
08281                                 double* ferr, double* berr,
08282                                 lapack_complex_double* work, double* rwork );
08283 
08284 lapack_int LAPACKE_sspsv_work( int matrix_order, char uplo, lapack_int n,
08285                                lapack_int nrhs, float* ap, lapack_int* ipiv,
08286                                float* b, lapack_int ldb );
08287 lapack_int LAPACKE_dspsv_work( int matrix_order, char uplo, lapack_int n,
08288                                lapack_int nrhs, double* ap, lapack_int* ipiv,
08289                                double* b, lapack_int ldb );
08290 lapack_int LAPACKE_cspsv_work( int matrix_order, char uplo, lapack_int n,
08291                                lapack_int nrhs, lapack_complex_float* ap,
08292                                lapack_int* ipiv, lapack_complex_float* b,
08293                                lapack_int ldb );
08294 lapack_int LAPACKE_zspsv_work( int matrix_order, char uplo, lapack_int n,
08295                                lapack_int nrhs, lapack_complex_double* ap,
08296                                lapack_int* ipiv, lapack_complex_double* b,
08297                                lapack_int ldb );
08298 
08299 lapack_int LAPACKE_sspsvx_work( int matrix_order, char fact, char uplo,
08300                                 lapack_int n, lapack_int nrhs, const float* ap,
08301                                 float* afp, lapack_int* ipiv, const float* b,
08302                                 lapack_int ldb, float* x, lapack_int ldx,
08303                                 float* rcond, float* ferr, float* berr,
08304                                 float* work, lapack_int* iwork );
08305 lapack_int LAPACKE_dspsvx_work( int matrix_order, char fact, char uplo,
08306                                 lapack_int n, lapack_int nrhs, const double* ap,
08307                                 double* afp, lapack_int* ipiv, const double* b,
08308                                 lapack_int ldb, double* x, lapack_int ldx,
08309                                 double* rcond, double* ferr, double* berr,
08310                                 double* work, lapack_int* iwork );
08311 lapack_int LAPACKE_cspsvx_work( int matrix_order, char fact, char uplo,
08312                                 lapack_int n, lapack_int nrhs,
08313                                 const lapack_complex_float* ap,
08314                                 lapack_complex_float* afp, lapack_int* ipiv,
08315                                 const lapack_complex_float* b, lapack_int ldb,
08316                                 lapack_complex_float* x, lapack_int ldx,
08317                                 float* rcond, float* ferr, float* berr,
08318                                 lapack_complex_float* work, float* rwork );
08319 lapack_int LAPACKE_zspsvx_work( int matrix_order, char fact, char uplo,
08320                                 lapack_int n, lapack_int nrhs,
08321                                 const lapack_complex_double* ap,
08322                                 lapack_complex_double* afp, lapack_int* ipiv,
08323                                 const lapack_complex_double* b, lapack_int ldb,
08324                                 lapack_complex_double* x, lapack_int ldx,
08325                                 double* rcond, double* ferr, double* berr,
08326                                 lapack_complex_double* work, double* rwork );
08327 
08328 lapack_int LAPACKE_ssptrd_work( int matrix_order, char uplo, lapack_int n,
08329                                 float* ap, float* d, float* e, float* tau );
08330 lapack_int LAPACKE_dsptrd_work( int matrix_order, char uplo, lapack_int n,
08331                                 double* ap, double* d, double* e, double* tau );
08332 
08333 lapack_int LAPACKE_ssptrf_work( int matrix_order, char uplo, lapack_int n,
08334                                 float* ap, lapack_int* ipiv );
08335 lapack_int LAPACKE_dsptrf_work( int matrix_order, char uplo, lapack_int n,
08336                                 double* ap, lapack_int* ipiv );
08337 lapack_int LAPACKE_csptrf_work( int matrix_order, char uplo, lapack_int n,
08338                                 lapack_complex_float* ap, lapack_int* ipiv );
08339 lapack_int LAPACKE_zsptrf_work( int matrix_order, char uplo, lapack_int n,
08340                                 lapack_complex_double* ap, lapack_int* ipiv );
08341 
08342 lapack_int LAPACKE_ssptri_work( int matrix_order, char uplo, lapack_int n,
08343                                 float* ap, const lapack_int* ipiv,
08344                                 float* work );
08345 lapack_int LAPACKE_dsptri_work( int matrix_order, char uplo, lapack_int n,
08346                                 double* ap, const lapack_int* ipiv,
08347                                 double* work );
08348 lapack_int LAPACKE_csptri_work( int matrix_order, char uplo, lapack_int n,
08349                                 lapack_complex_float* ap,
08350                                 const lapack_int* ipiv,
08351                                 lapack_complex_float* work );
08352 lapack_int LAPACKE_zsptri_work( int matrix_order, char uplo, lapack_int n,
08353                                 lapack_complex_double* ap,
08354                                 const lapack_int* ipiv,
08355                                 lapack_complex_double* work );
08356 
08357 lapack_int LAPACKE_ssptrs_work( int matrix_order, char uplo, lapack_int n,
08358                                 lapack_int nrhs, const float* ap,
08359                                 const lapack_int* ipiv, float* b,
08360                                 lapack_int ldb );
08361 lapack_int LAPACKE_dsptrs_work( int matrix_order, char uplo, lapack_int n,
08362                                 lapack_int nrhs, const double* ap,
08363                                 const lapack_int* ipiv, double* b,
08364                                 lapack_int ldb );
08365 lapack_int LAPACKE_csptrs_work( int matrix_order, char uplo, lapack_int n,
08366                                 lapack_int nrhs, const lapack_complex_float* ap,
08367                                 const lapack_int* ipiv, lapack_complex_float* b,
08368                                 lapack_int ldb );
08369 lapack_int LAPACKE_zsptrs_work( int matrix_order, char uplo, lapack_int n,
08370                                 lapack_int nrhs,
08371                                 const lapack_complex_double* ap,
08372                                 const lapack_int* ipiv,
08373                                 lapack_complex_double* b, lapack_int ldb );
08374 
08375 lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
08376                                 float vu, lapack_int il, lapack_int iu,
08377                                 float abstol, const float* d, const float* e,
08378                                 lapack_int* m, lapack_int* nsplit, float* w,
08379                                 lapack_int* iblock, lapack_int* isplit,
08380                                 float* work, lapack_int* iwork );
08381 lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
08382                                 double vu, lapack_int il, lapack_int iu,
08383                                 double abstol, const double* d, const double* e,
08384                                 lapack_int* m, lapack_int* nsplit, double* w,
08385                                 lapack_int* iblock, lapack_int* isplit,
08386                                 double* work, lapack_int* iwork );
08387 
08388 lapack_int LAPACKE_sstedc_work( int matrix_order, char compz, lapack_int n,
08389                                 float* d, float* e, float* z, lapack_int ldz,
08390                                 float* work, lapack_int lwork,
08391                                 lapack_int* iwork, lapack_int liwork );
08392 lapack_int LAPACKE_dstedc_work( int matrix_order, char compz, lapack_int n,
08393                                 double* d, double* e, double* z, lapack_int ldz,
08394                                 double* work, lapack_int lwork,
08395                                 lapack_int* iwork, lapack_int liwork );
08396 lapack_int LAPACKE_cstedc_work( int matrix_order, char compz, lapack_int n,
08397                                 float* d, float* e, lapack_complex_float* z,
08398                                 lapack_int ldz, lapack_complex_float* work,
08399                                 lapack_int lwork, float* rwork,
08400                                 lapack_int lrwork, lapack_int* iwork,
08401                                 lapack_int liwork );
08402 lapack_int LAPACKE_zstedc_work( int matrix_order, char compz, lapack_int n,
08403                                 double* d, double* e, lapack_complex_double* z,
08404                                 lapack_int ldz, lapack_complex_double* work,
08405                                 lapack_int lwork, double* rwork,
08406                                 lapack_int lrwork, lapack_int* iwork,
08407                                 lapack_int liwork );
08408 
08409 lapack_int LAPACKE_sstegr_work( int matrix_order, char jobz, char range,
08410                                 lapack_int n, float* d, float* e, float vl,
08411                                 float vu, lapack_int il, lapack_int iu,
08412                                 float abstol, lapack_int* m, float* w, float* z,
08413                                 lapack_int ldz, lapack_int* isuppz, float* work,
08414                                 lapack_int lwork, lapack_int* iwork,
08415                                 lapack_int liwork );
08416 lapack_int LAPACKE_dstegr_work( int matrix_order, char jobz, char range,
08417                                 lapack_int n, double* d, double* e, double vl,
08418                                 double vu, lapack_int il, lapack_int iu,
08419                                 double abstol, lapack_int* m, double* w,
08420                                 double* z, lapack_int ldz, lapack_int* isuppz,
08421                                 double* work, lapack_int lwork,
08422                                 lapack_int* iwork, lapack_int liwork );
08423 lapack_int LAPACKE_cstegr_work( int matrix_order, char jobz, char range,
08424                                 lapack_int n, float* d, float* e, float vl,
08425                                 float vu, lapack_int il, lapack_int iu,
08426                                 float abstol, lapack_int* m, float* w,
08427                                 lapack_complex_float* z, lapack_int ldz,
08428                                 lapack_int* isuppz, float* work,
08429                                 lapack_int lwork, lapack_int* iwork,
08430                                 lapack_int liwork );
08431 lapack_int LAPACKE_zstegr_work( int matrix_order, char jobz, char range,
08432                                 lapack_int n, double* d, double* e, double vl,
08433                                 double vu, lapack_int il, lapack_int iu,
08434                                 double abstol, lapack_int* m, double* w,
08435                                 lapack_complex_double* z, lapack_int ldz,
08436                                 lapack_int* isuppz, double* work,
08437                                 lapack_int lwork, lapack_int* iwork,
08438                                 lapack_int liwork );
08439 
08440 lapack_int LAPACKE_sstein_work( int matrix_order, lapack_int n, const float* d,
08441                                 const float* e, lapack_int m, const float* w,
08442                                 const lapack_int* iblock,
08443                                 const lapack_int* isplit, float* z,
08444                                 lapack_int ldz, float* work, lapack_int* iwork,
08445                                 lapack_int* ifailv );
08446 lapack_int LAPACKE_dstein_work( int matrix_order, lapack_int n, const double* d,
08447                                 const double* e, lapack_int m, const double* w,
08448                                 const lapack_int* iblock,
08449                                 const lapack_int* isplit, double* z,
08450                                 lapack_int ldz, double* work, lapack_int* iwork,
08451                                 lapack_int* ifailv );
08452 lapack_int LAPACKE_cstein_work( int matrix_order, lapack_int n, const float* d,
08453                                 const float* e, lapack_int m, const float* w,
08454                                 const lapack_int* iblock,
08455                                 const lapack_int* isplit,
08456                                 lapack_complex_float* z, lapack_int ldz,
08457                                 float* work, lapack_int* iwork,
08458                                 lapack_int* ifailv );
08459 lapack_int LAPACKE_zstein_work( int matrix_order, lapack_int n, const double* d,
08460                                 const double* e, lapack_int m, const double* w,
08461                                 const lapack_int* iblock,
08462                                 const lapack_int* isplit,
08463                                 lapack_complex_double* z, lapack_int ldz,
08464                                 double* work, lapack_int* iwork,
08465                                 lapack_int* ifailv );
08466 
08467 lapack_int LAPACKE_sstemr_work( int matrix_order, char jobz, char range,
08468                                 lapack_int n, float* d, float* e, float vl,
08469                                 float vu, lapack_int il, lapack_int iu,
08470                                 lapack_int* m, float* w, float* z,
08471                                 lapack_int ldz, lapack_int nzc,
08472                                 lapack_int* isuppz, lapack_logical* tryrac,
08473                                 float* work, lapack_int lwork,
08474                                 lapack_int* iwork, lapack_int liwork );
08475 lapack_int LAPACKE_dstemr_work( int matrix_order, char jobz, char range,
08476                                 lapack_int n, double* d, double* e, double vl,
08477                                 double vu, lapack_int il, lapack_int iu,
08478                                 lapack_int* m, double* w, double* z,
08479                                 lapack_int ldz, lapack_int nzc,
08480                                 lapack_int* isuppz, lapack_logical* tryrac,
08481                                 double* work, lapack_int lwork,
08482                                 lapack_int* iwork, lapack_int liwork );
08483 lapack_int LAPACKE_cstemr_work( int matrix_order, char jobz, char range,
08484                                 lapack_int n, float* d, float* e, float vl,
08485                                 float vu, lapack_int il, lapack_int iu,
08486                                 lapack_int* m, float* w,
08487                                 lapack_complex_float* z, lapack_int ldz,
08488                                 lapack_int nzc, lapack_int* isuppz,
08489                                 lapack_logical* tryrac, float* work,
08490                                 lapack_int lwork, lapack_int* iwork,
08491                                 lapack_int liwork );
08492 lapack_int LAPACKE_zstemr_work( int matrix_order, char jobz, char range,
08493                                 lapack_int n, double* d, double* e, double vl,
08494                                 double vu, lapack_int il, lapack_int iu,
08495                                 lapack_int* m, double* w,
08496                                 lapack_complex_double* z, lapack_int ldz,
08497                                 lapack_int nzc, lapack_int* isuppz,
08498                                 lapack_logical* tryrac, double* work,
08499                                 lapack_int lwork, lapack_int* iwork,
08500                                 lapack_int liwork );
08501 
08502 lapack_int LAPACKE_ssteqr_work( int matrix_order, char compz, lapack_int n,
08503                                 float* d, float* e, float* z, lapack_int ldz,
08504                                 float* work );
08505 lapack_int LAPACKE_dsteqr_work( int matrix_order, char compz, lapack_int n,
08506                                 double* d, double* e, double* z, lapack_int ldz,
08507                                 double* work );
08508 lapack_int LAPACKE_csteqr_work( int matrix_order, char compz, lapack_int n,
08509                                 float* d, float* e, lapack_complex_float* z,
08510                                 lapack_int ldz, float* work );
08511 lapack_int LAPACKE_zsteqr_work( int matrix_order, char compz, lapack_int n,
08512                                 double* d, double* e, lapack_complex_double* z,
08513                                 lapack_int ldz, double* work );
08514 
08515 lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
08516 lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
08517 
08518 lapack_int LAPACKE_sstev_work( int matrix_order, char jobz, lapack_int n,
08519                                float* d, float* e, float* z, lapack_int ldz,
08520                                float* work );
08521 lapack_int LAPACKE_dstev_work( int matrix_order, char jobz, lapack_int n,
08522                                double* d, double* e, double* z, lapack_int ldz,
08523                                double* work );
08524 
08525 lapack_int LAPACKE_sstevd_work( int matrix_order, char jobz, lapack_int n,
08526                                 float* d, float* e, float* z, lapack_int ldz,
08527                                 float* work, lapack_int lwork,
08528                                 lapack_int* iwork, lapack_int liwork );
08529 lapack_int LAPACKE_dstevd_work( int matrix_order, char jobz, lapack_int n,
08530                                 double* d, double* e, double* z, lapack_int ldz,
08531                                 double* work, lapack_int lwork,
08532                                 lapack_int* iwork, lapack_int liwork );
08533 
08534 lapack_int LAPACKE_sstevr_work( int matrix_order, char jobz, char range,
08535                                 lapack_int n, float* d, float* e, float vl,
08536                                 float vu, lapack_int il, lapack_int iu,
08537                                 float abstol, lapack_int* m, float* w, float* z,
08538                                 lapack_int ldz, lapack_int* isuppz, float* work,
08539                                 lapack_int lwork, lapack_int* iwork,
08540                                 lapack_int liwork );
08541 lapack_int LAPACKE_dstevr_work( int matrix_order, char jobz, char range,
08542                                 lapack_int n, double* d, double* e, double vl,
08543                                 double vu, lapack_int il, lapack_int iu,
08544                                 double abstol, lapack_int* m, double* w,
08545                                 double* z, lapack_int ldz, lapack_int* isuppz,
08546                                 double* work, lapack_int lwork,
08547                                 lapack_int* iwork, lapack_int liwork );
08548 
08549 lapack_int LAPACKE_sstevx_work( int matrix_order, char jobz, char range,
08550                                 lapack_int n, float* d, float* e, float vl,
08551                                 float vu, lapack_int il, lapack_int iu,
08552                                 float abstol, lapack_int* m, float* w, float* z,
08553                                 lapack_int ldz, float* work, lapack_int* iwork,
08554                                 lapack_int* ifail );
08555 lapack_int LAPACKE_dstevx_work( int matrix_order, char jobz, char range,
08556                                 lapack_int n, double* d, double* e, double vl,
08557                                 double vu, lapack_int il, lapack_int iu,
08558                                 double abstol, lapack_int* m, double* w,
08559                                 double* z, lapack_int ldz, double* work,
08560                                 lapack_int* iwork, lapack_int* ifail );
08561 
08562 lapack_int LAPACKE_ssycon_work( int matrix_order, char uplo, lapack_int n,
08563                                 const float* a, lapack_int lda,
08564                                 const lapack_int* ipiv, float anorm,
08565                                 float* rcond, float* work, lapack_int* iwork );
08566 lapack_int LAPACKE_dsycon_work( int matrix_order, char uplo, lapack_int n,
08567                                 const double* a, lapack_int lda,
08568                                 const lapack_int* ipiv, double anorm,
08569                                 double* rcond, double* work,
08570                                 lapack_int* iwork );
08571 lapack_int LAPACKE_csycon_work( int matrix_order, char uplo, lapack_int n,
08572                                 const lapack_complex_float* a, lapack_int lda,
08573                                 const lapack_int* ipiv, float anorm,
08574                                 float* rcond, lapack_complex_float* work );
08575 lapack_int LAPACKE_zsycon_work( int matrix_order, char uplo, lapack_int n,
08576                                 const lapack_complex_double* a, lapack_int lda,
08577                                 const lapack_int* ipiv, double anorm,
08578                                 double* rcond, lapack_complex_double* work );
08579 
08580 lapack_int LAPACKE_ssyequb_work( int matrix_order, char uplo, lapack_int n,
08581                                  const float* a, lapack_int lda, float* s,
08582                                  float* scond, float* amax, float* work );
08583 lapack_int LAPACKE_dsyequb_work( int matrix_order, char uplo, lapack_int n,
08584                                  const double* a, lapack_int lda, double* s,
08585                                  double* scond, double* amax, double* work );
08586 lapack_int LAPACKE_csyequb_work( int matrix_order, char uplo, lapack_int n,
08587                                  const lapack_complex_float* a, lapack_int lda,
08588                                  float* s, float* scond, float* amax,
08589                                  lapack_complex_float* work );
08590 lapack_int LAPACKE_zsyequb_work( int matrix_order, char uplo, lapack_int n,
08591                                  const lapack_complex_double* a, lapack_int lda,
08592                                  double* s, double* scond, double* amax,
08593                                  lapack_complex_double* work );
08594 
08595 lapack_int LAPACKE_ssyev_work( int matrix_order, char jobz, char uplo,
08596                                lapack_int n, float* a, lapack_int lda, float* w,
08597                                float* work, lapack_int lwork );
08598 lapack_int LAPACKE_dsyev_work( int matrix_order, char jobz, char uplo,
08599                                lapack_int n, double* a, lapack_int lda,
08600                                double* w, double* work, lapack_int lwork );
08601 
08602 lapack_int LAPACKE_ssyevd_work( int matrix_order, char jobz, char uplo,
08603                                 lapack_int n, float* a, lapack_int lda,
08604                                 float* w, float* work, lapack_int lwork,
08605                                 lapack_int* iwork, lapack_int liwork );
08606 lapack_int LAPACKE_dsyevd_work( int matrix_order, char jobz, char uplo,
08607                                 lapack_int n, double* a, lapack_int lda,
08608                                 double* w, double* work, lapack_int lwork,
08609                                 lapack_int* iwork, lapack_int liwork );
08610 
08611 lapack_int LAPACKE_ssyevr_work( int matrix_order, char jobz, char range,
08612                                 char uplo, lapack_int n, float* a,
08613                                 lapack_int lda, float vl, float vu,
08614                                 lapack_int il, lapack_int iu, float abstol,
08615                                 lapack_int* m, float* w, float* z,
08616                                 lapack_int ldz, lapack_int* isuppz, float* work,
08617                                 lapack_int lwork, lapack_int* iwork,
08618                                 lapack_int liwork );
08619 lapack_int LAPACKE_dsyevr_work( int matrix_order, char jobz, char range,
08620                                 char uplo, lapack_int n, double* a,
08621                                 lapack_int lda, double vl, double vu,
08622                                 lapack_int il, lapack_int iu, double abstol,
08623                                 lapack_int* m, double* w, double* z,
08624                                 lapack_int ldz, lapack_int* isuppz,
08625                                 double* work, lapack_int lwork,
08626                                 lapack_int* iwork, lapack_int liwork );
08627 
08628 lapack_int LAPACKE_ssyevx_work( int matrix_order, char jobz, char range,
08629                                 char uplo, lapack_int n, float* a,
08630                                 lapack_int lda, float vl, float vu,
08631                                 lapack_int il, lapack_int iu, float abstol,
08632                                 lapack_int* m, float* w, float* z,
08633                                 lapack_int ldz, float* work, lapack_int lwork,
08634                                 lapack_int* iwork, lapack_int* ifail );
08635 lapack_int LAPACKE_dsyevx_work( int matrix_order, char jobz, char range,
08636                                 char uplo, lapack_int n, double* a,
08637                                 lapack_int lda, double vl, double vu,
08638                                 lapack_int il, lapack_int iu, double abstol,
08639                                 lapack_int* m, double* w, double* z,
08640                                 lapack_int ldz, double* work, lapack_int lwork,
08641                                 lapack_int* iwork, lapack_int* ifail );
08642 
08643 lapack_int LAPACKE_ssygst_work( int matrix_order, lapack_int itype, char uplo,
08644                                 lapack_int n, float* a, lapack_int lda,
08645                                 const float* b, lapack_int ldb );
08646 lapack_int LAPACKE_dsygst_work( int matrix_order, lapack_int itype, char uplo,
08647                                 lapack_int n, double* a, lapack_int lda,
08648                                 const double* b, lapack_int ldb );
08649 
08650 lapack_int LAPACKE_ssygv_work( int matrix_order, lapack_int itype, char jobz,
08651                                char uplo, lapack_int n, float* a,
08652                                lapack_int lda, float* b, lapack_int ldb,
08653                                float* w, float* work, lapack_int lwork );
08654 lapack_int LAPACKE_dsygv_work( int matrix_order, lapack_int itype, char jobz,
08655                                char uplo, lapack_int n, double* a,
08656                                lapack_int lda, double* b, lapack_int ldb,
08657                                double* w, double* work, lapack_int lwork );
08658 
08659 lapack_int LAPACKE_ssygvd_work( int matrix_order, lapack_int itype, char jobz,
08660                                 char uplo, lapack_int n, float* a,
08661                                 lapack_int lda, float* b, lapack_int ldb,
08662                                 float* w, float* work, lapack_int lwork,
08663                                 lapack_int* iwork, lapack_int liwork );
08664 lapack_int LAPACKE_dsygvd_work( int matrix_order, lapack_int itype, char jobz,
08665                                 char uplo, lapack_int n, double* a,
08666                                 lapack_int lda, double* b, lapack_int ldb,
08667                                 double* w, double* work, lapack_int lwork,
08668                                 lapack_int* iwork, lapack_int liwork );
08669 
08670 lapack_int LAPACKE_ssygvx_work( int matrix_order, lapack_int itype, char jobz,
08671                                 char range, char uplo, lapack_int n, float* a,
08672                                 lapack_int lda, float* b, lapack_int ldb,
08673                                 float vl, float vu, lapack_int il,
08674                                 lapack_int iu, float abstol, lapack_int* m,
08675                                 float* w, float* z, lapack_int ldz, float* work,
08676                                 lapack_int lwork, lapack_int* iwork,
08677                                 lapack_int* ifail );
08678 lapack_int LAPACKE_dsygvx_work( int matrix_order, lapack_int itype, char jobz,
08679                                 char range, char uplo, lapack_int n, double* a,
08680                                 lapack_int lda, double* b, lapack_int ldb,
08681                                 double vl, double vu, lapack_int il,
08682                                 lapack_int iu, double abstol, lapack_int* m,
08683                                 double* w, double* z, lapack_int ldz,
08684                                 double* work, lapack_int lwork,
08685                                 lapack_int* iwork, lapack_int* ifail );
08686 
08687 lapack_int LAPACKE_ssyrfs_work( int matrix_order, char uplo, lapack_int n,
08688                                 lapack_int nrhs, const float* a, lapack_int lda,
08689                                 const float* af, lapack_int ldaf,
08690                                 const lapack_int* ipiv, const float* b,
08691                                 lapack_int ldb, float* x, lapack_int ldx,
08692                                 float* ferr, float* berr, float* work,
08693                                 lapack_int* iwork );
08694 lapack_int LAPACKE_dsyrfs_work( int matrix_order, char uplo, lapack_int n,
08695                                 lapack_int nrhs, const double* a,
08696                                 lapack_int lda, const double* af,
08697                                 lapack_int ldaf, const lapack_int* ipiv,
08698                                 const double* b, lapack_int ldb, double* x,
08699                                 lapack_int ldx, double* ferr, double* berr,
08700                                 double* work, lapack_int* iwork );
08701 lapack_int LAPACKE_csyrfs_work( int matrix_order, char uplo, lapack_int n,
08702                                 lapack_int nrhs, const lapack_complex_float* a,
08703                                 lapack_int lda, const lapack_complex_float* af,
08704                                 lapack_int ldaf, const lapack_int* ipiv,
08705                                 const lapack_complex_float* b, lapack_int ldb,
08706                                 lapack_complex_float* x, lapack_int ldx,
08707                                 float* ferr, float* berr,
08708                                 lapack_complex_float* work, float* rwork );
08709 lapack_int LAPACKE_zsyrfs_work( int matrix_order, char uplo, lapack_int n,
08710                                 lapack_int nrhs, const lapack_complex_double* a,
08711                                 lapack_int lda, const lapack_complex_double* af,
08712                                 lapack_int ldaf, const lapack_int* ipiv,
08713                                 const lapack_complex_double* b, lapack_int ldb,
08714                                 lapack_complex_double* x, lapack_int ldx,
08715                                 double* ferr, double* berr,
08716                                 lapack_complex_double* work, double* rwork );
08717 
08718 lapack_int LAPACKE_ssyrfsx_work( int matrix_order, char uplo, char equed,
08719                                  lapack_int n, lapack_int nrhs, const float* a,
08720                                  lapack_int lda, const float* af,
08721                                  lapack_int ldaf, const lapack_int* ipiv,
08722                                  const float* s, const float* b, lapack_int ldb,
08723                                  float* x, lapack_int ldx, float* rcond,
08724                                  float* berr, lapack_int n_err_bnds,
08725                                  float* err_bnds_norm, float* err_bnds_comp,
08726                                  lapack_int nparams, float* params, float* work,
08727                                  lapack_int* iwork );
08728 lapack_int LAPACKE_dsyrfsx_work( int matrix_order, char uplo, char equed,
08729                                  lapack_int n, lapack_int nrhs, const double* a,
08730                                  lapack_int lda, const double* af,
08731                                  lapack_int ldaf, const lapack_int* ipiv,
08732                                  const double* s, const double* b,
08733                                  lapack_int ldb, double* x, lapack_int ldx,
08734                                  double* rcond, double* berr,
08735                                  lapack_int n_err_bnds, double* err_bnds_norm,
08736                                  double* err_bnds_comp, lapack_int nparams,
08737                                  double* params, double* work,
08738                                  lapack_int* iwork );
08739 lapack_int LAPACKE_csyrfsx_work( int matrix_order, char uplo, char equed,
08740                                  lapack_int n, lapack_int nrhs,
08741                                  const lapack_complex_float* a, lapack_int lda,
08742                                  const lapack_complex_float* af,
08743                                  lapack_int ldaf, const lapack_int* ipiv,
08744                                  const float* s, const lapack_complex_float* b,
08745                                  lapack_int ldb, lapack_complex_float* x,
08746                                  lapack_int ldx, float* rcond, float* berr,
08747                                  lapack_int n_err_bnds, float* err_bnds_norm,
08748                                  float* err_bnds_comp, lapack_int nparams,
08749                                  float* params, lapack_complex_float* work,
08750                                  float* rwork );
08751 lapack_int LAPACKE_zsyrfsx_work( int matrix_order, char uplo, char equed,
08752                                  lapack_int n, lapack_int nrhs,
08753                                  const lapack_complex_double* a, lapack_int lda,
08754                                  const lapack_complex_double* af,
08755                                  lapack_int ldaf, const lapack_int* ipiv,
08756                                  const double* s,
08757                                  const lapack_complex_double* b, lapack_int ldb,
08758                                  lapack_complex_double* x, lapack_int ldx,
08759                                  double* rcond, double* berr,
08760                                  lapack_int n_err_bnds, double* err_bnds_norm,
08761                                  double* err_bnds_comp, lapack_int nparams,
08762                                  double* params, lapack_complex_double* work,
08763                                  double* rwork );
08764 
08765 lapack_int LAPACKE_ssysv_work( int matrix_order, char uplo, lapack_int n,
08766                                lapack_int nrhs, float* a, lapack_int lda,
08767                                lapack_int* ipiv, float* b, lapack_int ldb,
08768                                float* work, lapack_int lwork );
08769 lapack_int LAPACKE_dsysv_work( int matrix_order, char uplo, lapack_int n,
08770                                lapack_int nrhs, double* a, lapack_int lda,
08771                                lapack_int* ipiv, double* b, lapack_int ldb,
08772                                double* work, lapack_int lwork );
08773 lapack_int LAPACKE_csysv_work( int matrix_order, char uplo, lapack_int n,
08774                                lapack_int nrhs, lapack_complex_float* a,
08775                                lapack_int lda, lapack_int* ipiv,
08776                                lapack_complex_float* b, lapack_int ldb,
08777                                lapack_complex_float* work, lapack_int lwork );
08778 lapack_int LAPACKE_zsysv_work( int matrix_order, char uplo, lapack_int n,
08779                                lapack_int nrhs, lapack_complex_double* a,
08780                                lapack_int lda, lapack_int* ipiv,
08781                                lapack_complex_double* b, lapack_int ldb,
08782                                lapack_complex_double* work, lapack_int lwork );
08783 
08784 lapack_int LAPACKE_ssysvx_work( int matrix_order, char fact, char uplo,
08785                                 lapack_int n, lapack_int nrhs, const float* a,
08786                                 lapack_int lda, float* af, lapack_int ldaf,
08787                                 lapack_int* ipiv, const float* b,
08788                                 lapack_int ldb, float* x, lapack_int ldx,
08789                                 float* rcond, float* ferr, float* berr,
08790                                 float* work, lapack_int lwork,
08791                                 lapack_int* iwork );
08792 lapack_int LAPACKE_dsysvx_work( int matrix_order, char fact, char uplo,
08793                                 lapack_int n, lapack_int nrhs, const double* a,
08794                                 lapack_int lda, double* af, lapack_int ldaf,
08795                                 lapack_int* ipiv, const double* b,
08796                                 lapack_int ldb, double* x, lapack_int ldx,
08797                                 double* rcond, double* ferr, double* berr,
08798                                 double* work, lapack_int lwork,
08799                                 lapack_int* iwork );
08800 lapack_int LAPACKE_csysvx_work( int matrix_order, char fact, char uplo,
08801                                 lapack_int n, lapack_int nrhs,
08802                                 const lapack_complex_float* a, lapack_int lda,
08803                                 lapack_complex_float* af, lapack_int ldaf,
08804                                 lapack_int* ipiv, const lapack_complex_float* b,
08805                                 lapack_int ldb, lapack_complex_float* x,
08806                                 lapack_int ldx, float* rcond, float* ferr,
08807                                 float* berr, lapack_complex_float* work,
08808                                 lapack_int lwork, float* rwork );
08809 lapack_int LAPACKE_zsysvx_work( int matrix_order, char fact, char uplo,
08810                                 lapack_int n, lapack_int nrhs,
08811                                 const lapack_complex_double* a, lapack_int lda,
08812                                 lapack_complex_double* af, lapack_int ldaf,
08813                                 lapack_int* ipiv,
08814                                 const lapack_complex_double* b, lapack_int ldb,
08815                                 lapack_complex_double* x, lapack_int ldx,
08816                                 double* rcond, double* ferr, double* berr,
08817                                 lapack_complex_double* work, lapack_int lwork,
08818                                 double* rwork );
08819 
08820 lapack_int LAPACKE_ssysvxx_work( int matrix_order, char fact, char uplo,
08821                                  lapack_int n, lapack_int nrhs, float* a,
08822                                  lapack_int lda, float* af, lapack_int ldaf,
08823                                  lapack_int* ipiv, char* equed, float* s,
08824                                  float* b, lapack_int ldb, float* x,
08825                                  lapack_int ldx, float* rcond, float* rpvgrw,
08826                                  float* berr, lapack_int n_err_bnds,
08827                                  float* err_bnds_norm, float* err_bnds_comp,
08828                                  lapack_int nparams, float* params, float* work,
08829                                  lapack_int* iwork );
08830 lapack_int LAPACKE_dsysvxx_work( int matrix_order, char fact, char uplo,
08831                                  lapack_int n, lapack_int nrhs, double* a,
08832                                  lapack_int lda, double* af, lapack_int ldaf,
08833                                  lapack_int* ipiv, char* equed, double* s,
08834                                  double* b, lapack_int ldb, double* x,
08835                                  lapack_int ldx, double* rcond, double* rpvgrw,
08836                                  double* berr, lapack_int n_err_bnds,
08837                                  double* err_bnds_norm, double* err_bnds_comp,
08838                                  lapack_int nparams, double* params,
08839                                  double* work, lapack_int* iwork );
08840 lapack_int LAPACKE_csysvxx_work( int matrix_order, char fact, char uplo,
08841                                  lapack_int n, lapack_int nrhs,
08842                                  lapack_complex_float* a, lapack_int lda,
08843                                  lapack_complex_float* af, lapack_int ldaf,
08844                                  lapack_int* ipiv, char* equed, float* s,
08845                                  lapack_complex_float* b, lapack_int ldb,
08846                                  lapack_complex_float* x, lapack_int ldx,
08847                                  float* rcond, float* rpvgrw, float* berr,
08848                                  lapack_int n_err_bnds, float* err_bnds_norm,
08849                                  float* err_bnds_comp, lapack_int nparams,
08850                                  float* params, lapack_complex_float* work,
08851                                  float* rwork );
08852 lapack_int LAPACKE_zsysvxx_work( int matrix_order, char fact, char uplo,
08853                                  lapack_int n, lapack_int nrhs,
08854                                  lapack_complex_double* a, lapack_int lda,
08855                                  lapack_complex_double* af, lapack_int ldaf,
08856                                  lapack_int* ipiv, char* equed, double* s,
08857                                  lapack_complex_double* b, lapack_int ldb,
08858                                  lapack_complex_double* x, lapack_int ldx,
08859                                  double* rcond, double* rpvgrw, double* berr,
08860                                  lapack_int n_err_bnds, double* err_bnds_norm,
08861                                  double* err_bnds_comp, lapack_int nparams,
08862                                  double* params, lapack_complex_double* work,
08863                                  double* rwork );
08864 
08865 lapack_int LAPACKE_ssytrd_work( int matrix_order, char uplo, lapack_int n,
08866                                 float* a, lapack_int lda, float* d, float* e,
08867                                 float* tau, float* work, lapack_int lwork );
08868 lapack_int LAPACKE_dsytrd_work( int matrix_order, char uplo, lapack_int n,
08869                                 double* a, lapack_int lda, double* d, double* e,
08870                                 double* tau, double* work, lapack_int lwork );
08871 
08872 lapack_int LAPACKE_ssytrf_work( int matrix_order, char uplo, lapack_int n,
08873                                 float* a, lapack_int lda, lapack_int* ipiv,
08874                                 float* work, lapack_int lwork );
08875 lapack_int LAPACKE_dsytrf_work( int matrix_order, char uplo, lapack_int n,
08876                                 double* a, lapack_int lda, lapack_int* ipiv,
08877                                 double* work, lapack_int lwork );
08878 lapack_int LAPACKE_csytrf_work( int matrix_order, char uplo, lapack_int n,
08879                                 lapack_complex_float* a, lapack_int lda,
08880                                 lapack_int* ipiv, lapack_complex_float* work,
08881                                 lapack_int lwork );
08882 lapack_int LAPACKE_zsytrf_work( int matrix_order, char uplo, lapack_int n,
08883                                 lapack_complex_double* a, lapack_int lda,
08884                                 lapack_int* ipiv, lapack_complex_double* work,
08885                                 lapack_int lwork );
08886 
08887 lapack_int LAPACKE_ssytri_work( int matrix_order, char uplo, lapack_int n,
08888                                 float* a, lapack_int lda,
08889                                 const lapack_int* ipiv, float* work );
08890 lapack_int LAPACKE_dsytri_work( int matrix_order, char uplo, lapack_int n,
08891                                 double* a, lapack_int lda,
08892                                 const lapack_int* ipiv, double* work );
08893 lapack_int LAPACKE_csytri_work( int matrix_order, char uplo, lapack_int n,
08894                                 lapack_complex_float* a, lapack_int lda,
08895                                 const lapack_int* ipiv,
08896                                 lapack_complex_float* work );
08897 lapack_int LAPACKE_zsytri_work( int matrix_order, char uplo, lapack_int n,
08898                                 lapack_complex_double* a, lapack_int lda,
08899                                 const lapack_int* ipiv,
08900                                 lapack_complex_double* work );
08901 
08902 lapack_int LAPACKE_ssytrs_work( int matrix_order, char uplo, lapack_int n,
08903                                 lapack_int nrhs, const float* a, lapack_int lda,
08904                                 const lapack_int* ipiv, float* b,
08905                                 lapack_int ldb );
08906 lapack_int LAPACKE_dsytrs_work( int matrix_order, char uplo, lapack_int n,
08907                                 lapack_int nrhs, const double* a,
08908                                 lapack_int lda, const lapack_int* ipiv,
08909                                 double* b, lapack_int ldb );
08910 lapack_int LAPACKE_csytrs_work( int matrix_order, char uplo, lapack_int n,
08911                                 lapack_int nrhs, const lapack_complex_float* a,
08912                                 lapack_int lda, const lapack_int* ipiv,
08913                                 lapack_complex_float* b, lapack_int ldb );
08914 lapack_int LAPACKE_zsytrs_work( int matrix_order, char uplo, lapack_int n,
08915                                 lapack_int nrhs, const lapack_complex_double* a,
08916                                 lapack_int lda, const lapack_int* ipiv,
08917                                 lapack_complex_double* b, lapack_int ldb );
08918 
08919 lapack_int LAPACKE_stbcon_work( int matrix_order, char norm, char uplo,
08920                                 char diag, lapack_int n, lapack_int kd,
08921                                 const float* ab, lapack_int ldab, float* rcond,
08922                                 float* work, lapack_int* iwork );
08923 lapack_int LAPACKE_dtbcon_work( int matrix_order, char norm, char uplo,
08924                                 char diag, lapack_int n, lapack_int kd,
08925                                 const double* ab, lapack_int ldab,
08926                                 double* rcond, double* work,
08927                                 lapack_int* iwork );
08928 lapack_int LAPACKE_ctbcon_work( int matrix_order, char norm, char uplo,
08929                                 char diag, lapack_int n, lapack_int kd,
08930                                 const lapack_complex_float* ab, lapack_int ldab,
08931                                 float* rcond, lapack_complex_float* work,
08932                                 float* rwork );
08933 lapack_int LAPACKE_ztbcon_work( int matrix_order, char norm, char uplo,
08934                                 char diag, lapack_int n, lapack_int kd,
08935                                 const lapack_complex_double* ab,
08936                                 lapack_int ldab, double* rcond,
08937                                 lapack_complex_double* work, double* rwork );
08938 
08939 lapack_int LAPACKE_stbrfs_work( int matrix_order, char uplo, char trans,
08940                                 char diag, lapack_int n, lapack_int kd,
08941                                 lapack_int nrhs, const float* ab,
08942                                 lapack_int ldab, const float* b, lapack_int ldb,
08943                                 const float* x, lapack_int ldx, float* ferr,
08944                                 float* berr, float* work, lapack_int* iwork );
08945 lapack_int LAPACKE_dtbrfs_work( int matrix_order, char uplo, char trans,
08946                                 char diag, lapack_int n, lapack_int kd,
08947                                 lapack_int nrhs, const double* ab,
08948                                 lapack_int ldab, const double* b,
08949                                 lapack_int ldb, const double* x, lapack_int ldx,
08950                                 double* ferr, double* berr, double* work,
08951                                 lapack_int* iwork );
08952 lapack_int LAPACKE_ctbrfs_work( int matrix_order, char uplo, char trans,
08953                                 char diag, lapack_int n, lapack_int kd,
08954                                 lapack_int nrhs, const lapack_complex_float* ab,
08955                                 lapack_int ldab, const lapack_complex_float* b,
08956                                 lapack_int ldb, const lapack_complex_float* x,
08957                                 lapack_int ldx, float* ferr, float* berr,
08958                                 lapack_complex_float* work, float* rwork );
08959 lapack_int LAPACKE_ztbrfs_work( int matrix_order, char uplo, char trans,
08960                                 char diag, lapack_int n, lapack_int kd,
08961                                 lapack_int nrhs,
08962                                 const lapack_complex_double* ab,
08963                                 lapack_int ldab, const lapack_complex_double* b,
08964                                 lapack_int ldb, const lapack_complex_double* x,
08965                                 lapack_int ldx, double* ferr, double* berr,
08966                                 lapack_complex_double* work, double* rwork );
08967 
08968 lapack_int LAPACKE_stbtrs_work( int matrix_order, char uplo, char trans,
08969                                 char diag, lapack_int n, lapack_int kd,
08970                                 lapack_int nrhs, const float* ab,
08971                                 lapack_int ldab, float* b, lapack_int ldb );
08972 lapack_int LAPACKE_dtbtrs_work( int matrix_order, char uplo, char trans,
08973                                 char diag, lapack_int n, lapack_int kd,
08974                                 lapack_int nrhs, const double* ab,
08975                                 lapack_int ldab, double* b, lapack_int ldb );
08976 lapack_int LAPACKE_ctbtrs_work( int matrix_order, char uplo, char trans,
08977                                 char diag, lapack_int n, lapack_int kd,
08978                                 lapack_int nrhs, const lapack_complex_float* ab,
08979                                 lapack_int ldab, lapack_complex_float* b,
08980                                 lapack_int ldb );
08981 lapack_int LAPACKE_ztbtrs_work( int matrix_order, char uplo, char trans,
08982                                 char diag, lapack_int n, lapack_int kd,
08983                                 lapack_int nrhs,
08984                                 const lapack_complex_double* ab,
08985                                 lapack_int ldab, lapack_complex_double* b,
08986                                 lapack_int ldb );
08987 
08988 lapack_int LAPACKE_stfsm_work( int matrix_order, char transr, char side,
08989                                char uplo, char trans, char diag, lapack_int m,
08990                                lapack_int n, float alpha, const float* a,
08991                                float* b, lapack_int ldb );
08992 lapack_int LAPACKE_dtfsm_work( int matrix_order, char transr, char side,
08993                                char uplo, char trans, char diag, lapack_int m,
08994                                lapack_int n, double alpha, const double* a,
08995                                double* b, lapack_int ldb );
08996 lapack_int LAPACKE_ctfsm_work( int matrix_order, char transr, char side,
08997                                char uplo, char trans, char diag, lapack_int m,
08998                                lapack_int n, lapack_complex_float alpha,
08999                                const lapack_complex_float* a,
09000                                lapack_complex_float* b, lapack_int ldb );
09001 lapack_int LAPACKE_ztfsm_work( int matrix_order, char transr, char side,
09002                                char uplo, char trans, char diag, lapack_int m,
09003                                lapack_int n, lapack_complex_double alpha,
09004                                const lapack_complex_double* a,
09005                                lapack_complex_double* b, lapack_int ldb );
09006 
09007 lapack_int LAPACKE_stftri_work( int matrix_order, char transr, char uplo,
09008                                 char diag, lapack_int n, float* a );
09009 lapack_int LAPACKE_dtftri_work( int matrix_order, char transr, char uplo,
09010                                 char diag, lapack_int n, double* a );
09011 lapack_int LAPACKE_ctftri_work( int matrix_order, char transr, char uplo,
09012                                 char diag, lapack_int n,
09013                                 lapack_complex_float* a );
09014 lapack_int LAPACKE_ztftri_work( int matrix_order, char transr, char uplo,
09015                                 char diag, lapack_int n,
09016                                 lapack_complex_double* a );
09017 
09018 lapack_int LAPACKE_stfttp_work( int matrix_order, char transr, char uplo,
09019                                 lapack_int n, const float* arf, float* ap );
09020 lapack_int LAPACKE_dtfttp_work( int matrix_order, char transr, char uplo,
09021                                 lapack_int n, const double* arf, double* ap );
09022 lapack_int LAPACKE_ctfttp_work( int matrix_order, char transr, char uplo,
09023                                 lapack_int n, const lapack_complex_float* arf,
09024                                 lapack_complex_float* ap );
09025 lapack_int LAPACKE_ztfttp_work( int matrix_order, char transr, char uplo,
09026                                 lapack_int n, const lapack_complex_double* arf,
09027                                 lapack_complex_double* ap );
09028 
09029 lapack_int LAPACKE_stfttr_work( int matrix_order, char transr, char uplo,
09030                                 lapack_int n, const float* arf, float* a,
09031                                 lapack_int lda );
09032 lapack_int LAPACKE_dtfttr_work( int matrix_order, char transr, char uplo,
09033                                 lapack_int n, const double* arf, double* a,
09034                                 lapack_int lda );
09035 lapack_int LAPACKE_ctfttr_work( int matrix_order, char transr, char uplo,
09036                                 lapack_int n, const lapack_complex_float* arf,
09037                                 lapack_complex_float* a, lapack_int lda );
09038 lapack_int LAPACKE_ztfttr_work( int matrix_order, char transr, char uplo,
09039                                 lapack_int n, const lapack_complex_double* arf,
09040                                 lapack_complex_double* a, lapack_int lda );
09041 
09042 lapack_int LAPACKE_stgevc_work( int matrix_order, char side, char howmny,
09043                                 const lapack_logical* select, lapack_int n,
09044                                 const float* s, lapack_int lds, const float* p,
09045                                 lapack_int ldp, float* vl, lapack_int ldvl,
09046                                 float* vr, lapack_int ldvr, lapack_int mm,
09047                                 lapack_int* m, float* work );
09048 lapack_int LAPACKE_dtgevc_work( int matrix_order, char side, char howmny,
09049                                 const lapack_logical* select, lapack_int n,
09050                                 const double* s, lapack_int lds,
09051                                 const double* p, lapack_int ldp, double* vl,
09052                                 lapack_int ldvl, double* vr, lapack_int ldvr,
09053                                 lapack_int mm, lapack_int* m, double* work );
09054 lapack_int LAPACKE_ctgevc_work( int matrix_order, char side, char howmny,
09055                                 const lapack_logical* select, lapack_int n,
09056                                 const lapack_complex_float* s, lapack_int lds,
09057                                 const lapack_complex_float* p, lapack_int ldp,
09058                                 lapack_complex_float* vl, lapack_int ldvl,
09059                                 lapack_complex_float* vr, lapack_int ldvr,
09060                                 lapack_int mm, lapack_int* m,
09061                                 lapack_complex_float* work, float* rwork );
09062 lapack_int LAPACKE_ztgevc_work( int matrix_order, char side, char howmny,
09063                                 const lapack_logical* select, lapack_int n,
09064                                 const lapack_complex_double* s, lapack_int lds,
09065                                 const lapack_complex_double* p, lapack_int ldp,
09066                                 lapack_complex_double* vl, lapack_int ldvl,
09067                                 lapack_complex_double* vr, lapack_int ldvr,
09068                                 lapack_int mm, lapack_int* m,
09069                                 lapack_complex_double* work, double* rwork );
09070 
09071 lapack_int LAPACKE_stgexc_work( int matrix_order, lapack_logical wantq,
09072                                 lapack_logical wantz, lapack_int n, float* a,
09073                                 lapack_int lda, float* b, lapack_int ldb,
09074                                 float* q, lapack_int ldq, float* z,
09075                                 lapack_int ldz, lapack_int* ifst,
09076                                 lapack_int* ilst, float* work,
09077                                 lapack_int lwork );
09078 lapack_int LAPACKE_dtgexc_work( int matrix_order, lapack_logical wantq,
09079                                 lapack_logical wantz, lapack_int n, double* a,
09080                                 lapack_int lda, double* b, lapack_int ldb,
09081                                 double* q, lapack_int ldq, double* z,
09082                                 lapack_int ldz, lapack_int* ifst,
09083                                 lapack_int* ilst, double* work,
09084                                 lapack_int lwork );
09085 lapack_int LAPACKE_ctgexc_work( int matrix_order, lapack_logical wantq,
09086                                 lapack_logical wantz, lapack_int n,
09087                                 lapack_complex_float* a, lapack_int lda,
09088                                 lapack_complex_float* b, lapack_int ldb,
09089                                 lapack_complex_float* q, lapack_int ldq,
09090                                 lapack_complex_float* z, lapack_int ldz,
09091                                 lapack_int ifst, lapack_int ilst );
09092 lapack_int LAPACKE_ztgexc_work( int matrix_order, lapack_logical wantq,
09093                                 lapack_logical wantz, lapack_int n,
09094                                 lapack_complex_double* a, lapack_int lda,
09095                                 lapack_complex_double* b, lapack_int ldb,
09096                                 lapack_complex_double* q, lapack_int ldq,
09097                                 lapack_complex_double* z, lapack_int ldz,
09098                                 lapack_int ifst, lapack_int ilst );
09099 
09100 lapack_int LAPACKE_stgsen_work( int matrix_order, lapack_int ijob,
09101                                 lapack_logical wantq, lapack_logical wantz,
09102                                 const lapack_logical* select, lapack_int n,
09103                                 float* a, lapack_int lda, float* b,
09104                                 lapack_int ldb, float* alphar, float* alphai,
09105                                 float* beta, float* q, lapack_int ldq, float* z,
09106                                 lapack_int ldz, lapack_int* m, float* pl,
09107                                 float* pr, float* dif, float* work,
09108                                 lapack_int lwork, lapack_int* iwork,
09109                                 lapack_int liwork );
09110 lapack_int LAPACKE_dtgsen_work( int matrix_order, lapack_int ijob,
09111                                 lapack_logical wantq, lapack_logical wantz,
09112                                 const lapack_logical* select, lapack_int n,
09113                                 double* a, lapack_int lda, double* b,
09114                                 lapack_int ldb, double* alphar, double* alphai,
09115                                 double* beta, double* q, lapack_int ldq,
09116                                 double* z, lapack_int ldz, lapack_int* m,
09117                                 double* pl, double* pr, double* dif,
09118                                 double* work, lapack_int lwork,
09119                                 lapack_int* iwork, lapack_int liwork );
09120 lapack_int LAPACKE_ctgsen_work( int matrix_order, lapack_int ijob,
09121                                 lapack_logical wantq, lapack_logical wantz,
09122                                 const lapack_logical* select, lapack_int n,
09123                                 lapack_complex_float* a, lapack_int lda,
09124                                 lapack_complex_float* b, lapack_int ldb,
09125                                 lapack_complex_float* alpha,
09126                                 lapack_complex_float* beta,
09127                                 lapack_complex_float* q, lapack_int ldq,
09128                                 lapack_complex_float* z, lapack_int ldz,
09129                                 lapack_int* m, float* pl, float* pr, float* dif,
09130                                 lapack_complex_float* work, lapack_int lwork,
09131                                 lapack_int* iwork, lapack_int liwork );
09132 lapack_int LAPACKE_ztgsen_work( int matrix_order, lapack_int ijob,
09133                                 lapack_logical wantq, lapack_logical wantz,
09134                                 const lapack_logical* select, lapack_int n,
09135                                 lapack_complex_double* a, lapack_int lda,
09136                                 lapack_complex_double* b, lapack_int ldb,
09137                                 lapack_complex_double* alpha,
09138                                 lapack_complex_double* beta,
09139                                 lapack_complex_double* q, lapack_int ldq,
09140                                 lapack_complex_double* z, lapack_int ldz,
09141                                 lapack_int* m, double* pl, double* pr,
09142                                 double* dif, lapack_complex_double* work,
09143                                 lapack_int lwork, lapack_int* iwork,
09144                                 lapack_int liwork );
09145 
09146 lapack_int LAPACKE_stgsja_work( int matrix_order, char jobu, char jobv,
09147                                 char jobq, lapack_int m, lapack_int p,
09148                                 lapack_int n, lapack_int k, lapack_int l,
09149                                 float* a, lapack_int lda, float* b,
09150                                 lapack_int ldb, float tola, float tolb,
09151                                 float* alpha, float* beta, float* u,
09152                                 lapack_int ldu, float* v, lapack_int ldv,
09153                                 float* q, lapack_int ldq, float* work,
09154                                 lapack_int* ncycle );
09155 lapack_int LAPACKE_dtgsja_work( int matrix_order, char jobu, char jobv,
09156                                 char jobq, lapack_int m, lapack_int p,
09157                                 lapack_int n, lapack_int k, lapack_int l,
09158                                 double* a, lapack_int lda, double* b,
09159                                 lapack_int ldb, double tola, double tolb,
09160                                 double* alpha, double* beta, double* u,
09161                                 lapack_int ldu, double* v, lapack_int ldv,
09162                                 double* q, lapack_int ldq, double* work,
09163                                 lapack_int* ncycle );
09164 lapack_int LAPACKE_ctgsja_work( int matrix_order, char jobu, char jobv,
09165                                 char jobq, lapack_int m, lapack_int p,
09166                                 lapack_int n, lapack_int k, lapack_int l,
09167                                 lapack_complex_float* a, lapack_int lda,
09168                                 lapack_complex_float* b, lapack_int ldb,
09169                                 float tola, float tolb, float* alpha,
09170                                 float* beta, lapack_complex_float* u,
09171                                 lapack_int ldu, lapack_complex_float* v,
09172                                 lapack_int ldv, lapack_complex_float* q,
09173                                 lapack_int ldq, lapack_complex_float* work,
09174                                 lapack_int* ncycle );
09175 lapack_int LAPACKE_ztgsja_work( int matrix_order, char jobu, char jobv,
09176                                 char jobq, lapack_int m, lapack_int p,
09177                                 lapack_int n, lapack_int k, lapack_int l,
09178                                 lapack_complex_double* a, lapack_int lda,
09179                                 lapack_complex_double* b, lapack_int ldb,
09180                                 double tola, double tolb, double* alpha,
09181                                 double* beta, lapack_complex_double* u,
09182                                 lapack_int ldu, lapack_complex_double* v,
09183                                 lapack_int ldv, lapack_complex_double* q,
09184                                 lapack_int ldq, lapack_complex_double* work,
09185                                 lapack_int* ncycle );
09186 
09187 lapack_int LAPACKE_stgsna_work( int matrix_order, char job, char howmny,
09188                                 const lapack_logical* select, lapack_int n,
09189                                 const float* a, lapack_int lda, const float* b,
09190                                 lapack_int ldb, const float* vl,
09191                                 lapack_int ldvl, const float* vr,
09192                                 lapack_int ldvr, float* s, float* dif,
09193                                 lapack_int mm, lapack_int* m, float* work,
09194                                 lapack_int lwork, lapack_int* iwork );
09195 lapack_int LAPACKE_dtgsna_work( int matrix_order, char job, char howmny,
09196                                 const lapack_logical* select, lapack_int n,
09197                                 const double* a, lapack_int lda,
09198                                 const double* b, lapack_int ldb,
09199                                 const double* vl, lapack_int ldvl,
09200                                 const double* vr, lapack_int ldvr, double* s,
09201                                 double* dif, lapack_int mm, lapack_int* m,
09202                                 double* work, lapack_int lwork,
09203                                 lapack_int* iwork );
09204 lapack_int LAPACKE_ctgsna_work( int matrix_order, char job, char howmny,
09205                                 const lapack_logical* select, lapack_int n,
09206                                 const lapack_complex_float* a, lapack_int lda,
09207                                 const lapack_complex_float* b, lapack_int ldb,
09208                                 const lapack_complex_float* vl, lapack_int ldvl,
09209                                 const lapack_complex_float* vr, lapack_int ldvr,
09210                                 float* s, float* dif, lapack_int mm,
09211                                 lapack_int* m, lapack_complex_float* work,
09212                                 lapack_int lwork, lapack_int* iwork );
09213 lapack_int LAPACKE_ztgsna_work( int matrix_order, char job, char howmny,
09214                                 const lapack_logical* select, lapack_int n,
09215                                 const lapack_complex_double* a, lapack_int lda,
09216                                 const lapack_complex_double* b, lapack_int ldb,
09217                                 const lapack_complex_double* vl,
09218                                 lapack_int ldvl,
09219                                 const lapack_complex_double* vr,
09220                                 lapack_int ldvr, double* s, double* dif,
09221                                 lapack_int mm, lapack_int* m,
09222                                 lapack_complex_double* work, lapack_int lwork,
09223                                 lapack_int* iwork );
09224 
09225 lapack_int LAPACKE_stgsyl_work( int matrix_order, char trans, lapack_int ijob,
09226                                 lapack_int m, lapack_int n, const float* a,
09227                                 lapack_int lda, const float* b, lapack_int ldb,
09228                                 float* c, lapack_int ldc, const float* d,
09229                                 lapack_int ldd, const float* e, lapack_int lde,
09230                                 float* f, lapack_int ldf, float* scale,
09231                                 float* dif, float* work, lapack_int lwork,
09232                                 lapack_int* iwork );
09233 lapack_int LAPACKE_dtgsyl_work( int matrix_order, char trans, lapack_int ijob,
09234                                 lapack_int m, lapack_int n, const double* a,
09235                                 lapack_int lda, const double* b, lapack_int ldb,
09236                                 double* c, lapack_int ldc, const double* d,
09237                                 lapack_int ldd, const double* e, lapack_int lde,
09238                                 double* f, lapack_int ldf, double* scale,
09239                                 double* dif, double* work, lapack_int lwork,
09240                                 lapack_int* iwork );
09241 lapack_int LAPACKE_ctgsyl_work( int matrix_order, char trans, lapack_int ijob,
09242                                 lapack_int m, lapack_int n,
09243                                 const lapack_complex_float* a, lapack_int lda,
09244                                 const lapack_complex_float* b, lapack_int ldb,
09245                                 lapack_complex_float* c, lapack_int ldc,
09246                                 const lapack_complex_float* d, lapack_int ldd,
09247                                 const lapack_complex_float* e, lapack_int lde,
09248                                 lapack_complex_float* f, lapack_int ldf,
09249                                 float* scale, float* dif,
09250                                 lapack_complex_float* work, lapack_int lwork,
09251                                 lapack_int* iwork );
09252 lapack_int LAPACKE_ztgsyl_work( int matrix_order, char trans, lapack_int ijob,
09253                                 lapack_int m, lapack_int n,
09254                                 const lapack_complex_double* a, lapack_int lda,
09255                                 const lapack_complex_double* b, lapack_int ldb,
09256                                 lapack_complex_double* c, lapack_int ldc,
09257                                 const lapack_complex_double* d, lapack_int ldd,
09258                                 const lapack_complex_double* e, lapack_int lde,
09259                                 lapack_complex_double* f, lapack_int ldf,
09260                                 double* scale, double* dif,
09261                                 lapack_complex_double* work, lapack_int lwork,
09262                                 lapack_int* iwork );
09263 
09264 lapack_int LAPACKE_stpcon_work( int matrix_order, char norm, char uplo,
09265                                 char diag, lapack_int n, const float* ap,
09266                                 float* rcond, float* work, lapack_int* iwork );
09267 lapack_int LAPACKE_dtpcon_work( int matrix_order, char norm, char uplo,
09268                                 char diag, lapack_int n, const double* ap,
09269                                 double* rcond, double* work,
09270                                 lapack_int* iwork );
09271 lapack_int LAPACKE_ctpcon_work( int matrix_order, char norm, char uplo,
09272                                 char diag, lapack_int n,
09273                                 const lapack_complex_float* ap, float* rcond,
09274                                 lapack_complex_float* work, float* rwork );
09275 lapack_int LAPACKE_ztpcon_work( int matrix_order, char norm, char uplo,
09276                                 char diag, lapack_int n,
09277                                 const lapack_complex_double* ap, double* rcond,
09278                                 lapack_complex_double* work, double* rwork );
09279 
09280 lapack_int LAPACKE_stprfs_work( int matrix_order, char uplo, char trans,
09281                                 char diag, lapack_int n, lapack_int nrhs,
09282                                 const float* ap, const float* b, lapack_int ldb,
09283                                 const float* x, lapack_int ldx, float* ferr,
09284                                 float* berr, float* work, lapack_int* iwork );
09285 lapack_int LAPACKE_dtprfs_work( int matrix_order, char uplo, char trans,
09286                                 char diag, lapack_int n, lapack_int nrhs,
09287                                 const double* ap, const double* b,
09288                                 lapack_int ldb, const double* x, lapack_int ldx,
09289                                 double* ferr, double* berr, double* work,
09290                                 lapack_int* iwork );
09291 lapack_int LAPACKE_ctprfs_work( int matrix_order, char uplo, char trans,
09292                                 char diag, lapack_int n, lapack_int nrhs,
09293                                 const lapack_complex_float* ap,
09294                                 const lapack_complex_float* b, lapack_int ldb,
09295                                 const lapack_complex_float* x, lapack_int ldx,
09296                                 float* ferr, float* berr,
09297                                 lapack_complex_float* work, float* rwork );
09298 lapack_int LAPACKE_ztprfs_work( int matrix_order, char uplo, char trans,
09299                                 char diag, lapack_int n, lapack_int nrhs,
09300                                 const lapack_complex_double* ap,
09301                                 const lapack_complex_double* b, lapack_int ldb,
09302                                 const lapack_complex_double* x, lapack_int ldx,
09303                                 double* ferr, double* berr,
09304                                 lapack_complex_double* work, double* rwork );
09305 
09306 lapack_int LAPACKE_stptri_work( int matrix_order, char uplo, char diag,
09307                                 lapack_int n, float* ap );
09308 lapack_int LAPACKE_dtptri_work( int matrix_order, char uplo, char diag,
09309                                 lapack_int n, double* ap );
09310 lapack_int LAPACKE_ctptri_work( int matrix_order, char uplo, char diag,
09311                                 lapack_int n, lapack_complex_float* ap );
09312 lapack_int LAPACKE_ztptri_work( int matrix_order, char uplo, char diag,
09313                                 lapack_int n, lapack_complex_double* ap );
09314 
09315 lapack_int LAPACKE_stptrs_work( int matrix_order, char uplo, char trans,
09316                                 char diag, lapack_int n, lapack_int nrhs,
09317                                 const float* ap, float* b, lapack_int ldb );
09318 lapack_int LAPACKE_dtptrs_work( int matrix_order, char uplo, char trans,
09319                                 char diag, lapack_int n, lapack_int nrhs,
09320                                 const double* ap, double* b, lapack_int ldb );
09321 lapack_int LAPACKE_ctptrs_work( int matrix_order, char uplo, char trans,
09322                                 char diag, lapack_int n, lapack_int nrhs,
09323                                 const lapack_complex_float* ap,
09324                                 lapack_complex_float* b, lapack_int ldb );
09325 lapack_int LAPACKE_ztptrs_work( int matrix_order, char uplo, char trans,
09326                                 char diag, lapack_int n, lapack_int nrhs,
09327                                 const lapack_complex_double* ap,
09328                                 lapack_complex_double* b, lapack_int ldb );
09329 
09330 lapack_int LAPACKE_stpttf_work( int matrix_order, char transr, char uplo,
09331                                 lapack_int n, const float* ap, float* arf );
09332 lapack_int LAPACKE_dtpttf_work( int matrix_order, char transr, char uplo,
09333                                 lapack_int n, const double* ap, double* arf );
09334 lapack_int LAPACKE_ctpttf_work( int matrix_order, char transr, char uplo,
09335                                 lapack_int n, const lapack_complex_float* ap,
09336                                 lapack_complex_float* arf );
09337 lapack_int LAPACKE_ztpttf_work( int matrix_order, char transr, char uplo,
09338                                 lapack_int n, const lapack_complex_double* ap,
09339                                 lapack_complex_double* arf );
09340 
09341 lapack_int LAPACKE_stpttr_work( int matrix_order, char uplo, lapack_int n,
09342                                 const float* ap, float* a, lapack_int lda );
09343 lapack_int LAPACKE_dtpttr_work( int matrix_order, char uplo, lapack_int n,
09344                                 const double* ap, double* a, lapack_int lda );
09345 lapack_int LAPACKE_ctpttr_work( int matrix_order, char uplo, lapack_int n,
09346                                 const lapack_complex_float* ap,
09347                                 lapack_complex_float* a, lapack_int lda );
09348 lapack_int LAPACKE_ztpttr_work( int matrix_order, char uplo, lapack_int n,
09349                                 const lapack_complex_double* ap,
09350                                 lapack_complex_double* a, lapack_int lda );
09351 
09352 lapack_int LAPACKE_strcon_work( int matrix_order, char norm, char uplo,
09353                                 char diag, lapack_int n, const float* a,
09354                                 lapack_int lda, float* rcond, float* work,
09355                                 lapack_int* iwork );
09356 lapack_int LAPACKE_dtrcon_work( int matrix_order, char norm, char uplo,
09357                                 char diag, lapack_int n, const double* a,
09358                                 lapack_int lda, double* rcond, double* work,
09359                                 lapack_int* iwork );
09360 lapack_int LAPACKE_ctrcon_work( int matrix_order, char norm, char uplo,
09361                                 char diag, lapack_int n,
09362                                 const lapack_complex_float* a, lapack_int lda,
09363                                 float* rcond, lapack_complex_float* work,
09364                                 float* rwork );
09365 lapack_int LAPACKE_ztrcon_work( int matrix_order, char norm, char uplo,
09366                                 char diag, lapack_int n,
09367                                 const lapack_complex_double* a, lapack_int lda,
09368                                 double* rcond, lapack_complex_double* work,
09369                                 double* rwork );
09370 
09371 lapack_int LAPACKE_strevc_work( int matrix_order, char side, char howmny,
09372                                 lapack_logical* select, lapack_int n,
09373                                 const float* t, lapack_int ldt, float* vl,
09374                                 lapack_int ldvl, float* vr, lapack_int ldvr,
09375                                 lapack_int mm, lapack_int* m, float* work );
09376 lapack_int LAPACKE_dtrevc_work( int matrix_order, char side, char howmny,
09377                                 lapack_logical* select, lapack_int n,
09378                                 const double* t, lapack_int ldt, double* vl,
09379                                 lapack_int ldvl, double* vr, lapack_int ldvr,
09380                                 lapack_int mm, lapack_int* m, double* work );
09381 lapack_int LAPACKE_ctrevc_work( int matrix_order, char side, char howmny,
09382                                 const lapack_logical* select, lapack_int n,
09383                                 lapack_complex_float* t, lapack_int ldt,
09384                                 lapack_complex_float* vl, lapack_int ldvl,
09385                                 lapack_complex_float* vr, lapack_int ldvr,
09386                                 lapack_int mm, lapack_int* m,
09387                                 lapack_complex_float* work, float* rwork );
09388 lapack_int LAPACKE_ztrevc_work( int matrix_order, char side, char howmny,
09389                                 const lapack_logical* select, lapack_int n,
09390                                 lapack_complex_double* t, lapack_int ldt,
09391                                 lapack_complex_double* vl, lapack_int ldvl,
09392                                 lapack_complex_double* vr, lapack_int ldvr,
09393                                 lapack_int mm, lapack_int* m,
09394                                 lapack_complex_double* work, double* rwork );
09395 
09396 lapack_int LAPACKE_strexc_work( int matrix_order, char compq, lapack_int n,
09397                                 float* t, lapack_int ldt, float* q,
09398                                 lapack_int ldq, lapack_int* ifst,
09399                                 lapack_int* ilst, float* work );
09400 lapack_int LAPACKE_dtrexc_work( int matrix_order, char compq, lapack_int n,
09401                                 double* t, lapack_int ldt, double* q,
09402                                 lapack_int ldq, lapack_int* ifst,
09403                                 lapack_int* ilst, double* work );
09404 lapack_int LAPACKE_ctrexc_work( int matrix_order, char compq, lapack_int n,
09405                                 lapack_complex_float* t, lapack_int ldt,
09406                                 lapack_complex_float* q, lapack_int ldq,
09407                                 lapack_int ifst, lapack_int ilst );
09408 lapack_int LAPACKE_ztrexc_work( int matrix_order, char compq, lapack_int n,
09409                                 lapack_complex_double* t, lapack_int ldt,
09410                                 lapack_complex_double* q, lapack_int ldq,
09411                                 lapack_int ifst, lapack_int ilst );
09412 
09413 lapack_int LAPACKE_strrfs_work( int matrix_order, char uplo, char trans,
09414                                 char diag, lapack_int n, lapack_int nrhs,
09415                                 const float* a, lapack_int lda, const float* b,
09416                                 lapack_int ldb, const float* x, lapack_int ldx,
09417                                 float* ferr, float* berr, float* work,
09418                                 lapack_int* iwork );
09419 lapack_int LAPACKE_dtrrfs_work( int matrix_order, char uplo, char trans,
09420                                 char diag, lapack_int n, lapack_int nrhs,
09421                                 const double* a, lapack_int lda,
09422                                 const double* b, lapack_int ldb,
09423                                 const double* x, lapack_int ldx, double* ferr,
09424                                 double* berr, double* work, lapack_int* iwork );
09425 lapack_int LAPACKE_ctrrfs_work( int matrix_order, char uplo, char trans,
09426                                 char diag, lapack_int n, lapack_int nrhs,
09427                                 const lapack_complex_float* a, lapack_int lda,
09428                                 const lapack_complex_float* b, lapack_int ldb,
09429                                 const lapack_complex_float* x, lapack_int ldx,
09430                                 float* ferr, float* berr,
09431                                 lapack_complex_float* work, float* rwork );
09432 lapack_int LAPACKE_ztrrfs_work( int matrix_order, char uplo, char trans,
09433                                 char diag, lapack_int n, lapack_int nrhs,
09434                                 const lapack_complex_double* a, lapack_int lda,
09435                                 const lapack_complex_double* b, lapack_int ldb,
09436                                 const lapack_complex_double* x, lapack_int ldx,
09437                                 double* ferr, double* berr,
09438                                 lapack_complex_double* work, double* rwork );
09439 
09440 lapack_int LAPACKE_strsen_work( int matrix_order, char job, char compq,
09441                                 const lapack_logical* select, lapack_int n,
09442                                 float* t, lapack_int ldt, float* q,
09443                                 lapack_int ldq, float* wr, float* wi,
09444                                 lapack_int* m, float* s, float* sep,
09445                                 float* work, lapack_int lwork,
09446                                 lapack_int* iwork, lapack_int liwork );
09447 lapack_int LAPACKE_dtrsen_work( int matrix_order, char job, char compq,
09448                                 const lapack_logical* select, lapack_int n,
09449                                 double* t, lapack_int ldt, double* q,
09450                                 lapack_int ldq, double* wr, double* wi,
09451                                 lapack_int* m, double* s, double* sep,
09452                                 double* work, lapack_int lwork,
09453                                 lapack_int* iwork, lapack_int liwork );
09454 lapack_int LAPACKE_ctrsen_work( int matrix_order, char job, char compq,
09455                                 const lapack_logical* select, lapack_int n,
09456                                 lapack_complex_float* t, lapack_int ldt,
09457                                 lapack_complex_float* q, lapack_int ldq,
09458                                 lapack_complex_float* w, lapack_int* m,
09459                                 float* s, float* sep,
09460                                 lapack_complex_float* work, lapack_int lwork );
09461 lapack_int LAPACKE_ztrsen_work( int matrix_order, char job, char compq,
09462                                 const lapack_logical* select, lapack_int n,
09463                                 lapack_complex_double* t, lapack_int ldt,
09464                                 lapack_complex_double* q, lapack_int ldq,
09465                                 lapack_complex_double* w, lapack_int* m,
09466                                 double* s, double* sep,
09467                                 lapack_complex_double* work, lapack_int lwork );
09468 
09469 lapack_int LAPACKE_strsna_work( int matrix_order, char job, char howmny,
09470                                 const lapack_logical* select, lapack_int n,
09471                                 const float* t, lapack_int ldt, const float* vl,
09472                                 lapack_int ldvl, const float* vr,
09473                                 lapack_int ldvr, float* s, float* sep,
09474                                 lapack_int mm, lapack_int* m, float* work,
09475                                 lapack_int ldwork, lapack_int* iwork );
09476 lapack_int LAPACKE_dtrsna_work( int matrix_order, char job, char howmny,
09477                                 const lapack_logical* select, lapack_int n,
09478                                 const double* t, lapack_int ldt,
09479                                 const double* vl, lapack_int ldvl,
09480                                 const double* vr, lapack_int ldvr, double* s,
09481                                 double* sep, lapack_int mm, lapack_int* m,
09482                                 double* work, lapack_int ldwork,
09483                                 lapack_int* iwork );
09484 lapack_int LAPACKE_ctrsna_work( int matrix_order, char job, char howmny,
09485                                 const lapack_logical* select, lapack_int n,
09486                                 const lapack_complex_float* t, lapack_int ldt,
09487                                 const lapack_complex_float* vl, lapack_int ldvl,
09488                                 const lapack_complex_float* vr, lapack_int ldvr,
09489                                 float* s, float* sep, lapack_int mm,
09490                                 lapack_int* m, lapack_complex_float* work,
09491                                 lapack_int ldwork, float* rwork );
09492 lapack_int LAPACKE_ztrsna_work( int matrix_order, char job, char howmny,
09493                                 const lapack_logical* select, lapack_int n,
09494                                 const lapack_complex_double* t, lapack_int ldt,
09495                                 const lapack_complex_double* vl,
09496                                 lapack_int ldvl,
09497                                 const lapack_complex_double* vr,
09498                                 lapack_int ldvr, double* s, double* sep,
09499                                 lapack_int mm, lapack_int* m,
09500                                 lapack_complex_double* work, lapack_int ldwork,
09501                                 double* rwork );
09502 
09503 lapack_int LAPACKE_strsyl_work( int matrix_order, char trana, char tranb,
09504                                 lapack_int isgn, lapack_int m, lapack_int n,
09505                                 const float* a, lapack_int lda, const float* b,
09506                                 lapack_int ldb, float* c, lapack_int ldc,
09507                                 float* scale );
09508 lapack_int LAPACKE_dtrsyl_work( int matrix_order, char trana, char tranb,
09509                                 lapack_int isgn, lapack_int m, lapack_int n,
09510                                 const double* a, lapack_int lda,
09511                                 const double* b, lapack_int ldb, double* c,
09512                                 lapack_int ldc, double* scale );
09513 lapack_int LAPACKE_ctrsyl_work( int matrix_order, char trana, char tranb,
09514                                 lapack_int isgn, lapack_int m, lapack_int n,
09515                                 const lapack_complex_float* a, lapack_int lda,
09516                                 const lapack_complex_float* b, lapack_int ldb,
09517                                 lapack_complex_float* c, lapack_int ldc,
09518                                 float* scale );
09519 lapack_int LAPACKE_ztrsyl_work( int matrix_order, char trana, char tranb,
09520                                 lapack_int isgn, lapack_int m, lapack_int n,
09521                                 const lapack_complex_double* a, lapack_int lda,
09522                                 const lapack_complex_double* b, lapack_int ldb,
09523                                 lapack_complex_double* c, lapack_int ldc,
09524                                 double* scale );
09525 
09526 lapack_int LAPACKE_strtri_work( int matrix_order, char uplo, char diag,
09527                                 lapack_int n, float* a, lapack_int lda );
09528 lapack_int LAPACKE_dtrtri_work( int matrix_order, char uplo, char diag,
09529                                 lapack_int n, double* a, lapack_int lda );
09530 lapack_int LAPACKE_ctrtri_work( int matrix_order, char uplo, char diag,
09531                                 lapack_int n, lapack_complex_float* a,
09532                                 lapack_int lda );
09533 lapack_int LAPACKE_ztrtri_work( int matrix_order, char uplo, char diag,
09534                                 lapack_int n, lapack_complex_double* a,
09535                                 lapack_int lda );
09536 
09537 lapack_int LAPACKE_strtrs_work( int matrix_order, char uplo, char trans,
09538                                 char diag, lapack_int n, lapack_int nrhs,
09539                                 const float* a, lapack_int lda, float* b,
09540                                 lapack_int ldb );
09541 lapack_int LAPACKE_dtrtrs_work( int matrix_order, char uplo, char trans,
09542                                 char diag, lapack_int n, lapack_int nrhs,
09543                                 const double* a, lapack_int lda, double* b,
09544                                 lapack_int ldb );
09545 lapack_int LAPACKE_ctrtrs_work( int matrix_order, char uplo, char trans,
09546                                 char diag, lapack_int n, lapack_int nrhs,
09547                                 const lapack_complex_float* a, lapack_int lda,
09548                                 lapack_complex_float* b, lapack_int ldb );
09549 lapack_int LAPACKE_ztrtrs_work( int matrix_order, char uplo, char trans,
09550                                 char diag, lapack_int n, lapack_int nrhs,
09551                                 const lapack_complex_double* a, lapack_int lda,
09552                                 lapack_complex_double* b, lapack_int ldb );
09553 
09554 lapack_int LAPACKE_strttf_work( int matrix_order, char transr, char uplo,
09555                                 lapack_int n, const float* a, lapack_int lda,
09556                                 float* arf );
09557 lapack_int LAPACKE_dtrttf_work( int matrix_order, char transr, char uplo,
09558                                 lapack_int n, const double* a, lapack_int lda,
09559                                 double* arf );
09560 lapack_int LAPACKE_ctrttf_work( int matrix_order, char transr, char uplo,
09561                                 lapack_int n, const lapack_complex_float* a,
09562                                 lapack_int lda, lapack_complex_float* arf );
09563 lapack_int LAPACKE_ztrttf_work( int matrix_order, char transr, char uplo,
09564                                 lapack_int n, const lapack_complex_double* a,
09565                                 lapack_int lda, lapack_complex_double* arf );
09566 
09567 lapack_int LAPACKE_strttp_work( int matrix_order, char uplo, lapack_int n,
09568                                 const float* a, lapack_int lda, float* ap );
09569 lapack_int LAPACKE_dtrttp_work( int matrix_order, char uplo, lapack_int n,
09570                                 const double* a, lapack_int lda, double* ap );
09571 lapack_int LAPACKE_ctrttp_work( int matrix_order, char uplo, lapack_int n,
09572                                 const lapack_complex_float* a, lapack_int lda,
09573                                 lapack_complex_float* ap );
09574 lapack_int LAPACKE_ztrttp_work( int matrix_order, char uplo, lapack_int n,
09575                                 const lapack_complex_double* a, lapack_int lda,
09576                                 lapack_complex_double* ap );
09577 
09578 lapack_int LAPACKE_stzrzf_work( int matrix_order, lapack_int m, lapack_int n,
09579                                 float* a, lapack_int lda, float* tau,
09580                                 float* work, lapack_int lwork );
09581 lapack_int LAPACKE_dtzrzf_work( int matrix_order, lapack_int m, lapack_int n,
09582                                 double* a, lapack_int lda, double* tau,
09583                                 double* work, lapack_int lwork );
09584 lapack_int LAPACKE_ctzrzf_work( int matrix_order, lapack_int m, lapack_int n,
09585                                 lapack_complex_float* a, lapack_int lda,
09586                                 lapack_complex_float* tau,
09587                                 lapack_complex_float* work, lapack_int lwork );
09588 lapack_int LAPACKE_ztzrzf_work( int matrix_order, lapack_int m, lapack_int n,
09589                                 lapack_complex_double* a, lapack_int lda,
09590                                 lapack_complex_double* tau,
09591                                 lapack_complex_double* work, lapack_int lwork );
09592 
09593 lapack_int LAPACKE_cungbr_work( int matrix_order, char vect, lapack_int m,
09594                                 lapack_int n, lapack_int k,
09595                                 lapack_complex_float* a, lapack_int lda,
09596                                 const lapack_complex_float* tau,
09597                                 lapack_complex_float* work, lapack_int lwork );
09598 lapack_int LAPACKE_zungbr_work( int matrix_order, char vect, lapack_int m,
09599                                 lapack_int n, lapack_int k,
09600                                 lapack_complex_double* a, lapack_int lda,
09601                                 const lapack_complex_double* tau,
09602                                 lapack_complex_double* work, lapack_int lwork );
09603 
09604 lapack_int LAPACKE_cunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
09605                                 lapack_int ihi, lapack_complex_float* a,
09606                                 lapack_int lda, const lapack_complex_float* tau,
09607                                 lapack_complex_float* work, lapack_int lwork );
09608 lapack_int LAPACKE_zunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
09609                                 lapack_int ihi, lapack_complex_double* a,
09610                                 lapack_int lda,
09611                                 const lapack_complex_double* tau,
09612                                 lapack_complex_double* work, lapack_int lwork );
09613 
09614 lapack_int LAPACKE_cunglq_work( int matrix_order, lapack_int m, lapack_int n,
09615                                 lapack_int k, lapack_complex_float* a,
09616                                 lapack_int lda, const lapack_complex_float* tau,
09617                                 lapack_complex_float* work, lapack_int lwork );
09618 lapack_int LAPACKE_zunglq_work( int matrix_order, lapack_int m, lapack_int n,
09619                                 lapack_int k, lapack_complex_double* a,
09620                                 lapack_int lda,
09621                                 const lapack_complex_double* tau,
09622                                 lapack_complex_double* work, lapack_int lwork );
09623 
09624 lapack_int LAPACKE_cungql_work( int matrix_order, lapack_int m, lapack_int n,
09625                                 lapack_int k, lapack_complex_float* a,
09626                                 lapack_int lda, const lapack_complex_float* tau,
09627                                 lapack_complex_float* work, lapack_int lwork );
09628 lapack_int LAPACKE_zungql_work( int matrix_order, lapack_int m, lapack_int n,
09629                                 lapack_int k, lapack_complex_double* a,
09630                                 lapack_int lda,
09631                                 const lapack_complex_double* tau,
09632                                 lapack_complex_double* work, lapack_int lwork );
09633 
09634 lapack_int LAPACKE_cungqr_work( int matrix_order, lapack_int m, lapack_int n,
09635                                 lapack_int k, lapack_complex_float* a,
09636                                 lapack_int lda, const lapack_complex_float* tau,
09637                                 lapack_complex_float* work, lapack_int lwork );
09638 lapack_int LAPACKE_zungqr_work( int matrix_order, lapack_int m, lapack_int n,
09639                                 lapack_int k, lapack_complex_double* a,
09640                                 lapack_int lda,
09641                                 const lapack_complex_double* tau,
09642                                 lapack_complex_double* work, lapack_int lwork );
09643 
09644 lapack_int LAPACKE_cungrq_work( int matrix_order, lapack_int m, lapack_int n,
09645                                 lapack_int k, lapack_complex_float* a,
09646                                 lapack_int lda, const lapack_complex_float* tau,
09647                                 lapack_complex_float* work, lapack_int lwork );
09648 lapack_int LAPACKE_zungrq_work( int matrix_order, lapack_int m, lapack_int n,
09649                                 lapack_int k, lapack_complex_double* a,
09650                                 lapack_int lda,
09651                                 const lapack_complex_double* tau,
09652                                 lapack_complex_double* work, lapack_int lwork );
09653 
09654 lapack_int LAPACKE_cungtr_work( int matrix_order, char uplo, lapack_int n,
09655                                 lapack_complex_float* a, lapack_int lda,
09656                                 const lapack_complex_float* tau,
09657                                 lapack_complex_float* work, lapack_int lwork );
09658 lapack_int LAPACKE_zungtr_work( int matrix_order, char uplo, lapack_int n,
09659                                 lapack_complex_double* a, lapack_int lda,
09660                                 const lapack_complex_double* tau,
09661                                 lapack_complex_double* work, lapack_int lwork );
09662 
09663 lapack_int LAPACKE_cunmbr_work( int matrix_order, char vect, char side,
09664                                 char trans, lapack_int m, lapack_int n,
09665                                 lapack_int k, const lapack_complex_float* a,
09666                                 lapack_int lda, const lapack_complex_float* tau,
09667                                 lapack_complex_float* c, lapack_int ldc,
09668                                 lapack_complex_float* work, lapack_int lwork );
09669 lapack_int LAPACKE_zunmbr_work( int matrix_order, char vect, char side,
09670                                 char trans, lapack_int m, lapack_int n,
09671                                 lapack_int k, const lapack_complex_double* a,
09672                                 lapack_int lda,
09673                                 const lapack_complex_double* tau,
09674                                 lapack_complex_double* c, lapack_int ldc,
09675                                 lapack_complex_double* work, lapack_int lwork );
09676 
09677 lapack_int LAPACKE_cunmhr_work( int matrix_order, char side, char trans,
09678                                 lapack_int m, lapack_int n, lapack_int ilo,
09679                                 lapack_int ihi, const lapack_complex_float* a,
09680                                 lapack_int lda, const lapack_complex_float* tau,
09681                                 lapack_complex_float* c, lapack_int ldc,
09682                                 lapack_complex_float* work, lapack_int lwork );
09683 lapack_int LAPACKE_zunmhr_work( int matrix_order, char side, char trans,
09684                                 lapack_int m, lapack_int n, lapack_int ilo,
09685                                 lapack_int ihi, const lapack_complex_double* a,
09686                                 lapack_int lda,
09687                                 const lapack_complex_double* tau,
09688                                 lapack_complex_double* c, lapack_int ldc,
09689                                 lapack_complex_double* work, lapack_int lwork );
09690 
09691 lapack_int LAPACKE_cunmlq_work( int matrix_order, char side, char trans,
09692                                 lapack_int m, lapack_int n, lapack_int k,
09693                                 const lapack_complex_float* a, lapack_int lda,
09694                                 const lapack_complex_float* tau,
09695                                 lapack_complex_float* c, lapack_int ldc,
09696                                 lapack_complex_float* work, lapack_int lwork );
09697 lapack_int LAPACKE_zunmlq_work( int matrix_order, char side, char trans,
09698                                 lapack_int m, lapack_int n, lapack_int k,
09699                                 const lapack_complex_double* a, lapack_int lda,
09700                                 const lapack_complex_double* tau,
09701                                 lapack_complex_double* c, lapack_int ldc,
09702                                 lapack_complex_double* work, lapack_int lwork );
09703 
09704 lapack_int LAPACKE_cunmql_work( int matrix_order, char side, char trans,
09705                                 lapack_int m, lapack_int n, lapack_int k,
09706                                 const lapack_complex_float* a, lapack_int lda,
09707                                 const lapack_complex_float* tau,
09708                                 lapack_complex_float* c, lapack_int ldc,
09709                                 lapack_complex_float* work, lapack_int lwork );
09710 lapack_int LAPACKE_zunmql_work( int matrix_order, char side, char trans,
09711                                 lapack_int m, lapack_int n, lapack_int k,
09712                                 const lapack_complex_double* a, lapack_int lda,
09713                                 const lapack_complex_double* tau,
09714                                 lapack_complex_double* c, lapack_int ldc,
09715                                 lapack_complex_double* work, lapack_int lwork );
09716 
09717 lapack_int LAPACKE_cunmqr_work( int matrix_order, char side, char trans,
09718                                 lapack_int m, lapack_int n, lapack_int k,
09719                                 const lapack_complex_float* a, lapack_int lda,
09720                                 const lapack_complex_float* tau,
09721                                 lapack_complex_float* c, lapack_int ldc,
09722                                 lapack_complex_float* work, lapack_int lwork );
09723 lapack_int LAPACKE_zunmqr_work( int matrix_order, char side, char trans,
09724                                 lapack_int m, lapack_int n, lapack_int k,
09725                                 const lapack_complex_double* a, lapack_int lda,
09726                                 const lapack_complex_double* tau,
09727                                 lapack_complex_double* c, lapack_int ldc,
09728                                 lapack_complex_double* work, lapack_int lwork );
09729 
09730 lapack_int LAPACKE_cunmrq_work( int matrix_order, char side, char trans,
09731                                 lapack_int m, lapack_int n, lapack_int k,
09732                                 const lapack_complex_float* a, lapack_int lda,
09733                                 const lapack_complex_float* tau,
09734                                 lapack_complex_float* c, lapack_int ldc,
09735                                 lapack_complex_float* work, lapack_int lwork );
09736 lapack_int LAPACKE_zunmrq_work( int matrix_order, char side, char trans,
09737                                 lapack_int m, lapack_int n, lapack_int k,
09738                                 const lapack_complex_double* a, lapack_int lda,
09739                                 const lapack_complex_double* tau,
09740                                 lapack_complex_double* c, lapack_int ldc,
09741                                 lapack_complex_double* work, lapack_int lwork );
09742 
09743 lapack_int LAPACKE_cunmrz_work( int matrix_order, char side, char trans,
09744                                 lapack_int m, lapack_int n, lapack_int k,
09745                                 lapack_int l, const lapack_complex_float* a,
09746                                 lapack_int lda, const lapack_complex_float* tau,
09747                                 lapack_complex_float* c, lapack_int ldc,
09748                                 lapack_complex_float* work, lapack_int lwork );
09749 lapack_int LAPACKE_zunmrz_work( int matrix_order, char side, char trans,
09750                                 lapack_int m, lapack_int n, lapack_int k,
09751                                 lapack_int l, const lapack_complex_double* a,
09752                                 lapack_int lda,
09753                                 const lapack_complex_double* tau,
09754                                 lapack_complex_double* c, lapack_int ldc,
09755                                 lapack_complex_double* work, lapack_int lwork );
09756 
09757 lapack_int LAPACKE_cunmtr_work( int matrix_order, char side, char uplo,
09758                                 char trans, lapack_int m, lapack_int n,
09759                                 const lapack_complex_float* a, lapack_int lda,
09760                                 const lapack_complex_float* tau,
09761                                 lapack_complex_float* c, lapack_int ldc,
09762                                 lapack_complex_float* work, lapack_int lwork );
09763 lapack_int LAPACKE_zunmtr_work( int matrix_order, char side, char uplo,
09764                                 char trans, lapack_int m, lapack_int n,
09765                                 const lapack_complex_double* a, lapack_int lda,
09766                                 const lapack_complex_double* tau,
09767                                 lapack_complex_double* c, lapack_int ldc,
09768                                 lapack_complex_double* work, lapack_int lwork );
09769 
09770 lapack_int LAPACKE_cupgtr_work( int matrix_order, char uplo, lapack_int n,
09771                                 const lapack_complex_float* ap,
09772                                 const lapack_complex_float* tau,
09773                                 lapack_complex_float* q, lapack_int ldq,
09774                                 lapack_complex_float* work );
09775 lapack_int LAPACKE_zupgtr_work( int matrix_order, char uplo, lapack_int n,
09776                                 const lapack_complex_double* ap,
09777                                 const lapack_complex_double* tau,
09778                                 lapack_complex_double* q, lapack_int ldq,
09779                                 lapack_complex_double* work );
09780 
09781 lapack_int LAPACKE_cupmtr_work( int matrix_order, char side, char uplo,
09782                                 char trans, lapack_int m, lapack_int n,
09783                                 const lapack_complex_float* ap,
09784                                 const lapack_complex_float* tau,
09785                                 lapack_complex_float* c, lapack_int ldc,
09786                                 lapack_complex_float* work );
09787 lapack_int LAPACKE_zupmtr_work( int matrix_order, char side, char uplo,
09788                                 char trans, lapack_int m, lapack_int n,
09789                                 const lapack_complex_double* ap,
09790                                 const lapack_complex_double* tau,
09791                                 lapack_complex_double* c, lapack_int ldc,
09792                                 lapack_complex_double* work );
09793 
09794 lapack_int LAPACKE_claghe( int matrix_order, lapack_int n, lapack_int k,
09795                            const float* d, lapack_complex_float* a,
09796                            lapack_int lda, lapack_int* iseed );
09797 lapack_int LAPACKE_zlaghe( int matrix_order, lapack_int n, lapack_int k,
09798                            const double* d, lapack_complex_double* a,
09799                            lapack_int lda, lapack_int* iseed );
09800 
09801 lapack_int LAPACKE_slagsy( int matrix_order, lapack_int n, lapack_int k,
09802                            const float* d, float* a, lapack_int lda,
09803                            lapack_int* iseed );
09804 lapack_int LAPACKE_dlagsy( int matrix_order, lapack_int n, lapack_int k,
09805                            const double* d, double* a, lapack_int lda,
09806                            lapack_int* iseed );
09807 lapack_int LAPACKE_clagsy( int matrix_order, lapack_int n, lapack_int k,
09808                            const float* d, lapack_complex_float* a,
09809                            lapack_int lda, lapack_int* iseed );
09810 lapack_int LAPACKE_zlagsy( int matrix_order, lapack_int n, lapack_int k,
09811                            const double* d, lapack_complex_double* a,
09812                            lapack_int lda, lapack_int* iseed );
09813 
09814 lapack_int LAPACKE_slapmr( int matrix_order, lapack_logical forwrd,
09815                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
09816                            lapack_int* k );
09817 lapack_int LAPACKE_dlapmr( int matrix_order, lapack_logical forwrd,
09818                            lapack_int m, lapack_int n, double* x,
09819                            lapack_int ldx, lapack_int* k );
09820 lapack_int LAPACKE_clapmr( int matrix_order, lapack_logical forwrd,
09821                            lapack_int m, lapack_int n, lapack_complex_float* x,
09822                            lapack_int ldx, lapack_int* k );
09823 lapack_int LAPACKE_zlapmr( int matrix_order, lapack_logical forwrd,
09824                            lapack_int m, lapack_int n, lapack_complex_double* x,
09825                            lapack_int ldx, lapack_int* k );
09826 
09827 
09828 float LAPACKE_slapy2( float x, float y );
09829 double LAPACKE_dlapy2( double x, double y );
09830 
09831 float LAPACKE_slapy3( float x, float y, float z );
09832 double LAPACKE_dlapy3( double x, double y, double z );
09833 
09834 lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
09835 lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
09836                             double* r );
09837 
09838 lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
09839                             float* sn );
09840 lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
09841                             double* sn );
09842 
09843 
09844 //LAPACK 3.3.0
09845 lapack_int LAPACKE_cbbcsd( int matrix_order, char jobu1, char jobu2,
09846                            char jobv1t, char jobv2t, char trans, lapack_int m,
09847                            lapack_int p, lapack_int q, float* theta, float* phi,
09848                            lapack_complex_float* u1, lapack_int ldu1,
09849                            lapack_complex_float* u2, lapack_int ldu2,
09850                            lapack_complex_float* v1t, lapack_int ldv1t,
09851                            lapack_complex_float* v2t, lapack_int ldv2t,
09852                            float* b11d, float* b11e, float* b12d, float* b12e,
09853                            float* b21d, float* b21e, float* b22d, float* b22e );
09854 lapack_int LAPACKE_cbbcsd_work( int matrix_order, char jobu1, char jobu2,
09855                                 char jobv1t, char jobv2t, char trans,
09856                                 lapack_int m, lapack_int p, lapack_int q,
09857                                 float* theta, float* phi,
09858                                 lapack_complex_float* u1, lapack_int ldu1,
09859                                 lapack_complex_float* u2, lapack_int ldu2,
09860                                 lapack_complex_float* v1t, lapack_int ldv1t,
09861                                 lapack_complex_float* v2t, lapack_int ldv2t,
09862                                 float* b11d, float* b11e, float* b12d,
09863                                 float* b12e, float* b21d, float* b21e,
09864                                 float* b22d, float* b22e, float* rwork,
09865                                 lapack_int lrwork );
09866 lapack_int LAPACKE_cheswapr( int matrix_order, char uplo, lapack_int n,
09867                              lapack_complex_float* a, lapack_int i1,
09868                              lapack_int i2 );
09869 lapack_int LAPACKE_cheswapr_work( int matrix_order, char uplo, lapack_int n,
09870                                   lapack_complex_float* a, lapack_int i1,
09871                                   lapack_int i2 );
09872 lapack_int LAPACKE_chetri2( int matrix_order, char uplo, lapack_int n,
09873                             lapack_complex_float* a, lapack_int lda,
09874                             const lapack_int* ipiv );
09875 lapack_int LAPACKE_chetri2_work( int matrix_order, char uplo, lapack_int n,
09876                                  lapack_complex_float* a, lapack_int lda,
09877                                  const lapack_int* ipiv,
09878                                  lapack_complex_float* work, lapack_int lwork );
09879 lapack_int LAPACKE_chetri2x( int matrix_order, char uplo, lapack_int n,
09880                              lapack_complex_float* a, lapack_int lda,
09881                              const lapack_int* ipiv, lapack_int nb );
09882 lapack_int LAPACKE_chetri2x_work( int matrix_order, char uplo, lapack_int n,
09883                                   lapack_complex_float* a, lapack_int lda,
09884                                   const lapack_int* ipiv,
09885                                   lapack_complex_float* work, lapack_int nb );
09886 lapack_int LAPACKE_chetrs2( int matrix_order, char uplo, lapack_int n,
09887                             lapack_int nrhs, const lapack_complex_float* a,
09888                             lapack_int lda, const lapack_int* ipiv,
09889                             lapack_complex_float* b, lapack_int ldb );
09890 lapack_int LAPACKE_chetrs2_work( int matrix_order, char uplo, lapack_int n,
09891                                  lapack_int nrhs, const lapack_complex_float* a,
09892                                  lapack_int lda, const lapack_int* ipiv,
09893                                  lapack_complex_float* b, lapack_int ldb,
09894                                  lapack_complex_float* work );
09895 lapack_int LAPACKE_csyconv( int matrix_order, char uplo, char way, lapack_int n,
09896                             lapack_complex_float* a, lapack_int lda,
09897                             const lapack_int* ipiv );
09898 lapack_int LAPACKE_csyconv_work( int matrix_order, char uplo, char way,
09899                                  lapack_int n, lapack_complex_float* a,
09900                                  lapack_int lda, const lapack_int* ipiv,
09901                                  lapack_complex_float* work );
09902 lapack_int LAPACKE_csyswapr( int matrix_order, char uplo, lapack_int n,
09903                              lapack_complex_float* a, lapack_int i1,
09904                              lapack_int i2 );
09905 lapack_int LAPACKE_csyswapr_work( int matrix_order, char uplo, lapack_int n,
09906                                   lapack_complex_float* a, lapack_int i1,
09907                                   lapack_int i2 );
09908 lapack_int LAPACKE_csytri2( int matrix_order, char uplo, lapack_int n,
09909                             lapack_complex_float* a, lapack_int lda,
09910                             const lapack_int* ipiv );
09911 lapack_int LAPACKE_csytri2_work( int matrix_order, char uplo, lapack_int n,
09912                                  lapack_complex_float* a, lapack_int lda,
09913                                  const lapack_int* ipiv,
09914                                  lapack_complex_float* work, lapack_int lwork );
09915 lapack_int LAPACKE_csytri2x( int matrix_order, char uplo, lapack_int n,
09916                              lapack_complex_float* a, lapack_int lda,
09917                              const lapack_int* ipiv, lapack_int nb );
09918 lapack_int LAPACKE_csytri2x_work( int matrix_order, char uplo, lapack_int n,
09919                                   lapack_complex_float* a, lapack_int lda,
09920                                   const lapack_int* ipiv,
09921                                   lapack_complex_float* work, lapack_int nb );
09922 lapack_int LAPACKE_csytrs2( int matrix_order, char uplo, lapack_int n,
09923                             lapack_int nrhs, const lapack_complex_float* a,
09924                             lapack_int lda, const lapack_int* ipiv,
09925                             lapack_complex_float* b, lapack_int ldb );
09926 lapack_int LAPACKE_csytrs2_work( int matrix_order, char uplo, lapack_int n,
09927                                  lapack_int nrhs, const lapack_complex_float* a,
09928                                  lapack_int lda, const lapack_int* ipiv,
09929                                  lapack_complex_float* b, lapack_int ldb,
09930                                  lapack_complex_float* work );
09931 lapack_int LAPACKE_cunbdb( int matrix_order, char trans, char signs,
09932                            lapack_int m, lapack_int p, lapack_int q,
09933                            lapack_complex_float* x11, lapack_int ldx11,
09934                            lapack_complex_float* x12, lapack_int ldx12,
09935                            lapack_complex_float* x21, lapack_int ldx21,
09936                            lapack_complex_float* x22, lapack_int ldx22,
09937                            float* theta, float* phi,
09938                            lapack_complex_float* taup1,
09939                            lapack_complex_float* taup2,
09940                            lapack_complex_float* tauq1,
09941                            lapack_complex_float* tauq2 );
09942 lapack_int LAPACKE_cunbdb_work( int matrix_order, char trans, char signs,
09943                                 lapack_int m, lapack_int p, lapack_int q,
09944                                 lapack_complex_float* x11, lapack_int ldx11,
09945                                 lapack_complex_float* x12, lapack_int ldx12,
09946                                 lapack_complex_float* x21, lapack_int ldx21,
09947                                 lapack_complex_float* x22, lapack_int ldx22,
09948                                 float* theta, float* phi,
09949                                 lapack_complex_float* taup1,
09950                                 lapack_complex_float* taup2,
09951                                 lapack_complex_float* tauq1,
09952                                 lapack_complex_float* tauq2,
09953                                 lapack_complex_float* work, lapack_int lwork );
09954 lapack_int LAPACKE_cuncsd( int matrix_order, char jobu1, char jobu2,
09955                            char jobv1t, char jobv2t, char trans, char signs,
09956                            lapack_int m, lapack_int p, lapack_int q,
09957                            lapack_complex_float* x11, lapack_int ldx11,
09958                            lapack_complex_float* x12, lapack_int ldx12,
09959                            lapack_complex_float* x21, lapack_int ldx21,
09960                            lapack_complex_float* x22, lapack_int ldx22,
09961                            float* theta, lapack_complex_float* u1,
09962                            lapack_int ldu1, lapack_complex_float* u2,
09963                            lapack_int ldu2, lapack_complex_float* v1t,
09964                            lapack_int ldv1t, lapack_complex_float* v2t,
09965                            lapack_int ldv2t );
09966 lapack_int LAPACKE_cuncsd_work( int matrix_order, char jobu1, char jobu2,
09967                                 char jobv1t, char jobv2t, char trans,
09968                                 char signs, lapack_int m, lapack_int p,
09969                                 lapack_int q, lapack_complex_float* x11,
09970                                 lapack_int ldx11, lapack_complex_float* x12,
09971                                 lapack_int ldx12, lapack_complex_float* x21,
09972                                 lapack_int ldx21, lapack_complex_float* x22,
09973                                 lapack_int ldx22, float* theta,
09974                                 lapack_complex_float* u1, lapack_int ldu1,
09975                                 lapack_complex_float* u2, lapack_int ldu2,
09976                                 lapack_complex_float* v1t, lapack_int ldv1t,
09977                                 lapack_complex_float* v2t, lapack_int ldv2t,
09978                                 lapack_complex_float* work, lapack_int lwork,
09979                                 float* rwork, lapack_int lrwork,
09980                                 lapack_int* iwork );
09981 lapack_int LAPACKE_dbbcsd( int matrix_order, char jobu1, char jobu2,
09982                            char jobv1t, char jobv2t, char trans, lapack_int m,
09983                            lapack_int p, lapack_int q, double* theta,
09984                            double* phi, double* u1, lapack_int ldu1, double* u2,
09985                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
09986                            double* v2t, lapack_int ldv2t, double* b11d,
09987                            double* b11e, double* b12d, double* b12e,
09988                            double* b21d, double* b21e, double* b22d,
09989                            double* b22e );
09990 lapack_int LAPACKE_dbbcsd_work( int matrix_order, char jobu1, char jobu2,
09991                                 char jobv1t, char jobv2t, char trans,
09992                                 lapack_int m, lapack_int p, lapack_int q,
09993                                 double* theta, double* phi, double* u1,
09994                                 lapack_int ldu1, double* u2, lapack_int ldu2,
09995                                 double* v1t, lapack_int ldv1t, double* v2t,
09996                                 lapack_int ldv2t, double* b11d, double* b11e,
09997                                 double* b12d, double* b12e, double* b21d,
09998                                 double* b21e, double* b22d, double* b22e,
09999                                 double* work, lapack_int lwork );
10000 lapack_int LAPACKE_dorbdb( int matrix_order, char trans, char signs,
10001                            lapack_int m, lapack_int p, lapack_int q,
10002                            double* x11, lapack_int ldx11, double* x12,
10003                            lapack_int ldx12, double* x21, lapack_int ldx21,
10004                            double* x22, lapack_int ldx22, double* theta,
10005                            double* phi, double* taup1, double* taup2,
10006                            double* tauq1, double* tauq2 );
10007 lapack_int LAPACKE_dorbdb_work( int matrix_order, char trans, char signs,
10008                                 lapack_int m, lapack_int p, lapack_int q,
10009                                 double* x11, lapack_int ldx11, double* x12,
10010                                 lapack_int ldx12, double* x21, lapack_int ldx21,
10011                                 double* x22, lapack_int ldx22, double* theta,
10012                                 double* phi, double* taup1, double* taup2,
10013                                 double* tauq1, double* tauq2, double* work,
10014                                 lapack_int lwork );
10015 lapack_int LAPACKE_dorcsd( int matrix_order, char jobu1, char jobu2,
10016                            char jobv1t, char jobv2t, char trans, char signs,
10017                            lapack_int m, lapack_int p, lapack_int q,
10018                            double* x11, lapack_int ldx11, double* x12,
10019                            lapack_int ldx12, double* x21, lapack_int ldx21,
10020                            double* x22, lapack_int ldx22, double* theta,
10021                            double* u1, lapack_int ldu1, double* u2,
10022                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10023                            double* v2t, lapack_int ldv2t );
10024 lapack_int LAPACKE_dorcsd_work( int matrix_order, char jobu1, char jobu2,
10025                                 char jobv1t, char jobv2t, char trans,
10026                                 char signs, lapack_int m, lapack_int p,
10027                                 lapack_int q, double* x11, lapack_int ldx11,
10028                                 double* x12, lapack_int ldx12, double* x21,
10029                                 lapack_int ldx21, double* x22, lapack_int ldx22,
10030                                 double* theta, double* u1, lapack_int ldu1,
10031                                 double* u2, lapack_int ldu2, double* v1t,
10032                                 lapack_int ldv1t, double* v2t, lapack_int ldv2t,
10033                                 double* work, lapack_int lwork,
10034                                 lapack_int* iwork );
10035 lapack_int LAPACKE_dsyconv( int matrix_order, char uplo, char way, lapack_int n,
10036                             double* a, lapack_int lda, const lapack_int* ipiv );
10037 lapack_int LAPACKE_dsyconv_work( int matrix_order, char uplo, char way,
10038                                  lapack_int n, double* a, lapack_int lda,
10039                                  const lapack_int* ipiv, double* work );
10040 lapack_int LAPACKE_dsyswapr( int matrix_order, char uplo, lapack_int n,
10041                              double* a, lapack_int i1, lapack_int i2 );
10042 lapack_int LAPACKE_dsyswapr_work( int matrix_order, char uplo, lapack_int n,
10043                                   double* a, lapack_int i1, lapack_int i2 );
10044 lapack_int LAPACKE_dsytri2( int matrix_order, char uplo, lapack_int n,
10045                             double* a, lapack_int lda, const lapack_int* ipiv );
10046 lapack_int LAPACKE_dsytri2_work( int matrix_order, char uplo, lapack_int n,
10047                                  double* a, lapack_int lda,
10048                                  const lapack_int* ipiv,
10049                                  lapack_complex_double* work, lapack_int lwork );
10050 lapack_int LAPACKE_dsytri2x( int matrix_order, char uplo, lapack_int n,
10051                              double* a, lapack_int lda, const lapack_int* ipiv,
10052                              lapack_int nb );
10053 lapack_int LAPACKE_dsytri2x_work( int matrix_order, char uplo, lapack_int n,
10054                                   double* a, lapack_int lda,
10055                                   const lapack_int* ipiv, double* work,
10056                                   lapack_int nb );
10057 lapack_int LAPACKE_dsytrs2( int matrix_order, char uplo, lapack_int n,
10058                             lapack_int nrhs, const double* a, lapack_int lda,
10059                             const lapack_int* ipiv, double* b, lapack_int ldb );
10060 lapack_int LAPACKE_dsytrs2_work( int matrix_order, char uplo, lapack_int n,
10061                                  lapack_int nrhs, const double* a,
10062                                  lapack_int lda, const lapack_int* ipiv,
10063                                  double* b, lapack_int ldb, double* work );
10064 lapack_int LAPACKE_sbbcsd( int matrix_order, char jobu1, char jobu2,
10065                            char jobv1t, char jobv2t, char trans, lapack_int m,
10066                            lapack_int p, lapack_int q, float* theta, float* phi,
10067                            float* u1, lapack_int ldu1, float* u2,
10068                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10069                            float* v2t, lapack_int ldv2t, float* b11d,
10070                            float* b11e, float* b12d, float* b12e, float* b21d,
10071                            float* b21e, float* b22d, float* b22e );
10072 lapack_int LAPACKE_sbbcsd_work( int matrix_order, char jobu1, char jobu2,
10073                                 char jobv1t, char jobv2t, char trans,
10074                                 lapack_int m, lapack_int p, lapack_int q,
10075                                 float* theta, float* phi, float* u1,
10076                                 lapack_int ldu1, float* u2, lapack_int ldu2,
10077                                 float* v1t, lapack_int ldv1t, float* v2t,
10078                                 lapack_int ldv2t, float* b11d, float* b11e,
10079                                 float* b12d, float* b12e, float* b21d,
10080                                 float* b21e, float* b22d, float* b22e,
10081                                 float* work, lapack_int lwork );
10082 lapack_int LAPACKE_sorbdb( int matrix_order, char trans, char signs,
10083                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10084                            lapack_int ldx11, float* x12, lapack_int ldx12,
10085                            float* x21, lapack_int ldx21, float* x22,
10086                            lapack_int ldx22, float* theta, float* phi,
10087                            float* taup1, float* taup2, float* tauq1,
10088                            float* tauq2 );
10089 lapack_int LAPACKE_sorbdb_work( int matrix_order, char trans, char signs,
10090                                 lapack_int m, lapack_int p, lapack_int q,
10091                                 float* x11, lapack_int ldx11, float* x12,
10092                                 lapack_int ldx12, float* x21, lapack_int ldx21,
10093                                 float* x22, lapack_int ldx22, float* theta,
10094                                 float* phi, float* taup1, float* taup2,
10095                                 float* tauq1, float* tauq2, float* work,
10096                                 lapack_int lwork );
10097 lapack_int LAPACKE_sorcsd( int matrix_order, char jobu1, char jobu2,
10098                            char jobv1t, char jobv2t, char trans, char signs,
10099                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10100                            lapack_int ldx11, float* x12, lapack_int ldx12,
10101                            float* x21, lapack_int ldx21, float* x22,
10102                            lapack_int ldx22, float* theta, float* u1,
10103                            lapack_int ldu1, float* u2, lapack_int ldu2,
10104                            float* v1t, lapack_int ldv1t, float* v2t,
10105                            lapack_int ldv2t );
10106 lapack_int LAPACKE_sorcsd_work( int matrix_order, char jobu1, char jobu2,
10107                                 char jobv1t, char jobv2t, char trans,
10108                                 char signs, lapack_int m, lapack_int p,
10109                                 lapack_int q, float* x11, lapack_int ldx11,
10110                                 float* x12, lapack_int ldx12, float* x21,
10111                                 lapack_int ldx21, float* x22, lapack_int ldx22,
10112                                 float* theta, float* u1, lapack_int ldu1,
10113                                 float* u2, lapack_int ldu2, float* v1t,
10114                                 lapack_int ldv1t, float* v2t, lapack_int ldv2t,
10115                                 float* work, lapack_int lwork,
10116                                 lapack_int* iwork );
10117 lapack_int LAPACKE_ssyconv( int matrix_order, char uplo, char way, lapack_int n,
10118                             float* a, lapack_int lda, const lapack_int* ipiv );
10119 lapack_int LAPACKE_ssyconv_work( int matrix_order, char uplo, char way,
10120                                  lapack_int n, float* a, lapack_int lda,
10121                                  const lapack_int* ipiv, float* work );
10122 lapack_int LAPACKE_ssyswapr( int matrix_order, char uplo, lapack_int n,
10123                              float* a, lapack_int i1, lapack_int i2 );
10124 lapack_int LAPACKE_ssyswapr_work( int matrix_order, char uplo, lapack_int n,
10125                                   float* a, lapack_int i1, lapack_int i2 );
10126 lapack_int LAPACKE_ssytri2( int matrix_order, char uplo, lapack_int n, float* a,
10127                             lapack_int lda, const lapack_int* ipiv );
10128 lapack_int LAPACKE_ssytri2_work( int matrix_order, char uplo, lapack_int n,
10129                                  float* a, lapack_int lda,
10130                                  const lapack_int* ipiv,
10131                                  lapack_complex_float* work, lapack_int lwork );
10132 lapack_int LAPACKE_ssytri2x( int matrix_order, char uplo, lapack_int n,
10133                              float* a, lapack_int lda, const lapack_int* ipiv,
10134                              lapack_int nb );
10135 lapack_int LAPACKE_ssytri2x_work( int matrix_order, char uplo, lapack_int n,
10136                                   float* a, lapack_int lda,
10137                                   const lapack_int* ipiv, float* work,
10138                                   lapack_int nb );
10139 lapack_int LAPACKE_ssytrs2( int matrix_order, char uplo, lapack_int n,
10140                             lapack_int nrhs, const float* a, lapack_int lda,
10141                             const lapack_int* ipiv, float* b, lapack_int ldb );
10142 lapack_int LAPACKE_ssytrs2_work( int matrix_order, char uplo, lapack_int n,
10143                                  lapack_int nrhs, const float* a,
10144                                  lapack_int lda, const lapack_int* ipiv,
10145                                  float* b, lapack_int ldb, float* work );
10146 lapack_int LAPACKE_zbbcsd( int matrix_order, char jobu1, char jobu2,
10147                            char jobv1t, char jobv2t, char trans, lapack_int m,
10148                            lapack_int p, lapack_int q, double* theta,
10149                            double* phi, lapack_complex_double* u1,
10150                            lapack_int ldu1, lapack_complex_double* u2,
10151                            lapack_int ldu2, lapack_complex_double* v1t,
10152                            lapack_int ldv1t, lapack_complex_double* v2t,
10153                            lapack_int ldv2t, double* b11d, double* b11e,
10154                            double* b12d, double* b12e, double* b21d,
10155                            double* b21e, double* b22d, double* b22e );
10156 lapack_int LAPACKE_zbbcsd_work( int matrix_order, char jobu1, char jobu2,
10157                                 char jobv1t, char jobv2t, char trans,
10158                                 lapack_int m, lapack_int p, lapack_int q,
10159                                 double* theta, double* phi,
10160                                 lapack_complex_double* u1, lapack_int ldu1,
10161                                 lapack_complex_double* u2, lapack_int ldu2,
10162                                 lapack_complex_double* v1t, lapack_int ldv1t,
10163                                 lapack_complex_double* v2t, lapack_int ldv2t,
10164                                 double* b11d, double* b11e, double* b12d,
10165                                 double* b12e, double* b21d, double* b21e,
10166                                 double* b22d, double* b22e, double* rwork,
10167                                 lapack_int lrwork );
10168 lapack_int LAPACKE_zheswapr( int matrix_order, char uplo, lapack_int n,
10169                              lapack_complex_double* a, lapack_int i1,
10170                              lapack_int i2 );
10171 lapack_int LAPACKE_zheswapr_work( int matrix_order, char uplo, lapack_int n,
10172                                   lapack_complex_double* a, lapack_int i1,
10173                                   lapack_int i2 );
10174 lapack_int LAPACKE_zhetri2( int matrix_order, char uplo, lapack_int n,
10175                             lapack_complex_double* a, lapack_int lda,
10176                             const lapack_int* ipiv );
10177 lapack_int LAPACKE_zhetri2_work( int matrix_order, char uplo, lapack_int n,
10178                                  lapack_complex_double* a, lapack_int lda,
10179                                  const lapack_int* ipiv,
10180                                  lapack_complex_double* work, lapack_int lwork );
10181 lapack_int LAPACKE_zhetri2x( int matrix_order, char uplo, lapack_int n,
10182                              lapack_complex_double* a, lapack_int lda,
10183                              const lapack_int* ipiv, lapack_int nb );
10184 lapack_int LAPACKE_zhetri2x_work( int matrix_order, char uplo, lapack_int n,
10185                                   lapack_complex_double* a, lapack_int lda,
10186                                   const lapack_int* ipiv,
10187                                   lapack_complex_double* work, lapack_int nb );
10188 lapack_int LAPACKE_zhetrs2( int matrix_order, char uplo, lapack_int n,
10189                             lapack_int nrhs, const lapack_complex_double* a,
10190                             lapack_int lda, const lapack_int* ipiv,
10191                             lapack_complex_double* b, lapack_int ldb );
10192 lapack_int LAPACKE_zhetrs2_work( int matrix_order, char uplo, lapack_int n,
10193                                  lapack_int nrhs, const lapack_complex_double* a,
10194                                  lapack_int lda, const lapack_int* ipiv,
10195                                  lapack_complex_double* b, lapack_int ldb,
10196                                  lapack_complex_double* work );
10197 lapack_int LAPACKE_zsyconv( int matrix_order, char uplo, char way, lapack_int n,
10198                             lapack_complex_double* a, lapack_int lda,
10199                             const lapack_int* ipiv );
10200 lapack_int LAPACKE_zsyconv_work( int matrix_order, char uplo, char way,
10201                                  lapack_int n, lapack_complex_double* a,
10202                                  lapack_int lda, const lapack_int* ipiv,
10203                                  lapack_complex_double* work );
10204 lapack_int LAPACKE_zsyswapr( int matrix_order, char uplo, lapack_int n,
10205                              lapack_complex_double* a, lapack_int i1,
10206                              lapack_int i2 );
10207 lapack_int LAPACKE_zsyswapr_work( int matrix_order, char uplo, lapack_int n,
10208                                   lapack_complex_double* a, lapack_int i1,
10209                                   lapack_int i2 );
10210 lapack_int LAPACKE_zsytri2( int matrix_order, char uplo, lapack_int n,
10211                             lapack_complex_double* a, lapack_int lda,
10212                             const lapack_int* ipiv );
10213 lapack_int LAPACKE_zsytri2_work( int matrix_order, char uplo, lapack_int n,
10214                                  lapack_complex_double* a, lapack_int lda,
10215                                  const lapack_int* ipiv,
10216                                  lapack_complex_double* work, lapack_int lwork );
10217 lapack_int LAPACKE_zsytri2x( int matrix_order, char uplo, lapack_int n,
10218                              lapack_complex_double* a, lapack_int lda,
10219                              const lapack_int* ipiv, lapack_int nb );
10220 lapack_int LAPACKE_zsytri2x_work( int matrix_order, char uplo, lapack_int n,
10221                                   lapack_complex_double* a, lapack_int lda,
10222                                   const lapack_int* ipiv,
10223                                   lapack_complex_double* work, lapack_int nb );
10224 lapack_int LAPACKE_zsytrs2( int matrix_order, char uplo, lapack_int n,
10225                             lapack_int nrhs, const lapack_complex_double* a,
10226                             lapack_int lda, const lapack_int* ipiv,
10227                             lapack_complex_double* b, lapack_int ldb );
10228 lapack_int LAPACKE_zsytrs2_work( int matrix_order, char uplo, lapack_int n,
10229                                  lapack_int nrhs, const lapack_complex_double* a,
10230                                  lapack_int lda, const lapack_int* ipiv,
10231                                  lapack_complex_double* b, lapack_int ldb,
10232                                  lapack_complex_double* work );
10233 lapack_int LAPACKE_zunbdb( int matrix_order, char trans, char signs,
10234                            lapack_int m, lapack_int p, lapack_int q,
10235                            lapack_complex_double* x11, lapack_int ldx11,
10236                            lapack_complex_double* x12, lapack_int ldx12,
10237                            lapack_complex_double* x21, lapack_int ldx21,
10238                            lapack_complex_double* x22, lapack_int ldx22,
10239                            double* theta, double* phi,
10240                            lapack_complex_double* taup1,
10241                            lapack_complex_double* taup2,
10242                            lapack_complex_double* tauq1,
10243                            lapack_complex_double* tauq2 );
10244 lapack_int LAPACKE_zunbdb_work( int matrix_order, char trans, char signs,
10245                                 lapack_int m, lapack_int p, lapack_int q,
10246                                 lapack_complex_double* x11, lapack_int ldx11,
10247                                 lapack_complex_double* x12, lapack_int ldx12,
10248                                 lapack_complex_double* x21, lapack_int ldx21,
10249                                 lapack_complex_double* x22, lapack_int ldx22,
10250                                 double* theta, double* phi,
10251                                 lapack_complex_double* taup1,
10252                                 lapack_complex_double* taup2,
10253                                 lapack_complex_double* tauq1,
10254                                 lapack_complex_double* tauq2,
10255                                 lapack_complex_double* work, lapack_int lwork );
10256 lapack_int LAPACKE_zuncsd( int matrix_order, char jobu1, char jobu2,
10257                            char jobv1t, char jobv2t, char trans, char signs,
10258                            lapack_int m, lapack_int p, lapack_int q,
10259                            lapack_complex_double* x11, lapack_int ldx11,
10260                            lapack_complex_double* x12, lapack_int ldx12,
10261                            lapack_complex_double* x21, lapack_int ldx21,
10262                            lapack_complex_double* x22, lapack_int ldx22,
10263                            double* theta, lapack_complex_double* u1,
10264                            lapack_int ldu1, lapack_complex_double* u2,
10265                            lapack_int ldu2, lapack_complex_double* v1t,
10266                            lapack_int ldv1t, lapack_complex_double* v2t,
10267                            lapack_int ldv2t );
10268 lapack_int LAPACKE_zuncsd_work( int matrix_order, char jobu1, char jobu2,
10269                                 char jobv1t, char jobv2t, char trans,
10270                                 char signs, lapack_int m, lapack_int p,
10271                                 lapack_int q, lapack_complex_double* x11,
10272                                 lapack_int ldx11, lapack_complex_double* x12,
10273                                 lapack_int ldx12, lapack_complex_double* x21,
10274                                 lapack_int ldx21, lapack_complex_double* x22,
10275                                 lapack_int ldx22, double* theta,
10276                                 lapack_complex_double* u1, lapack_int ldu1,
10277                                 lapack_complex_double* u2, lapack_int ldu2,
10278                                 lapack_complex_double* v1t, lapack_int ldv1t,
10279                                 lapack_complex_double* v2t, lapack_int ldv2t,
10280                                 lapack_complex_double* work, lapack_int lwork,
10281                                 double* rwork, lapack_int lrwork,
10282                                 lapack_int* iwork );
10283 //LAPACK 3.4.0
10284 lapack_int LAPACKE_sgemqrt( int matrix_order, char side, char trans,
10285                             lapack_int m, lapack_int n, lapack_int k,
10286                             lapack_int nb, const float* v, lapack_int ldv,
10287                             const float* t, lapack_int ldt, float* c,
10288                             lapack_int ldc );
10289 lapack_int LAPACKE_dgemqrt( int matrix_order, char side, char trans,
10290                             lapack_int m, lapack_int n, lapack_int k,
10291                             lapack_int nb, const double* v, lapack_int ldv,
10292                             const double* t, lapack_int ldt, double* c,
10293                             lapack_int ldc );
10294 lapack_int LAPACKE_cgemqrt( int matrix_order, char side, char trans,
10295                             lapack_int m, lapack_int n, lapack_int k,
10296                             lapack_int nb, const lapack_complex_float* v,
10297                             lapack_int ldv, const lapack_complex_float* t,
10298                             lapack_int ldt, lapack_complex_float* c,
10299                             lapack_int ldc );
10300 lapack_int LAPACKE_zgemqrt( int matrix_order, char side, char trans,
10301                             lapack_int m, lapack_int n, lapack_int k,
10302                             lapack_int nb, const lapack_complex_double* v,
10303                             lapack_int ldv, const lapack_complex_double* t,
10304                             lapack_int ldt, lapack_complex_double* c,
10305                             lapack_int ldc );
10306 
10307 lapack_int LAPACKE_sgeqrt( int matrix_order, lapack_int m, lapack_int n,
10308                            lapack_int nb, float* a, lapack_int lda, float* t,
10309                            lapack_int ldt );
10310 lapack_int LAPACKE_dgeqrt( int matrix_order, lapack_int m, lapack_int n,
10311                            lapack_int nb, double* a, lapack_int lda, double* t,
10312                            lapack_int ldt );
10313 lapack_int LAPACKE_cgeqrt( int matrix_order, lapack_int m, lapack_int n,
10314                            lapack_int nb, lapack_complex_float* a,
10315                            lapack_int lda, lapack_complex_float* t,
10316                            lapack_int ldt );
10317 lapack_int LAPACKE_zgeqrt( int matrix_order, lapack_int m, lapack_int n,
10318                            lapack_int nb, lapack_complex_double* a,
10319                            lapack_int lda, lapack_complex_double* t,
10320                            lapack_int ldt );
10321 
10322 lapack_int LAPACKE_sgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10323                             float* a, lapack_int lda, float* t,
10324                             lapack_int ldt );
10325 lapack_int LAPACKE_dgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10326                             double* a, lapack_int lda, double* t,
10327                             lapack_int ldt );
10328 lapack_int LAPACKE_cgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10329                             lapack_complex_float* a, lapack_int lda,
10330                             lapack_complex_float* t, lapack_int ldt );
10331 lapack_int LAPACKE_zgeqrt2( int matrix_order, lapack_int m, lapack_int n,
10332                             lapack_complex_double* a, lapack_int lda,
10333                             lapack_complex_double* t, lapack_int ldt );
10334 
10335 lapack_int LAPACKE_sgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10336                             float* a, lapack_int lda, float* t,
10337                             lapack_int ldt );
10338 lapack_int LAPACKE_dgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10339                             double* a, lapack_int lda, double* t,
10340                             lapack_int ldt );
10341 lapack_int LAPACKE_cgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10342                             lapack_complex_float* a, lapack_int lda,
10343                             lapack_complex_float* t, lapack_int ldt );
10344 lapack_int LAPACKE_zgeqrt3( int matrix_order, lapack_int m, lapack_int n,
10345                             lapack_complex_double* a, lapack_int lda,
10346                             lapack_complex_double* t, lapack_int ldt );
10347 
10348 lapack_int LAPACKE_stpmqrt( int matrix_order, char side, char trans,
10349                             lapack_int m, lapack_int n, lapack_int k,
10350                             lapack_int l, lapack_int nb, const float* v,
10351                             lapack_int ldv, const float* t, lapack_int ldt,
10352                             float* a, lapack_int lda, float* b,
10353                             lapack_int ldb );
10354 lapack_int LAPACKE_dtpmqrt( int matrix_order, char side, char trans,
10355                             lapack_int m, lapack_int n, lapack_int k,
10356                             lapack_int l, lapack_int nb, const double* v,
10357                             lapack_int ldv, const double* t, lapack_int ldt,
10358                             double* a, lapack_int lda, double* b,
10359                             lapack_int ldb );
10360 lapack_int LAPACKE_ctpmqrt( int matrix_order, char side, char trans,
10361                             lapack_int m, lapack_int n, lapack_int k,
10362                             lapack_int l, lapack_int nb,
10363                             const lapack_complex_float* v, lapack_int ldv,
10364                             const lapack_complex_float* t, lapack_int ldt,
10365                             lapack_complex_float* a, lapack_int lda,
10366                             lapack_complex_float* b, lapack_int ldb );
10367 lapack_int LAPACKE_ztpmqrt( int matrix_order, char side, char trans,
10368                             lapack_int m, lapack_int n, lapack_int k,
10369                             lapack_int l, lapack_int nb,
10370                             const lapack_complex_double* v, lapack_int ldv,
10371                             const lapack_complex_double* t, lapack_int ldt,
10372                             lapack_complex_double* a, lapack_int lda,
10373                             lapack_complex_double* b, lapack_int ldb );
10374 
10375 lapack_int LAPACKE_dtpqrt( int matrix_order, lapack_int m, lapack_int n,
10376                            lapack_int l, lapack_int nb, double* a,
10377                            lapack_int lda, double* b, lapack_int ldb, double* t,
10378                            lapack_int ldt );
10379 lapack_int LAPACKE_ctpqrt( int matrix_order, lapack_int m, lapack_int n,
10380                            lapack_int l, lapack_int nb, lapack_complex_float* a,
10381                            lapack_int lda, lapack_complex_float* t,
10382                            lapack_complex_float* b, lapack_int ldb,
10383                            lapack_int ldt );
10384 lapack_int LAPACKE_ztpqrt( int matrix_order, lapack_int m, lapack_int n,
10385                            lapack_int l, lapack_int nb,
10386                            lapack_complex_double* a, lapack_int lda,
10387                            lapack_complex_double* b, lapack_int ldb,
10388                            lapack_complex_double* t, lapack_int ldt );
10389 
10390 lapack_int LAPACKE_stpqrt2( int matrix_order, lapack_int m, lapack_int n,
10391                             float* a, lapack_int lda, float* b, lapack_int ldb,
10392                             float* t, lapack_int ldt );
10393 lapack_int LAPACKE_dtpqrt2( int matrix_order, lapack_int m, lapack_int n,
10394                             double* a, lapack_int lda, double* b,
10395                             lapack_int ldb, double* t, lapack_int ldt );
10396 lapack_int LAPACKE_ctpqrt2( int matrix_order, lapack_int m, lapack_int n,
10397                             lapack_complex_float* a, lapack_int lda,
10398                             lapack_complex_float* b, lapack_int ldb,
10399                             lapack_complex_float* t, lapack_int ldt );
10400 lapack_int LAPACKE_ztpqrt2( int matrix_order, lapack_int m, lapack_int n,
10401                             lapack_complex_double* a, lapack_int lda,
10402                             lapack_complex_double* b, lapack_int ldb,
10403                             lapack_complex_double* t, lapack_int ldt );
10404 
10405 lapack_int LAPACKE_stprfb( int matrix_order, char side, char trans, char direct,
10406                            char storev, lapack_int m, lapack_int n,
10407                            lapack_int k, lapack_int l, const float* v,
10408                            lapack_int ldv, const float* t, lapack_int ldt,
10409                            float* a, lapack_int lda, float* b, lapack_int ldb,
10410                            lapack_int myldwork );
10411 lapack_int LAPACKE_dtprfb( int matrix_order, char side, char trans, char direct,
10412                            char storev, lapack_int m, lapack_int n,
10413                            lapack_int k, lapack_int l, const double* v,
10414                            lapack_int ldv, const double* t, lapack_int ldt,
10415                            double* a, lapack_int lda, double* b, lapack_int ldb,
10416                            lapack_int myldwork );
10417 lapack_int LAPACKE_ctprfb( int matrix_order, char side, char trans, char direct,
10418                            char storev, lapack_int m, lapack_int n,
10419                            lapack_int k, lapack_int l,
10420                            const lapack_complex_float* v, lapack_int ldv,
10421                            const lapack_complex_float* t, lapack_int ldt,
10422                            lapack_complex_float* a, lapack_int lda,
10423                            lapack_complex_float* b, lapack_int ldb,
10424                            lapack_int myldwork );
10425 lapack_int LAPACKE_ztprfb( int matrix_order, char side, char trans, char direct,
10426                            char storev, lapack_int m, lapack_int n,
10427                            lapack_int k, lapack_int l,
10428                            const lapack_complex_double* v, lapack_int ldv,
10429                            const lapack_complex_double* t, lapack_int ldt,
10430                            lapack_complex_double* a, lapack_int lda,
10431                            lapack_complex_double* b, lapack_int ldb,
10432                            lapack_int myldwork );
10433 
10434 lapack_int LAPACKE_sgemqrt_work( int matrix_order, char side, char trans,
10435                                  lapack_int m, lapack_int n, lapack_int k,
10436                                  lapack_int nb, const float* v, lapack_int ldv,
10437                                  const float* t, lapack_int ldt, float* c,
10438                                  lapack_int ldc, float* work );
10439 lapack_int LAPACKE_dgemqrt_work( int matrix_order, char side, char trans,
10440                                  lapack_int m, lapack_int n, lapack_int k,
10441                                  lapack_int nb, const double* v, lapack_int ldv,
10442                                  const double* t, lapack_int ldt, double* c,
10443                                  lapack_int ldc, double* work );
10444 lapack_int LAPACKE_cgemqrt_work( int matrix_order, char side, char trans,
10445                                  lapack_int m, lapack_int n, lapack_int k,
10446                                  lapack_int nb, const lapack_complex_float* v,
10447                                  lapack_int ldv, const lapack_complex_float* t,
10448                                  lapack_int ldt, lapack_complex_float* c,
10449                                  lapack_int ldc, lapack_complex_float* work );
10450 lapack_int LAPACKE_zgemqrt_work( int matrix_order, char side, char trans,
10451                                  lapack_int m, lapack_int n, lapack_int k,
10452                                  lapack_int nb, const lapack_complex_double* v,
10453                                  lapack_int ldv, const lapack_complex_double* t,
10454                                  lapack_int ldt, lapack_complex_double* c,
10455                                  lapack_int ldc, lapack_complex_double* work );
10456 
10457 lapack_int LAPACKE_sgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10458                                 lapack_int nb, float* a, lapack_int lda,
10459                                 float* t, lapack_int ldt, float* work );
10460 lapack_int LAPACKE_dgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10461                                 lapack_int nb, double* a, lapack_int lda,
10462                                 double* t, lapack_int ldt, double* work );
10463 lapack_int LAPACKE_cgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10464                                 lapack_int nb, lapack_complex_float* a,
10465                                 lapack_int lda, lapack_complex_float* t,
10466                                 lapack_int ldt, lapack_complex_float* work );
10467 lapack_int LAPACKE_zgeqrt_work( int matrix_order, lapack_int m, lapack_int n,
10468                                 lapack_int nb, lapack_complex_double* a,
10469                                 lapack_int lda, lapack_complex_double* t,
10470                                 lapack_int ldt, lapack_complex_double* work );
10471 
10472 lapack_int LAPACKE_sgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10473                                  float* a, lapack_int lda, float* t,
10474                                  lapack_int ldt );
10475 lapack_int LAPACKE_dgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10476                                  double* a, lapack_int lda, double* t,
10477                                  lapack_int ldt );
10478 lapack_int LAPACKE_cgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10479                                  lapack_complex_float* a, lapack_int lda,
10480                                  lapack_complex_float* t, lapack_int ldt );
10481 lapack_int LAPACKE_zgeqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10482                                  lapack_complex_double* a, lapack_int lda,
10483                                  lapack_complex_double* t, lapack_int ldt );
10484 
10485 lapack_int LAPACKE_sgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10486                                  float* a, lapack_int lda, float* t,
10487                                  lapack_int ldt );
10488 lapack_int LAPACKE_dgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10489                                  double* a, lapack_int lda, double* t,
10490                                  lapack_int ldt );
10491 lapack_int LAPACKE_cgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10492                                  lapack_complex_float* a, lapack_int lda,
10493                                  lapack_complex_float* t, lapack_int ldt );
10494 lapack_int LAPACKE_zgeqrt3_work( int matrix_order, lapack_int m, lapack_int n,
10495                                  lapack_complex_double* a, lapack_int lda,
10496                                  lapack_complex_double* t, lapack_int ldt );
10497 
10498 lapack_int LAPACKE_stpmqrt_work( int matrix_order, char side, char trans,
10499                                  lapack_int m, lapack_int n, lapack_int k,
10500                                  lapack_int l, lapack_int nb, const float* v,
10501                                  lapack_int ldv, const float* t, lapack_int ldt,
10502                                  float* a, lapack_int lda, float* b,
10503                                  lapack_int ldb, float* work );
10504 lapack_int LAPACKE_dtpmqrt_work( int matrix_order, char side, char trans,
10505                                  lapack_int m, lapack_int n, lapack_int k,
10506                                  lapack_int l, lapack_int nb, const double* v,
10507                                  lapack_int ldv, const double* t,
10508                                  lapack_int ldt, double* a, lapack_int lda,
10509                                  double* b, lapack_int ldb, double* work );
10510 lapack_int LAPACKE_ctpmqrt_work( int matrix_order, char side, char trans,
10511                                  lapack_int m, lapack_int n, lapack_int k,
10512                                  lapack_int l, lapack_int nb,
10513                                  const lapack_complex_float* v, lapack_int ldv,
10514                                  const lapack_complex_float* t, lapack_int ldt,
10515                                  lapack_complex_float* a, lapack_int lda,
10516                                  lapack_complex_float* b, lapack_int ldb,
10517                                  lapack_complex_float* work );
10518 lapack_int LAPACKE_ztpmqrt_work( int matrix_order, char side, char trans,
10519                                  lapack_int m, lapack_int n, lapack_int k,
10520                                  lapack_int l, lapack_int nb,
10521                                  const lapack_complex_double* v, lapack_int ldv,
10522                                  const lapack_complex_double* t, lapack_int ldt,
10523                                  lapack_complex_double* a, lapack_int lda,
10524                                  lapack_complex_double* b, lapack_int ldb,
10525                                  lapack_complex_double* work );
10526 
10527 lapack_int LAPACKE_dtpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10528                                 lapack_int l, lapack_int nb, double* a,
10529                                 lapack_int lda, double* b, lapack_int ldb,
10530                                 double* t, lapack_int ldt, double* work );
10531 lapack_int LAPACKE_ctpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10532                                 lapack_int l, lapack_int nb,
10533                                 lapack_complex_float* a, lapack_int lda,
10534                                 lapack_complex_float* t,
10535                                 lapack_complex_float* b, lapack_int ldb,
10536                                 lapack_int ldt, lapack_complex_float* work );
10537 lapack_int LAPACKE_ztpqrt_work( int matrix_order, lapack_int m, lapack_int n,
10538                                 lapack_int l, lapack_int nb,
10539                                 lapack_complex_double* a, lapack_int lda,
10540                                 lapack_complex_double* b, lapack_int ldb,
10541                                 lapack_complex_double* t, lapack_int ldt,
10542                                 lapack_complex_double* work );
10543 
10544 lapack_int LAPACKE_stpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10545                                  float* a, lapack_int lda, float* b,
10546                                  lapack_int ldb, float* t, lapack_int ldt );
10547 lapack_int LAPACKE_dtpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10548                                  double* a, lapack_int lda, double* b,
10549                                  lapack_int ldb, double* t, lapack_int ldt );
10550 lapack_int LAPACKE_ctpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10551                                  lapack_complex_float* a, lapack_int lda,
10552                                  lapack_complex_float* b, lapack_int ldb,
10553                                  lapack_complex_float* t, lapack_int ldt );
10554 lapack_int LAPACKE_ztpqrt2_work( int matrix_order, lapack_int m, lapack_int n,
10555                                  lapack_complex_double* a, lapack_int lda,
10556                                  lapack_complex_double* b, lapack_int ldb,
10557                                  lapack_complex_double* t, lapack_int ldt );
10558 
10559 lapack_int LAPACKE_stprfb_work( int matrix_order, char side, char trans,
10560                                 char direct, char storev, lapack_int m,
10561                                 lapack_int n, lapack_int k, lapack_int l,
10562                                 const float* v, lapack_int ldv, const float* t,
10563                                 lapack_int ldt, float* a, lapack_int lda,
10564                                 float* b, lapack_int ldb, const float* mywork,
10565                                 lapack_int myldwork );
10566 lapack_int LAPACKE_dtprfb_work( int matrix_order, char side, char trans,
10567                                 char direct, char storev, lapack_int m,
10568                                 lapack_int n, lapack_int k, lapack_int l,
10569                                 const double* v, lapack_int ldv,
10570                                 const double* t, lapack_int ldt, double* a,
10571                                 lapack_int lda, double* b, lapack_int ldb,
10572                                 const double* mywork, lapack_int myldwork );
10573 lapack_int LAPACKE_ctprfb_work( int matrix_order, char side, char trans,
10574                                 char direct, char storev, lapack_int m,
10575                                 lapack_int n, lapack_int k, lapack_int l,
10576                                 const lapack_complex_float* v, lapack_int ldv,
10577                                 const lapack_complex_float* t, lapack_int ldt,
10578                                 lapack_complex_float* a, lapack_int lda,
10579                                 lapack_complex_float* b, lapack_int ldb,
10580                                 const float* mywork, lapack_int myldwork );
10581 lapack_int LAPACKE_ztprfb_work( int matrix_order, char side, char trans,
10582                                 char direct, char storev, lapack_int m,
10583                                 lapack_int n, lapack_int k, lapack_int l,
10584                                 const lapack_complex_double* v, lapack_int ldv,
10585                                 const lapack_complex_double* t, lapack_int ldt,
10586                                 lapack_complex_double* a, lapack_int lda,
10587                                 lapack_complex_double* b, lapack_int ldb,
10588                                 const double* mywork, lapack_int myldwork );
10589 //LAPACK 3.X.X
10590 lapack_int LAPACKE_csyr( int matrix_order, char uplo, lapack_int n,
10591                              lapack_complex_float alpha,
10592                              const lapack_complex_float* x, lapack_int incx,
10593                              lapack_complex_float* a, lapack_int lda );
10594 lapack_int LAPACKE_zsyr( int matrix_order, char uplo, lapack_int n,
10595                              lapack_complex_double alpha,
10596                              const lapack_complex_double* x, lapack_int incx,
10597                              lapack_complex_double* a, lapack_int lda );
10598 
10599 lapack_int LAPACKE_csyr_work( int matrix_order, char uplo, lapack_int n,
10600                                   lapack_complex_float alpha,
10601                                   const lapack_complex_float* x,
10602                                   lapack_int incx, lapack_complex_float* a,
10603                                   lapack_int lda );
10604 lapack_int LAPACKE_zsyr_work( int matrix_order, char uplo, lapack_int n,
10605                                   lapack_complex_double alpha,
10606                                   const lapack_complex_double* x,
10607                                   lapack_int incx, lapack_complex_double* a,
10608                                   lapack_int lda );
10609 
10610 
10611 
10612 #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
10613 #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
10614 #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
10615 #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
10616 #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
10617 #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
10618 #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
10619 #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
10620 #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
10621 #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
10622 #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
10623 #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
10624 #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
10625 #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
10626 #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
10627 #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
10628 #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
10629 #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
10630 #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
10631 #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
10632 #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
10633 #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
10634 #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
10635 #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
10636 #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
10637 #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
10638 #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
10639 #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
10640 #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
10641 #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
10642 #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
10643 #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
10644 #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
10645 #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
10646 #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
10647 #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
10648 #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
10649 #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
10650 #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
10651 #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
10652 #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
10653 #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
10654 #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
10655 #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
10656 #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
10657 #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
10658 #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
10659 #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
10660 #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
10661 #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
10662 #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
10663 #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
10664 #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
10665 #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
10666 #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
10667 #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
10668 #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
10669 #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
10670 #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
10671 #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
10672 #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
10673 #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
10674 #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
10675 #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
10676 #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
10677 #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
10678 #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
10679 #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
10680 #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
10681 #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
10682 #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
10683 #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
10684 #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
10685 #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
10686 #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
10687 #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
10688 #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
10689 #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
10690 #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
10691 #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
10692 #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
10693 #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
10694 #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
10695 #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
10696 #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
10697 #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
10698 #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
10699 #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
10700 #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
10701 #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
10702 #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
10703 #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
10704 #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
10705 #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
10706 #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
10707 #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
10708 #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
10709 #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
10710 #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
10711 #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
10712 #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
10713 #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
10714 #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
10715 #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
10716 #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
10717 #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
10718 #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
10719 #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
10720 #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
10721 #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
10722 #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
10723 #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
10724 #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
10725 #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
10726 #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
10727 #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
10728 #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
10729 #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
10730 #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
10731 #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
10732 #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
10733 #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
10734 #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
10735 #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
10736 #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
10737 #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
10738 #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
10739 #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
10740 #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
10741 #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
10742 #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
10743 #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
10744 #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
10745 #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
10746 #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
10747 #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
10748 #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
10749 #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
10750 #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
10751 #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
10752 #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
10753 #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
10754 #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
10755 #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
10756 #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
10757 #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
10758 #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
10759 #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
10760 #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
10761 #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
10762 #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
10763 #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
10764 #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
10765 #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
10766 #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
10767 #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
10768 #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
10769 #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
10770 #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
10771 #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
10772 #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
10773 #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
10774 #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
10775 #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
10776 #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
10777 #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
10778 #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
10779 #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
10780 #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
10781 #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
10782 #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
10783 #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
10784 #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
10785 #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
10786 #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
10787 #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
10788 #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
10789 #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
10790 #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
10791 #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
10792 #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
10793 #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
10794 #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
10795 #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
10796 #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
10797 #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
10798 #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
10799 #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
10800 #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
10801 #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
10802 #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
10803 #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
10804 #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
10805 #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
10806 #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
10807 #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
10808 #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
10809 #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
10810 #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
10811 #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
10812 #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
10813 #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
10814 #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
10815 #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
10816 #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
10817 #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
10818 #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
10819 #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
10820 #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
10821 #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
10822 #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
10823 #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
10824 #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
10825 #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
10826 #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
10827 #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
10828 #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
10829 #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
10830 #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
10831 #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
10832 #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
10833 #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
10834 #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
10835 #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
10836 #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
10837 #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
10838 #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
10839 #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
10840 #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
10841 #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
10842 #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
10843 #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
10844 #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
10845 #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
10846 #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
10847 #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
10848 #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
10849 #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
10850 #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
10851 #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
10852 #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
10853 #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
10854 #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
10855 #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
10856 #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
10857 #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
10858 #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
10859 #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
10860 #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
10861 #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
10862 #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
10863 #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
10864 #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
10865 #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
10866 #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
10867 #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
10868 #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
10869 #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
10870 #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
10871 #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
10872 #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
10873 #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
10874 #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
10875 #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
10876 #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
10877 #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
10878 #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
10879 #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
10880 #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
10881 #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
10882 #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
10883 #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
10884 #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
10885 #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
10886 #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
10887 #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
10888 #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
10889 #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
10890 #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
10891 #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
10892 #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
10893 #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
10894 #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
10895 #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
10896 #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
10897 #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
10898 #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
10899 #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
10900 #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
10901 #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
10902 #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
10903 #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
10904 #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
10905 #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
10906 #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
10907 #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
10908 #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
10909 #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
10910 #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
10911 #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
10912 #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
10913 #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
10914 #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
10915 #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
10916 #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
10917 #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
10918 #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
10919 #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
10920 #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
10921 #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
10922 #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
10923 #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
10924 #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
10925 #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
10926 #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
10927 #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
10928 #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
10929 #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
10930 #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
10931 #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
10932 #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
10933 #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
10934 #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
10935 #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
10936 #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
10937 #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
10938 #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
10939 #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
10940 #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
10941 #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
10942 #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
10943 #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
10944 #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
10945 #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
10946 #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
10947 #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
10948 #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
10949 #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
10950 #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
10951 #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
10952 #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
10953 #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
10954 #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
10955 #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
10956 #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
10957 #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
10958 #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
10959 #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
10960 #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
10961 #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
10962 #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
10963 #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
10964 #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
10965 #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
10966 #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
10967 #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
10968 #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
10969 #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
10970 #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
10971 #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
10972 #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
10973 #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
10974 #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
10975 #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
10976 #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
10977 #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
10978 #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
10979 #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
10980 #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
10981 #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
10982 #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
10983 #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
10984 #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
10985 #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
10986 #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
10987 #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
10988 #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
10989 #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
10990 #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
10991 #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
10992 #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
10993 #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
10994 #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
10995 #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
10996 #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
10997 #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
10998 #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
10999 #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
11000 #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
11001 #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
11002 #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
11003 #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
11004 #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
11005 #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
11006 #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
11007 #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
11008 #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
11009 #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
11010 #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
11011 #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
11012 #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
11013 #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
11014 #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
11015 #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
11016 #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
11017 #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
11018 #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
11019 #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
11020 #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
11021 #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
11022 #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
11023 #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
11024 #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
11025 #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
11026 #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
11027 #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
11028 #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
11029 #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
11030 #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
11031 #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
11032 #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
11033 #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
11034 #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
11035 #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
11036 #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
11037 #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
11038 #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
11039 #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
11040 #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
11041 #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
11042 #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
11043 #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
11044 #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
11045 #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
11046 #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
11047 #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
11048 #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
11049 #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
11050 #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
11051 #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
11052 #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
11053 #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
11054 #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
11055 #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
11056 #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
11057 #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
11058 #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
11059 #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
11060 #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
11061 #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
11062 #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
11063 #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
11064 #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
11065 #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
11066 #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
11067 #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
11068 #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
11069 #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
11070 #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
11071 #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
11072 #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
11073 #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
11074 #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
11075 #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
11076 #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
11077 #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
11078 #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
11079 #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
11080 #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
11081 #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
11082 #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
11083 #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
11084 #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
11085 #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
11086 #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
11087 #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
11088 #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
11089 #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
11090 #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
11091 #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
11092 #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
11093 #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
11094 #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
11095 #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
11096 #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
11097 #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
11098 #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
11099 #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
11100 #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
11101 #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
11102 #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
11103 #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
11104 #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
11105 #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
11106 #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
11107 #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
11108 #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
11109 #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
11110 #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
11111 #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
11112 #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
11113 #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
11114 #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
11115 #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
11116 #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
11117 #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
11118 #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
11119 #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
11120 #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
11121 #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
11122 #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
11123 #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
11124 #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
11125 #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
11126 #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
11127 #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
11128 #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
11129 #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
11130 #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
11131 #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
11132 #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
11133 #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
11134 #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
11135 #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
11136 #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
11137 #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
11138 #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
11139 #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
11140 #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
11141 #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
11142 #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
11143 #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
11144 #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
11145 #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
11146 #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
11147 #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
11148 #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
11149 #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
11150 #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
11151 #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
11152 #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
11153 #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
11154 #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
11155 #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
11156 #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
11157 #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
11158 #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
11159 #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
11160 #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
11161 #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
11162 #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
11163 #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
11164 #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
11165 #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
11166 #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
11167 #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
11168 #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
11169 #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
11170 #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
11171 #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
11172 #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
11173 #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
11174 #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
11175 #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
11176 #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
11177 #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
11178 #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
11179 #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
11180 #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
11181 #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
11182 #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
11183 #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
11184 #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
11185 #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
11186 #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
11187 #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
11188 #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
11189 #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
11190 #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
11191 #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
11192 #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
11193 #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
11194 #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
11195 #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
11196 #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
11197 #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
11198 #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
11199 #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
11200 #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
11201 #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
11202 #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
11203 #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
11204 #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
11205 #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
11206 #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
11207 #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
11208 #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
11209 #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
11210 #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
11211 #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
11212 #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
11213 #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
11214 #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
11215 #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
11216 #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
11217 #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
11218 #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
11219 #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
11220 #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
11221 #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
11222 #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
11223 #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
11224 #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
11225 #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
11226 #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
11227 #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
11228 #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
11229 #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
11230 #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
11231 #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
11232 #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
11233 #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
11234 #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
11235 #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
11236 #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
11237 #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
11238 #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
11239 #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
11240 #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
11241 #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
11242 #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
11243 #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
11244 #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
11245 #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
11246 #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
11247 #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
11248 #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
11249 #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
11250 #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
11251 #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
11252 #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
11253 #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
11254 #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
11255 #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
11256 #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
11257 #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
11258 #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
11259 #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
11260 #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
11261 #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
11262 #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
11263 #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
11264 #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
11265 #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
11266 #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
11267 #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
11268 #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
11269 #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
11270 #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
11271 #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
11272 #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
11273 #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
11274 #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
11275 #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
11276 #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
11277 #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
11278 #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
11279 #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
11280 #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
11281 #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
11282 #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
11283 #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
11284 #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
11285 #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
11286 #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
11287 #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
11288 #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
11289 #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
11290 #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
11291 #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
11292 #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
11293 #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
11294 #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
11295 #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
11296 #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
11297 #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
11298 #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
11299 #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
11300 #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
11301 #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
11302 #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
11303 #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
11304 #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
11305 #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
11306 #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
11307 #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
11308 #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
11309 #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
11310 #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
11311 #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
11312 #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
11313 #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
11314 #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
11315 #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
11316 #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
11317 #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
11318 #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
11319 #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
11320 #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
11321 #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
11322 #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
11323 #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
11324 #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
11325 #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
11326 #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
11327 #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
11328 #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
11329 #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
11330 #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
11331 #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
11332 #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
11333 #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
11334 #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
11335 #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
11336 #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
11337 #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
11338 #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
11339 #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
11340 #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
11341 #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
11342 #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
11343 #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
11344 #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
11345 #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
11346 #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
11347 #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
11348 #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
11349 #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
11350 #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
11351 #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
11352 #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
11353 #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
11354 #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
11355 #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
11356 #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
11357 #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
11358 #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
11359 #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
11360 #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
11361 #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
11362 #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
11363 #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
11364 #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
11365 #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
11366 #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
11367 #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
11368 #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
11369 #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
11370 #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
11371 #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
11372 #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
11373 #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
11374 #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
11375 #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
11376 #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
11377 #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
11378 #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
11379 #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
11380 #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
11381 #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
11382 #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
11383 #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
11384 #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
11385 #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
11386 #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
11387 #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
11388 #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
11389 #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
11390 #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
11391 #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
11392 #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
11393 #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
11394 #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
11395 #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
11396 #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
11397 #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
11398 #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
11399 #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
11400 #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
11401 #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
11402 #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
11403 #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
11404 #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
11405 #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
11406 #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
11407 #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
11408 #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
11409 #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
11410 #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
11411 #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
11412 #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
11413 #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
11414 #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
11415 #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
11416 #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
11417 #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
11418 #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
11419 #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
11420 #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
11421 #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
11422 #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
11423 #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
11424 #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
11425 #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
11426 #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
11427 #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
11428 #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
11429 #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
11430 #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
11431 #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
11432 #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
11433 #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
11434 #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
11435 #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
11436 #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
11437 #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
11438 #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
11439 #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
11440 #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
11441 #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
11442 #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
11443 #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
11444 #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
11445 #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
11446 #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
11447 #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
11448 #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
11449 #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
11450 #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
11451 #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
11452 #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
11453 #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
11454 #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
11455 #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
11456 #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
11457 #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
11458 #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
11459 #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
11460 #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
11461 #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
11462 #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
11463 #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
11464 #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
11465 #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
11466 #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
11467 #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
11468 #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
11469 #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
11470 #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
11471 #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
11472 #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
11473 #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
11474 #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
11475 #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
11476 #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
11477 #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
11478 #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
11479 #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
11480 #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
11481 #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
11482 #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
11483 #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
11484 #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
11485 #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
11486 #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
11487 #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
11488 #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
11489 #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
11490 #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
11491 #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
11492 #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
11493 #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
11494 #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
11495 #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
11496 #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
11497 #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
11498 #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
11499 #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
11500 #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
11501 #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
11502 #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
11503 #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
11504 #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
11505 #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
11506 #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
11507 #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
11508 #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
11509 #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
11510 #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
11511 #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
11512 #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
11513 #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
11514 #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
11515 #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
11516 #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
11517 #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
11518 #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
11519 #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
11520 #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
11521 #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
11522 #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
11523 #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
11524 #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
11525 #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
11526 #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
11527 #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
11528 #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
11529 #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
11530 #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
11531 #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
11532 #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
11533 #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
11534 #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
11535 #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
11536 #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
11537 #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
11538 #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
11539 #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
11540 #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
11541 #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
11542 #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
11543 #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
11544 #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
11545 #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
11546 #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
11547 #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
11548 #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
11549 #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
11550 #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
11551 #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
11552 #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
11553 #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
11554 #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
11555 #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
11556 #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
11557 #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
11558 #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
11559 #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
11560 #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
11561 #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
11562 #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
11563 #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
11564 #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
11565 #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
11566 #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
11567 #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
11568 // LAPACK 3.3.0
11569 #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
11570 #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
11571 #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
11572 #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
11573 #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
11574 #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
11575 #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
11576 #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
11577 #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
11578 #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
11579 #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
11580 #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
11581 #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
11582 #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
11583 #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
11584 #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
11585 #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
11586 #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
11587 #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
11588 #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
11589 #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
11590 #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
11591 #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
11592 #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
11593 #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
11594 #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
11595 #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
11596 #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
11597 #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
11598 #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
11599 #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
11600 #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
11601 #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
11602 #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
11603 #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
11604 #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
11605 #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
11606 #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
11607 #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
11608 #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
11609 // LAPACK 3.4.0
11610 #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
11611 #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
11612 #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
11613 #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
11614 #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
11615 #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
11616 #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
11617 #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
11618 #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
11619 #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
11620 #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
11621 #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
11622 #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
11623 #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
11624 #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
11625 #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
11626 #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
11627 #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
11628 #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
11629 #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
11630 #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
11631 #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
11632 #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
11633 #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
11634 #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
11635 #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
11636 #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
11637 #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
11638 #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
11639 #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
11640 #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
11641 // LAPACK 3.X.X
11642 #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
11643 #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
11644 
11645 
11646 void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
11647                     lapack_int* ipiv, lapack_int *info );
11648 void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
11649                     lapack_int* ipiv, lapack_int *info );
11650 void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
11651                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
11652 void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
11653                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
11654 void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11655                     lapack_int* ku, float* ab, lapack_int* ldab,
11656                     lapack_int* ipiv, lapack_int *info );
11657 void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11658                     lapack_int* ku, double* ab, lapack_int* ldab,
11659                     lapack_int* ipiv, lapack_int *info );
11660 void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11661                     lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
11662                     lapack_int* ipiv, lapack_int *info );
11663 void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
11664                     lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
11665                     lapack_int* ipiv, lapack_int *info );
11666 void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
11667                     lapack_int* ipiv, lapack_int *info );
11668 void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
11669                     double* du2, lapack_int* ipiv, lapack_int *info );
11670 void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
11671                     lapack_complex_float* d, lapack_complex_float* du,
11672                     lapack_complex_float* du2, lapack_int* ipiv,
11673                     lapack_int *info );
11674 void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
11675                     lapack_complex_double* d, lapack_complex_double* du,
11676                     lapack_complex_double* du2, lapack_int* ipiv,
11677                     lapack_int *info );
11678 void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11679                     lapack_int *info );
11680 void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11681                     lapack_int *info );
11682 void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11683                     lapack_int* lda, lapack_int *info );
11684 void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11685                     lapack_int* lda, lapack_int *info );
11686 void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11687                     lapack_int* piv, lapack_int* rank, double* tol,
11688                     double* work, lapack_int *info );
11689 void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11690                     lapack_int* piv, lapack_int* rank, float* tol, float* work,
11691                     lapack_int *info );
11692 void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11693                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
11694                     double* tol, double* work, lapack_int *info );
11695 void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11696                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
11697                     float* tol, float* work, lapack_int *info );
11698 void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
11699                     lapack_int *info );
11700 void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
11701                     lapack_int *info );
11702 void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
11703                     lapack_complex_double* a, lapack_int *info );
11704 void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
11705                     lapack_complex_float* a, lapack_int *info );
11706 void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
11707 void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
11708 void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11709                     lapack_int *info );
11710 void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11711                     lapack_int *info );
11712 void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
11713                     lapack_int* ldab, lapack_int *info );
11714 void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
11715                     lapack_int* ldab, lapack_int *info );
11716 void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
11717                     lapack_complex_float* ab, lapack_int* ldab,
11718                     lapack_int *info );
11719 void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
11720                     lapack_complex_double* ab, lapack_int* ldab,
11721                     lapack_int *info );
11722 void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
11723 void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
11724 void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
11725                     lapack_int *info );
11726 void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
11727                     lapack_int *info );
11728 void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
11729                     lapack_int* ipiv, float* work, lapack_int* lwork,
11730                     lapack_int *info );
11731 void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
11732                     lapack_int* ipiv, double* work, lapack_int* lwork,
11733                     lapack_int *info );
11734 void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11735                     lapack_int* lda, lapack_int* ipiv,
11736                     lapack_complex_float* work, lapack_int* lwork,
11737                     lapack_int *info );
11738 void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11739                     lapack_int* lda, lapack_int* ipiv,
11740                     lapack_complex_double* work, lapack_int* lwork,
11741                     lapack_int *info );
11742 void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
11743                     lapack_int* lda, lapack_int* ipiv,
11744                     lapack_complex_float* work, lapack_int* lwork,
11745                     lapack_int *info );
11746 void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
11747                     lapack_int* lda, lapack_int* ipiv,
11748                     lapack_complex_double* work, lapack_int* lwork,
11749                     lapack_int *info );
11750 void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
11751                     lapack_int *info );
11752 void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
11753                     lapack_int *info );
11754 void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11755                     lapack_int* ipiv, lapack_int *info );
11756 void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11757                     lapack_int* ipiv, lapack_int *info );
11758 void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
11759                     lapack_int* ipiv, lapack_int *info );
11760 void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
11761                     lapack_int* ipiv, lapack_int *info );
11762 void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11763                     const float* a, lapack_int* lda, const lapack_int* ipiv,
11764                     float* b, lapack_int* ldb, lapack_int *info );
11765 void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11766                     const double* a, lapack_int* lda, const lapack_int* ipiv,
11767                     double* b, lapack_int* ldb, lapack_int *info );
11768 void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11769                     const lapack_complex_float* a, lapack_int* lda,
11770                     const lapack_int* ipiv, lapack_complex_float* b,
11771                     lapack_int* ldb, lapack_int *info );
11772 void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
11773                     const lapack_complex_double* a, lapack_int* lda,
11774                     const lapack_int* ipiv, lapack_complex_double* b,
11775                     lapack_int* ldb, lapack_int *info );
11776 void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11777                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
11778                     const lapack_int* ipiv, float* b, lapack_int* ldb,
11779                     lapack_int *info );
11780 void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11781                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
11782                     const lapack_int* ipiv, double* b, lapack_int* ldb,
11783                     lapack_int *info );
11784 void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11785                     lapack_int* nrhs, const lapack_complex_float* ab,
11786                     lapack_int* ldab, const lapack_int* ipiv,
11787                     lapack_complex_float* b, lapack_int* ldb,
11788                     lapack_int *info );
11789 void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
11790                     lapack_int* nrhs, const lapack_complex_double* ab,
11791                     lapack_int* ldab, const lapack_int* ipiv,
11792                     lapack_complex_double* b, lapack_int* ldb,
11793                     lapack_int *info );
11794 void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11795                     const float* dl, const float* d, const float* du,
11796                     const float* du2, const lapack_int* ipiv, float* b,
11797                     lapack_int* ldb, lapack_int *info );
11798 void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11799                     const double* dl, const double* d, const double* du,
11800                     const double* du2, const lapack_int* ipiv, double* b,
11801                     lapack_int* ldb, lapack_int *info );
11802 void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11803                     const lapack_complex_float* dl,
11804                     const lapack_complex_float* d,
11805                     const lapack_complex_float* du,
11806                     const lapack_complex_float* du2, const lapack_int* ipiv,
11807                     lapack_complex_float* b, lapack_int* ldb,
11808                     lapack_int *info );
11809 void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
11810                     const lapack_complex_double* dl,
11811                     const lapack_complex_double* d,
11812                     const lapack_complex_double* du,
11813                     const lapack_complex_double* du2, const lapack_int* ipiv,
11814                     lapack_complex_double* b, lapack_int* ldb,
11815                     lapack_int *info );
11816 void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
11817                     lapack_int* lda, float* b, lapack_int* ldb,
11818                     lapack_int *info );
11819 void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11820                     const double* a, lapack_int* lda, double* b,
11821                     lapack_int* ldb, lapack_int *info );
11822 void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11823                     const lapack_complex_float* a, lapack_int* lda,
11824                     lapack_complex_float* b, lapack_int* ldb,
11825                     lapack_int *info );
11826 void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11827                     const lapack_complex_double* a, lapack_int* lda,
11828                     lapack_complex_double* b, lapack_int* ldb,
11829                     lapack_int *info );
11830 void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11831                     const double* a, double* b, lapack_int* ldb,
11832                     lapack_int *info );
11833 void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11834                     const float* a, float* b, lapack_int* ldb,
11835                     lapack_int *info );
11836 void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11837                     const lapack_complex_double* a, lapack_complex_double* b,
11838                     lapack_int* ldb, lapack_int *info );
11839 void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
11840                     const lapack_complex_float* a, lapack_complex_float* b,
11841                     lapack_int* ldb, lapack_int *info );
11842 void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11843                     const float* ap, float* b, lapack_int* ldb,
11844                     lapack_int *info );
11845 void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11846                     const double* ap, double* b, lapack_int* ldb,
11847                     lapack_int *info );
11848 void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11849                     const lapack_complex_float* ap, lapack_complex_float* b,
11850                     lapack_int* ldb, lapack_int *info );
11851 void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11852                     const lapack_complex_double* ap, lapack_complex_double* b,
11853                     lapack_int* ldb, lapack_int *info );
11854 void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11855                     const float* ab, lapack_int* ldab, float* b,
11856                     lapack_int* ldb, lapack_int *info );
11857 void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11858                     const double* ab, lapack_int* ldab, double* b,
11859                     lapack_int* ldb, lapack_int *info );
11860 void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11861                     const lapack_complex_float* ab, lapack_int* ldab,
11862                     lapack_complex_float* b, lapack_int* ldb,
11863                     lapack_int *info );
11864 void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
11865                     const lapack_complex_double* ab, lapack_int* ldab,
11866                     lapack_complex_double* b, lapack_int* ldb,
11867                     lapack_int *info );
11868 void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
11869                     const float* e, float* b, lapack_int* ldb,
11870                     lapack_int *info );
11871 void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
11872                     const double* e, double* b, lapack_int* ldb,
11873                     lapack_int *info );
11874 void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
11875                     const lapack_complex_float* e, lapack_complex_float* b,
11876                     lapack_int* ldb, lapack_int *info );
11877 void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11878                     const double* d, const lapack_complex_double* e,
11879                     lapack_complex_double* b, lapack_int* ldb,
11880                     lapack_int *info );
11881 void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
11882                     lapack_int* lda, const lapack_int* ipiv, float* b,
11883                     lapack_int* ldb, lapack_int *info );
11884 void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11885                     const double* a, lapack_int* lda, const lapack_int* ipiv,
11886                     double* b, lapack_int* ldb, lapack_int *info );
11887 void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11888                     const lapack_complex_float* a, lapack_int* lda,
11889                     const lapack_int* ipiv, lapack_complex_float* b,
11890                     lapack_int* ldb, lapack_int *info );
11891 void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11892                     const lapack_complex_double* a, lapack_int* lda,
11893                     const lapack_int* ipiv, lapack_complex_double* b,
11894                     lapack_int* ldb, lapack_int *info );
11895 void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11896                     const lapack_complex_float* a, lapack_int* lda,
11897                     const lapack_int* ipiv, lapack_complex_float* b,
11898                     lapack_int* ldb, lapack_int *info );
11899 void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11900                     const lapack_complex_double* a, lapack_int* lda,
11901                     const lapack_int* ipiv, lapack_complex_double* b,
11902                     lapack_int* ldb, lapack_int *info );
11903 void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11904                     const float* ap, const lapack_int* ipiv, float* b,
11905                     lapack_int* ldb, lapack_int *info );
11906 void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11907                     const double* ap, const lapack_int* ipiv, double* b,
11908                     lapack_int* ldb, lapack_int *info );
11909 void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11910                     const lapack_complex_float* ap, const lapack_int* ipiv,
11911                     lapack_complex_float* b, lapack_int* ldb,
11912                     lapack_int *info );
11913 void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11914                     const lapack_complex_double* ap, const lapack_int* ipiv,
11915                     lapack_complex_double* b, lapack_int* ldb,
11916                     lapack_int *info );
11917 void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11918                     const lapack_complex_float* ap, const lapack_int* ipiv,
11919                     lapack_complex_float* b, lapack_int* ldb,
11920                     lapack_int *info );
11921 void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
11922                     const lapack_complex_double* ap, const lapack_int* ipiv,
11923                     lapack_complex_double* b, lapack_int* ldb,
11924                     lapack_int *info );
11925 void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11926                     lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
11927                     lapack_int* ldb, lapack_int *info );
11928 void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11929                     lapack_int* nrhs, const double* a, lapack_int* lda,
11930                     double* b, lapack_int* ldb, lapack_int *info );
11931 void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11932                     lapack_int* nrhs, const lapack_complex_float* a,
11933                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
11934                     lapack_int *info );
11935 void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11936                     lapack_int* nrhs, const lapack_complex_double* a,
11937                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
11938                     lapack_int *info );
11939 void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11940                     lapack_int* nrhs, const float* ap, float* b,
11941                     lapack_int* ldb, lapack_int *info );
11942 void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11943                     lapack_int* nrhs, const double* ap, double* b,
11944                     lapack_int* ldb, lapack_int *info );
11945 void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11946                     lapack_int* nrhs, const lapack_complex_float* ap,
11947                     lapack_complex_float* b, lapack_int* ldb,
11948                     lapack_int *info );
11949 void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
11950                     lapack_int* nrhs, const lapack_complex_double* ap,
11951                     lapack_complex_double* b, lapack_int* ldb,
11952                     lapack_int *info );
11953 void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11954                     lapack_int* kd, lapack_int* nrhs, const float* ab,
11955                     lapack_int* ldab, float* b, lapack_int* ldb,
11956                     lapack_int *info );
11957 void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11958                     lapack_int* kd, lapack_int* nrhs, const double* ab,
11959                     lapack_int* ldab, double* b, lapack_int* ldb,
11960                     lapack_int *info );
11961 void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11962                     lapack_int* kd, lapack_int* nrhs,
11963                     const lapack_complex_float* ab, lapack_int* ldab,
11964                     lapack_complex_float* b, lapack_int* ldb,
11965                     lapack_int *info );
11966 void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
11967                     lapack_int* kd, lapack_int* nrhs,
11968                     const lapack_complex_double* ab, lapack_int* ldab,
11969                     lapack_complex_double* b, lapack_int* ldb,
11970                     lapack_int *info );
11971 void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
11972                     float* anorm, float* rcond, float* work, lapack_int* iwork,
11973                     lapack_int *info );
11974 void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
11975                     double* anorm, double* rcond, double* work,
11976                     lapack_int* iwork, lapack_int *info );
11977 void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
11978                     lapack_int* lda, float* anorm, float* rcond,
11979                     lapack_complex_float* work, float* rwork,
11980                     lapack_int *info );
11981 void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
11982                     lapack_int* lda, double* anorm, double* rcond,
11983                     lapack_complex_double* work, double* rwork,
11984                     lapack_int *info );
11985 void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11986                     const float* ab, lapack_int* ldab, const lapack_int* ipiv,
11987                     float* anorm, float* rcond, float* work, lapack_int* iwork,
11988                     lapack_int *info );
11989 void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11990                     const double* ab, lapack_int* ldab, const lapack_int* ipiv,
11991                     double* anorm, double* rcond, double* work,
11992                     lapack_int* iwork, lapack_int *info );
11993 void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11994                     const lapack_complex_float* ab, lapack_int* ldab,
11995                     const lapack_int* ipiv, float* anorm, float* rcond,
11996                     lapack_complex_float* work, float* rwork,
11997                     lapack_int *info );
11998 void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
11999                     const lapack_complex_double* ab, lapack_int* ldab,
12000                     const lapack_int* ipiv, double* anorm, double* rcond,
12001                     lapack_complex_double* work, double* rwork,
12002                     lapack_int *info );
12003 void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
12004                     const float* du, const float* du2, const lapack_int* ipiv,
12005                     float* anorm, float* rcond, float* work, lapack_int* iwork,
12006                     lapack_int *info );
12007 void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
12008                     const double* d, const double* du, const double* du2,
12009                     const lapack_int* ipiv, double* anorm, double* rcond,
12010                     double* work, lapack_int* iwork, lapack_int *info );
12011 void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
12012                     const lapack_complex_float* d,
12013                     const lapack_complex_float* du,
12014                     const lapack_complex_float* du2, const lapack_int* ipiv,
12015                     float* anorm, float* rcond, lapack_complex_float* work,
12016                     lapack_int *info );
12017 void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
12018                     const lapack_complex_double* d,
12019                     const lapack_complex_double* du,
12020                     const lapack_complex_double* du2, const lapack_int* ipiv,
12021                     double* anorm, double* rcond, lapack_complex_double* work,
12022                     lapack_int *info );
12023 void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12024                     float* anorm, float* rcond, float* work, lapack_int* iwork,
12025                     lapack_int *info );
12026 void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
12027                     double* anorm, double* rcond, double* work,
12028                     lapack_int* iwork, lapack_int *info );
12029 void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12030                     lapack_int* lda, float* anorm, float* rcond,
12031                     lapack_complex_float* work, float* rwork,
12032                     lapack_int *info );
12033 void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12034                     lapack_int* lda, double* anorm, double* rcond,
12035                     lapack_complex_double* work, double* rwork,
12036                     lapack_int *info );
12037 void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
12038                     float* rcond, float* work, lapack_int* iwork,
12039                     lapack_int *info );
12040 void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
12041                     double* rcond, double* work, lapack_int* iwork,
12042                     lapack_int *info );
12043 void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12044                     float* anorm, float* rcond, lapack_complex_float* work,
12045                     float* rwork, lapack_int *info );
12046 void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12047                     double* anorm, double* rcond, lapack_complex_double* work,
12048                     double* rwork, lapack_int *info );
12049 void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
12050                     lapack_int* ldab, float* anorm, float* rcond, float* work,
12051                     lapack_int* iwork, lapack_int *info );
12052 void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
12053                     lapack_int* ldab, double* anorm, double* rcond,
12054                     double* work, lapack_int* iwork, lapack_int *info );
12055 void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
12056                     const lapack_complex_float* ab, lapack_int* ldab,
12057                     float* anorm, float* rcond, lapack_complex_float* work,
12058                     float* rwork, lapack_int *info );
12059 void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
12060                     const lapack_complex_double* ab, lapack_int* ldab,
12061                     double* anorm, double* rcond, lapack_complex_double* work,
12062                     double* rwork, lapack_int *info );
12063 void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
12064                     float* rcond, float* work, lapack_int *info );
12065 void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
12066                     double* anorm, double* rcond, double* work,
12067                     lapack_int *info );
12068 void LAPACK_cptcon( lapack_int* n, const float* d,
12069                     const lapack_complex_float* e, float* anorm, float* rcond,
12070                     float* work, lapack_int *info );
12071 void LAPACK_zptcon( lapack_int* n, const double* d,
12072                     const lapack_complex_double* e, double* anorm,
12073                     double* rcond, double* work, lapack_int *info );
12074 void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12075                     const lapack_int* ipiv, float* anorm, float* rcond,
12076                     float* work, lapack_int* iwork, lapack_int *info );
12077 void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
12078                     const lapack_int* ipiv, double* anorm, double* rcond,
12079                     double* work, lapack_int* iwork, lapack_int *info );
12080 void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12081                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
12082                     float* rcond, lapack_complex_float* work,
12083                     lapack_int *info );
12084 void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12085                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
12086                     double* rcond, lapack_complex_double* work,
12087                     lapack_int *info );
12088 void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
12089                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
12090                     float* rcond, lapack_complex_float* work,
12091                     lapack_int *info );
12092 void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
12093                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
12094                     double* rcond, lapack_complex_double* work,
12095                     lapack_int *info );
12096 void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
12097                     const lapack_int* ipiv, float* anorm, float* rcond,
12098                     float* work, lapack_int* iwork, lapack_int *info );
12099 void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
12100                     const lapack_int* ipiv, double* anorm, double* rcond,
12101                     double* work, lapack_int* iwork, lapack_int *info );
12102 void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12103                     const lapack_int* ipiv, float* anorm, float* rcond,
12104                     lapack_complex_float* work, lapack_int *info );
12105 void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12106                     const lapack_int* ipiv, double* anorm, double* rcond,
12107                     lapack_complex_double* work, lapack_int *info );
12108 void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12109                     const lapack_int* ipiv, float* anorm, float* rcond,
12110                     lapack_complex_float* work, lapack_int *info );
12111 void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12112                     const lapack_int* ipiv, double* anorm, double* rcond,
12113                     lapack_complex_double* work, lapack_int *info );
12114 void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
12115                     const float* a, lapack_int* lda, float* rcond, float* work,
12116                     lapack_int* iwork, lapack_int *info );
12117 void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12118                     const double* a, lapack_int* lda, double* rcond,
12119                     double* work, lapack_int* iwork, lapack_int *info );
12120 void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12121                     const lapack_complex_float* a, lapack_int* lda,
12122                     float* rcond, lapack_complex_float* work, float* rwork,
12123                     lapack_int *info );
12124 void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
12125                     const lapack_complex_double* a, lapack_int* lda,
12126                     double* rcond, lapack_complex_double* work, double* rwork,
12127                     lapack_int *info );
12128 void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12129                     const float* ap, float* rcond, float* work,
12130                     lapack_int* iwork, lapack_int *info );
12131 void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12132                     const double* ap, double* rcond, double* work,
12133                     lapack_int* iwork, lapack_int *info );
12134 void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12135                     const lapack_complex_float* ap, float* rcond,
12136                     lapack_complex_float* work, float* rwork,
12137                     lapack_int *info );
12138 void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
12139                     const lapack_complex_double* ap, double* rcond,
12140                     lapack_complex_double* work, double* rwork,
12141                     lapack_int *info );
12142 void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12143                     lapack_int* kd, const float* ab, lapack_int* ldab,
12144                     float* rcond, float* work, lapack_int* iwork,
12145                     lapack_int *info );
12146 void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12147                     lapack_int* kd, const double* ab, lapack_int* ldab,
12148                     double* rcond, double* work, lapack_int* iwork,
12149                     lapack_int *info );
12150 void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12151                     lapack_int* kd, const lapack_complex_float* ab,
12152                     lapack_int* ldab, float* rcond, lapack_complex_float* work,
12153                     float* rwork, lapack_int *info );
12154 void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
12155                     lapack_int* kd, const lapack_complex_double* ab,
12156                     lapack_int* ldab, double* rcond,
12157                     lapack_complex_double* work, double* rwork,
12158                     lapack_int *info );
12159 void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12160                     const float* a, lapack_int* lda, const float* af,
12161                     lapack_int* ldaf, const lapack_int* ipiv, const float* b,
12162                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12163                     float* berr, float* work, lapack_int* iwork,
12164                     lapack_int *info );
12165 void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12166                     const double* a, lapack_int* lda, const double* af,
12167                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
12168                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12169                     double* berr, double* work, lapack_int* iwork,
12170                     lapack_int *info );
12171 void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12172                     const lapack_complex_float* a, lapack_int* lda,
12173                     const lapack_complex_float* af, lapack_int* ldaf,
12174                     const lapack_int* ipiv, const lapack_complex_float* b,
12175                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12176                     float* ferr, float* berr, lapack_complex_float* work,
12177                     float* rwork, lapack_int *info );
12178 void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
12179                     const lapack_complex_double* a, lapack_int* lda,
12180                     const lapack_complex_double* af, lapack_int* ldaf,
12181                     const lapack_int* ipiv, const lapack_complex_double* b,
12182                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12183                     double* ferr, double* berr, lapack_complex_double* work,
12184                     double* rwork, lapack_int *info );
12185 void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12186                      const double* a, lapack_int* lda, const double* af,
12187                      lapack_int* ldaf, const lapack_int* ipiv, const double* r,
12188                      const double* c, const double* b, lapack_int* ldb,
12189                      double* x, lapack_int* ldx, double* rcond, double* berr,
12190                      lapack_int* n_err_bnds, double* err_bnds_norm,
12191                      double* err_bnds_comp, lapack_int* nparams, double* params,
12192                      double* work, lapack_int* iwork, lapack_int *info );
12193 void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12194                      const float* a, lapack_int* lda, const float* af,
12195                      lapack_int* ldaf, const lapack_int* ipiv, const float* r,
12196                      const float* c, const float* b, lapack_int* ldb, float* x,
12197                      lapack_int* ldx, float* rcond, float* berr,
12198                      lapack_int* n_err_bnds, float* err_bnds_norm,
12199                      float* err_bnds_comp, lapack_int* nparams, float* params,
12200                      float* work, lapack_int* iwork, lapack_int *info );
12201 void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12202                      const lapack_complex_double* a, lapack_int* lda,
12203                      const lapack_complex_double* af, lapack_int* ldaf,
12204                      const lapack_int* ipiv, const double* r, const double* c,
12205                      const lapack_complex_double* b, lapack_int* ldb,
12206                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
12207                      double* berr, lapack_int* n_err_bnds,
12208                      double* err_bnds_norm, double* err_bnds_comp,
12209                      lapack_int* nparams, double* params,
12210                      lapack_complex_double* work, double* rwork,
12211                      lapack_int *info );
12212 void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
12213                      const lapack_complex_float* a, lapack_int* lda,
12214                      const lapack_complex_float* af, lapack_int* ldaf,
12215                      const lapack_int* ipiv, const float* r, const float* c,
12216                      const lapack_complex_float* b, lapack_int* ldb,
12217                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
12218                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12219                      float* err_bnds_comp, lapack_int* nparams, float* params,
12220                      lapack_complex_float* work, float* rwork,
12221                      lapack_int *info );
12222 void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12223                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
12224                     const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
12225                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12226                     float* ferr, float* berr, float* work, lapack_int* iwork,
12227                     lapack_int *info );
12228 void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12229                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
12230                     const double* afb, lapack_int* ldafb,
12231                     const lapack_int* ipiv, const double* b, lapack_int* ldb,
12232                     double* x, lapack_int* ldx, double* ferr, double* berr,
12233                     double* work, lapack_int* iwork, lapack_int *info );
12234 void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12235                     lapack_int* nrhs, const lapack_complex_float* ab,
12236                     lapack_int* ldab, const lapack_complex_float* afb,
12237                     lapack_int* ldafb, const lapack_int* ipiv,
12238                     const lapack_complex_float* b, lapack_int* ldb,
12239                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12240                     float* berr, lapack_complex_float* work, float* rwork,
12241                     lapack_int *info );
12242 void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
12243                     lapack_int* nrhs, const lapack_complex_double* ab,
12244                     lapack_int* ldab, const lapack_complex_double* afb,
12245                     lapack_int* ldafb, const lapack_int* ipiv,
12246                     const lapack_complex_double* b, lapack_int* ldb,
12247                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12248                     double* berr, lapack_complex_double* work, double* rwork,
12249                     lapack_int *info );
12250 void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12251                      lapack_int* ku, lapack_int* nrhs, const double* ab,
12252                      lapack_int* ldab, const double* afb, lapack_int* ldafb,
12253                      const lapack_int* ipiv, const double* r, const double* c,
12254                      const double* b, lapack_int* ldb, double* x,
12255                      lapack_int* ldx, double* rcond, double* berr,
12256                      lapack_int* n_err_bnds, double* err_bnds_norm,
12257                      double* err_bnds_comp, lapack_int* nparams, double* params,
12258                      double* work, lapack_int* iwork, lapack_int *info );
12259 void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12260                      lapack_int* ku, lapack_int* nrhs, const float* ab,
12261                      lapack_int* ldab, const float* afb, lapack_int* ldafb,
12262                      const lapack_int* ipiv, const float* r, const float* c,
12263                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12264                      float* rcond, float* berr, lapack_int* n_err_bnds,
12265                      float* err_bnds_norm, float* err_bnds_comp,
12266                      lapack_int* nparams, float* params, float* work,
12267                      lapack_int* iwork, lapack_int *info );
12268 void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12269                      lapack_int* ku, lapack_int* nrhs,
12270                      const lapack_complex_double* ab, lapack_int* ldab,
12271                      const lapack_complex_double* afb, lapack_int* ldafb,
12272                      const lapack_int* ipiv, const double* r, const double* c,
12273                      const lapack_complex_double* b, lapack_int* ldb,
12274                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
12275                      double* berr, lapack_int* n_err_bnds,
12276                      double* err_bnds_norm, double* err_bnds_comp,
12277                      lapack_int* nparams, double* params,
12278                      lapack_complex_double* work, double* rwork,
12279                      lapack_int *info );
12280 void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
12281                      lapack_int* ku, lapack_int* nrhs,
12282                      const lapack_complex_float* ab, lapack_int* ldab,
12283                      const lapack_complex_float* afb, lapack_int* ldafb,
12284                      const lapack_int* ipiv, const float* r, const float* c,
12285                      const lapack_complex_float* b, lapack_int* ldb,
12286                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
12287                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12288                      float* err_bnds_comp, lapack_int* nparams, float* params,
12289                      lapack_complex_float* work, float* rwork,
12290                      lapack_int *info );
12291 void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12292                     const float* dl, const float* d, const float* du,
12293                     const float* dlf, const float* df, const float* duf,
12294                     const float* du2, const lapack_int* ipiv, const float* b,
12295                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12296                     float* berr, float* work, lapack_int* iwork,
12297                     lapack_int *info );
12298 void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12299                     const double* dl, const double* d, const double* du,
12300                     const double* dlf, const double* df, const double* duf,
12301                     const double* du2, const lapack_int* ipiv, const double* b,
12302                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12303                     double* berr, double* work, lapack_int* iwork,
12304                     lapack_int *info );
12305 void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12306                     const lapack_complex_float* dl,
12307                     const lapack_complex_float* d,
12308                     const lapack_complex_float* du,
12309                     const lapack_complex_float* dlf,
12310                     const lapack_complex_float* df,
12311                     const lapack_complex_float* duf,
12312                     const lapack_complex_float* du2, const lapack_int* ipiv,
12313                     const lapack_complex_float* b, lapack_int* ldb,
12314                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12315                     float* berr, lapack_complex_float* work, float* rwork,
12316                     lapack_int *info );
12317 void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
12318                     const lapack_complex_double* dl,
12319                     const lapack_complex_double* d,
12320                     const lapack_complex_double* du,
12321                     const lapack_complex_double* dlf,
12322                     const lapack_complex_double* df,
12323                     const lapack_complex_double* duf,
12324                     const lapack_complex_double* du2, const lapack_int* ipiv,
12325                     const lapack_complex_double* b, lapack_int* ldb,
12326                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12327                     double* berr, lapack_complex_double* work, double* rwork,
12328                     lapack_int *info );
12329 void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
12330                     lapack_int* lda, const float* af, lapack_int* ldaf,
12331                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12332                     float* ferr, float* berr, float* work, lapack_int* iwork,
12333                     lapack_int *info );
12334 void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12335                     const double* a, lapack_int* lda, const double* af,
12336                     lapack_int* ldaf, const double* b, lapack_int* ldb,
12337                     double* x, lapack_int* ldx, double* ferr, double* berr,
12338                     double* work, lapack_int* iwork, lapack_int *info );
12339 void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12340                     const lapack_complex_float* a, lapack_int* lda,
12341                     const lapack_complex_float* af, lapack_int* ldaf,
12342                     const lapack_complex_float* b, lapack_int* ldb,
12343                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12344                     float* berr, lapack_complex_float* work, float* rwork,
12345                     lapack_int *info );
12346 void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12347                     const lapack_complex_double* a, lapack_int* lda,
12348                     const lapack_complex_double* af, lapack_int* ldaf,
12349                     const lapack_complex_double* b, lapack_int* ldb,
12350                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12351                     double* berr, lapack_complex_double* work, double* rwork,
12352                     lapack_int *info );
12353 void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12354                      const double* a, lapack_int* lda, const double* af,
12355                      lapack_int* ldaf, const double* s, const double* b,
12356                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
12357                      double* berr, lapack_int* n_err_bnds,
12358                      double* err_bnds_norm, double* err_bnds_comp,
12359                      lapack_int* nparams, double* params, double* work,
12360                      lapack_int* iwork, lapack_int *info );
12361 void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12362                      const float* a, lapack_int* lda, const float* af,
12363                      lapack_int* ldaf, const float* s, const float* b,
12364                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12365                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12366                      float* err_bnds_comp, lapack_int* nparams, float* params,
12367                      float* work, lapack_int* iwork, lapack_int *info );
12368 void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12369                      const lapack_complex_double* a, lapack_int* lda,
12370                      const lapack_complex_double* af, lapack_int* ldaf,
12371                      const double* s, const lapack_complex_double* b,
12372                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12373                      double* rcond, double* berr, lapack_int* n_err_bnds,
12374                      double* err_bnds_norm, double* err_bnds_comp,
12375                      lapack_int* nparams, double* params,
12376                      lapack_complex_double* work, double* rwork,
12377                      lapack_int *info );
12378 void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12379                      const lapack_complex_float* a, lapack_int* lda,
12380                      const lapack_complex_float* af, lapack_int* ldaf,
12381                      const float* s, const lapack_complex_float* b,
12382                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12383                      float* rcond, float* berr, lapack_int* n_err_bnds,
12384                      float* err_bnds_norm, float* err_bnds_comp,
12385                      lapack_int* nparams, float* params,
12386                      lapack_complex_float* work, float* rwork,
12387                      lapack_int *info );
12388 void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12389                     const float* ap, const float* afp, const float* b,
12390                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
12391                     float* berr, float* work, lapack_int* iwork,
12392                     lapack_int *info );
12393 void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12394                     const double* ap, const double* afp, const double* b,
12395                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12396                     double* berr, double* work, lapack_int* iwork,
12397                     lapack_int *info );
12398 void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12399                     const lapack_complex_float* ap,
12400                     const lapack_complex_float* afp,
12401                     const lapack_complex_float* b, lapack_int* ldb,
12402                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12403                     float* berr, lapack_complex_float* work, float* rwork,
12404                     lapack_int *info );
12405 void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12406                     const lapack_complex_double* ap,
12407                     const lapack_complex_double* afp,
12408                     const lapack_complex_double* b, lapack_int* ldb,
12409                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12410                     double* berr, lapack_complex_double* work, double* rwork,
12411                     lapack_int *info );
12412 void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12413                     const float* ab, lapack_int* ldab, const float* afb,
12414                     lapack_int* ldafb, const float* b, lapack_int* ldb,
12415                     float* x, lapack_int* ldx, float* ferr, float* berr,
12416                     float* work, lapack_int* iwork, lapack_int *info );
12417 void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12418                     const double* ab, lapack_int* ldab, const double* afb,
12419                     lapack_int* ldafb, const double* b, lapack_int* ldb,
12420                     double* x, lapack_int* ldx, double* ferr, double* berr,
12421                     double* work, lapack_int* iwork, lapack_int *info );
12422 void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12423                     const lapack_complex_float* ab, lapack_int* ldab,
12424                     const lapack_complex_float* afb, lapack_int* ldafb,
12425                     const lapack_complex_float* b, lapack_int* ldb,
12426                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12427                     float* berr, lapack_complex_float* work, float* rwork,
12428                     lapack_int *info );
12429 void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
12430                     const lapack_complex_double* ab, lapack_int* ldab,
12431                     const lapack_complex_double* afb, lapack_int* ldafb,
12432                     const lapack_complex_double* b, lapack_int* ldb,
12433                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12434                     double* berr, lapack_complex_double* work, double* rwork,
12435                     lapack_int *info );
12436 void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
12437                     const float* e, const float* df, const float* ef,
12438                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12439                     float* ferr, float* berr, float* work, lapack_int *info );
12440 void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
12441                     const double* e, const double* df, const double* ef,
12442                     const double* b, lapack_int* ldb, double* x,
12443                     lapack_int* ldx, double* ferr, double* berr, double* work,
12444                     lapack_int *info );
12445 void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
12446                     const lapack_complex_float* e, const float* df,
12447                     const lapack_complex_float* ef,
12448                     const lapack_complex_float* b, lapack_int* ldb,
12449                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12450                     float* berr, lapack_complex_float* work, float* rwork,
12451                     lapack_int *info );
12452 void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12453                     const double* d, const lapack_complex_double* e,
12454                     const double* df, const lapack_complex_double* ef,
12455                     const lapack_complex_double* b, lapack_int* ldb,
12456                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12457                     double* berr, lapack_complex_double* work, double* rwork,
12458                     lapack_int *info );
12459 void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
12460                     lapack_int* lda, const float* af, lapack_int* ldaf,
12461                     const lapack_int* ipiv, const float* b, lapack_int* ldb,
12462                     float* x, lapack_int* ldx, float* ferr, float* berr,
12463                     float* work, lapack_int* iwork, lapack_int *info );
12464 void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12465                     const double* a, lapack_int* lda, const double* af,
12466                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
12467                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
12468                     double* berr, double* work, lapack_int* iwork,
12469                     lapack_int *info );
12470 void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12471                     const lapack_complex_float* a, lapack_int* lda,
12472                     const lapack_complex_float* af, lapack_int* ldaf,
12473                     const lapack_int* ipiv, const lapack_complex_float* b,
12474                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12475                     float* ferr, float* berr, lapack_complex_float* work,
12476                     float* rwork, lapack_int *info );
12477 void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12478                     const lapack_complex_double* a, lapack_int* lda,
12479                     const lapack_complex_double* af, lapack_int* ldaf,
12480                     const lapack_int* ipiv, const lapack_complex_double* b,
12481                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12482                     double* ferr, double* berr, lapack_complex_double* work,
12483                     double* rwork, lapack_int *info );
12484 void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12485                      const double* a, lapack_int* lda, const double* af,
12486                      lapack_int* ldaf, const lapack_int* ipiv, const double* s,
12487                      const double* b, lapack_int* ldb, double* x,
12488                      lapack_int* ldx, double* rcond, double* berr,
12489                      lapack_int* n_err_bnds, double* err_bnds_norm,
12490                      double* err_bnds_comp, lapack_int* nparams, double* params,
12491                      double* work, lapack_int* iwork, lapack_int *info );
12492 void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12493                      const float* a, lapack_int* lda, const float* af,
12494                      lapack_int* ldaf, const lapack_int* ipiv, const float* s,
12495                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12496                      float* rcond, float* berr, lapack_int* n_err_bnds,
12497                      float* err_bnds_norm, float* err_bnds_comp,
12498                      lapack_int* nparams, float* params, float* work,
12499                      lapack_int* iwork, lapack_int *info );
12500 void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12501                      const lapack_complex_double* a, lapack_int* lda,
12502                      const lapack_complex_double* af, lapack_int* ldaf,
12503                      const lapack_int* ipiv, const double* s,
12504                      const lapack_complex_double* b, lapack_int* ldb,
12505                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
12506                      double* berr, lapack_int* n_err_bnds,
12507                      double* err_bnds_norm, double* err_bnds_comp,
12508                      lapack_int* nparams, double* params,
12509                      lapack_complex_double* work, double* rwork,
12510                      lapack_int *info );
12511 void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12512                      const lapack_complex_float* a, lapack_int* lda,
12513                      const lapack_complex_float* af, lapack_int* ldaf,
12514                      const lapack_int* ipiv, const float* s,
12515                      const lapack_complex_float* b, lapack_int* ldb,
12516                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
12517                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12518                      float* err_bnds_comp, lapack_int* nparams, float* params,
12519                      lapack_complex_float* work, float* rwork,
12520                      lapack_int *info );
12521 void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12522                     const lapack_complex_float* a, lapack_int* lda,
12523                     const lapack_complex_float* af, lapack_int* ldaf,
12524                     const lapack_int* ipiv, const lapack_complex_float* b,
12525                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
12526                     float* ferr, float* berr, lapack_complex_float* work,
12527                     float* rwork, lapack_int *info );
12528 void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12529                     const lapack_complex_double* a, lapack_int* lda,
12530                     const lapack_complex_double* af, lapack_int* ldaf,
12531                     const lapack_int* ipiv, const lapack_complex_double* b,
12532                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12533                     double* ferr, double* berr, lapack_complex_double* work,
12534                     double* rwork, lapack_int *info );
12535 void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12536                      const lapack_complex_double* a, lapack_int* lda,
12537                      const lapack_complex_double* af, lapack_int* ldaf,
12538                      const lapack_int* ipiv, const double* s,
12539                      const lapack_complex_double* b, lapack_int* ldb,
12540                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
12541                      double* berr, lapack_int* n_err_bnds,
12542                      double* err_bnds_norm, double* err_bnds_comp,
12543                      lapack_int* nparams, double* params,
12544                      lapack_complex_double* work, double* rwork,
12545                      lapack_int *info );
12546 void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
12547                      const lapack_complex_float* a, lapack_int* lda,
12548                      const lapack_complex_float* af, lapack_int* ldaf,
12549                      const lapack_int* ipiv, const float* s,
12550                      const lapack_complex_float* b, lapack_int* ldb,
12551                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
12552                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
12553                      float* err_bnds_comp, lapack_int* nparams, float* params,
12554                      lapack_complex_float* work, float* rwork,
12555                      lapack_int *info );
12556 void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12557                     const float* ap, const float* afp, const lapack_int* ipiv,
12558                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12559                     float* ferr, float* berr, float* work, lapack_int* iwork,
12560                     lapack_int *info );
12561 void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12562                     const double* ap, const double* afp, const lapack_int* ipiv,
12563                     const double* b, lapack_int* ldb, double* x,
12564                     lapack_int* ldx, double* ferr, double* berr, double* work,
12565                     lapack_int* iwork, lapack_int *info );
12566 void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12567                     const lapack_complex_float* ap,
12568                     const lapack_complex_float* afp, const lapack_int* ipiv,
12569                     const lapack_complex_float* b, lapack_int* ldb,
12570                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12571                     float* berr, lapack_complex_float* work, float* rwork,
12572                     lapack_int *info );
12573 void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12574                     const lapack_complex_double* ap,
12575                     const lapack_complex_double* afp, const lapack_int* ipiv,
12576                     const lapack_complex_double* b, lapack_int* ldb,
12577                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12578                     double* berr, lapack_complex_double* work, double* rwork,
12579                     lapack_int *info );
12580 void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12581                     const lapack_complex_float* ap,
12582                     const lapack_complex_float* afp, const lapack_int* ipiv,
12583                     const lapack_complex_float* b, lapack_int* ldb,
12584                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
12585                     float* berr, lapack_complex_float* work, float* rwork,
12586                     lapack_int *info );
12587 void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
12588                     const lapack_complex_double* ap,
12589                     const lapack_complex_double* afp, const lapack_int* ipiv,
12590                     const lapack_complex_double* b, lapack_int* ldb,
12591                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
12592                     double* berr, lapack_complex_double* work, double* rwork,
12593                     lapack_int *info );
12594 void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12595                     lapack_int* nrhs, const float* a, lapack_int* lda,
12596                     const float* b, lapack_int* ldb, const float* x,
12597                     lapack_int* ldx, float* ferr, float* berr, float* work,
12598                     lapack_int* iwork, lapack_int *info );
12599 void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12600                     lapack_int* nrhs, const double* a, lapack_int* lda,
12601                     const double* b, lapack_int* ldb, const double* x,
12602                     lapack_int* ldx, double* ferr, double* berr, double* work,
12603                     lapack_int* iwork, lapack_int *info );
12604 void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12605                     lapack_int* nrhs, const lapack_complex_float* a,
12606                     lapack_int* lda, const lapack_complex_float* b,
12607                     lapack_int* ldb, const lapack_complex_float* x,
12608                     lapack_int* ldx, float* ferr, float* berr,
12609                     lapack_complex_float* work, float* rwork,
12610                     lapack_int *info );
12611 void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12612                     lapack_int* nrhs, const lapack_complex_double* a,
12613                     lapack_int* lda, const lapack_complex_double* b,
12614                     lapack_int* ldb, const lapack_complex_double* x,
12615                     lapack_int* ldx, double* ferr, double* berr,
12616                     lapack_complex_double* work, double* rwork,
12617                     lapack_int *info );
12618 void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12619                     lapack_int* nrhs, const float* ap, const float* b,
12620                     lapack_int* ldb, const float* x, lapack_int* ldx,
12621                     float* ferr, float* berr, float* work, lapack_int* iwork,
12622                     lapack_int *info );
12623 void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12624                     lapack_int* nrhs, const double* ap, const double* b,
12625                     lapack_int* ldb, const double* x, lapack_int* ldx,
12626                     double* ferr, double* berr, double* work, lapack_int* iwork,
12627                     lapack_int *info );
12628 void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12629                     lapack_int* nrhs, const lapack_complex_float* ap,
12630                     const lapack_complex_float* b, lapack_int* ldb,
12631                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
12632                     float* berr, lapack_complex_float* work, float* rwork,
12633                     lapack_int *info );
12634 void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
12635                     lapack_int* nrhs, const lapack_complex_double* ap,
12636                     const lapack_complex_double* b, lapack_int* ldb,
12637                     const lapack_complex_double* x, lapack_int* ldx,
12638                     double* ferr, double* berr, lapack_complex_double* work,
12639                     double* rwork, lapack_int *info );
12640 void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12641                     lapack_int* kd, lapack_int* nrhs, const float* ab,
12642                     lapack_int* ldab, const float* b, lapack_int* ldb,
12643                     const float* x, lapack_int* ldx, float* ferr, float* berr,
12644                     float* work, lapack_int* iwork, lapack_int *info );
12645 void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12646                     lapack_int* kd, lapack_int* nrhs, const double* ab,
12647                     lapack_int* ldab, const double* b, lapack_int* ldb,
12648                     const double* x, lapack_int* ldx, double* ferr,
12649                     double* berr, double* work, lapack_int* iwork,
12650                     lapack_int *info );
12651 void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12652                     lapack_int* kd, lapack_int* nrhs,
12653                     const lapack_complex_float* ab, lapack_int* ldab,
12654                     const lapack_complex_float* b, lapack_int* ldb,
12655                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
12656                     float* berr, lapack_complex_float* work, float* rwork,
12657                     lapack_int *info );
12658 void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
12659                     lapack_int* kd, lapack_int* nrhs,
12660                     const lapack_complex_double* ab, lapack_int* ldab,
12661                     const lapack_complex_double* b, lapack_int* ldb,
12662                     const lapack_complex_double* x, lapack_int* ldx,
12663                     double* ferr, double* berr, lapack_complex_double* work,
12664                     double* rwork, lapack_int *info );
12665 void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
12666                     const lapack_int* ipiv, float* work, lapack_int* lwork,
12667                     lapack_int *info );
12668 void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
12669                     const lapack_int* ipiv, double* work, lapack_int* lwork,
12670                     lapack_int *info );
12671 void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
12672                     const lapack_int* ipiv, lapack_complex_float* work,
12673                     lapack_int* lwork, lapack_int *info );
12674 void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
12675                     const lapack_int* ipiv, lapack_complex_double* work,
12676                     lapack_int* lwork, lapack_int *info );
12677 void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12678                     lapack_int *info );
12679 void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12680                     lapack_int *info );
12681 void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
12682                     lapack_int* lda, lapack_int *info );
12683 void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
12684                     lapack_int* lda, lapack_int *info );
12685 void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
12686                     lapack_int *info );
12687 void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
12688                     lapack_int *info );
12689 void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
12690                     lapack_complex_double* a, lapack_int *info );
12691 void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
12692                     lapack_complex_float* a, lapack_int *info );
12693 void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
12694 void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
12695 void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12696                     lapack_int *info );
12697 void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12698                     lapack_int *info );
12699 void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12700                     const lapack_int* ipiv, float* work, lapack_int *info );
12701 void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12702                     const lapack_int* ipiv, double* work, lapack_int *info );
12703 void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
12704                     lapack_int* lda, const lapack_int* ipiv,
12705                     lapack_complex_float* work, lapack_int *info );
12706 void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
12707                     lapack_int* lda, const lapack_int* ipiv,
12708                     lapack_complex_double* work, lapack_int *info );
12709 void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
12710                     lapack_int* lda, const lapack_int* ipiv,
12711                     lapack_complex_float* work, lapack_int *info );
12712 void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
12713                     lapack_int* lda, const lapack_int* ipiv,
12714                     lapack_complex_double* work, lapack_int *info );
12715 void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
12716                     const lapack_int* ipiv, float* work, lapack_int *info );
12717 void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
12718                     const lapack_int* ipiv, double* work, lapack_int *info );
12719 void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12720                     const lapack_int* ipiv, lapack_complex_float* work,
12721                     lapack_int *info );
12722 void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12723                     const lapack_int* ipiv, lapack_complex_double* work,
12724                     lapack_int *info );
12725 void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
12726                     const lapack_int* ipiv, lapack_complex_float* work,
12727                     lapack_int *info );
12728 void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
12729                     const lapack_int* ipiv, lapack_complex_double* work,
12730                     lapack_int *info );
12731 void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
12732                     lapack_int* lda, lapack_int *info );
12733 void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
12734                     lapack_int* lda, lapack_int *info );
12735 void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
12736                     lapack_complex_float* a, lapack_int* lda,
12737                     lapack_int *info );
12738 void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
12739                     lapack_complex_double* a, lapack_int* lda,
12740                     lapack_int *info );
12741 void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
12742                     double* a, lapack_int *info );
12743 void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
12744                     float* a, lapack_int *info );
12745 void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
12746                     lapack_complex_double* a, lapack_int *info );
12747 void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
12748                     lapack_complex_float* a, lapack_int *info );
12749 void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
12750                     lapack_int *info );
12751 void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
12752                     lapack_int *info );
12753 void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
12754                     lapack_complex_float* ap, lapack_int *info );
12755 void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
12756                     lapack_complex_double* ap, lapack_int *info );
12757 void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
12758                     lapack_int* lda, float* r, float* c, float* rowcnd,
12759                     float* colcnd, float* amax, lapack_int *info );
12760 void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
12761                     lapack_int* lda, double* r, double* c, double* rowcnd,
12762                     double* colcnd, double* amax, lapack_int *info );
12763 void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
12764                     lapack_int* lda, float* r, float* c, float* rowcnd,
12765                     float* colcnd, float* amax, lapack_int *info );
12766 void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
12767                     const lapack_complex_double* a, lapack_int* lda, double* r,
12768                     double* c, double* rowcnd, double* colcnd, double* amax,
12769                     lapack_int *info );
12770 void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
12771                      lapack_int* lda, double* r, double* c, double* rowcnd,
12772                      double* colcnd, double* amax, lapack_int *info );
12773 void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
12774                      lapack_int* lda, float* r, float* c, float* rowcnd,
12775                      float* colcnd, float* amax, lapack_int *info );
12776 void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
12777                      const lapack_complex_double* a, lapack_int* lda, double* r,
12778                      double* c, double* rowcnd, double* colcnd, double* amax,
12779                      lapack_int *info );
12780 void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
12781                      const lapack_complex_float* a, lapack_int* lda, float* r,
12782                      float* c, float* rowcnd, float* colcnd, float* amax,
12783                      lapack_int *info );
12784 void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12785                     lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
12786                     float* c, float* rowcnd, float* colcnd, float* amax,
12787                     lapack_int *info );
12788 void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12789                     lapack_int* ku, const double* ab, lapack_int* ldab,
12790                     double* r, double* c, double* rowcnd, double* colcnd,
12791                     double* amax, lapack_int *info );
12792 void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12793                     lapack_int* ku, const lapack_complex_float* ab,
12794                     lapack_int* ldab, float* r, float* c, float* rowcnd,
12795                     float* colcnd, float* amax, lapack_int *info );
12796 void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
12797                     lapack_int* ku, const lapack_complex_double* ab,
12798                     lapack_int* ldab, double* r, double* c, double* rowcnd,
12799                     double* colcnd, double* amax, lapack_int *info );
12800 void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12801                      lapack_int* ku, const double* ab, lapack_int* ldab,
12802                      double* r, double* c, double* rowcnd, double* colcnd,
12803                      double* amax, lapack_int *info );
12804 void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12805                      lapack_int* ku, const float* ab, lapack_int* ldab,
12806                      float* r, float* c, float* rowcnd, float* colcnd,
12807                      float* amax, lapack_int *info );
12808 void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12809                      lapack_int* ku, const lapack_complex_double* ab,
12810                      lapack_int* ldab, double* r, double* c, double* rowcnd,
12811                      double* colcnd, double* amax, lapack_int *info );
12812 void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
12813                      lapack_int* ku, const lapack_complex_float* ab,
12814                      lapack_int* ldab, float* r, float* c, float* rowcnd,
12815                      float* colcnd, float* amax, lapack_int *info );
12816 void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
12817                     float* scond, float* amax, lapack_int *info );
12818 void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
12819                     double* scond, double* amax, lapack_int *info );
12820 void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
12821                     lapack_int* lda, float* s, float* scond, float* amax,
12822                     lapack_int *info );
12823 void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
12824                     lapack_int* lda, double* s, double* scond, double* amax,
12825                     lapack_int *info );
12826 void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
12827                      double* scond, double* amax, lapack_int *info );
12828 void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
12829                      float* scond, float* amax, lapack_int *info );
12830 void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
12831                      lapack_int* lda, double* s, double* scond, double* amax,
12832                      lapack_int *info );
12833 void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
12834                      lapack_int* lda, float* s, float* scond, float* amax,
12835                      lapack_int *info );
12836 void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
12837                     float* scond, float* amax, lapack_int *info );
12838 void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
12839                     double* scond, double* amax, lapack_int *info );
12840 void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
12841                     float* s, float* scond, float* amax, lapack_int *info );
12842 void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
12843                     double* s, double* scond, double* amax, lapack_int *info );
12844 void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
12845                     lapack_int* ldab, float* s, float* scond, float* amax,
12846                     lapack_int *info );
12847 void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
12848                     lapack_int* ldab, double* s, double* scond, double* amax,
12849                     lapack_int *info );
12850 void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
12851                     const lapack_complex_float* ab, lapack_int* ldab, float* s,
12852                     float* scond, float* amax, lapack_int *info );
12853 void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
12854                     const lapack_complex_double* ab, lapack_int* ldab,
12855                     double* s, double* scond, double* amax, lapack_int *info );
12856 void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
12857                      lapack_int* lda, double* s, double* scond, double* amax,
12858                      double* work, lapack_int *info );
12859 void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
12860                      float* s, float* scond, float* amax, float* work,
12861                      lapack_int *info );
12862 void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
12863                      lapack_int* lda, double* s, double* scond, double* amax,
12864                      lapack_complex_double* work, lapack_int *info );
12865 void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
12866                      lapack_int* lda, float* s, float* scond, float* amax,
12867                      lapack_complex_float* work, lapack_int *info );
12868 void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
12869                      lapack_int* lda, double* s, double* scond, double* amax,
12870                      lapack_complex_double* work, lapack_int *info );
12871 void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
12872                      lapack_int* lda, float* s, float* scond, float* amax,
12873                      lapack_complex_float* work, lapack_int *info );
12874 void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
12875                    lapack_int* ipiv, float* b, lapack_int* ldb,
12876                    lapack_int *info );
12877 void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
12878                    lapack_int* ipiv, double* b, lapack_int* ldb,
12879                    lapack_int *info );
12880 void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
12881                    lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
12882                    lapack_int* ldb, lapack_int *info );
12883 void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
12884                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
12885                    lapack_int* ldb, lapack_int *info );
12886 void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
12887                     lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
12888                     lapack_int* ldx, double* work, float* swork,
12889                     lapack_int* iter, lapack_int *info );
12890 void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
12891                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
12892                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
12893                     lapack_complex_double* work, lapack_complex_float* swork,
12894                     double* rwork, lapack_int* iter, lapack_int *info );
12895 void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12896                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
12897                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
12898                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12899                     float* ferr, float* berr, float* work, lapack_int* iwork,
12900                     lapack_int *info );
12901 void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12902                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
12903                     lapack_int* ipiv, char* equed, double* r, double* c,
12904                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12905                     double* rcond, double* ferr, double* berr, double* work,
12906                     lapack_int* iwork, lapack_int *info );
12907 void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12908                     lapack_complex_float* a, lapack_int* lda,
12909                     lapack_complex_float* af, lapack_int* ldaf,
12910                     lapack_int* ipiv, char* equed, float* r, float* c,
12911                     lapack_complex_float* b, lapack_int* ldb,
12912                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12913                     float* ferr, float* berr, lapack_complex_float* work,
12914                     float* rwork, lapack_int *info );
12915 void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12916                     lapack_complex_double* a, lapack_int* lda,
12917                     lapack_complex_double* af, lapack_int* ldaf,
12918                     lapack_int* ipiv, char* equed, double* r, double* c,
12919                     lapack_complex_double* b, lapack_int* ldb,
12920                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
12921                     double* ferr, double* berr, lapack_complex_double* work,
12922                     double* rwork, lapack_int *info );
12923 void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12924                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
12925                      lapack_int* ipiv, char* equed, double* r, double* c,
12926                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12927                      double* rcond, double* rpvgrw, double* berr,
12928                      lapack_int* n_err_bnds, double* err_bnds_norm,
12929                      double* err_bnds_comp, lapack_int* nparams, double* params,
12930                      double* work, lapack_int* iwork, lapack_int *info );
12931 void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12932                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
12933                      lapack_int* ipiv, char* equed, float* r, float* c,
12934                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
12935                      float* rcond, float* rpvgrw, float* berr,
12936                      lapack_int* n_err_bnds, float* err_bnds_norm,
12937                      float* err_bnds_comp, lapack_int* nparams, float* params,
12938                      float* work, lapack_int* iwork, lapack_int *info );
12939 void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12940                      lapack_complex_double* a, lapack_int* lda,
12941                      lapack_complex_double* af, lapack_int* ldaf,
12942                      lapack_int* ipiv, char* equed, double* r, double* c,
12943                      lapack_complex_double* b, lapack_int* ldb,
12944                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
12945                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
12946                      double* err_bnds_norm, double* err_bnds_comp,
12947                      lapack_int* nparams, double* params,
12948                      lapack_complex_double* work, double* rwork,
12949                      lapack_int *info );
12950 void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
12951                      lapack_complex_float* a, lapack_int* lda,
12952                      lapack_complex_float* af, lapack_int* ldaf,
12953                      lapack_int* ipiv, char* equed, float* r, float* c,
12954                      lapack_complex_float* b, lapack_int* ldb,
12955                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
12956                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
12957                      float* err_bnds_norm, float* err_bnds_comp,
12958                      lapack_int* nparams, float* params,
12959                      lapack_complex_float* work, float* rwork,
12960                      lapack_int *info );
12961 void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12962                    lapack_int* nrhs, float* ab, lapack_int* ldab,
12963                    lapack_int* ipiv, float* b, lapack_int* ldb,
12964                    lapack_int *info );
12965 void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12966                    lapack_int* nrhs, double* ab, lapack_int* ldab,
12967                    lapack_int* ipiv, double* b, lapack_int* ldb,
12968                    lapack_int *info );
12969 void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12970                    lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
12971                    lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
12972                    lapack_int *info );
12973 void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
12974                    lapack_int* nrhs, lapack_complex_double* ab,
12975                    lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
12976                    lapack_int* ldb, lapack_int *info );
12977 void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12978                     lapack_int* ku, lapack_int* nrhs, float* ab,
12979                     lapack_int* ldab, float* afb, lapack_int* ldafb,
12980                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
12981                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
12982                     float* ferr, float* berr, float* work, lapack_int* iwork,
12983                     lapack_int *info );
12984 void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12985                     lapack_int* ku, lapack_int* nrhs, double* ab,
12986                     lapack_int* ldab, double* afb, lapack_int* ldafb,
12987                     lapack_int* ipiv, char* equed, double* r, double* c,
12988                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
12989                     double* rcond, double* ferr, double* berr, double* work,
12990                     lapack_int* iwork, lapack_int *info );
12991 void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
12992                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
12993                     lapack_int* ldab, lapack_complex_float* afb,
12994                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
12995                     float* c, lapack_complex_float* b, lapack_int* ldb,
12996                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
12997                     float* ferr, float* berr, lapack_complex_float* work,
12998                     float* rwork, lapack_int *info );
12999 void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13000                     lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
13001                     lapack_int* ldab, lapack_complex_double* afb,
13002                     lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
13003                     double* c, lapack_complex_double* b, lapack_int* ldb,
13004                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13005                     double* ferr, double* berr, lapack_complex_double* work,
13006                     double* rwork, lapack_int *info );
13007 void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13008                      lapack_int* ku, lapack_int* nrhs, double* ab,
13009                      lapack_int* ldab, double* afb, lapack_int* ldafb,
13010                      lapack_int* ipiv, char* equed, double* r, double* c,
13011                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
13012                      double* rcond, double* rpvgrw, double* berr,
13013                      lapack_int* n_err_bnds, double* err_bnds_norm,
13014                      double* err_bnds_comp, lapack_int* nparams, double* params,
13015                      double* work, lapack_int* iwork, lapack_int *info );
13016 void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13017                      lapack_int* ku, lapack_int* nrhs, float* ab,
13018                      lapack_int* ldab, float* afb, lapack_int* ldafb,
13019                      lapack_int* ipiv, char* equed, float* r, float* c,
13020                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13021                      float* rcond, float* rpvgrw, float* berr,
13022                      lapack_int* n_err_bnds, float* err_bnds_norm,
13023                      float* err_bnds_comp, lapack_int* nparams, float* params,
13024                      float* work, lapack_int* iwork, lapack_int *info );
13025 void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13026                      lapack_int* ku, lapack_int* nrhs,
13027                      lapack_complex_double* ab, lapack_int* ldab,
13028                      lapack_complex_double* afb, lapack_int* ldafb,
13029                      lapack_int* ipiv, char* equed, double* r, double* c,
13030                      lapack_complex_double* b, lapack_int* ldb,
13031                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13032                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13033                      double* err_bnds_norm, double* err_bnds_comp,
13034                      lapack_int* nparams, double* params,
13035                      lapack_complex_double* work, double* rwork,
13036                      lapack_int *info );
13037 void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
13038                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
13039                      lapack_int* ldab, lapack_complex_float* afb,
13040                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
13041                      float* c, lapack_complex_float* b, lapack_int* ldb,
13042                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13043                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13044                      float* err_bnds_norm, float* err_bnds_comp,
13045                      lapack_int* nparams, float* params,
13046                      lapack_complex_float* work, float* rwork,
13047                      lapack_int *info );
13048 void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
13049                    float* du, float* b, lapack_int* ldb, lapack_int *info );
13050 void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
13051                    double* du, double* b, lapack_int* ldb, lapack_int *info );
13052 void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
13053                    lapack_complex_float* d, lapack_complex_float* du,
13054                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13055 void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
13056                    lapack_complex_double* d, lapack_complex_double* du,
13057                    lapack_complex_double* b, lapack_int* ldb,
13058                    lapack_int *info );
13059 void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13060                     const float* dl, const float* d, const float* du,
13061                     float* dlf, float* df, float* duf, float* du2,
13062                     lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
13063                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
13064                     float* work, lapack_int* iwork, lapack_int *info );
13065 void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13066                     const double* dl, const double* d, const double* du,
13067                     double* dlf, double* df, double* duf, double* du2,
13068                     lapack_int* ipiv, const double* b, lapack_int* ldb,
13069                     double* x, lapack_int* ldx, double* rcond, double* ferr,
13070                     double* berr, double* work, lapack_int* iwork,
13071                     lapack_int *info );
13072 void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13073                     const lapack_complex_float* dl,
13074                     const lapack_complex_float* d,
13075                     const lapack_complex_float* du, lapack_complex_float* dlf,
13076                     lapack_complex_float* df, lapack_complex_float* duf,
13077                     lapack_complex_float* du2, lapack_int* ipiv,
13078                     const lapack_complex_float* b, lapack_int* ldb,
13079                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13080                     float* ferr, float* berr, lapack_complex_float* work,
13081                     float* rwork, lapack_int *info );
13082 void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
13083                     const lapack_complex_double* dl,
13084                     const lapack_complex_double* d,
13085                     const lapack_complex_double* du, lapack_complex_double* dlf,
13086                     lapack_complex_double* df, lapack_complex_double* duf,
13087                     lapack_complex_double* du2, lapack_int* ipiv,
13088                     const lapack_complex_double* b, lapack_int* ldb,
13089                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13090                     double* ferr, double* berr, lapack_complex_double* work,
13091                     double* rwork, lapack_int *info );
13092 void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
13093                    lapack_int* lda, float* b, lapack_int* ldb,
13094                    lapack_int *info );
13095 void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13096                    lapack_int* lda, double* b, lapack_int* ldb,
13097                    lapack_int *info );
13098 void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13099                    lapack_complex_float* a, lapack_int* lda,
13100                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13101 void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13102                    lapack_complex_double* a, lapack_int* lda,
13103                    lapack_complex_double* b, lapack_int* ldb,
13104                    lapack_int *info );
13105 void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13106                     lapack_int* lda, double* b, lapack_int* ldb, double* x,
13107                     lapack_int* ldx, double* work, float* swork,
13108                     lapack_int* iter, lapack_int *info );
13109 void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
13110                     lapack_complex_double* a, lapack_int* lda,
13111                     lapack_complex_double* b, lapack_int* ldb,
13112                     lapack_complex_double* x, lapack_int* ldx,
13113                     lapack_complex_double* work, lapack_complex_float* swork,
13114                     double* rwork, lapack_int* iter, lapack_int *info );
13115 void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13116                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13117                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
13118                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
13119                     float* work, lapack_int* iwork, lapack_int *info );
13120 void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13121                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13122                     char* equed, double* s, double* b, lapack_int* ldb,
13123                     double* x, lapack_int* ldx, double* rcond, double* ferr,
13124                     double* berr, double* work, lapack_int* iwork,
13125                     lapack_int *info );
13126 void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13127                     lapack_complex_float* a, lapack_int* lda,
13128                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
13129                     float* s, lapack_complex_float* b, lapack_int* ldb,
13130                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13131                     float* ferr, float* berr, lapack_complex_float* work,
13132                     float* rwork, lapack_int *info );
13133 void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13134                     lapack_complex_double* a, lapack_int* lda,
13135                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
13136                     double* s, lapack_complex_double* b, lapack_int* ldb,
13137                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13138                     double* ferr, double* berr, lapack_complex_double* work,
13139                     double* rwork, lapack_int *info );
13140 void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13141                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13142                      char* equed, double* s, double* b, lapack_int* ldb,
13143                      double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
13144                      double* berr, lapack_int* n_err_bnds,
13145                      double* err_bnds_norm, double* err_bnds_comp,
13146                      lapack_int* nparams, double* params, double* work,
13147                      lapack_int* iwork, lapack_int *info );
13148 void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13149                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13150                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
13151                      lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
13152                      lapack_int* n_err_bnds, float* err_bnds_norm,
13153                      float* err_bnds_comp, lapack_int* nparams, float* params,
13154                      float* work, lapack_int* iwork, lapack_int *info );
13155 void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13156                      lapack_complex_double* a, lapack_int* lda,
13157                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
13158                      double* s, lapack_complex_double* b, lapack_int* ldb,
13159                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13160                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13161                      double* err_bnds_norm, double* err_bnds_comp,
13162                      lapack_int* nparams, double* params,
13163                      lapack_complex_double* work, double* rwork,
13164                      lapack_int *info );
13165 void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13166                      lapack_complex_float* a, lapack_int* lda,
13167                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
13168                      float* s, lapack_complex_float* b, lapack_int* ldb,
13169                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13170                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13171                      float* err_bnds_norm, float* err_bnds_comp,
13172                      lapack_int* nparams, float* params,
13173                      lapack_complex_float* work, float* rwork,
13174                      lapack_int *info );
13175 void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
13176                    float* b, lapack_int* ldb, lapack_int *info );
13177 void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
13178                    double* b, lapack_int* ldb, lapack_int *info );
13179 void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13180                    lapack_complex_float* ap, lapack_complex_float* b,
13181                    lapack_int* ldb, lapack_int *info );
13182 void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13183                    lapack_complex_double* ap, lapack_complex_double* b,
13184                    lapack_int* ldb, lapack_int *info );
13185 void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13186                     float* ap, float* afp, char* equed, float* s, float* b,
13187                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13188                     float* ferr, float* berr, float* work, lapack_int* iwork,
13189                     lapack_int *info );
13190 void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13191                     double* ap, double* afp, char* equed, double* s, double* b,
13192                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13193                     double* ferr, double* berr, double* work, lapack_int* iwork,
13194                     lapack_int *info );
13195 void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13196                     lapack_complex_float* ap, lapack_complex_float* afp,
13197                     char* equed, float* s, lapack_complex_float* b,
13198                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13199                     float* rcond, float* ferr, float* berr,
13200                     lapack_complex_float* work, float* rwork,
13201                     lapack_int *info );
13202 void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13203                     lapack_complex_double* ap, lapack_complex_double* afp,
13204                     char* equed, double* s, lapack_complex_double* b,
13205                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13206                     double* rcond, double* ferr, double* berr,
13207                     lapack_complex_double* work, double* rwork,
13208                     lapack_int *info );
13209 void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13210                    float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
13211                    lapack_int *info );
13212 void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13213                    double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
13214                    lapack_int *info );
13215 void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13216                    lapack_complex_float* ab, lapack_int* ldab,
13217                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13218 void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13219                    lapack_complex_double* ab, lapack_int* ldab,
13220                    lapack_complex_double* b, lapack_int* ldb,
13221                    lapack_int *info );
13222 void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13223                     lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
13224                     lapack_int* ldafb, char* equed, float* s, float* b,
13225                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13226                     float* ferr, float* berr, float* work, lapack_int* iwork,
13227                     lapack_int *info );
13228 void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13229                     lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
13230                     lapack_int* ldafb, char* equed, double* s, double* b,
13231                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13232                     double* ferr, double* berr, double* work, lapack_int* iwork,
13233                     lapack_int *info );
13234 void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13235                     lapack_int* nrhs, lapack_complex_float* ab,
13236                     lapack_int* ldab, lapack_complex_float* afb,
13237                     lapack_int* ldafb, char* equed, float* s,
13238                     lapack_complex_float* b, lapack_int* ldb,
13239                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
13240                     float* ferr, float* berr, lapack_complex_float* work,
13241                     float* rwork, lapack_int *info );
13242 void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
13243                     lapack_int* nrhs, lapack_complex_double* ab,
13244                     lapack_int* ldab, lapack_complex_double* afb,
13245                     lapack_int* ldafb, char* equed, double* s,
13246                     lapack_complex_double* b, lapack_int* ldb,
13247                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
13248                     double* ferr, double* berr, lapack_complex_double* work,
13249                     double* rwork, lapack_int *info );
13250 void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
13251                    float* b, lapack_int* ldb, lapack_int *info );
13252 void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
13253                    double* b, lapack_int* ldb, lapack_int *info );
13254 void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
13255                    lapack_complex_float* e, lapack_complex_float* b,
13256                    lapack_int* ldb, lapack_int *info );
13257 void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
13258                    lapack_complex_double* e, lapack_complex_double* b,
13259                    lapack_int* ldb, lapack_int *info );
13260 void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
13261                     const float* e, float* df, float* ef, const float* b,
13262                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13263                     float* ferr, float* berr, float* work, lapack_int *info );
13264 void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
13265                     const double* d, const double* e, double* df, double* ef,
13266                     const double* b, lapack_int* ldb, double* x,
13267                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
13268                     double* work, lapack_int *info );
13269 void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
13270                     const lapack_complex_float* e, float* df,
13271                     lapack_complex_float* ef, const lapack_complex_float* b,
13272                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13273                     float* rcond, float* ferr, float* berr,
13274                     lapack_complex_float* work, float* rwork,
13275                     lapack_int *info );
13276 void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
13277                     const double* d, const lapack_complex_double* e, double* df,
13278                     lapack_complex_double* ef, const lapack_complex_double* b,
13279                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13280                     double* rcond, double* ferr, double* berr,
13281                     lapack_complex_double* work, double* rwork,
13282                     lapack_int *info );
13283 void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
13284                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
13285                    float* work, lapack_int* lwork, lapack_int *info );
13286 void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
13287                    lapack_int* lda, lapack_int* ipiv, double* b,
13288                    lapack_int* ldb, double* work, lapack_int* lwork,
13289                    lapack_int *info );
13290 void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
13291                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
13292                    lapack_complex_float* b, lapack_int* ldb,
13293                    lapack_complex_float* work, lapack_int* lwork,
13294                    lapack_int *info );
13295 void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
13296                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
13297                    lapack_complex_double* b, lapack_int* ldb,
13298                    lapack_complex_double* work, lapack_int* lwork,
13299                    lapack_int *info );
13300 void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13301                     const float* a, lapack_int* lda, float* af,
13302                     lapack_int* ldaf, lapack_int* ipiv, const float* b,
13303                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13304                     float* ferr, float* berr, float* work, lapack_int* lwork,
13305                     lapack_int* iwork, lapack_int *info );
13306 void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13307                     const double* a, lapack_int* lda, double* af,
13308                     lapack_int* ldaf, lapack_int* ipiv, const double* b,
13309                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13310                     double* ferr, double* berr, double* work, lapack_int* lwork,
13311                     lapack_int* iwork, lapack_int *info );
13312 void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13313                     const lapack_complex_float* a, lapack_int* lda,
13314                     lapack_complex_float* af, lapack_int* ldaf,
13315                     lapack_int* ipiv, const lapack_complex_float* b,
13316                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13317                     float* rcond, float* ferr, float* berr,
13318                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13319                     lapack_int *info );
13320 void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13321                     const lapack_complex_double* a, lapack_int* lda,
13322                     lapack_complex_double* af, lapack_int* ldaf,
13323                     lapack_int* ipiv, const lapack_complex_double* b,
13324                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13325                     double* rcond, double* ferr, double* berr,
13326                     lapack_complex_double* work, lapack_int* lwork,
13327                     double* rwork, lapack_int *info );
13328 void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13329                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
13330                      lapack_int* ipiv, char* equed, double* s, double* b,
13331                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13332                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13333                      double* err_bnds_norm, double* err_bnds_comp,
13334                      lapack_int* nparams, double* params, double* work,
13335                      lapack_int* iwork, lapack_int *info );
13336 void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13337                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
13338                      lapack_int* ipiv, char* equed, float* s, float* b,
13339                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13340                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13341                      float* err_bnds_norm, float* err_bnds_comp,
13342                      lapack_int* nparams, float* params, float* work,
13343                      lapack_int* iwork, lapack_int *info );
13344 void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13345                      lapack_complex_double* a, lapack_int* lda,
13346                      lapack_complex_double* af, lapack_int* ldaf,
13347                      lapack_int* ipiv, char* equed, double* s,
13348                      lapack_complex_double* b, lapack_int* ldb,
13349                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13350                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13351                      double* err_bnds_norm, double* err_bnds_comp,
13352                      lapack_int* nparams, double* params,
13353                      lapack_complex_double* work, double* rwork,
13354                      lapack_int *info );
13355 void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13356                      lapack_complex_float* a, lapack_int* lda,
13357                      lapack_complex_float* af, lapack_int* ldaf,
13358                      lapack_int* ipiv, char* equed, float* s,
13359                      lapack_complex_float* b, lapack_int* ldb,
13360                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13361                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13362                      float* err_bnds_norm, float* err_bnds_comp,
13363                      lapack_int* nparams, float* params,
13364                      lapack_complex_float* work, float* rwork,
13365                      lapack_int *info );
13366 void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
13367                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
13368                    lapack_complex_float* b, lapack_int* ldb,
13369                    lapack_complex_float* work, lapack_int* lwork,
13370                    lapack_int *info );
13371 void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
13372                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
13373                    lapack_complex_double* b, lapack_int* ldb,
13374                    lapack_complex_double* work, lapack_int* lwork,
13375                    lapack_int *info );
13376 void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13377                     const lapack_complex_float* a, lapack_int* lda,
13378                     lapack_complex_float* af, lapack_int* ldaf,
13379                     lapack_int* ipiv, const lapack_complex_float* b,
13380                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13381                     float* rcond, float* ferr, float* berr,
13382                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
13383                     lapack_int *info );
13384 void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13385                     const lapack_complex_double* a, lapack_int* lda,
13386                     lapack_complex_double* af, lapack_int* ldaf,
13387                     lapack_int* ipiv, const lapack_complex_double* b,
13388                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13389                     double* rcond, double* ferr, double* berr,
13390                     lapack_complex_double* work, lapack_int* lwork,
13391                     double* rwork, lapack_int *info );
13392 void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13393                      lapack_complex_double* a, lapack_int* lda,
13394                      lapack_complex_double* af, lapack_int* ldaf,
13395                      lapack_int* ipiv, char* equed, double* s,
13396                      lapack_complex_double* b, lapack_int* ldb,
13397                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13398                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
13399                      double* err_bnds_norm, double* err_bnds_comp,
13400                      lapack_int* nparams, double* params,
13401                      lapack_complex_double* work, double* rwork,
13402                      lapack_int *info );
13403 void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13404                      lapack_complex_float* a, lapack_int* lda,
13405                      lapack_complex_float* af, lapack_int* ldaf,
13406                      lapack_int* ipiv, char* equed, float* s,
13407                      lapack_complex_float* b, lapack_int* ldb,
13408                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13409                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
13410                      float* err_bnds_norm, float* err_bnds_comp,
13411                      lapack_int* nparams, float* params,
13412                      lapack_complex_float* work, float* rwork,
13413                      lapack_int *info );
13414 void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
13415                    lapack_int* ipiv, float* b, lapack_int* ldb,
13416                    lapack_int *info );
13417 void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
13418                    lapack_int* ipiv, double* b, lapack_int* ldb,
13419                    lapack_int *info );
13420 void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13421                    lapack_complex_float* ap, lapack_int* ipiv,
13422                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13423 void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13424                    lapack_complex_double* ap, lapack_int* ipiv,
13425                    lapack_complex_double* b, lapack_int* ldb,
13426                    lapack_int *info );
13427 void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13428                     const float* ap, float* afp, lapack_int* ipiv,
13429                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13430                     float* rcond, float* ferr, float* berr, float* work,
13431                     lapack_int* iwork, lapack_int *info );
13432 void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13433                     const double* ap, double* afp, lapack_int* ipiv,
13434                     const double* b, lapack_int* ldb, double* x,
13435                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
13436                     double* work, lapack_int* iwork, lapack_int *info );
13437 void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13438                     const lapack_complex_float* ap, lapack_complex_float* afp,
13439                     lapack_int* ipiv, const lapack_complex_float* b,
13440                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13441                     float* rcond, float* ferr, float* berr,
13442                     lapack_complex_float* work, float* rwork,
13443                     lapack_int *info );
13444 void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13445                     const lapack_complex_double* ap, lapack_complex_double* afp,
13446                     lapack_int* ipiv, const lapack_complex_double* b,
13447                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13448                     double* rcond, double* ferr, double* berr,
13449                     lapack_complex_double* work, double* rwork,
13450                     lapack_int *info );
13451 void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13452                    lapack_complex_float* ap, lapack_int* ipiv,
13453                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
13454 void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
13455                    lapack_complex_double* ap, lapack_int* ipiv,
13456                    lapack_complex_double* b, lapack_int* ldb,
13457                    lapack_int *info );
13458 void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13459                     const lapack_complex_float* ap, lapack_complex_float* afp,
13460                     lapack_int* ipiv, const lapack_complex_float* b,
13461                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13462                     float* rcond, float* ferr, float* berr,
13463                     lapack_complex_float* work, float* rwork,
13464                     lapack_int *info );
13465 void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
13466                     const lapack_complex_double* ap, lapack_complex_double* afp,
13467                     lapack_int* ipiv, const lapack_complex_double* b,
13468                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13469                     double* rcond, double* ferr, double* berr,
13470                     lapack_complex_double* work, double* rwork,
13471                     lapack_int *info );
13472 void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13473                     float* tau, float* work, lapack_int* lwork,
13474                     lapack_int *info );
13475 void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13476                     double* tau, double* work, lapack_int* lwork,
13477                     lapack_int *info );
13478 void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13479                     lapack_int* lda, lapack_complex_float* tau,
13480                     lapack_complex_float* work, lapack_int* lwork,
13481                     lapack_int *info );
13482 void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13483                     lapack_int* lda, lapack_complex_double* tau,
13484                     lapack_complex_double* work, lapack_int* lwork,
13485                     lapack_int *info );
13486 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13487                     lapack_int* jpvt, float* tau, float* work,
13488                     lapack_int *info );
13489 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13490                     lapack_int* jpvt, double* tau, double* work,
13491                     lapack_int *info );
13492 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13493                     lapack_int* lda, lapack_int* jpvt,
13494                     lapack_complex_float* tau, lapack_complex_float* work,
13495                     float* rwork, lapack_int *info );
13496 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13497                     lapack_int* lda, lapack_int* jpvt,
13498                     lapack_complex_double* tau, lapack_complex_double* work,
13499                     double* rwork, lapack_int *info );
13500 void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13501                     lapack_int* jpvt, float* tau, float* work,
13502                     lapack_int* lwork, lapack_int *info );
13503 void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13504                     lapack_int* jpvt, double* tau, double* work,
13505                     lapack_int* lwork, lapack_int *info );
13506 void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13507                     lapack_int* lda, lapack_int* jpvt,
13508                     lapack_complex_float* tau, lapack_complex_float* work,
13509                     lapack_int* lwork, float* rwork, lapack_int *info );
13510 void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13511                     lapack_int* lda, lapack_int* jpvt,
13512                     lapack_complex_double* tau, lapack_complex_double* work,
13513                     lapack_int* lwork, double* rwork, lapack_int *info );
13514 void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13515                     lapack_int* lda, const float* tau, float* work,
13516                     lapack_int* lwork, lapack_int *info );
13517 void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13518                     lapack_int* lda, const double* tau, double* work,
13519                     lapack_int* lwork, lapack_int *info );
13520 void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13521                     lapack_int* k, const float* a, lapack_int* lda,
13522                     const float* tau, float* c, lapack_int* ldc, float* work,
13523                     lapack_int* lwork, lapack_int *info );
13524 void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13525                     lapack_int* k, const double* a, lapack_int* lda,
13526                     const double* tau, double* c, lapack_int* ldc, double* work,
13527                     lapack_int* lwork, lapack_int *info );
13528 void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
13529                     lapack_complex_float* a, lapack_int* lda,
13530                     const lapack_complex_float* tau, lapack_complex_float* work,
13531                     lapack_int* lwork, lapack_int *info );
13532 void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
13533                     lapack_complex_double* a, lapack_int* lda,
13534                     const lapack_complex_double* tau,
13535                     lapack_complex_double* work, lapack_int* lwork,
13536                     lapack_int *info );
13537 void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13538                     lapack_int* k, const lapack_complex_float* a,
13539                     lapack_int* lda, const lapack_complex_float* tau,
13540                     lapack_complex_float* c, lapack_int* ldc,
13541                     lapack_complex_float* work, lapack_int* lwork,
13542                     lapack_int *info );
13543 void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
13544                     lapack_int* k, const lapack_complex_double* a,
13545                     lapack_int* lda, const lapack_complex_double* tau,
13546                     lapack_complex_double* c, lapack_int* ldc,
13547                     lapack_complex_double* work, lapack_int* lwork,
13548                     lapack_int *info );
13549 void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13550                     float* tau, float* work, lapack_int* lwork,
13551                     lapack_int *info );
13552 void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13553                     double* tau, double* work, lapack_int* lwork,
13554                     lapack_int *info );
13555 void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13556                     lapack_int* lda, lapack_complex_float* tau,
13557                     lapack_complex_float* work, lapack_int* lwork,
13558                     lapack_int *info );
13559 void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13560                     lapack_int* lda, lapack_complex_double* tau,
13561                     lapack_complex_double* work, lapack_int* lwork,
13562                     lapack_int *info );
13563 void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13564                     lapack_int* lda, const float* tau, float* work,
13565                     lapack_int* lwork, lapack_int *info );
13566 void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13567                     lapack_int* lda, const double* tau, double* work,
13568                     lapack_int* lwork, lapack_int *info );
13569 void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13570                     lapack_int* k, const float* a, lapack_int* lda,
13571                     const float* tau, float* c, lapack_int* ldc, float* work,
13572                     lapack_int* lwork, lapack_int *info );
13573 void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13574                     lapack_int* k, const double* a, lapack_int* lda,
13575                     const double* tau, double* c, lapack_int* ldc, double* work,
13576                     lapack_int* lwork, lapack_int *info );
13577 void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
13578                     lapack_complex_float* a, lapack_int* lda,
13579                     const lapack_complex_float* tau, lapack_complex_float* work,
13580                     lapack_int* lwork, lapack_int *info );
13581 void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
13582                     lapack_complex_double* a, lapack_int* lda,
13583                     const lapack_complex_double* tau,
13584                     lapack_complex_double* work, lapack_int* lwork,
13585                     lapack_int *info );
13586 void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13587                     lapack_int* k, const lapack_complex_float* a,
13588                     lapack_int* lda, const lapack_complex_float* tau,
13589                     lapack_complex_float* c, lapack_int* ldc,
13590                     lapack_complex_float* work, lapack_int* lwork,
13591                     lapack_int *info );
13592 void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
13593                     lapack_int* k, const lapack_complex_double* a,
13594                     lapack_int* lda, const lapack_complex_double* tau,
13595                     lapack_complex_double* c, lapack_int* ldc,
13596                     lapack_complex_double* work, lapack_int* lwork,
13597                     lapack_int *info );
13598 void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13599                     float* tau, float* work, lapack_int* lwork,
13600                     lapack_int *info );
13601 void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13602                     double* tau, double* work, lapack_int* lwork,
13603                     lapack_int *info );
13604 void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13605                     lapack_int* lda, lapack_complex_float* tau,
13606                     lapack_complex_float* work, lapack_int* lwork,
13607                     lapack_int *info );
13608 void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13609                     lapack_int* lda, lapack_complex_double* tau,
13610                     lapack_complex_double* work, lapack_int* lwork,
13611                     lapack_int *info );
13612 void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13613                     lapack_int* lda, const float* tau, float* work,
13614                     lapack_int* lwork, lapack_int *info );
13615 void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13616                     lapack_int* lda, const double* tau, double* work,
13617                     lapack_int* lwork, lapack_int *info );
13618 void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
13619                     lapack_complex_float* a, lapack_int* lda,
13620                     const lapack_complex_float* tau, lapack_complex_float* work,
13621                     lapack_int* lwork, lapack_int *info );
13622 void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
13623                     lapack_complex_double* a, lapack_int* lda,
13624                     const lapack_complex_double* tau,
13625                     lapack_complex_double* work, lapack_int* lwork,
13626                     lapack_int *info );
13627 void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
13628                     lapack_int* k, const float* a, lapack_int* lda,
13629                     const float* tau, float* c, lapack_int* ldc, float* work,
13630                     lapack_int* lwork, lapack_int *info );
13631 void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
13632                     lapack_int* k, const double* a, lapack_int* lda,
13633                     const double* tau, double* c, lapack_int* ldc, double* work,
13634                     lapack_int* lwork, lapack_int *info );
13635 void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
13636                     lapack_int* k, const lapack_complex_float* a,
13637                     lapack_int* lda, const lapack_complex_float* tau,
13638                     lapack_complex_float* c, lapack_int* ldc,
13639                     lapack_complex_float* work, lapack_int* lwork,
13640                     lapack_int *info );
13641 void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
13642                     lapack_int* k, const lapack_complex_double* a,
13643                     lapack_int* lda, const lapack_complex_double* tau,
13644                     lapack_complex_double* c, lapack_int* ldc,
13645                     lapack_complex_double* work, lapack_int* lwork,
13646                     lapack_int *info );
13647 void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13648                     float* tau, float* work, lapack_int* lwork,
13649                     lapack_int *info );
13650 void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13651                     double* tau, double* work, lapack_int* lwork,
13652                     lapack_int *info );
13653 void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13654                     lapack_int* lda, lapack_complex_float* tau,
13655                     lapack_complex_float* work, lapack_int* lwork,
13656                     lapack_int *info );
13657 void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13658                     lapack_int* lda, lapack_complex_double* tau,
13659                     lapack_complex_double* work, lapack_int* lwork,
13660                     lapack_int *info );
13661 void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
13662                     lapack_int* lda, const float* tau, float* work,
13663                     lapack_int* lwork, lapack_int *info );
13664 void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
13665                     lapack_int* lda, const double* tau, double* work,
13666                     lapack_int* lwork, lapack_int *info );
13667 void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
13668                     lapack_complex_float* a, lapack_int* lda,
13669                     const lapack_complex_float* tau, lapack_complex_float* work,
13670                     lapack_int* lwork, lapack_int *info );
13671 void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
13672                     lapack_complex_double* a, lapack_int* lda,
13673                     const lapack_complex_double* tau,
13674                     lapack_complex_double* work, lapack_int* lwork,
13675                     lapack_int *info );
13676 void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13677                     lapack_int* k, const float* a, lapack_int* lda,
13678                     const float* tau, float* c, lapack_int* ldc, float* work,
13679                     lapack_int* lwork, lapack_int *info );
13680 void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13681                     lapack_int* k, const double* a, lapack_int* lda,
13682                     const double* tau, double* c, lapack_int* ldc, double* work,
13683                     lapack_int* lwork, lapack_int *info );
13684 void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13685                     lapack_int* k, const lapack_complex_float* a,
13686                     lapack_int* lda, const lapack_complex_float* tau,
13687                     lapack_complex_float* c, lapack_int* ldc,
13688                     lapack_complex_float* work, lapack_int* lwork,
13689                     lapack_int *info );
13690 void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
13691                     lapack_int* k, const lapack_complex_double* a,
13692                     lapack_int* lda, const lapack_complex_double* tau,
13693                     lapack_complex_double* c, lapack_int* ldc,
13694                     lapack_complex_double* work, lapack_int* lwork,
13695                     lapack_int *info );
13696 void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13697                     float* tau, float* work, lapack_int* lwork,
13698                     lapack_int *info );
13699 void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13700                     double* tau, double* work, lapack_int* lwork,
13701                     lapack_int *info );
13702 void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13703                     lapack_int* lda, lapack_complex_float* tau,
13704                     lapack_complex_float* work, lapack_int* lwork,
13705                     lapack_int *info );
13706 void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13707                     lapack_int* lda, lapack_complex_double* tau,
13708                     lapack_complex_double* work, lapack_int* lwork,
13709                     lapack_int *info );
13710 void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13711                     lapack_int* k, lapack_int* l, const float* a,
13712                     lapack_int* lda, const float* tau, float* c,
13713                     lapack_int* ldc, float* work, lapack_int* lwork,
13714                     lapack_int *info );
13715 void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13716                     lapack_int* k, lapack_int* l, const double* a,
13717                     lapack_int* lda, const double* tau, double* c,
13718                     lapack_int* ldc, double* work, lapack_int* lwork,
13719                     lapack_int *info );
13720 void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13721                     lapack_int* k, lapack_int* l, const lapack_complex_float* a,
13722                     lapack_int* lda, const lapack_complex_float* tau,
13723                     lapack_complex_float* c, lapack_int* ldc,
13724                     lapack_complex_float* work, lapack_int* lwork,
13725                     lapack_int *info );
13726 void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
13727                     lapack_int* k, lapack_int* l,
13728                     const lapack_complex_double* a, lapack_int* lda,
13729                     const lapack_complex_double* tau, lapack_complex_double* c,
13730                     lapack_int* ldc, lapack_complex_double* work,
13731                     lapack_int* lwork, lapack_int *info );
13732 void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
13733                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
13734                     float* taub, float* work, lapack_int* lwork,
13735                     lapack_int *info );
13736 void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
13737                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
13738                     double* taub, double* work, lapack_int* lwork,
13739                     lapack_int *info );
13740 void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
13741                     lapack_complex_float* a, lapack_int* lda,
13742                     lapack_complex_float* taua, lapack_complex_float* b,
13743                     lapack_int* ldb, lapack_complex_float* taub,
13744                     lapack_complex_float* work, lapack_int* lwork,
13745                     lapack_int *info );
13746 void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
13747                     lapack_complex_double* a, lapack_int* lda,
13748                     lapack_complex_double* taua, lapack_complex_double* b,
13749                     lapack_int* ldb, lapack_complex_double* taub,
13750                     lapack_complex_double* work, lapack_int* lwork,
13751                     lapack_int *info );
13752 void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
13753                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
13754                     float* taub, float* work, lapack_int* lwork,
13755                     lapack_int *info );
13756 void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
13757                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
13758                     double* taub, double* work, lapack_int* lwork,
13759                     lapack_int *info );
13760 void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
13761                     lapack_complex_float* a, lapack_int* lda,
13762                     lapack_complex_float* taua, lapack_complex_float* b,
13763                     lapack_int* ldb, lapack_complex_float* taub,
13764                     lapack_complex_float* work, lapack_int* lwork,
13765                     lapack_int *info );
13766 void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
13767                     lapack_complex_double* a, lapack_int* lda,
13768                     lapack_complex_double* taua, lapack_complex_double* b,
13769                     lapack_int* ldb, lapack_complex_double* taub,
13770                     lapack_complex_double* work, lapack_int* lwork,
13771                     lapack_int *info );
13772 void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13773                     float* d, float* e, float* tauq, float* taup, float* work,
13774                     lapack_int* lwork, lapack_int *info );
13775 void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13776                     double* d, double* e, double* tauq, double* taup,
13777                     double* work, lapack_int* lwork, lapack_int *info );
13778 void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13779                     lapack_int* lda, float* d, float* e,
13780                     lapack_complex_float* tauq, lapack_complex_float* taup,
13781                     lapack_complex_float* work, lapack_int* lwork,
13782                     lapack_int *info );
13783 void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13784                     lapack_int* lda, double* d, double* e,
13785                     lapack_complex_double* tauq, lapack_complex_double* taup,
13786                     lapack_complex_double* work, lapack_int* lwork,
13787                     lapack_int *info );
13788 void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13789                     lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
13790                     float* d, float* e, float* q, lapack_int* ldq, float* pt,
13791                     lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
13792                     lapack_int *info );
13793 void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13794                     lapack_int* kl, lapack_int* ku, double* ab,
13795                     lapack_int* ldab, double* d, double* e, double* q,
13796                     lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
13797                     lapack_int* ldc, double* work, lapack_int *info );
13798 void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13799                     lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
13800                     lapack_int* ldab, float* d, float* e,
13801                     lapack_complex_float* q, lapack_int* ldq,
13802                     lapack_complex_float* pt, lapack_int* ldpt,
13803                     lapack_complex_float* c, lapack_int* ldc,
13804                     lapack_complex_float* work, float* rwork,
13805                     lapack_int *info );
13806 void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
13807                     lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
13808                     lapack_int* ldab, double* d, double* e,
13809                     lapack_complex_double* q, lapack_int* ldq,
13810                     lapack_complex_double* pt, lapack_int* ldpt,
13811                     lapack_complex_double* c, lapack_int* ldc,
13812                     lapack_complex_double* work, double* rwork,
13813                     lapack_int *info );
13814 void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13815                     float* a, lapack_int* lda, const float* tau, float* work,
13816                     lapack_int* lwork, lapack_int *info );
13817 void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13818                     double* a, lapack_int* lda, const double* tau, double* work,
13819                     lapack_int* lwork, lapack_int *info );
13820 void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
13821                     lapack_int* n, lapack_int* k, const float* a,
13822                     lapack_int* lda, const float* tau, float* c,
13823                     lapack_int* ldc, float* work, lapack_int* lwork,
13824                     lapack_int *info );
13825 void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
13826                     lapack_int* n, lapack_int* k, const double* a,
13827                     lapack_int* lda, const double* tau, double* c,
13828                     lapack_int* ldc, double* work, lapack_int* lwork,
13829                     lapack_int *info );
13830 void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13831                     lapack_complex_float* a, lapack_int* lda,
13832                     const lapack_complex_float* tau, lapack_complex_float* work,
13833                     lapack_int* lwork, lapack_int *info );
13834 void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
13835                     lapack_complex_double* a, lapack_int* lda,
13836                     const lapack_complex_double* tau,
13837                     lapack_complex_double* work, lapack_int* lwork,
13838                     lapack_int *info );
13839 void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
13840                     lapack_int* n, lapack_int* k, const lapack_complex_float* a,
13841                     lapack_int* lda, const lapack_complex_float* tau,
13842                     lapack_complex_float* c, lapack_int* ldc,
13843                     lapack_complex_float* work, lapack_int* lwork,
13844                     lapack_int *info );
13845 void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
13846                     lapack_int* n, lapack_int* k,
13847                     const lapack_complex_double* a, lapack_int* lda,
13848                     const lapack_complex_double* tau, lapack_complex_double* c,
13849                     lapack_int* ldc, lapack_complex_double* work,
13850                     lapack_int* lwork, lapack_int *info );
13851 void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13852                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
13853                     float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
13854                     float* c, lapack_int* ldc, float* work, lapack_int *info );
13855 void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13856                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
13857                     double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
13858                     double* c, lapack_int* ldc, double* work,
13859                     lapack_int *info );
13860 void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13861                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
13862                     lapack_complex_float* vt, lapack_int* ldvt,
13863                     lapack_complex_float* u, lapack_int* ldu,
13864                     lapack_complex_float* c, lapack_int* ldc, float* work,
13865                     lapack_int *info );
13866 void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
13867                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
13868                     lapack_complex_double* vt, lapack_int* ldvt,
13869                     lapack_complex_double* u, lapack_int* ldu,
13870                     lapack_complex_double* c, lapack_int* ldc, double* work,
13871                     lapack_int *info );
13872 void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
13873                     float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
13874                     float* q, lapack_int* iq, float* work, lapack_int* iwork,
13875                     lapack_int *info );
13876 void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
13877                     double* e, double* u, lapack_int* ldu, double* vt,
13878                     lapack_int* ldvt, double* q, lapack_int* iq, double* work,
13879                     lapack_int* iwork, lapack_int *info );
13880 void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13881                     float* d, float* e, float* tau, float* work,
13882                     lapack_int* lwork, lapack_int *info );
13883 void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13884                     double* d, double* e, double* tau, double* work,
13885                     lapack_int* lwork, lapack_int *info );
13886 void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13887                     const float* tau, float* work, lapack_int* lwork,
13888                     lapack_int *info );
13889 void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13890                     const double* tau, double* work, lapack_int* lwork,
13891                     lapack_int *info );
13892 void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
13893                     lapack_int* n, const float* a, lapack_int* lda,
13894                     const float* tau, float* c, lapack_int* ldc, float* work,
13895                     lapack_int* lwork, lapack_int *info );
13896 void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
13897                     lapack_int* n, const double* a, lapack_int* lda,
13898                     const double* tau, double* c, lapack_int* ldc, double* work,
13899                     lapack_int* lwork, lapack_int *info );
13900 void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
13901                     lapack_int* lda, float* d, float* e,
13902                     lapack_complex_float* tau, lapack_complex_float* work,
13903                     lapack_int* lwork, lapack_int *info );
13904 void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
13905                     lapack_int* lda, double* d, double* e,
13906                     lapack_complex_double* tau, lapack_complex_double* work,
13907                     lapack_int* lwork, lapack_int *info );
13908 void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
13909                     lapack_int* lda, const lapack_complex_float* tau,
13910                     lapack_complex_float* work, lapack_int* lwork,
13911                     lapack_int *info );
13912 void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
13913                     lapack_int* lda, const lapack_complex_double* tau,
13914                     lapack_complex_double* work, lapack_int* lwork,
13915                     lapack_int *info );
13916 void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
13917                     lapack_int* n, const lapack_complex_float* a,
13918                     lapack_int* lda, const lapack_complex_float* tau,
13919                     lapack_complex_float* c, lapack_int* ldc,
13920                     lapack_complex_float* work, lapack_int* lwork,
13921                     lapack_int *info );
13922 void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
13923                     lapack_int* n, const lapack_complex_double* a,
13924                     lapack_int* lda, const lapack_complex_double* tau,
13925                     lapack_complex_double* c, lapack_int* ldc,
13926                     lapack_complex_double* work, lapack_int* lwork,
13927                     lapack_int *info );
13928 void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
13929                     float* tau, lapack_int *info );
13930 void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
13931                     double* tau, lapack_int *info );
13932 void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
13933                     const float* tau, float* q, lapack_int* ldq, float* work,
13934                     lapack_int *info );
13935 void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
13936                     const double* tau, double* q, lapack_int* ldq, double* work,
13937                     lapack_int *info );
13938 void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
13939                     lapack_int* n, const float* ap, const float* tau, float* c,
13940                     lapack_int* ldc, float* work, lapack_int *info );
13941 void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
13942                     lapack_int* n, const double* ap, const double* tau,
13943                     double* c, lapack_int* ldc, double* work,
13944                     lapack_int *info );
13945 void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
13946                     float* d, float* e, lapack_complex_float* tau,
13947                     lapack_int *info );
13948 void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
13949                     double* d, double* e, lapack_complex_double* tau,
13950                     lapack_int *info );
13951 void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
13952                     const lapack_complex_float* tau, lapack_complex_float* q,
13953                     lapack_int* ldq, lapack_complex_float* work,
13954                     lapack_int *info );
13955 void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
13956                     const lapack_complex_double* tau, lapack_complex_double* q,
13957                     lapack_int* ldq, lapack_complex_double* work,
13958                     lapack_int *info );
13959 void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
13960                     lapack_int* n, const lapack_complex_float* ap,
13961                     const lapack_complex_float* tau, lapack_complex_float* c,
13962                     lapack_int* ldc, lapack_complex_float* work,
13963                     lapack_int *info );
13964 void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
13965                     lapack_int* n, const lapack_complex_double* ap,
13966                     const lapack_complex_double* tau, lapack_complex_double* c,
13967                     lapack_int* ldc, lapack_complex_double* work,
13968                     lapack_int *info );
13969 void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13970                     float* ab, lapack_int* ldab, float* d, float* e, float* q,
13971                     lapack_int* ldq, float* work, lapack_int *info );
13972 void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13973                     double* ab, lapack_int* ldab, double* d, double* e,
13974                     double* q, lapack_int* ldq, double* work,
13975                     lapack_int *info );
13976 void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13977                     lapack_complex_float* ab, lapack_int* ldab, float* d,
13978                     float* e, lapack_complex_float* q, lapack_int* ldq,
13979                     lapack_complex_float* work, lapack_int *info );
13980 void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
13981                     lapack_complex_double* ab, lapack_int* ldab, double* d,
13982                     double* e, lapack_complex_double* q, lapack_int* ldq,
13983                     lapack_complex_double* work, lapack_int *info );
13984 void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
13985 void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
13986 void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
13987                     lapack_int* ldz, float* work, lapack_int *info );
13988 void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
13989                     lapack_int* ldz, double* work, lapack_int *info );
13990 void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
13991                     lapack_complex_float* z, lapack_int* ldz, float* work,
13992                     lapack_int *info );
13993 void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
13994                     lapack_complex_double* z, lapack_int* ldz, double* work,
13995                     lapack_int *info );
13996 void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
13997                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
13998                     lapack_int* m, float* w, float* z, lapack_int* ldz,
13999                     lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
14000                     float* work, lapack_int* lwork, lapack_int* iwork,
14001                     lapack_int* liwork, lapack_int *info );
14002 void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
14003                     double* e, double* vl, double* vu, lapack_int* il,
14004                     lapack_int* iu, lapack_int* m, double* w, double* z,
14005                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
14006                     lapack_logical* tryrac, double* work, lapack_int* lwork,
14007                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14008 void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14009                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
14010                     lapack_int* m, float* w, lapack_complex_float* z,
14011                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
14012                     lapack_logical* tryrac, float* work, lapack_int* lwork,
14013                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14014 void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
14015                     double* e, double* vl, double* vu, lapack_int* il,
14016                     lapack_int* iu, lapack_int* m, double* w,
14017                     lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
14018                     lapack_int* isuppz, lapack_logical* tryrac, double* work,
14019                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14020                     lapack_int *info );
14021 void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
14022                     lapack_int* ldz, float* work, lapack_int* lwork,
14023                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14024 void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
14025                     lapack_int* ldz, double* work, lapack_int* lwork,
14026                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14027 void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
14028                     lapack_complex_float* z, lapack_int* ldz,
14029                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14030                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14031                     lapack_int *info );
14032 void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
14033                     lapack_complex_double* z, lapack_int* ldz,
14034                     lapack_complex_double* work, lapack_int* lwork,
14035                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
14036                     lapack_int* liwork, lapack_int *info );
14037 void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14038                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
14039                     float* abstol, lapack_int* m, float* w, float* z,
14040                     lapack_int* ldz, lapack_int* isuppz, float* work,
14041                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14042                     lapack_int *info );
14043 void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
14044                     double* e, double* vl, double* vu, lapack_int* il,
14045                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
14046                     double* z, lapack_int* ldz, lapack_int* isuppz,
14047                     double* work, lapack_int* lwork, lapack_int* iwork,
14048                     lapack_int* liwork, lapack_int *info );
14049 void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
14050                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
14051                     float* abstol, lapack_int* m, float* w,
14052                     lapack_complex_float* z, lapack_int* ldz,
14053                     lapack_int* isuppz, float* work, lapack_int* lwork,
14054                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14055 void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
14056                     double* e, double* vl, double* vu, lapack_int* il,
14057                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
14058                     lapack_complex_double* z, lapack_int* ldz,
14059                     lapack_int* isuppz, double* work, lapack_int* lwork,
14060                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14061 void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
14062                     lapack_int* ldz, float* work, lapack_int *info );
14063 void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
14064                     lapack_int* ldz, double* work, lapack_int *info );
14065 void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
14066                     lapack_complex_float* z, lapack_int* ldz, float* work,
14067                     lapack_int *info );
14068 void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
14069                     lapack_complex_double* z, lapack_int* ldz, double* work,
14070                     lapack_int *info );
14071 void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
14072                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14073                     const float* d, const float* e, lapack_int* m,
14074                     lapack_int* nsplit, float* w, lapack_int* iblock,
14075                     lapack_int* isplit, float* work, lapack_int* iwork,
14076                     lapack_int *info );
14077 void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
14078                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14079                     const double* d, const double* e, lapack_int* m,
14080                     lapack_int* nsplit, double* w, lapack_int* iblock,
14081                     lapack_int* isplit, double* work, lapack_int* iwork,
14082                     lapack_int *info );
14083 void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
14084                     lapack_int* m, const float* w, const lapack_int* iblock,
14085                     const lapack_int* isplit, float* z, lapack_int* ldz,
14086                     float* work, lapack_int* iwork, lapack_int* ifailv,
14087                     lapack_int *info );
14088 void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
14089                     lapack_int* m, const double* w, const lapack_int* iblock,
14090                     const lapack_int* isplit, double* z, lapack_int* ldz,
14091                     double* work, lapack_int* iwork, lapack_int* ifailv,
14092                     lapack_int *info );
14093 void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
14094                     lapack_int* m, const float* w, const lapack_int* iblock,
14095                     const lapack_int* isplit, lapack_complex_float* z,
14096                     lapack_int* ldz, float* work, lapack_int* iwork,
14097                     lapack_int* ifailv, lapack_int *info );
14098 void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
14099                     lapack_int* m, const double* w, const lapack_int* iblock,
14100                     const lapack_int* isplit, lapack_complex_double* z,
14101                     lapack_int* ldz, double* work, lapack_int* iwork,
14102                     lapack_int* ifailv, lapack_int *info );
14103 void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
14104                     float* sep, lapack_int *info );
14105 void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
14106                     double* sep, lapack_int *info );
14107 void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
14108                     lapack_int* lda, const float* b, lapack_int* ldb,
14109                     lapack_int *info );
14110 void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
14111                     lapack_int* lda, const double* b, lapack_int* ldb,
14112                     lapack_int *info );
14113 void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
14114                     lapack_complex_float* a, lapack_int* lda,
14115                     const lapack_complex_float* b, lapack_int* ldb,
14116                     lapack_int *info );
14117 void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
14118                     lapack_complex_double* a, lapack_int* lda,
14119                     const lapack_complex_double* b, lapack_int* ldb,
14120                     lapack_int *info );
14121 void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
14122                     const float* bp, lapack_int *info );
14123 void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
14124                     const double* bp, lapack_int *info );
14125 void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
14126                     lapack_complex_float* ap, const lapack_complex_float* bp,
14127                     lapack_int *info );
14128 void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
14129                     lapack_complex_double* ap, const lapack_complex_double* bp,
14130                     lapack_int *info );
14131 void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14132                     lapack_int* kb, float* ab, lapack_int* ldab,
14133                     const float* bb, lapack_int* ldbb, float* x,
14134                     lapack_int* ldx, float* work, lapack_int *info );
14135 void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14136                     lapack_int* kb, double* ab, lapack_int* ldab,
14137                     const double* bb, lapack_int* ldbb, double* x,
14138                     lapack_int* ldx, double* work, lapack_int *info );
14139 void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14140                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
14141                     const lapack_complex_float* bb, lapack_int* ldbb,
14142                     lapack_complex_float* x, lapack_int* ldx,
14143                     lapack_complex_float* work, float* rwork,
14144                     lapack_int *info );
14145 void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
14146                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
14147                     const lapack_complex_double* bb, lapack_int* ldbb,
14148                     lapack_complex_double* x, lapack_int* ldx,
14149                     lapack_complex_double* work, double* rwork,
14150                     lapack_int *info );
14151 void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
14152                     lapack_int* ldbb, lapack_int *info );
14153 void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
14154                     lapack_int* ldbb, lapack_int *info );
14155 void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
14156                     lapack_complex_float* bb, lapack_int* ldbb,
14157                     lapack_int *info );
14158 void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
14159                     lapack_complex_double* bb, lapack_int* ldbb,
14160                     lapack_int *info );
14161 void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
14162                     lapack_int* lda, float* tau, float* work, lapack_int* lwork,
14163                     lapack_int *info );
14164 void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
14165                     lapack_int* lda, double* tau, double* work,
14166                     lapack_int* lwork, lapack_int *info );
14167 void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14168                     lapack_complex_float* a, lapack_int* lda,
14169                     lapack_complex_float* tau, lapack_complex_float* work,
14170                     lapack_int* lwork, lapack_int *info );
14171 void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14172                     lapack_complex_double* a, lapack_int* lda,
14173                     lapack_complex_double* tau, lapack_complex_double* work,
14174                     lapack_int* lwork, lapack_int *info );
14175 void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
14176                     lapack_int* lda, const float* tau, float* work,
14177                     lapack_int* lwork, lapack_int *info );
14178 void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
14179                     lapack_int* lda, const double* tau, double* work,
14180                     lapack_int* lwork, lapack_int *info );
14181 void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14182                     lapack_int* ilo, lapack_int* ihi, const float* a,
14183                     lapack_int* lda, const float* tau, float* c,
14184                     lapack_int* ldc, float* work, lapack_int* lwork,
14185                     lapack_int *info );
14186 void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14187                     lapack_int* ilo, lapack_int* ihi, const double* a,
14188                     lapack_int* lda, const double* tau, double* c,
14189                     lapack_int* ldc, double* work, lapack_int* lwork,
14190                     lapack_int *info );
14191 void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14192                     lapack_complex_float* a, lapack_int* lda,
14193                     const lapack_complex_float* tau, lapack_complex_float* work,
14194                     lapack_int* lwork, lapack_int *info );
14195 void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
14196                     lapack_complex_double* a, lapack_int* lda,
14197                     const lapack_complex_double* tau,
14198                     lapack_complex_double* work, lapack_int* lwork,
14199                     lapack_int *info );
14200 void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14201                     lapack_int* ilo, lapack_int* ihi,
14202                     const lapack_complex_float* a, lapack_int* lda,
14203                     const lapack_complex_float* tau, lapack_complex_float* c,
14204                     lapack_int* ldc, lapack_complex_float* work,
14205                     lapack_int* lwork, lapack_int *info );
14206 void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
14207                     lapack_int* ilo, lapack_int* ihi,
14208                     const lapack_complex_double* a, lapack_int* lda,
14209                     const lapack_complex_double* tau, lapack_complex_double* c,
14210                     lapack_int* ldc, lapack_complex_double* work,
14211                     lapack_int* lwork, lapack_int *info );
14212 void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
14213                     lapack_int* ilo, lapack_int* ihi, float* scale,
14214                     lapack_int *info );
14215 void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
14216                     lapack_int* ilo, lapack_int* ihi, double* scale,
14217                     lapack_int *info );
14218 void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
14219                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
14220                     float* scale, lapack_int *info );
14221 void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
14222                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
14223                     double* scale, lapack_int *info );
14224 void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14225                     lapack_int* ihi, const float* scale, lapack_int* m,
14226                     float* v, lapack_int* ldv, lapack_int *info );
14227 void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14228                     lapack_int* ihi, const double* scale, lapack_int* m,
14229                     double* v, lapack_int* ldv, lapack_int *info );
14230 void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14231                     lapack_int* ihi, const float* scale, lapack_int* m,
14232                     lapack_complex_float* v, lapack_int* ldv,
14233                     lapack_int *info );
14234 void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14235                     lapack_int* ihi, const double* scale, lapack_int* m,
14236                     lapack_complex_double* v, lapack_int* ldv,
14237                     lapack_int *info );
14238 void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14239                     lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
14240                     float* wi, float* z, lapack_int* ldz, float* work,
14241                     lapack_int* lwork, lapack_int *info );
14242 void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14243                     lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
14244                     double* wi, double* z, lapack_int* ldz, double* work,
14245                     lapack_int* lwork, lapack_int *info );
14246 void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14247                     lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
14248                     lapack_complex_float* w, lapack_complex_float* z,
14249                     lapack_int* ldz, lapack_complex_float* work,
14250                     lapack_int* lwork, lapack_int *info );
14251 void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
14252                     lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
14253                     lapack_complex_double* w, lapack_complex_double* z,
14254                     lapack_int* ldz, lapack_complex_double* work,
14255                     lapack_int* lwork, lapack_int *info );
14256 void LAPACK_shsein( char* job, char* eigsrc, char* initv,
14257                     lapack_logical* select, lapack_int* n, const float* h,
14258                     lapack_int* ldh, float* wr, const float* wi, float* vl,
14259                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
14260                     lapack_int* mm, lapack_int* m, float* work,
14261                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14262 void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
14263                     lapack_logical* select, lapack_int* n, const double* h,
14264                     lapack_int* ldh, double* wr, const double* wi, double* vl,
14265                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
14266                     lapack_int* mm, lapack_int* m, double* work,
14267                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14268 void LAPACK_chsein( char* job, char* eigsrc, char* initv,
14269                     const lapack_logical* select, lapack_int* n,
14270                     const lapack_complex_float* h, lapack_int* ldh,
14271                     lapack_complex_float* w, lapack_complex_float* vl,
14272                     lapack_int* ldvl, lapack_complex_float* vr,
14273                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14274                     lapack_complex_float* work, float* rwork,
14275                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14276 void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
14277                     const lapack_logical* select, lapack_int* n,
14278                     const lapack_complex_double* h, lapack_int* ldh,
14279                     lapack_complex_double* w, lapack_complex_double* vl,
14280                     lapack_int* ldvl, lapack_complex_double* vr,
14281                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14282                     lapack_complex_double* work, double* rwork,
14283                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
14284 void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
14285                     lapack_int* n, const float* t, lapack_int* ldt, float* vl,
14286                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
14287                     lapack_int* mm, lapack_int* m, float* work,
14288                     lapack_int *info );
14289 void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
14290                     lapack_int* n, const double* t, lapack_int* ldt, double* vl,
14291                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
14292                     lapack_int* mm, lapack_int* m, double* work,
14293                     lapack_int *info );
14294 void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
14295                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
14296                     lapack_complex_float* vl, lapack_int* ldvl,
14297                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
14298                     lapack_int* m, lapack_complex_float* work, float* rwork,
14299                     lapack_int *info );
14300 void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
14301                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
14302                     lapack_complex_double* vl, lapack_int* ldvl,
14303                     lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
14304                     lapack_int* m, lapack_complex_double* work, double* rwork,
14305                     lapack_int *info );
14306 void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
14307                     lapack_int* n, const float* t, lapack_int* ldt,
14308                     const float* vl, lapack_int* ldvl, const float* vr,
14309                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
14310                     lapack_int* m, float* work, lapack_int* ldwork,
14311                     lapack_int* iwork, lapack_int *info );
14312 void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
14313                     lapack_int* n, const double* t, lapack_int* ldt,
14314                     const double* vl, lapack_int* ldvl, const double* vr,
14315                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
14316                     lapack_int* m, double* work, lapack_int* ldwork,
14317                     lapack_int* iwork, lapack_int *info );
14318 void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
14319                     lapack_int* n, const lapack_complex_float* t,
14320                     lapack_int* ldt, const lapack_complex_float* vl,
14321                     lapack_int* ldvl, const lapack_complex_float* vr,
14322                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
14323                     lapack_int* m, lapack_complex_float* work,
14324                     lapack_int* ldwork, float* rwork, lapack_int *info );
14325 void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
14326                     lapack_int* n, const lapack_complex_double* t,
14327                     lapack_int* ldt, const lapack_complex_double* vl,
14328                     lapack_int* ldvl, const lapack_complex_double* vr,
14329                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
14330                     lapack_int* m, lapack_complex_double* work,
14331                     lapack_int* ldwork, double* rwork, lapack_int *info );
14332 void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
14333                     float* q, lapack_int* ldq, lapack_int* ifst,
14334                     lapack_int* ilst, float* work, lapack_int *info );
14335 void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
14336                     double* q, lapack_int* ldq, lapack_int* ifst,
14337                     lapack_int* ilst, double* work, lapack_int *info );
14338 void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
14339                     lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
14340                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
14341 void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
14342                     lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
14343                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
14344 void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
14345                     lapack_int* n, float* t, lapack_int* ldt, float* q,
14346                     lapack_int* ldq, float* wr, float* wi, lapack_int* m,
14347                     float* s, float* sep, float* work, lapack_int* lwork,
14348                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14349 void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
14350                     lapack_int* n, double* t, lapack_int* ldt, double* q,
14351                     lapack_int* ldq, double* wr, double* wi, lapack_int* m,
14352                     double* s, double* sep, double* work, lapack_int* lwork,
14353                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14354 void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
14355                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
14356                     lapack_complex_float* q, lapack_int* ldq,
14357                     lapack_complex_float* w, lapack_int* m, float* s,
14358                     float* sep, lapack_complex_float* work, lapack_int* lwork,
14359                     lapack_int *info );
14360 void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
14361                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
14362                     lapack_complex_double* q, lapack_int* ldq,
14363                     lapack_complex_double* w, lapack_int* m, double* s,
14364                     double* sep, lapack_complex_double* work, lapack_int* lwork,
14365                     lapack_int *info );
14366 void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14367                     lapack_int* n, const float* a, lapack_int* lda,
14368                     const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
14369                     float* scale, lapack_int *info );
14370 void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14371                     lapack_int* n, const double* a, lapack_int* lda,
14372                     const double* b, lapack_int* ldb, double* c,
14373                     lapack_int* ldc, double* scale, lapack_int *info );
14374 void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14375                     lapack_int* n, const lapack_complex_float* a,
14376                     lapack_int* lda, const lapack_complex_float* b,
14377                     lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
14378                     float* scale, lapack_int *info );
14379 void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
14380                     lapack_int* n, const lapack_complex_double* a,
14381                     lapack_int* lda, const lapack_complex_double* b,
14382                     lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
14383                     double* scale, lapack_int *info );
14384 void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14385                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
14386                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
14387                     lapack_int* ldz, lapack_int *info );
14388 void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14389                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
14390                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
14391                     lapack_int* ldz, lapack_int *info );
14392 void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14393                     lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
14394                     lapack_complex_float* b, lapack_int* ldb,
14395                     lapack_complex_float* q, lapack_int* ldq,
14396                     lapack_complex_float* z, lapack_int* ldz,
14397                     lapack_int *info );
14398 void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
14399                     lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
14400                     lapack_complex_double* b, lapack_int* ldb,
14401                     lapack_complex_double* q, lapack_int* ldq,
14402                     lapack_complex_double* z, lapack_int* ldz,
14403                     lapack_int *info );
14404 void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
14405                     float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
14406                     float* lscale, float* rscale, float* work,
14407                     lapack_int *info );
14408 void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
14409                     double* b, lapack_int* ldb, lapack_int* ilo,
14410                     lapack_int* ihi, double* lscale, double* rscale,
14411                     double* work, lapack_int *info );
14412 void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
14413                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14414                     lapack_int* ilo, lapack_int* ihi, float* lscale,
14415                     float* rscale, float* work, lapack_int *info );
14416 void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
14417                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14418                     lapack_int* ilo, lapack_int* ihi, double* lscale,
14419                     double* rscale, double* work, lapack_int *info );
14420 void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14421                     lapack_int* ihi, const float* lscale, const float* rscale,
14422                     lapack_int* m, float* v, lapack_int* ldv,
14423                     lapack_int *info );
14424 void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14425                     lapack_int* ihi, const double* lscale, const double* rscale,
14426                     lapack_int* m, double* v, lapack_int* ldv,
14427                     lapack_int *info );
14428 void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14429                     lapack_int* ihi, const float* lscale, const float* rscale,
14430                     lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
14431                     lapack_int *info );
14432 void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
14433                     lapack_int* ihi, const double* lscale, const double* rscale,
14434                     lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
14435                     lapack_int *info );
14436 void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
14437                     lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
14438                     float* t, lapack_int* ldt, float* alphar, float* alphai,
14439                     float* beta, float* q, lapack_int* ldq, float* z,
14440                     lapack_int* ldz, float* work, lapack_int* lwork,
14441                     lapack_int *info );
14442 void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
14443                     lapack_int* ilo, lapack_int* ihi, double* h,
14444                     lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
14445                     double* alphai, double* beta, double* q, lapack_int* ldq,
14446                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
14447                     lapack_int *info );
14448 void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
14449                     lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
14450                     lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
14451                     lapack_complex_float* alpha, lapack_complex_float* beta,
14452                     lapack_complex_float* q, lapack_int* ldq,
14453                     lapack_complex_float* z, lapack_int* ldz,
14454                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14455                     lapack_int *info );
14456 void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
14457                     lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
14458                     lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
14459                     lapack_complex_double* alpha, lapack_complex_double* beta,
14460                     lapack_complex_double* q, lapack_int* ldq,
14461                     lapack_complex_double* z, lapack_int* ldz,
14462                     lapack_complex_double* work, lapack_int* lwork,
14463                     double* rwork, lapack_int *info );
14464 void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
14465                     lapack_int* n, const float* s, lapack_int* lds,
14466                     const float* p, lapack_int* ldp, float* vl,
14467                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
14468                     lapack_int* mm, lapack_int* m, float* work,
14469                     lapack_int *info );
14470 void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
14471                     lapack_int* n, const double* s, lapack_int* lds,
14472                     const double* p, lapack_int* ldp, double* vl,
14473                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
14474                     lapack_int* mm, lapack_int* m, double* work,
14475                     lapack_int *info );
14476 void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
14477                     lapack_int* n, const lapack_complex_float* s,
14478                     lapack_int* lds, const lapack_complex_float* p,
14479                     lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
14480                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
14481                     lapack_int* m, lapack_complex_float* work, float* rwork,
14482                     lapack_int *info );
14483 void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
14484                     lapack_int* n, const lapack_complex_double* s,
14485                     lapack_int* lds, const lapack_complex_double* p,
14486                     lapack_int* ldp, lapack_complex_double* vl,
14487                     lapack_int* ldvl, lapack_complex_double* vr,
14488                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
14489                     lapack_complex_double* work, double* rwork,
14490                     lapack_int *info );
14491 void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14492                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
14493                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
14494                     lapack_int* ifst, lapack_int* ilst, float* work,
14495                     lapack_int* lwork, lapack_int *info );
14496 void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14497                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
14498                     double* q, lapack_int* ldq, double* z, lapack_int* ldz,
14499                     lapack_int* ifst, lapack_int* ilst, double* work,
14500                     lapack_int* lwork, lapack_int *info );
14501 void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14502                     lapack_complex_float* a, lapack_int* lda,
14503                     lapack_complex_float* b, lapack_int* ldb,
14504                     lapack_complex_float* q, lapack_int* ldq,
14505                     lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
14506                     lapack_int* ilst, lapack_int *info );
14507 void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
14508                     lapack_complex_double* a, lapack_int* lda,
14509                     lapack_complex_double* b, lapack_int* ldb,
14510                     lapack_complex_double* q, lapack_int* ldq,
14511                     lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
14512                     lapack_int* ilst, lapack_int *info );
14513 void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
14514                     lapack_logical* wantz, const lapack_logical* select,
14515                     lapack_int* n, float* a, lapack_int* lda, float* b,
14516                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
14517                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
14518                     lapack_int* m, float* pl, float* pr, float* dif,
14519                     float* work, lapack_int* lwork, lapack_int* iwork,
14520                     lapack_int* liwork, lapack_int *info );
14521 void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
14522                     lapack_logical* wantz, const lapack_logical* select,
14523                     lapack_int* n, double* a, lapack_int* lda, double* b,
14524                     lapack_int* ldb, double* alphar, double* alphai,
14525                     double* beta, double* q, lapack_int* ldq, double* z,
14526                     lapack_int* ldz, lapack_int* m, double* pl, double* pr,
14527                     double* dif, double* work, lapack_int* lwork,
14528                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14529 void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
14530                     lapack_logical* wantz, const lapack_logical* select,
14531                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
14532                     lapack_complex_float* b, lapack_int* ldb,
14533                     lapack_complex_float* alpha, lapack_complex_float* beta,
14534                     lapack_complex_float* q, lapack_int* ldq,
14535                     lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
14536                     float* pl, float* pr, float* dif,
14537                     lapack_complex_float* work, lapack_int* lwork,
14538                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14539 void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
14540                     lapack_logical* wantz, const lapack_logical* select,
14541                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
14542                     lapack_complex_double* b, lapack_int* ldb,
14543                     lapack_complex_double* alpha, lapack_complex_double* beta,
14544                     lapack_complex_double* q, lapack_int* ldq,
14545                     lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
14546                     double* pl, double* pr, double* dif,
14547                     lapack_complex_double* work, lapack_int* lwork,
14548                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14549 void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14550                     const float* a, lapack_int* lda, const float* b,
14551                     lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
14552                     lapack_int* ldd, const float* e, lapack_int* lde, float* f,
14553                     lapack_int* ldf, float* scale, float* dif, float* work,
14554                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14555 void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14556                     const double* a, lapack_int* lda, const double* b,
14557                     lapack_int* ldb, double* c, lapack_int* ldc,
14558                     const double* d, lapack_int* ldd, const double* e,
14559                     lapack_int* lde, double* f, lapack_int* ldf, double* scale,
14560                     double* dif, double* work, lapack_int* lwork,
14561                     lapack_int* iwork, lapack_int *info );
14562 void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14563                     const lapack_complex_float* a, lapack_int* lda,
14564                     const lapack_complex_float* b, lapack_int* ldb,
14565                     lapack_complex_float* c, lapack_int* ldc,
14566                     const lapack_complex_float* d, lapack_int* ldd,
14567                     const lapack_complex_float* e, lapack_int* lde,
14568                     lapack_complex_float* f, lapack_int* ldf, float* scale,
14569                     float* dif, lapack_complex_float* work, lapack_int* lwork,
14570                     lapack_int* iwork, lapack_int *info );
14571 void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
14572                     const lapack_complex_double* a, lapack_int* lda,
14573                     const lapack_complex_double* b, lapack_int* ldb,
14574                     lapack_complex_double* c, lapack_int* ldc,
14575                     const lapack_complex_double* d, lapack_int* ldd,
14576                     const lapack_complex_double* e, lapack_int* lde,
14577                     lapack_complex_double* f, lapack_int* ldf, double* scale,
14578                     double* dif, lapack_complex_double* work, lapack_int* lwork,
14579                     lapack_int* iwork, lapack_int *info );
14580 void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
14581                     lapack_int* n, const float* a, lapack_int* lda,
14582                     const float* b, lapack_int* ldb, const float* vl,
14583                     lapack_int* ldvl, const float* vr, lapack_int* ldvr,
14584                     float* s, float* dif, lapack_int* mm, lapack_int* m,
14585                     float* work, lapack_int* lwork, lapack_int* iwork,
14586                     lapack_int *info );
14587 void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
14588                     lapack_int* n, const double* a, lapack_int* lda,
14589                     const double* b, lapack_int* ldb, const double* vl,
14590                     lapack_int* ldvl, const double* vr, lapack_int* ldvr,
14591                     double* s, double* dif, lapack_int* mm, lapack_int* m,
14592                     double* work, lapack_int* lwork, lapack_int* iwork,
14593                     lapack_int *info );
14594 void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
14595                     lapack_int* n, const lapack_complex_float* a,
14596                     lapack_int* lda, const lapack_complex_float* b,
14597                     lapack_int* ldb, const lapack_complex_float* vl,
14598                     lapack_int* ldvl, const lapack_complex_float* vr,
14599                     lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
14600                     lapack_int* m, lapack_complex_float* work,
14601                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14602 void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
14603                     lapack_int* n, const lapack_complex_double* a,
14604                     lapack_int* lda, const lapack_complex_double* b,
14605                     lapack_int* ldb, const lapack_complex_double* vl,
14606                     lapack_int* ldvl, const lapack_complex_double* vr,
14607                     lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
14608                     lapack_int* m, lapack_complex_double* work,
14609                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14610 void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14611                     lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
14612                     float* b, lapack_int* ldb, float* tola, float* tolb,
14613                     lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
14614                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
14615                     lapack_int* iwork, float* tau, float* work,
14616                     lapack_int *info );
14617 void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14618                     lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
14619                     double* b, lapack_int* ldb, double* tola, double* tolb,
14620                     lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
14621                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
14622                     lapack_int* iwork, double* tau, double* work,
14623                     lapack_int *info );
14624 void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14625                     lapack_int* p, lapack_int* n, lapack_complex_float* a,
14626                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14627                     float* tola, float* tolb, lapack_int* k, lapack_int* l,
14628                     lapack_complex_float* u, lapack_int* ldu,
14629                     lapack_complex_float* v, lapack_int* ldv,
14630                     lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
14631                     float* rwork, lapack_complex_float* tau,
14632                     lapack_complex_float* work, lapack_int *info );
14633 void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
14634                     lapack_int* p, lapack_int* n, lapack_complex_double* a,
14635                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14636                     double* tola, double* tolb, lapack_int* k, lapack_int* l,
14637                     lapack_complex_double* u, lapack_int* ldu,
14638                     lapack_complex_double* v, lapack_int* ldv,
14639                     lapack_complex_double* q, lapack_int* ldq,
14640                     lapack_int* iwork, double* rwork,
14641                     lapack_complex_double* tau, lapack_complex_double* work,
14642                     lapack_int *info );
14643 void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14644                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14645                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
14646                     float* tola, float* tolb, float* alpha, float* beta,
14647                     float* u, lapack_int* ldu, float* v, lapack_int* ldv,
14648                     float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
14649                     lapack_int *info );
14650 void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14651                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14652                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
14653                     double* tola, double* tolb, double* alpha, double* beta,
14654                     double* u, lapack_int* ldu, double* v, lapack_int* ldv,
14655                     double* q, lapack_int* ldq, double* work,
14656                     lapack_int* ncycle, lapack_int *info );
14657 void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14658                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14659                     lapack_complex_float* a, lapack_int* lda,
14660                     lapack_complex_float* b, lapack_int* ldb, float* tola,
14661                     float* tolb, float* alpha, float* beta,
14662                     lapack_complex_float* u, lapack_int* ldu,
14663                     lapack_complex_float* v, lapack_int* ldv,
14664                     lapack_complex_float* q, lapack_int* ldq,
14665                     lapack_complex_float* work, lapack_int* ncycle,
14666                     lapack_int *info );
14667 void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
14668                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
14669                     lapack_complex_double* a, lapack_int* lda,
14670                     lapack_complex_double* b, lapack_int* ldb, double* tola,
14671                     double* tolb, double* alpha, double* beta,
14672                     lapack_complex_double* u, lapack_int* ldu,
14673                     lapack_complex_double* v, lapack_int* ldv,
14674                     lapack_complex_double* q, lapack_int* ldq,
14675                     lapack_complex_double* work, lapack_int* ncycle,
14676                     lapack_int *info );
14677 void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14678                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
14679                    float* work, lapack_int* lwork, lapack_int *info );
14680 void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14681                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
14682                    double* work, lapack_int* lwork, lapack_int *info );
14683 void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14684                    lapack_complex_float* a, lapack_int* lda,
14685                    lapack_complex_float* b, lapack_int* ldb,
14686                    lapack_complex_float* work, lapack_int* lwork,
14687                    lapack_int *info );
14688 void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
14689                    lapack_complex_double* a, lapack_int* lda,
14690                    lapack_complex_double* b, lapack_int* ldb,
14691                    lapack_complex_double* work, lapack_int* lwork,
14692                    lapack_int *info );
14693 void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14694                     lapack_int* lda, float* b, lapack_int* ldb,
14695                     lapack_int* jpvt, float* rcond, lapack_int* rank,
14696                     float* work, lapack_int* lwork, lapack_int *info );
14697 void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14698                     lapack_int* lda, double* b, lapack_int* ldb,
14699                     lapack_int* jpvt, double* rcond, lapack_int* rank,
14700                     double* work, lapack_int* lwork, lapack_int *info );
14701 void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14702                     lapack_complex_float* a, lapack_int* lda,
14703                     lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
14704                     float* rcond, lapack_int* rank, lapack_complex_float* work,
14705                     lapack_int* lwork, float* rwork, lapack_int *info );
14706 void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14707                     lapack_complex_double* a, lapack_int* lda,
14708                     lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
14709                     double* rcond, lapack_int* rank,
14710                     lapack_complex_double* work, lapack_int* lwork,
14711                     double* rwork, lapack_int *info );
14712 void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14713                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
14714                     float* rcond, lapack_int* rank, float* work,
14715                     lapack_int* lwork, lapack_int *info );
14716 void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14717                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
14718                     double* rcond, lapack_int* rank, double* work,
14719                     lapack_int* lwork, lapack_int *info );
14720 void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14721                     lapack_complex_float* a, lapack_int* lda,
14722                     lapack_complex_float* b, lapack_int* ldb, float* s,
14723                     float* rcond, lapack_int* rank, lapack_complex_float* work,
14724                     lapack_int* lwork, float* rwork, lapack_int *info );
14725 void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14726                     lapack_complex_double* a, lapack_int* lda,
14727                     lapack_complex_double* b, lapack_int* ldb, double* s,
14728                     double* rcond, lapack_int* rank,
14729                     lapack_complex_double* work, lapack_int* lwork,
14730                     double* rwork, lapack_int *info );
14731 void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
14732                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
14733                     float* rcond, lapack_int* rank, float* work,
14734                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14735 void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
14736                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
14737                     double* rcond, lapack_int* rank, double* work,
14738                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
14739 void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14740                     lapack_complex_float* a, lapack_int* lda,
14741                     lapack_complex_float* b, lapack_int* ldb, float* s,
14742                     float* rcond, lapack_int* rank, lapack_complex_float* work,
14743                     lapack_int* lwork, float* rwork, lapack_int* iwork,
14744                     lapack_int *info );
14745 void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
14746                     lapack_complex_double* a, lapack_int* lda,
14747                     lapack_complex_double* b, lapack_int* ldb, double* s,
14748                     double* rcond, lapack_int* rank,
14749                     lapack_complex_double* work, lapack_int* lwork,
14750                     double* rwork, lapack_int* iwork, lapack_int *info );
14751 void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
14752                     lapack_int* lda, float* b, lapack_int* ldb, float* c,
14753                     float* d, float* x, float* work, lapack_int* lwork,
14754                     lapack_int *info );
14755 void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
14756                     lapack_int* lda, double* b, lapack_int* ldb, double* c,
14757                     double* d, double* x, double* work, lapack_int* lwork,
14758                     lapack_int *info );
14759 void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
14760                     lapack_complex_float* a, lapack_int* lda,
14761                     lapack_complex_float* b, lapack_int* ldb,
14762                     lapack_complex_float* c, lapack_complex_float* d,
14763                     lapack_complex_float* x, lapack_complex_float* work,
14764                     lapack_int* lwork, lapack_int *info );
14765 void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
14766                     lapack_complex_double* a, lapack_int* lda,
14767                     lapack_complex_double* b, lapack_int* ldb,
14768                     lapack_complex_double* c, lapack_complex_double* d,
14769                     lapack_complex_double* x, lapack_complex_double* work,
14770                     lapack_int* lwork, lapack_int *info );
14771 void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
14772                     lapack_int* lda, float* b, lapack_int* ldb, float* d,
14773                     float* x, float* y, float* work, lapack_int* lwork,
14774                     lapack_int *info );
14775 void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
14776                     lapack_int* lda, double* b, lapack_int* ldb, double* d,
14777                     double* x, double* y, double* work, lapack_int* lwork,
14778                     lapack_int *info );
14779 void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
14780                     lapack_complex_float* a, lapack_int* lda,
14781                     lapack_complex_float* b, lapack_int* ldb,
14782                     lapack_complex_float* d, lapack_complex_float* x,
14783                     lapack_complex_float* y, lapack_complex_float* work,
14784                     lapack_int* lwork, lapack_int *info );
14785 void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
14786                     lapack_complex_double* a, lapack_int* lda,
14787                     lapack_complex_double* b, lapack_int* ldb,
14788                     lapack_complex_double* d, lapack_complex_double* x,
14789                     lapack_complex_double* y, lapack_complex_double* work,
14790                     lapack_int* lwork, lapack_int *info );
14791 void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
14792                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
14793                    lapack_int *info );
14794 void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
14795                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
14796                    lapack_int *info );
14797 void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
14798                    lapack_complex_float* a, lapack_int* lda, float* w,
14799                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
14800                    lapack_int *info );
14801 void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
14802                    lapack_complex_double* a, lapack_int* lda, double* w,
14803                    lapack_complex_double* work, lapack_int* lwork,
14804                    double* rwork, lapack_int *info );
14805 void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
14806                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
14807                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14808 void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
14809                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
14810                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14811 void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
14812                     lapack_complex_float* a, lapack_int* lda, float* w,
14813                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14814                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14815                     lapack_int *info );
14816 void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
14817                     lapack_complex_double* a, lapack_int* lda, double* w,
14818                     lapack_complex_double* work, lapack_int* lwork,
14819                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
14820                     lapack_int* liwork, lapack_int *info );
14821 void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
14822                     float* a, lapack_int* lda, float* vl, float* vu,
14823                     lapack_int* il, lapack_int* iu, float* abstol,
14824                     lapack_int* m, float* w, float* z, lapack_int* ldz,
14825                     float* work, lapack_int* lwork, lapack_int* iwork,
14826                     lapack_int* ifail, lapack_int *info );
14827 void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
14828                     double* a, lapack_int* lda, double* vl, double* vu,
14829                     lapack_int* il, lapack_int* iu, double* abstol,
14830                     lapack_int* m, double* w, double* z, lapack_int* ldz,
14831                     double* work, lapack_int* lwork, lapack_int* iwork,
14832                     lapack_int* ifail, lapack_int *info );
14833 void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
14834                     lapack_complex_float* a, lapack_int* lda, float* vl,
14835                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14836                     lapack_int* m, float* w, lapack_complex_float* z,
14837                     lapack_int* ldz, lapack_complex_float* work,
14838                     lapack_int* lwork, float* rwork, lapack_int* iwork,
14839                     lapack_int* ifail, lapack_int *info );
14840 void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
14841                     lapack_complex_double* a, lapack_int* lda, double* vl,
14842                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14843                     lapack_int* m, double* w, lapack_complex_double* z,
14844                     lapack_int* ldz, lapack_complex_double* work,
14845                     lapack_int* lwork, double* rwork, lapack_int* iwork,
14846                     lapack_int* ifail, lapack_int *info );
14847 void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
14848                     float* a, lapack_int* lda, float* vl, float* vu,
14849                     lapack_int* il, lapack_int* iu, float* abstol,
14850                     lapack_int* m, float* w, float* z, lapack_int* ldz,
14851                     lapack_int* isuppz, float* work, lapack_int* lwork,
14852                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14853 void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
14854                     double* a, lapack_int* lda, double* vl, double* vu,
14855                     lapack_int* il, lapack_int* iu, double* abstol,
14856                     lapack_int* m, double* w, double* z, lapack_int* ldz,
14857                     lapack_int* isuppz, double* work, lapack_int* lwork,
14858                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14859 void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
14860                     lapack_complex_float* a, lapack_int* lda, float* vl,
14861                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14862                     lapack_int* m, float* w, lapack_complex_float* z,
14863                     lapack_int* ldz, lapack_int* isuppz,
14864                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14865                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14866                     lapack_int *info );
14867 void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
14868                     lapack_complex_double* a, lapack_int* lda, double* vl,
14869                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14870                     lapack_int* m, double* w, lapack_complex_double* z,
14871                     lapack_int* ldz, lapack_int* isuppz,
14872                     lapack_complex_double* work, lapack_int* lwork,
14873                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
14874                     lapack_int* liwork, lapack_int *info );
14875 void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
14876                    float* z, lapack_int* ldz, float* work, lapack_int *info );
14877 void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
14878                    double* z, lapack_int* ldz, double* work, lapack_int *info );
14879 void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
14880                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
14881                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
14882                    lapack_int *info );
14883 void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
14884                    lapack_complex_double* ap, double* w,
14885                    lapack_complex_double* z, lapack_int* ldz,
14886                    lapack_complex_double* work, double* rwork,
14887                    lapack_int *info );
14888 void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
14889                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
14890                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14891 void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
14892                     double* w, double* z, lapack_int* ldz, double* work,
14893                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
14894                     lapack_int *info );
14895 void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
14896                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
14897                     lapack_int* ldz, lapack_complex_float* work,
14898                     lapack_int* lwork, float* rwork, lapack_int* lrwork,
14899                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14900 void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
14901                     lapack_complex_double* ap, double* w,
14902                     lapack_complex_double* z, lapack_int* ldz,
14903                     lapack_complex_double* work, lapack_int* lwork,
14904                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
14905                     lapack_int* liwork, lapack_int *info );
14906 void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
14907                     float* ap, float* vl, float* vu, lapack_int* il,
14908                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
14909                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
14910                     lapack_int* ifail, lapack_int *info );
14911 void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
14912                     double* ap, double* vl, double* vu, lapack_int* il,
14913                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
14914                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
14915                     lapack_int* ifail, lapack_int *info );
14916 void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
14917                     lapack_complex_float* ap, float* vl, float* vu,
14918                     lapack_int* il, lapack_int* iu, float* abstol,
14919                     lapack_int* m, float* w, lapack_complex_float* z,
14920                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
14921                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14922 void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
14923                     lapack_complex_double* ap, double* vl, double* vu,
14924                     lapack_int* il, lapack_int* iu, double* abstol,
14925                     lapack_int* m, double* w, lapack_complex_double* z,
14926                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
14927                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14928 void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14929                    float* ab, lapack_int* ldab, float* w, float* z,
14930                    lapack_int* ldz, float* work, lapack_int *info );
14931 void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14932                    double* ab, lapack_int* ldab, double* w, double* z,
14933                    lapack_int* ldz, double* work, lapack_int *info );
14934 void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14935                    lapack_complex_float* ab, lapack_int* ldab, float* w,
14936                    lapack_complex_float* z, lapack_int* ldz,
14937                    lapack_complex_float* work, float* rwork, lapack_int *info );
14938 void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14939                    lapack_complex_double* ab, lapack_int* ldab, double* w,
14940                    lapack_complex_double* z, lapack_int* ldz,
14941                    lapack_complex_double* work, double* rwork,
14942                    lapack_int *info );
14943 void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14944                     float* ab, lapack_int* ldab, float* w, float* z,
14945                     lapack_int* ldz, float* work, lapack_int* lwork,
14946                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14947 void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14948                     double* ab, lapack_int* ldab, double* w, double* z,
14949                     lapack_int* ldz, double* work, lapack_int* lwork,
14950                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14951 void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14952                     lapack_complex_float* ab, lapack_int* ldab, float* w,
14953                     lapack_complex_float* z, lapack_int* ldz,
14954                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14955                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
14956                     lapack_int *info );
14957 void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
14958                     lapack_complex_double* ab, lapack_int* ldab, double* w,
14959                     lapack_complex_double* z, lapack_int* ldz,
14960                     lapack_complex_double* work, lapack_int* lwork,
14961                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
14962                     lapack_int* liwork, lapack_int *info );
14963 void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14964                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
14965                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
14966                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
14967                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
14968                     lapack_int* ifail, lapack_int *info );
14969 void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14970                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
14971                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
14972                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
14973                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
14974                     lapack_int* ifail, lapack_int *info );
14975 void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14976                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
14977                     lapack_complex_float* q, lapack_int* ldq, float* vl,
14978                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
14979                     lapack_int* m, float* w, lapack_complex_float* z,
14980                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
14981                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14982 void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
14983                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
14984                     lapack_complex_double* q, lapack_int* ldq, double* vl,
14985                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
14986                     lapack_int* m, double* w, lapack_complex_double* z,
14987                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
14988                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
14989 void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
14990                    lapack_int* ldz, float* work, lapack_int *info );
14991 void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
14992                    lapack_int* ldz, double* work, lapack_int *info );
14993 void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
14994                     lapack_int* ldz, float* work, lapack_int* lwork,
14995                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14996 void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
14997                     lapack_int* ldz, double* work, lapack_int* lwork,
14998                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
14999 void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
15000                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15001                     float* abstol, lapack_int* m, float* w, float* z,
15002                     lapack_int* ldz, float* work, lapack_int* iwork,
15003                     lapack_int* ifail, lapack_int *info );
15004 void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
15005                     double* e, double* vl, double* vu, lapack_int* il,
15006                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15007                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
15008                     lapack_int* ifail, lapack_int *info );
15009 void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15010                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15011                     float* abstol, lapack_int* m, float* w, float* z,
15012                     lapack_int* ldz, lapack_int* isuppz, float* work,
15013                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15014                     lapack_int *info );
15015 void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
15016                     double* e, double* vl, double* vu, lapack_int* il,
15017                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15018                     double* z, lapack_int* ldz, lapack_int* isuppz,
15019                     double* work, lapack_int* lwork, lapack_int* iwork,
15020                     lapack_int* liwork, lapack_int *info );
15021 void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
15022                    lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
15023                    float* wr, float* wi, float* vs, lapack_int* ldvs,
15024                    float* work, lapack_int* lwork, lapack_logical* bwork,
15025                    lapack_int *info );
15026 void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
15027                    lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
15028                    double* wr, double* wi, double* vs, lapack_int* ldvs,
15029                    double* work, lapack_int* lwork, lapack_logical* bwork,
15030                    lapack_int *info );
15031 void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
15032                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15033                    lapack_int* sdim, lapack_complex_float* w,
15034                    lapack_complex_float* vs, lapack_int* ldvs,
15035                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15036                    lapack_logical* bwork, lapack_int *info );
15037 void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
15038                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15039                    lapack_int* sdim, lapack_complex_double* w,
15040                    lapack_complex_double* vs, lapack_int* ldvs,
15041                    lapack_complex_double* work, lapack_int* lwork,
15042                    double* rwork, lapack_logical* bwork, lapack_int *info );
15043 void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
15044                     char* sense, lapack_int* n, float* a, lapack_int* lda,
15045                     lapack_int* sdim, float* wr, float* wi, float* vs,
15046                     lapack_int* ldvs, float* rconde, float* rcondv, float* work,
15047                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15048                     lapack_logical* bwork, lapack_int *info );
15049 void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
15050                     char* sense, lapack_int* n, double* a, lapack_int* lda,
15051                     lapack_int* sdim, double* wr, double* wi, double* vs,
15052                     lapack_int* ldvs, double* rconde, double* rcondv,
15053                     double* work, lapack_int* lwork, lapack_int* iwork,
15054                     lapack_int* liwork, lapack_logical* bwork,
15055                     lapack_int *info );
15056 void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
15057                     char* sense, lapack_int* n, lapack_complex_float* a,
15058                     lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
15059                     lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
15060                     float* rcondv, lapack_complex_float* work,
15061                     lapack_int* lwork, float* rwork, lapack_logical* bwork,
15062                     lapack_int *info );
15063 void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
15064                     char* sense, lapack_int* n, lapack_complex_double* a,
15065                     lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
15066                     lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
15067                     double* rcondv, lapack_complex_double* work,
15068                     lapack_int* lwork, double* rwork, lapack_logical* bwork,
15069                     lapack_int *info );
15070 void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
15071                    lapack_int* lda, float* wr, float* wi, float* vl,
15072                    lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
15073                    lapack_int* lwork, lapack_int *info );
15074 void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
15075                    lapack_int* lda, double* wr, double* wi, double* vl,
15076                    lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
15077                    lapack_int* lwork, lapack_int *info );
15078 void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
15079                    lapack_complex_float* a, lapack_int* lda,
15080                    lapack_complex_float* w, lapack_complex_float* vl,
15081                    lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
15082                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15083                    lapack_int *info );
15084 void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
15085                    lapack_complex_double* a, lapack_int* lda,
15086                    lapack_complex_double* w, lapack_complex_double* vl,
15087                    lapack_int* ldvl, lapack_complex_double* vr,
15088                    lapack_int* ldvr, lapack_complex_double* work,
15089                    lapack_int* lwork, double* rwork, lapack_int *info );
15090 void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15091                     lapack_int* n, float* a, lapack_int* lda, float* wr,
15092                     float* wi, float* vl, lapack_int* ldvl, float* vr,
15093                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15094                     float* scale, float* abnrm, float* rconde, float* rcondv,
15095                     float* work, lapack_int* lwork, lapack_int* iwork,
15096                     lapack_int *info );
15097 void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15098                     lapack_int* n, double* a, lapack_int* lda, double* wr,
15099                     double* wi, double* vl, lapack_int* ldvl, double* vr,
15100                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15101                     double* scale, double* abnrm, double* rconde,
15102                     double* rcondv, double* work, lapack_int* lwork,
15103                     lapack_int* iwork, lapack_int *info );
15104 void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15105                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15106                     lapack_complex_float* w, lapack_complex_float* vl,
15107                     lapack_int* ldvl, lapack_complex_float* vr,
15108                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15109                     float* scale, float* abnrm, float* rconde, float* rcondv,
15110                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15111                     lapack_int *info );
15112 void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15113                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15114                     lapack_complex_double* w, lapack_complex_double* vl,
15115                     lapack_int* ldvl, lapack_complex_double* vr,
15116                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15117                     double* scale, double* abnrm, double* rconde,
15118                     double* rcondv, lapack_complex_double* work,
15119                     lapack_int* lwork, double* rwork, lapack_int *info );
15120 void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15121                     float* a, lapack_int* lda, float* s, float* u,
15122                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
15123                     lapack_int* lwork, lapack_int *info );
15124 void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15125                     double* a, lapack_int* lda, double* s, double* u,
15126                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
15127                     lapack_int* lwork, lapack_int *info );
15128 void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15129                     lapack_complex_float* a, lapack_int* lda, float* s,
15130                     lapack_complex_float* u, lapack_int* ldu,
15131                     lapack_complex_float* vt, lapack_int* ldvt,
15132                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15133                     lapack_int *info );
15134 void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
15135                     lapack_complex_double* a, lapack_int* lda, double* s,
15136                     lapack_complex_double* u, lapack_int* ldu,
15137                     lapack_complex_double* vt, lapack_int* ldvt,
15138                     lapack_complex_double* work, lapack_int* lwork,
15139                     double* rwork, lapack_int *info );
15140 void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
15141                     lapack_int* lda, float* s, float* u, lapack_int* ldu,
15142                     float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
15143                     lapack_int* iwork, lapack_int *info );
15144 void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
15145                     lapack_int* lda, double* s, double* u, lapack_int* ldu,
15146                     double* vt, lapack_int* ldvt, double* work,
15147                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
15148 void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
15149                     lapack_complex_float* a, lapack_int* lda, float* s,
15150                     lapack_complex_float* u, lapack_int* ldu,
15151                     lapack_complex_float* vt, lapack_int* ldvt,
15152                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15153                     lapack_int* iwork, lapack_int *info );
15154 void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
15155                     lapack_complex_double* a, lapack_int* lda, double* s,
15156                     lapack_complex_double* u, lapack_int* ldu,
15157                     lapack_complex_double* vt, lapack_int* ldvt,
15158                     lapack_complex_double* work, lapack_int* lwork,
15159                     double* rwork, lapack_int* iwork, lapack_int *info );
15160 void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
15161                     char* jobp, lapack_int* m, lapack_int* n, double* a,
15162                     lapack_int* lda, double* sva, double* u, lapack_int* ldu,
15163                     double* v, lapack_int* ldv, double* work, lapack_int* lwork,
15164                     lapack_int* iwork, lapack_int *info );
15165 void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
15166                     char* jobp, lapack_int* m, lapack_int* n, float* a,
15167                     lapack_int* lda, float* sva, float* u, lapack_int* ldu,
15168                     float* v, lapack_int* ldv, float* work, lapack_int* lwork,
15169                     lapack_int* iwork, lapack_int *info );
15170 void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
15171                     lapack_int* n, double* a, lapack_int* lda, double* sva,
15172                     lapack_int* mv, double* v, lapack_int* ldv, double* work,
15173                     lapack_int* lwork, lapack_int *info );
15174 void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
15175                     lapack_int* n, float* a, lapack_int* lda, float* sva,
15176                     lapack_int* mv, float* v, lapack_int* ldv, float* work,
15177                     lapack_int* lwork, lapack_int *info );
15178 void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15179                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15180                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
15181                     float* alpha, float* beta, float* u, lapack_int* ldu,
15182                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
15183                     float* work, lapack_int* iwork, lapack_int *info );
15184 void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15185                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15186                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
15187                     double* alpha, double* beta, double* u, lapack_int* ldu,
15188                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
15189                     double* work, lapack_int* iwork, lapack_int *info );
15190 void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15191                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15192                     lapack_complex_float* a, lapack_int* lda,
15193                     lapack_complex_float* b, lapack_int* ldb, float* alpha,
15194                     float* beta, lapack_complex_float* u, lapack_int* ldu,
15195                     lapack_complex_float* v, lapack_int* ldv,
15196                     lapack_complex_float* q, lapack_int* ldq,
15197                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
15198                     lapack_int *info );
15199 void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
15200                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
15201                     lapack_complex_double* a, lapack_int* lda,
15202                     lapack_complex_double* b, lapack_int* ldb, double* alpha,
15203                     double* beta, lapack_complex_double* u, lapack_int* ldu,
15204                     lapack_complex_double* v, lapack_int* ldv,
15205                     lapack_complex_double* q, lapack_int* ldq,
15206                     lapack_complex_double* work, double* rwork,
15207                     lapack_int* iwork, lapack_int *info );
15208 void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15209                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
15210                    float* w, float* work, lapack_int* lwork, lapack_int *info );
15211 void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15212                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
15213                    double* w, double* work, lapack_int* lwork,
15214                    lapack_int *info );
15215 void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15216                    lapack_complex_float* a, lapack_int* lda,
15217                    lapack_complex_float* b, lapack_int* ldb, float* w,
15218                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15219                    lapack_int *info );
15220 void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15221                    lapack_complex_double* a, lapack_int* lda,
15222                    lapack_complex_double* b, lapack_int* ldb, double* w,
15223                    lapack_complex_double* work, lapack_int* lwork,
15224                    double* rwork, lapack_int *info );
15225 void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15226                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
15227                     float* w, float* work, lapack_int* lwork, lapack_int* iwork,
15228                     lapack_int* liwork, lapack_int *info );
15229 void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15230                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
15231                     double* w, double* work, lapack_int* lwork,
15232                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15233 void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15234                     lapack_complex_float* a, lapack_int* lda,
15235                     lapack_complex_float* b, lapack_int* ldb, float* w,
15236                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15237                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15238                     lapack_int *info );
15239 void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15240                     lapack_complex_double* a, lapack_int* lda,
15241                     lapack_complex_double* b, lapack_int* ldb, double* w,
15242                     lapack_complex_double* work, lapack_int* lwork,
15243                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
15244                     lapack_int* liwork, lapack_int *info );
15245 void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15246                     lapack_int* n, float* a, lapack_int* lda, float* b,
15247                     lapack_int* ldb, float* vl, float* vu, lapack_int* il,
15248                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
15249                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
15250                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15251 void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15252                     lapack_int* n, double* a, lapack_int* lda, double* b,
15253                     lapack_int* ldb, double* vl, double* vu, lapack_int* il,
15254                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15255                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
15256                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15257 void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15258                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15259                     lapack_complex_float* b, lapack_int* ldb, float* vl,
15260                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
15261                     lapack_int* m, float* w, lapack_complex_float* z,
15262                     lapack_int* ldz, lapack_complex_float* work,
15263                     lapack_int* lwork, float* rwork, lapack_int* iwork,
15264                     lapack_int* ifail, lapack_int *info );
15265 void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15266                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15267                     lapack_complex_double* b, lapack_int* ldb, double* vl,
15268                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
15269                     lapack_int* m, double* w, lapack_complex_double* z,
15270                     lapack_int* ldz, lapack_complex_double* work,
15271                     lapack_int* lwork, double* rwork, lapack_int* iwork,
15272                     lapack_int* ifail, lapack_int *info );
15273 void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15274                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
15275                    float* work, lapack_int *info );
15276 void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15277                    double* ap, double* bp, double* w, double* z,
15278                    lapack_int* ldz, double* work, lapack_int *info );
15279 void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15280                    lapack_complex_float* ap, lapack_complex_float* bp, float* w,
15281                    lapack_complex_float* z, lapack_int* ldz,
15282                    lapack_complex_float* work, float* rwork, lapack_int *info );
15283 void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15284                    lapack_complex_double* ap, lapack_complex_double* bp,
15285                    double* w, lapack_complex_double* z, lapack_int* ldz,
15286                    lapack_complex_double* work, double* rwork,
15287                    lapack_int *info );
15288 void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15289                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
15290                     float* work, lapack_int* lwork, lapack_int* iwork,
15291                     lapack_int* liwork, lapack_int *info );
15292 void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15293                     double* ap, double* bp, double* w, double* z,
15294                     lapack_int* ldz, double* work, lapack_int* lwork,
15295                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15296 void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15297                     lapack_complex_float* ap, lapack_complex_float* bp,
15298                     float* w, lapack_complex_float* z, lapack_int* ldz,
15299                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15300                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15301                     lapack_int *info );
15302 void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
15303                     lapack_complex_double* ap, lapack_complex_double* bp,
15304                     double* w, lapack_complex_double* z, lapack_int* ldz,
15305                     lapack_complex_double* work, lapack_int* lwork,
15306                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
15307                     lapack_int* liwork, lapack_int *info );
15308 void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15309                     lapack_int* n, float* ap, float* bp, float* vl, float* vu,
15310                     lapack_int* il, lapack_int* iu, float* abstol,
15311                     lapack_int* m, float* w, float* z, lapack_int* ldz,
15312                     float* work, lapack_int* iwork, lapack_int* ifail,
15313                     lapack_int *info );
15314 void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15315                     lapack_int* n, double* ap, double* bp, double* vl,
15316                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
15317                     lapack_int* m, double* w, double* z, lapack_int* ldz,
15318                     double* work, lapack_int* iwork, lapack_int* ifail,
15319                     lapack_int *info );
15320 void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15321                     lapack_int* n, lapack_complex_float* ap,
15322                     lapack_complex_float* bp, float* vl, float* vu,
15323                     lapack_int* il, lapack_int* iu, float* abstol,
15324                     lapack_int* m, float* w, lapack_complex_float* z,
15325                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
15326                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15327 void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
15328                     lapack_int* n, lapack_complex_double* ap,
15329                     lapack_complex_double* bp, double* vl, double* vu,
15330                     lapack_int* il, lapack_int* iu, double* abstol,
15331                     lapack_int* m, double* w, lapack_complex_double* z,
15332                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
15333                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15334 void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15335                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
15336                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
15337                    float* work, lapack_int *info );
15338 void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15339                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
15340                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
15341                    double* work, lapack_int *info );
15342 void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15343                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
15344                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
15345                    lapack_complex_float* z, lapack_int* ldz,
15346                    lapack_complex_float* work, float* rwork, lapack_int *info );
15347 void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15348                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
15349                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
15350                    lapack_complex_double* z, lapack_int* ldz,
15351                    lapack_complex_double* work, double* rwork,
15352                    lapack_int *info );
15353 void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15354                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
15355                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
15356                     float* work, lapack_int* lwork, lapack_int* iwork,
15357                     lapack_int* liwork, lapack_int *info );
15358 void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15359                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
15360                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
15361                     double* work, lapack_int* lwork, lapack_int* iwork,
15362                     lapack_int* liwork, lapack_int *info );
15363 void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15364                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
15365                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
15366                     lapack_complex_float* z, lapack_int* ldz,
15367                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15368                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15369                     lapack_int *info );
15370 void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
15371                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
15372                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
15373                     lapack_complex_double* z, lapack_int* ldz,
15374                     lapack_complex_double* work, lapack_int* lwork,
15375                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
15376                     lapack_int* liwork, lapack_int *info );
15377 void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15378                     lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
15379                     float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
15380                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15381                     float* abstol, lapack_int* m, float* w, float* z,
15382                     lapack_int* ldz, float* work, lapack_int* iwork,
15383                     lapack_int* ifail, lapack_int *info );
15384 void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15385                     lapack_int* ka, lapack_int* kb, double* ab,
15386                     lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
15387                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
15388                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15389                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
15390                     lapack_int* ifail, lapack_int *info );
15391 void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15392                     lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
15393                     lapack_int* ldab, lapack_complex_float* bb,
15394                     lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
15395                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15396                     float* abstol, lapack_int* m, float* w,
15397                     lapack_complex_float* z, lapack_int* ldz,
15398                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
15399                     lapack_int* ifail, lapack_int *info );
15400 void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
15401                     lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
15402                     lapack_int* ldab, lapack_complex_double* bb,
15403                     lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
15404                     double* vl, double* vu, lapack_int* il, lapack_int* iu,
15405                     double* abstol, lapack_int* m, double* w,
15406                     lapack_complex_double* z, lapack_int* ldz,
15407                     lapack_complex_double* work, double* rwork,
15408                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
15409 void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
15410                    LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
15411                    lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
15412                    float* alphar, float* alphai, float* beta, float* vsl,
15413                    lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
15414                    float* work, lapack_int* lwork, lapack_logical* bwork,
15415                    lapack_int *info );
15416 void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
15417                    LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
15418                    lapack_int* lda, double* b, lapack_int* ldb,
15419                    lapack_int* sdim, double* alphar, double* alphai,
15420                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
15421                    lapack_int* ldvsr, double* work, lapack_int* lwork,
15422                    lapack_logical* bwork, lapack_int *info );
15423 void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
15424                    LAPACK_C_SELECT2 selctg, lapack_int* n,
15425                    lapack_complex_float* a, lapack_int* lda,
15426                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
15427                    lapack_complex_float* alpha, lapack_complex_float* beta,
15428                    lapack_complex_float* vsl, lapack_int* ldvsl,
15429                    lapack_complex_float* vsr, lapack_int* ldvsr,
15430                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15431                    lapack_logical* bwork, lapack_int *info );
15432 void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
15433                    LAPACK_Z_SELECT2 selctg, lapack_int* n,
15434                    lapack_complex_double* a, lapack_int* lda,
15435                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
15436                    lapack_complex_double* alpha, lapack_complex_double* beta,
15437                    lapack_complex_double* vsl, lapack_int* ldvsl,
15438                    lapack_complex_double* vsr, lapack_int* ldvsr,
15439                    lapack_complex_double* work, lapack_int* lwork,
15440                    double* rwork, lapack_logical* bwork, lapack_int *info );
15441 void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
15442                     LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
15443                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
15444                     lapack_int* sdim, float* alphar, float* alphai, float* beta,
15445                     float* vsl, lapack_int* ldvsl, float* vsr,
15446                     lapack_int* ldvsr, float* rconde, float* rcondv,
15447                     float* work, lapack_int* lwork, lapack_int* iwork,
15448                     lapack_int* liwork, lapack_logical* bwork,
15449                     lapack_int *info );
15450 void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
15451                     LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
15452                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
15453                     lapack_int* sdim, double* alphar, double* alphai,
15454                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
15455                     lapack_int* ldvsr, double* rconde, double* rcondv,
15456                     double* work, lapack_int* lwork, lapack_int* iwork,
15457                     lapack_int* liwork, lapack_logical* bwork,
15458                     lapack_int *info );
15459 void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
15460                     LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
15461                     lapack_complex_float* a, lapack_int* lda,
15462                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
15463                     lapack_complex_float* alpha, lapack_complex_float* beta,
15464                     lapack_complex_float* vsl, lapack_int* ldvsl,
15465                     lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
15466                     float* rcondv, lapack_complex_float* work,
15467                     lapack_int* lwork, float* rwork, lapack_int* iwork,
15468                     lapack_int* liwork, lapack_logical* bwork,
15469                     lapack_int *info );
15470 void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
15471                     LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
15472                     lapack_complex_double* a, lapack_int* lda,
15473                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
15474                     lapack_complex_double* alpha, lapack_complex_double* beta,
15475                     lapack_complex_double* vsl, lapack_int* ldvsl,
15476                     lapack_complex_double* vsr, lapack_int* ldvsr,
15477                     double* rconde, double* rcondv, lapack_complex_double* work,
15478                     lapack_int* lwork, double* rwork, lapack_int* iwork,
15479                     lapack_int* liwork, lapack_logical* bwork,
15480                     lapack_int *info );
15481 void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
15482                    lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
15483                    float* alphai, float* beta, float* vl, lapack_int* ldvl,
15484                    float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
15485                    lapack_int *info );
15486 void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
15487                    lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
15488                    double* alphai, double* beta, double* vl, lapack_int* ldvl,
15489                    double* vr, lapack_int* ldvr, double* work,
15490                    lapack_int* lwork, lapack_int *info );
15491 void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
15492                    lapack_complex_float* a, lapack_int* lda,
15493                    lapack_complex_float* b, lapack_int* ldb,
15494                    lapack_complex_float* alpha, lapack_complex_float* beta,
15495                    lapack_complex_float* vl, lapack_int* ldvl,
15496                    lapack_complex_float* vr, lapack_int* ldvr,
15497                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
15498                    lapack_int *info );
15499 void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
15500                    lapack_complex_double* a, lapack_int* lda,
15501                    lapack_complex_double* b, lapack_int* ldb,
15502                    lapack_complex_double* alpha, lapack_complex_double* beta,
15503                    lapack_complex_double* vl, lapack_int* ldvl,
15504                    lapack_complex_double* vr, lapack_int* ldvr,
15505                    lapack_complex_double* work, lapack_int* lwork,
15506                    double* rwork, lapack_int *info );
15507 void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15508                     lapack_int* n, float* a, lapack_int* lda, float* b,
15509                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
15510                     float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
15511                     lapack_int* ilo, lapack_int* ihi, float* lscale,
15512                     float* rscale, float* abnrm, float* bbnrm, float* rconde,
15513                     float* rcondv, float* work, lapack_int* lwork,
15514                     lapack_int* iwork, lapack_logical* bwork,
15515                     lapack_int *info );
15516 void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15517                     lapack_int* n, double* a, lapack_int* lda, double* b,
15518                     lapack_int* ldb, double* alphar, double* alphai,
15519                     double* beta, double* vl, lapack_int* ldvl, double* vr,
15520                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
15521                     double* lscale, double* rscale, double* abnrm,
15522                     double* bbnrm, double* rconde, double* rcondv, double* work,
15523                     lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
15524                     lapack_int *info );
15525 void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15526                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15527                     lapack_complex_float* b, lapack_int* ldb,
15528                     lapack_complex_float* alpha, lapack_complex_float* beta,
15529                     lapack_complex_float* vl, lapack_int* ldvl,
15530                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
15531                     lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
15532                     float* bbnrm, float* rconde, float* rcondv,
15533                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15534                     lapack_int* iwork, lapack_logical* bwork,
15535                     lapack_int *info );
15536 void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
15537                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15538                     lapack_complex_double* b, lapack_int* ldb,
15539                     lapack_complex_double* alpha, lapack_complex_double* beta,
15540                     lapack_complex_double* vl, lapack_int* ldvl,
15541                     lapack_complex_double* vr, lapack_int* ldvr,
15542                     lapack_int* ilo, lapack_int* ihi, double* lscale,
15543                     double* rscale, double* abnrm, double* bbnrm,
15544                     double* rconde, double* rcondv, lapack_complex_double* work,
15545                     lapack_int* lwork, double* rwork, lapack_int* iwork,
15546                     lapack_logical* bwork, lapack_int *info );
15547 void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15548                    lapack_int* k, double* alpha, const double* a,
15549                    lapack_int* lda, double* beta, double* c );
15550 void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15551                    lapack_int* k, float* alpha, const float* a, lapack_int* lda,
15552                    float* beta, float* c );
15553 void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15554                    lapack_int* k, double* alpha, const lapack_complex_double* a,
15555                    lapack_int* lda, double* beta, lapack_complex_double* c );
15556 void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
15557                    lapack_int* k, float* alpha, const lapack_complex_float* a,
15558                    lapack_int* lda, float* beta, lapack_complex_float* c );
15559 void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
15560                    char* diag, lapack_int* m, lapack_int* n, double* alpha,
15561                    const double* a, double* b, lapack_int* ldb );
15562 void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
15563                    char* diag, lapack_int* m, lapack_int* n, float* alpha,
15564                    const float* a, float* b, lapack_int* ldb );
15565 void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
15566                    char* diag, lapack_int* m, lapack_int* n,
15567                    lapack_complex_double* alpha, const lapack_complex_double* a,
15568                    lapack_complex_double* b, lapack_int* ldb );
15569 void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
15570                    char* diag, lapack_int* m, lapack_int* n,
15571                    lapack_complex_float* alpha, const lapack_complex_float* a,
15572                    lapack_complex_float* b, lapack_int* ldb );
15573 void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
15574                     double* ap, lapack_int *info );
15575 void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
15576                     float* ap, lapack_int *info );
15577 void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
15578                     const lapack_complex_double* arf, lapack_complex_double* ap,
15579                     lapack_int *info );
15580 void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
15581                     const lapack_complex_float* arf, lapack_complex_float* ap,
15582                     lapack_int *info );
15583 void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
15584                     double* a, lapack_int* lda, lapack_int *info );
15585 void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
15586                     float* a, lapack_int* lda, lapack_int *info );
15587 void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
15588                     const lapack_complex_double* arf, lapack_complex_double* a,
15589                     lapack_int* lda, lapack_int *info );
15590 void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
15591                     const lapack_complex_float* arf, lapack_complex_float* a,
15592                     lapack_int* lda, lapack_int *info );
15593 void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
15594                     double* arf, lapack_int *info );
15595 void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
15596                     float* arf, lapack_int *info );
15597 void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
15598                     const lapack_complex_double* ap, lapack_complex_double* arf,
15599                     lapack_int *info );
15600 void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
15601                     const lapack_complex_float* ap, lapack_complex_float* arf,
15602                     lapack_int *info );
15603 void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
15604                     lapack_int* lda, lapack_int *info );
15605 void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
15606                     lapack_int* lda, lapack_int *info );
15607 void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
15608                     lapack_complex_double* a, lapack_int* lda,
15609                     lapack_int *info );
15610 void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
15611                     lapack_complex_float* a, lapack_int* lda,
15612                     lapack_int *info );
15613 void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
15614                     lapack_int* lda, double* arf, lapack_int *info );
15615 void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
15616                     lapack_int* lda, float* arf, lapack_int *info );
15617 void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
15618                     const lapack_complex_double* a, lapack_int* lda,
15619                     lapack_complex_double* arf, lapack_int *info );
15620 void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
15621                     const lapack_complex_float* a, lapack_int* lda,
15622                     lapack_complex_float* arf, lapack_int *info );
15623 void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
15624                     double* ap, lapack_int *info );
15625 void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
15626                     float* ap, lapack_int *info );
15627 void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
15628                     lapack_int* lda, lapack_complex_double* ap,
15629                     lapack_int *info );
15630 void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
15631                     lapack_int* lda, lapack_complex_float* ap,
15632                     lapack_int *info );
15633 void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15634                      float* tau, float* work, lapack_int* lwork,
15635                      lapack_int *info );
15636 void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15637                      double* tau, double* work, lapack_int* lwork,
15638                      lapack_int *info );
15639 void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15640                      lapack_int* lda, lapack_complex_float* tau,
15641                      lapack_complex_float* work, lapack_int* lwork,
15642                      lapack_int *info );
15643 void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15644                      lapack_int* lda, lapack_complex_double* tau,
15645                      lapack_complex_double* work, lapack_int* lwork,
15646                      lapack_int *info );
15647 void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
15648 void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
15649 void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15650                     float* x );
15651 void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15652                     double* x );
15653 void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15654                     lapack_complex_float* x );
15655 void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
15656                     lapack_complex_double* x );
15657 void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15658                     float* tau, float* work, lapack_int *info );
15659 void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15660                     double* tau, double* work, lapack_int *info );
15661 void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15662                     lapack_int* lda, lapack_complex_float* tau,
15663                     lapack_complex_float* work, lapack_int *info );
15664 void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15665                     lapack_int* lda, lapack_complex_double* tau,
15666                     lapack_complex_double* work, lapack_int *info );
15667 void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
15668                     lapack_int* lda, float* b, lapack_int* ldb );
15669 void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
15670                     lapack_int* lda, double* b, lapack_int* ldb );
15671 void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
15672                     const lapack_complex_float* a, lapack_int* lda,
15673                     lapack_complex_float* b, lapack_int* ldb );
15674 void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
15675                     const lapack_complex_double* a, lapack_int* lda,
15676                     lapack_complex_double* b, lapack_int* ldb );
15677 void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15678                     lapack_int* ipiv, lapack_int *info );
15679 void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15680                     lapack_int* ipiv, lapack_int *info );
15681 void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15682                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
15683 void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15684                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
15685 void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
15686                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
15687 void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
15688                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
15689 void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15690                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
15691                     lapack_int* incx );
15692 void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15693                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
15694                     lapack_int* incx );
15695 float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
15696                     lapack_int* lda, float* work );
15697 double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
15698                     lapack_int* lda, double* work );
15699 float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
15700                     const lapack_complex_float* a, lapack_int* lda, float* work );
15701 double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
15702                     const lapack_complex_double* a, lapack_int* lda, double* work );
15703 float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
15704                     const lapack_complex_float* a, lapack_int* lda, float* work );
15705 double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
15706                     const lapack_complex_double* a, lapack_int* lda, double* work );
15707 float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
15708                     lapack_int* lda, float* work );
15709 double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
15710                     lapack_int* lda, double* work );
15711 float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
15712                     const lapack_complex_float* a, lapack_int* lda, float* work );
15713 double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
15714                     const lapack_complex_double* a, lapack_int* lda, double* work );
15715 float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
15716                     lapack_int* n, const float* a, lapack_int* lda, float* work );
15717 double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
15718                     lapack_int* n, const double* a, lapack_int* lda, double* work );
15719 float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
15720                     lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
15721                     float* work );
15722 double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
15723                     lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
15724                     double* work );
15725 float LAPACK_slamch( char* cmach );
15726 double LAPACK_dlamch( char* cmach );
15727 void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15728                     float* tau, float* work, lapack_int *info );
15729 void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15730                     double* tau, double* work, lapack_int *info );
15731 void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15732                     lapack_int* lda, lapack_complex_float* tau,
15733                     lapack_complex_float* work, lapack_int *info );
15734 void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15735                     lapack_int* lda, lapack_complex_double* tau,
15736                     lapack_complex_double* work, lapack_int *info );
15737 void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
15738                     lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
15739                     lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
15740                     lapack_int* ldc, float* work, lapack_int* ldwork );
15741 void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
15742                     lapack_int* m, lapack_int* n, lapack_int* k,
15743                     const double* v, lapack_int* ldv, const double* t,
15744                     lapack_int* ldt, double* c, lapack_int* ldc, double* work,
15745                     lapack_int* ldwork );
15746 void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
15747                     lapack_int* m, lapack_int* n, lapack_int* k,
15748                     const lapack_complex_float* v, lapack_int* ldv,
15749                     const lapack_complex_float* t, lapack_int* ldt,
15750                     lapack_complex_float* c, lapack_int* ldc,
15751                     lapack_complex_float* work, lapack_int* ldwork );
15752 void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
15753                     lapack_int* m, lapack_int* n, lapack_int* k,
15754                     const lapack_complex_double* v, lapack_int* ldv,
15755                     const lapack_complex_double* t, lapack_int* ldt,
15756                     lapack_complex_double* c, lapack_int* ldc,
15757                     lapack_complex_double* work, lapack_int* ldwork );
15758 void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
15759                     float* tau );
15760 void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
15761                     double* tau );
15762 void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
15763                     lapack_complex_float* x, lapack_int* incx,
15764                     lapack_complex_float* tau );
15765 void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
15766                     lapack_complex_double* x, lapack_int* incx,
15767                     lapack_complex_double* tau );
15768 void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15769                     const float* v, lapack_int* ldv, const float* tau, float* t,
15770                     lapack_int* ldt );
15771 void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15772                     const double* v, lapack_int* ldv, const double* tau,
15773                     double* t, lapack_int* ldt );
15774 void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15775                     const lapack_complex_float* v, lapack_int* ldv,
15776                     const lapack_complex_float* tau, lapack_complex_float* t,
15777                     lapack_int* ldt );
15778 void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
15779                     const lapack_complex_double* v, lapack_int* ldv,
15780                     const lapack_complex_double* tau, lapack_complex_double* t,
15781                     lapack_int* ldt );
15782 void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
15783                     float* tau, float* c, lapack_int* ldc, float* work );
15784 void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
15785                     double* tau, double* c, lapack_int* ldc, double* work );
15786 void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
15787                     const lapack_complex_float* v, lapack_complex_float* tau,
15788                     lapack_complex_float* c, lapack_int* ldc,
15789                     lapack_complex_float* work );
15790 void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
15791                     const lapack_complex_double* v, lapack_complex_double* tau,
15792                     lapack_complex_double* c, lapack_int* ldc,
15793                     lapack_complex_double* work );
15794 void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15795                     char* sym, float* d, lapack_int* mode, float* cond,
15796                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15797                     float* a, lapack_int* lda, float* work, lapack_int *info );
15798 void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15799                     char* sym, double* d, lapack_int* mode, double* cond,
15800                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15801                     double* a, lapack_int* lda, double* work,
15802                     lapack_int *info );
15803 void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15804                     char* sym, float* d, lapack_int* mode, float* cond,
15805                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15806                     lapack_complex_float* a, lapack_int* lda,
15807                     lapack_complex_float* work, lapack_int *info );
15808 void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
15809                     char* sym, double* d, lapack_int* mode, double* cond,
15810                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
15811                     lapack_complex_double* a, lapack_int* lda,
15812                     lapack_complex_double* work, lapack_int *info );
15813 void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
15814                     lapack_int* ldsa, double* a, lapack_int* lda,
15815                     lapack_int *info );
15816 void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
15817                     lapack_int* lda, float* sa, lapack_int* ldsa,
15818                     lapack_int *info );
15819 void LAPACK_clag2z( lapack_int* m, lapack_int* n,
15820                     const lapack_complex_float* sa, lapack_int* ldsa,
15821                     lapack_complex_double* a, lapack_int* lda,
15822                     lapack_int *info );
15823 void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
15824                     const lapack_complex_double* a, lapack_int* lda,
15825                     lapack_complex_float* sa, lapack_int* ldsa,
15826                     lapack_int *info );
15827 void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
15828                     lapack_int *info );
15829 void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
15830                     lapack_int *info );
15831 void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
15832                     lapack_int* lda, lapack_int *info );
15833 void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
15834                     lapack_int* lda, lapack_int *info );
15835 void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15836                     lapack_int* ku, const float* d, float* a, lapack_int* lda,
15837                     lapack_int* iseed, float* work, lapack_int *info );
15838 void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15839                     lapack_int* ku, const double* d, double* a, lapack_int* lda,
15840                     lapack_int* iseed, double* work, lapack_int *info );
15841 void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15842                     lapack_int* ku, const float* d, lapack_complex_float* a,
15843                     lapack_int* lda, lapack_int* iseed,
15844                     lapack_complex_float* work, lapack_int *info );
15845 void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
15846                     lapack_int* ku, const double* d, lapack_complex_double* a,
15847                     lapack_int* lda, lapack_int* iseed,
15848                     lapack_complex_double* work, lapack_int *info );
15849 void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
15850                     float* beta, float* a, lapack_int* lda );
15851 void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
15852                     double* beta, double* a, lapack_int* lda );
15853 void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
15854                     lapack_complex_float* alpha, lapack_complex_float* beta,
15855                     lapack_complex_float* a, lapack_int* lda );
15856 void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
15857                     lapack_complex_double* alpha, lapack_complex_double* beta,
15858                     lapack_complex_double* a, lapack_int* lda );
15859 void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
15860 void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
15861 void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
15862                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
15863                     lapack_complex_float* work, lapack_int *info );
15864 void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
15865                     lapack_complex_double* a, lapack_int* lda,
15866                     lapack_int* iseed, lapack_complex_double* work,
15867                     lapack_int *info );
15868 void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
15869                     lapack_int* lda, lapack_int* iseed, float* work,
15870                     lapack_int *info );
15871 void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
15872                     lapack_int* lda, lapack_int* iseed, double* work,
15873                     lapack_int *info );
15874 void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
15875                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
15876                     lapack_complex_float* work, lapack_int *info );
15877 void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
15878                     lapack_complex_double* a, lapack_int* lda,
15879                     lapack_int* iseed, lapack_complex_double* work,
15880                     lapack_int *info );
15881 void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15882                     float* x, lapack_int* ldx, lapack_int* k );
15883 void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15884                     double* x, lapack_int* ldx, lapack_int* k );
15885 void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15886                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
15887 void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
15888                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
15889 float LAPACK_slapy2( float* x, float* y );
15890 double LAPACK_dlapy2( double* x, double* y );
15891 float LAPACK_slapy3( float* x, float* y, float* z );
15892 double LAPACK_dlapy3( double* x, double* y, double* z );
15893 void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
15894 void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
15895 void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
15896 void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
15897                      double* sn );
15898 // LAPACK 3.3.0
15899 void LAPACK_cbbcsd( char* jobu1, char* jobu2,
15900                     char* jobv1t, char* jobv2t, char* trans,
15901                     lapack_int* m, lapack_int* p, lapack_int* q,
15902                     float* theta, float* phi,
15903                     lapack_complex_float* u1, lapack_int* ldu1,
15904                     lapack_complex_float* u2, lapack_int* ldu2,
15905                     lapack_complex_float* v1t, lapack_int* ldv1t,
15906                     lapack_complex_float* v2t, lapack_int* ldv2t,
15907                     float* b11d, float* b11e, float* b12d,
15908                     float* b12e, float* b21d, float* b21e,
15909                     float* b22d, float* b22e, float* rwork,
15910                     lapack_int* lrwork , lapack_int *info );
15911 void LAPACK_cheswapr( char* uplo, lapack_int* n,
15912                       lapack_complex_float* a, lapack_int* i1,
15913                       lapack_int* i2 );
15914 void LAPACK_chetri2( char* uplo, lapack_int* n,
15915                      lapack_complex_float* a, lapack_int* lda,
15916                      const lapack_int* ipiv,
15917                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15918 void LAPACK_chetri2x( char* uplo, lapack_int* n,
15919                       lapack_complex_float* a, lapack_int* lda,
15920                       const lapack_int* ipiv,
15921                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
15922 void LAPACK_chetrs2( char* uplo, lapack_int* n,
15923                      lapack_int* nrhs, const lapack_complex_float* a,
15924                      lapack_int* lda, const lapack_int* ipiv,
15925                      lapack_complex_float* b, lapack_int* ldb,
15926                      lapack_complex_float* work , lapack_int *info );
15927 void LAPACK_csyconv( char* uplo, char* way,
15928                      lapack_int* n, lapack_complex_float* a,
15929                      lapack_int* lda, const lapack_int* ipiv,
15930                      lapack_complex_float* work , lapack_int *info );
15931 void LAPACK_csyswapr( char* uplo, lapack_int* n,
15932                       lapack_complex_float* a, lapack_int* i1,
15933                       lapack_int* i2 );
15934 void LAPACK_csytri2( char* uplo, lapack_int* n,
15935                      lapack_complex_float* a, lapack_int* lda,
15936                      const lapack_int* ipiv,
15937                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15938 void LAPACK_csytri2x( char* uplo, lapack_int* n,
15939                       lapack_complex_float* a, lapack_int* lda,
15940                       const lapack_int* ipiv,
15941                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
15942 void LAPACK_csytrs2( char* uplo, lapack_int* n,
15943                      lapack_int* nrhs, const lapack_complex_float* a,
15944                      lapack_int* lda, const lapack_int* ipiv,
15945                      lapack_complex_float* b, lapack_int* ldb,
15946                      lapack_complex_float* work , lapack_int *info );
15947 void LAPACK_cunbdb( char* trans, char* signs,
15948                     lapack_int* m, lapack_int* p, lapack_int* q,
15949                     lapack_complex_float* x11, lapack_int* ldx11,
15950                     lapack_complex_float* x12, lapack_int* ldx12,
15951                     lapack_complex_float* x21, lapack_int* ldx21,
15952                     lapack_complex_float* x22, lapack_int* ldx22,
15953                     float* theta, float* phi,
15954                     lapack_complex_float* taup1,
15955                     lapack_complex_float* taup2,
15956                     lapack_complex_float* tauq1,
15957                     lapack_complex_float* tauq2,
15958                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
15959 void LAPACK_cuncsd( char* jobu1, char* jobu2,
15960                     char* jobv1t, char* jobv2t, char* trans,
15961                     char* signs, lapack_int* m, lapack_int* p,
15962                     lapack_int* q, lapack_complex_float* x11,
15963                     lapack_int* ldx11, lapack_complex_float* x12,
15964                     lapack_int* ldx12, lapack_complex_float* x21,
15965                     lapack_int* ldx21, lapack_complex_float* x22,
15966                     lapack_int* ldx22, float* theta,
15967                     lapack_complex_float* u1, lapack_int* ldu1,
15968                     lapack_complex_float* u2, lapack_int* ldu2,
15969                     lapack_complex_float* v1t, lapack_int* ldv1t,
15970                     lapack_complex_float* v2t, lapack_int* ldv2t,
15971                     lapack_complex_float* work, lapack_int* lwork,
15972                     float* rwork, lapack_int* lrwork,
15973                     lapack_int* iwork , lapack_int *info );
15974 void LAPACK_dbbcsd( char* jobu1, char* jobu2,
15975                     char* jobv1t, char* jobv2t, char* trans,
15976                     lapack_int* m, lapack_int* p, lapack_int* q,
15977                     double* theta, double* phi, double* u1,
15978                     lapack_int* ldu1, double* u2, lapack_int* ldu2,
15979                     double* v1t, lapack_int* ldv1t, double* v2t,
15980                     lapack_int* ldv2t, double* b11d, double* b11e,
15981                     double* b12d, double* b12e, double* b21d,
15982                     double* b21e, double* b22d, double* b22e,
15983                     double* work, lapack_int* lwork , lapack_int *info );
15984 void LAPACK_dorbdb( char* trans, char* signs,
15985                     lapack_int* m, lapack_int* p, lapack_int* q,
15986                     double* x11, lapack_int* ldx11, double* x12,
15987                     lapack_int* ldx12, double* x21, lapack_int* ldx21,
15988                     double* x22, lapack_int* ldx22, double* theta,
15989                     double* phi, double* taup1, double* taup2,
15990                     double* tauq1, double* tauq2, double* work,
15991                     lapack_int* lwork , lapack_int *info );
15992 void LAPACK_dorcsd( char* jobu1, char* jobu2,
15993                     char* jobv1t, char* jobv2t, char* trans,
15994                     char* signs, lapack_int* m, lapack_int* p,
15995                     lapack_int* q, double* x11, lapack_int* ldx11,
15996                     double* x12, lapack_int* ldx12, double* x21,
15997                     lapack_int* ldx21, double* x22, lapack_int* ldx22,
15998                     double* theta, double* u1, lapack_int* ldu1,
15999                     double* u2, lapack_int* ldu2, double* v1t,
16000                     lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
16001                     double* work, lapack_int* lwork,
16002                     lapack_int* iwork , lapack_int *info );
16003 void LAPACK_dsyconv( char* uplo, char* way,
16004                      lapack_int* n, double* a, lapack_int* lda,
16005                      const lapack_int* ipiv, double* work , lapack_int *info );
16006 void LAPACK_dsyswapr( char* uplo, lapack_int* n,
16007                       double* a, lapack_int* i1, lapack_int* i2 );
16008 void LAPACK_dsytri2( char* uplo, lapack_int* n,
16009                      double* a, lapack_int* lda,
16010                      const lapack_int* ipiv,
16011                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16012 void LAPACK_dsytri2x( char* uplo, lapack_int* n,
16013                       double* a, lapack_int* lda,
16014                       const lapack_int* ipiv, double* work,
16015                       lapack_int* nb , lapack_int *info );
16016 void LAPACK_dsytrs2( char* uplo, lapack_int* n,
16017                      lapack_int* nrhs, const double* a,
16018                      lapack_int* lda, const lapack_int* ipiv,
16019                      double* b, lapack_int* ldb, double* work , lapack_int *info );
16020 void LAPACK_sbbcsd( char* jobu1, char* jobu2,
16021                     char* jobv1t, char* jobv2t, char* trans,
16022                     lapack_int* m, lapack_int* p, lapack_int* q,
16023                     float* theta, float* phi, float* u1,
16024                     lapack_int* ldu1, float* u2, lapack_int* ldu2,
16025                     float* v1t, lapack_int* ldv1t, float* v2t,
16026                     lapack_int* ldv2t, float* b11d, float* b11e,
16027                     float* b12d, float* b12e, float* b21d,
16028                     float* b21e, float* b22d, float* b22e,
16029                     float* work, lapack_int* lwork , lapack_int *info );
16030 void LAPACK_sorbdb( char* trans, char* signs,
16031                     lapack_int* m, lapack_int* p, lapack_int* q,
16032                     float* x11, lapack_int* ldx11, float* x12,
16033                     lapack_int* ldx12, float* x21, lapack_int* ldx21,
16034                     float* x22, lapack_int* ldx22, float* theta,
16035                     float* phi, float* taup1, float* taup2,
16036                     float* tauq1, float* tauq2, float* work,
16037                     lapack_int* lwork , lapack_int *info );
16038 void LAPACK_sorcsd( char* jobu1, char* jobu2,
16039                     char* jobv1t, char* jobv2t, char* trans,
16040                     char* signs, lapack_int* m, lapack_int* p,
16041                     lapack_int* q, float* x11, lapack_int* ldx11,
16042                     float* x12, lapack_int* ldx12, float* x21,
16043                     lapack_int* ldx21, float* x22, lapack_int* ldx22,
16044                     float* theta, float* u1, lapack_int* ldu1,
16045                     float* u2, lapack_int* ldu2, float* v1t,
16046                     lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
16047                     float* work, lapack_int* lwork,
16048                     lapack_int* iwork , lapack_int *info );
16049 void LAPACK_ssyconv( char* uplo, char* way,
16050                      lapack_int* n, float* a, lapack_int* lda,
16051                      const lapack_int* ipiv, float* work , lapack_int *info );
16052 void LAPACK_ssyswapr( char* uplo, lapack_int* n,
16053                       float* a, lapack_int* i1, lapack_int* i2 );
16054 void LAPACK_ssytri2( char* uplo, lapack_int* n,
16055                      float* a, lapack_int* lda,
16056                      const lapack_int* ipiv,
16057                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
16058 void LAPACK_ssytri2x( char* uplo, lapack_int* n,
16059                       float* a, lapack_int* lda,
16060                       const lapack_int* ipiv, float* work,
16061                       lapack_int* nb , lapack_int *info );
16062 void LAPACK_ssytrs2( char* uplo, lapack_int* n,
16063                      lapack_int* nrhs, const float* a,
16064                      lapack_int* lda, const lapack_int* ipiv,
16065                      float* b, lapack_int* ldb, float* work , lapack_int *info );
16066 void LAPACK_zbbcsd( char* jobu1, char* jobu2,
16067                     char* jobv1t, char* jobv2t, char* trans,
16068                     lapack_int* m, lapack_int* p, lapack_int* q,
16069                     double* theta, double* phi,
16070                     lapack_complex_double* u1, lapack_int* ldu1,
16071                     lapack_complex_double* u2, lapack_int* ldu2,
16072                     lapack_complex_double* v1t, lapack_int* ldv1t,
16073                     lapack_complex_double* v2t, lapack_int* ldv2t,
16074                     double* b11d, double* b11e, double* b12d,
16075                     double* b12e, double* b21d, double* b21e,
16076                     double* b22d, double* b22e, double* rwork,
16077                     lapack_int* lrwork , lapack_int *info );
16078 void LAPACK_zheswapr( char* uplo, lapack_int* n,
16079                       lapack_complex_double* a, lapack_int* i1,
16080                       lapack_int* i2 );
16081 void LAPACK_zhetri2( char* uplo, lapack_int* n,
16082                      lapack_complex_double* a, lapack_int* lda,
16083                      const lapack_int* ipiv,
16084                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16085 void LAPACK_zhetri2x( char* uplo, lapack_int* n,
16086                       lapack_complex_double* a, lapack_int* lda,
16087                       const lapack_int* ipiv,
16088                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
16089 void LAPACK_zhetrs2( char* uplo, lapack_int* n,
16090                      lapack_int* nrhs,
16091                      const lapack_complex_double* a, lapack_int* lda,
16092                      const lapack_int* ipiv,
16093                      lapack_complex_double* b, lapack_int* ldb,
16094                      lapack_complex_double* work , lapack_int *info );
16095 void LAPACK_zsyconv( char* uplo, char* way,
16096                      lapack_int* n, lapack_complex_double* a,
16097                      lapack_int* lda, const lapack_int* ipiv,
16098                      lapack_complex_double* work , lapack_int *info );
16099 void LAPACK_zsyswapr( char* uplo, lapack_int* n,
16100                       lapack_complex_double* a, lapack_int* i1,
16101                       lapack_int* i2 );
16102 void LAPACK_zsytri2( char* uplo, lapack_int* n,
16103                      lapack_complex_double* a, lapack_int* lda,
16104                      const lapack_int* ipiv,
16105                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16106 void LAPACK_zsytri2x( char* uplo, lapack_int* n,
16107                       lapack_complex_double* a, lapack_int* lda,
16108                       const lapack_int* ipiv,
16109                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
16110 void LAPACK_zsytrs2( char* uplo, lapack_int* n,
16111                      lapack_int* nrhs,
16112                      const lapack_complex_double* a, lapack_int* lda,
16113                      const lapack_int* ipiv,
16114                      lapack_complex_double* b, lapack_int* ldb,
16115                      lapack_complex_double* work , lapack_int *info );
16116 void LAPACK_zunbdb( char* trans, char* signs,
16117                     lapack_int* m, lapack_int* p, lapack_int* q,
16118                     lapack_complex_double* x11, lapack_int* ldx11,
16119                     lapack_complex_double* x12, lapack_int* ldx12,
16120                     lapack_complex_double* x21, lapack_int* ldx21,
16121                     lapack_complex_double* x22, lapack_int* ldx22,
16122                     double* theta, double* phi,
16123                     lapack_complex_double* taup1,
16124                     lapack_complex_double* taup2,
16125                     lapack_complex_double* tauq1,
16126                     lapack_complex_double* tauq2,
16127                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
16128 void LAPACK_zuncsd( char* jobu1, char* jobu2,
16129                     char* jobv1t, char* jobv2t, char* trans,
16130                     char* signs, lapack_int* m, lapack_int* p,
16131                     lapack_int* q, lapack_complex_double* x11,
16132                     lapack_int* ldx11, lapack_complex_double* x12,
16133                     lapack_int* ldx12, lapack_complex_double* x21,
16134                     lapack_int* ldx21, lapack_complex_double* x22,
16135                     lapack_int* ldx22, double* theta,
16136                     lapack_complex_double* u1, lapack_int* ldu1,
16137                     lapack_complex_double* u2, lapack_int* ldu2,
16138                     lapack_complex_double* v1t, lapack_int* ldv1t,
16139                     lapack_complex_double* v2t, lapack_int* ldv2t,
16140                     lapack_complex_double* work, lapack_int* lwork,
16141                     double* rwork, lapack_int* lrwork,
16142                     lapack_int* iwork , lapack_int *info );
16143 // LAPACK 3.4.0
16144 void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16145                      lapack_int* k, lapack_int* nb, const float* v,
16146                      lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
16147                      lapack_int* ldc, float* work, lapack_int *info );
16148 void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16149                      lapack_int* k, lapack_int* nb, const double* v,
16150                      lapack_int* ldv, const double* t, lapack_int* ldt,
16151                      double* c, lapack_int* ldc, double* work,
16152                      lapack_int *info );
16153 void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16154                      lapack_int* k, lapack_int* nb,
16155                      const lapack_complex_float* v, lapack_int* ldv,
16156                      const lapack_complex_float* t, lapack_int* ldt,
16157                      lapack_complex_float* c, lapack_int* ldc,
16158                      lapack_complex_float* work, lapack_int *info );
16159 void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16160                      lapack_int* k, lapack_int* nb,
16161                      const lapack_complex_double* v, lapack_int* ldv,
16162                      const lapack_complex_double* t, lapack_int* ldt,
16163                      lapack_complex_double* c, lapack_int* ldc,
16164                      lapack_complex_double* work, lapack_int *info );
16165 void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
16166                     lapack_int* lda, float* t, lapack_int* ldt, float* work,
16167                     lapack_int *info );
16168 void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
16169                     lapack_int* lda, double* t, lapack_int* ldt, double* work,
16170                     lapack_int *info );
16171 void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
16172                     lapack_complex_float* a, lapack_int* lda,
16173                     lapack_complex_float* t, lapack_int* ldt,
16174                     lapack_complex_float* work, lapack_int *info );
16175 void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
16176                     lapack_complex_double* a, lapack_int* lda,
16177                     lapack_complex_double* t, lapack_int* ldt,
16178                     lapack_complex_double* work, lapack_int *info );
16179 void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16180                      float* t, lapack_int* ldt, lapack_int *info );
16181 void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16182                      double* t, lapack_int* ldt, lapack_int *info );
16183 void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16184                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
16185                      lapack_int *info );
16186 void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16187                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
16188                      lapack_int *info );
16189 void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16190                      float* t, lapack_int* ldt, lapack_int *info );
16191 void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16192                      double* t, lapack_int* ldt, lapack_int *info );
16193 void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16194                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
16195                      lapack_int *info );
16196 void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16197                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
16198                      lapack_int *info );
16199 void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16200                      lapack_int* k, lapack_int* l, lapack_int* nb,
16201                      const float* v, lapack_int* ldv, const float* t,
16202                      lapack_int* ldt, float* a, lapack_int* lda, float* b,
16203                      lapack_int* ldb, float* work, lapack_int *info );
16204 void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16205                      lapack_int* k, lapack_int* l, lapack_int* nb,
16206                      const double* v, lapack_int* ldv, const double* t,
16207                      lapack_int* ldt, double* a, lapack_int* lda, double* b,
16208                      lapack_int* ldb, double* work, lapack_int *info );
16209 void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16210                      lapack_int* k, lapack_int* l, lapack_int* nb,
16211                      const lapack_complex_float* v, lapack_int* ldv,
16212                      const lapack_complex_float* t, lapack_int* ldt,
16213                      lapack_complex_float* a, lapack_int* lda,
16214                      lapack_complex_float* b, lapack_int* ldb,
16215                      lapack_complex_float* work, lapack_int *info );
16216 void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
16217                      lapack_int* k, lapack_int* l, lapack_int* nb,
16218                      const lapack_complex_double* v, lapack_int* ldv,
16219                      const lapack_complex_double* t, lapack_int* ldt,
16220                      lapack_complex_double* a, lapack_int* lda,
16221                      lapack_complex_double* b, lapack_int* ldb,
16222                      lapack_complex_double* work, lapack_int *info );
16223 void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16224                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16225                     double* t, lapack_int* ldt, double* work,
16226                     lapack_int *info );
16227 void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16228                     lapack_complex_float* a, lapack_int* lda,
16229                     lapack_complex_float* t, lapack_complex_float* b,
16230                     lapack_int* ldb, lapack_int* ldt,
16231                     lapack_complex_float* work, lapack_int *info );
16232 void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
16233                     lapack_complex_double* a, lapack_int* lda,
16234                     lapack_complex_double* b, lapack_int* ldb,
16235                     lapack_complex_double* t, lapack_int* ldt,
16236                     lapack_complex_double* work, lapack_int *info );
16237 void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
16238                      float* b, lapack_int* ldb, float* t, lapack_int* ldt,
16239                      lapack_int *info );
16240 void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
16241                      double* b, lapack_int* ldb, double* t, lapack_int* ldt,
16242                      lapack_int *info );
16243 void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
16244                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16245                      lapack_complex_float* t, lapack_int* ldt,
16246                      lapack_int *info );
16247 void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16248                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16249                      lapack_complex_double* t, lapack_int* ldt,
16250                      lapack_int *info );
16251 void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
16252                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16253                     const float* v, lapack_int* ldv, const float* t,
16254                     lapack_int* ldt, float* a, lapack_int* lda, float* b,
16255                     lapack_int* ldb, const float* mywork,
16256                     lapack_int* myldwork );
16257 void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
16258                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16259                     const double* v, lapack_int* ldv, const double* t,
16260                     lapack_int* ldt, double* a, lapack_int* lda, double* b,
16261                     lapack_int* ldb, const double* mywork,
16262                     lapack_int* myldwork );
16263 void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
16264                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16265                     const lapack_complex_float* v, lapack_int* ldv,
16266                     const lapack_complex_float* t, lapack_int* ldt,
16267                     lapack_complex_float* a, lapack_int* lda,
16268                     lapack_complex_float* b, lapack_int* ldb,
16269                     const float* mywork, lapack_int* myldwork );
16270 void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
16271                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
16272                     const lapack_complex_double* v, lapack_int* ldv,
16273                     const lapack_complex_double* t, lapack_int* ldt,
16274                     lapack_complex_double* a, lapack_int* lda,
16275                     lapack_complex_double* b, lapack_int* ldb,
16276                     const double* mywork, lapack_int* myldwork );
16277 // LAPACK 3.X.X
16278 void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
16279                       const lapack_complex_float* x, lapack_int* incx,
16280                       lapack_complex_float* a, lapack_int* lda );
16281 void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
16282                       const lapack_complex_double* x, lapack_int* incx,
16283                       lapack_complex_double* a, lapack_int* lda );
16284 
16285 #ifdef __cplusplus
16286 }
16287 #endif /* __cplusplus */
16288 
16289 #endif /* _LAPACKE_H_ */
16290 
16291 #endif /* _MKL_LAPACKE_H_ */
 All Classes Functions Variables Typedefs Enumerations Enumerator Friends