Home | History | Annotate | Download | only in misc 
      1 /*****************************************************************************
      2   Copyright (c) 2010, Intel Corp.
      3   All rights reserved.
      4 
      5   Redistribution and use in source and binary forms, with or without
      6   modification, are permitted provided that the following conditions are met:
      7 
      8     * Redistributions of source code must retain the above copyright notice,
      9       this list of conditions and the following disclaimer.
     10     * Redistributions in binary form must reproduce the above copyright
     11       notice, this list of conditions and the following disclaimer in the
     12       documentation and/or other materials provided with the distribution.
     13     * Neither the name of Intel Corporation nor the names of its contributors
     14       may be used to endorse or promote products derived from this software
     15       without specific prior written permission.
     16 
     17   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
     18   AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     19   IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     20   ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
     21   LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     22   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     23   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     24   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     25   CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     26   ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
     27   THE POSSIBILITY OF SUCH DAMAGE.
     28 ******************************************************************************
     29 * Contents: Native C interface to LAPACK
     30 * Author: Intel Corporation
     31 * Generated November, 2011
     32 *****************************************************************************/
     33 
     34 #ifndef _MKL_LAPACKE_H_
     35 
     36 #ifndef _LAPACKE_H_
     37 #define _LAPACKE_H_
     38 
     39 /*
     40 *  Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
     41 */
     42 #ifdef HAVE_LAPACK_CONFIG_H
     43 #include "lapacke_config.h"
     44 #endif
     45 
     46 #ifdef __cplusplus
     47 extern "C" {
     48 #endif /* __cplusplus */
     49 
     50 #include <stdlib.h>
     51 
     52 #ifndef lapack_int
     53 #define lapack_int     int
     54 #endif
     55 
     56 #ifndef lapack_logical
     57 #define lapack_logical lapack_int
     58 #endif
     59 
     60 /* Complex types are structures equivalent to the
     61 * Fortran complex types COMPLEX(4) and COMPLEX(8).
     62 *
     63 * One can also redefine the types with his own types
     64 * for example by including in the code definitions like
     65 *
     66 * #define lapack_complex_float std::complex<float>
     67 * #define lapack_complex_double std::complex<double>
     68 *
     69 * or define these types in the command line:
     70 *
     71 * -Dlapack_complex_float="std::complex<float>"
     72 * -Dlapack_complex_double="std::complex<double>"
     73 */
     74 
     75 #ifndef LAPACK_COMPLEX_CUSTOM
     76 
     77 /* Complex type (single precision) */
     78 #ifndef lapack_complex_float
     79 #include <complex.h>
     80 #define lapack_complex_float    float _Complex
     81 #endif
     82 
     83 #ifndef lapack_complex_float_real
     84 #define lapack_complex_float_real(z)       (creal(z))
     85 #endif
     86 
     87 #ifndef lapack_complex_float_imag
     88 #define lapack_complex_float_imag(z)       (cimag(z))
     89 #endif
     90 
     91 lapack_complex_float lapack_make_complex_float( float re, float im );
     92 
     93 /* Complex type (double precision) */
     94 #ifndef lapack_complex_double
     95 #include <complex.h>
     96 #define lapack_complex_double   double _Complex
     97 #endif
     98 
     99 #ifndef lapack_complex_double_real
    100 #define lapack_complex_double_real(z)      (creal(z))
    101 #endif
    102 
    103 #ifndef lapack_complex_double_imag
    104 #define lapack_complex_double_imag(z)       (cimag(z))
    105 #endif
    106 
    107 lapack_complex_double lapack_make_complex_double( double re, double im );
    108 
    109 #endif
    110 
    111 #ifndef LAPACKE_malloc
    112 #define LAPACKE_malloc( size ) malloc( size )
    113 #endif
    114 #ifndef LAPACKE_free
    115 #define LAPACKE_free( p )      free( p )
    116 #endif
    117 
    118 #define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
    119 #define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
    120 
    121 #define LAPACK_ROW_MAJOR               101
    122 #define LAPACK_COL_MAJOR               102
    123 
    124 #define LAPACK_WORK_MEMORY_ERROR       -1010
    125 #define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
    126 
    127 /* Callback logical functions of one, two, or three arguments are used
    128 *  to select eigenvalues to sort to the top left of the Schur form.
    129 *  The value is selected if function returns TRUE (non-zero). */
    130 
    131 typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
    132 typedef lapack_logical (*LAPACK_S_SELECT3)
    133     ( const float*, const float*, const float* );
    134 typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
    135 typedef lapack_logical (*LAPACK_D_SELECT3)
    136     ( const double*, const double*, const double* );
    137 
    138 typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
    139 typedef lapack_logical (*LAPACK_C_SELECT2)
    140     ( const lapack_complex_float*, const lapack_complex_float* );
    141 typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
    142 typedef lapack_logical (*LAPACK_Z_SELECT2)
    143     ( const lapack_complex_double*, const lapack_complex_double* );
    144 
    145 #include "lapacke_mangling.h"
    146 
    147 #define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
    148 lapack_logical LAPACK_lsame( char* ca,  char* cb,
    149                               lapack_int lca, lapack_int lcb );
    150 
    151 /* C-LAPACK function prototypes */
    152 
    153 lapack_int LAPACKE_sbdsdc( int matrix_order, char uplo, char compq,
    154                            lapack_int n, float* d, float* e, float* u,
    155                            lapack_int ldu, float* vt, lapack_int ldvt, float* q,
    156                            lapack_int* iq );
    157 lapack_int LAPACKE_dbdsdc( int matrix_order, char uplo, char compq,
    158                            lapack_int n, double* d, double* e, double* u,
    159                            lapack_int ldu, double* vt, lapack_int ldvt,
    160                            double* q, lapack_int* iq );
    161 
    162 lapack_int LAPACKE_sbdsqr( int matrix_order, char uplo, lapack_int n,
    163                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
    164                            float* d, float* e, float* vt, lapack_int ldvt,
    165                            float* u, lapack_int ldu, float* c, lapack_int ldc );
    166 lapack_int LAPACKE_dbdsqr( int matrix_order, char uplo, lapack_int n,
    167                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
    168                            double* d, double* e, double* vt, lapack_int ldvt,
    169                            double* u, lapack_int ldu, double* c,
    170                            lapack_int ldc );
    171 lapack_int LAPACKE_cbdsqr( int matrix_order, char uplo, lapack_int n,
    172                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
    173                            float* d, float* e, lapack_complex_float* vt,
    174                            lapack_int ldvt, lapack_complex_float* u,
    175                            lapack_int ldu, lapack_complex_float* c,
    176                            lapack_int ldc );
    177 lapack_int LAPACKE_zbdsqr( int matrix_order, char uplo, lapack_int n,
    178                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
    179                            double* d, double* e, lapack_complex_double* vt,
    180                            lapack_int ldvt, lapack_complex_double* u,
    181                            lapack_int ldu, lapack_complex_double* c,
    182                            lapack_int ldc );
    183 
    184 lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
    185                            float* sep );
    186 lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
    187                            const double* d, double* sep );
    188 
    189 lapack_int LAPACKE_sgbbrd( int matrix_order, char vect, lapack_int m,
    190                            lapack_int n, lapack_int ncc, lapack_int kl,
    191                            lapack_int ku, float* ab, lapack_int ldab, float* d,
    192                            float* e, float* q, lapack_int ldq, float* pt,
    193                            lapack_int ldpt, float* c, lapack_int ldc );
    194 lapack_int LAPACKE_dgbbrd( int matrix_order, char vect, lapack_int m,
    195                            lapack_int n, lapack_int ncc, lapack_int kl,
    196                            lapack_int ku, double* ab, lapack_int ldab,
    197                            double* d, double* e, double* q, lapack_int ldq,
    198                            double* pt, lapack_int ldpt, double* c,
    199                            lapack_int ldc );
    200 lapack_int LAPACKE_cgbbrd( int matrix_order, char vect, lapack_int m,
    201                            lapack_int n, lapack_int ncc, lapack_int kl,
    202                            lapack_int ku, lapack_complex_float* ab,
    203                            lapack_int ldab, float* d, float* e,
    204                            lapack_complex_float* q, lapack_int ldq,
    205                            lapack_complex_float* pt, lapack_int ldpt,
    206                            lapack_complex_float* c, lapack_int ldc );
    207 lapack_int LAPACKE_zgbbrd( int matrix_order, char vect, lapack_int m,
    208                            lapack_int n, lapack_int ncc, lapack_int kl,
    209                            lapack_int ku, lapack_complex_double* ab,
    210                            lapack_int ldab, double* d, double* e,
    211                            lapack_complex_double* q, lapack_int ldq,
    212                            lapack_complex_double* pt, lapack_int ldpt,
    213                            lapack_complex_double* c, lapack_int ldc );
    214 
    215 lapack_int LAPACKE_sgbcon( int matrix_order, char norm, lapack_int n,
    216                            lapack_int kl, lapack_int ku, const float* ab,
    217                            lapack_int ldab, const lapack_int* ipiv, float anorm,
    218                            float* rcond );
    219 lapack_int LAPACKE_dgbcon( int matrix_order, char norm, lapack_int n,
    220                            lapack_int kl, lapack_int ku, const double* ab,
    221                            lapack_int ldab, const lapack_int* ipiv,
    222                            double anorm, double* rcond );
    223 lapack_int LAPACKE_cgbcon( int matrix_order, char norm, lapack_int n,
    224                            lapack_int kl, lapack_int ku,
    225                            const lapack_complex_float* ab, lapack_int ldab,
    226                            const lapack_int* ipiv, float anorm, float* rcond );
    227 lapack_int LAPACKE_zgbcon( int matrix_order, char norm, lapack_int n,
    228                            lapack_int kl, lapack_int ku,
    229                            const lapack_complex_double* ab, lapack_int ldab,
    230                            const lapack_int* ipiv, double anorm,
    231                            double* rcond );
    232 
    233 lapack_int LAPACKE_sgbequ( int matrix_order, lapack_int m, lapack_int n,
    234                            lapack_int kl, lapack_int ku, const float* ab,
    235                            lapack_int ldab, float* r, float* c, float* rowcnd,
    236                            float* colcnd, float* amax );
    237 lapack_int LAPACKE_dgbequ( int matrix_order, lapack_int m, lapack_int n,
    238                            lapack_int kl, lapack_int ku, const double* ab,
    239                            lapack_int ldab, double* r, double* c,
    240                            double* rowcnd, double* colcnd, double* amax );
    241 lapack_int LAPACKE_cgbequ( int matrix_order, lapack_int m, lapack_int n,
    242                            lapack_int kl, lapack_int ku,
    243                            const lapack_complex_float* ab, lapack_int ldab,
    244                            float* r, float* c, float* rowcnd, float* colcnd,
    245                            float* amax );
    246 lapack_int LAPACKE_zgbequ( int matrix_order, lapack_int m, lapack_int n,
    247                            lapack_int kl, lapack_int ku,
    248                            const lapack_complex_double* ab, lapack_int ldab,
    249                            double* r, double* c, double* rowcnd, double* colcnd,
    250                            double* amax );
    251 
    252 lapack_int LAPACKE_sgbequb( int matrix_order, lapack_int m, lapack_int n,
    253                             lapack_int kl, lapack_int ku, const float* ab,
    254                             lapack_int ldab, float* r, float* c, float* rowcnd,
    255                             float* colcnd, float* amax );
    256 lapack_int LAPACKE_dgbequb( int matrix_order, lapack_int m, lapack_int n,
    257                             lapack_int kl, lapack_int ku, const double* ab,
    258                             lapack_int ldab, double* r, double* c,
    259                             double* rowcnd, double* colcnd, double* amax );
    260 lapack_int LAPACKE_cgbequb( int matrix_order, lapack_int m, lapack_int n,
    261                             lapack_int kl, lapack_int ku,
    262                             const lapack_complex_float* ab, lapack_int ldab,
    263                             float* r, float* c, float* rowcnd, float* colcnd,
    264                             float* amax );
    265 lapack_int LAPACKE_zgbequb( int matrix_order, lapack_int m, lapack_int n,
    266                             lapack_int kl, lapack_int ku,
    267                             const lapack_complex_double* ab, lapack_int ldab,
    268                             double* r, double* c, double* rowcnd,
    269                             double* colcnd, double* amax );
    270 
    271 lapack_int LAPACKE_sgbrfs( int matrix_order, char trans, lapack_int n,
    272                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    273                            const float* ab, lapack_int ldab, const float* afb,
    274                            lapack_int ldafb, const lapack_int* ipiv,
    275                            const float* b, lapack_int ldb, float* x,
    276                            lapack_int ldx, float* ferr, float* berr );
    277 lapack_int LAPACKE_dgbrfs( int matrix_order, char trans, lapack_int n,
    278                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    279                            const double* ab, lapack_int ldab, const double* afb,
    280                            lapack_int ldafb, const lapack_int* ipiv,
    281                            const double* b, lapack_int ldb, double* x,
    282                            lapack_int ldx, double* ferr, double* berr );
    283 lapack_int LAPACKE_cgbrfs( int matrix_order, char trans, lapack_int n,
    284                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    285                            const lapack_complex_float* ab, lapack_int ldab,
    286                            const lapack_complex_float* afb, lapack_int ldafb,
    287                            const lapack_int* ipiv,
    288                            const lapack_complex_float* b, lapack_int ldb,
    289                            lapack_complex_float* x, lapack_int ldx, float* ferr,
    290                            float* berr );
    291 lapack_int LAPACKE_zgbrfs( int matrix_order, char trans, lapack_int n,
    292                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    293                            const lapack_complex_double* ab, lapack_int ldab,
    294                            const lapack_complex_double* afb, lapack_int ldafb,
    295                            const lapack_int* ipiv,
    296                            const lapack_complex_double* b, lapack_int ldb,
    297                            lapack_complex_double* x, lapack_int ldx,
    298                            double* ferr, double* berr );
    299 
    300 lapack_int LAPACKE_sgbrfsx( int matrix_order, char trans, char equed,
    301                             lapack_int n, lapack_int kl, lapack_int ku,
    302                             lapack_int nrhs, const float* ab, lapack_int ldab,
    303                             const float* afb, lapack_int ldafb,
    304                             const lapack_int* ipiv, const float* r,
    305                             const float* c, const float* b, lapack_int ldb,
    306                             float* x, lapack_int ldx, float* rcond, float* berr,
    307                             lapack_int n_err_bnds, float* err_bnds_norm,
    308                             float* err_bnds_comp, lapack_int nparams,
    309                             float* params );
    310 lapack_int LAPACKE_dgbrfsx( int matrix_order, char trans, char equed,
    311                             lapack_int n, lapack_int kl, lapack_int ku,
    312                             lapack_int nrhs, const double* ab, lapack_int ldab,
    313                             const double* afb, lapack_int ldafb,
    314                             const lapack_int* ipiv, const double* r,
    315                             const double* c, const double* b, lapack_int ldb,
    316                             double* x, lapack_int ldx, double* rcond,
    317                             double* berr, lapack_int n_err_bnds,
    318                             double* err_bnds_norm, double* err_bnds_comp,
    319                             lapack_int nparams, double* params );
    320 lapack_int LAPACKE_cgbrfsx( int matrix_order, char trans, char equed,
    321                             lapack_int n, lapack_int kl, lapack_int ku,
    322                             lapack_int nrhs, const lapack_complex_float* ab,
    323                             lapack_int ldab, const lapack_complex_float* afb,
    324                             lapack_int ldafb, const lapack_int* ipiv,
    325                             const float* r, const float* c,
    326                             const lapack_complex_float* b, lapack_int ldb,
    327                             lapack_complex_float* x, lapack_int ldx,
    328                             float* rcond, float* berr, lapack_int n_err_bnds,
    329                             float* err_bnds_norm, float* err_bnds_comp,
    330                             lapack_int nparams, float* params );
    331 lapack_int LAPACKE_zgbrfsx( int matrix_order, char trans, char equed,
    332                             lapack_int n, lapack_int kl, lapack_int ku,
    333                             lapack_int nrhs, const lapack_complex_double* ab,
    334                             lapack_int ldab, const lapack_complex_double* afb,
    335                             lapack_int ldafb, const lapack_int* ipiv,
    336                             const double* r, const double* c,
    337                             const lapack_complex_double* b, lapack_int ldb,
    338                             lapack_complex_double* x, lapack_int ldx,
    339                             double* rcond, double* berr, lapack_int n_err_bnds,
    340                             double* err_bnds_norm, double* err_bnds_comp,
    341                             lapack_int nparams, double* params );
    342 
    343 lapack_int LAPACKE_sgbsv( int matrix_order, lapack_int n, lapack_int kl,
    344                           lapack_int ku, lapack_int nrhs, float* ab,
    345                           lapack_int ldab, lapack_int* ipiv, float* b,
    346                           lapack_int ldb );
    347 lapack_int LAPACKE_dgbsv( int matrix_order, lapack_int n, lapack_int kl,
    348                           lapack_int ku, lapack_int nrhs, double* ab,
    349                           lapack_int ldab, lapack_int* ipiv, double* b,
    350                           lapack_int ldb );
    351 lapack_int LAPACKE_cgbsv( int matrix_order, lapack_int n, lapack_int kl,
    352                           lapack_int ku, lapack_int nrhs,
    353                           lapack_complex_float* ab, lapack_int ldab,
    354                           lapack_int* ipiv, lapack_complex_float* b,
    355                           lapack_int ldb );
    356 lapack_int LAPACKE_zgbsv( int matrix_order, lapack_int n, lapack_int kl,
    357                           lapack_int ku, lapack_int nrhs,
    358                           lapack_complex_double* ab, lapack_int ldab,
    359                           lapack_int* ipiv, lapack_complex_double* b,
    360                           lapack_int ldb );
    361 
    362 lapack_int LAPACKE_sgbsvx( int matrix_order, char fact, char trans,
    363                            lapack_int n, lapack_int kl, lapack_int ku,
    364                            lapack_int nrhs, float* ab, lapack_int ldab,
    365                            float* afb, lapack_int ldafb, lapack_int* ipiv,
    366                            char* equed, float* r, float* c, float* b,
    367                            lapack_int ldb, float* x, lapack_int ldx,
    368                            float* rcond, float* ferr, float* berr,
    369                            float* rpivot );
    370 lapack_int LAPACKE_dgbsvx( int matrix_order, char fact, char trans,
    371                            lapack_int n, lapack_int kl, lapack_int ku,
    372                            lapack_int nrhs, double* ab, lapack_int ldab,
    373                            double* afb, lapack_int ldafb, lapack_int* ipiv,
    374                            char* equed, double* r, double* c, double* b,
    375                            lapack_int ldb, double* x, lapack_int ldx,
    376                            double* rcond, double* ferr, double* berr,
    377                            double* rpivot );
    378 lapack_int LAPACKE_cgbsvx( int matrix_order, char fact, char trans,
    379                            lapack_int n, lapack_int kl, lapack_int ku,
    380                            lapack_int nrhs, lapack_complex_float* ab,
    381                            lapack_int ldab, lapack_complex_float* afb,
    382                            lapack_int ldafb, lapack_int* ipiv, char* equed,
    383                            float* r, float* c, lapack_complex_float* b,
    384                            lapack_int ldb, lapack_complex_float* x,
    385                            lapack_int ldx, float* rcond, float* ferr,
    386                            float* berr, float* rpivot );
    387 lapack_int LAPACKE_zgbsvx( int matrix_order, char fact, char trans,
    388                            lapack_int n, lapack_int kl, lapack_int ku,
    389                            lapack_int nrhs, lapack_complex_double* ab,
    390                            lapack_int ldab, lapack_complex_double* afb,
    391                            lapack_int ldafb, lapack_int* ipiv, char* equed,
    392                            double* r, double* c, lapack_complex_double* b,
    393                            lapack_int ldb, lapack_complex_double* x,
    394                            lapack_int ldx, double* rcond, double* ferr,
    395                            double* berr, double* rpivot );
    396 
    397 lapack_int LAPACKE_sgbsvxx( int matrix_order, char fact, char trans,
    398                             lapack_int n, lapack_int kl, lapack_int ku,
    399                             lapack_int nrhs, float* ab, lapack_int ldab,
    400                             float* afb, lapack_int ldafb, lapack_int* ipiv,
    401                             char* equed, float* r, float* c, float* b,
    402                             lapack_int ldb, float* x, lapack_int ldx,
    403                             float* rcond, float* rpvgrw, float* berr,
    404                             lapack_int n_err_bnds, float* err_bnds_norm,
    405                             float* err_bnds_comp, lapack_int nparams,
    406                             float* params );
    407 lapack_int LAPACKE_dgbsvxx( int matrix_order, char fact, char trans,
    408                             lapack_int n, lapack_int kl, lapack_int ku,
    409                             lapack_int nrhs, double* ab, lapack_int ldab,
    410                             double* afb, lapack_int ldafb, lapack_int* ipiv,
    411                             char* equed, double* r, double* c, double* b,
    412                             lapack_int ldb, double* x, lapack_int ldx,
    413                             double* rcond, double* rpvgrw, double* berr,
    414                             lapack_int n_err_bnds, double* err_bnds_norm,
    415                             double* err_bnds_comp, lapack_int nparams,
    416                             double* params );
    417 lapack_int LAPACKE_cgbsvxx( int matrix_order, char fact, char trans,
    418                             lapack_int n, lapack_int kl, lapack_int ku,
    419                             lapack_int nrhs, lapack_complex_float* ab,
    420                             lapack_int ldab, lapack_complex_float* afb,
    421                             lapack_int ldafb, lapack_int* ipiv, char* equed,
    422                             float* r, float* c, lapack_complex_float* b,
    423                             lapack_int ldb, lapack_complex_float* x,
    424                             lapack_int ldx, float* rcond, float* rpvgrw,
    425                             float* berr, lapack_int n_err_bnds,
    426                             float* err_bnds_norm, float* err_bnds_comp,
    427                             lapack_int nparams, float* params );
    428 lapack_int LAPACKE_zgbsvxx( int matrix_order, char fact, char trans,
    429                             lapack_int n, lapack_int kl, lapack_int ku,
    430                             lapack_int nrhs, lapack_complex_double* ab,
    431                             lapack_int ldab, lapack_complex_double* afb,
    432                             lapack_int ldafb, lapack_int* ipiv, char* equed,
    433                             double* r, double* c, lapack_complex_double* b,
    434                             lapack_int ldb, lapack_complex_double* x,
    435                             lapack_int ldx, double* rcond, double* rpvgrw,
    436                             double* berr, lapack_int n_err_bnds,
    437                             double* err_bnds_norm, double* err_bnds_comp,
    438                             lapack_int nparams, double* params );
    439 
    440 lapack_int LAPACKE_sgbtrf( int matrix_order, lapack_int m, lapack_int n,
    441                            lapack_int kl, lapack_int ku, float* ab,
    442                            lapack_int ldab, lapack_int* ipiv );
    443 lapack_int LAPACKE_dgbtrf( int matrix_order, lapack_int m, lapack_int n,
    444                            lapack_int kl, lapack_int ku, double* ab,
    445                            lapack_int ldab, lapack_int* ipiv );
    446 lapack_int LAPACKE_cgbtrf( int matrix_order, lapack_int m, lapack_int n,
    447                            lapack_int kl, lapack_int ku,
    448                            lapack_complex_float* ab, lapack_int ldab,
    449                            lapack_int* ipiv );
    450 lapack_int LAPACKE_zgbtrf( int matrix_order, lapack_int m, lapack_int n,
    451                            lapack_int kl, lapack_int ku,
    452                            lapack_complex_double* ab, lapack_int ldab,
    453                            lapack_int* ipiv );
    454 
    455 lapack_int LAPACKE_sgbtrs( int matrix_order, char trans, lapack_int n,
    456                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    457                            const float* ab, lapack_int ldab,
    458                            const lapack_int* ipiv, float* b, lapack_int ldb );
    459 lapack_int LAPACKE_dgbtrs( int matrix_order, char trans, lapack_int n,
    460                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    461                            const double* ab, lapack_int ldab,
    462                            const lapack_int* ipiv, double* b, lapack_int ldb );
    463 lapack_int LAPACKE_cgbtrs( int matrix_order, char trans, lapack_int n,
    464                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    465                            const lapack_complex_float* ab, lapack_int ldab,
    466                            const lapack_int* ipiv, lapack_complex_float* b,
    467                            lapack_int ldb );
    468 lapack_int LAPACKE_zgbtrs( int matrix_order, char trans, lapack_int n,
    469                            lapack_int kl, lapack_int ku, lapack_int nrhs,
    470                            const lapack_complex_double* ab, lapack_int ldab,
    471                            const lapack_int* ipiv, lapack_complex_double* b,
    472                            lapack_int ldb );
    473 
    474 lapack_int LAPACKE_sgebak( int matrix_order, char job, char side, lapack_int n,
    475                            lapack_int ilo, lapack_int ihi, const float* scale,
    476                            lapack_int m, float* v, lapack_int ldv );
    477 lapack_int LAPACKE_dgebak( int matrix_order, char job, char side, lapack_int n,
    478                            lapack_int ilo, lapack_int ihi, const double* scale,
    479                            lapack_int m, double* v, lapack_int ldv );
    480 lapack_int LAPACKE_cgebak( int matrix_order, char job, char side, lapack_int n,
    481                            lapack_int ilo, lapack_int ihi, const float* scale,
    482                            lapack_int m, lapack_complex_float* v,
    483                            lapack_int ldv );
    484 lapack_int LAPACKE_zgebak( int matrix_order, char job, char side, lapack_int n,
    485                            lapack_int ilo, lapack_int ihi, const double* scale,
    486                            lapack_int m, lapack_complex_double* v,
    487                            lapack_int ldv );
    488 
    489 lapack_int LAPACKE_sgebal( int matrix_order, char job, lapack_int n, float* a,
    490                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
    491                            float* scale );
    492 lapack_int LAPACKE_dgebal( int matrix_order, char job, lapack_int n, double* a,
    493                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
    494                            double* scale );
    495 lapack_int LAPACKE_cgebal( int matrix_order, char job, lapack_int n,
    496                            lapack_complex_float* a, lapack_int lda,
    497                            lapack_int* ilo, lapack_int* ihi, float* scale );
    498 lapack_int LAPACKE_zgebal( int matrix_order, char job, lapack_int n,
    499                            lapack_complex_double* a, lapack_int lda,
    500                            lapack_int* ilo, lapack_int* ihi, double* scale );
    501 
    502 lapack_int LAPACKE_sgebrd( int matrix_order, lapack_int m, lapack_int n,
    503                            float* a, lapack_int lda, float* d, float* e,
    504                            float* tauq, float* taup );
    505 lapack_int LAPACKE_dgebrd( int matrix_order, lapack_int m, lapack_int n,
    506                            double* a, lapack_int lda, double* d, double* e,
    507                            double* tauq, double* taup );
    508 lapack_int LAPACKE_cgebrd( int matrix_order, lapack_int m, lapack_int n,
    509                            lapack_complex_float* a, lapack_int lda, float* d,
    510                            float* e, lapack_complex_float* tauq,
    511                            lapack_complex_float* taup );
    512 lapack_int LAPACKE_zgebrd( int matrix_order, lapack_int m, lapack_int n,
    513                            lapack_complex_double* a, lapack_int lda, double* d,
    514                            double* e, lapack_complex_double* tauq,
    515                            lapack_complex_double* taup );
    516 
    517 lapack_int LAPACKE_sgecon( int matrix_order, char norm, lapack_int n,
    518                            const float* a, lapack_int lda, float anorm,
    519                            float* rcond );
    520 lapack_int LAPACKE_dgecon( int matrix_order, char norm, lapack_int n,
    521                            const double* a, lapack_int lda, double anorm,
    522                            double* rcond );
    523 lapack_int LAPACKE_cgecon( int matrix_order, char norm, lapack_int n,
    524                            const lapack_complex_float* a, lapack_int lda,
    525                            float anorm, float* rcond );
    526 lapack_int LAPACKE_zgecon( int matrix_order, char norm, lapack_int n,
    527                            const lapack_complex_double* a, lapack_int lda,
    528                            double anorm, double* rcond );
    529 
    530 lapack_int LAPACKE_sgeequ( int matrix_order, lapack_int m, lapack_int n,
    531                            const float* a, lapack_int lda, float* r, float* c,
    532                            float* rowcnd, float* colcnd, float* amax );
    533 lapack_int LAPACKE_dgeequ( int matrix_order, lapack_int m, lapack_int n,
    534                            const double* a, lapack_int lda, double* r,
    535                            double* c, double* rowcnd, double* colcnd,
    536                            double* amax );
    537 lapack_int LAPACKE_cgeequ( int matrix_order, lapack_int m, lapack_int n,
    538                            const lapack_complex_float* a, lapack_int lda,
    539                            float* r, float* c, float* rowcnd, float* colcnd,
    540                            float* amax );
    541 lapack_int LAPACKE_zgeequ( int matrix_order, lapack_int m, lapack_int n,
    542                            const lapack_complex_double* a, lapack_int lda,
    543                            double* r, double* c, double* rowcnd, double* colcnd,
    544                            double* amax );
    545 
    546 lapack_int LAPACKE_sgeequb( int matrix_order, lapack_int m, lapack_int n,
    547                             const float* a, lapack_int lda, float* r, float* c,
    548                             float* rowcnd, float* colcnd, float* amax );
    549 lapack_int LAPACKE_dgeequb( int matrix_order, lapack_int m, lapack_int n,
    550                             const double* a, lapack_int lda, double* r,
    551                             double* c, double* rowcnd, double* colcnd,
    552                             double* amax );
    553 lapack_int LAPACKE_cgeequb( int matrix_order, lapack_int m, lapack_int n,
    554                             const lapack_complex_float* a, lapack_int lda,
    555                             float* r, float* c, float* rowcnd, float* colcnd,
    556                             float* amax );
    557 lapack_int LAPACKE_zgeequb( int matrix_order, lapack_int m, lapack_int n,
    558                             const lapack_complex_double* a, lapack_int lda,
    559                             double* r, double* c, double* rowcnd,
    560                             double* colcnd, double* amax );
    561 
    562 lapack_int LAPACKE_sgees( int matrix_order, char jobvs, char sort,
    563                           LAPACK_S_SELECT2 select, lapack_int n, float* a,
    564                           lapack_int lda, lapack_int* sdim, float* wr,
    565                           float* wi, float* vs, lapack_int ldvs );
    566 lapack_int LAPACKE_dgees( int matrix_order, char jobvs, char sort,
    567                           LAPACK_D_SELECT2 select, lapack_int n, double* a,
    568                           lapack_int lda, lapack_int* sdim, double* wr,
    569                           double* wi, double* vs, lapack_int ldvs );
    570 lapack_int LAPACKE_cgees( int matrix_order, char jobvs, char sort,
    571                           LAPACK_C_SELECT1 select, lapack_int n,
    572                           lapack_complex_float* a, lapack_int lda,
    573                           lapack_int* sdim, lapack_complex_float* w,
    574                           lapack_complex_float* vs, lapack_int ldvs );
    575 lapack_int LAPACKE_zgees( int matrix_order, char jobvs, char sort,
    576                           LAPACK_Z_SELECT1 select, lapack_int n,
    577                           lapack_complex_double* a, lapack_int lda,
    578                           lapack_int* sdim, lapack_complex_double* w,
    579                           lapack_complex_double* vs, lapack_int ldvs );
    580 
    581 lapack_int LAPACKE_sgeesx( int matrix_order, char jobvs, char sort,
    582                            LAPACK_S_SELECT2 select, char sense, lapack_int n,
    583                            float* a, lapack_int lda, lapack_int* sdim,
    584                            float* wr, float* wi, float* vs, lapack_int ldvs,
    585                            float* rconde, float* rcondv );
    586 lapack_int LAPACKE_dgeesx( int matrix_order, char jobvs, char sort,
    587                            LAPACK_D_SELECT2 select, char sense, lapack_int n,
    588                            double* a, lapack_int lda, lapack_int* sdim,
    589                            double* wr, double* wi, double* vs, lapack_int ldvs,
    590                            double* rconde, double* rcondv );
    591 lapack_int LAPACKE_cgeesx( int matrix_order, char jobvs, char sort,
    592                            LAPACK_C_SELECT1 select, char sense, lapack_int n,
    593                            lapack_complex_float* a, lapack_int lda,
    594                            lapack_int* sdim, lapack_complex_float* w,
    595                            lapack_complex_float* vs, lapack_int ldvs,
    596                            float* rconde, float* rcondv );
    597 lapack_int LAPACKE_zgeesx( int matrix_order, char jobvs, char sort,
    598                            LAPACK_Z_SELECT1 select, char sense, lapack_int n,
    599                            lapack_complex_double* a, lapack_int lda,
    600                            lapack_int* sdim, lapack_complex_double* w,
    601                            lapack_complex_double* vs, lapack_int ldvs,
    602                            double* rconde, double* rcondv );
    603 
    604 lapack_int LAPACKE_sgeev( int matrix_order, char jobvl, char jobvr,
    605                           lapack_int n, float* a, lapack_int lda, float* wr,
    606                           float* wi, float* vl, lapack_int ldvl, float* vr,
    607                           lapack_int ldvr );
    608 lapack_int LAPACKE_dgeev( int matrix_order, char jobvl, char jobvr,
    609                           lapack_int n, double* a, lapack_int lda, double* wr,
    610                           double* wi, double* vl, lapack_int ldvl, double* vr,
    611                           lapack_int ldvr );
    612 lapack_int LAPACKE_cgeev( int matrix_order, char jobvl, char jobvr,
    613                           lapack_int n, lapack_complex_float* a, lapack_int lda,
    614                           lapack_complex_float* w, lapack_complex_float* vl,
    615                           lapack_int ldvl, lapack_complex_float* vr,
    616                           lapack_int ldvr );
    617 lapack_int LAPACKE_zgeev( int matrix_order, char jobvl, char jobvr,
    618                           lapack_int n, lapack_complex_double* a,
    619                           lapack_int lda, lapack_complex_double* w,
    620                           lapack_complex_double* vl, lapack_int ldvl,
    621                           lapack_complex_double* vr, lapack_int ldvr );
    622 
    623 lapack_int LAPACKE_sgeevx( int matrix_order, char balanc, char jobvl,
    624                            char jobvr, char sense, lapack_int n, float* a,
    625                            lapack_int lda, float* wr, float* wi, float* vl,
    626                            lapack_int ldvl, float* vr, lapack_int ldvr,
    627                            lapack_int* ilo, lapack_int* ihi, float* scale,
    628                            float* abnrm, float* rconde, float* rcondv );
    629 lapack_int LAPACKE_dgeevx( int matrix_order, char balanc, char jobvl,
    630                            char jobvr, char sense, lapack_int n, double* a,
    631                            lapack_int lda, double* wr, double* wi, double* vl,
    632                            lapack_int ldvl, double* vr, lapack_int ldvr,
    633                            lapack_int* ilo, lapack_int* ihi, double* scale,
    634                            double* abnrm, double* rconde, double* rcondv );
    635 lapack_int LAPACKE_cgeevx( int matrix_order, char balanc, char jobvl,
    636                            char jobvr, char sense, lapack_int n,
    637                            lapack_complex_float* a, lapack_int lda,
    638                            lapack_complex_float* w, lapack_complex_float* vl,
    639                            lapack_int ldvl, lapack_complex_float* vr,
    640                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
    641                            float* scale, float* abnrm, float* rconde,
    642                            float* rcondv );
    643 lapack_int LAPACKE_zgeevx( int matrix_order, char balanc, char jobvl,
    644                            char jobvr, char sense, lapack_int n,
    645                            lapack_complex_double* a, lapack_int lda,
    646                            lapack_complex_double* w, lapack_complex_double* vl,
    647                            lapack_int ldvl, lapack_complex_double* vr,
    648                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
    649                            double* scale, double* abnrm, double* rconde,
    650                            double* rcondv );
    651 
    652 lapack_int LAPACKE_sgehrd( int matrix_order, lapack_int n, lapack_int ilo,
    653                            lapack_int ihi, float* a, lapack_int lda,
    654                            float* tau );
    655 lapack_int LAPACKE_dgehrd( int matrix_order, lapack_int n, lapack_int ilo,
    656                            lapack_int ihi, double* a, lapack_int lda,
    657                            double* tau );
    658 lapack_int LAPACKE_cgehrd( int matrix_order, lapack_int n, lapack_int ilo,
    659                            lapack_int ihi, lapack_complex_float* a,
    660                            lapack_int lda, lapack_complex_float* tau );
    661 lapack_int LAPACKE_zgehrd( int matrix_order, lapack_int n, lapack_int ilo,
    662                            lapack_int ihi, lapack_complex_double* a,
    663                            lapack_int lda, lapack_complex_double* tau );
    664 
    665 lapack_int LAPACKE_sgejsv( int matrix_order, char joba, char jobu, char jobv,
    666                            char jobr, char jobt, char jobp, lapack_int m,
    667                            lapack_int n, float* a, lapack_int lda, float* sva,
    668                            float* u, lapack_int ldu, float* v, lapack_int ldv,
    669                            float* stat, lapack_int* istat );
    670 lapack_int LAPACKE_dgejsv( int matrix_order, char joba, char jobu, char jobv,
    671                            char jobr, char jobt, char jobp, lapack_int m,
    672                            lapack_int n, double* a, lapack_int lda, double* sva,
    673                            double* u, lapack_int ldu, double* v, lapack_int ldv,
    674                            double* stat, lapack_int* istat );
    675 
    676 lapack_int LAPACKE_sgelq2( int matrix_order, lapack_int m, lapack_int n,
    677                            float* a, lapack_int lda, float* tau );
    678 lapack_int LAPACKE_dgelq2( int matrix_order, lapack_int m, lapack_int n,
    679                            double* a, lapack_int lda, double* tau );
    680 lapack_int LAPACKE_cgelq2( int matrix_order, lapack_int m, lapack_int n,
    681                            lapack_complex_float* a, lapack_int lda,
    682                            lapack_complex_float* tau );
    683 lapack_int LAPACKE_zgelq2( int matrix_order, lapack_int m, lapack_int n,
    684                            lapack_complex_double* a, lapack_int lda,
    685                            lapack_complex_double* tau );
    686 
    687 lapack_int LAPACKE_sgelqf( int matrix_order, lapack_int m, lapack_int n,
    688                            float* a, lapack_int lda, float* tau );
    689 lapack_int LAPACKE_dgelqf( int matrix_order, lapack_int m, lapack_int n,
    690                            double* a, lapack_int lda, double* tau );
    691 lapack_int LAPACKE_cgelqf( int matrix_order, lapack_int m, lapack_int n,
    692                            lapack_complex_float* a, lapack_int lda,
    693                            lapack_complex_float* tau );
    694 lapack_int LAPACKE_zgelqf( int matrix_order, lapack_int m, lapack_int n,
    695                            lapack_complex_double* a, lapack_int lda,
    696                            lapack_complex_double* tau );
    697 
    698 lapack_int LAPACKE_sgels( int matrix_order, char trans, lapack_int m,
    699                           lapack_int n, lapack_int nrhs, float* a,
    700                           lapack_int lda, float* b, lapack_int ldb );
    701 lapack_int LAPACKE_dgels( int matrix_order, char trans, lapack_int m,
    702                           lapack_int n, lapack_int nrhs, double* a,
    703                           lapack_int lda, double* b, lapack_int ldb );
    704 lapack_int LAPACKE_cgels( int matrix_order, char trans, lapack_int m,
    705                           lapack_int n, lapack_int nrhs,
    706                           lapack_complex_float* a, lapack_int lda,
    707                           lapack_complex_float* b, lapack_int ldb );
    708 lapack_int LAPACKE_zgels( int matrix_order, char trans, lapack_int m,
    709                           lapack_int n, lapack_int nrhs,
    710                           lapack_complex_double* a, lapack_int lda,
    711                           lapack_complex_double* b, lapack_int ldb );
    712 
    713 lapack_int LAPACKE_sgelsd( int matrix_order, lapack_int m, lapack_int n,
    714                            lapack_int nrhs, float* a, lapack_int lda, float* b,
    715                            lapack_int ldb, float* s, float rcond,
    716                            lapack_int* rank );
    717 lapack_int LAPACKE_dgelsd( int matrix_order, lapack_int m, lapack_int n,
    718                            lapack_int nrhs, double* a, lapack_int lda,
    719                            double* b, lapack_int ldb, double* s, double rcond,
    720                            lapack_int* rank );
    721 lapack_int LAPACKE_cgelsd( int matrix_order, lapack_int m, lapack_int n,
    722                            lapack_int nrhs, lapack_complex_float* a,
    723                            lapack_int lda, lapack_complex_float* b,
    724                            lapack_int ldb, float* s, float rcond,
    725                            lapack_int* rank );
    726 lapack_int LAPACKE_zgelsd( int matrix_order, lapack_int m, lapack_int n,
    727                            lapack_int nrhs, lapack_complex_double* a,
    728                            lapack_int lda, lapack_complex_double* b,
    729                            lapack_int ldb, double* s, double rcond,
    730                            lapack_int* rank );
    731 
    732 lapack_int LAPACKE_sgelss( int matrix_order, lapack_int m, lapack_int n,
    733                            lapack_int nrhs, float* a, lapack_int lda, float* b,
    734                            lapack_int ldb, float* s, float rcond,
    735                            lapack_int* rank );
    736 lapack_int LAPACKE_dgelss( int matrix_order, lapack_int m, lapack_int n,
    737                            lapack_int nrhs, double* a, lapack_int lda,
    738                            double* b, lapack_int ldb, double* s, double rcond,
    739                            lapack_int* rank );
    740 lapack_int LAPACKE_cgelss( int matrix_order, lapack_int m, lapack_int n,
    741                            lapack_int nrhs, lapack_complex_float* a,
    742                            lapack_int lda, lapack_complex_float* b,
    743                            lapack_int ldb, float* s, float rcond,
    744                            lapack_int* rank );
    745 lapack_int LAPACKE_zgelss( int matrix_order, lapack_int m, lapack_int n,
    746                            lapack_int nrhs, lapack_complex_double* a,
    747                            lapack_int lda, lapack_complex_double* b,
    748                            lapack_int ldb, double* s, double rcond,
    749                            lapack_int* rank );
    750 
    751 lapack_int LAPACKE_sgelsy( int matrix_order, lapack_int m, lapack_int n,
    752                            lapack_int nrhs, float* a, lapack_int lda, float* b,
    753                            lapack_int ldb, lapack_int* jpvt, float rcond,
    754                            lapack_int* rank );
    755 lapack_int LAPACKE_dgelsy( int matrix_order, lapack_int m, lapack_int n,
    756                            lapack_int nrhs, double* a, lapack_int lda,
    757                            double* b, lapack_int ldb, lapack_int* jpvt,
    758                            double rcond, lapack_int* rank );
    759 lapack_int LAPACKE_cgelsy( int matrix_order, lapack_int m, lapack_int n,
    760                            lapack_int nrhs, lapack_complex_float* a,
    761                            lapack_int lda, lapack_complex_float* b,
    762                            lapack_int ldb, lapack_int* jpvt, float rcond,
    763                            lapack_int* rank );
    764 lapack_int LAPACKE_zgelsy( int matrix_order, lapack_int m, lapack_int n,
    765                            lapack_int nrhs, lapack_complex_double* a,
    766                            lapack_int lda, lapack_complex_double* b,
    767                            lapack_int ldb, lapack_int* jpvt, double rcond,
    768                            lapack_int* rank );
    769 
    770 lapack_int LAPACKE_sgeqlf( int matrix_order, lapack_int m, lapack_int n,
    771                            float* a, lapack_int lda, float* tau );
    772 lapack_int LAPACKE_dgeqlf( int matrix_order, lapack_int m, lapack_int n,
    773                            double* a, lapack_int lda, double* tau );
    774 lapack_int LAPACKE_cgeqlf( int matrix_order, lapack_int m, lapack_int n,
    775                            lapack_complex_float* a, lapack_int lda,
    776                            lapack_complex_float* tau );
    777 lapack_int LAPACKE_zgeqlf( int matrix_order, lapack_int m, lapack_int n,
    778                            lapack_complex_double* a, lapack_int lda,
    779                            lapack_complex_double* tau );
    780 
    781 lapack_int LAPACKE_sgeqp3( int matrix_order, lapack_int m, lapack_int n,
    782                            float* a, lapack_int lda, lapack_int* jpvt,
    783                            float* tau );
    784 lapack_int LAPACKE_dgeqp3( int matrix_order, lapack_int m, lapack_int n,
    785                            double* a, lapack_int lda, lapack_int* jpvt,
    786                            double* tau );
    787 lapack_int LAPACKE_cgeqp3( int matrix_order, lapack_int m, lapack_int n,
    788                            lapack_complex_float* a, lapack_int lda,
    789                            lapack_int* jpvt, lapack_complex_float* tau );
    790 lapack_int LAPACKE_zgeqp3( int matrix_order, lapack_int m, lapack_int n,
    791                            lapack_complex_double* a, lapack_int lda,
    792                            lapack_int* jpvt, lapack_complex_double* tau );
    793 
    794 lapack_int LAPACKE_sgeqpf( int matrix_order, lapack_int m, lapack_int n,
    795                            float* a, lapack_int lda, lapack_int* jpvt,
    796                            float* tau );
    797 lapack_int LAPACKE_dgeqpf( int matrix_order, lapack_int m, lapack_int n,
    798                            double* a, lapack_int lda, lapack_int* jpvt,
    799                            double* tau );
    800 lapack_int LAPACKE_cgeqpf( int matrix_order, lapack_int m, lapack_int n,
    801                            lapack_complex_float* a, lapack_int lda,
    802                            lapack_int* jpvt, lapack_complex_float* tau );
    803 lapack_int LAPACKE_zgeqpf( int matrix_order, lapack_int m, lapack_int n,
    804                            lapack_complex_double* a, lapack_int lda,
    805                            lapack_int* jpvt, lapack_complex_double* tau );
    806 
    807 lapack_int LAPACKE_sgeqr2( int matrix_order, lapack_int m, lapack_int n,
    808                            float* a, lapack_int lda, float* tau );
    809 lapack_int LAPACKE_dgeqr2( int matrix_order, lapack_int m, lapack_int n,
    810                            double* a, lapack_int lda, double* tau );
    811 lapack_int LAPACKE_cgeqr2( int matrix_order, lapack_int m, lapack_int n,
    812                            lapack_complex_float* a, lapack_int lda,
    813                            lapack_complex_float* tau );
    814 lapack_int LAPACKE_zgeqr2( int matrix_order, lapack_int m, lapack_int n,
    815                            lapack_complex_double* a, lapack_int lda,
    816                            lapack_complex_double* tau );
    817 
    818 lapack_int LAPACKE_sgeqrf( int matrix_order, lapack_int m, lapack_int n,
    819                            float* a, lapack_int lda, float* tau );
    820 lapack_int LAPACKE_dgeqrf( int matrix_order, lapack_int m, lapack_int n,
    821                            double* a, lapack_int lda, double* tau );
    822 lapack_int LAPACKE_cgeqrf( int matrix_order, lapack_int m, lapack_int n,
    823                            lapack_complex_float* a, lapack_int lda,
    824                            lapack_complex_float* tau );
    825 lapack_int LAPACKE_zgeqrf( int matrix_order, lapack_int m, lapack_int n,
    826                            lapack_complex_double* a, lapack_int lda,
    827                            lapack_complex_double* tau );
    828 
    829 lapack_int LAPACKE_sgeqrfp( int matrix_order, lapack_int m, lapack_int n,
    830                             float* a, lapack_int lda, float* tau );
    831 lapack_int LAPACKE_dgeqrfp( int matrix_order, lapack_int m, lapack_int n,
    832                             double* a, lapack_int lda, double* tau );
    833 lapack_int LAPACKE_cgeqrfp( int matrix_order, lapack_int m, lapack_int n,
    834                             lapack_complex_float* a, lapack_int lda,
    835                             lapack_complex_float* tau );
    836 lapack_int LAPACKE_zgeqrfp( int matrix_order, lapack_int m, lapack_int n,
    837                             lapack_complex_double* a, lapack_int lda,
    838                             lapack_complex_double* tau );
    839 
    840 lapack_int LAPACKE_sgerfs( int matrix_order, char trans, lapack_int n,
    841                            lapack_int nrhs, const float* a, lapack_int lda,
    842                            const float* af, lapack_int ldaf,
    843                            const lapack_int* ipiv, const float* b,
    844                            lapack_int ldb, float* x, lapack_int ldx,
    845                            float* ferr, float* berr );
    846 lapack_int LAPACKE_dgerfs( int matrix_order, char trans, lapack_int n,
    847                            lapack_int nrhs, const double* a, lapack_int lda,
    848                            const double* af, lapack_int ldaf,
    849                            const lapack_int* ipiv, const double* b,
    850                            lapack_int ldb, double* x, lapack_int ldx,
    851                            double* ferr, double* berr );
    852 lapack_int LAPACKE_cgerfs( int matrix_order, char trans, lapack_int n,
    853                            lapack_int nrhs, const lapack_complex_float* a,
    854                            lapack_int lda, const lapack_complex_float* af,
    855                            lapack_int ldaf, const lapack_int* ipiv,
    856                            const lapack_complex_float* b, lapack_int ldb,
    857                            lapack_complex_float* x, lapack_int ldx, float* ferr,
    858                            float* berr );
    859 lapack_int LAPACKE_zgerfs( int matrix_order, char trans, lapack_int n,
    860                            lapack_int nrhs, const lapack_complex_double* a,
    861                            lapack_int lda, const lapack_complex_double* af,
    862                            lapack_int ldaf, const lapack_int* ipiv,
    863                            const lapack_complex_double* b, lapack_int ldb,
    864                            lapack_complex_double* x, lapack_int ldx,
    865                            double* ferr, double* berr );
    866 
    867 lapack_int LAPACKE_sgerfsx( int matrix_order, char trans, char equed,
    868                             lapack_int n, lapack_int nrhs, const float* a,
    869                             lapack_int lda, const float* af, lapack_int ldaf,
    870                             const lapack_int* ipiv, const float* r,
    871                             const float* c, const float* b, lapack_int ldb,
    872                             float* x, lapack_int ldx, float* rcond, float* berr,
    873                             lapack_int n_err_bnds, float* err_bnds_norm,
    874                             float* err_bnds_comp, lapack_int nparams,
    875                             float* params );
    876 lapack_int LAPACKE_dgerfsx( int matrix_order, char trans, char equed,
    877                             lapack_int n, lapack_int nrhs, const double* a,
    878                             lapack_int lda, const double* af, lapack_int ldaf,
    879                             const lapack_int* ipiv, const double* r,
    880                             const double* c, const double* b, lapack_int ldb,
    881                             double* x, lapack_int ldx, double* rcond,
    882                             double* berr, lapack_int n_err_bnds,
    883                             double* err_bnds_norm, double* err_bnds_comp,
    884                             lapack_int nparams, double* params );
    885 lapack_int LAPACKE_cgerfsx( int matrix_order, char trans, char equed,
    886                             lapack_int n, lapack_int nrhs,
    887                             const lapack_complex_float* a, lapack_int lda,
    888                             const lapack_complex_float* af, lapack_int ldaf,
    889                             const lapack_int* ipiv, const float* r,
    890                             const float* c, const lapack_complex_float* b,
    891                             lapack_int ldb, lapack_complex_float* x,
    892                             lapack_int ldx, float* rcond, float* berr,
    893                             lapack_int n_err_bnds, float* err_bnds_norm,
    894                             float* err_bnds_comp, lapack_int nparams,
    895                             float* params );
    896 lapack_int LAPACKE_zgerfsx( int matrix_order, char trans, char equed,
    897                             lapack_int n, lapack_int nrhs,
    898                             const lapack_complex_double* a, lapack_int lda,
    899                             const lapack_complex_double* af, lapack_int ldaf,
    900                             const lapack_int* ipiv, const double* r,
    901                             const double* c, const lapack_complex_double* b,
    902                             lapack_int ldb, lapack_complex_double* x,
    903                             lapack_int ldx, double* rcond, double* berr,
    904                             lapack_int n_err_bnds, double* err_bnds_norm,
    905                             double* err_bnds_comp, lapack_int nparams,
    906                             double* params );
    907 
    908 lapack_int LAPACKE_sgerqf( int matrix_order, lapack_int m, lapack_int n,
    909                            float* a, lapack_int lda, float* tau );
    910 lapack_int LAPACKE_dgerqf( int matrix_order, lapack_int m, lapack_int n,
    911                            double* a, lapack_int lda, double* tau );
    912 lapack_int LAPACKE_cgerqf( int matrix_order, lapack_int m, lapack_int n,
    913                            lapack_complex_float* a, lapack_int lda,
    914                            lapack_complex_float* tau );
    915 lapack_int LAPACKE_zgerqf( int matrix_order, lapack_int m, lapack_int n,
    916                            lapack_complex_double* a, lapack_int lda,
    917                            lapack_complex_double* tau );
    918 
    919 lapack_int LAPACKE_sgesdd( int matrix_order, char jobz, lapack_int m,
    920                            lapack_int n, float* a, lapack_int lda, float* s,
    921                            float* u, lapack_int ldu, float* vt,
    922                            lapack_int ldvt );
    923 lapack_int LAPACKE_dgesdd( int matrix_order, char jobz, lapack_int m,
    924                            lapack_int n, double* a, lapack_int lda, double* s,
    925                            double* u, lapack_int ldu, double* vt,
    926                            lapack_int ldvt );
    927 lapack_int LAPACKE_cgesdd( int matrix_order, char jobz, lapack_int m,
    928                            lapack_int n, lapack_complex_float* a,
    929                            lapack_int lda, float* s, lapack_complex_float* u,
    930                            lapack_int ldu, lapack_complex_float* vt,
    931                            lapack_int ldvt );
    932 lapack_int LAPACKE_zgesdd( int matrix_order, char jobz, lapack_int m,
    933                            lapack_int n, lapack_complex_double* a,
    934                            lapack_int lda, double* s, lapack_complex_double* u,
    935                            lapack_int ldu, lapack_complex_double* vt,
    936                            lapack_int ldvt );
    937 
    938 lapack_int LAPACKE_sgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    939                           float* a, lapack_int lda, lapack_int* ipiv, float* b,
    940                           lapack_int ldb );
    941 lapack_int LAPACKE_dgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    942                           double* a, lapack_int lda, lapack_int* ipiv,
    943                           double* b, lapack_int ldb );
    944 lapack_int LAPACKE_cgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    945                           lapack_complex_float* a, lapack_int lda,
    946                           lapack_int* ipiv, lapack_complex_float* b,
    947                           lapack_int ldb );
    948 lapack_int LAPACKE_zgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    949                           lapack_complex_double* a, lapack_int lda,
    950                           lapack_int* ipiv, lapack_complex_double* b,
    951                           lapack_int ldb );
    952 lapack_int LAPACKE_dsgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    953                            double* a, lapack_int lda, lapack_int* ipiv,
    954                            double* b, lapack_int ldb, double* x, lapack_int ldx,
    955                            lapack_int* iter );
    956 lapack_int LAPACKE_zcgesv( int matrix_order, lapack_int n, lapack_int nrhs,
    957                            lapack_complex_double* a, lapack_int lda,
    958                            lapack_int* ipiv, lapack_complex_double* b,
    959                            lapack_int ldb, lapack_complex_double* x,
    960                            lapack_int ldx, lapack_int* iter );
    961 
    962 lapack_int LAPACKE_sgesvd( int matrix_order, char jobu, char jobvt,
    963                            lapack_int m, lapack_int n, float* a, lapack_int lda,
    964                            float* s, float* u, lapack_int ldu, float* vt,
    965                            lapack_int ldvt, float* superb );
    966 lapack_int LAPACKE_dgesvd( int matrix_order, char jobu, char jobvt,
    967                            lapack_int m, lapack_int n, double* a,
    968                            lapack_int lda, double* s, double* u, lapack_int ldu,
    969                            double* vt, lapack_int ldvt, double* superb );
    970 lapack_int LAPACKE_cgesvd( int matrix_order, char jobu, char jobvt,
    971                            lapack_int m, lapack_int n, lapack_complex_float* a,
    972                            lapack_int lda, float* s, lapack_complex_float* u,
    973                            lapack_int ldu, lapack_complex_float* vt,
    974                            lapack_int ldvt, float* superb );
    975 lapack_int LAPACKE_zgesvd( int matrix_order, char jobu, char jobvt,
    976                            lapack_int m, lapack_int n, lapack_complex_double* a,
    977                            lapack_int lda, double* s, lapack_complex_double* u,
    978                            lapack_int ldu, lapack_complex_double* vt,
    979                            lapack_int ldvt, double* superb );
    980 
    981 lapack_int LAPACKE_sgesvj( int matrix_order, char joba, char jobu, char jobv,
    982                            lapack_int m, lapack_int n, float* a, lapack_int lda,
    983                            float* sva, lapack_int mv, float* v, lapack_int ldv,
    984                            float* stat );
    985 lapack_int LAPACKE_dgesvj( int matrix_order, char joba, char jobu, char jobv,
    986                            lapack_int m, lapack_int n, double* a,
    987                            lapack_int lda, double* sva, lapack_int mv,
    988                            double* v, lapack_int ldv, double* stat );
    989 
    990 lapack_int LAPACKE_sgesvx( int matrix_order, char fact, char trans,
    991                            lapack_int n, lapack_int nrhs, float* a,
    992                            lapack_int lda, float* af, lapack_int ldaf,
    993                            lapack_int* ipiv, char* equed, float* r, float* c,
    994                            float* b, lapack_int ldb, float* x, lapack_int ldx,
    995                            float* rcond, float* ferr, float* berr,
    996                            float* rpivot );
    997 lapack_int LAPACKE_dgesvx( int matrix_order, char fact, char trans,
    998                            lapack_int n, lapack_int nrhs, double* a,
    999                            lapack_int lda, double* af, lapack_int ldaf,
   1000                            lapack_int* ipiv, char* equed, double* r, double* c,
   1001                            double* b, lapack_int ldb, double* x, lapack_int ldx,
   1002                            double* rcond, double* ferr, double* berr,
   1003                            double* rpivot );
   1004 lapack_int LAPACKE_cgesvx( int matrix_order, char fact, char trans,
   1005                            lapack_int n, lapack_int nrhs,
   1006                            lapack_complex_float* a, lapack_int lda,
   1007                            lapack_complex_float* af, lapack_int ldaf,
   1008                            lapack_int* ipiv, char* equed, float* r, float* c,
   1009                            lapack_complex_float* b, lapack_int ldb,
   1010                            lapack_complex_float* x, lapack_int ldx,
   1011                            float* rcond, float* ferr, float* berr,
   1012                            float* rpivot );
   1013 lapack_int LAPACKE_zgesvx( int matrix_order, char fact, char trans,
   1014                            lapack_int n, lapack_int nrhs,
   1015                            lapack_complex_double* a, lapack_int lda,
   1016                            lapack_complex_double* af, lapack_int ldaf,
   1017                            lapack_int* ipiv, char* equed, double* r, double* c,
   1018                            lapack_complex_double* b, lapack_int ldb,
   1019                            lapack_complex_double* x, lapack_int ldx,
   1020                            double* rcond, double* ferr, double* berr,
   1021                            double* rpivot );
   1022 
   1023 lapack_int LAPACKE_sgesvxx( int matrix_order, char fact, char trans,
   1024                             lapack_int n, lapack_int nrhs, float* a,
   1025                             lapack_int lda, float* af, lapack_int ldaf,
   1026                             lapack_int* ipiv, char* equed, float* r, float* c,
   1027                             float* b, lapack_int ldb, float* x, lapack_int ldx,
   1028                             float* rcond, float* rpvgrw, float* berr,
   1029                             lapack_int n_err_bnds, float* err_bnds_norm,
   1030                             float* err_bnds_comp, lapack_int nparams,
   1031                             float* params );
   1032 lapack_int LAPACKE_dgesvxx( int matrix_order, char fact, char trans,
   1033                             lapack_int n, lapack_int nrhs, double* a,
   1034                             lapack_int lda, double* af, lapack_int ldaf,
   1035                             lapack_int* ipiv, char* equed, double* r, double* c,
   1036                             double* b, lapack_int ldb, double* x,
   1037                             lapack_int ldx, double* rcond, double* rpvgrw,
   1038                             double* berr, lapack_int n_err_bnds,
   1039                             double* err_bnds_norm, double* err_bnds_comp,
   1040                             lapack_int nparams, double* params );
   1041 lapack_int LAPACKE_cgesvxx( int matrix_order, char fact, char trans,
   1042                             lapack_int n, lapack_int nrhs,
   1043                             lapack_complex_float* a, lapack_int lda,
   1044                             lapack_complex_float* af, lapack_int ldaf,
   1045                             lapack_int* ipiv, char* equed, float* r, float* c,
   1046                             lapack_complex_float* b, lapack_int ldb,
   1047                             lapack_complex_float* x, lapack_int ldx,
   1048                             float* rcond, float* rpvgrw, float* berr,
   1049                             lapack_int n_err_bnds, float* err_bnds_norm,
   1050                             float* err_bnds_comp, lapack_int nparams,
   1051                             float* params );
   1052 lapack_int LAPACKE_zgesvxx( int matrix_order, char fact, char trans,
   1053                             lapack_int n, lapack_int nrhs,
   1054                             lapack_complex_double* a, lapack_int lda,
   1055                             lapack_complex_double* af, lapack_int ldaf,
   1056                             lapack_int* ipiv, char* equed, double* r, double* c,
   1057                             lapack_complex_double* b, lapack_int ldb,
   1058                             lapack_complex_double* x, lapack_int ldx,
   1059                             double* rcond, double* rpvgrw, double* berr,
   1060                             lapack_int n_err_bnds, double* err_bnds_norm,
   1061                             double* err_bnds_comp, lapack_int nparams,
   1062                             double* params );
   1063 
   1064 lapack_int LAPACKE_sgetf2( int matrix_order, lapack_int m, lapack_int n,
   1065                            float* a, lapack_int lda, lapack_int* ipiv );
   1066 lapack_int LAPACKE_dgetf2( int matrix_order, lapack_int m, lapack_int n,
   1067                            double* a, lapack_int lda, lapack_int* ipiv );
   1068 lapack_int LAPACKE_cgetf2( int matrix_order, lapack_int m, lapack_int n,
   1069                            lapack_complex_float* a, lapack_int lda,
   1070                            lapack_int* ipiv );
   1071 lapack_int LAPACKE_zgetf2( int matrix_order, lapack_int m, lapack_int n,
   1072                            lapack_complex_double* a, lapack_int lda,
   1073                            lapack_int* ipiv );
   1074 
   1075 lapack_int LAPACKE_sgetrf( int matrix_order, lapack_int m, lapack_int n,
   1076                            float* a, lapack_int lda, lapack_int* ipiv );
   1077 lapack_int LAPACKE_dgetrf( int matrix_order, lapack_int m, lapack_int n,
   1078                            double* a, lapack_int lda, lapack_int* ipiv );
   1079 lapack_int LAPACKE_cgetrf( int matrix_order, lapack_int m, lapack_int n,
   1080                            lapack_complex_float* a, lapack_int lda,
   1081                            lapack_int* ipiv );
   1082 lapack_int LAPACKE_zgetrf( int matrix_order, lapack_int m, lapack_int n,
   1083                            lapack_complex_double* a, lapack_int lda,
   1084                            lapack_int* ipiv );
   1085 
   1086 lapack_int LAPACKE_sgetri( int matrix_order, lapack_int n, float* a,
   1087                            lapack_int lda, const lapack_int* ipiv );
   1088 lapack_int LAPACKE_dgetri( int matrix_order, lapack_int n, double* a,
   1089                            lapack_int lda, const lapack_int* ipiv );
   1090 lapack_int LAPACKE_cgetri( int matrix_order, lapack_int n,
   1091                            lapack_complex_float* a, lapack_int lda,
   1092                            const lapack_int* ipiv );
   1093 lapack_int LAPACKE_zgetri( int matrix_order, lapack_int n,
   1094                            lapack_complex_double* a, lapack_int lda,
   1095                            const lapack_int* ipiv );
   1096 
   1097 lapack_int LAPACKE_sgetrs( int matrix_order, char trans, lapack_int n,
   1098                            lapack_int nrhs, const float* a, lapack_int lda,
   1099                            const lapack_int* ipiv, float* b, lapack_int ldb );
   1100 lapack_int LAPACKE_dgetrs( int matrix_order, char trans, lapack_int n,
   1101                            lapack_int nrhs, const double* a, lapack_int lda,
   1102                            const lapack_int* ipiv, double* b, lapack_int ldb );
   1103 lapack_int LAPACKE_cgetrs( int matrix_order, char trans, lapack_int n,
   1104                            lapack_int nrhs, const lapack_complex_float* a,
   1105                            lapack_int lda, const lapack_int* ipiv,
   1106                            lapack_complex_float* b, lapack_int ldb );
   1107 lapack_int LAPACKE_zgetrs( int matrix_order, char trans, lapack_int n,
   1108                            lapack_int nrhs, const lapack_complex_double* a,
   1109                            lapack_int lda, const lapack_int* ipiv,
   1110                            lapack_complex_double* b, lapack_int ldb );
   1111 
   1112 lapack_int LAPACKE_sggbak( int matrix_order, char job, char side, lapack_int n,
   1113                            lapack_int ilo, lapack_int ihi, const float* lscale,
   1114                            const float* rscale, lapack_int m, float* v,
   1115                            lapack_int ldv );
   1116 lapack_int LAPACKE_dggbak( int matrix_order, char job, char side, lapack_int n,
   1117                            lapack_int ilo, lapack_int ihi, const double* lscale,
   1118                            const double* rscale, lapack_int m, double* v,
   1119                            lapack_int ldv );
   1120 lapack_int LAPACKE_cggbak( int matrix_order, char job, char side, lapack_int n,
   1121                            lapack_int ilo, lapack_int ihi, const float* lscale,
   1122                            const float* rscale, lapack_int m,
   1123                            lapack_complex_float* v, lapack_int ldv );
   1124 lapack_int LAPACKE_zggbak( int matrix_order, char job, char side, lapack_int n,
   1125                            lapack_int ilo, lapack_int ihi, const double* lscale,
   1126                            const double* rscale, lapack_int m,
   1127                            lapack_complex_double* v, lapack_int ldv );
   1128 
   1129 lapack_int LAPACKE_sggbal( int matrix_order, char job, lapack_int n, float* a,
   1130                            lapack_int lda, float* b, lapack_int ldb,
   1131                            lapack_int* ilo, lapack_int* ihi, float* lscale,
   1132                            float* rscale );
   1133 lapack_int LAPACKE_dggbal( int matrix_order, char job, lapack_int n, double* a,
   1134                            lapack_int lda, double* b, lapack_int ldb,
   1135                            lapack_int* ilo, lapack_int* ihi, double* lscale,
   1136                            double* rscale );
   1137 lapack_int LAPACKE_cggbal( int matrix_order, char job, lapack_int n,
   1138                            lapack_complex_float* a, lapack_int lda,
   1139                            lapack_complex_float* b, lapack_int ldb,
   1140                            lapack_int* ilo, lapack_int* ihi, float* lscale,
   1141                            float* rscale );
   1142 lapack_int LAPACKE_zggbal( int matrix_order, char job, lapack_int n,
   1143                            lapack_complex_double* a, lapack_int lda,
   1144                            lapack_complex_double* b, lapack_int ldb,
   1145                            lapack_int* ilo, lapack_int* ihi, double* lscale,
   1146                            double* rscale );
   1147 
   1148 lapack_int LAPACKE_sgges( int matrix_order, char jobvsl, char jobvsr, char sort,
   1149                           LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
   1150                           lapack_int lda, float* b, lapack_int ldb,
   1151                           lapack_int* sdim, float* alphar, float* alphai,
   1152                           float* beta, float* vsl, lapack_int ldvsl, float* vsr,
   1153                           lapack_int ldvsr );
   1154 lapack_int LAPACKE_dgges( int matrix_order, char jobvsl, char jobvsr, char sort,
   1155                           LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
   1156                           lapack_int lda, double* b, lapack_int ldb,
   1157                           lapack_int* sdim, double* alphar, double* alphai,
   1158                           double* beta, double* vsl, lapack_int ldvsl,
   1159                           double* vsr, lapack_int ldvsr );
   1160 lapack_int LAPACKE_cgges( int matrix_order, char jobvsl, char jobvsr, char sort,
   1161                           LAPACK_C_SELECT2 selctg, lapack_int n,
   1162                           lapack_complex_float* a, lapack_int lda,
   1163                           lapack_complex_float* b, lapack_int ldb,
   1164                           lapack_int* sdim, lapack_complex_float* alpha,
   1165                           lapack_complex_float* beta, lapack_complex_float* vsl,
   1166                           lapack_int ldvsl, lapack_complex_float* vsr,
   1167                           lapack_int ldvsr );
   1168 lapack_int LAPACKE_zgges( int matrix_order, char jobvsl, char jobvsr, char sort,
   1169                           LAPACK_Z_SELECT2 selctg, lapack_int n,
   1170                           lapack_complex_double* a, lapack_int lda,
   1171                           lapack_complex_double* b, lapack_int ldb,
   1172                           lapack_int* sdim, lapack_complex_double* alpha,
   1173                           lapack_complex_double* beta,
   1174                           lapack_complex_double* vsl, lapack_int ldvsl,
   1175                           lapack_complex_double* vsr, lapack_int ldvsr );
   1176 
   1177 lapack_int LAPACKE_sggesx( int matrix_order, char jobvsl, char jobvsr,
   1178                            char sort, LAPACK_S_SELECT3 selctg, char sense,
   1179                            lapack_int n, float* a, lapack_int lda, float* b,
   1180                            lapack_int ldb, lapack_int* sdim, float* alphar,
   1181                            float* alphai, float* beta, float* vsl,
   1182                            lapack_int ldvsl, float* vsr, lapack_int ldvsr,
   1183                            float* rconde, float* rcondv );
   1184 lapack_int LAPACKE_dggesx( int matrix_order, char jobvsl, char jobvsr,
   1185                            char sort, LAPACK_D_SELECT3 selctg, char sense,
   1186                            lapack_int n, double* a, lapack_int lda, double* b,
   1187                            lapack_int ldb, lapack_int* sdim, double* alphar,
   1188                            double* alphai, double* beta, double* vsl,
   1189                            lapack_int ldvsl, double* vsr, lapack_int ldvsr,
   1190                            double* rconde, double* rcondv );
   1191 lapack_int LAPACKE_cggesx( int matrix_order, char jobvsl, char jobvsr,
   1192                            char sort, LAPACK_C_SELECT2 selctg, char sense,
   1193                            lapack_int n, lapack_complex_float* a,
   1194                            lapack_int lda, lapack_complex_float* b,
   1195                            lapack_int ldb, lapack_int* sdim,
   1196                            lapack_complex_float* alpha,
   1197                            lapack_complex_float* beta,
   1198                            lapack_complex_float* vsl, lapack_int ldvsl,
   1199                            lapack_complex_float* vsr, lapack_int ldvsr,
   1200                            float* rconde, float* rcondv );
   1201 lapack_int LAPACKE_zggesx( int matrix_order, char jobvsl, char jobvsr,
   1202                            char sort, LAPACK_Z_SELECT2 selctg, char sense,
   1203                            lapack_int n, lapack_complex_double* a,
   1204                            lapack_int lda, lapack_complex_double* b,
   1205                            lapack_int ldb, lapack_int* sdim,
   1206                            lapack_complex_double* alpha,
   1207                            lapack_complex_double* beta,
   1208                            lapack_complex_double* vsl, lapack_int ldvsl,
   1209                            lapack_complex_double* vsr, lapack_int ldvsr,
   1210                            double* rconde, double* rcondv );
   1211 
   1212 lapack_int LAPACKE_sggev( int matrix_order, char jobvl, char jobvr,
   1213                           lapack_int n, float* a, lapack_int lda, float* b,
   1214                           lapack_int ldb, float* alphar, float* alphai,
   1215                           float* beta, float* vl, lapack_int ldvl, float* vr,
   1216                           lapack_int ldvr );
   1217 lapack_int LAPACKE_dggev( int matrix_order, char jobvl, char jobvr,
   1218                           lapack_int n, double* a, lapack_int lda, double* b,
   1219                           lapack_int ldb, double* alphar, double* alphai,
   1220                           double* beta, double* vl, lapack_int ldvl, double* vr,
   1221                           lapack_int ldvr );
   1222 lapack_int LAPACKE_cggev( int matrix_order, char jobvl, char jobvr,
   1223                           lapack_int n, lapack_complex_float* a, lapack_int lda,
   1224                           lapack_complex_float* b, lapack_int ldb,
   1225                           lapack_complex_float* alpha,
   1226                           lapack_complex_float* beta, lapack_complex_float* vl,
   1227                           lapack_int ldvl, lapack_complex_float* vr,
   1228                           lapack_int ldvr );
   1229 lapack_int LAPACKE_zggev( int matrix_order, char jobvl, char jobvr,
   1230                           lapack_int n, lapack_complex_double* a,
   1231                           lapack_int lda, lapack_complex_double* b,
   1232                           lapack_int ldb, lapack_complex_double* alpha,
   1233                           lapack_complex_double* beta,
   1234                           lapack_complex_double* vl, lapack_int ldvl,
   1235                           lapack_complex_double* vr, lapack_int ldvr );
   1236 
   1237 lapack_int LAPACKE_sggevx( int matrix_order, char balanc, char jobvl,
   1238                            char jobvr, char sense, lapack_int n, float* a,
   1239                            lapack_int lda, float* b, lapack_int ldb,
   1240                            float* alphar, float* alphai, float* beta, float* vl,
   1241                            lapack_int ldvl, float* vr, lapack_int ldvr,
   1242                            lapack_int* ilo, lapack_int* ihi, float* lscale,
   1243                            float* rscale, float* abnrm, float* bbnrm,
   1244                            float* rconde, float* rcondv );
   1245 lapack_int LAPACKE_dggevx( int matrix_order, char balanc, char jobvl,
   1246                            char jobvr, char sense, lapack_int n, double* a,
   1247                            lapack_int lda, double* b, lapack_int ldb,
   1248                            double* alphar, double* alphai, double* beta,
   1249                            double* vl, lapack_int ldvl, double* vr,
   1250                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
   1251                            double* lscale, double* rscale, double* abnrm,
   1252                            double* bbnrm, double* rconde, double* rcondv );
   1253 lapack_int LAPACKE_cggevx( int matrix_order, char balanc, char jobvl,
   1254                            char jobvr, char sense, lapack_int n,
   1255                            lapack_complex_float* a, lapack_int lda,
   1256                            lapack_complex_float* b, lapack_int ldb,
   1257                            lapack_complex_float* alpha,
   1258                            lapack_complex_float* beta, lapack_complex_float* vl,
   1259                            lapack_int ldvl, lapack_complex_float* vr,
   1260                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
   1261                            float* lscale, float* rscale, float* abnrm,
   1262                            float* bbnrm, float* rconde, float* rcondv );
   1263 lapack_int LAPACKE_zggevx( int matrix_order, char balanc, char jobvl,
   1264                            char jobvr, char sense, lapack_int n,
   1265                            lapack_complex_double* a, lapack_int lda,
   1266                            lapack_complex_double* b, lapack_int ldb,
   1267                            lapack_complex_double* alpha,
   1268                            lapack_complex_double* beta,
   1269                            lapack_complex_double* vl, lapack_int ldvl,
   1270                            lapack_complex_double* vr, lapack_int ldvr,
   1271                            lapack_int* ilo, lapack_int* ihi, double* lscale,
   1272                            double* rscale, double* abnrm, double* bbnrm,
   1273                            double* rconde, double* rcondv );
   1274 
   1275 lapack_int LAPACKE_sggglm( int matrix_order, lapack_int n, lapack_int m,
   1276                            lapack_int p, float* a, lapack_int lda, float* b,
   1277                            lapack_int ldb, float* d, float* x, float* y );
   1278 lapack_int LAPACKE_dggglm( int matrix_order, lapack_int n, lapack_int m,
   1279                            lapack_int p, double* a, lapack_int lda, double* b,
   1280                            lapack_int ldb, double* d, double* x, double* y );
   1281 lapack_int LAPACKE_cggglm( int matrix_order, lapack_int n, lapack_int m,
   1282                            lapack_int p, lapack_complex_float* a,
   1283                            lapack_int lda, lapack_complex_float* b,
   1284                            lapack_int ldb, lapack_complex_float* d,
   1285                            lapack_complex_float* x, lapack_complex_float* y );
   1286 lapack_int LAPACKE_zggglm( int matrix_order, lapack_int n, lapack_int m,
   1287                            lapack_int p, lapack_complex_double* a,
   1288                            lapack_int lda, lapack_complex_double* b,
   1289                            lapack_int ldb, lapack_complex_double* d,
   1290                            lapack_complex_double* x, lapack_complex_double* y );
   1291 
   1292 lapack_int LAPACKE_sgghrd( int matrix_order, char compq, char compz,
   1293                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1294                            float* a, lapack_int lda, float* b, lapack_int ldb,
   1295                            float* q, lapack_int ldq, float* z, lapack_int ldz );
   1296 lapack_int LAPACKE_dgghrd( int matrix_order, char compq, char compz,
   1297                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1298                            double* a, lapack_int lda, double* b, lapack_int ldb,
   1299                            double* q, lapack_int ldq, double* z,
   1300                            lapack_int ldz );
   1301 lapack_int LAPACKE_cgghrd( int matrix_order, char compq, char compz,
   1302                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1303                            lapack_complex_float* a, lapack_int lda,
   1304                            lapack_complex_float* b, lapack_int ldb,
   1305                            lapack_complex_float* q, lapack_int ldq,
   1306                            lapack_complex_float* z, lapack_int ldz );
   1307 lapack_int LAPACKE_zgghrd( int matrix_order, char compq, char compz,
   1308                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1309                            lapack_complex_double* a, lapack_int lda,
   1310                            lapack_complex_double* b, lapack_int ldb,
   1311                            lapack_complex_double* q, lapack_int ldq,
   1312                            lapack_complex_double* z, lapack_int ldz );
   1313 
   1314 lapack_int LAPACKE_sgglse( int matrix_order, lapack_int m, lapack_int n,
   1315                            lapack_int p, float* a, lapack_int lda, float* b,
   1316                            lapack_int ldb, float* c, float* d, float* x );
   1317 lapack_int LAPACKE_dgglse( int matrix_order, lapack_int m, lapack_int n,
   1318                            lapack_int p, double* a, lapack_int lda, double* b,
   1319                            lapack_int ldb, double* c, double* d, double* x );
   1320 lapack_int LAPACKE_cgglse( int matrix_order, lapack_int m, lapack_int n,
   1321                            lapack_int p, lapack_complex_float* a,
   1322                            lapack_int lda, lapack_complex_float* b,
   1323                            lapack_int ldb, lapack_complex_float* c,
   1324                            lapack_complex_float* d, lapack_complex_float* x );
   1325 lapack_int LAPACKE_zgglse( int matrix_order, lapack_int m, lapack_int n,
   1326                            lapack_int p, lapack_complex_double* a,
   1327                            lapack_int lda, lapack_complex_double* b,
   1328                            lapack_int ldb, lapack_complex_double* c,
   1329                            lapack_complex_double* d, lapack_complex_double* x );
   1330 
   1331 lapack_int LAPACKE_sggqrf( int matrix_order, lapack_int n, lapack_int m,
   1332                            lapack_int p, float* a, lapack_int lda, float* taua,
   1333                            float* b, lapack_int ldb, float* taub );
   1334 lapack_int LAPACKE_dggqrf( int matrix_order, lapack_int n, lapack_int m,
   1335                            lapack_int p, double* a, lapack_int lda,
   1336                            double* taua, double* b, lapack_int ldb,
   1337                            double* taub );
   1338 lapack_int LAPACKE_cggqrf( int matrix_order, lapack_int n, lapack_int m,
   1339                            lapack_int p, lapack_complex_float* a,
   1340                            lapack_int lda, lapack_complex_float* taua,
   1341                            lapack_complex_float* b, lapack_int ldb,
   1342                            lapack_complex_float* taub );
   1343 lapack_int LAPACKE_zggqrf( int matrix_order, lapack_int n, lapack_int m,
   1344                            lapack_int p, lapack_complex_double* a,
   1345                            lapack_int lda, lapack_complex_double* taua,
   1346                            lapack_complex_double* b, lapack_int ldb,
   1347                            lapack_complex_double* taub );
   1348 
   1349 lapack_int LAPACKE_sggrqf( int matrix_order, lapack_int m, lapack_int p,
   1350                            lapack_int n, float* a, lapack_int lda, float* taua,
   1351                            float* b, lapack_int ldb, float* taub );
   1352 lapack_int LAPACKE_dggrqf( int matrix_order, lapack_int m, lapack_int p,
   1353                            lapack_int n, double* a, lapack_int lda,
   1354                            double* taua, double* b, lapack_int ldb,
   1355                            double* taub );
   1356 lapack_int LAPACKE_cggrqf( int matrix_order, lapack_int m, lapack_int p,
   1357                            lapack_int n, lapack_complex_float* a,
   1358                            lapack_int lda, lapack_complex_float* taua,
   1359                            lapack_complex_float* b, lapack_int ldb,
   1360                            lapack_complex_float* taub );
   1361 lapack_int LAPACKE_zggrqf( int matrix_order, lapack_int m, lapack_int p,
   1362                            lapack_int n, lapack_complex_double* a,
   1363                            lapack_int lda, lapack_complex_double* taua,
   1364                            lapack_complex_double* b, lapack_int ldb,
   1365                            lapack_complex_double* taub );
   1366 
   1367 lapack_int LAPACKE_sggsvd( int matrix_order, char jobu, char jobv, char jobq,
   1368                            lapack_int m, lapack_int n, lapack_int p,
   1369                            lapack_int* k, lapack_int* l, float* a,
   1370                            lapack_int lda, float* b, lapack_int ldb,
   1371                            float* alpha, float* beta, float* u, lapack_int ldu,
   1372                            float* v, lapack_int ldv, float* q, lapack_int ldq,
   1373                            lapack_int* iwork );
   1374 lapack_int LAPACKE_dggsvd( int matrix_order, char jobu, char jobv, char jobq,
   1375                            lapack_int m, lapack_int n, lapack_int p,
   1376                            lapack_int* k, lapack_int* l, double* a,
   1377                            lapack_int lda, double* b, lapack_int ldb,
   1378                            double* alpha, double* beta, double* u,
   1379                            lapack_int ldu, double* v, lapack_int ldv, double* q,
   1380                            lapack_int ldq, lapack_int* iwork );
   1381 lapack_int LAPACKE_cggsvd( int matrix_order, char jobu, char jobv, char jobq,
   1382                            lapack_int m, lapack_int n, lapack_int p,
   1383                            lapack_int* k, lapack_int* l,
   1384                            lapack_complex_float* a, lapack_int lda,
   1385                            lapack_complex_float* b, lapack_int ldb,
   1386                            float* alpha, float* beta, lapack_complex_float* u,
   1387                            lapack_int ldu, lapack_complex_float* v,
   1388                            lapack_int ldv, lapack_complex_float* q,
   1389                            lapack_int ldq, lapack_int* iwork );
   1390 lapack_int LAPACKE_zggsvd( int matrix_order, char jobu, char jobv, char jobq,
   1391                            lapack_int m, lapack_int n, lapack_int p,
   1392                            lapack_int* k, lapack_int* l,
   1393                            lapack_complex_double* a, lapack_int lda,
   1394                            lapack_complex_double* b, lapack_int ldb,
   1395                            double* alpha, double* beta,
   1396                            lapack_complex_double* u, lapack_int ldu,
   1397                            lapack_complex_double* v, lapack_int ldv,
   1398                            lapack_complex_double* q, lapack_int ldq,
   1399                            lapack_int* iwork );
   1400 
   1401 lapack_int LAPACKE_sggsvp( int matrix_order, char jobu, char jobv, char jobq,
   1402                            lapack_int m, lapack_int p, lapack_int n, float* a,
   1403                            lapack_int lda, float* b, lapack_int ldb, float tola,
   1404                            float tolb, lapack_int* k, lapack_int* l, float* u,
   1405                            lapack_int ldu, float* v, lapack_int ldv, float* q,
   1406                            lapack_int ldq );
   1407 lapack_int LAPACKE_dggsvp( int matrix_order, char jobu, char jobv, char jobq,
   1408                            lapack_int m, lapack_int p, lapack_int n, double* a,
   1409                            lapack_int lda, double* b, lapack_int ldb,
   1410                            double tola, double tolb, lapack_int* k,
   1411                            lapack_int* l, double* u, lapack_int ldu, double* v,
   1412                            lapack_int ldv, double* q, lapack_int ldq );
   1413 lapack_int LAPACKE_cggsvp( int matrix_order, char jobu, char jobv, char jobq,
   1414                            lapack_int m, lapack_int p, lapack_int n,
   1415                            lapack_complex_float* a, lapack_int lda,
   1416                            lapack_complex_float* b, lapack_int ldb, float tola,
   1417                            float tolb, lapack_int* k, lapack_int* l,
   1418                            lapack_complex_float* u, lapack_int ldu,
   1419                            lapack_complex_float* v, lapack_int ldv,
   1420                            lapack_complex_float* q, lapack_int ldq );
   1421 lapack_int LAPACKE_zggsvp( int matrix_order, char jobu, char jobv, char jobq,
   1422                            lapack_int m, lapack_int p, lapack_int n,
   1423                            lapack_complex_double* a, lapack_int lda,
   1424                            lapack_complex_double* b, lapack_int ldb,
   1425                            double tola, double tolb, lapack_int* k,
   1426                            lapack_int* l, lapack_complex_double* u,
   1427                            lapack_int ldu, lapack_complex_double* v,
   1428                            lapack_int ldv, lapack_complex_double* q,
   1429                            lapack_int ldq );
   1430 
   1431 lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
   1432                            const float* d, const float* du, const float* du2,
   1433                            const lapack_int* ipiv, float anorm, float* rcond );
   1434 lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
   1435                            const double* d, const double* du, const double* du2,
   1436                            const lapack_int* ipiv, double anorm,
   1437                            double* rcond );
   1438 lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
   1439                            const lapack_complex_float* dl,
   1440                            const lapack_complex_float* d,
   1441                            const lapack_complex_float* du,
   1442                            const lapack_complex_float* du2,
   1443                            const lapack_int* ipiv, float anorm, float* rcond );
   1444 lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
   1445                            const lapack_complex_double* dl,
   1446                            const lapack_complex_double* d,
   1447                            const lapack_complex_double* du,
   1448                            const lapack_complex_double* du2,
   1449                            const lapack_int* ipiv, double anorm,
   1450                            double* rcond );
   1451 
   1452 lapack_int LAPACKE_sgtrfs( int matrix_order, char trans, lapack_int n,
   1453                            lapack_int nrhs, const float* dl, const float* d,
   1454                            const float* du, const float* dlf, const float* df,
   1455                            const float* duf, const float* du2,
   1456                            const lapack_int* ipiv, const float* b,
   1457                            lapack_int ldb, float* x, lapack_int ldx,
   1458                            float* ferr, float* berr );
   1459 lapack_int LAPACKE_dgtrfs( int matrix_order, char trans, lapack_int n,
   1460                            lapack_int nrhs, const double* dl, const double* d,
   1461                            const double* du, const double* dlf,
   1462                            const double* df, const double* duf,
   1463                            const double* du2, const lapack_int* ipiv,
   1464                            const double* b, lapack_int ldb, double* x,
   1465                            lapack_int ldx, double* ferr, double* berr );
   1466 lapack_int LAPACKE_cgtrfs( int matrix_order, char trans, lapack_int n,
   1467                            lapack_int nrhs, const lapack_complex_float* dl,
   1468                            const lapack_complex_float* d,
   1469                            const lapack_complex_float* du,
   1470                            const lapack_complex_float* dlf,
   1471                            const lapack_complex_float* df,
   1472                            const lapack_complex_float* duf,
   1473                            const lapack_complex_float* du2,
   1474                            const lapack_int* ipiv,
   1475                            const lapack_complex_float* b, lapack_int ldb,
   1476                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   1477                            float* berr );
   1478 lapack_int LAPACKE_zgtrfs( int matrix_order, char trans, lapack_int n,
   1479                            lapack_int nrhs, const lapack_complex_double* dl,
   1480                            const lapack_complex_double* d,
   1481                            const lapack_complex_double* du,
   1482                            const lapack_complex_double* dlf,
   1483                            const lapack_complex_double* df,
   1484                            const lapack_complex_double* duf,
   1485                            const lapack_complex_double* du2,
   1486                            const lapack_int* ipiv,
   1487                            const lapack_complex_double* b, lapack_int ldb,
   1488                            lapack_complex_double* x, lapack_int ldx,
   1489                            double* ferr, double* berr );
   1490 
   1491 lapack_int LAPACKE_sgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
   1492                           float* dl, float* d, float* du, float* b,
   1493                           lapack_int ldb );
   1494 lapack_int LAPACKE_dgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
   1495                           double* dl, double* d, double* du, double* b,
   1496                           lapack_int ldb );
   1497 lapack_int LAPACKE_cgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
   1498                           lapack_complex_float* dl, lapack_complex_float* d,
   1499                           lapack_complex_float* du, lapack_complex_float* b,
   1500                           lapack_int ldb );
   1501 lapack_int LAPACKE_zgtsv( int matrix_order, lapack_int n, lapack_int nrhs,
   1502                           lapack_complex_double* dl, lapack_complex_double* d,
   1503                           lapack_complex_double* du, lapack_complex_double* b,
   1504                           lapack_int ldb );
   1505 
   1506 lapack_int LAPACKE_sgtsvx( int matrix_order, char fact, char trans,
   1507                            lapack_int n, lapack_int nrhs, const float* dl,
   1508                            const float* d, const float* du, float* dlf,
   1509                            float* df, float* duf, float* du2, lapack_int* ipiv,
   1510                            const float* b, lapack_int ldb, float* x,
   1511                            lapack_int ldx, float* rcond, float* ferr,
   1512                            float* berr );
   1513 lapack_int LAPACKE_dgtsvx( int matrix_order, char fact, char trans,
   1514                            lapack_int n, lapack_int nrhs, const double* dl,
   1515                            const double* d, const double* du, double* dlf,
   1516                            double* df, double* duf, double* du2,
   1517                            lapack_int* ipiv, const double* b, lapack_int ldb,
   1518                            double* x, lapack_int ldx, double* rcond,
   1519                            double* ferr, double* berr );
   1520 lapack_int LAPACKE_cgtsvx( int matrix_order, char fact, char trans,
   1521                            lapack_int n, lapack_int nrhs,
   1522                            const lapack_complex_float* dl,
   1523                            const lapack_complex_float* d,
   1524                            const lapack_complex_float* du,
   1525                            lapack_complex_float* dlf, lapack_complex_float* df,
   1526                            lapack_complex_float* duf, lapack_complex_float* du2,
   1527                            lapack_int* ipiv, const lapack_complex_float* b,
   1528                            lapack_int ldb, lapack_complex_float* x,
   1529                            lapack_int ldx, float* rcond, float* ferr,
   1530                            float* berr );
   1531 lapack_int LAPACKE_zgtsvx( int matrix_order, char fact, char trans,
   1532                            lapack_int n, lapack_int nrhs,
   1533                            const lapack_complex_double* dl,
   1534                            const lapack_complex_double* d,
   1535                            const lapack_complex_double* du,
   1536                            lapack_complex_double* dlf,
   1537                            lapack_complex_double* df,
   1538                            lapack_complex_double* duf,
   1539                            lapack_complex_double* du2, lapack_int* ipiv,
   1540                            const lapack_complex_double* b, lapack_int ldb,
   1541                            lapack_complex_double* x, lapack_int ldx,
   1542                            double* rcond, double* ferr, double* berr );
   1543 
   1544 lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
   1545                            float* du2, lapack_int* ipiv );
   1546 lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
   1547                            double* du2, lapack_int* ipiv );
   1548 lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
   1549                            lapack_complex_float* d, lapack_complex_float* du,
   1550                            lapack_complex_float* du2, lapack_int* ipiv );
   1551 lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
   1552                            lapack_complex_double* d, lapack_complex_double* du,
   1553                            lapack_complex_double* du2, lapack_int* ipiv );
   1554 
   1555 lapack_int LAPACKE_sgttrs( int matrix_order, char trans, lapack_int n,
   1556                            lapack_int nrhs, const float* dl, const float* d,
   1557                            const float* du, const float* du2,
   1558                            const lapack_int* ipiv, float* b, lapack_int ldb );
   1559 lapack_int LAPACKE_dgttrs( int matrix_order, char trans, lapack_int n,
   1560                            lapack_int nrhs, const double* dl, const double* d,
   1561                            const double* du, const double* du2,
   1562                            const lapack_int* ipiv, double* b, lapack_int ldb );
   1563 lapack_int LAPACKE_cgttrs( int matrix_order, char trans, lapack_int n,
   1564                            lapack_int nrhs, const lapack_complex_float* dl,
   1565                            const lapack_complex_float* d,
   1566                            const lapack_complex_float* du,
   1567                            const lapack_complex_float* du2,
   1568                            const lapack_int* ipiv, lapack_complex_float* b,
   1569                            lapack_int ldb );
   1570 lapack_int LAPACKE_zgttrs( int matrix_order, char trans, lapack_int n,
   1571                            lapack_int nrhs, const lapack_complex_double* dl,
   1572                            const lapack_complex_double* d,
   1573                            const lapack_complex_double* du,
   1574                            const lapack_complex_double* du2,
   1575                            const lapack_int* ipiv, lapack_complex_double* b,
   1576                            lapack_int ldb );
   1577 
   1578 lapack_int LAPACKE_chbev( int matrix_order, char jobz, char uplo, lapack_int n,
   1579                           lapack_int kd, lapack_complex_float* ab,
   1580                           lapack_int ldab, float* w, lapack_complex_float* z,
   1581                           lapack_int ldz );
   1582 lapack_int LAPACKE_zhbev( int matrix_order, char jobz, char uplo, lapack_int n,
   1583                           lapack_int kd, lapack_complex_double* ab,
   1584                           lapack_int ldab, double* w, lapack_complex_double* z,
   1585                           lapack_int ldz );
   1586 
   1587 lapack_int LAPACKE_chbevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1588                            lapack_int kd, lapack_complex_float* ab,
   1589                            lapack_int ldab, float* w, lapack_complex_float* z,
   1590                            lapack_int ldz );
   1591 lapack_int LAPACKE_zhbevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1592                            lapack_int kd, lapack_complex_double* ab,
   1593                            lapack_int ldab, double* w, lapack_complex_double* z,
   1594                            lapack_int ldz );
   1595 
   1596 lapack_int LAPACKE_chbevx( int matrix_order, char jobz, char range, char uplo,
   1597                            lapack_int n, lapack_int kd,
   1598                            lapack_complex_float* ab, lapack_int ldab,
   1599                            lapack_complex_float* q, lapack_int ldq, float vl,
   1600                            float vu, lapack_int il, lapack_int iu, float abstol,
   1601                            lapack_int* m, float* w, lapack_complex_float* z,
   1602                            lapack_int ldz, lapack_int* ifail );
   1603 lapack_int LAPACKE_zhbevx( int matrix_order, char jobz, char range, char uplo,
   1604                            lapack_int n, lapack_int kd,
   1605                            lapack_complex_double* ab, lapack_int ldab,
   1606                            lapack_complex_double* q, lapack_int ldq, double vl,
   1607                            double vu, lapack_int il, lapack_int iu,
   1608                            double abstol, lapack_int* m, double* w,
   1609                            lapack_complex_double* z, lapack_int ldz,
   1610                            lapack_int* ifail );
   1611 
   1612 lapack_int LAPACKE_chbgst( int matrix_order, char vect, char uplo, lapack_int n,
   1613                            lapack_int ka, lapack_int kb,
   1614                            lapack_complex_float* ab, lapack_int ldab,
   1615                            const lapack_complex_float* bb, lapack_int ldbb,
   1616                            lapack_complex_float* x, lapack_int ldx );
   1617 lapack_int LAPACKE_zhbgst( int matrix_order, char vect, char uplo, lapack_int n,
   1618                            lapack_int ka, lapack_int kb,
   1619                            lapack_complex_double* ab, lapack_int ldab,
   1620                            const lapack_complex_double* bb, lapack_int ldbb,
   1621                            lapack_complex_double* x, lapack_int ldx );
   1622 
   1623 lapack_int LAPACKE_chbgv( int matrix_order, char jobz, char uplo, lapack_int n,
   1624                           lapack_int ka, lapack_int kb,
   1625                           lapack_complex_float* ab, lapack_int ldab,
   1626                           lapack_complex_float* bb, lapack_int ldbb, float* w,
   1627                           lapack_complex_float* z, lapack_int ldz );
   1628 lapack_int LAPACKE_zhbgv( int matrix_order, char jobz, char uplo, lapack_int n,
   1629                           lapack_int ka, lapack_int kb,
   1630                           lapack_complex_double* ab, lapack_int ldab,
   1631                           lapack_complex_double* bb, lapack_int ldbb, double* w,
   1632                           lapack_complex_double* z, lapack_int ldz );
   1633 
   1634 lapack_int LAPACKE_chbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
   1635                            lapack_int ka, lapack_int kb,
   1636                            lapack_complex_float* ab, lapack_int ldab,
   1637                            lapack_complex_float* bb, lapack_int ldbb, float* w,
   1638                            lapack_complex_float* z, lapack_int ldz );
   1639 lapack_int LAPACKE_zhbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
   1640                            lapack_int ka, lapack_int kb,
   1641                            lapack_complex_double* ab, lapack_int ldab,
   1642                            lapack_complex_double* bb, lapack_int ldbb,
   1643                            double* w, lapack_complex_double* z,
   1644                            lapack_int ldz );
   1645 
   1646 lapack_int LAPACKE_chbgvx( int matrix_order, char jobz, char range, char uplo,
   1647                            lapack_int n, lapack_int ka, lapack_int kb,
   1648                            lapack_complex_float* ab, lapack_int ldab,
   1649                            lapack_complex_float* bb, lapack_int ldbb,
   1650                            lapack_complex_float* q, lapack_int ldq, float vl,
   1651                            float vu, lapack_int il, lapack_int iu, float abstol,
   1652                            lapack_int* m, float* w, lapack_complex_float* z,
   1653                            lapack_int ldz, lapack_int* ifail );
   1654 lapack_int LAPACKE_zhbgvx( int matrix_order, char jobz, char range, char uplo,
   1655                            lapack_int n, lapack_int ka, lapack_int kb,
   1656                            lapack_complex_double* ab, lapack_int ldab,
   1657                            lapack_complex_double* bb, lapack_int ldbb,
   1658                            lapack_complex_double* q, lapack_int ldq, double vl,
   1659                            double vu, lapack_int il, lapack_int iu,
   1660                            double abstol, lapack_int* m, double* w,
   1661                            lapack_complex_double* z, lapack_int ldz,
   1662                            lapack_int* ifail );
   1663 
   1664 lapack_int LAPACKE_chbtrd( int matrix_order, char vect, char uplo, lapack_int n,
   1665                            lapack_int kd, lapack_complex_float* ab,
   1666                            lapack_int ldab, float* d, float* e,
   1667                            lapack_complex_float* q, lapack_int ldq );
   1668 lapack_int LAPACKE_zhbtrd( int matrix_order, char vect, char uplo, lapack_int n,
   1669                            lapack_int kd, lapack_complex_double* ab,
   1670                            lapack_int ldab, double* d, double* e,
   1671                            lapack_complex_double* q, lapack_int ldq );
   1672 
   1673 lapack_int LAPACKE_checon( int matrix_order, char uplo, lapack_int n,
   1674                            const lapack_complex_float* a, lapack_int lda,
   1675                            const lapack_int* ipiv, float anorm, float* rcond );
   1676 lapack_int LAPACKE_zhecon( int matrix_order, char uplo, lapack_int n,
   1677                            const lapack_complex_double* a, lapack_int lda,
   1678                            const lapack_int* ipiv, double anorm,
   1679                            double* rcond );
   1680 
   1681 lapack_int LAPACKE_cheequb( int matrix_order, char uplo, lapack_int n,
   1682                             const lapack_complex_float* a, lapack_int lda,
   1683                             float* s, float* scond, float* amax );
   1684 lapack_int LAPACKE_zheequb( int matrix_order, char uplo, lapack_int n,
   1685                             const lapack_complex_double* a, lapack_int lda,
   1686                             double* s, double* scond, double* amax );
   1687 
   1688 lapack_int LAPACKE_cheev( int matrix_order, char jobz, char uplo, lapack_int n,
   1689                           lapack_complex_float* a, lapack_int lda, float* w );
   1690 lapack_int LAPACKE_zheev( int matrix_order, char jobz, char uplo, lapack_int n,
   1691                           lapack_complex_double* a, lapack_int lda, double* w );
   1692 
   1693 lapack_int LAPACKE_cheevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1694                            lapack_complex_float* a, lapack_int lda, float* w );
   1695 lapack_int LAPACKE_zheevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1696                            lapack_complex_double* a, lapack_int lda,
   1697                            double* w );
   1698 
   1699 lapack_int LAPACKE_cheevr( int matrix_order, char jobz, char range, char uplo,
   1700                            lapack_int n, lapack_complex_float* a,
   1701                            lapack_int lda, float vl, float vu, lapack_int il,
   1702                            lapack_int iu, float abstol, lapack_int* m, float* w,
   1703                            lapack_complex_float* z, lapack_int ldz,
   1704                            lapack_int* isuppz );
   1705 lapack_int LAPACKE_zheevr( int matrix_order, char jobz, char range, char uplo,
   1706                            lapack_int n, lapack_complex_double* a,
   1707                            lapack_int lda, double vl, double vu, lapack_int il,
   1708                            lapack_int iu, double abstol, lapack_int* m,
   1709                            double* w, lapack_complex_double* z, lapack_int ldz,
   1710                            lapack_int* isuppz );
   1711 
   1712 lapack_int LAPACKE_cheevx( int matrix_order, char jobz, char range, char uplo,
   1713                            lapack_int n, lapack_complex_float* a,
   1714                            lapack_int lda, float vl, float vu, lapack_int il,
   1715                            lapack_int iu, float abstol, lapack_int* m, float* w,
   1716                            lapack_complex_float* z, lapack_int ldz,
   1717                            lapack_int* ifail );
   1718 lapack_int LAPACKE_zheevx( int matrix_order, char jobz, char range, char uplo,
   1719                            lapack_int n, lapack_complex_double* a,
   1720                            lapack_int lda, double vl, double vu, lapack_int il,
   1721                            lapack_int iu, double abstol, lapack_int* m,
   1722                            double* w, lapack_complex_double* z, lapack_int ldz,
   1723                            lapack_int* ifail );
   1724 
   1725 lapack_int LAPACKE_chegst( int matrix_order, lapack_int itype, char uplo,
   1726                            lapack_int n, lapack_complex_float* a,
   1727                            lapack_int lda, const lapack_complex_float* b,
   1728                            lapack_int ldb );
   1729 lapack_int LAPACKE_zhegst( int matrix_order, lapack_int itype, char uplo,
   1730                            lapack_int n, lapack_complex_double* a,
   1731                            lapack_int lda, const lapack_complex_double* b,
   1732                            lapack_int ldb );
   1733 
   1734 lapack_int LAPACKE_chegv( int matrix_order, lapack_int itype, char jobz,
   1735                           char uplo, lapack_int n, lapack_complex_float* a,
   1736                           lapack_int lda, lapack_complex_float* b,
   1737                           lapack_int ldb, float* w );
   1738 lapack_int LAPACKE_zhegv( int matrix_order, lapack_int itype, char jobz,
   1739                           char uplo, lapack_int n, lapack_complex_double* a,
   1740                           lapack_int lda, lapack_complex_double* b,
   1741                           lapack_int ldb, double* w );
   1742 
   1743 lapack_int LAPACKE_chegvd( int matrix_order, lapack_int itype, char jobz,
   1744                            char uplo, lapack_int n, lapack_complex_float* a,
   1745                            lapack_int lda, lapack_complex_float* b,
   1746                            lapack_int ldb, float* w );
   1747 lapack_int LAPACKE_zhegvd( int matrix_order, lapack_int itype, char jobz,
   1748                            char uplo, lapack_int n, lapack_complex_double* a,
   1749                            lapack_int lda, lapack_complex_double* b,
   1750                            lapack_int ldb, double* w );
   1751 
   1752 lapack_int LAPACKE_chegvx( int matrix_order, lapack_int itype, char jobz,
   1753                            char range, char uplo, lapack_int n,
   1754                            lapack_complex_float* a, lapack_int lda,
   1755                            lapack_complex_float* b, lapack_int ldb, float vl,
   1756                            float vu, lapack_int il, lapack_int iu, float abstol,
   1757                            lapack_int* m, float* w, lapack_complex_float* z,
   1758                            lapack_int ldz, lapack_int* ifail );
   1759 lapack_int LAPACKE_zhegvx( int matrix_order, lapack_int itype, char jobz,
   1760                            char range, char uplo, lapack_int n,
   1761                            lapack_complex_double* a, lapack_int lda,
   1762                            lapack_complex_double* b, lapack_int ldb, double vl,
   1763                            double vu, lapack_int il, lapack_int iu,
   1764                            double abstol, lapack_int* m, double* w,
   1765                            lapack_complex_double* z, lapack_int ldz,
   1766                            lapack_int* ifail );
   1767 
   1768 lapack_int LAPACKE_cherfs( int matrix_order, char uplo, lapack_int n,
   1769                            lapack_int nrhs, const lapack_complex_float* a,
   1770                            lapack_int lda, const lapack_complex_float* af,
   1771                            lapack_int ldaf, const lapack_int* ipiv,
   1772                            const lapack_complex_float* b, lapack_int ldb,
   1773                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   1774                            float* berr );
   1775 lapack_int LAPACKE_zherfs( int matrix_order, char uplo, lapack_int n,
   1776                            lapack_int nrhs, const lapack_complex_double* a,
   1777                            lapack_int lda, const lapack_complex_double* af,
   1778                            lapack_int ldaf, const lapack_int* ipiv,
   1779                            const lapack_complex_double* b, lapack_int ldb,
   1780                            lapack_complex_double* x, lapack_int ldx,
   1781                            double* ferr, double* berr );
   1782 
   1783 lapack_int LAPACKE_cherfsx( int matrix_order, char uplo, char equed,
   1784                             lapack_int n, lapack_int nrhs,
   1785                             const lapack_complex_float* a, lapack_int lda,
   1786                             const lapack_complex_float* af, lapack_int ldaf,
   1787                             const lapack_int* ipiv, const float* s,
   1788                             const lapack_complex_float* b, lapack_int ldb,
   1789                             lapack_complex_float* x, lapack_int ldx,
   1790                             float* rcond, float* berr, lapack_int n_err_bnds,
   1791                             float* err_bnds_norm, float* err_bnds_comp,
   1792                             lapack_int nparams, float* params );
   1793 lapack_int LAPACKE_zherfsx( int matrix_order, char uplo, char equed,
   1794                             lapack_int n, lapack_int nrhs,
   1795                             const lapack_complex_double* a, lapack_int lda,
   1796                             const lapack_complex_double* af, lapack_int ldaf,
   1797                             const lapack_int* ipiv, const double* s,
   1798                             const lapack_complex_double* b, lapack_int ldb,
   1799                             lapack_complex_double* x, lapack_int ldx,
   1800                             double* rcond, double* berr, lapack_int n_err_bnds,
   1801                             double* err_bnds_norm, double* err_bnds_comp,
   1802                             lapack_int nparams, double* params );
   1803 
   1804 lapack_int LAPACKE_chesv( int matrix_order, char uplo, lapack_int n,
   1805                           lapack_int nrhs, lapack_complex_float* a,
   1806                           lapack_int lda, lapack_int* ipiv,
   1807                           lapack_complex_float* b, lapack_int ldb );
   1808 lapack_int LAPACKE_zhesv( int matrix_order, char uplo, lapack_int n,
   1809                           lapack_int nrhs, lapack_complex_double* a,
   1810                           lapack_int lda, lapack_int* ipiv,
   1811                           lapack_complex_double* b, lapack_int ldb );
   1812 
   1813 lapack_int LAPACKE_chesvx( int matrix_order, char fact, char uplo, lapack_int n,
   1814                            lapack_int nrhs, const lapack_complex_float* a,
   1815                            lapack_int lda, lapack_complex_float* af,
   1816                            lapack_int ldaf, lapack_int* ipiv,
   1817                            const lapack_complex_float* b, lapack_int ldb,
   1818                            lapack_complex_float* x, lapack_int ldx,
   1819                            float* rcond, float* ferr, float* berr );
   1820 lapack_int LAPACKE_zhesvx( int matrix_order, char fact, char uplo, lapack_int n,
   1821                            lapack_int nrhs, const lapack_complex_double* a,
   1822                            lapack_int lda, lapack_complex_double* af,
   1823                            lapack_int ldaf, lapack_int* ipiv,
   1824                            const lapack_complex_double* b, lapack_int ldb,
   1825                            lapack_complex_double* x, lapack_int ldx,
   1826                            double* rcond, double* ferr, double* berr );
   1827 
   1828 lapack_int LAPACKE_chesvxx( int matrix_order, char fact, char uplo,
   1829                             lapack_int n, lapack_int nrhs,
   1830                             lapack_complex_float* a, lapack_int lda,
   1831                             lapack_complex_float* af, lapack_int ldaf,
   1832                             lapack_int* ipiv, char* equed, float* s,
   1833                             lapack_complex_float* b, lapack_int ldb,
   1834                             lapack_complex_float* x, lapack_int ldx,
   1835                             float* rcond, float* rpvgrw, float* berr,
   1836                             lapack_int n_err_bnds, float* err_bnds_norm,
   1837                             float* err_bnds_comp, lapack_int nparams,
   1838                             float* params );
   1839 lapack_int LAPACKE_zhesvxx( int matrix_order, char fact, char uplo,
   1840                             lapack_int n, lapack_int nrhs,
   1841                             lapack_complex_double* a, lapack_int lda,
   1842                             lapack_complex_double* af, lapack_int ldaf,
   1843                             lapack_int* ipiv, char* equed, double* s,
   1844                             lapack_complex_double* b, lapack_int ldb,
   1845                             lapack_complex_double* x, lapack_int ldx,
   1846                             double* rcond, double* rpvgrw, double* berr,
   1847                             lapack_int n_err_bnds, double* err_bnds_norm,
   1848                             double* err_bnds_comp, lapack_int nparams,
   1849                             double* params );
   1850 
   1851 lapack_int LAPACKE_chetrd( int matrix_order, char uplo, lapack_int n,
   1852                            lapack_complex_float* a, lapack_int lda, float* d,
   1853                            float* e, lapack_complex_float* tau );
   1854 lapack_int LAPACKE_zhetrd( int matrix_order, char uplo, lapack_int n,
   1855                            lapack_complex_double* a, lapack_int lda, double* d,
   1856                            double* e, lapack_complex_double* tau );
   1857 
   1858 lapack_int LAPACKE_chetrf( int matrix_order, char uplo, lapack_int n,
   1859                            lapack_complex_float* a, lapack_int lda,
   1860                            lapack_int* ipiv );
   1861 lapack_int LAPACKE_zhetrf( int matrix_order, char uplo, lapack_int n,
   1862                            lapack_complex_double* a, lapack_int lda,
   1863                            lapack_int* ipiv );
   1864 
   1865 lapack_int LAPACKE_chetri( int matrix_order, char uplo, lapack_int n,
   1866                            lapack_complex_float* a, lapack_int lda,
   1867                            const lapack_int* ipiv );
   1868 lapack_int LAPACKE_zhetri( int matrix_order, char uplo, lapack_int n,
   1869                            lapack_complex_double* a, lapack_int lda,
   1870                            const lapack_int* ipiv );
   1871 
   1872 lapack_int LAPACKE_chetrs( int matrix_order, char uplo, lapack_int n,
   1873                            lapack_int nrhs, const lapack_complex_float* a,
   1874                            lapack_int lda, const lapack_int* ipiv,
   1875                            lapack_complex_float* b, lapack_int ldb );
   1876 lapack_int LAPACKE_zhetrs( int matrix_order, char uplo, lapack_int n,
   1877                            lapack_int nrhs, const lapack_complex_double* a,
   1878                            lapack_int lda, const lapack_int* ipiv,
   1879                            lapack_complex_double* b, lapack_int ldb );
   1880 
   1881 lapack_int LAPACKE_chfrk( int matrix_order, char transr, char uplo, char trans,
   1882                           lapack_int n, lapack_int k, float alpha,
   1883                           const lapack_complex_float* a, lapack_int lda,
   1884                           float beta, lapack_complex_float* c );
   1885 lapack_int LAPACKE_zhfrk( int matrix_order, char transr, char uplo, char trans,
   1886                           lapack_int n, lapack_int k, double alpha,
   1887                           const lapack_complex_double* a, lapack_int lda,
   1888                           double beta, lapack_complex_double* c );
   1889 
   1890 lapack_int LAPACKE_shgeqz( int matrix_order, char job, char compq, char compz,
   1891                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1892                            float* h, lapack_int ldh, float* t, lapack_int ldt,
   1893                            float* alphar, float* alphai, float* beta, float* q,
   1894                            lapack_int ldq, float* z, lapack_int ldz );
   1895 lapack_int LAPACKE_dhgeqz( int matrix_order, char job, char compq, char compz,
   1896                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1897                            double* h, lapack_int ldh, double* t, lapack_int ldt,
   1898                            double* alphar, double* alphai, double* beta,
   1899                            double* q, lapack_int ldq, double* z,
   1900                            lapack_int ldz );
   1901 lapack_int LAPACKE_chgeqz( int matrix_order, char job, char compq, char compz,
   1902                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1903                            lapack_complex_float* h, lapack_int ldh,
   1904                            lapack_complex_float* t, lapack_int ldt,
   1905                            lapack_complex_float* alpha,
   1906                            lapack_complex_float* beta, lapack_complex_float* q,
   1907                            lapack_int ldq, lapack_complex_float* z,
   1908                            lapack_int ldz );
   1909 lapack_int LAPACKE_zhgeqz( int matrix_order, char job, char compq, char compz,
   1910                            lapack_int n, lapack_int ilo, lapack_int ihi,
   1911                            lapack_complex_double* h, lapack_int ldh,
   1912                            lapack_complex_double* t, lapack_int ldt,
   1913                            lapack_complex_double* alpha,
   1914                            lapack_complex_double* beta,
   1915                            lapack_complex_double* q, lapack_int ldq,
   1916                            lapack_complex_double* z, lapack_int ldz );
   1917 
   1918 lapack_int LAPACKE_chpcon( int matrix_order, char uplo, lapack_int n,
   1919                            const lapack_complex_float* ap,
   1920                            const lapack_int* ipiv, float anorm, float* rcond );
   1921 lapack_int LAPACKE_zhpcon( int matrix_order, char uplo, lapack_int n,
   1922                            const lapack_complex_double* ap,
   1923                            const lapack_int* ipiv, double anorm,
   1924                            double* rcond );
   1925 
   1926 lapack_int LAPACKE_chpev( int matrix_order, char jobz, char uplo, lapack_int n,
   1927                           lapack_complex_float* ap, float* w,
   1928                           lapack_complex_float* z, lapack_int ldz );
   1929 lapack_int LAPACKE_zhpev( int matrix_order, char jobz, char uplo, lapack_int n,
   1930                           lapack_complex_double* ap, double* w,
   1931                           lapack_complex_double* z, lapack_int ldz );
   1932 
   1933 lapack_int LAPACKE_chpevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1934                            lapack_complex_float* ap, float* w,
   1935                            lapack_complex_float* z, lapack_int ldz );
   1936 lapack_int LAPACKE_zhpevd( int matrix_order, char jobz, char uplo, lapack_int n,
   1937                            lapack_complex_double* ap, double* w,
   1938                            lapack_complex_double* z, lapack_int ldz );
   1939 
   1940 lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo,
   1941                            lapack_int n, lapack_complex_float* ap, float vl,
   1942                            float vu, lapack_int il, lapack_int iu, float abstol,
   1943                            lapack_int* m, float* w, lapack_complex_float* z,
   1944                            lapack_int ldz, lapack_int* ifail );
   1945 lapack_int LAPACKE_zhpevx( int matrix_order, char jobz, char range, char uplo,
   1946                            lapack_int n, lapack_complex_double* ap, double vl,
   1947                            double vu, lapack_int il, lapack_int iu,
   1948                            double abstol, lapack_int* m, double* w,
   1949                            lapack_complex_double* z, lapack_int ldz,
   1950                            lapack_int* ifail );
   1951 
   1952 lapack_int LAPACKE_chpgst( int matrix_order, lapack_int itype, char uplo,
   1953                            lapack_int n, lapack_complex_float* ap,
   1954                            const lapack_complex_float* bp );
   1955 lapack_int LAPACKE_zhpgst( int matrix_order, lapack_int itype, char uplo,
   1956                            lapack_int n, lapack_complex_double* ap,
   1957                            const lapack_complex_double* bp );
   1958 
   1959 lapack_int LAPACKE_chpgv( int matrix_order, lapack_int itype, char jobz,
   1960                           char uplo, lapack_int n, lapack_complex_float* ap,
   1961                           lapack_complex_float* bp, float* w,
   1962                           lapack_complex_float* z, lapack_int ldz );
   1963 lapack_int LAPACKE_zhpgv( int matrix_order, lapack_int itype, char jobz,
   1964                           char uplo, lapack_int n, lapack_complex_double* ap,
   1965                           lapack_complex_double* bp, double* w,
   1966                           lapack_complex_double* z, lapack_int ldz );
   1967 
   1968 lapack_int LAPACKE_chpgvd( int matrix_order, lapack_int itype, char jobz,
   1969                            char uplo, lapack_int n, lapack_complex_float* ap,
   1970                            lapack_complex_float* bp, float* w,
   1971                            lapack_complex_float* z, lapack_int ldz );
   1972 lapack_int LAPACKE_zhpgvd( int matrix_order, lapack_int itype, char jobz,
   1973                            char uplo, lapack_int n, lapack_complex_double* ap,
   1974                            lapack_complex_double* bp, double* w,
   1975                            lapack_complex_double* z, lapack_int ldz );
   1976 
   1977 lapack_int LAPACKE_chpgvx( int matrix_order, lapack_int itype, char jobz,
   1978                            char range, char uplo, lapack_int n,
   1979                            lapack_complex_float* ap, lapack_complex_float* bp,
   1980                            float vl, float vu, lapack_int il, lapack_int iu,
   1981                            float abstol, lapack_int* m, float* w,
   1982                            lapack_complex_float* z, lapack_int ldz,
   1983                            lapack_int* ifail );
   1984 lapack_int LAPACKE_zhpgvx( int matrix_order, lapack_int itype, char jobz,
   1985                            char range, char uplo, lapack_int n,
   1986                            lapack_complex_double* ap, lapack_complex_double* bp,
   1987                            double vl, double vu, lapack_int il, lapack_int iu,
   1988                            double abstol, lapack_int* m, double* w,
   1989                            lapack_complex_double* z, lapack_int ldz,
   1990                            lapack_int* ifail );
   1991 
   1992 lapack_int LAPACKE_chprfs( int matrix_order, char uplo, lapack_int n,
   1993                            lapack_int nrhs, const lapack_complex_float* ap,
   1994                            const lapack_complex_float* afp,
   1995                            const lapack_int* ipiv,
   1996                            const lapack_complex_float* b, lapack_int ldb,
   1997                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   1998                            float* berr );
   1999 lapack_int LAPACKE_zhprfs( int matrix_order, char uplo, lapack_int n,
   2000                            lapack_int nrhs, const lapack_complex_double* ap,
   2001                            const lapack_complex_double* afp,
   2002                            const lapack_int* ipiv,
   2003                            const lapack_complex_double* b, lapack_int ldb,
   2004                            lapack_complex_double* x, lapack_int ldx,
   2005                            double* ferr, double* berr );
   2006 
   2007 lapack_int LAPACKE_chpsv( int matrix_order, char uplo, lapack_int n,
   2008                           lapack_int nrhs, lapack_complex_float* ap,
   2009                           lapack_int* ipiv, lapack_complex_float* b,
   2010                           lapack_int ldb );
   2011 lapack_int LAPACKE_zhpsv( int matrix_order, char uplo, lapack_int n,
   2012                           lapack_int nrhs, lapack_complex_double* ap,
   2013                           lapack_int* ipiv, lapack_complex_double* b,
   2014                           lapack_int ldb );
   2015 
   2016 lapack_int LAPACKE_chpsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2017                            lapack_int nrhs, const lapack_complex_float* ap,
   2018                            lapack_complex_float* afp, lapack_int* ipiv,
   2019                            const lapack_complex_float* b, lapack_int ldb,
   2020                            lapack_complex_float* x, lapack_int ldx,
   2021                            float* rcond, float* ferr, float* berr );
   2022 lapack_int LAPACKE_zhpsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2023                            lapack_int nrhs, const lapack_complex_double* ap,
   2024                            lapack_complex_double* afp, lapack_int* ipiv,
   2025                            const lapack_complex_double* b, lapack_int ldb,
   2026                            lapack_complex_double* x, lapack_int ldx,
   2027                            double* rcond, double* ferr, double* berr );
   2028 
   2029 lapack_int LAPACKE_chptrd( int matrix_order, char uplo, lapack_int n,
   2030                            lapack_complex_float* ap, float* d, float* e,
   2031                            lapack_complex_float* tau );
   2032 lapack_int LAPACKE_zhptrd( int matrix_order, char uplo, lapack_int n,
   2033                            lapack_complex_double* ap, double* d, double* e,
   2034                            lapack_complex_double* tau );
   2035 
   2036 lapack_int LAPACKE_chptrf( int matrix_order, char uplo, lapack_int n,
   2037                            lapack_complex_float* ap, lapack_int* ipiv );
   2038 lapack_int LAPACKE_zhptrf( int matrix_order, char uplo, lapack_int n,
   2039                            lapack_complex_double* ap, lapack_int* ipiv );
   2040 
   2041 lapack_int LAPACKE_chptri( int matrix_order, char uplo, lapack_int n,
   2042                            lapack_complex_float* ap, const lapack_int* ipiv );
   2043 lapack_int LAPACKE_zhptri( int matrix_order, char uplo, lapack_int n,
   2044                            lapack_complex_double* ap, const lapack_int* ipiv );
   2045 
   2046 lapack_int LAPACKE_chptrs( int matrix_order, char uplo, lapack_int n,
   2047                            lapack_int nrhs, const lapack_complex_float* ap,
   2048                            const lapack_int* ipiv, lapack_complex_float* b,
   2049                            lapack_int ldb );
   2050 lapack_int LAPACKE_zhptrs( int matrix_order, char uplo, lapack_int n,
   2051                            lapack_int nrhs, const lapack_complex_double* ap,
   2052                            const lapack_int* ipiv, lapack_complex_double* b,
   2053                            lapack_int ldb );
   2054 
   2055 lapack_int LAPACKE_shsein( int matrix_order, char job, char eigsrc, char initv,
   2056                            lapack_logical* select, lapack_int n, const float* h,
   2057                            lapack_int ldh, float* wr, const float* wi,
   2058                            float* vl, lapack_int ldvl, float* vr,
   2059                            lapack_int ldvr, lapack_int mm, lapack_int* m,
   2060                            lapack_int* ifaill, lapack_int* ifailr );
   2061 lapack_int LAPACKE_dhsein( int matrix_order, char job, char eigsrc, char initv,
   2062                            lapack_logical* select, lapack_int n,
   2063                            const double* h, lapack_int ldh, double* wr,
   2064                            const double* wi, double* vl, lapack_int ldvl,
   2065                            double* vr, lapack_int ldvr, lapack_int mm,
   2066                            lapack_int* m, lapack_int* ifaill,
   2067                            lapack_int* ifailr );
   2068 lapack_int LAPACKE_chsein( int matrix_order, char job, char eigsrc, char initv,
   2069                            const lapack_logical* select, lapack_int n,
   2070                            const lapack_complex_float* h, lapack_int ldh,
   2071                            lapack_complex_float* w, lapack_complex_float* vl,
   2072                            lapack_int ldvl, lapack_complex_float* vr,
   2073                            lapack_int ldvr, lapack_int mm, lapack_int* m,
   2074                            lapack_int* ifaill, lapack_int* ifailr );
   2075 lapack_int LAPACKE_zhsein( int matrix_order, char job, char eigsrc, char initv,
   2076                            const lapack_logical* select, lapack_int n,
   2077                            const lapack_complex_double* h, lapack_int ldh,
   2078                            lapack_complex_double* w, lapack_complex_double* vl,
   2079                            lapack_int ldvl, lapack_complex_double* vr,
   2080                            lapack_int ldvr, lapack_int mm, lapack_int* m,
   2081                            lapack_int* ifaill, lapack_int* ifailr );
   2082 
   2083 lapack_int LAPACKE_shseqr( int matrix_order, char job, char compz, lapack_int n,
   2084                            lapack_int ilo, lapack_int ihi, float* h,
   2085                            lapack_int ldh, float* wr, float* wi, float* z,
   2086                            lapack_int ldz );
   2087 lapack_int LAPACKE_dhseqr( int matrix_order, char job, char compz, lapack_int n,
   2088                            lapack_int ilo, lapack_int ihi, double* h,
   2089                            lapack_int ldh, double* wr, double* wi, double* z,
   2090                            lapack_int ldz );
   2091 lapack_int LAPACKE_chseqr( int matrix_order, char job, char compz, lapack_int n,
   2092                            lapack_int ilo, lapack_int ihi,
   2093                            lapack_complex_float* h, lapack_int ldh,
   2094                            lapack_complex_float* w, lapack_complex_float* z,
   2095                            lapack_int ldz );
   2096 lapack_int LAPACKE_zhseqr( int matrix_order, char job, char compz, lapack_int n,
   2097                            lapack_int ilo, lapack_int ihi,
   2098                            lapack_complex_double* h, lapack_int ldh,
   2099                            lapack_complex_double* w, lapack_complex_double* z,
   2100                            lapack_int ldz );
   2101 
   2102 lapack_int LAPACKE_clacgv( lapack_int n, lapack_complex_float* x,
   2103                            lapack_int incx );
   2104 lapack_int LAPACKE_zlacgv( lapack_int n, lapack_complex_double* x,
   2105                            lapack_int incx );
   2106 
   2107 lapack_int LAPACKE_slacpy( int matrix_order, char uplo, lapack_int m,
   2108                            lapack_int n, const float* a, lapack_int lda, float* b,
   2109                            lapack_int ldb );
   2110 lapack_int LAPACKE_dlacpy( int matrix_order, char uplo, lapack_int m,
   2111                            lapack_int n, const double* a, lapack_int lda, double* b,
   2112                            lapack_int ldb );
   2113 lapack_int LAPACKE_clacpy( int matrix_order, char uplo, lapack_int m,
   2114                            lapack_int n, const lapack_complex_float* a,
   2115                            lapack_int lda, lapack_complex_float* b,
   2116                            lapack_int ldb );
   2117 lapack_int LAPACKE_zlacpy( int matrix_order, char uplo, lapack_int m,
   2118                            lapack_int n, const lapack_complex_double* a,
   2119                            lapack_int lda, lapack_complex_double* b,
   2120                            lapack_int ldb );
   2121 
   2122 lapack_int LAPACKE_zlag2c( int matrix_order, lapack_int m, lapack_int n,
   2123                            const lapack_complex_double* a, lapack_int lda,
   2124                            lapack_complex_float* sa, lapack_int ldsa );
   2125 
   2126 lapack_int LAPACKE_slag2d( int matrix_order, lapack_int m, lapack_int n,
   2127                            const float* sa, lapack_int ldsa, double* a,
   2128                            lapack_int lda );
   2129 
   2130 lapack_int LAPACKE_dlag2s( int matrix_order, lapack_int m, lapack_int n,
   2131                            const double* a, lapack_int lda, float* sa,
   2132                            lapack_int ldsa );
   2133 
   2134 lapack_int LAPACKE_clag2z( int matrix_order, lapack_int m, lapack_int n,
   2135                            const lapack_complex_float* sa, lapack_int ldsa,
   2136                            lapack_complex_double* a, lapack_int lda );
   2137 
   2138 lapack_int LAPACKE_slagge( int matrix_order, lapack_int m, lapack_int n,
   2139                            lapack_int kl, lapack_int ku, const float* d,
   2140                            float* a, lapack_int lda, lapack_int* iseed );
   2141 lapack_int LAPACKE_dlagge( int matrix_order, lapack_int m, lapack_int n,
   2142                            lapack_int kl, lapack_int ku, const double* d,
   2143                            double* a, lapack_int lda, lapack_int* iseed );
   2144 lapack_int LAPACKE_clagge( int matrix_order, lapack_int m, lapack_int n,
   2145                            lapack_int kl, lapack_int ku, const float* d,
   2146                            lapack_complex_float* a, lapack_int lda,
   2147                            lapack_int* iseed );
   2148 lapack_int LAPACKE_zlagge( int matrix_order, lapack_int m, lapack_int n,
   2149                            lapack_int kl, lapack_int ku, const double* d,
   2150                            lapack_complex_double* a, lapack_int lda,
   2151                            lapack_int* iseed );
   2152 
   2153 float LAPACKE_slamch( char cmach );
   2154 double LAPACKE_dlamch( char cmach );
   2155 
   2156 float LAPACKE_slange( int matrix_order, char norm, lapack_int m,
   2157                            lapack_int n, const float* a, lapack_int lda );
   2158 double LAPACKE_dlange( int matrix_order, char norm, lapack_int m,
   2159                            lapack_int n, const double* a, lapack_int lda );
   2160 float LAPACKE_clange( int matrix_order, char norm, lapack_int m,
   2161                            lapack_int n, const lapack_complex_float* a,
   2162                            lapack_int lda );
   2163 double LAPACKE_zlange( int matrix_order, char norm, lapack_int m,
   2164                            lapack_int n, const lapack_complex_double* a,
   2165                            lapack_int lda );
   2166 
   2167 float LAPACKE_clanhe( int matrix_order, char norm, char uplo, lapack_int n,
   2168                            const lapack_complex_float* a, lapack_int lda );
   2169 double LAPACKE_zlanhe( int matrix_order, char norm, char uplo, lapack_int n,
   2170                            const lapack_complex_double* a, lapack_int lda );
   2171 
   2172 float LAPACKE_slansy( int matrix_order, char norm, char uplo, lapack_int n,
   2173                            const float* a, lapack_int lda );
   2174 double LAPACKE_dlansy( int matrix_order, char norm, char uplo, lapack_int n,
   2175                            const double* a, lapack_int lda );
   2176 float LAPACKE_clansy( int matrix_order, char norm, char uplo, lapack_int n,
   2177                            const lapack_complex_float* a, lapack_int lda );
   2178 double LAPACKE_zlansy( int matrix_order, char norm, char uplo, lapack_int n,
   2179                            const lapack_complex_double* a, lapack_int lda );
   2180 
   2181 float LAPACKE_slantr( int matrix_order, char norm, char uplo, char diag,
   2182                            lapack_int m, lapack_int n, const float* a,
   2183                            lapack_int lda );
   2184 double LAPACKE_dlantr( int matrix_order, char norm, char uplo, char diag,
   2185                            lapack_int m, lapack_int n, const double* a,
   2186                            lapack_int lda );
   2187 float LAPACKE_clantr( int matrix_order, char norm, char uplo, char diag,
   2188                            lapack_int m, lapack_int n, const lapack_complex_float* a,
   2189                            lapack_int lda );
   2190 double LAPACKE_zlantr( int matrix_order, char norm, char uplo, char diag,
   2191                            lapack_int m, lapack_int n, const lapack_complex_double* a,
   2192                            lapack_int lda );
   2193 
   2194 
   2195 lapack_int LAPACKE_slarfb( int matrix_order, char side, char trans, char direct,
   2196                            char storev, lapack_int m, lapack_int n,
   2197                            lapack_int k, const float* v, lapack_int ldv,
   2198                            const float* t, lapack_int ldt, float* c,
   2199                            lapack_int ldc );
   2200 lapack_int LAPACKE_dlarfb( int matrix_order, char side, char trans, char direct,
   2201                            char storev, lapack_int m, lapack_int n,
   2202                            lapack_int k, const double* v, lapack_int ldv,
   2203                            const double* t, lapack_int ldt, double* c,
   2204                            lapack_int ldc );
   2205 lapack_int LAPACKE_clarfb( int matrix_order, char side, char trans, char direct,
   2206                            char storev, lapack_int m, lapack_int n,
   2207                            lapack_int k, const lapack_complex_float* v,
   2208                            lapack_int ldv, const lapack_complex_float* t,
   2209                            lapack_int ldt, lapack_complex_float* c,
   2210                            lapack_int ldc );
   2211 lapack_int LAPACKE_zlarfb( int matrix_order, char side, char trans, char direct,
   2212                            char storev, lapack_int m, lapack_int n,
   2213                            lapack_int k, const lapack_complex_double* v,
   2214                            lapack_int ldv, const lapack_complex_double* t,
   2215                            lapack_int ldt, lapack_complex_double* c,
   2216                            lapack_int ldc );
   2217 
   2218 lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
   2219                            lapack_int incx, float* tau );
   2220 lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
   2221                            lapack_int incx, double* tau );
   2222 lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
   2223                            lapack_complex_float* x, lapack_int incx,
   2224                            lapack_complex_float* tau );
   2225 lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
   2226                            lapack_complex_double* x, lapack_int incx,
   2227                            lapack_complex_double* tau );
   2228 
   2229 lapack_int LAPACKE_slarft( int matrix_order, char direct, char storev,
   2230                            lapack_int n, lapack_int k, const float* v,
   2231                            lapack_int ldv, const float* tau, float* t,
   2232                            lapack_int ldt );
   2233 lapack_int LAPACKE_dlarft( int matrix_order, char direct, char storev,
   2234                            lapack_int n, lapack_int k, const double* v,
   2235                            lapack_int ldv, const double* tau, double* t,
   2236                            lapack_int ldt );
   2237 lapack_int LAPACKE_clarft( int matrix_order, char direct, char storev,
   2238                            lapack_int n, lapack_int k,
   2239                            const lapack_complex_float* v, lapack_int ldv,
   2240                            const lapack_complex_float* tau,
   2241                            lapack_complex_float* t, lapack_int ldt );
   2242 lapack_int LAPACKE_zlarft( int matrix_order, char direct, char storev,
   2243                            lapack_int n, lapack_int k,
   2244                            const lapack_complex_double* v, lapack_int ldv,
   2245                            const lapack_complex_double* tau,
   2246                            lapack_complex_double* t, lapack_int ldt );
   2247 
   2248 lapack_int LAPACKE_slarfx( int matrix_order, char side, lapack_int m,
   2249                            lapack_int n, const float* v, float tau, float* c,
   2250                            lapack_int ldc, float* work );
   2251 lapack_int LAPACKE_dlarfx( int matrix_order, char side, lapack_int m,
   2252                            lapack_int n, const double* v, double tau, double* c,
   2253                            lapack_int ldc, double* work );
   2254 lapack_int LAPACKE_clarfx( int matrix_order, char side, lapack_int m,
   2255                            lapack_int n, const lapack_complex_float* v,
   2256                            lapack_complex_float tau, lapack_complex_float* c,
   2257                            lapack_int ldc, lapack_complex_float* work );
   2258 lapack_int LAPACKE_zlarfx( int matrix_order, char side, lapack_int m,
   2259                            lapack_int n, const lapack_complex_double* v,
   2260                            lapack_complex_double tau, lapack_complex_double* c,
   2261                            lapack_int ldc, lapack_complex_double* work );
   2262 
   2263 lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
   2264                            float* x );
   2265 lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
   2266                            double* x );
   2267 lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
   2268                            lapack_complex_float* x );
   2269 lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
   2270                            lapack_complex_double* x );
   2271 
   2272 lapack_int LAPACKE_slaset( int matrix_order, char uplo, lapack_int m,
   2273                            lapack_int n, float alpha, float beta, float* a,
   2274                            lapack_int lda );
   2275 lapack_int LAPACKE_dlaset( int matrix_order, char uplo, lapack_int m,
   2276                            lapack_int n, double alpha, double beta, double* a,
   2277                            lapack_int lda );
   2278 lapack_int LAPACKE_claset( int matrix_order, char uplo, lapack_int m,
   2279                            lapack_int n, lapack_complex_float alpha,
   2280                            lapack_complex_float beta, lapack_complex_float* a,
   2281                            lapack_int lda );
   2282 lapack_int LAPACKE_zlaset( int matrix_order, char uplo, lapack_int m,
   2283                            lapack_int n, lapack_complex_double alpha,
   2284                            lapack_complex_double beta, lapack_complex_double* a,
   2285                            lapack_int lda );
   2286 
   2287 lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
   2288 lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
   2289 
   2290 lapack_int LAPACKE_slaswp( int matrix_order, lapack_int n, float* a,
   2291                            lapack_int lda, lapack_int k1, lapack_int k2,
   2292                            const lapack_int* ipiv, lapack_int incx );
   2293 lapack_int LAPACKE_dlaswp( int matrix_order, lapack_int n, double* a,
   2294                            lapack_int lda, lapack_int k1, lapack_int k2,
   2295                            const lapack_int* ipiv, lapack_int incx );
   2296 lapack_int LAPACKE_claswp( int matrix_order, lapack_int n,
   2297                            lapack_complex_float* a, lapack_int lda,
   2298                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
   2299                            lapack_int incx );
   2300 lapack_int LAPACKE_zlaswp( int matrix_order, lapack_int n,
   2301                            lapack_complex_double* a, lapack_int lda,
   2302                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
   2303                            lapack_int incx );
   2304 
   2305 lapack_int LAPACKE_slatms( int matrix_order, lapack_int m, lapack_int n,
   2306                            char dist, lapack_int* iseed, char sym, float* d,
   2307                            lapack_int mode, float cond, float dmax,
   2308                            lapack_int kl, lapack_int ku, char pack, float* a,
   2309                            lapack_int lda );
   2310 lapack_int LAPACKE_dlatms( int matrix_order, lapack_int m, lapack_int n,
   2311                            char dist, lapack_int* iseed, char sym, double* d,
   2312                            lapack_int mode, double cond, double dmax,
   2313                            lapack_int kl, lapack_int ku, char pack, double* a,
   2314                            lapack_int lda );
   2315 lapack_int LAPACKE_clatms( int matrix_order, lapack_int m, lapack_int n,
   2316                            char dist, lapack_int* iseed, char sym, float* d,
   2317                            lapack_int mode, float cond, float dmax,
   2318                            lapack_int kl, lapack_int ku, char pack,
   2319                            lapack_complex_float* a, lapack_int lda );
   2320 lapack_int LAPACKE_zlatms( int matrix_order, lapack_int m, lapack_int n,
   2321                            char dist, lapack_int* iseed, char sym, double* d,
   2322                            lapack_int mode, double cond, double dmax,
   2323                            lapack_int kl, lapack_int ku, char pack,
   2324                            lapack_complex_double* a, lapack_int lda );
   2325 
   2326 lapack_int LAPACKE_slauum( int matrix_order, char uplo, lapack_int n, float* a,
   2327                            lapack_int lda );
   2328 lapack_int LAPACKE_dlauum( int matrix_order, char uplo, lapack_int n, double* a,
   2329                            lapack_int lda );
   2330 lapack_int LAPACKE_clauum( int matrix_order, char uplo, lapack_int n,
   2331                            lapack_complex_float* a, lapack_int lda );
   2332 lapack_int LAPACKE_zlauum( int matrix_order, char uplo, lapack_int n,
   2333                            lapack_complex_double* a, lapack_int lda );
   2334 
   2335 lapack_int LAPACKE_sopgtr( int matrix_order, char uplo, lapack_int n,
   2336                            const float* ap, const float* tau, float* q,
   2337                            lapack_int ldq );
   2338 lapack_int LAPACKE_dopgtr( int matrix_order, char uplo, lapack_int n,
   2339                            const double* ap, const double* tau, double* q,
   2340                            lapack_int ldq );
   2341 
   2342 lapack_int LAPACKE_sopmtr( int matrix_order, char side, char uplo, char trans,
   2343                            lapack_int m, lapack_int n, const float* ap,
   2344                            const float* tau, float* c, lapack_int ldc );
   2345 lapack_int LAPACKE_dopmtr( int matrix_order, char side, char uplo, char trans,
   2346                            lapack_int m, lapack_int n, const double* ap,
   2347                            const double* tau, double* c, lapack_int ldc );
   2348 
   2349 lapack_int LAPACKE_sorgbr( int matrix_order, char vect, lapack_int m,
   2350                            lapack_int n, lapack_int k, float* a, lapack_int lda,
   2351                            const float* tau );
   2352 lapack_int LAPACKE_dorgbr( int matrix_order, char vect, lapack_int m,
   2353                            lapack_int n, lapack_int k, double* a,
   2354                            lapack_int lda, const double* tau );
   2355 
   2356 lapack_int LAPACKE_sorghr( int matrix_order, lapack_int n, lapack_int ilo,
   2357                            lapack_int ihi, float* a, lapack_int lda,
   2358                            const float* tau );
   2359 lapack_int LAPACKE_dorghr( int matrix_order, lapack_int n, lapack_int ilo,
   2360                            lapack_int ihi, double* a, lapack_int lda,
   2361                            const double* tau );
   2362 
   2363 lapack_int LAPACKE_sorglq( int matrix_order, lapack_int m, lapack_int n,
   2364                            lapack_int k, float* a, lapack_int lda,
   2365                            const float* tau );
   2366 lapack_int LAPACKE_dorglq( int matrix_order, lapack_int m, lapack_int n,
   2367                            lapack_int k, double* a, lapack_int lda,
   2368                            const double* tau );
   2369 
   2370 lapack_int LAPACKE_sorgql( int matrix_order, lapack_int m, lapack_int n,
   2371                            lapack_int k, float* a, lapack_int lda,
   2372                            const float* tau );
   2373 lapack_int LAPACKE_dorgql( int matrix_order, lapack_int m, lapack_int n,
   2374                            lapack_int k, double* a, lapack_int lda,
   2375                            const double* tau );
   2376 
   2377 lapack_int LAPACKE_sorgqr( int matrix_order, lapack_int m, lapack_int n,
   2378                            lapack_int k, float* a, lapack_int lda,
   2379                            const float* tau );
   2380 lapack_int LAPACKE_dorgqr( int matrix_order, lapack_int m, lapack_int n,
   2381                            lapack_int k, double* a, lapack_int lda,
   2382                            const double* tau );
   2383 
   2384 lapack_int LAPACKE_sorgrq( int matrix_order, lapack_int m, lapack_int n,
   2385                            lapack_int k, float* a, lapack_int lda,
   2386                            const float* tau );
   2387 lapack_int LAPACKE_dorgrq( int matrix_order, lapack_int m, lapack_int n,
   2388                            lapack_int k, double* a, lapack_int lda,
   2389                            const double* tau );
   2390 
   2391 lapack_int LAPACKE_sorgtr( int matrix_order, char uplo, lapack_int n, float* a,
   2392                            lapack_int lda, const float* tau );
   2393 lapack_int LAPACKE_dorgtr( int matrix_order, char uplo, lapack_int n, double* a,
   2394                            lapack_int lda, const double* tau );
   2395 
   2396 lapack_int LAPACKE_sormbr( int matrix_order, char vect, char side, char trans,
   2397                            lapack_int m, lapack_int n, lapack_int k,
   2398                            const float* a, lapack_int lda, const float* tau,
   2399                            float* c, lapack_int ldc );
   2400 lapack_int LAPACKE_dormbr( int matrix_order, char vect, char side, char trans,
   2401                            lapack_int m, lapack_int n, lapack_int k,
   2402                            const double* a, lapack_int lda, const double* tau,
   2403                            double* c, lapack_int ldc );
   2404 
   2405 lapack_int LAPACKE_sormhr( int matrix_order, char side, char trans,
   2406                            lapack_int m, lapack_int n, lapack_int ilo,
   2407                            lapack_int ihi, const float* a, lapack_int lda,
   2408                            const float* tau, float* c, lapack_int ldc );
   2409 lapack_int LAPACKE_dormhr( int matrix_order, char side, char trans,
   2410                            lapack_int m, lapack_int n, lapack_int ilo,
   2411                            lapack_int ihi, const double* a, lapack_int lda,
   2412                            const double* tau, double* c, lapack_int ldc );
   2413 
   2414 lapack_int LAPACKE_sormlq( int matrix_order, char side, char trans,
   2415                            lapack_int m, lapack_int n, lapack_int k,
   2416                            const float* a, lapack_int lda, const float* tau,
   2417                            float* c, lapack_int ldc );
   2418 lapack_int LAPACKE_dormlq( int matrix_order, char side, char trans,
   2419                            lapack_int m, lapack_int n, lapack_int k,
   2420                            const double* a, lapack_int lda, const double* tau,
   2421                            double* c, lapack_int ldc );
   2422 
   2423 lapack_int LAPACKE_sormql( int matrix_order, char side, char trans,
   2424                            lapack_int m, lapack_int n, lapack_int k,
   2425                            const float* a, lapack_int lda, const float* tau,
   2426                            float* c, lapack_int ldc );
   2427 lapack_int LAPACKE_dormql( int matrix_order, char side, char trans,
   2428                            lapack_int m, lapack_int n, lapack_int k,
   2429                            const double* a, lapack_int lda, const double* tau,
   2430                            double* c, lapack_int ldc );
   2431 
   2432 lapack_int LAPACKE_sormqr( int matrix_order, char side, char trans,
   2433                            lapack_int m, lapack_int n, lapack_int k,
   2434                            const float* a, lapack_int lda, const float* tau,
   2435                            float* c, lapack_int ldc );
   2436 lapack_int LAPACKE_dormqr( int matrix_order, char side, char trans,
   2437                            lapack_int m, lapack_int n, lapack_int k,
   2438                            const double* a, lapack_int lda, const double* tau,
   2439                            double* c, lapack_int ldc );
   2440 
   2441 lapack_int LAPACKE_sormrq( int matrix_order, char side, char trans,
   2442                            lapack_int m, lapack_int n, lapack_int k,
   2443                            const float* a, lapack_int lda, const float* tau,
   2444                            float* c, lapack_int ldc );
   2445 lapack_int LAPACKE_dormrq( int matrix_order, char side, char trans,
   2446                            lapack_int m, lapack_int n, lapack_int k,
   2447                            const double* a, lapack_int lda, const double* tau,
   2448                            double* c, lapack_int ldc );
   2449 
   2450 lapack_int LAPACKE_sormrz( int matrix_order, char side, char trans,
   2451                            lapack_int m, lapack_int n, lapack_int k,
   2452                            lapack_int l, const float* a, lapack_int lda,
   2453                            const float* tau, float* c, lapack_int ldc );
   2454 lapack_int LAPACKE_dormrz( int matrix_order, char side, char trans,
   2455                            lapack_int m, lapack_int n, lapack_int k,
   2456                            lapack_int l, const double* a, lapack_int lda,
   2457                            const double* tau, double* c, lapack_int ldc );
   2458 
   2459 lapack_int LAPACKE_sormtr( int matrix_order, char side, char uplo, char trans,
   2460                            lapack_int m, lapack_int n, const float* a,
   2461                            lapack_int lda, const float* tau, float* c,
   2462                            lapack_int ldc );
   2463 lapack_int LAPACKE_dormtr( int matrix_order, char side, char uplo, char trans,
   2464                            lapack_int m, lapack_int n, const double* a,
   2465                            lapack_int lda, const double* tau, double* c,
   2466                            lapack_int ldc );
   2467 
   2468 lapack_int LAPACKE_spbcon( int matrix_order, char uplo, lapack_int n,
   2469                            lapack_int kd, const float* ab, lapack_int ldab,
   2470                            float anorm, float* rcond );
   2471 lapack_int LAPACKE_dpbcon( int matrix_order, char uplo, lapack_int n,
   2472                            lapack_int kd, const double* ab, lapack_int ldab,
   2473                            double anorm, double* rcond );
   2474 lapack_int LAPACKE_cpbcon( int matrix_order, char uplo, lapack_int n,
   2475                            lapack_int kd, const lapack_complex_float* ab,
   2476                            lapack_int ldab, float anorm, float* rcond );
   2477 lapack_int LAPACKE_zpbcon( int matrix_order, char uplo, lapack_int n,
   2478                            lapack_int kd, const lapack_complex_double* ab,
   2479                            lapack_int ldab, double anorm, double* rcond );
   2480 
   2481 lapack_int LAPACKE_spbequ( int matrix_order, char uplo, lapack_int n,
   2482                            lapack_int kd, const float* ab, lapack_int ldab,
   2483                            float* s, float* scond, float* amax );
   2484 lapack_int LAPACKE_dpbequ( int matrix_order, char uplo, lapack_int n,
   2485                            lapack_int kd, const double* ab, lapack_int ldab,
   2486                            double* s, double* scond, double* amax );
   2487 lapack_int LAPACKE_cpbequ( int matrix_order, char uplo, lapack_int n,
   2488                            lapack_int kd, const lapack_complex_float* ab,
   2489                            lapack_int ldab, float* s, float* scond,
   2490                            float* amax );
   2491 lapack_int LAPACKE_zpbequ( int matrix_order, char uplo, lapack_int n,
   2492                            lapack_int kd, const lapack_complex_double* ab,
   2493                            lapack_int ldab, double* s, double* scond,
   2494                            double* amax );
   2495 
   2496 lapack_int LAPACKE_spbrfs( int matrix_order, char uplo, lapack_int n,
   2497                            lapack_int kd, lapack_int nrhs, const float* ab,
   2498                            lapack_int ldab, const float* afb, lapack_int ldafb,
   2499                            const float* b, lapack_int ldb, float* x,
   2500                            lapack_int ldx, float* ferr, float* berr );
   2501 lapack_int LAPACKE_dpbrfs( int matrix_order, char uplo, lapack_int n,
   2502                            lapack_int kd, lapack_int nrhs, const double* ab,
   2503                            lapack_int ldab, const double* afb, lapack_int ldafb,
   2504                            const double* b, lapack_int ldb, double* x,
   2505                            lapack_int ldx, double* ferr, double* berr );
   2506 lapack_int LAPACKE_cpbrfs( int matrix_order, char uplo, lapack_int n,
   2507                            lapack_int kd, lapack_int nrhs,
   2508                            const lapack_complex_float* ab, lapack_int ldab,
   2509                            const lapack_complex_float* afb, lapack_int ldafb,
   2510                            const lapack_complex_float* b, lapack_int ldb,
   2511                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   2512                            float* berr );
   2513 lapack_int LAPACKE_zpbrfs( int matrix_order, char uplo, lapack_int n,
   2514                            lapack_int kd, lapack_int nrhs,
   2515                            const lapack_complex_double* ab, lapack_int ldab,
   2516                            const lapack_complex_double* afb, lapack_int ldafb,
   2517                            const lapack_complex_double* b, lapack_int ldb,
   2518                            lapack_complex_double* x, lapack_int ldx,
   2519                            double* ferr, double* berr );
   2520 
   2521 lapack_int LAPACKE_spbstf( int matrix_order, char uplo, lapack_int n,
   2522                            lapack_int kb, float* bb, lapack_int ldbb );
   2523 lapack_int LAPACKE_dpbstf( int matrix_order, char uplo, lapack_int n,
   2524                            lapack_int kb, double* bb, lapack_int ldbb );
   2525 lapack_int LAPACKE_cpbstf( int matrix_order, char uplo, lapack_int n,
   2526                            lapack_int kb, lapack_complex_float* bb,
   2527                            lapack_int ldbb );
   2528 lapack_int LAPACKE_zpbstf( int matrix_order, char uplo, lapack_int n,
   2529                            lapack_int kb, lapack_complex_double* bb,
   2530                            lapack_int ldbb );
   2531 
   2532 lapack_int LAPACKE_spbsv( int matrix_order, char uplo, lapack_int n,
   2533                           lapack_int kd, lapack_int nrhs, float* ab,
   2534                           lapack_int ldab, float* b, lapack_int ldb );
   2535 lapack_int LAPACKE_dpbsv( int matrix_order, char uplo, lapack_int n,
   2536                           lapack_int kd, lapack_int nrhs, double* ab,
   2537                           lapack_int ldab, double* b, lapack_int ldb );
   2538 lapack_int LAPACKE_cpbsv( int matrix_order, char uplo, lapack_int n,
   2539                           lapack_int kd, lapack_int nrhs,
   2540                           lapack_complex_float* ab, lapack_int ldab,
   2541                           lapack_complex_float* b, lapack_int ldb );
   2542 lapack_int LAPACKE_zpbsv( int matrix_order, char uplo, lapack_int n,
   2543                           lapack_int kd, lapack_int nrhs,
   2544                           lapack_complex_double* ab, lapack_int ldab,
   2545                           lapack_complex_double* b, lapack_int ldb );
   2546 
   2547 lapack_int LAPACKE_spbsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2548                            lapack_int kd, lapack_int nrhs, float* ab,
   2549                            lapack_int ldab, float* afb, lapack_int ldafb,
   2550                            char* equed, float* s, float* b, lapack_int ldb,
   2551                            float* x, lapack_int ldx, float* rcond, float* ferr,
   2552                            float* berr );
   2553 lapack_int LAPACKE_dpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2554                            lapack_int kd, lapack_int nrhs, double* ab,
   2555                            lapack_int ldab, double* afb, lapack_int ldafb,
   2556                            char* equed, double* s, double* b, lapack_int ldb,
   2557                            double* x, lapack_int ldx, double* rcond,
   2558                            double* ferr, double* berr );
   2559 lapack_int LAPACKE_cpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2560                            lapack_int kd, lapack_int nrhs,
   2561                            lapack_complex_float* ab, lapack_int ldab,
   2562                            lapack_complex_float* afb, lapack_int ldafb,
   2563                            char* equed, float* s, lapack_complex_float* b,
   2564                            lapack_int ldb, lapack_complex_float* x,
   2565                            lapack_int ldx, float* rcond, float* ferr,
   2566                            float* berr );
   2567 lapack_int LAPACKE_zpbsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2568                            lapack_int kd, lapack_int nrhs,
   2569                            lapack_complex_double* ab, lapack_int ldab,
   2570                            lapack_complex_double* afb, lapack_int ldafb,
   2571                            char* equed, double* s, lapack_complex_double* b,
   2572                            lapack_int ldb, lapack_complex_double* x,
   2573                            lapack_int ldx, double* rcond, double* ferr,
   2574                            double* berr );
   2575 
   2576 lapack_int LAPACKE_spbtrf( int matrix_order, char uplo, lapack_int n,
   2577                            lapack_int kd, float* ab, lapack_int ldab );
   2578 lapack_int LAPACKE_dpbtrf( int matrix_order, char uplo, lapack_int n,
   2579                            lapack_int kd, double* ab, lapack_int ldab );
   2580 lapack_int LAPACKE_cpbtrf( int matrix_order, char uplo, lapack_int n,
   2581                            lapack_int kd, lapack_complex_float* ab,
   2582                            lapack_int ldab );
   2583 lapack_int LAPACKE_zpbtrf( int matrix_order, char uplo, lapack_int n,
   2584                            lapack_int kd, lapack_complex_double* ab,
   2585                            lapack_int ldab );
   2586 
   2587 lapack_int LAPACKE_spbtrs( int matrix_order, char uplo, lapack_int n,
   2588                            lapack_int kd, lapack_int nrhs, const float* ab,
   2589                            lapack_int ldab, float* b, lapack_int ldb );
   2590 lapack_int LAPACKE_dpbtrs( int matrix_order, char uplo, lapack_int n,
   2591                            lapack_int kd, lapack_int nrhs, const double* ab,
   2592                            lapack_int ldab, double* b, lapack_int ldb );
   2593 lapack_int LAPACKE_cpbtrs( int matrix_order, char uplo, lapack_int n,
   2594                            lapack_int kd, lapack_int nrhs,
   2595                            const lapack_complex_float* ab, lapack_int ldab,
   2596                            lapack_complex_float* b, lapack_int ldb );
   2597 lapack_int LAPACKE_zpbtrs( int matrix_order, char uplo, lapack_int n,
   2598                            lapack_int kd, lapack_int nrhs,
   2599                            const lapack_complex_double* ab, lapack_int ldab,
   2600                            lapack_complex_double* b, lapack_int ldb );
   2601 
   2602 lapack_int LAPACKE_spftrf( int matrix_order, char transr, char uplo,
   2603                            lapack_int n, float* a );
   2604 lapack_int LAPACKE_dpftrf( int matrix_order, char transr, char uplo,
   2605                            lapack_int n, double* a );
   2606 lapack_int LAPACKE_cpftrf( int matrix_order, char transr, char uplo,
   2607                            lapack_int n, lapack_complex_float* a );
   2608 lapack_int LAPACKE_zpftrf( int matrix_order, char transr, char uplo,
   2609                            lapack_int n, lapack_complex_double* a );
   2610 
   2611 lapack_int LAPACKE_spftri( int matrix_order, char transr, char uplo,
   2612                            lapack_int n, float* a );
   2613 lapack_int LAPACKE_dpftri( int matrix_order, char transr, char uplo,
   2614                            lapack_int n, double* a );
   2615 lapack_int LAPACKE_cpftri( int matrix_order, char transr, char uplo,
   2616                            lapack_int n, lapack_complex_float* a );
   2617 lapack_int LAPACKE_zpftri( int matrix_order, char transr, char uplo,
   2618                            lapack_int n, lapack_complex_double* a );
   2619 
   2620 lapack_int LAPACKE_spftrs( int matrix_order, char transr, char uplo,
   2621                            lapack_int n, lapack_int nrhs, const float* a,
   2622                            float* b, lapack_int ldb );
   2623 lapack_int LAPACKE_dpftrs( int matrix_order, char transr, char uplo,
   2624                            lapack_int n, lapack_int nrhs, const double* a,
   2625                            double* b, lapack_int ldb );
   2626 lapack_int LAPACKE_cpftrs( int matrix_order, char transr, char uplo,
   2627                            lapack_int n, lapack_int nrhs,
   2628                            const lapack_complex_float* a,
   2629                            lapack_complex_float* b, lapack_int ldb );
   2630 lapack_int LAPACKE_zpftrs( int matrix_order, char transr, char uplo,
   2631                            lapack_int n, lapack_int nrhs,
   2632                            const lapack_complex_double* a,
   2633                            lapack_complex_double* b, lapack_int ldb );
   2634 
   2635 lapack_int LAPACKE_spocon( int matrix_order, char uplo, lapack_int n,
   2636                            const float* a, lapack_int lda, float anorm,
   2637                            float* rcond );
   2638 lapack_int LAPACKE_dpocon( int matrix_order, char uplo, lapack_int n,
   2639                            const double* a, lapack_int lda, double anorm,
   2640                            double* rcond );
   2641 lapack_int LAPACKE_cpocon( int matrix_order, char uplo, lapack_int n,
   2642                            const lapack_complex_float* a, lapack_int lda,
   2643                            float anorm, float* rcond );
   2644 lapack_int LAPACKE_zpocon( int matrix_order, char uplo, lapack_int n,
   2645                            const lapack_complex_double* a, lapack_int lda,
   2646                            double anorm, double* rcond );
   2647 
   2648 lapack_int LAPACKE_spoequ( int matrix_order, lapack_int n, const float* a,
   2649                            lapack_int lda, float* s, float* scond,
   2650                            float* amax );
   2651 lapack_int LAPACKE_dpoequ( int matrix_order, lapack_int n, const double* a,
   2652                            lapack_int lda, double* s, double* scond,
   2653                            double* amax );
   2654 lapack_int LAPACKE_cpoequ( int matrix_order, lapack_int n,
   2655                            const lapack_complex_float* a, lapack_int lda,
   2656                            float* s, float* scond, float* amax );
   2657 lapack_int LAPACKE_zpoequ( int matrix_order, lapack_int n,
   2658                            const lapack_complex_double* a, lapack_int lda,
   2659                            double* s, double* scond, double* amax );
   2660 
   2661 lapack_int LAPACKE_spoequb( int matrix_order, lapack_int n, const float* a,
   2662                             lapack_int lda, float* s, float* scond,
   2663                             float* amax );
   2664 lapack_int LAPACKE_dpoequb( int matrix_order, lapack_int n, const double* a,
   2665                             lapack_int lda, double* s, double* scond,
   2666                             double* amax );
   2667 lapack_int LAPACKE_cpoequb( int matrix_order, lapack_int n,
   2668                             const lapack_complex_float* a, lapack_int lda,
   2669                             float* s, float* scond, float* amax );
   2670 lapack_int LAPACKE_zpoequb( int matrix_order, lapack_int n,
   2671                             const lapack_complex_double* a, lapack_int lda,
   2672                             double* s, double* scond, double* amax );
   2673 
   2674 lapack_int LAPACKE_sporfs( int matrix_order, char uplo, lapack_int n,
   2675                            lapack_int nrhs, const float* a, lapack_int lda,
   2676                            const float* af, lapack_int ldaf, const float* b,
   2677                            lapack_int ldb, float* x, lapack_int ldx,
   2678                            float* ferr, float* berr );
   2679 lapack_int LAPACKE_dporfs( int matrix_order, char uplo, lapack_int n,
   2680                            lapack_int nrhs, const double* a, lapack_int lda,
   2681                            const double* af, lapack_int ldaf, const double* b,
   2682                            lapack_int ldb, double* x, lapack_int ldx,
   2683                            double* ferr, double* berr );
   2684 lapack_int LAPACKE_cporfs( int matrix_order, char uplo, lapack_int n,
   2685                            lapack_int nrhs, const lapack_complex_float* a,
   2686                            lapack_int lda, const lapack_complex_float* af,
   2687                            lapack_int ldaf, const lapack_complex_float* b,
   2688                            lapack_int ldb, lapack_complex_float* x,
   2689                            lapack_int ldx, float* ferr, float* berr );
   2690 lapack_int LAPACKE_zporfs( int matrix_order, char uplo, lapack_int n,
   2691                            lapack_int nrhs, const lapack_complex_double* a,
   2692                            lapack_int lda, const lapack_complex_double* af,
   2693                            lapack_int ldaf, const lapack_complex_double* b,
   2694                            lapack_int ldb, lapack_complex_double* x,
   2695                            lapack_int ldx, double* ferr, double* berr );
   2696 
   2697 lapack_int LAPACKE_sporfsx( int matrix_order, char uplo, char equed,
   2698                             lapack_int n, lapack_int nrhs, const float* a,
   2699                             lapack_int lda, const float* af, lapack_int ldaf,
   2700                             const float* s, const float* b, lapack_int ldb,
   2701                             float* x, lapack_int ldx, float* rcond, float* berr,
   2702                             lapack_int n_err_bnds, float* err_bnds_norm,
   2703                             float* err_bnds_comp, lapack_int nparams,
   2704                             float* params );
   2705 lapack_int LAPACKE_dporfsx( int matrix_order, char uplo, char equed,
   2706                             lapack_int n, lapack_int nrhs, const double* a,
   2707                             lapack_int lda, const double* af, lapack_int ldaf,
   2708                             const double* s, const double* b, lapack_int ldb,
   2709                             double* x, lapack_int ldx, double* rcond,
   2710                             double* berr, lapack_int n_err_bnds,
   2711                             double* err_bnds_norm, double* err_bnds_comp,
   2712                             lapack_int nparams, double* params );
   2713 lapack_int LAPACKE_cporfsx( int matrix_order, char uplo, char equed,
   2714                             lapack_int n, lapack_int nrhs,
   2715                             const lapack_complex_float* a, lapack_int lda,
   2716                             const lapack_complex_float* af, lapack_int ldaf,
   2717                             const float* s, const lapack_complex_float* b,
   2718                             lapack_int ldb, lapack_complex_float* x,
   2719                             lapack_int ldx, float* rcond, float* berr,
   2720                             lapack_int n_err_bnds, float* err_bnds_norm,
   2721                             float* err_bnds_comp, lapack_int nparams,
   2722                             float* params );
   2723 lapack_int LAPACKE_zporfsx( int matrix_order, char uplo, char equed,
   2724                             lapack_int n, lapack_int nrhs,
   2725                             const lapack_complex_double* a, lapack_int lda,
   2726                             const lapack_complex_double* af, lapack_int ldaf,
   2727                             const double* s, const lapack_complex_double* b,
   2728                             lapack_int ldb, lapack_complex_double* x,
   2729                             lapack_int ldx, double* rcond, double* berr,
   2730                             lapack_int n_err_bnds, double* err_bnds_norm,
   2731                             double* err_bnds_comp, lapack_int nparams,
   2732                             double* params );
   2733 
   2734 lapack_int LAPACKE_sposv( int matrix_order, char uplo, lapack_int n,
   2735                           lapack_int nrhs, float* a, lapack_int lda, float* b,
   2736                           lapack_int ldb );
   2737 lapack_int LAPACKE_dposv( int matrix_order, char uplo, lapack_int n,
   2738                           lapack_int nrhs, double* a, lapack_int lda, double* b,
   2739                           lapack_int ldb );
   2740 lapack_int LAPACKE_cposv( int matrix_order, char uplo, lapack_int n,
   2741                           lapack_int nrhs, lapack_complex_float* a,
   2742                           lapack_int lda, lapack_complex_float* b,
   2743                           lapack_int ldb );
   2744 lapack_int LAPACKE_zposv( int matrix_order, char uplo, lapack_int n,
   2745                           lapack_int nrhs, lapack_complex_double* a,
   2746                           lapack_int lda, lapack_complex_double* b,
   2747                           lapack_int ldb );
   2748 lapack_int LAPACKE_dsposv( int matrix_order, char uplo, lapack_int n,
   2749                            lapack_int nrhs, double* a, lapack_int lda,
   2750                            double* b, lapack_int ldb, double* x, lapack_int ldx,
   2751                            lapack_int* iter );
   2752 lapack_int LAPACKE_zcposv( int matrix_order, char uplo, lapack_int n,
   2753                            lapack_int nrhs, lapack_complex_double* a,
   2754                            lapack_int lda, lapack_complex_double* b,
   2755                            lapack_int ldb, lapack_complex_double* x,
   2756                            lapack_int ldx, lapack_int* iter );
   2757 
   2758 lapack_int LAPACKE_sposvx( int matrix_order, char fact, char uplo, lapack_int n,
   2759                            lapack_int nrhs, float* a, lapack_int lda, float* af,
   2760                            lapack_int ldaf, char* equed, float* s, float* b,
   2761                            lapack_int ldb, float* x, lapack_int ldx,
   2762                            float* rcond, float* ferr, float* berr );
   2763 lapack_int LAPACKE_dposvx( int matrix_order, char fact, char uplo, lapack_int n,
   2764                            lapack_int nrhs, double* a, lapack_int lda,
   2765                            double* af, lapack_int ldaf, char* equed, double* s,
   2766                            double* b, lapack_int ldb, double* x, lapack_int ldx,
   2767                            double* rcond, double* ferr, double* berr );
   2768 lapack_int LAPACKE_cposvx( int matrix_order, char fact, char uplo, lapack_int n,
   2769                            lapack_int nrhs, lapack_complex_float* a,
   2770                            lapack_int lda, lapack_complex_float* af,
   2771                            lapack_int ldaf, char* equed, float* s,
   2772                            lapack_complex_float* b, lapack_int ldb,
   2773                            lapack_complex_float* x, lapack_int ldx,
   2774                            float* rcond, float* ferr, float* berr );
   2775 lapack_int LAPACKE_zposvx( int matrix_order, char fact, char uplo, lapack_int n,
   2776                            lapack_int nrhs, lapack_complex_double* a,
   2777                            lapack_int lda, lapack_complex_double* af,
   2778                            lapack_int ldaf, char* equed, double* s,
   2779                            lapack_complex_double* b, lapack_int ldb,
   2780                            lapack_complex_double* x, lapack_int ldx,
   2781                            double* rcond, double* ferr, double* berr );
   2782 
   2783 lapack_int LAPACKE_sposvxx( int matrix_order, char fact, char uplo,
   2784                             lapack_int n, lapack_int nrhs, float* a,
   2785                             lapack_int lda, float* af, lapack_int ldaf,
   2786                             char* equed, float* s, float* b, lapack_int ldb,
   2787                             float* x, lapack_int ldx, float* rcond,
   2788                             float* rpvgrw, float* berr, lapack_int n_err_bnds,
   2789                             float* err_bnds_norm, float* err_bnds_comp,
   2790                             lapack_int nparams, float* params );
   2791 lapack_int LAPACKE_dposvxx( int matrix_order, char fact, char uplo,
   2792                             lapack_int n, lapack_int nrhs, double* a,
   2793                             lapack_int lda, double* af, lapack_int ldaf,
   2794                             char* equed, double* s, double* b, lapack_int ldb,
   2795                             double* x, lapack_int ldx, double* rcond,
   2796                             double* rpvgrw, double* berr, lapack_int n_err_bnds,
   2797                             double* err_bnds_norm, double* err_bnds_comp,
   2798                             lapack_int nparams, double* params );
   2799 lapack_int LAPACKE_cposvxx( int matrix_order, char fact, char uplo,
   2800                             lapack_int n, lapack_int nrhs,
   2801                             lapack_complex_float* a, lapack_int lda,
   2802                             lapack_complex_float* af, lapack_int ldaf,
   2803                             char* equed, float* s, lapack_complex_float* b,
   2804                             lapack_int ldb, lapack_complex_float* x,
   2805                             lapack_int ldx, float* rcond, float* rpvgrw,
   2806                             float* berr, lapack_int n_err_bnds,
   2807                             float* err_bnds_norm, float* err_bnds_comp,
   2808                             lapack_int nparams, float* params );
   2809 lapack_int LAPACKE_zposvxx( int matrix_order, char fact, char uplo,
   2810                             lapack_int n, lapack_int nrhs,
   2811                             lapack_complex_double* a, lapack_int lda,
   2812                             lapack_complex_double* af, lapack_int ldaf,
   2813                             char* equed, double* s, lapack_complex_double* b,
   2814                             lapack_int ldb, lapack_complex_double* x,
   2815                             lapack_int ldx, double* rcond, double* rpvgrw,
   2816                             double* berr, lapack_int n_err_bnds,
   2817                             double* err_bnds_norm, double* err_bnds_comp,
   2818                             lapack_int nparams, double* params );
   2819 
   2820 lapack_int LAPACKE_spotrf( int matrix_order, char uplo, lapack_int n, float* a,
   2821                            lapack_int lda );
   2822 lapack_int LAPACKE_dpotrf( int matrix_order, char uplo, lapack_int n, double* a,
   2823                            lapack_int lda );
   2824 lapack_int LAPACKE_cpotrf( int matrix_order, char uplo, lapack_int n,
   2825                            lapack_complex_float* a, lapack_int lda );
   2826 lapack_int LAPACKE_zpotrf( int matrix_order, char uplo, lapack_int n,
   2827                            lapack_complex_double* a, lapack_int lda );
   2828 
   2829 lapack_int LAPACKE_spotri( int matrix_order, char uplo, lapack_int n, float* a,
   2830                            lapack_int lda );
   2831 lapack_int LAPACKE_dpotri( int matrix_order, char uplo, lapack_int n, double* a,
   2832                            lapack_int lda );
   2833 lapack_int LAPACKE_cpotri( int matrix_order, char uplo, lapack_int n,
   2834                            lapack_complex_float* a, lapack_int lda );
   2835 lapack_int LAPACKE_zpotri( int matrix_order, char uplo, lapack_int n,
   2836                            lapack_complex_double* a, lapack_int lda );
   2837 
   2838 lapack_int LAPACKE_spotrs( int matrix_order, char uplo, lapack_int n,
   2839                            lapack_int nrhs, const float* a, lapack_int lda,
   2840                            float* b, lapack_int ldb );
   2841 lapack_int LAPACKE_dpotrs( int matrix_order, char uplo, lapack_int n,
   2842                            lapack_int nrhs, const double* a, lapack_int lda,
   2843                            double* b, lapack_int ldb );
   2844 lapack_int LAPACKE_cpotrs( int matrix_order, char uplo, lapack_int n,
   2845                            lapack_int nrhs, const lapack_complex_float* a,
   2846                            lapack_int lda, lapack_complex_float* b,
   2847                            lapack_int ldb );
   2848 lapack_int LAPACKE_zpotrs( int matrix_order, char uplo, lapack_int n,
   2849                            lapack_int nrhs, const lapack_complex_double* a,
   2850                            lapack_int lda, lapack_complex_double* b,
   2851                            lapack_int ldb );
   2852 
   2853 lapack_int LAPACKE_sppcon( int matrix_order, char uplo, lapack_int n,
   2854                            const float* ap, float anorm, float* rcond );
   2855 lapack_int LAPACKE_dppcon( int matrix_order, char uplo, lapack_int n,
   2856                            const double* ap, double anorm, double* rcond );
   2857 lapack_int LAPACKE_cppcon( int matrix_order, char uplo, lapack_int n,
   2858                            const lapack_complex_float* ap, float anorm,
   2859                            float* rcond );
   2860 lapack_int LAPACKE_zppcon( int matrix_order, char uplo, lapack_int n,
   2861                            const lapack_complex_double* ap, double anorm,
   2862                            double* rcond );
   2863 
   2864 lapack_int LAPACKE_sppequ( int matrix_order, char uplo, lapack_int n,
   2865                            const float* ap, float* s, float* scond,
   2866                            float* amax );
   2867 lapack_int LAPACKE_dppequ( int matrix_order, char uplo, lapack_int n,
   2868                            const double* ap, double* s, double* scond,
   2869                            double* amax );
   2870 lapack_int LAPACKE_cppequ( int matrix_order, char uplo, lapack_int n,
   2871                            const lapack_complex_float* ap, float* s,
   2872                            float* scond, float* amax );
   2873 lapack_int LAPACKE_zppequ( int matrix_order, char uplo, lapack_int n,
   2874                            const lapack_complex_double* ap, double* s,
   2875                            double* scond, double* amax );
   2876 
   2877 lapack_int LAPACKE_spprfs( int matrix_order, char uplo, lapack_int n,
   2878                            lapack_int nrhs, const float* ap, const float* afp,
   2879                            const float* b, lapack_int ldb, float* x,
   2880                            lapack_int ldx, float* ferr, float* berr );
   2881 lapack_int LAPACKE_dpprfs( int matrix_order, char uplo, lapack_int n,
   2882                            lapack_int nrhs, const double* ap, const double* afp,
   2883                            const double* b, lapack_int ldb, double* x,
   2884                            lapack_int ldx, double* ferr, double* berr );
   2885 lapack_int LAPACKE_cpprfs( int matrix_order, char uplo, lapack_int n,
   2886                            lapack_int nrhs, const lapack_complex_float* ap,
   2887                            const lapack_complex_float* afp,
   2888                            const lapack_complex_float* b, lapack_int ldb,
   2889                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   2890                            float* berr );
   2891 lapack_int LAPACKE_zpprfs( int matrix_order, char uplo, lapack_int n,
   2892                            lapack_int nrhs, const lapack_complex_double* ap,
   2893                            const lapack_complex_double* afp,
   2894                            const lapack_complex_double* b, lapack_int ldb,
   2895                            lapack_complex_double* x, lapack_int ldx,
   2896                            double* ferr, double* berr );
   2897 
   2898 lapack_int LAPACKE_sppsv( int matrix_order, char uplo, lapack_int n,
   2899                           lapack_int nrhs, float* ap, float* b,
   2900                           lapack_int ldb );
   2901 lapack_int LAPACKE_dppsv( int matrix_order, char uplo, lapack_int n,
   2902                           lapack_int nrhs, double* ap, double* b,
   2903                           lapack_int ldb );
   2904 lapack_int LAPACKE_cppsv( int matrix_order, char uplo, lapack_int n,
   2905                           lapack_int nrhs, lapack_complex_float* ap,
   2906                           lapack_complex_float* b, lapack_int ldb );
   2907 lapack_int LAPACKE_zppsv( int matrix_order, char uplo, lapack_int n,
   2908                           lapack_int nrhs, lapack_complex_double* ap,
   2909                           lapack_complex_double* b, lapack_int ldb );
   2910 
   2911 lapack_int LAPACKE_sppsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2912                            lapack_int nrhs, float* ap, float* afp, char* equed,
   2913                            float* s, float* b, lapack_int ldb, float* x,
   2914                            lapack_int ldx, float* rcond, float* ferr,
   2915                            float* berr );
   2916 lapack_int LAPACKE_dppsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2917                            lapack_int nrhs, double* ap, double* afp,
   2918                            char* equed, double* s, double* b, lapack_int ldb,
   2919                            double* x, lapack_int ldx, double* rcond,
   2920                            double* ferr, double* berr );
   2921 lapack_int LAPACKE_cppsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2922                            lapack_int nrhs, lapack_complex_float* ap,
   2923                            lapack_complex_float* afp, char* equed, float* s,
   2924                            lapack_complex_float* b, lapack_int ldb,
   2925                            lapack_complex_float* x, lapack_int ldx,
   2926                            float* rcond, float* ferr, float* berr );
   2927 lapack_int LAPACKE_zppsvx( int matrix_order, char fact, char uplo, lapack_int n,
   2928                            lapack_int nrhs, lapack_complex_double* ap,
   2929                            lapack_complex_double* afp, char* equed, double* s,
   2930                            lapack_complex_double* b, lapack_int ldb,
   2931                            lapack_complex_double* x, lapack_int ldx,
   2932                            double* rcond, double* ferr, double* berr );
   2933 
   2934 lapack_int LAPACKE_spptrf( int matrix_order, char uplo, lapack_int n,
   2935                            float* ap );
   2936 lapack_int LAPACKE_dpptrf( int matrix_order, char uplo, lapack_int n,
   2937                            double* ap );
   2938 lapack_int LAPACKE_cpptrf( int matrix_order, char uplo, lapack_int n,
   2939                            lapack_complex_float* ap );
   2940 lapack_int LAPACKE_zpptrf( int matrix_order, char uplo, lapack_int n,
   2941                            lapack_complex_double* ap );
   2942 
   2943 lapack_int LAPACKE_spptri( int matrix_order, char uplo, lapack_int n,
   2944                            float* ap );
   2945 lapack_int LAPACKE_dpptri( int matrix_order, char uplo, lapack_int n,
   2946                            double* ap );
   2947 lapack_int LAPACKE_cpptri( int matrix_order, char uplo, lapack_int n,
   2948                            lapack_complex_float* ap );
   2949 lapack_int LAPACKE_zpptri( int matrix_order, char uplo, lapack_int n,
   2950                            lapack_complex_double* ap );
   2951 
   2952 lapack_int LAPACKE_spptrs( int matrix_order, char uplo, lapack_int n,
   2953                            lapack_int nrhs, const float* ap, float* b,
   2954                            lapack_int ldb );
   2955 lapack_int LAPACKE_dpptrs( int matrix_order, char uplo, lapack_int n,
   2956                            lapack_int nrhs, const double* ap, double* b,
   2957                            lapack_int ldb );
   2958 lapack_int LAPACKE_cpptrs( int matrix_order, char uplo, lapack_int n,
   2959                            lapack_int nrhs, const lapack_complex_float* ap,
   2960                            lapack_complex_float* b, lapack_int ldb );
   2961 lapack_int LAPACKE_zpptrs( int matrix_order, char uplo, lapack_int n,
   2962                            lapack_int nrhs, const lapack_complex_double* ap,
   2963                            lapack_complex_double* b, lapack_int ldb );
   2964 
   2965 lapack_int LAPACKE_spstrf( int matrix_order, char uplo, lapack_int n, float* a,
   2966                            lapack_int lda, lapack_int* piv, lapack_int* rank,
   2967                            float tol );
   2968 lapack_int LAPACKE_dpstrf( int matrix_order, char uplo, lapack_int n, double* a,
   2969                            lapack_int lda, lapack_int* piv, lapack_int* rank,
   2970                            double tol );
   2971 lapack_int LAPACKE_cpstrf( int matrix_order, char uplo, lapack_int n,
   2972                            lapack_complex_float* a, lapack_int lda,
   2973                            lapack_int* piv, lapack_int* rank, float tol );
   2974 lapack_int LAPACKE_zpstrf( int matrix_order, char uplo, lapack_int n,
   2975                            lapack_complex_double* a, lapack_int lda,
   2976                            lapack_int* piv, lapack_int* rank, double tol );
   2977 
   2978 lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
   2979                            float anorm, float* rcond );
   2980 lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
   2981                            double anorm, double* rcond );
   2982 lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
   2983                            const lapack_complex_float* e, float anorm,
   2984                            float* rcond );
   2985 lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
   2986                            const lapack_complex_double* e, double anorm,
   2987                            double* rcond );
   2988 
   2989 lapack_int LAPACKE_spteqr( int matrix_order, char compz, lapack_int n, float* d,
   2990                            float* e, float* z, lapack_int ldz );
   2991 lapack_int LAPACKE_dpteqr( int matrix_order, char compz, lapack_int n,
   2992                            double* d, double* e, double* z, lapack_int ldz );
   2993 lapack_int LAPACKE_cpteqr( int matrix_order, char compz, lapack_int n, float* d,
   2994                            float* e, lapack_complex_float* z, lapack_int ldz );
   2995 lapack_int LAPACKE_zpteqr( int matrix_order, char compz, lapack_int n,
   2996                            double* d, double* e, lapack_complex_double* z,
   2997                            lapack_int ldz );
   2998 
   2999 lapack_int LAPACKE_sptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
   3000                            const float* d, const float* e, const float* df,
   3001                            const float* ef, const float* b, lapack_int ldb,
   3002                            float* x, lapack_int ldx, float* ferr, float* berr );
   3003 lapack_int LAPACKE_dptrfs( int matrix_order, lapack_int n, lapack_int nrhs,
   3004                            const double* d, const double* e, const double* df,
   3005                            const double* ef, const double* b, lapack_int ldb,
   3006                            double* x, lapack_int ldx, double* ferr,
   3007                            double* berr );
   3008 lapack_int LAPACKE_cptrfs( int matrix_order, char uplo, lapack_int n,
   3009                            lapack_int nrhs, const float* d,
   3010                            const lapack_complex_float* e, const float* df,
   3011                            const lapack_complex_float* ef,
   3012                            const lapack_complex_float* b, lapack_int ldb,
   3013                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   3014                            float* berr );
   3015 lapack_int LAPACKE_zptrfs( int matrix_order, char uplo, lapack_int n,
   3016                            lapack_int nrhs, const double* d,
   3017                            const lapack_complex_double* e, const double* df,
   3018                            const lapack_complex_double* ef,
   3019                            const lapack_complex_double* b, lapack_int ldb,
   3020                            lapack_complex_double* x, lapack_int ldx,
   3021                            double* ferr, double* berr );
   3022 
   3023 lapack_int LAPACKE_sptsv( int matrix_order, lapack_int n, lapack_int nrhs,
   3024                           float* d, float* e, float* b, lapack_int ldb );
   3025 lapack_int LAPACKE_dptsv( int matrix_order, lapack_int n, lapack_int nrhs,
   3026                           double* d, double* e, double* b, lapack_int ldb );
   3027 lapack_int LAPACKE_cptsv( int matrix_order, lapack_int n, lapack_int nrhs,
   3028                           float* d, lapack_complex_float* e,
   3029                           lapack_complex_float* b, lapack_int ldb );
   3030 lapack_int LAPACKE_zptsv( int matrix_order, lapack_int n, lapack_int nrhs,
   3031                           double* d, lapack_complex_double* e,
   3032                           lapack_complex_double* b, lapack_int ldb );
   3033 
   3034 lapack_int LAPACKE_sptsvx( int matrix_order, char fact, lapack_int n,
   3035                            lapack_int nrhs, const float* d, const float* e,
   3036                            float* df, float* ef, const float* b, lapack_int ldb,
   3037                            float* x, lapack_int ldx, float* rcond, float* ferr,
   3038                            float* berr );
   3039 lapack_int LAPACKE_dptsvx( int matrix_order, char fact, lapack_int n,
   3040                            lapack_int nrhs, const double* d, const double* e,
   3041                            double* df, double* ef, const double* b,
   3042                            lapack_int ldb, double* x, lapack_int ldx,
   3043                            double* rcond, double* ferr, double* berr );
   3044 lapack_int LAPACKE_cptsvx( int matrix_order, char fact, lapack_int n,
   3045                            lapack_int nrhs, const float* d,
   3046                            const lapack_complex_float* e, float* df,
   3047                            lapack_complex_float* ef,
   3048                            const lapack_complex_float* b, lapack_int ldb,
   3049                            lapack_complex_float* x, lapack_int ldx,
   3050                            float* rcond, float* ferr, float* berr );
   3051 lapack_int LAPACKE_zptsvx( int matrix_order, char fact, lapack_int n,
   3052                            lapack_int nrhs, const double* d,
   3053                            const lapack_complex_double* e, double* df,
   3054                            lapack_complex_double* ef,
   3055                            const lapack_complex_double* b, lapack_int ldb,
   3056                            lapack_complex_double* x, lapack_int ldx,
   3057                            double* rcond, double* ferr, double* berr );
   3058 
   3059 lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
   3060 lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
   3061 lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
   3062 lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
   3063 
   3064 lapack_int LAPACKE_spttrs( int matrix_order, lapack_int n, lapack_int nrhs,
   3065                            const float* d, const float* e, float* b,
   3066                            lapack_int ldb );
   3067 lapack_int LAPACKE_dpttrs( int matrix_order, lapack_int n, lapack_int nrhs,
   3068                            const double* d, const double* e, double* b,
   3069                            lapack_int ldb );
   3070 lapack_int LAPACKE_cpttrs( int matrix_order, char uplo, lapack_int n,
   3071                            lapack_int nrhs, const float* d,
   3072                            const lapack_complex_float* e,
   3073                            lapack_complex_float* b, lapack_int ldb );
   3074 lapack_int LAPACKE_zpttrs( int matrix_order, char uplo, lapack_int n,
   3075                            lapack_int nrhs, const double* d,
   3076                            const lapack_complex_double* e,
   3077                            lapack_complex_double* b, lapack_int ldb );
   3078 
   3079 lapack_int LAPACKE_ssbev( int matrix_order, char jobz, char uplo, lapack_int n,
   3080                           lapack_int kd, float* ab, lapack_int ldab, float* w,
   3081                           float* z, lapack_int ldz );
   3082 lapack_int LAPACKE_dsbev( int matrix_order, char jobz, char uplo, lapack_int n,
   3083                           lapack_int kd, double* ab, lapack_int ldab, double* w,
   3084                           double* z, lapack_int ldz );
   3085 
   3086 lapack_int LAPACKE_ssbevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3087                            lapack_int kd, float* ab, lapack_int ldab, float* w,
   3088                            float* z, lapack_int ldz );
   3089 lapack_int LAPACKE_dsbevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3090                            lapack_int kd, double* ab, lapack_int ldab,
   3091                            double* w, double* z, lapack_int ldz );
   3092 
   3093 lapack_int LAPACKE_ssbevx( int matrix_order, char jobz, char range, char uplo,
   3094                            lapack_int n, lapack_int kd, float* ab,
   3095                            lapack_int ldab, float* q, lapack_int ldq, float vl,
   3096                            float vu, lapack_int il, lapack_int iu, float abstol,
   3097                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3098                            lapack_int* ifail );
   3099 lapack_int LAPACKE_dsbevx( int matrix_order, char jobz, char range, char uplo,
   3100                            lapack_int n, lapack_int kd, double* ab,
   3101                            lapack_int ldab, double* q, lapack_int ldq,
   3102                            double vl, double vu, lapack_int il, lapack_int iu,
   3103                            double abstol, lapack_int* m, double* w, double* z,
   3104                            lapack_int ldz, lapack_int* ifail );
   3105 
   3106 lapack_int LAPACKE_ssbgst( int matrix_order, char vect, char uplo, lapack_int n,
   3107                            lapack_int ka, lapack_int kb, float* ab,
   3108                            lapack_int ldab, const float* bb, lapack_int ldbb,
   3109                            float* x, lapack_int ldx );
   3110 lapack_int LAPACKE_dsbgst( int matrix_order, char vect, char uplo, lapack_int n,
   3111                            lapack_int ka, lapack_int kb, double* ab,
   3112                            lapack_int ldab, const double* bb, lapack_int ldbb,
   3113                            double* x, lapack_int ldx );
   3114 
   3115 lapack_int LAPACKE_ssbgv( int matrix_order, char jobz, char uplo, lapack_int n,
   3116                           lapack_int ka, lapack_int kb, float* ab,
   3117                           lapack_int ldab, float* bb, lapack_int ldbb, float* w,
   3118                           float* z, lapack_int ldz );
   3119 lapack_int LAPACKE_dsbgv( int matrix_order, char jobz, char uplo, lapack_int n,
   3120                           lapack_int ka, lapack_int kb, double* ab,
   3121                           lapack_int ldab, double* bb, lapack_int ldbb,
   3122                           double* w, double* z, lapack_int ldz );
   3123 
   3124 lapack_int LAPACKE_ssbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
   3125                            lapack_int ka, lapack_int kb, float* ab,
   3126                            lapack_int ldab, float* bb, lapack_int ldbb,
   3127                            float* w, float* z, lapack_int ldz );
   3128 lapack_int LAPACKE_dsbgvd( int matrix_order, char jobz, char uplo, lapack_int n,
   3129                            lapack_int ka, lapack_int kb, double* ab,
   3130                            lapack_int ldab, double* bb, lapack_int ldbb,
   3131                            double* w, double* z, lapack_int ldz );
   3132 
   3133 lapack_int LAPACKE_ssbgvx( int matrix_order, char jobz, char range, char uplo,
   3134                            lapack_int n, lapack_int ka, lapack_int kb,
   3135                            float* ab, lapack_int ldab, float* bb,
   3136                            lapack_int ldbb, float* q, lapack_int ldq, float vl,
   3137                            float vu, lapack_int il, lapack_int iu, float abstol,
   3138                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3139                            lapack_int* ifail );
   3140 lapack_int LAPACKE_dsbgvx( int matrix_order, char jobz, char range, char uplo,
   3141                            lapack_int n, lapack_int ka, lapack_int kb,
   3142                            double* ab, lapack_int ldab, double* bb,
   3143                            lapack_int ldbb, double* q, lapack_int ldq,
   3144                            double vl, double vu, lapack_int il, lapack_int iu,
   3145                            double abstol, lapack_int* m, double* w, double* z,
   3146                            lapack_int ldz, lapack_int* ifail );
   3147 
   3148 lapack_int LAPACKE_ssbtrd( int matrix_order, char vect, char uplo, lapack_int n,
   3149                            lapack_int kd, float* ab, lapack_int ldab, float* d,
   3150                            float* e, float* q, lapack_int ldq );
   3151 lapack_int LAPACKE_dsbtrd( int matrix_order, char vect, char uplo, lapack_int n,
   3152                            lapack_int kd, double* ab, lapack_int ldab,
   3153                            double* d, double* e, double* q, lapack_int ldq );
   3154 
   3155 lapack_int LAPACKE_ssfrk( int matrix_order, char transr, char uplo, char trans,
   3156                           lapack_int n, lapack_int k, float alpha,
   3157                           const float* a, lapack_int lda, float beta,
   3158                           float* c );
   3159 lapack_int LAPACKE_dsfrk( int matrix_order, char transr, char uplo, char trans,
   3160                           lapack_int n, lapack_int k, double alpha,
   3161                           const double* a, lapack_int lda, double beta,
   3162                           double* c );
   3163 
   3164 lapack_int LAPACKE_sspcon( int matrix_order, char uplo, lapack_int n,
   3165                            const float* ap, const lapack_int* ipiv, float anorm,
   3166                            float* rcond );
   3167 lapack_int LAPACKE_dspcon( int matrix_order, char uplo, lapack_int n,
   3168                            const double* ap, const lapack_int* ipiv,
   3169                            double anorm, double* rcond );
   3170 lapack_int LAPACKE_cspcon( int matrix_order, char uplo, lapack_int n,
   3171                            const lapack_complex_float* ap,
   3172                            const lapack_int* ipiv, float anorm, float* rcond );
   3173 lapack_int LAPACKE_zspcon( int matrix_order, char uplo, lapack_int n,
   3174                            const lapack_complex_double* ap,
   3175                            const lapack_int* ipiv, double anorm,
   3176                            double* rcond );
   3177 
   3178 lapack_int LAPACKE_sspev( int matrix_order, char jobz, char uplo, lapack_int n,
   3179                           float* ap, float* w, float* z, lapack_int ldz );
   3180 lapack_int LAPACKE_dspev( int matrix_order, char jobz, char uplo, lapack_int n,
   3181                           double* ap, double* w, double* z, lapack_int ldz );
   3182 
   3183 lapack_int LAPACKE_sspevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3184                            float* ap, float* w, float* z, lapack_int ldz );
   3185 lapack_int LAPACKE_dspevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3186                            double* ap, double* w, double* z, lapack_int ldz );
   3187 
   3188 lapack_int LAPACKE_sspevx( int matrix_order, char jobz, char range, char uplo,
   3189                            lapack_int n, float* ap, float vl, float vu,
   3190                            lapack_int il, lapack_int iu, float abstol,
   3191                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3192                            lapack_int* ifail );
   3193 lapack_int LAPACKE_dspevx( int matrix_order, char jobz, char range, char uplo,
   3194                            lapack_int n, double* ap, double vl, double vu,
   3195                            lapack_int il, lapack_int iu, double abstol,
   3196                            lapack_int* m, double* w, double* z, lapack_int ldz,
   3197                            lapack_int* ifail );
   3198 
   3199 lapack_int LAPACKE_sspgst( int matrix_order, lapack_int itype, char uplo,
   3200                            lapack_int n, float* ap, const float* bp );
   3201 lapack_int LAPACKE_dspgst( int matrix_order, lapack_int itype, char uplo,
   3202                            lapack_int n, double* ap, const double* bp );
   3203 
   3204 lapack_int LAPACKE_sspgv( int matrix_order, lapack_int itype, char jobz,
   3205                           char uplo, lapack_int n, float* ap, float* bp,
   3206                           float* w, float* z, lapack_int ldz );
   3207 lapack_int LAPACKE_dspgv( int matrix_order, lapack_int itype, char jobz,
   3208                           char uplo, lapack_int n, double* ap, double* bp,
   3209                           double* w, double* z, lapack_int ldz );
   3210 
   3211 lapack_int LAPACKE_sspgvd( int matrix_order, lapack_int itype, char jobz,
   3212                            char uplo, lapack_int n, float* ap, float* bp,
   3213                            float* w, float* z, lapack_int ldz );
   3214 lapack_int LAPACKE_dspgvd( int matrix_order, lapack_int itype, char jobz,
   3215                            char uplo, lapack_int n, double* ap, double* bp,
   3216                            double* w, double* z, lapack_int ldz );
   3217 
   3218 lapack_int LAPACKE_sspgvx( int matrix_order, lapack_int itype, char jobz,
   3219                            char range, char uplo, lapack_int n, float* ap,
   3220                            float* bp, float vl, float vu, lapack_int il,
   3221                            lapack_int iu, float abstol, lapack_int* m, float* w,
   3222                            float* z, lapack_int ldz, lapack_int* ifail );
   3223 lapack_int LAPACKE_dspgvx( int matrix_order, lapack_int itype, char jobz,
   3224                            char range, char uplo, lapack_int n, double* ap,
   3225                            double* bp, double vl, double vu, lapack_int il,
   3226                            lapack_int iu, double abstol, lapack_int* m,
   3227                            double* w, double* z, lapack_int ldz,
   3228                            lapack_int* ifail );
   3229 
   3230 lapack_int LAPACKE_ssprfs( int matrix_order, char uplo, lapack_int n,
   3231                            lapack_int nrhs, const float* ap, const float* afp,
   3232                            const lapack_int* ipiv, const float* b,
   3233                            lapack_int ldb, float* x, lapack_int ldx,
   3234                            float* ferr, float* berr );
   3235 lapack_int LAPACKE_dsprfs( int matrix_order, char uplo, lapack_int n,
   3236                            lapack_int nrhs, const double* ap, const double* afp,
   3237                            const lapack_int* ipiv, const double* b,
   3238                            lapack_int ldb, double* x, lapack_int ldx,
   3239                            double* ferr, double* berr );
   3240 lapack_int LAPACKE_csprfs( int matrix_order, char uplo, lapack_int n,
   3241                            lapack_int nrhs, const lapack_complex_float* ap,
   3242                            const lapack_complex_float* afp,
   3243                            const lapack_int* ipiv,
   3244                            const lapack_complex_float* b, lapack_int ldb,
   3245                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   3246                            float* berr );
   3247 lapack_int LAPACKE_zsprfs( int matrix_order, char uplo, lapack_int n,
   3248                            lapack_int nrhs, const lapack_complex_double* ap,
   3249                            const lapack_complex_double* afp,
   3250                            const lapack_int* ipiv,
   3251                            const lapack_complex_double* b, lapack_int ldb,
   3252                            lapack_complex_double* x, lapack_int ldx,
   3253                            double* ferr, double* berr );
   3254 
   3255 lapack_int LAPACKE_sspsv( int matrix_order, char uplo, lapack_int n,
   3256                           lapack_int nrhs, float* ap, lapack_int* ipiv,
   3257                           float* b, lapack_int ldb );
   3258 lapack_int LAPACKE_dspsv( int matrix_order, char uplo, lapack_int n,
   3259                           lapack_int nrhs, double* ap, lapack_int* ipiv,
   3260                           double* b, lapack_int ldb );
   3261 lapack_int LAPACKE_cspsv( int matrix_order, char uplo, lapack_int n,
   3262                           lapack_int nrhs, lapack_complex_float* ap,
   3263                           lapack_int* ipiv, lapack_complex_float* b,
   3264                           lapack_int ldb );
   3265 lapack_int LAPACKE_zspsv( int matrix_order, char uplo, lapack_int n,
   3266                           lapack_int nrhs, lapack_complex_double* ap,
   3267                           lapack_int* ipiv, lapack_complex_double* b,
   3268                           lapack_int ldb );
   3269 
   3270 lapack_int LAPACKE_sspsvx( int matrix_order, char fact, char uplo, lapack_int n,
   3271                            lapack_int nrhs, const float* ap, float* afp,
   3272                            lapack_int* ipiv, const float* b, lapack_int ldb,
   3273                            float* x, lapack_int ldx, float* rcond, float* ferr,
   3274                            float* berr );
   3275 lapack_int LAPACKE_dspsvx( int matrix_order, char fact, char uplo, lapack_int n,
   3276                            lapack_int nrhs, const double* ap, double* afp,
   3277                            lapack_int* ipiv, const double* b, lapack_int ldb,
   3278                            double* x, lapack_int ldx, double* rcond,
   3279                            double* ferr, double* berr );
   3280 lapack_int LAPACKE_cspsvx( int matrix_order, char fact, char uplo, lapack_int n,
   3281                            lapack_int nrhs, const lapack_complex_float* ap,
   3282                            lapack_complex_float* afp, lapack_int* ipiv,
   3283                            const lapack_complex_float* b, lapack_int ldb,
   3284                            lapack_complex_float* x, lapack_int ldx,
   3285                            float* rcond, float* ferr, float* berr );
   3286 lapack_int LAPACKE_zspsvx( int matrix_order, char fact, char uplo, lapack_int n,
   3287                            lapack_int nrhs, const lapack_complex_double* ap,
   3288                            lapack_complex_double* afp, lapack_int* ipiv,
   3289                            const lapack_complex_double* b, lapack_int ldb,
   3290                            lapack_complex_double* x, lapack_int ldx,
   3291                            double* rcond, double* ferr, double* berr );
   3292 
   3293 lapack_int LAPACKE_ssptrd( int matrix_order, char uplo, lapack_int n, float* ap,
   3294                            float* d, float* e, float* tau );
   3295 lapack_int LAPACKE_dsptrd( int matrix_order, char uplo, lapack_int n,
   3296                            double* ap, double* d, double* e, double* tau );
   3297 
   3298 lapack_int LAPACKE_ssptrf( int matrix_order, char uplo, lapack_int n, float* ap,
   3299                            lapack_int* ipiv );
   3300 lapack_int LAPACKE_dsptrf( int matrix_order, char uplo, lapack_int n,
   3301                            double* ap, lapack_int* ipiv );
   3302 lapack_int LAPACKE_csptrf( int matrix_order, char uplo, lapack_int n,
   3303                            lapack_complex_float* ap, lapack_int* ipiv );
   3304 lapack_int LAPACKE_zsptrf( int matrix_order, char uplo, lapack_int n,
   3305                            lapack_complex_double* ap, lapack_int* ipiv );
   3306 
   3307 lapack_int LAPACKE_ssptri( int matrix_order, char uplo, lapack_int n, float* ap,
   3308                            const lapack_int* ipiv );
   3309 lapack_int LAPACKE_dsptri( int matrix_order, char uplo, lapack_int n,
   3310                            double* ap, const lapack_int* ipiv );
   3311 lapack_int LAPACKE_csptri( int matrix_order, char uplo, lapack_int n,
   3312                            lapack_complex_float* ap, const lapack_int* ipiv );
   3313 lapack_int LAPACKE_zsptri( int matrix_order, char uplo, lapack_int n,
   3314                            lapack_complex_double* ap, const lapack_int* ipiv );
   3315 
   3316 lapack_int LAPACKE_ssptrs( int matrix_order, char uplo, lapack_int n,
   3317                            lapack_int nrhs, const float* ap,
   3318                            const lapack_int* ipiv, float* b, lapack_int ldb );
   3319 lapack_int LAPACKE_dsptrs( int matrix_order, char uplo, lapack_int n,
   3320                            lapack_int nrhs, const double* ap,
   3321                            const lapack_int* ipiv, double* b, lapack_int ldb );
   3322 lapack_int LAPACKE_csptrs( int matrix_order, char uplo, lapack_int n,
   3323                            lapack_int nrhs, const lapack_complex_float* ap,
   3324                            const lapack_int* ipiv, lapack_complex_float* b,
   3325                            lapack_int ldb );
   3326 lapack_int LAPACKE_zsptrs( int matrix_order, char uplo, lapack_int n,
   3327                            lapack_int nrhs, const lapack_complex_double* ap,
   3328                            const lapack_int* ipiv, lapack_complex_double* b,
   3329                            lapack_int ldb );
   3330 
   3331 lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
   3332                            float vu, lapack_int il, lapack_int iu, float abstol,
   3333                            const float* d, const float* e, lapack_int* m,
   3334                            lapack_int* nsplit, float* w, lapack_int* iblock,
   3335                            lapack_int* isplit );
   3336 lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
   3337                            double vu, lapack_int il, lapack_int iu,
   3338                            double abstol, const double* d, const double* e,
   3339                            lapack_int* m, lapack_int* nsplit, double* w,
   3340                            lapack_int* iblock, lapack_int* isplit );
   3341 
   3342 lapack_int LAPACKE_sstedc( int matrix_order, char compz, lapack_int n, float* d,
   3343                            float* e, float* z, lapack_int ldz );
   3344 lapack_int LAPACKE_dstedc( int matrix_order, char compz, lapack_int n,
   3345                            double* d, double* e, double* z, lapack_int ldz );
   3346 lapack_int LAPACKE_cstedc( int matrix_order, char compz, lapack_int n, float* d,
   3347                            float* e, lapack_complex_float* z, lapack_int ldz );
   3348 lapack_int LAPACKE_zstedc( int matrix_order, char compz, lapack_int n,
   3349                            double* d, double* e, lapack_complex_double* z,
   3350                            lapack_int ldz );
   3351 
   3352 lapack_int LAPACKE_sstegr( int matrix_order, char jobz, char range,
   3353                            lapack_int n, float* d, float* e, float vl, float vu,
   3354                            lapack_int il, lapack_int iu, float abstol,
   3355                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3356                            lapack_int* isuppz );
   3357 lapack_int LAPACKE_dstegr( int matrix_order, char jobz, char range,
   3358                            lapack_int n, double* d, double* e, double vl,
   3359                            double vu, lapack_int il, lapack_int iu,
   3360                            double abstol, lapack_int* m, double* w, double* z,
   3361                            lapack_int ldz, lapack_int* isuppz );
   3362 lapack_int LAPACKE_cstegr( int matrix_order, char jobz, char range,
   3363                            lapack_int n, float* d, float* e, float vl, float vu,
   3364                            lapack_int il, lapack_int iu, float abstol,
   3365                            lapack_int* m, float* w, lapack_complex_float* z,
   3366                            lapack_int ldz, lapack_int* isuppz );
   3367 lapack_int LAPACKE_zstegr( int matrix_order, char jobz, char range,
   3368                            lapack_int n, double* d, double* e, double vl,
   3369                            double vu, lapack_int il, lapack_int iu,
   3370                            double abstol, lapack_int* m, double* w,
   3371                            lapack_complex_double* z, lapack_int ldz,
   3372                            lapack_int* isuppz );
   3373 
   3374 lapack_int LAPACKE_sstein( int matrix_order, lapack_int n, const float* d,
   3375                            const float* e, lapack_int m, const float* w,
   3376                            const lapack_int* iblock, const lapack_int* isplit,
   3377                            float* z, lapack_int ldz, lapack_int* ifailv );
   3378 lapack_int LAPACKE_dstein( int matrix_order, lapack_int n, const double* d,
   3379                            const double* e, lapack_int m, const double* w,
   3380                            const lapack_int* iblock, const lapack_int* isplit,
   3381                            double* z, lapack_int ldz, lapack_int* ifailv );
   3382 lapack_int LAPACKE_cstein( int matrix_order, lapack_int n, const float* d,
   3383                            const float* e, lapack_int m, const float* w,
   3384                            const lapack_int* iblock, const lapack_int* isplit,
   3385                            lapack_complex_float* z, lapack_int ldz,
   3386                            lapack_int* ifailv );
   3387 lapack_int LAPACKE_zstein( int matrix_order, lapack_int n, const double* d,
   3388                            const double* e, lapack_int m, const double* w,
   3389                            const lapack_int* iblock, const lapack_int* isplit,
   3390                            lapack_complex_double* z, lapack_int ldz,
   3391                            lapack_int* ifailv );
   3392 
   3393 lapack_int LAPACKE_sstemr( int matrix_order, char jobz, char range,
   3394                            lapack_int n, float* d, float* e, float vl, float vu,
   3395                            lapack_int il, lapack_int iu, lapack_int* m,
   3396                            float* w, float* z, lapack_int ldz, lapack_int nzc,
   3397                            lapack_int* isuppz, lapack_logical* tryrac );
   3398 lapack_int LAPACKE_dstemr( int matrix_order, char jobz, char range,
   3399                            lapack_int n, double* d, double* e, double vl,
   3400                            double vu, lapack_int il, lapack_int iu,
   3401                            lapack_int* m, double* w, double* z, lapack_int ldz,
   3402                            lapack_int nzc, lapack_int* isuppz,
   3403                            lapack_logical* tryrac );
   3404 lapack_int LAPACKE_cstemr( int matrix_order, char jobz, char range,
   3405                            lapack_int n, float* d, float* e, float vl, float vu,
   3406                            lapack_int il, lapack_int iu, lapack_int* m,
   3407                            float* w, lapack_complex_float* z, lapack_int ldz,
   3408                            lapack_int nzc, lapack_int* isuppz,
   3409                            lapack_logical* tryrac );
   3410 lapack_int LAPACKE_zstemr( int matrix_order, char jobz, char range,
   3411                            lapack_int n, double* d, double* e, double vl,
   3412                            double vu, lapack_int il, lapack_int iu,
   3413                            lapack_int* m, double* w, lapack_complex_double* z,
   3414                            lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
   3415                            lapack_logical* tryrac );
   3416 
   3417 lapack_int LAPACKE_ssteqr( int matrix_order, char compz, lapack_int n, float* d,
   3418                            float* e, float* z, lapack_int ldz );
   3419 lapack_int LAPACKE_dsteqr( int matrix_order, char compz, lapack_int n,
   3420                            double* d, double* e, double* z, lapack_int ldz );
   3421 lapack_int LAPACKE_csteqr( int matrix_order, char compz, lapack_int n, float* d,
   3422                            float* e, lapack_complex_float* z, lapack_int ldz );
   3423 lapack_int LAPACKE_zsteqr( int matrix_order, char compz, lapack_int n,
   3424                            double* d, double* e, lapack_complex_double* z,
   3425                            lapack_int ldz );
   3426 
   3427 lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
   3428 lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
   3429 
   3430 lapack_int LAPACKE_sstev( int matrix_order, char jobz, lapack_int n, float* d,
   3431                           float* e, float* z, lapack_int ldz );
   3432 lapack_int LAPACKE_dstev( int matrix_order, char jobz, lapack_int n, double* d,
   3433                           double* e, double* z, lapack_int ldz );
   3434 
   3435 lapack_int LAPACKE_sstevd( int matrix_order, char jobz, lapack_int n, float* d,
   3436                            float* e, float* z, lapack_int ldz );
   3437 lapack_int LAPACKE_dstevd( int matrix_order, char jobz, lapack_int n, double* d,
   3438                            double* e, double* z, lapack_int ldz );
   3439 
   3440 lapack_int LAPACKE_sstevr( int matrix_order, char jobz, char range,
   3441                            lapack_int n, float* d, float* e, float vl, float vu,
   3442                            lapack_int il, lapack_int iu, float abstol,
   3443                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3444                            lapack_int* isuppz );
   3445 lapack_int LAPACKE_dstevr( int matrix_order, char jobz, char range,
   3446                            lapack_int n, double* d, double* e, double vl,
   3447                            double vu, lapack_int il, lapack_int iu,
   3448                            double abstol, lapack_int* m, double* w, double* z,
   3449                            lapack_int ldz, lapack_int* isuppz );
   3450 
   3451 lapack_int LAPACKE_sstevx( int matrix_order, char jobz, char range,
   3452                            lapack_int n, float* d, float* e, float vl, float vu,
   3453                            lapack_int il, lapack_int iu, float abstol,
   3454                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3455                            lapack_int* ifail );
   3456 lapack_int LAPACKE_dstevx( int matrix_order, char jobz, char range,
   3457                            lapack_int n, double* d, double* e, double vl,
   3458                            double vu, lapack_int il, lapack_int iu,
   3459                            double abstol, lapack_int* m, double* w, double* z,
   3460                            lapack_int ldz, lapack_int* ifail );
   3461 
   3462 lapack_int LAPACKE_ssycon( int matrix_order, char uplo, lapack_int n,
   3463                            const float* a, lapack_int lda,
   3464                            const lapack_int* ipiv, float anorm, float* rcond );
   3465 lapack_int LAPACKE_dsycon( int matrix_order, char uplo, lapack_int n,
   3466                            const double* a, lapack_int lda,
   3467                            const lapack_int* ipiv, double anorm,
   3468                            double* rcond );
   3469 lapack_int LAPACKE_csycon( int matrix_order, char uplo, lapack_int n,
   3470                            const lapack_complex_float* a, lapack_int lda,
   3471                            const lapack_int* ipiv, float anorm, float* rcond );
   3472 lapack_int LAPACKE_zsycon( int matrix_order, char uplo, lapack_int n,
   3473                            const lapack_complex_double* a, lapack_int lda,
   3474                            const lapack_int* ipiv, double anorm,
   3475                            double* rcond );
   3476 
   3477 lapack_int LAPACKE_ssyequb( int matrix_order, char uplo, lapack_int n,
   3478                             const float* a, lapack_int lda, float* s,
   3479                             float* scond, float* amax );
   3480 lapack_int LAPACKE_dsyequb( int matrix_order, char uplo, lapack_int n,
   3481                             const double* a, lapack_int lda, double* s,
   3482                             double* scond, double* amax );
   3483 lapack_int LAPACKE_csyequb( int matrix_order, char uplo, lapack_int n,
   3484                             const lapack_complex_float* a, lapack_int lda,
   3485                             float* s, float* scond, float* amax );
   3486 lapack_int LAPACKE_zsyequb( int matrix_order, char uplo, lapack_int n,
   3487                             const lapack_complex_double* a, lapack_int lda,
   3488                             double* s, double* scond, double* amax );
   3489 
   3490 lapack_int LAPACKE_ssyev( int matrix_order, char jobz, char uplo, lapack_int n,
   3491                           float* a, lapack_int lda, float* w );
   3492 lapack_int LAPACKE_dsyev( int matrix_order, char jobz, char uplo, lapack_int n,
   3493                           double* a, lapack_int lda, double* w );
   3494 
   3495 lapack_int LAPACKE_ssyevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3496                            float* a, lapack_int lda, float* w );
   3497 lapack_int LAPACKE_dsyevd( int matrix_order, char jobz, char uplo, lapack_int n,
   3498                            double* a, lapack_int lda, double* w );
   3499 
   3500 lapack_int LAPACKE_ssyevr( int matrix_order, char jobz, char range, char uplo,
   3501                            lapack_int n, float* a, lapack_int lda, float vl,
   3502                            float vu, lapack_int il, lapack_int iu, float abstol,
   3503                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3504                            lapack_int* isuppz );
   3505 lapack_int LAPACKE_dsyevr( int matrix_order, char jobz, char range, char uplo,
   3506                            lapack_int n, double* a, lapack_int lda, double vl,
   3507                            double vu, lapack_int il, lapack_int iu,
   3508                            double abstol, lapack_int* m, double* w, double* z,
   3509                            lapack_int ldz, lapack_int* isuppz );
   3510 
   3511 lapack_int LAPACKE_ssyevx( int matrix_order, char jobz, char range, char uplo,
   3512                            lapack_int n, float* a, lapack_int lda, float vl,
   3513                            float vu, lapack_int il, lapack_int iu, float abstol,
   3514                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3515                            lapack_int* ifail );
   3516 lapack_int LAPACKE_dsyevx( int matrix_order, char jobz, char range, char uplo,
   3517                            lapack_int n, double* a, lapack_int lda, double vl,
   3518                            double vu, lapack_int il, lapack_int iu,
   3519                            double abstol, lapack_int* m, double* w, double* z,
   3520                            lapack_int ldz, lapack_int* ifail );
   3521 
   3522 lapack_int LAPACKE_ssygst( int matrix_order, lapack_int itype, char uplo,
   3523                            lapack_int n, float* a, lapack_int lda,
   3524                            const float* b, lapack_int ldb );
   3525 lapack_int LAPACKE_dsygst( int matrix_order, lapack_int itype, char uplo,
   3526                            lapack_int n, double* a, lapack_int lda,
   3527                            const double* b, lapack_int ldb );
   3528 
   3529 lapack_int LAPACKE_ssygv( int matrix_order, lapack_int itype, char jobz,
   3530                           char uplo, lapack_int n, float* a, lapack_int lda,
   3531                           float* b, lapack_int ldb, float* w );
   3532 lapack_int LAPACKE_dsygv( int matrix_order, lapack_int itype, char jobz,
   3533                           char uplo, lapack_int n, double* a, lapack_int lda,
   3534                           double* b, lapack_int ldb, double* w );
   3535 
   3536 lapack_int LAPACKE_ssygvd( int matrix_order, lapack_int itype, char jobz,
   3537                            char uplo, lapack_int n, float* a, lapack_int lda,
   3538                            float* b, lapack_int ldb, float* w );
   3539 lapack_int LAPACKE_dsygvd( int matrix_order, lapack_int itype, char jobz,
   3540                            char uplo, lapack_int n, double* a, lapack_int lda,
   3541                            double* b, lapack_int ldb, double* w );
   3542 
   3543 lapack_int LAPACKE_ssygvx( int matrix_order, lapack_int itype, char jobz,
   3544                            char range, char uplo, lapack_int n, float* a,
   3545                            lapack_int lda, float* b, lapack_int ldb, float vl,
   3546                            float vu, lapack_int il, lapack_int iu, float abstol,
   3547                            lapack_int* m, float* w, float* z, lapack_int ldz,
   3548                            lapack_int* ifail );
   3549 lapack_int LAPACKE_dsygvx( int matrix_order, lapack_int itype, char jobz,
   3550                            char range, char uplo, lapack_int n, double* a,
   3551                            lapack_int lda, double* b, lapack_int ldb, double vl,
   3552                            double vu, lapack_int il, lapack_int iu,
   3553                            double abstol, lapack_int* m, double* w, double* z,
   3554                            lapack_int ldz, lapack_int* ifail );
   3555 
   3556 lapack_int LAPACKE_ssyrfs( int matrix_order, char uplo, lapack_int n,
   3557                            lapack_int nrhs, const float* a, lapack_int lda,
   3558                            const float* af, lapack_int ldaf,
   3559                            const lapack_int* ipiv, const float* b,
   3560                            lapack_int ldb, float* x, lapack_int ldx,
   3561                            float* ferr, float* berr );
   3562 lapack_int LAPACKE_dsyrfs( int matrix_order, char uplo, lapack_int n,
   3563                            lapack_int nrhs, const double* a, lapack_int lda,
   3564                            const double* af, lapack_int ldaf,
   3565                            const lapack_int* ipiv, const double* b,
   3566                            lapack_int ldb, double* x, lapack_int ldx,
   3567                            double* ferr, double* berr );
   3568 lapack_int LAPACKE_csyrfs( int matrix_order, char uplo, lapack_int n,
   3569                            lapack_int nrhs, const lapack_complex_float* a,
   3570                            lapack_int lda, const lapack_complex_float* af,
   3571                            lapack_int ldaf, const lapack_int* ipiv,
   3572                            const lapack_complex_float* b, lapack_int ldb,
   3573                            lapack_complex_float* x, lapack_int ldx, float* ferr,
   3574                            float* berr );
   3575 lapack_int LAPACKE_zsyrfs( int matrix_order, char uplo, lapack_int n,
   3576                            lapack_int nrhs, const lapack_complex_double* a,
   3577                            lapack_int lda, const lapack_complex_double* af,
   3578                            lapack_int ldaf, const lapack_int* ipiv,
   3579                            const lapack_complex_double* b, lapack_int ldb,
   3580                            lapack_complex_double* x, lapack_int ldx,
   3581                            double* ferr, double* berr );
   3582 
   3583 lapack_int LAPACKE_ssyrfsx( int matrix_order, char uplo, char equed,
   3584                             lapack_int n, lapack_int nrhs, const float* a,
   3585                             lapack_int lda, const float* af, lapack_int ldaf,
   3586                             const lapack_int* ipiv, const float* s,
   3587                             const float* b, lapack_int ldb, float* x,
   3588                             lapack_int ldx, float* rcond, float* berr,
   3589                             lapack_int n_err_bnds, float* err_bnds_norm,
   3590                             float* err_bnds_comp, lapack_int nparams,
   3591                             float* params );
   3592 lapack_int LAPACKE_dsyrfsx( int matrix_order, char uplo, char equed,
   3593                             lapack_int n, lapack_int nrhs, const double* a,
   3594                             lapack_int lda, const double* af, lapack_int ldaf,
   3595                             const lapack_int* ipiv, const double* s,
   3596                             const double* b, lapack_int ldb, double* x,
   3597                             lapack_int ldx, double* rcond, double* berr,
   3598                             lapack_int n_err_bnds, double* err_bnds_norm,
   3599                             double* err_bnds_comp, lapack_int nparams,
   3600                             double* params );
   3601 lapack_int LAPACKE_csyrfsx( int matrix_order, char uplo, char equed,
   3602                             lapack_int n, lapack_int nrhs,
   3603                             const lapack_complex_float* a, lapack_int lda,
   3604                             const lapack_complex_float* af, lapack_int ldaf,
   3605                             const lapack_int* ipiv, const float* s,
   3606                             const lapack_complex_float* b, lapack_int ldb,
   3607                             lapack_complex_float* x, lapack_int ldx,
   3608                             float* rcond, float* berr, lapack_int n_err_bnds,
   3609                             float* err_bnds_norm, float* err_bnds_comp,
   3610                             lapack_int nparams, float* params );
   3611 lapack_int LAPACKE_zsyrfsx( int matrix_order, char uplo, char equed,
   3612                             lapack_int n, lapack_int nrhs,
   3613                             const lapack_complex_double* a, lapack_int lda,
   3614                             const lapack_complex_double* af, lapack_int ldaf,
   3615                             const lapack_int* ipiv, const double* s,
   3616                             const lapack_complex_double* b, lapack_int ldb,
   3617                             lapack_complex_double* x, lapack_int ldx,
   3618                             double* rcond, double* berr, lapack_int n_err_bnds,
   3619                             double* err_bnds_norm, double* err_bnds_comp,
   3620                             lapack_int nparams, double* params );
   3621 
   3622 lapack_int LAPACKE_ssysv( int matrix_order, char uplo, lapack_int n,
   3623                           lapack_int nrhs, float* a, lapack_int lda,
   3624                           lapack_int* ipiv, float* b, lapack_int ldb );
   3625 lapack_int LAPACKE_dsysv( int matrix_order, char uplo, lapack_int n,
   3626                           lapack_int nrhs, double* a, lapack_int lda,
   3627                           lapack_int* ipiv, double* b, lapack_int ldb );
   3628 lapack_int LAPACKE_csysv( int matrix_order, char uplo, lapack_int n,
   3629                           lapack_int nrhs, lapack_complex_float* a,
   3630                           lapack_int lda, lapack_int* ipiv,
   3631                           lapack_complex_float* b, lapack_int ldb );
   3632 lapack_int LAPACKE_zsysv( int matrix_order, char uplo, lapack_int n,
   3633                           lapack_int nrhs, lapack_complex_double* a,
   3634                           lapack_int lda, lapack_int* ipiv,
   3635                           lapack_complex_double* b, lapack_int ldb );
   3636 
   3637 lapack_int LAPACKE_ssysvx( int matrix_order, char fact, char uplo, lapack_int n,
   3638                            lapack_int nrhs, const float* a, lapack_int lda,
   3639                            float* af, lapack_int ldaf, lapack_int* ipiv,
   3640                            const float* b, lapack_int ldb, float* x,
   3641                            lapack_int ldx, float* rcond, float* ferr,
   3642                            float* berr );
   3643 lapack_int LAPACKE_dsysvx( int matrix_order, char fact, char uplo, lapack_int n,
   3644                            lapack_int nrhs, const double* a, lapack_int lda,
   3645                            double* af, lapack_int ldaf, lapack_int* ipiv,
   3646                            const double* b, lapack_int ldb, double* x,
   3647                            lapack_int ldx, double* rcond, double* ferr,
   3648                            double* berr );
   3649 lapack_int LAPACKE_csysvx( int matrix_order, char fact, char uplo, lapack_int n,
   3650                            lapack_int nrhs, const lapack_complex_float* a,
   3651                            lapack_int lda, lapack_complex_float* af,
   3652                            lapack_int ldaf, lapack_int* ipiv,
   3653                            const lapack_complex_float* b, lapack_int ldb,
   3654                            lapack_complex_float* x, lapack_int ldx,
   3655                            float* rcond, float* ferr, float* berr );
   3656 lapack_int LAPACKE_zsysvx( int matrix_order, char fact, char uplo, lapack_int n,
   3657                            lapack_int nrhs, const lapack_complex_double* a,
   3658                            lapack_int lda, lapack_complex_double* af,
   3659                            lapack_int ldaf, lapack_int* ipiv,
   3660                            const lapack_complex_double* b, lapack_int ldb,
   3661                            lapack_complex_double* x, lapack_int ldx,
   3662                            double* rcond, double* ferr, double* berr );
   3663 
   3664 lapack_int LAPACKE_ssysvxx( int matrix_order, char fact, char uplo,
   3665                             lapack_int n, lapack_int nrhs, float* a,
   3666                             lapack_int lda, float* af, lapack_int ldaf,
   3667                             lapack_int* ipiv, char* equed, float* s, float* b,
   3668                             lapack_int ldb, float* x, lapack_int ldx,
   3669                             float* rcond, float* rpvgrw, float* berr,
   3670                             lapack_int n_err_bnds, float* err_bnds_norm,
   3671                             float* err_bnds_comp, lapack_int nparams,
   3672                             float* params );
   3673 lapack_int LAPACKE_dsysvxx( int matrix_order, char fact, char uplo,
   3674                             lapack_int n, lapack_int nrhs, double* a,
   3675                             lapack_int lda, double* af, lapack_int ldaf,
   3676                             lapack_int* ipiv, char* equed, double* s, double* b,
   3677                             lapack_int ldb, double* x, lapack_int ldx,
   3678                             double* rcond, double* rpvgrw, double* berr,
   3679                             lapack_int n_err_bnds, double* err_bnds_norm,
   3680                             double* err_bnds_comp, lapack_int nparams,
   3681                             double* params );
   3682 lapack_int LAPACKE_csysvxx( int matrix_order, char fact, char uplo,
   3683                             lapack_int n, lapack_int nrhs,
   3684                             lapack_complex_float* a, lapack_int lda,
   3685                             lapack_complex_float* af, lapack_int ldaf,
   3686                             lapack_int* ipiv, char* equed, float* s,
   3687                             lapack_complex_float* b, lapack_int ldb,
   3688                             lapack_complex_float* x, lapack_int ldx,
   3689                             float* rcond, float* rpvgrw, float* berr,
   3690                             lapack_int n_err_bnds, float* err_bnds_norm,
   3691                             float* err_bnds_comp, lapack_int nparams,
   3692                             float* params );
   3693 lapack_int LAPACKE_zsysvxx( int matrix_order, char fact, char uplo,
   3694                             lapack_int n, lapack_int nrhs,
   3695                             lapack_complex_double* a, lapack_int lda,
   3696                             lapack_complex_double* af, lapack_int ldaf,
   3697                             lapack_int* ipiv, char* equed, double* s,
   3698                             lapack_complex_double* b, lapack_int ldb,
   3699                             lapack_complex_double* x, lapack_int ldx,
   3700                             double* rcond, double* rpvgrw, double* berr,
   3701                             lapack_int n_err_bnds, double* err_bnds_norm,
   3702                             double* err_bnds_comp, lapack_int nparams,
   3703                             double* params );
   3704 
   3705 lapack_int LAPACKE_ssytrd( int matrix_order, char uplo, lapack_int n, float* a,
   3706                            lapack_int lda, float* d, float* e, float* tau );
   3707 lapack_int LAPACKE_dsytrd( int matrix_order, char uplo, lapack_int n, double* a,
   3708                            lapack_int lda, double* d, double* e, double* tau );
   3709 
   3710 lapack_int LAPACKE_ssytrf( int matrix_order, char uplo, lapack_int n, float* a,
   3711                            lapack_int lda, lapack_int* ipiv );
   3712 lapack_int LAPACKE_dsytrf( int matrix_order, char uplo, lapack_int n, double* a,
   3713                            lapack_int lda, lapack_int* ipiv );
   3714 lapack_int LAPACKE_csytrf( int matrix_order, char uplo, lapack_int n,
   3715                            lapack_complex_float* a, lapack_int lda,
   3716                            lapack_int* ipiv );
   3717 lapack_int LAPACKE_zsytrf( int matrix_order, char uplo, lapack_int n,
   3718                            lapack_complex_double* a, lapack_int lda,
   3719                            lapack_int* ipiv );
   3720 
   3721 lapack_int LAPACKE_ssytri( int matrix_order, char uplo, lapack_int n, float* a,
   3722                            lapack_int lda, const lapack_int* ipiv );
   3723 lapack_int LAPACKE_dsytri( int matrix_order, char uplo, lapack_int n, double* a,
   3724                            lapack_int lda, const lapack_int* ipiv );
   3725 lapack_int LAPACKE_csytri( int matrix_order, char uplo, lapack_int n,
   3726                            lapack_complex_float* a, lapack_int lda,
   3727                            const lapack_int* ipiv );
   3728 lapack_int LAPACKE_zsytri( int matrix_order, char uplo, lapack_int n,
   3729                            lapack_complex_double* a, lapack_int lda,
   3730                            const lapack_int* ipiv );
   3731 
   3732 lapack_int LAPACKE_ssytrs( int matrix_order, char uplo, lapack_int n,
   3733                            lapack_int nrhs, const float* a, lapack_int lda,
   3734                            const lapack_int* ipiv, float* b, lapack_int ldb );
   3735 lapack_int LAPACKE_dsytrs( int matrix_order, char uplo, lapack_int n,
   3736                            lapack_int nrhs, const double* a, lapack_int lda,
   3737                            const lapack_int* ipiv, double* b, lapack_int ldb );
   3738 lapack_int LAPACKE_csytrs( int matrix_order, char uplo, lapack_int n,
   3739                            lapack_int nrhs, const lapack_complex_float* a,
   3740                            lapack_int lda, const lapack_int* ipiv,
   3741                            lapack_complex_float* b, lapack_int ldb );
   3742 lapack_int LAPACKE_zsytrs( int matrix_order, char uplo, lapack_int n,
   3743                            lapack_int nrhs, const lapack_complex_double* a,
   3744                            lapack_int lda, const lapack_int* ipiv,
   3745                            lapack_complex_double* b, lapack_int ldb );
   3746 
   3747 lapack_int LAPACKE_stbcon( int matrix_order, char norm, char uplo, char diag,
   3748                            lapack_int n, lapack_int kd, const float* ab,
   3749                            lapack_int ldab, float* rcond );
   3750 lapack_int LAPACKE_dtbcon( int matrix_order, char norm, char uplo, char diag,
   3751                            lapack_int n, lapack_int kd, const double* ab,
   3752                            lapack_int ldab, double* rcond );
   3753 lapack_int LAPACKE_ctbcon( int matrix_order, char norm, char uplo, char diag,
   3754                            lapack_int n, lapack_int kd,
   3755                            const lapack_complex_float* ab, lapack_int ldab,
   3756                            float* rcond );
   3757 lapack_int LAPACKE_ztbcon( int matrix_order, char norm, char uplo, char diag,
   3758                            lapack_int n, lapack_int kd,
   3759                            const lapack_complex_double* ab, lapack_int ldab,
   3760                            double* rcond );
   3761 
   3762 lapack_int LAPACKE_stbrfs( int matrix_order, char uplo, char trans, char diag,
   3763                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3764                            const float* ab, lapack_int ldab, const float* b,
   3765                            lapack_int ldb, const float* x, lapack_int ldx,
   3766                            float* ferr, float* berr );
   3767 lapack_int LAPACKE_dtbrfs( int matrix_order, char uplo, char trans, char diag,
   3768                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3769                            const double* ab, lapack_int ldab, const double* b,
   3770                            lapack_int ldb, const double* x, lapack_int ldx,
   3771                            double* ferr, double* berr );
   3772 lapack_int LAPACKE_ctbrfs( int matrix_order, char uplo, char trans, char diag,
   3773                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3774                            const lapack_complex_float* ab, lapack_int ldab,
   3775                            const lapack_complex_float* b, lapack_int ldb,
   3776                            const lapack_complex_float* x, lapack_int ldx,
   3777                            float* ferr, float* berr );
   3778 lapack_int LAPACKE_ztbrfs( int matrix_order, char uplo, char trans, char diag,
   3779                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3780                            const lapack_complex_double* ab, lapack_int ldab,
   3781                            const lapack_complex_double* b, lapack_int ldb,
   3782                            const lapack_complex_double* x, lapack_int ldx,
   3783                            double* ferr, double* berr );
   3784 
   3785 lapack_int LAPACKE_stbtrs( int matrix_order, char uplo, char trans, char diag,
   3786                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3787                            const float* ab, lapack_int ldab, float* b,
   3788                            lapack_int ldb );
   3789 lapack_int LAPACKE_dtbtrs( int matrix_order, char uplo, char trans, char diag,
   3790                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3791                            const double* ab, lapack_int ldab, double* b,
   3792                            lapack_int ldb );
   3793 lapack_int LAPACKE_ctbtrs( int matrix_order, char uplo, char trans, char diag,
   3794                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3795                            const lapack_complex_float* ab, lapack_int ldab,
   3796                            lapack_complex_float* b, lapack_int ldb );
   3797 lapack_int LAPACKE_ztbtrs( int matrix_order, char uplo, char trans, char diag,
   3798                            lapack_int n, lapack_int kd, lapack_int nrhs,
   3799                            const lapack_complex_double* ab, lapack_int ldab,
   3800                            lapack_complex_double* b, lapack_int ldb );
   3801 
   3802 lapack_int LAPACKE_stfsm( int matrix_order, char transr, char side, char uplo,
   3803                           char trans, char diag, lapack_int m, lapack_int n,
   3804                           float alpha, const float* a, float* b,
   3805                           lapack_int ldb );
   3806 lapack_int LAPACKE_dtfsm( int matrix_order, char transr, char side, char uplo,
   3807                           char trans, char diag, lapack_int m, lapack_int n,
   3808                           double alpha, const double* a, double* b,
   3809                           lapack_int ldb );
   3810 lapack_int LAPACKE_ctfsm( int matrix_order, char transr, char side, char uplo,
   3811                           char trans, char diag, lapack_int m, lapack_int n,
   3812                           lapack_complex_float alpha,
   3813                           const lapack_complex_float* a,
   3814                           lapack_complex_float* b, lapack_int ldb );
   3815 lapack_int LAPACKE_ztfsm( int matrix_order, char transr, char side, char uplo,
   3816                           char trans, char diag, lapack_int m, lapack_int n,
   3817                           lapack_complex_double alpha,
   3818                           const lapack_complex_double* a,
   3819                           lapack_complex_double* b, lapack_int ldb );
   3820 
   3821 lapack_int LAPACKE_stftri( int matrix_order, char transr, char uplo, char diag,
   3822                            lapack_int n, float* a );
   3823 lapack_int LAPACKE_dtftri( int matrix_order, char transr, char uplo, char diag,
   3824                            lapack_int n, double* a );
   3825 lapack_int LAPACKE_ctftri( int matrix_order, char transr, char uplo, char diag,
   3826                            lapack_int n, lapack_complex_float* a );
   3827 lapack_int LAPACKE_ztftri( int matrix_order, char transr, char uplo, char diag,
   3828                            lapack_int n, lapack_complex_double* a );
   3829 
   3830 lapack_int LAPACKE_stfttp( int matrix_order, char transr, char uplo,
   3831                            lapack_int n, const float* arf, float* ap );
   3832 lapack_int LAPACKE_dtfttp( int matrix_order, char transr, char uplo,
   3833                            lapack_int n, const double* arf, double* ap );
   3834 lapack_int LAPACKE_ctfttp( int matrix_order, char transr, char uplo,
   3835                            lapack_int n, const lapack_complex_float* arf,
   3836                            lapack_complex_float* ap );
   3837 lapack_int LAPACKE_ztfttp( int matrix_order, char transr, char uplo,
   3838                            lapack_int n, const lapack_complex_double* arf,
   3839                            lapack_complex_double* ap );
   3840 
   3841 lapack_int LAPACKE_stfttr( int matrix_order, char transr, char uplo,
   3842                            lapack_int n, const float* arf, float* a,
   3843                            lapack_int lda );
   3844 lapack_int LAPACKE_dtfttr( int matrix_order, char transr, char uplo,
   3845                            lapack_int n, const double* arf, double* a,
   3846                            lapack_int lda );
   3847 lapack_int LAPACKE_ctfttr( int matrix_order, char transr, char uplo,
   3848                            lapack_int n, const lapack_complex_float* arf,
   3849                            lapack_complex_float* a, lapack_int lda );
   3850 lapack_int LAPACKE_ztfttr( int matrix_order, char transr, char uplo,
   3851                            lapack_int n, const lapack_complex_double* arf,
   3852                            lapack_complex_double* a, lapack_int lda );
   3853 
   3854 lapack_int LAPACKE_stgevc( int matrix_order, char side, char howmny,
   3855                            const lapack_logical* select, lapack_int n,
   3856                            const float* s, lapack_int lds, const float* p,
   3857                            lapack_int ldp, float* vl, lapack_int ldvl,
   3858                            float* vr, lapack_int ldvr, lapack_int mm,
   3859                            lapack_int* m );
   3860 lapack_int LAPACKE_dtgevc( int matrix_order, char side, char howmny,
   3861                            const lapack_logical* select, lapack_int n,
   3862                            const double* s, lapack_int lds, const double* p,
   3863                            lapack_int ldp, double* vl, lapack_int ldvl,
   3864                            double* vr, lapack_int ldvr, lapack_int mm,
   3865                            lapack_int* m );
   3866 lapack_int LAPACKE_ctgevc( int matrix_order, char side, char howmny,
   3867                            const lapack_logical* select, lapack_int n,
   3868                            const lapack_complex_float* s, lapack_int lds,
   3869                            const lapack_complex_float* p, lapack_int ldp,
   3870                            lapack_complex_float* vl, lapack_int ldvl,
   3871                            lapack_complex_float* vr, lapack_int ldvr,
   3872                            lapack_int mm, lapack_int* m );
   3873 lapack_int LAPACKE_ztgevc( int matrix_order, char side, char howmny,
   3874                            const lapack_logical* select, lapack_int n,
   3875                            const lapack_complex_double* s, lapack_int lds,
   3876                            const lapack_complex_double* p, lapack_int ldp,
   3877                            lapack_complex_double* vl, lapack_int ldvl,
   3878                            lapack_complex_double* vr, lapack_int ldvr,
   3879                            lapack_int mm, lapack_int* m );
   3880 
   3881 lapack_int LAPACKE_stgexc( int matrix_order, lapack_logical wantq,
   3882                            lapack_logical wantz, lapack_int n, float* a,
   3883                            lapack_int lda, float* b, lapack_int ldb, float* q,
   3884                            lapack_int ldq, float* z, lapack_int ldz,
   3885                            lapack_int* ifst, lapack_int* ilst );
   3886 lapack_int LAPACKE_dtgexc( int matrix_order, lapack_logical wantq,
   3887                            lapack_logical wantz, lapack_int n, double* a,
   3888                            lapack_int lda, double* b, lapack_int ldb, double* q,
   3889                            lapack_int ldq, double* z, lapack_int ldz,
   3890                            lapack_int* ifst, lapack_int* ilst );
   3891 lapack_int LAPACKE_ctgexc( int matrix_order, lapack_logical wantq,
   3892                            lapack_logical wantz, lapack_int n,
   3893                            lapack_complex_float* a, lapack_int lda,
   3894                            lapack_complex_float* b, lapack_int ldb,
   3895                            lapack_complex_float* q, lapack_int ldq,
   3896                            lapack_complex_float* z, lapack_int ldz,
   3897                            lapack_int ifst, lapack_int ilst );
   3898 lapack_int LAPACKE_ztgexc( int matrix_order, lapack_logical wantq,
   3899                            lapack_logical wantz, lapack_int n,
   3900                            lapack_complex_double* a, lapack_int lda,
   3901                            lapack_complex_double* b, lapack_int ldb,
   3902                            lapack_complex_double* q, lapack_int ldq,
   3903                            lapack_complex_double* z, lapack_int ldz,
   3904                            lapack_int ifst, lapack_int ilst );
   3905 
   3906 lapack_int LAPACKE_stgsen( int matrix_order, lapack_int ijob,
   3907                            lapack_logical wantq, lapack_logical wantz,
   3908                            const lapack_logical* select, lapack_int n, float* a,
   3909                            lapack_int lda, float* b, lapack_int ldb,
   3910                            float* alphar, float* alphai, float* beta, float* q,
   3911                            lapack_int ldq, float* z, lapack_int ldz,
   3912                            lapack_int* m, float* pl, float* pr, float* dif );
   3913 lapack_int LAPACKE_dtgsen( int matrix_order, lapack_int ijob,
   3914                            lapack_logical wantq, lapack_logical wantz,
   3915                            const lapack_logical* select, lapack_int n,
   3916                            double* a, lapack_int lda, double* b, lapack_int ldb,
   3917                            double* alphar, double* alphai, double* beta,
   3918                            double* q, lapack_int ldq, double* z, lapack_int ldz,
   3919                            lapack_int* m, double* pl, double* pr, double* dif );
   3920 lapack_int LAPACKE_ctgsen( int matrix_order, lapack_int ijob,
   3921                            lapack_logical wantq, lapack_logical wantz,
   3922                            const lapack_logical* select, lapack_int n,
   3923                            lapack_complex_float* a, lapack_int lda,
   3924                            lapack_complex_float* b, lapack_int ldb,
   3925                            lapack_complex_float* alpha,
   3926                            lapack_complex_float* beta, lapack_complex_float* q,
   3927                            lapack_int ldq, lapack_complex_float* z,
   3928                            lapack_int ldz, lapack_int* m, float* pl, float* pr,
   3929                            float* dif );
   3930 lapack_int LAPACKE_ztgsen( int matrix_order, lapack_int ijob,
   3931                            lapack_logical wantq, lapack_logical wantz,
   3932                            const lapack_logical* select, lapack_int n,
   3933                            lapack_complex_double* a, lapack_int lda,
   3934                            lapack_complex_double* b, lapack_int ldb,
   3935                            lapack_complex_double* alpha,
   3936                            lapack_complex_double* beta,
   3937                            lapack_complex_double* q, lapack_int ldq,
   3938                            lapack_complex_double* z, lapack_int ldz,
   3939                            lapack_int* m, double* pl, double* pr, double* dif );
   3940 
   3941 lapack_int LAPACKE_stgsja( int matrix_order, char jobu, char jobv, char jobq,
   3942                            lapack_int m, lapack_int p, lapack_int n,
   3943                            lapack_int k, lapack_int l, float* a, lapack_int lda,
   3944                            float* b, lapack_int ldb, float tola, float tolb,
   3945                            float* alpha, float* beta, float* u, lapack_int ldu,
   3946                            float* v, lapack_int ldv, float* q, lapack_int ldq,
   3947                            lapack_int* ncycle );
   3948 lapack_int LAPACKE_dtgsja( int matrix_order, char jobu, char jobv, char jobq,
   3949                            lapack_int m, lapack_int p, lapack_int n,
   3950                            lapack_int k, lapack_int l, double* a,
   3951                            lapack_int lda, double* b, lapack_int ldb,
   3952                            double tola, double tolb, double* alpha,
   3953                            double* beta, double* u, lapack_int ldu, double* v,
   3954                            lapack_int ldv, double* q, lapack_int ldq,
   3955                            lapack_int* ncycle );
   3956 lapack_int LAPACKE_ctgsja( int matrix_order, char jobu, char jobv, char jobq,
   3957                            lapack_int m, lapack_int p, lapack_int n,
   3958                            lapack_int k, lapack_int l, lapack_complex_float* a,
   3959                            lapack_int lda, lapack_complex_float* b,
   3960                            lapack_int ldb, float tola, float tolb, float* alpha,
   3961                            float* beta, lapack_complex_float* u, lapack_int ldu,
   3962                            lapack_complex_float* v, lapack_int ldv,
   3963                            lapack_complex_float* q, lapack_int ldq,
   3964                            lapack_int* ncycle );
   3965 lapack_int LAPACKE_ztgsja( int matrix_order, char jobu, char jobv, char jobq,
   3966                            lapack_int m, lapack_int p, lapack_int n,
   3967                            lapack_int k, lapack_int l, lapack_complex_double* a,
   3968                            lapack_int lda, lapack_complex_double* b,
   3969                            lapack_int ldb, double tola, double tolb,
   3970                            double* alpha, double* beta,
   3971                            lapack_complex_double* u, lapack_int ldu,
   3972                            lapack_complex_double* v, lapack_int ldv,
   3973                            lapack_complex_double* q, lapack_int ldq,
   3974                            lapack_int* ncycle );
   3975 
   3976 lapack_int LAPACKE_stgsna( int matrix_order, char job, char howmny,
   3977                            const lapack_logical* select, lapack_int n,
   3978                            const float* a, lapack_int lda, const float* b,
   3979                            lapack_int ldb, const float* vl, lapack_int ldvl,
   3980                            const float* vr, lapack_int ldvr, float* s,
   3981                            float* dif, lapack_int mm, lapack_int* m );
   3982 lapack_int LAPACKE_dtgsna( int matrix_order, char job, char howmny,
   3983                            const lapack_logical* select, lapack_int n,
   3984                            const double* a, lapack_int lda, const double* b,
   3985                            lapack_int ldb, const double* vl, lapack_int ldvl,
   3986                            const double* vr, lapack_int ldvr, double* s,
   3987                            double* dif, lapack_int mm, lapack_int* m );
   3988 lapack_int LAPACKE_ctgsna( int matrix_order, char job, char howmny,
   3989                            const lapack_logical* select, lapack_int n,
   3990                            const lapack_complex_float* a, lapack_int lda,
   3991                            const lapack_complex_float* b, lapack_int ldb,
   3992                            const lapack_complex_float* vl, lapack_int ldvl,
   3993                            const lapack_complex_float* vr, lapack_int ldvr,
   3994                            float* s, float* dif, lapack_int mm, lapack_int* m );
   3995 lapack_int LAPACKE_ztgsna( int matrix_order, char job, char howmny,
   3996                            const lapack_logical* select, lapack_int n,
   3997                            const lapack_complex_double* a, lapack_int lda,
   3998                            const lapack_complex_double* b, lapack_int ldb,
   3999                            const lapack_complex_double* vl, lapack_int ldvl,
   4000                            const lapack_complex_double* vr, lapack_int ldvr,
   4001                            double* s, double* dif, lapack_int mm,
   4002                            lapack_int* m );
   4003 
   4004 lapack_int LAPACKE_stgsyl( int matrix_order, char trans, lapack_int ijob,
   4005                            lapack_int m, lapack_int n, const float* a,
   4006                            lapack_int lda, const float* b, lapack_int ldb,
   4007                            float* c, lapack_int ldc, const float* d,
   4008                            lapack_int ldd, const float* e, lapack_int lde,
   4009                            float* f, lapack_int ldf, float* scale, float* dif );
   4010 lapack_int LAPACKE_dtgsyl( int matrix_order, char trans, lapack_int ijob,
   4011                            lapack_int m, lapack_int n, const double* a,
   4012                            lapack_int lda, const double* b, lapack_int ldb,
   4013                            double* c, lapack_int ldc, const double* d,
   4014                            lapack_int ldd, const double* e, lapack_int lde,
   4015                            double* f, lapack_int ldf, double* scale,
   4016                            double* dif );
   4017 lapack_int LAPACKE_ctgsyl( int matrix_order, char trans, lapack_int ijob,
   4018                            lapack_int m, lapack_int n,
   4019                            const lapack_complex_float* a, lapack_int lda,
   4020                            const lapack_complex_float* b, lapack_int ldb,
   4021                            lapack_complex_float* c, lapack_int ldc,
   4022                            const lapack_complex_float* d, lapack_int ldd,
   4023                            const lapack_complex_float* e, lapack_int lde,
   4024                            lapack_complex_float* f, lapack_int ldf,
   4025                            float* scale, float* dif );
   4026 lapack_int LAPACKE_ztgsyl( int matrix_order, char trans, lapack_int ijob,
   4027                            lapack_int m, lapack_int n,
   4028                            const lapack_complex_double* a, lapack_int lda,
   4029                            const lapack_complex_double* b, lapack_int ldb,
   4030                            lapack_complex_double* c, lapack_int ldc,
   4031                            const lapack_complex_double* d, lapack_int ldd,
   4032                            const lapack_complex_double* e, lapack_int lde,
   4033                            lapack_complex_double* f, lapack_int ldf,
   4034                            double* scale, double* dif );
   4035 
   4036 lapack_int LAPACKE_stpcon( int matrix_order, char norm, char uplo, char diag,
   4037                            lapack_int n, const float* ap, float* rcond );
   4038 lapack_int LAPACKE_dtpcon( int matrix_order, char norm, char uplo, char diag,
   4039                            lapack_int n, const double* ap, double* rcond );
   4040 lapack_int LAPACKE_ctpcon( int matrix_order, char norm, char uplo, char diag,
   4041                            lapack_int n, const lapack_complex_float* ap,
   4042                            float* rcond );
   4043 lapack_int LAPACKE_ztpcon( int matrix_order, char norm, char uplo, char diag,
   4044                            lapack_int n, const lapack_complex_double* ap,
   4045                            double* rcond );
   4046 
   4047 lapack_int LAPACKE_stprfs( int matrix_order, char uplo, char trans, char diag,
   4048                            lapack_int n, lapack_int nrhs, const float* ap,
   4049                            const float* b, lapack_int ldb, const float* x,
   4050                            lapack_int ldx, float* ferr, float* berr );
   4051 lapack_int LAPACKE_dtprfs( int matrix_order, char uplo, char trans, char diag,
   4052                            lapack_int n, lapack_int nrhs, const double* ap,
   4053                            const double* b, lapack_int ldb, const double* x,
   4054                            lapack_int ldx, double* ferr, double* berr );
   4055 lapack_int LAPACKE_ctprfs( int matrix_order, char uplo, char trans, char diag,
   4056                            lapack_int n, lapack_int nrhs,
   4057                            const lapack_complex_float* ap,
   4058                            const lapack_complex_float* b, lapack_int ldb,
   4059                            const lapack_complex_float* x, lapack_int ldx,
   4060                            float* ferr, float* berr );
   4061 lapack_int LAPACKE_ztprfs( int matrix_order, char uplo, char trans, char diag,
   4062                            lapack_int n, lapack_int nrhs,
   4063                            const lapack_complex_double* ap,
   4064                            const lapack_complex_double* b, lapack_int ldb,
   4065                            const lapack_complex_double* x, lapack_int ldx,
   4066                            double* ferr, double* berr );
   4067 
   4068 lapack_int LAPACKE_stptri( int matrix_order, char uplo, char diag, lapack_int n,
   4069                            float* ap );
   4070 lapack_int LAPACKE_dtptri( int matrix_order, char uplo, char diag, lapack_int n,
   4071                            double* ap );
   4072 lapack_int LAPACKE_ctptri( int matrix_order, char uplo, char diag, lapack_int n,
   4073                            lapack_complex_float* ap );
   4074 lapack_int LAPACKE_ztptri( int matrix_order, char uplo, char diag, lapack_int n,
   4075                            lapack_complex_double* ap );
   4076 
   4077 lapack_int LAPACKE_stptrs( int matrix_order, char uplo, char trans, char diag,
   4078                            lapack_int n, lapack_int nrhs, const float* ap,
   4079                            float* b, lapack_int ldb );
   4080 lapack_int LAPACKE_dtptrs( int matrix_order, char uplo, char trans, char diag,
   4081                            lapack_int n, lapack_int nrhs, const double* ap,
   4082                            double* b, lapack_int ldb );
   4083 lapack_int LAPACKE_ctptrs( int matrix_order, char uplo, char trans, char diag,
   4084                            lapack_int n, lapack_int nrhs,
   4085                            const lapack_complex_float* ap,
   4086                            lapack_complex_float* b, lapack_int ldb );
   4087 lapack_int LAPACKE_ztptrs( int matrix_order, char uplo, char trans, char diag,
   4088                            lapack_int n, lapack_int nrhs,
   4089                            const lapack_complex_double* ap,
   4090                            lapack_complex_double* b, lapack_int ldb );
   4091 
   4092 lapack_int LAPACKE_stpttf( int matrix_order, char transr, char uplo,
   4093                            lapack_int n, const float* ap, float* arf );
   4094 lapack_int LAPACKE_dtpttf( int matrix_order, char transr, char uplo,
   4095                            lapack_int n, const double* ap, double* arf );
   4096 lapack_int LAPACKE_ctpttf( int matrix_order, char transr, char uplo,
   4097                            lapack_int n, const lapack_complex_float* ap,
   4098                            lapack_complex_float* arf );
   4099 lapack_int LAPACKE_ztpttf( int matrix_order, char transr, char uplo,
   4100                            lapack_int n, const lapack_complex_double* ap,
   4101                            lapack_complex_double* arf );
   4102 
   4103 lapack_int LAPACKE_stpttr( int matrix_order, char uplo, lapack_int n,
   4104                            const float* ap, float* a, lapack_int lda );
   4105 lapack_int LAPACKE_dtpttr( int matrix_order, char uplo, lapack_int n,
   4106                            const double* ap, double* a, lapack_int lda );
   4107 lapack_int LAPACKE_ctpttr( int matrix_order, char uplo, lapack_int n,
   4108                            const lapack_complex_float* ap,
   4109                            lapack_complex_float* a, lapack_int lda );
   4110 lapack_int LAPACKE_ztpttr( int matrix_order, char uplo, lapack_int n,
   4111                            const lapack_complex_double* ap,
   4112                            lapack_complex_double* a, lapack_int lda );
   4113 
   4114 lapack_int LAPACKE_strcon( int matrix_order, char norm, char uplo, char diag,
   4115                            lapack_int n, const float* a, lapack_int lda,
   4116                            float* rcond );
   4117 lapack_int LAPACKE_dtrcon( int matrix_order, char norm, char uplo, char diag,
   4118                            lapack_int n, const double* a, lapack_int lda,
   4119                            double* rcond );
   4120 lapack_int LAPACKE_ctrcon( int matrix_order, char norm, char uplo, char diag,
   4121                            lapack_int n, const lapack_complex_float* a,
   4122                            lapack_int lda, float* rcond );
   4123 lapack_int LAPACKE_ztrcon( int matrix_order, char norm, char uplo, char diag,
   4124                            lapack_int n, const lapack_complex_double* a,
   4125                            lapack_int lda, double* rcond );
   4126 
   4127 lapack_int LAPACKE_strevc( int matrix_order, char side, char howmny,
   4128                            lapack_logical* select, lapack_int n, const float* t,
   4129                            lapack_int ldt, float* vl, lapack_int ldvl,
   4130                            float* vr, lapack_int ldvr, lapack_int mm,
   4131                            lapack_int* m );
   4132 lapack_int LAPACKE_dtrevc( int matrix_order, char side, char howmny,
   4133                            lapack_logical* select, lapack_int n,
   4134                            const double* t, lapack_int ldt, double* vl,
   4135                            lapack_int ldvl, double* vr, lapack_int ldvr,
   4136                            lapack_int mm, lapack_int* m );
   4137 lapack_int LAPACKE_ctrevc( int matrix_order, char side, char howmny,
   4138                            const lapack_logical* select, lapack_int n,
   4139                            lapack_complex_float* t, lapack_int ldt,
   4140                            lapack_complex_float* vl, lapack_int ldvl,
   4141                            lapack_complex_float* vr, lapack_int ldvr,
   4142                            lapack_int mm, lapack_int* m );
   4143 lapack_int LAPACKE_ztrevc( int matrix_order, char side, char howmny,
   4144                            const lapack_logical* select, lapack_int n,
   4145                            lapack_complex_double* t, lapack_int ldt,
   4146                            lapack_complex_double* vl, lapack_int ldvl,
   4147                            lapack_complex_double* vr, lapack_int ldvr,
   4148                            lapack_int mm, lapack_int* m );
   4149 
   4150 lapack_int LAPACKE_strexc( int matrix_order, char compq, lapack_int n, float* t,
   4151                            lapack_int ldt, float* q, lapack_int ldq,
   4152                            lapack_int* ifst, lapack_int* ilst );
   4153 lapack_int LAPACKE_dtrexc( int matrix_order, char compq, lapack_int n,
   4154                            double* t, lapack_int ldt, double* q, lapack_int ldq,
   4155                            lapack_int* ifst, lapack_int* ilst );
   4156 lapack_int LAPACKE_ctrexc( int matrix_order, char compq, lapack_int n,
   4157                            lapack_complex_float* t, lapack_int ldt,
   4158                            lapack_complex_float* q, lapack_int ldq,
   4159                            lapack_int ifst, lapack_int ilst );
   4160 lapack_int LAPACKE_ztrexc( int matrix_order, char compq, lapack_int n,
   4161                            lapack_complex_double* t, lapack_int ldt,
   4162                            lapack_complex_double* q, lapack_int ldq,
   4163                            lapack_int ifst, lapack_int ilst );
   4164 
   4165 lapack_int LAPACKE_strrfs( int matrix_order, char uplo, char trans, char diag,
   4166                            lapack_int n, lapack_int nrhs, const float* a,
   4167                            lapack_int lda, const float* b, lapack_int ldb,
   4168                            const float* x, lapack_int ldx, float* ferr,
   4169                            float* berr );
   4170 lapack_int LAPACKE_dtrrfs( int matrix_order, char uplo, char trans, char diag,
   4171                            lapack_int n, lapack_int nrhs, const double* a,
   4172                            lapack_int lda, const double* b, lapack_int ldb,
   4173                            const double* x, lapack_int ldx, double* ferr,
   4174                            double* berr );
   4175 lapack_int LAPACKE_ctrrfs( int matrix_order, char uplo, char trans, char diag,
   4176                            lapack_int n, lapack_int nrhs,
   4177                            const lapack_complex_float* a, lapack_int lda,
   4178                            const lapack_complex_float* b, lapack_int ldb,
   4179                            const lapack_complex_float* x, lapack_int ldx,
   4180                            float* ferr, float* berr );
   4181 lapack_int LAPACKE_ztrrfs( int matrix_order, char uplo, char trans, char diag,
   4182                            lapack_int n, lapack_int nrhs,
   4183                            const lapack_complex_double* a, lapack_int lda,
   4184                            const lapack_complex_double* b, lapack_int ldb,
   4185                            const lapack_complex_double* x, lapack_int ldx,
   4186                            double* ferr, double* berr );
   4187 
   4188 lapack_int LAPACKE_strsen( int matrix_order, char job, char compq,
   4189                            const lapack_logical* select, lapack_int n, float* t,
   4190                            lapack_int ldt, float* q, lapack_int ldq, float* wr,
   4191                            float* wi, lapack_int* m, float* s, float* sep );
   4192 lapack_int LAPACKE_dtrsen( int matrix_order, char job, char compq,
   4193                            const lapack_logical* select, lapack_int n,
   4194                            double* t, lapack_int ldt, double* q, lapack_int ldq,
   4195                            double* wr, double* wi, lapack_int* m, double* s,
   4196                            double* sep );
   4197 lapack_int LAPACKE_ctrsen( int matrix_order, char job, char compq,
   4198                            const lapack_logical* select, lapack_int n,
   4199                            lapack_complex_float* t, lapack_int ldt,
   4200                            lapack_complex_float* q, lapack_int ldq,
   4201                            lapack_complex_float* w, lapack_int* m, float* s,
   4202                            float* sep );
   4203 lapack_int LAPACKE_ztrsen( int matrix_order, char job, char compq,
   4204                            const lapack_logical* select, lapack_int n,
   4205                            lapack_complex_double* t, lapack_int ldt,
   4206                            lapack_complex_double* q, lapack_int ldq,
   4207                            lapack_complex_double* w, lapack_int* m, double* s,
   4208                            double* sep );
   4209 
   4210 lapack_int LAPACKE_strsna( int matrix_order, char job, char howmny,
   4211                            const lapack_logical* select, lapack_int n,
   4212                            const float* t, lapack_int ldt, const float* vl,
   4213                            lapack_int ldvl, const float* vr, lapack_int ldvr,
   4214                            float* s, float* sep, lapack_int mm, lapack_int* m );
   4215 lapack_int LAPACKE_dtrsna( int matrix_order, char job, char howmny,
   4216                            const lapack_logical* select, lapack_int n,
   4217                            const double* t, lapack_int ldt, const double* vl,
   4218                            lapack_int ldvl, const double* vr, lapack_int ldvr,
   4219                            double* s, double* sep, lapack_int mm,
   4220                            lapack_int* m );
   4221 lapack_int LAPACKE_ctrsna( int matrix_order, char job, char howmny,
   4222                            const lapack_logical* select, lapack_int n,
   4223                            const lapack_complex_float* t, lapack_int ldt,
   4224                            const lapack_complex_float* vl, lapack_int ldvl,
   4225                            const lapack_complex_float* vr, lapack_int ldvr,
   4226                            float* s, float* sep, lapack_int mm, lapack_int* m );
   4227 lapack_int LAPACKE_ztrsna( int matrix_order, char job, char howmny,
   4228                            const lapack_logical* select, lapack_int n,
   4229                            const lapack_complex_double* t, lapack_int ldt,
   4230                            const lapack_complex_double* vl, lapack_int ldvl,
   4231                            const lapack_complex_double* vr, lapack_int ldvr,
   4232                            double* s, double* sep, lapack_int mm,
   4233                            lapack_int* m );
   4234 
   4235 lapack_int LAPACKE_strsyl( int matrix_order, char trana, char tranb,
   4236                            lapack_int isgn, lapack_int m, lapack_int n,
   4237                            const float* a, lapack_int lda, const float* b,
   4238                            lapack_int ldb, float* c, lapack_int ldc,
   4239                            float* scale );
   4240 lapack_int LAPACKE_dtrsyl( int matrix_order, char trana, char tranb,
   4241                            lapack_int isgn, lapack_int m, lapack_int n,
   4242                            const double* a, lapack_int lda, const double* b,
   4243                            lapack_int ldb, double* c, lapack_int ldc,
   4244                            double* scale );
   4245 lapack_int LAPACKE_ctrsyl( int matrix_order, char trana, char tranb,
   4246                            lapack_int isgn, lapack_int m, lapack_int n,
   4247                            const lapack_complex_float* a, lapack_int lda,
   4248                            const lapack_complex_float* b, lapack_int ldb,
   4249                            lapack_complex_float* c, lapack_int ldc,
   4250                            float* scale );
   4251 lapack_int LAPACKE_ztrsyl( int matrix_order, char trana, char tranb,
   4252                            lapack_int isgn, lapack_int m, lapack_int n,
   4253                            const lapack_complex_double* a, lapack_int lda,
   4254                            const lapack_complex_double* b, lapack_int ldb,
   4255                            lapack_complex_double* c, lapack_int ldc,
   4256                            double* scale );
   4257 
   4258 lapack_int LAPACKE_strtri( int matrix_order, char uplo, char diag, lapack_int n,
   4259                            float* a, lapack_int lda );
   4260 lapack_int LAPACKE_dtrtri( int matrix_order, char uplo, char diag, lapack_int n,
   4261                            double* a, lapack_int lda );
   4262 lapack_int LAPACKE_ctrtri( int matrix_order, char uplo, char diag, lapack_int n,
   4263                            lapack_complex_float* a, lapack_int lda );
   4264 lapack_int LAPACKE_ztrtri( int matrix_order, char uplo, char diag, lapack_int n,
   4265                            lapack_complex_double* a, lapack_int lda );
   4266 
   4267 lapack_int LAPACKE_strtrs( int matrix_order, char uplo, char trans, char diag,
   4268                            lapack_int n, lapack_int nrhs, const float* a,
   4269                            lapack_int lda, float* b, lapack_int ldb );
   4270 lapack_int LAPACKE_dtrtrs( int matrix_order, char uplo, char trans, char diag,
   4271                            lapack_int n, lapack_int nrhs, const double* a,
   4272                            lapack_int lda, double* b, lapack_int ldb );
   4273 lapack_int LAPACKE_ctrtrs( int matrix_order, char uplo, char trans, char diag,
   4274                            lapack_int n, lapack_int nrhs,
   4275                            const lapack_complex_float* a, lapack_int lda,
   4276                            lapack_complex_float* b, lapack_int ldb );
   4277 lapack_int LAPACKE_ztrtrs( int matrix_order, char uplo, char trans, char diag,
   4278                            lapack_int n, lapack_int nrhs,
   4279                            const lapack_complex_double* a, lapack_int lda,
   4280                            lapack_complex_double* b, lapack_int ldb );
   4281 
   4282 lapack_int LAPACKE_strttf( int matrix_order, char transr, char uplo,
   4283                            lapack_int n, const float* a, lapack_int lda,
   4284                            float* arf );
   4285 lapack_int LAPACKE_dtrttf( int matrix_order, char transr, char uplo,
   4286                            lapack_int n, const double* a, lapack_int lda,
   4287                            double* arf );
   4288 lapack_int LAPACKE_ctrttf( int matrix_order, char transr, char uplo,
   4289                            lapack_int n, const lapack_complex_float* a,
   4290                            lapack_int lda, lapack_complex_float* arf );
   4291 lapack_int LAPACKE_ztrttf( int matrix_order, char transr, char uplo,
   4292                            lapack_int n, const lapack_complex_double* a,
   4293                            lapack_int lda, lapack_complex_double* arf );
   4294 
   4295 lapack_int LAPACKE_strttp( int matrix_order, char uplo, lapack_int n,
   4296                            const float* a, lapack_int lda, float* ap );
   4297 lapack_int LAPACKE_dtrttp( int matrix_order, char uplo, lapack_int n,
   4298                            const double* a, lapack_int lda, double* ap );
   4299 lapack_int LAPACKE_ctrttp( int matrix_order, char uplo, lapack_int n,
   4300                            const lapack_complex_float* a, lapack_int lda,
   4301                            lapack_complex_float* ap );
   4302 lapack_int LAPACKE_ztrttp( int matrix_order, char uplo, lapack_int n,
   4303                            const lapack_complex_double* a, lapack_int lda,
   4304                            lapack_complex_double* ap );
   4305 
   4306 lapack_int LAPACKE_stzrzf( int matrix_order, lapack_int m, lapack_int n,
   4307                            float* a, lapack_int lda, float* tau );
   4308 lapack_int LAPACKE_dtzrzf( int matrix_order, lapack_int m, lapack_int n,
   4309                            double* a, lapack_int lda, double* tau );
   4310 lapack_int LAPACKE_ctzrzf( int matrix_order, lapack_int m, lapack_int n,
   4311                            lapack_complex_float* a, lapack_int lda,
   4312                            lapack_complex_float* tau );
   4313 lapack_int LAPACKE_ztzrzf( int matrix_order, lapack_int m, lapack_int n,
   4314                            lapack_complex_double* a, lapack_int lda,
   4315                            lapack_complex_double* tau );
   4316 
   4317 lapack_int LAPACKE_cungbr( int matrix_order, char vect, lapack_int m,
   4318                            lapack_int n, lapack_int k, lapack_complex_float* a,
   4319                            lapack_int lda, const lapack_complex_float* tau );
   4320 lapack_int LAPACKE_zungbr( int matrix_order, char vect, lapack_int m,
   4321                            lapack_int n, lapack_int k, lapack_complex_double* a,
   4322                            lapack_int lda, const lapack_complex_double* tau );
   4323 
   4324 lapack_int LAPACKE_cunghr( int matrix_order, lapack_int n, lapack_int ilo,
   4325                            lapack_int ihi, lapack_complex_float* a,
   4326                            lapack_int lda, const lapack_complex_float* tau );
   4327 lapack_int LAPACKE_zunghr( int matrix_order, lapack_int n, lapack_int ilo,
   4328                            lapack_int ihi, lapack_complex_double* a,
   4329                            lapack_int lda, const lapack_complex_double* tau );
   4330 
   4331 lapack_int LAPACKE_cunglq( int matrix_order, lapack_int m, lapack_int n,
   4332                            lapack_int k, lapack_complex_float* a,
   4333                            lapack_int lda, const lapack_complex_float* tau );
   4334 lapack_int LAPACKE_zunglq( int matrix_order, lapack_int m, lapack_int n,
   4335                            lapack_int k, lapack_complex_double* a,
   4336                            lapack_int lda, const lapack_complex_double* tau );
   4337 
   4338 lapack_int LAPACKE_cungql( int matrix_order, lapack_int m, lapack_int n,
   4339                            lapack_int k, lapack_complex_float* a,
   4340                            lapack_int lda, const lapack_complex_float* tau );
   4341 lapack_int LAPACKE_zungql( int matrix_order, lapack_int m, lapack_int n,
   4342                            lapack_int k, lapack_complex_double* a,
   4343                            lapack_int lda, const lapack_complex_double* tau );
   4344 
   4345 lapack_int LAPACKE_cungqr( int matrix_order, lapack_int m, lapack_int n,
   4346                            lapack_int k, lapack_complex_float* a,
   4347                            lapack_int lda, const lapack_complex_float* tau );
   4348 lapack_int LAPACKE_zungqr( int matrix_order, lapack_int m, lapack_int n,
   4349                            lapack_int k, lapack_complex_double* a,
   4350                            lapack_int lda, const lapack_complex_double* tau );
   4351 
   4352 lapack_int LAPACKE_cungrq( int matrix_order, lapack_int m, lapack_int n,
   4353                            lapack_int k, lapack_complex_float* a,
   4354                            lapack_int lda, const lapack_complex_float* tau );
   4355 lapack_int LAPACKE_zungrq( int matrix_order, lapack_int m, lapack_int n,
   4356                            lapack_int k, lapack_complex_double* a,
   4357                            lapack_int lda, const lapack_complex_double* tau );
   4358 
   4359 lapack_int LAPACKE_cungtr( int matrix_order, char uplo, lapack_int n,
   4360                            lapack_complex_float* a, lapack_int lda,
   4361                            const lapack_complex_float* tau );
   4362 lapack_int LAPACKE_zungtr( int matrix_order, char uplo, lapack_int n,
   4363                            lapack_complex_double* a, lapack_int lda,
   4364                            const lapack_complex_double* tau );
   4365 
   4366 lapack_int LAPACKE_cunmbr( int matrix_order, char vect, char side, char trans,
   4367                            lapack_int m, lapack_int n, lapack_int k,
   4368                            const lapack_complex_float* a, lapack_int lda,
   4369                            const lapack_complex_float* tau,
   4370                            lapack_complex_float* c, lapack_int ldc );
   4371 lapack_int LAPACKE_zunmbr( int matrix_order, char vect, char side, char trans,
   4372                            lapack_int m, lapack_int n, lapack_int k,
   4373                            const lapack_complex_double* a, lapack_int lda,
   4374                            const lapack_complex_double* tau,
   4375                            lapack_complex_double* c, lapack_int ldc );
   4376 
   4377 lapack_int LAPACKE_cunmhr( int matrix_order, char side, char trans,
   4378                            lapack_int m, lapack_int n, lapack_int ilo,
   4379                            lapack_int ihi, const lapack_complex_float* a,
   4380                            lapack_int lda, const lapack_complex_float* tau,
   4381                            lapack_complex_float* c, lapack_int ldc );
   4382 lapack_int LAPACKE_zunmhr( int matrix_order, char side, char trans,
   4383                            lapack_int m, lapack_int n, lapack_int ilo,
   4384                            lapack_int ihi, const lapack_complex_double* a,
   4385                            lapack_int lda, const lapack_complex_double* tau,
   4386                            lapack_complex_double* c, lapack_int ldc );
   4387 
   4388 lapack_int LAPACKE_cunmlq( int matrix_order, char side, char trans,
   4389                            lapack_int m, lapack_int n, lapack_int k,
   4390                            const lapack_complex_float* a, lapack_int lda,
   4391                            const lapack_complex_float* tau,
   4392                            lapack_complex_float* c, lapack_int ldc );
   4393 lapack_int LAPACKE_zunmlq( int matrix_order, char side, char trans,
   4394                            lapack_int m, lapack_int n, lapack_int k,
   4395                            const lapack_complex_double* a, lapack_int lda,
   4396                            const lapack_complex_double* tau,
   4397                            lapack_complex_double* c, lapack_int ldc );
   4398 
   4399 lapack_int LAPACKE_cunmql( int matrix_order, char side, char trans,
   4400                            lapack_int m, lapack_int n, lapack_int k,
   4401                            const lapack_complex_float* a, lapack_int lda,
   4402                            const lapack_complex_float* tau,
   4403                            lapack_complex_float* c, lapack_int ldc );
   4404 lapack_int LAPACKE_zunmql( int matrix_order, char side, char trans,
   4405                            lapack_int m, lapack_int n, lapack_int k,
   4406                            const lapack_complex_double* a, lapack_int lda,
   4407                            const lapack_complex_double* tau,
   4408                            lapack_complex_double* c, lapack_int ldc );
   4409 
   4410 lapack_int LAPACKE_cunmqr( int matrix_order, char side, char trans,
   4411                            lapack_int m, lapack_int n, lapack_int k,
   4412                            const lapack_complex_float* a, lapack_int lda,
   4413                            const lapack_complex_float* tau,
   4414                            lapack_complex_float* c, lapack_int ldc );
   4415 lapack_int LAPACKE_zunmqr( int matrix_order, char side, char trans,
   4416                            lapack_int m, lapack_int n, lapack_int k,
   4417                            const lapack_complex_double* a, lapack_int lda,
   4418                            const lapack_complex_double* tau,
   4419                            lapack_complex_double* c, lapack_int ldc );
   4420 
   4421 lapack_int LAPACKE_cunmrq( int matrix_order, char side, char trans,
   4422                            lapack_int m, lapack_int n, lapack_int k,
   4423                            const lapack_complex_float* a, lapack_int lda,
   4424                            const lapack_complex_float* tau,
   4425                            lapack_complex_float* c, lapack_int ldc );
   4426 lapack_int LAPACKE_zunmrq( int matrix_order, char side, char trans,
   4427                            lapack_int m, lapack_int n, lapack_int k,
   4428                            const lapack_complex_double* a, lapack_int lda,
   4429                            const lapack_complex_double* tau,
   4430                            lapack_complex_double* c, lapack_int ldc );
   4431 
   4432 lapack_int LAPACKE_cunmrz( int matrix_order, char side, char trans,
   4433                            lapack_int m, lapack_int n, lapack_int k,
   4434                            lapack_int l, const lapack_complex_float* a,
   4435                            lapack_int lda, const lapack_complex_float* tau,
   4436                            lapack_complex_float* c, lapack_int ldc );
   4437 lapack_int LAPACKE_zunmrz( int matrix_order, char side, char trans,
   4438                            lapack_int m, lapack_int n, lapack_int k,
   4439                            lapack_int l, const lapack_complex_double* a,
   4440                            lapack_int lda, const lapack_complex_double* tau,
   4441                            lapack_complex_double* c, lapack_int ldc );
   4442 
   4443 lapack_int LAPACKE_cunmtr( int matrix_order, char side, char uplo, char trans,
   4444                            lapack_int m, lapack_int n,
   4445                            const lapack_complex_float* a, lapack_int lda,
   4446                            const lapack_complex_float* tau,
   4447                            lapack_complex_float* c, lapack_int ldc );
   4448 lapack_int LAPACKE_zunmtr( int matrix_order, char side, char uplo, char trans,
   4449                            lapack_int m, lapack_int n,
   4450                            const lapack_complex_double* a, lapack_int lda,
   4451                            const lapack_complex_double* tau,
   4452                            lapack_complex_double* c, lapack_int ldc );
   4453 
   4454 lapack_int LAPACKE_cupgtr( int matrix_order, char uplo, lapack_int n,
   4455                            const lapack_complex_float* ap,
   4456                            const lapack_complex_float* tau,
   4457                            lapack_complex_float* q, lapack_int ldq );
   4458 lapack_int LAPACKE_zupgtr( int matrix_order, char uplo, lapack_int n,
   4459                            const lapack_complex_double* ap,
   4460                            const lapack_complex_double* tau,
   4461                            lapack_complex_double* q, lapack_int ldq );
   4462 
   4463 lapack_int LAPACKE_cupmtr( int matrix_order, char side, char uplo, char trans,
   4464                            lapack_int m, lapack_int n,
   4465                            const lapack_complex_float* ap,
   4466                            const lapack_complex_float* tau,
   4467                            lapack_complex_float* c, lapack_int ldc );
   4468 lapack_int LAPACKE_zupmtr( int matrix_order, char side, char uplo, char trans,
   4469                            lapack_int m, lapack_int n,
   4470                            const lapack_complex_double* ap,
   4471                            const lapack_complex_double* tau,
   4472                            lapack_complex_double* c, lapack_int ldc );
   4473 
   4474 lapack_int LAPACKE_sbdsdc_work( int matrix_order, char uplo, char compq,
   4475                                 lapack_int n, float* d, float* e, float* u,
   4476                                 lapack_int ldu, float* vt, lapack_int ldvt,
   4477                                 float* q, lapack_int* iq, float* work,
   4478                                 lapack_int* iwork );
   4479 lapack_int LAPACKE_dbdsdc_work( int matrix_order, char uplo, char compq,
   4480                                 lapack_int n, double* d, double* e, double* u,
   4481                                 lapack_int ldu, double* vt, lapack_int ldvt,
   4482                                 double* q, lapack_int* iq, double* work,
   4483                                 lapack_int* iwork );
   4484 
   4485 lapack_int LAPACKE_sbdsqr_work( int matrix_order, char uplo, lapack_int n,
   4486                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
   4487                                 float* d, float* e, float* vt, lapack_int ldvt,
   4488                                 float* u, lapack_int ldu, float* c,
   4489                                 lapack_int ldc, float* work );
   4490 lapack_int LAPACKE_dbdsqr_work( int matrix_order, char uplo, lapack_int n,
   4491                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
   4492                                 double* d, double* e, double* vt,
   4493                                 lapack_int ldvt, double* u, lapack_int ldu,
   4494                                 double* c, lapack_int ldc, double* work );
   4495 lapack_int LAPACKE_cbdsqr_work( int matrix_order, char uplo, lapack_int n,
   4496                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
   4497                                 float* d, float* e, lapack_complex_float* vt,
   4498                                 lapack_int ldvt, lapack_complex_float* u,
   4499                                 lapack_int ldu, lapack_complex_float* c,
   4500                                 lapack_int ldc, float* work );
   4501 lapack_int LAPACKE_zbdsqr_work( int matrix_order, char uplo, lapack_int n,
   4502                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
   4503                                 double* d, double* e, lapack_complex_double* vt,
   4504                                 lapack_int ldvt, lapack_complex_double* u,
   4505                                 lapack_int ldu, lapack_complex_double* c,
   4506                                 lapack_int ldc, double* work );
   4507 
   4508 lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
   4509                                 const float* d, float* sep );
   4510 lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
   4511                                 const double* d, double* sep );
   4512 
   4513 lapack_int LAPACKE_sgbbrd_work( int matrix_order, char vect, lapack_int m,
   4514                                 lapack_int n, lapack_int ncc, lapack_int kl,
   4515                                 lapack_int ku, float* ab, lapack_int ldab,
   4516                                 float* d, float* e, float* q, lapack_int ldq,
   4517                                 float* pt, lapack_int ldpt, float* c,
   4518                                 lapack_int ldc, float* work );
   4519 lapack_int LAPACKE_dgbbrd_work( int matrix_order, char vect, lapack_int m,
   4520                                 lapack_int n, lapack_int ncc, lapack_int kl,
   4521                                 lapack_int ku, double* ab, lapack_int ldab,
   4522                                 double* d, double* e, double* q, lapack_int ldq,
   4523                                 double* pt, lapack_int ldpt, double* c,
   4524                                 lapack_int ldc, double* work );
   4525 lapack_int LAPACKE_cgbbrd_work( int matrix_order, char vect, lapack_int m,
   4526                                 lapack_int n, lapack_int ncc, lapack_int kl,
   4527                                 lapack_int ku, lapack_complex_float* ab,
   4528                                 lapack_int ldab, float* d, float* e,
   4529                                 lapack_complex_float* q, lapack_int ldq,
   4530                                 lapack_complex_float* pt, lapack_int ldpt,
   4531                                 lapack_complex_float* c, lapack_int ldc,
   4532                                 lapack_complex_float* work, float* rwork );
   4533 lapack_int LAPACKE_zgbbrd_work( int matrix_order, char vect, lapack_int m,
   4534                                 lapack_int n, lapack_int ncc, lapack_int kl,
   4535                                 lapack_int ku, lapack_complex_double* ab,
   4536                                 lapack_int ldab, double* d, double* e,
   4537                                 lapack_complex_double* q, lapack_int ldq,
   4538                                 lapack_complex_double* pt, lapack_int ldpt,
   4539                                 lapack_complex_double* c, lapack_int ldc,
   4540                                 lapack_complex_double* work, double* rwork );
   4541 
   4542 lapack_int LAPACKE_sgbcon_work( int matrix_order, char norm, lapack_int n,
   4543                                 lapack_int kl, lapack_int ku, const float* ab,
   4544                                 lapack_int ldab, const lapack_int* ipiv,
   4545                                 float anorm, float* rcond, float* work,
   4546                                 lapack_int* iwork );
   4547 lapack_int LAPACKE_dgbcon_work( int matrix_order, char norm, lapack_int n,
   4548                                 lapack_int kl, lapack_int ku, const double* ab,
   4549                                 lapack_int ldab, const lapack_int* ipiv,
   4550                                 double anorm, double* rcond, double* work,
   4551                                 lapack_int* iwork );
   4552 lapack_int LAPACKE_cgbcon_work( int matrix_order, char norm, lapack_int n,
   4553                                 lapack_int kl, lapack_int ku,
   4554                                 const lapack_complex_float* ab, lapack_int ldab,
   4555                                 const lapack_int* ipiv, float anorm,
   4556                                 float* rcond, lapack_complex_float* work,
   4557                                 float* rwork );
   4558 lapack_int LAPACKE_zgbcon_work( int matrix_order, char norm, lapack_int n,
   4559                                 lapack_int kl, lapack_int ku,
   4560                                 const lapack_complex_double* ab,
   4561                                 lapack_int ldab, const lapack_int* ipiv,
   4562                                 double anorm, double* rcond,
   4563                                 lapack_complex_double* work, double* rwork );
   4564 
   4565 lapack_int LAPACKE_sgbequ_work( int matrix_order, lapack_int m, lapack_int n,
   4566                                 lapack_int kl, lapack_int ku, const float* ab,
   4567                                 lapack_int ldab, float* r, float* c,
   4568                                 float* rowcnd, float* colcnd, float* amax );
   4569 lapack_int LAPACKE_dgbequ_work( int matrix_order, lapack_int m, lapack_int n,
   4570                                 lapack_int kl, lapack_int ku, const double* ab,
   4571                                 lapack_int ldab, double* r, double* c,
   4572                                 double* rowcnd, double* colcnd, double* amax );
   4573 lapack_int LAPACKE_cgbequ_work( int matrix_order, lapack_int m, lapack_int n,
   4574                                 lapack_int kl, lapack_int ku,
   4575                                 const lapack_complex_float* ab, lapack_int ldab,
   4576                                 float* r, float* c, float* rowcnd,
   4577                                 float* colcnd, float* amax );
   4578 lapack_int LAPACKE_zgbequ_work( int matrix_order, lapack_int m, lapack_int n,
   4579                                 lapack_int kl, lapack_int ku,
   4580                                 const lapack_complex_double* ab,
   4581                                 lapack_int ldab, double* r, double* c,
   4582                                 double* rowcnd, double* colcnd, double* amax );
   4583 
   4584 lapack_int LAPACKE_sgbequb_work( int matrix_order, lapack_int m, lapack_int n,
   4585                                  lapack_int kl, lapack_int ku, const float* ab,
   4586                                  lapack_int ldab, float* r, float* c,
   4587                                  float* rowcnd, float* colcnd, float* amax );
   4588 lapack_int LAPACKE_dgbequb_work( int matrix_order, lapack_int m, lapack_int n,
   4589                                  lapack_int kl, lapack_int ku, const double* ab,
   4590                                  lapack_int ldab, double* r, double* c,
   4591                                  double* rowcnd, double* colcnd, double* amax );
   4592 lapack_int LAPACKE_cgbequb_work( int matrix_order, lapack_int m, lapack_int n,
   4593                                  lapack_int kl, lapack_int ku,
   4594                                  const lapack_complex_float* ab,
   4595                                  lapack_int ldab, float* r, float* c,
   4596                                  float* rowcnd, float* colcnd, float* amax );
   4597 lapack_int LAPACKE_zgbequb_work( int matrix_order, lapack_int m, lapack_int n,
   4598                                  lapack_int kl, lapack_int ku,
   4599                                  const lapack_complex_double* ab,
   4600                                  lapack_int ldab, double* r, double* c,
   4601                                  double* rowcnd, double* colcnd, double* amax );
   4602 
   4603 lapack_int LAPACKE_sgbrfs_work( int matrix_order, char trans, lapack_int n,
   4604                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4605                                 const float* ab, lapack_int ldab,
   4606                                 const float* afb, lapack_int ldafb,
   4607                                 const lapack_int* ipiv, const float* b,
   4608                                 lapack_int ldb, float* x, lapack_int ldx,
   4609                                 float* ferr, float* berr, float* work,
   4610                                 lapack_int* iwork );
   4611 lapack_int LAPACKE_dgbrfs_work( int matrix_order, char trans, lapack_int n,
   4612                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4613                                 const double* ab, lapack_int ldab,
   4614                                 const double* afb, lapack_int ldafb,
   4615                                 const lapack_int* ipiv, const double* b,
   4616                                 lapack_int ldb, double* x, lapack_int ldx,
   4617                                 double* ferr, double* berr, double* work,
   4618                                 lapack_int* iwork );
   4619 lapack_int LAPACKE_cgbrfs_work( int matrix_order, char trans, lapack_int n,
   4620                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4621                                 const lapack_complex_float* ab, lapack_int ldab,
   4622                                 const lapack_complex_float* afb,
   4623                                 lapack_int ldafb, const lapack_int* ipiv,
   4624                                 const lapack_complex_float* b, lapack_int ldb,
   4625                                 lapack_complex_float* x, lapack_int ldx,
   4626                                 float* ferr, float* berr,
   4627                                 lapack_complex_float* work, float* rwork );
   4628 lapack_int LAPACKE_zgbrfs_work( int matrix_order, char trans, lapack_int n,
   4629                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4630                                 const lapack_complex_double* ab,
   4631                                 lapack_int ldab,
   4632                                 const lapack_complex_double* afb,
   4633                                 lapack_int ldafb, const lapack_int* ipiv,
   4634                                 const lapack_complex_double* b, lapack_int ldb,
   4635                                 lapack_complex_double* x, lapack_int ldx,
   4636                                 double* ferr, double* berr,
   4637                                 lapack_complex_double* work, double* rwork );
   4638 
   4639 lapack_int LAPACKE_sgbrfsx_work( int matrix_order, char trans, char equed,
   4640                                  lapack_int n, lapack_int kl, lapack_int ku,
   4641                                  lapack_int nrhs, const float* ab,
   4642                                  lapack_int ldab, const float* afb,
   4643                                  lapack_int ldafb, const lapack_int* ipiv,
   4644                                  const float* r, const float* c, const float* b,
   4645                                  lapack_int ldb, float* x, lapack_int ldx,
   4646                                  float* rcond, float* berr,
   4647                                  lapack_int n_err_bnds, float* err_bnds_norm,
   4648                                  float* err_bnds_comp, lapack_int nparams,
   4649                                  float* params, float* work,
   4650                                  lapack_int* iwork );
   4651 lapack_int LAPACKE_dgbrfsx_work( int matrix_order, char trans, char equed,
   4652                                  lapack_int n, lapack_int kl, lapack_int ku,
   4653                                  lapack_int nrhs, const double* ab,
   4654                                  lapack_int ldab, const double* afb,
   4655                                  lapack_int ldafb, const lapack_int* ipiv,
   4656                                  const double* r, const double* c,
   4657                                  const double* b, lapack_int ldb, double* x,
   4658                                  lapack_int ldx, double* rcond, double* berr,
   4659                                  lapack_int n_err_bnds, double* err_bnds_norm,
   4660                                  double* err_bnds_comp, lapack_int nparams,
   4661                                  double* params, double* work,
   4662                                  lapack_int* iwork );
   4663 lapack_int LAPACKE_cgbrfsx_work( int matrix_order, char trans, char equed,
   4664                                  lapack_int n, lapack_int kl, lapack_int ku,
   4665                                  lapack_int nrhs,
   4666                                  const lapack_complex_float* ab,
   4667                                  lapack_int ldab,
   4668                                  const lapack_complex_float* afb,
   4669                                  lapack_int ldafb, const lapack_int* ipiv,
   4670                                  const float* r, const float* c,
   4671                                  const lapack_complex_float* b, lapack_int ldb,
   4672                                  lapack_complex_float* x, lapack_int ldx,
   4673                                  float* rcond, float* berr,
   4674                                  lapack_int n_err_bnds, float* err_bnds_norm,
   4675                                  float* err_bnds_comp, lapack_int nparams,
   4676                                  float* params, lapack_complex_float* work,
   4677                                  float* rwork );
   4678 lapack_int LAPACKE_zgbrfsx_work( int matrix_order, char trans, char equed,
   4679                                  lapack_int n, lapack_int kl, lapack_int ku,
   4680                                  lapack_int nrhs,
   4681                                  const lapack_complex_double* ab,
   4682                                  lapack_int ldab,
   4683                                  const lapack_complex_double* afb,
   4684                                  lapack_int ldafb, const lapack_int* ipiv,
   4685                                  const double* r, const double* c,
   4686                                  const lapack_complex_double* b, lapack_int ldb,
   4687                                  lapack_complex_double* x, lapack_int ldx,
   4688                                  double* rcond, double* berr,
   4689                                  lapack_int n_err_bnds, double* err_bnds_norm,
   4690                                  double* err_bnds_comp, lapack_int nparams,
   4691                                  double* params, lapack_complex_double* work,
   4692                                  double* rwork );
   4693 
   4694 lapack_int LAPACKE_sgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
   4695                                lapack_int ku, lapack_int nrhs, float* ab,
   4696                                lapack_int ldab, lapack_int* ipiv, float* b,
   4697                                lapack_int ldb );
   4698 lapack_int LAPACKE_dgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
   4699                                lapack_int ku, lapack_int nrhs, double* ab,
   4700                                lapack_int ldab, lapack_int* ipiv, double* b,
   4701                                lapack_int ldb );
   4702 lapack_int LAPACKE_cgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
   4703                                lapack_int ku, lapack_int nrhs,
   4704                                lapack_complex_float* ab, lapack_int ldab,
   4705                                lapack_int* ipiv, lapack_complex_float* b,
   4706                                lapack_int ldb );
   4707 lapack_int LAPACKE_zgbsv_work( int matrix_order, lapack_int n, lapack_int kl,
   4708                                lapack_int ku, lapack_int nrhs,
   4709                                lapack_complex_double* ab, lapack_int ldab,
   4710                                lapack_int* ipiv, lapack_complex_double* b,
   4711                                lapack_int ldb );
   4712 
   4713 lapack_int LAPACKE_sgbsvx_work( int matrix_order, char fact, char trans,
   4714                                 lapack_int n, lapack_int kl, lapack_int ku,
   4715                                 lapack_int nrhs, float* ab, lapack_int ldab,
   4716                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
   4717                                 char* equed, float* r, float* c, float* b,
   4718                                 lapack_int ldb, float* x, lapack_int ldx,
   4719                                 float* rcond, float* ferr, float* berr,
   4720                                 float* work, lapack_int* iwork );
   4721 lapack_int LAPACKE_dgbsvx_work( int matrix_order, char fact, char trans,
   4722                                 lapack_int n, lapack_int kl, lapack_int ku,
   4723                                 lapack_int nrhs, double* ab, lapack_int ldab,
   4724                                 double* afb, lapack_int ldafb, lapack_int* ipiv,
   4725                                 char* equed, double* r, double* c, double* b,
   4726                                 lapack_int ldb, double* x, lapack_int ldx,
   4727                                 double* rcond, double* ferr, double* berr,
   4728                                 double* work, lapack_int* iwork );
   4729 lapack_int LAPACKE_cgbsvx_work( int matrix_order, char fact, char trans,
   4730                                 lapack_int n, lapack_int kl, lapack_int ku,
   4731                                 lapack_int nrhs, lapack_complex_float* ab,
   4732                                 lapack_int ldab, lapack_complex_float* afb,
   4733                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
   4734                                 float* r, float* c, lapack_complex_float* b,
   4735                                 lapack_int ldb, lapack_complex_float* x,
   4736                                 lapack_int ldx, float* rcond, float* ferr,
   4737                                 float* berr, lapack_complex_float* work,
   4738                                 float* rwork );
   4739 lapack_int LAPACKE_zgbsvx_work( int matrix_order, char fact, char trans,
   4740                                 lapack_int n, lapack_int kl, lapack_int ku,
   4741                                 lapack_int nrhs, lapack_complex_double* ab,
   4742                                 lapack_int ldab, lapack_complex_double* afb,
   4743                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
   4744                                 double* r, double* c, lapack_complex_double* b,
   4745                                 lapack_int ldb, lapack_complex_double* x,
   4746                                 lapack_int ldx, double* rcond, double* ferr,
   4747                                 double* berr, lapack_complex_double* work,
   4748                                 double* rwork );
   4749 
   4750 lapack_int LAPACKE_sgbsvxx_work( int matrix_order, char fact, char trans,
   4751                                  lapack_int n, lapack_int kl, lapack_int ku,
   4752                                  lapack_int nrhs, float* ab, lapack_int ldab,
   4753                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
   4754                                  char* equed, float* r, float* c, float* b,
   4755                                  lapack_int ldb, float* x, lapack_int ldx,
   4756                                  float* rcond, float* rpvgrw, float* berr,
   4757                                  lapack_int n_err_bnds, float* err_bnds_norm,
   4758                                  float* err_bnds_comp, lapack_int nparams,
   4759                                  float* params, float* work,
   4760                                  lapack_int* iwork );
   4761 lapack_int LAPACKE_dgbsvxx_work( int matrix_order, char fact, char trans,
   4762                                  lapack_int n, lapack_int kl, lapack_int ku,
   4763                                  lapack_int nrhs, double* ab, lapack_int ldab,
   4764                                  double* afb, lapack_int ldafb,
   4765                                  lapack_int* ipiv, char* equed, double* r,
   4766                                  double* c, double* b, lapack_int ldb,
   4767                                  double* x, lapack_int ldx, double* rcond,
   4768                                  double* rpvgrw, double* berr,
   4769                                  lapack_int n_err_bnds, double* err_bnds_norm,
   4770                                  double* err_bnds_comp, lapack_int nparams,
   4771                                  double* params, double* work,
   4772                                  lapack_int* iwork );
   4773 lapack_int LAPACKE_cgbsvxx_work( int matrix_order, char fact, char trans,
   4774                                  lapack_int n, lapack_int kl, lapack_int ku,
   4775                                  lapack_int nrhs, lapack_complex_float* ab,
   4776                                  lapack_int ldab, lapack_complex_float* afb,
   4777                                  lapack_int ldafb, lapack_int* ipiv,
   4778                                  char* equed, float* r, float* c,
   4779                                  lapack_complex_float* b, lapack_int ldb,
   4780                                  lapack_complex_float* x, lapack_int ldx,
   4781                                  float* rcond, float* rpvgrw, float* berr,
   4782                                  lapack_int n_err_bnds, float* err_bnds_norm,
   4783                                  float* err_bnds_comp, lapack_int nparams,
   4784                                  float* params, lapack_complex_float* work,
   4785                                  float* rwork );
   4786 lapack_int LAPACKE_zgbsvxx_work( int matrix_order, char fact, char trans,
   4787                                  lapack_int n, lapack_int kl, lapack_int ku,
   4788                                  lapack_int nrhs, lapack_complex_double* ab,
   4789                                  lapack_int ldab, lapack_complex_double* afb,
   4790                                  lapack_int ldafb, lapack_int* ipiv,
   4791                                  char* equed, double* r, double* c,
   4792                                  lapack_complex_double* b, lapack_int ldb,
   4793                                  lapack_complex_double* x, lapack_int ldx,
   4794                                  double* rcond, double* rpvgrw, double* berr,
   4795                                  lapack_int n_err_bnds, double* err_bnds_norm,
   4796                                  double* err_bnds_comp, lapack_int nparams,
   4797                                  double* params, lapack_complex_double* work,
   4798                                  double* rwork );
   4799 
   4800 lapack_int LAPACKE_sgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
   4801                                 lapack_int kl, lapack_int ku, float* ab,
   4802                                 lapack_int ldab, lapack_int* ipiv );
   4803 lapack_int LAPACKE_dgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
   4804                                 lapack_int kl, lapack_int ku, double* ab,
   4805                                 lapack_int ldab, lapack_int* ipiv );
   4806 lapack_int LAPACKE_cgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
   4807                                 lapack_int kl, lapack_int ku,
   4808                                 lapack_complex_float* ab, lapack_int ldab,
   4809                                 lapack_int* ipiv );
   4810 lapack_int LAPACKE_zgbtrf_work( int matrix_order, lapack_int m, lapack_int n,
   4811                                 lapack_int kl, lapack_int ku,
   4812                                 lapack_complex_double* ab, lapack_int ldab,
   4813                                 lapack_int* ipiv );
   4814 
   4815 lapack_int LAPACKE_sgbtrs_work( int matrix_order, char trans, lapack_int n,
   4816                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4817                                 const float* ab, lapack_int ldab,
   4818                                 const lapack_int* ipiv, float* b,
   4819                                 lapack_int ldb );
   4820 lapack_int LAPACKE_dgbtrs_work( int matrix_order, char trans, lapack_int n,
   4821                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4822                                 const double* ab, lapack_int ldab,
   4823                                 const lapack_int* ipiv, double* b,
   4824                                 lapack_int ldb );
   4825 lapack_int LAPACKE_cgbtrs_work( int matrix_order, char trans, lapack_int n,
   4826                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4827                                 const lapack_complex_float* ab, lapack_int ldab,
   4828                                 const lapack_int* ipiv, lapack_complex_float* b,
   4829                                 lapack_int ldb );
   4830 lapack_int LAPACKE_zgbtrs_work( int matrix_order, char trans, lapack_int n,
   4831                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
   4832                                 const lapack_complex_double* ab,
   4833                                 lapack_int ldab, const lapack_int* ipiv,
   4834                                 lapack_complex_double* b, lapack_int ldb );
   4835 
   4836 lapack_int LAPACKE_sgebak_work( int matrix_order, char job, char side,
   4837                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   4838                                 const float* scale, lapack_int m, float* v,
   4839                                 lapack_int ldv );
   4840 lapack_int LAPACKE_dgebak_work( int matrix_order, char job, char side,
   4841                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   4842                                 const double* scale, lapack_int m, double* v,
   4843                                 lapack_int ldv );
   4844 lapack_int LAPACKE_cgebak_work( int matrix_order, char job, char side,
   4845                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   4846                                 const float* scale, lapack_int m,
   4847                                 lapack_complex_float* v, lapack_int ldv );
   4848 lapack_int LAPACKE_zgebak_work( int matrix_order, char job, char side,
   4849                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   4850                                 const double* scale, lapack_int m,
   4851                                 lapack_complex_double* v, lapack_int ldv );
   4852 
   4853 lapack_int LAPACKE_sgebal_work( int matrix_order, char job, lapack_int n,
   4854                                 float* a, lapack_int lda, lapack_int* ilo,
   4855                                 lapack_int* ihi, float* scale );
   4856 lapack_int LAPACKE_dgebal_work( int matrix_order, char job, lapack_int n,
   4857                                 double* a, lapack_int lda, lapack_int* ilo,
   4858                                 lapack_int* ihi, double* scale );
   4859 lapack_int LAPACKE_cgebal_work( int matrix_order, char job, lapack_int n,
   4860                                 lapack_complex_float* a, lapack_int lda,
   4861                                 lapack_int* ilo, lapack_int* ihi,
   4862                                 float* scale );
   4863 lapack_int LAPACKE_zgebal_work( int matrix_order, char job, lapack_int n,
   4864                                 lapack_complex_double* a, lapack_int lda,
   4865                                 lapack_int* ilo, lapack_int* ihi,
   4866                                 double* scale );
   4867 
   4868 lapack_int LAPACKE_sgebrd_work( int matrix_order, lapack_int m, lapack_int n,
   4869                                 float* a, lapack_int lda, float* d, float* e,
   4870                                 float* tauq, float* taup, float* work,
   4871                                 lapack_int lwork );
   4872 lapack_int LAPACKE_dgebrd_work( int matrix_order, lapack_int m, lapack_int n,
   4873                                 double* a, lapack_int lda, double* d, double* e,
   4874                                 double* tauq, double* taup, double* work,
   4875                                 lapack_int lwork );
   4876 lapack_int LAPACKE_cgebrd_work( int matrix_order, lapack_int m, lapack_int n,
   4877                                 lapack_complex_float* a, lapack_int lda,
   4878                                 float* d, float* e, lapack_complex_float* tauq,
   4879                                 lapack_complex_float* taup,
   4880                                 lapack_complex_float* work, lapack_int lwork );
   4881 lapack_int LAPACKE_zgebrd_work( int matrix_order, lapack_int m, lapack_int n,
   4882                                 lapack_complex_double* a, lapack_int lda,
   4883                                 double* d, double* e,
   4884                                 lapack_complex_double* tauq,
   4885                                 lapack_complex_double* taup,
   4886                                 lapack_complex_double* work, lapack_int lwork );
   4887 
   4888 lapack_int LAPACKE_sgecon_work( int matrix_order, char norm, lapack_int n,
   4889                                 const float* a, lapack_int lda, float anorm,
   4890                                 float* rcond, float* work, lapack_int* iwork );
   4891 lapack_int LAPACKE_dgecon_work( int matrix_order, char norm, lapack_int n,
   4892                                 const double* a, lapack_int lda, double anorm,
   4893                                 double* rcond, double* work,
   4894                                 lapack_int* iwork );
   4895 lapack_int LAPACKE_cgecon_work( int matrix_order, char norm, lapack_int n,
   4896                                 const lapack_complex_float* a, lapack_int lda,
   4897                                 float anorm, float* rcond,
   4898                                 lapack_complex_float* work, float* rwork );
   4899 lapack_int LAPACKE_zgecon_work( int matrix_order, char norm, lapack_int n,
   4900                                 const lapack_complex_double* a, lapack_int lda,
   4901                                 double anorm, double* rcond,
   4902                                 lapack_complex_double* work, double* rwork );
   4903 
   4904 lapack_int LAPACKE_sgeequ_work( int matrix_order, lapack_int m, lapack_int n,
   4905                                 const float* a, lapack_int lda, float* r,
   4906                                 float* c, float* rowcnd, float* colcnd,
   4907                                 float* amax );
   4908 lapack_int LAPACKE_dgeequ_work( int matrix_order, lapack_int m, lapack_int n,
   4909                                 const double* a, lapack_int lda, double* r,
   4910                                 double* c, double* rowcnd, double* colcnd,
   4911                                 double* amax );
   4912 lapack_int LAPACKE_cgeequ_work( int matrix_order, lapack_int m, lapack_int n,
   4913                                 const lapack_complex_float* a, lapack_int lda,
   4914                                 float* r, float* c, float* rowcnd,
   4915                                 float* colcnd, float* amax );
   4916 lapack_int LAPACKE_zgeequ_work( int matrix_order, lapack_int m, lapack_int n,
   4917                                 const lapack_complex_double* a, lapack_int lda,
   4918                                 double* r, double* c, double* rowcnd,
   4919                                 double* colcnd, double* amax );
   4920 
   4921 lapack_int LAPACKE_sgeequb_work( int matrix_order, lapack_int m, lapack_int n,
   4922                                  const float* a, lapack_int lda, float* r,
   4923                                  float* c, float* rowcnd, float* colcnd,
   4924                                  float* amax );
   4925 lapack_int LAPACKE_dgeequb_work( int matrix_order, lapack_int m, lapack_int n,
   4926                                  const double* a, lapack_int lda, double* r,
   4927                                  double* c, double* rowcnd, double* colcnd,
   4928                                  double* amax );
   4929 lapack_int LAPACKE_cgeequb_work( int matrix_order, lapack_int m, lapack_int n,
   4930                                  const lapack_complex_float* a, lapack_int lda,
   4931                                  float* r, float* c, float* rowcnd,
   4932                                  float* colcnd, float* amax );
   4933 lapack_int LAPACKE_zgeequb_work( int matrix_order, lapack_int m, lapack_int n,
   4934                                  const lapack_complex_double* a, lapack_int lda,
   4935                                  double* r, double* c, double* rowcnd,
   4936                                  double* colcnd, double* amax );
   4937 
   4938 lapack_int LAPACKE_sgees_work( int matrix_order, char jobvs, char sort,
   4939                                LAPACK_S_SELECT2 select, lapack_int n, float* a,
   4940                                lapack_int lda, lapack_int* sdim, float* wr,
   4941                                float* wi, float* vs, lapack_int ldvs,
   4942                                float* work, lapack_int lwork,
   4943                                lapack_logical* bwork );
   4944 lapack_int LAPACKE_dgees_work( int matrix_order, char jobvs, char sort,
   4945                                LAPACK_D_SELECT2 select, lapack_int n, double* a,
   4946                                lapack_int lda, lapack_int* sdim, double* wr,
   4947                                double* wi, double* vs, lapack_int ldvs,
   4948                                double* work, lapack_int lwork,
   4949                                lapack_logical* bwork );
   4950 lapack_int LAPACKE_cgees_work( int matrix_order, char jobvs, char sort,
   4951                                LAPACK_C_SELECT1 select, lapack_int n,
   4952                                lapack_complex_float* a, lapack_int lda,
   4953                                lapack_int* sdim, lapack_complex_float* w,
   4954                                lapack_complex_float* vs, lapack_int ldvs,
   4955                                lapack_complex_float* work, lapack_int lwork,
   4956                                float* rwork, lapack_logical* bwork );
   4957 lapack_int LAPACKE_zgees_work( int matrix_order, char jobvs, char sort,
   4958                                LAPACK_Z_SELECT1 select, lapack_int n,
   4959                                lapack_complex_double* a, lapack_int lda,
   4960                                lapack_int* sdim, lapack_complex_double* w,
   4961                                lapack_complex_double* vs, lapack_int ldvs,
   4962                                lapack_complex_double* work, lapack_int lwork,
   4963                                double* rwork, lapack_logical* bwork );
   4964 
   4965 lapack_int LAPACKE_sgeesx_work( int matrix_order, char jobvs, char sort,
   4966                                 LAPACK_S_SELECT2 select, char sense,
   4967                                 lapack_int n, float* a, lapack_int lda,
   4968                                 lapack_int* sdim, float* wr, float* wi,
   4969                                 float* vs, lapack_int ldvs, float* rconde,
   4970                                 float* rcondv, float* work, lapack_int lwork,
   4971                                 lapack_int* iwork, lapack_int liwork,
   4972                                 lapack_logical* bwork );
   4973 lapack_int LAPACKE_dgeesx_work( int matrix_order, char jobvs, char sort,
   4974                                 LAPACK_D_SELECT2 select, char sense,
   4975                                 lapack_int n, double* a, lapack_int lda,
   4976                                 lapack_int* sdim, double* wr, double* wi,
   4977                                 double* vs, lapack_int ldvs, double* rconde,
   4978                                 double* rcondv, double* work, lapack_int lwork,
   4979                                 lapack_int* iwork, lapack_int liwork,
   4980                                 lapack_logical* bwork );
   4981 lapack_int LAPACKE_cgeesx_work( int matrix_order, char jobvs, char sort,
   4982                                 LAPACK_C_SELECT1 select, char sense,
   4983                                 lapack_int n, lapack_complex_float* a,
   4984                                 lapack_int lda, lapack_int* sdim,
   4985                                 lapack_complex_float* w,
   4986                                 lapack_complex_float* vs, lapack_int ldvs,
   4987                                 float* rconde, float* rcondv,
   4988                                 lapack_complex_float* work, lapack_int lwork,
   4989                                 float* rwork, lapack_logical* bwork );
   4990 lapack_int LAPACKE_zgeesx_work( int matrix_order, char jobvs, char sort,
   4991                                 LAPACK_Z_SELECT1 select, char sense,
   4992                                 lapack_int n, lapack_complex_double* a,
   4993                                 lapack_int lda, lapack_int* sdim,
   4994                                 lapack_complex_double* w,
   4995                                 lapack_complex_double* vs, lapack_int ldvs,
   4996                                 double* rconde, double* rcondv,
   4997                                 lapack_complex_double* work, lapack_int lwork,
   4998                                 double* rwork, lapack_logical* bwork );
   4999 
   5000 lapack_int LAPACKE_sgeev_work( int matrix_order, char jobvl, char jobvr,
   5001                                lapack_int n, float* a, lapack_int lda,
   5002                                float* wr, float* wi, float* vl, lapack_int ldvl,
   5003                                float* vr, lapack_int ldvr, float* work,
   5004                                lapack_int lwork );
   5005 lapack_int LAPACKE_dgeev_work( int matrix_order, char jobvl, char jobvr,
   5006                                lapack_int n, double* a, lapack_int lda,
   5007                                double* wr, double* wi, double* vl,
   5008                                lapack_int ldvl, double* vr, lapack_int ldvr,
   5009                                double* work, lapack_int lwork );
   5010 lapack_int LAPACKE_cgeev_work( int matrix_order, char jobvl, char jobvr,
   5011                                lapack_int n, lapack_complex_float* a,
   5012                                lapack_int lda, lapack_complex_float* w,
   5013                                lapack_complex_float* vl, lapack_int ldvl,
   5014                                lapack_complex_float* vr, lapack_int ldvr,
   5015                                lapack_complex_float* work, lapack_int lwork,
   5016                                float* rwork );
   5017 lapack_int LAPACKE_zgeev_work( int matrix_order, char jobvl, char jobvr,
   5018                                lapack_int n, lapack_complex_double* a,
   5019                                lapack_int lda, lapack_complex_double* w,
   5020                                lapack_complex_double* vl, lapack_int ldvl,
   5021                                lapack_complex_double* vr, lapack_int ldvr,
   5022                                lapack_complex_double* work, lapack_int lwork,
   5023                                double* rwork );
   5024 
   5025 lapack_int LAPACKE_sgeevx_work( int matrix_order, char balanc, char jobvl,
   5026                                 char jobvr, char sense, lapack_int n, float* a,
   5027                                 lapack_int lda, float* wr, float* wi, float* vl,
   5028                                 lapack_int ldvl, float* vr, lapack_int ldvr,
   5029                                 lapack_int* ilo, lapack_int* ihi, float* scale,
   5030                                 float* abnrm, float* rconde, float* rcondv,
   5031                                 float* work, lapack_int lwork,
   5032                                 lapack_int* iwork );
   5033 lapack_int LAPACKE_dgeevx_work( int matrix_order, char balanc, char jobvl,
   5034                                 char jobvr, char sense, lapack_int n, double* a,
   5035                                 lapack_int lda, double* wr, double* wi,
   5036                                 double* vl, lapack_int ldvl, double* vr,
   5037                                 lapack_int ldvr, lapack_int* ilo,
   5038                                 lapack_int* ihi, double* scale, double* abnrm,
   5039                                 double* rconde, double* rcondv, double* work,
   5040                                 lapack_int lwork, lapack_int* iwork );
   5041 lapack_int LAPACKE_cgeevx_work( int matrix_order, char balanc, char jobvl,
   5042                                 char jobvr, char sense, lapack_int n,
   5043                                 lapack_complex_float* a, lapack_int lda,
   5044                                 lapack_complex_float* w,
   5045                                 lapack_complex_float* vl, lapack_int ldvl,
   5046                                 lapack_complex_float* vr, lapack_int ldvr,
   5047                                 lapack_int* ilo, lapack_int* ihi, float* scale,
   5048                                 float* abnrm, float* rconde, float* rcondv,
   5049                                 lapack_complex_float* work, lapack_int lwork,
   5050                                 float* rwork );
   5051 lapack_int LAPACKE_zgeevx_work( int matrix_order, char balanc, char jobvl,
   5052                                 char jobvr, char sense, lapack_int n,
   5053                                 lapack_complex_double* a, lapack_int lda,
   5054                                 lapack_complex_double* w,
   5055                                 lapack_complex_double* vl, lapack_int ldvl,
   5056                                 lapack_complex_double* vr, lapack_int ldvr,
   5057                                 lapack_int* ilo, lapack_int* ihi, double* scale,
   5058                                 double* abnrm, double* rconde, double* rcondv,
   5059                                 lapack_complex_double* work, lapack_int lwork,
   5060                                 double* rwork );
   5061 
   5062 lapack_int LAPACKE_sgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
   5063                                 lapack_int ihi, float* a, lapack_int lda,
   5064                                 float* tau, float* work, lapack_int lwork );
   5065 lapack_int LAPACKE_dgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
   5066                                 lapack_int ihi, double* a, lapack_int lda,
   5067                                 double* tau, double* work, lapack_int lwork );
   5068 lapack_int LAPACKE_cgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
   5069                                 lapack_int ihi, lapack_complex_float* a,
   5070                                 lapack_int lda, lapack_complex_float* tau,
   5071                                 lapack_complex_float* work, lapack_int lwork );
   5072 lapack_int LAPACKE_zgehrd_work( int matrix_order, lapack_int n, lapack_int ilo,
   5073                                 lapack_int ihi, lapack_complex_double* a,
   5074                                 lapack_int lda, lapack_complex_double* tau,
   5075                                 lapack_complex_double* work, lapack_int lwork );
   5076 
   5077 lapack_int LAPACKE_sgejsv_work( int matrix_order, char joba, char jobu,
   5078                                 char jobv, char jobr, char jobt, char jobp,
   5079                                 lapack_int m, lapack_int n, float* a,
   5080                                 lapack_int lda, float* sva, float* u,
   5081                                 lapack_int ldu, float* v, lapack_int ldv,
   5082                                 float* work, lapack_int lwork,
   5083                                 lapack_int* iwork );
   5084 lapack_int LAPACKE_dgejsv_work( int matrix_order, char joba, char jobu,
   5085                                 char jobv, char jobr, char jobt, char jobp,
   5086                                 lapack_int m, lapack_int n, double* a,
   5087                                 lapack_int lda, double* sva, double* u,
   5088                                 lapack_int ldu, double* v, lapack_int ldv,
   5089                                 double* work, lapack_int lwork,
   5090                                 lapack_int* iwork );
   5091 
   5092 lapack_int LAPACKE_sgelq2_work( int matrix_order, lapack_int m, lapack_int n,
   5093                                 float* a, lapack_int lda, float* tau,
   5094                                 float* work );
   5095 lapack_int LAPACKE_dgelq2_work( int matrix_order, lapack_int m, lapack_int n,
   5096                                 double* a, lapack_int lda, double* tau,
   5097                                 double* work );
   5098 lapack_int LAPACKE_cgelq2_work( int matrix_order, lapack_int m, lapack_int n,
   5099                                 lapack_complex_float* a, lapack_int lda,
   5100                                 lapack_complex_float* tau,
   5101                                 lapack_complex_float* work );
   5102 lapack_int LAPACKE_zgelq2_work( int matrix_order, lapack_int m, lapack_int n,
   5103                                 lapack_complex_double* a, lapack_int lda,
   5104                                 lapack_complex_double* tau,
   5105                                 lapack_complex_double* work );
   5106 
   5107 lapack_int LAPACKE_sgelqf_work( int matrix_order, lapack_int m, lapack_int n,
   5108                                 float* a, lapack_int lda, float* tau,
   5109                                 float* work, lapack_int lwork );
   5110 lapack_int LAPACKE_dgelqf_work( int matrix_order, lapack_int m, lapack_int n,
   5111                                 double* a, lapack_int lda, double* tau,
   5112                                 double* work, lapack_int lwork );
   5113 lapack_int LAPACKE_cgelqf_work( int matrix_order, lapack_int m, lapack_int n,
   5114                                 lapack_complex_float* a, lapack_int lda,
   5115                                 lapack_complex_float* tau,
   5116                                 lapack_complex_float* work, lapack_int lwork );
   5117 lapack_int LAPACKE_zgelqf_work( int matrix_order, lapack_int m, lapack_int n,
   5118                                 lapack_complex_double* a, lapack_int lda,
   5119                                 lapack_complex_double* tau,
   5120                                 lapack_complex_double* work, lapack_int lwork );
   5121 
   5122 lapack_int LAPACKE_sgels_work( int matrix_order, char trans, lapack_int m,
   5123                                lapack_int n, lapack_int nrhs, float* a,
   5124                                lapack_int lda, float* b, lapack_int ldb,
   5125                                float* work, lapack_int lwork );
   5126 lapack_int LAPACKE_dgels_work( int matrix_order, char trans, lapack_int m,
   5127                                lapack_int n, lapack_int nrhs, double* a,
   5128                                lapack_int lda, double* b, lapack_int ldb,
   5129                                double* work, lapack_int lwork );
   5130 lapack_int LAPACKE_cgels_work( int matrix_order, char trans, lapack_int m,
   5131                                lapack_int n, lapack_int nrhs,
   5132                                lapack_complex_float* a, lapack_int lda,
   5133                                lapack_complex_float* b, lapack_int ldb,
   5134                                lapack_complex_float* work, lapack_int lwork );
   5135 lapack_int LAPACKE_zgels_work( int matrix_order, char trans, lapack_int m,
   5136                                lapack_int n, lapack_int nrhs,
   5137                                lapack_complex_double* a, lapack_int lda,
   5138                                lapack_complex_double* b, lapack_int ldb,
   5139                                lapack_complex_double* work, lapack_int lwork );
   5140 
   5141 lapack_int LAPACKE_sgelsd_work( int matrix_order, lapack_int m, lapack_int n,
   5142                                 lapack_int nrhs, float* a, lapack_int lda,
   5143                                 float* b, lapack_int ldb, float* s, float rcond,
   5144                                 lapack_int* rank, float* work, lapack_int lwork,
   5145                                 lapack_int* iwork );
   5146 lapack_int LAPACKE_dgelsd_work( int matrix_order, lapack_int m, lapack_int n,
   5147                                 lapack_int nrhs, double* a, lapack_int lda,
   5148                                 double* b, lapack_int ldb, double* s,
   5149                                 double rcond, lapack_int* rank, double* work,
   5150                                 lapack_int lwork, lapack_int* iwork );
   5151 lapack_int LAPACKE_cgelsd_work( int matrix_order, lapack_int m, lapack_int n,
   5152                                 lapack_int nrhs, lapack_complex_float* a,
   5153                                 lapack_int lda, lapack_complex_float* b,
   5154                                 lapack_int ldb, float* s, float rcond,
   5155                                 lapack_int* rank, lapack_complex_float* work,
   5156                                 lapack_int lwork, float* rwork,
   5157                                 lapack_int* iwork );
   5158 lapack_int LAPACKE_zgelsd_work( int matrix_order, lapack_int m, lapack_int n,
   5159                                 lapack_int nrhs, lapack_complex_double* a,
   5160                                 lapack_int lda, lapack_complex_double* b,
   5161                                 lapack_int ldb, double* s, double rcond,
   5162                                 lapack_int* rank, lapack_complex_double* work,
   5163                                 lapack_int lwork, double* rwork,
   5164                                 lapack_int* iwork );
   5165 
   5166 lapack_int LAPACKE_sgelss_work( int matrix_order, lapack_int m, lapack_int n,
   5167                                 lapack_int nrhs, float* a, lapack_int lda,
   5168                                 float* b, lapack_int ldb, float* s, float rcond,
   5169                                 lapack_int* rank, float* work,
   5170                                 lapack_int lwork );
   5171 lapack_int LAPACKE_dgelss_work( int matrix_order, lapack_int m, lapack_int n,
   5172                                 lapack_int nrhs, double* a, lapack_int lda,
   5173                                 double* b, lapack_int ldb, double* s,
   5174                                 double rcond, lapack_int* rank, double* work,
   5175                                 lapack_int lwork );
   5176 lapack_int LAPACKE_cgelss_work( int matrix_order, lapack_int m, lapack_int n,
   5177                                 lapack_int nrhs, lapack_complex_float* a,
   5178                                 lapack_int lda, lapack_complex_float* b,
   5179                                 lapack_int ldb, float* s, float rcond,
   5180                                 lapack_int* rank, lapack_complex_float* work,
   5181                                 lapack_int lwork, float* rwork );
   5182 lapack_int LAPACKE_zgelss_work( int matrix_order, lapack_int m, lapack_int n,
   5183                                 lapack_int nrhs, lapack_complex_double* a,
   5184                                 lapack_int lda, lapack_complex_double* b,
   5185                                 lapack_int ldb, double* s, double rcond,
   5186                                 lapack_int* rank, lapack_complex_double* work,
   5187                                 lapack_int lwork, double* rwork );
   5188 
   5189 lapack_int LAPACKE_sgelsy_work( int matrix_order, lapack_int m, lapack_int n,
   5190                                 lapack_int nrhs, float* a, lapack_int lda,
   5191                                 float* b, lapack_int ldb, lapack_int* jpvt,
   5192                                 float rcond, lapack_int* rank, float* work,
   5193                                 lapack_int lwork );
   5194 lapack_int LAPACKE_dgelsy_work( int matrix_order, lapack_int m, lapack_int n,
   5195                                 lapack_int nrhs, double* a, lapack_int lda,
   5196                                 double* b, lapack_int ldb, lapack_int* jpvt,
   5197                                 double rcond, lapack_int* rank, double* work,
   5198                                 lapack_int lwork );
   5199 lapack_int LAPACKE_cgelsy_work( int matrix_order, lapack_int m, lapack_int n,
   5200                                 lapack_int nrhs, lapack_complex_float* a,
   5201                                 lapack_int lda, lapack_complex_float* b,
   5202                                 lapack_int ldb, lapack_int* jpvt, float rcond,
   5203                                 lapack_int* rank, lapack_complex_float* work,
   5204                                 lapack_int lwork, float* rwork );
   5205 lapack_int LAPACKE_zgelsy_work( int matrix_order, lapack_int m, lapack_int n,
   5206                                 lapack_int nrhs, lapack_complex_double* a,
   5207                                 lapack_int lda, lapack_complex_double* b,
   5208                                 lapack_int ldb, lapack_int* jpvt, double rcond,
   5209                                 lapack_int* rank, lapack_complex_double* work,
   5210                                 lapack_int lwork, double* rwork );
   5211 
   5212 lapack_int LAPACKE_sgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
   5213                                 float* a, lapack_int lda, float* tau,
   5214                                 float* work, lapack_int lwork );
   5215 lapack_int LAPACKE_dgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
   5216                                 double* a, lapack_int lda, double* tau,
   5217                                 double* work, lapack_int lwork );
   5218 lapack_int LAPACKE_cgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
   5219                                 lapack_complex_float* a, lapack_int lda,
   5220                                 lapack_complex_float* tau,
   5221                                 lapack_complex_float* work, lapack_int lwork );
   5222 lapack_int LAPACKE_zgeqlf_work( int matrix_order, lapack_int m, lapack_int n,
   5223                                 lapack_complex_double* a, lapack_int lda,
   5224                                 lapack_complex_double* tau,
   5225                                 lapack_complex_double* work, lapack_int lwork );
   5226 
   5227 lapack_int LAPACKE_sgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
   5228                                 float* a, lapack_int lda, lapack_int* jpvt,
   5229                                 float* tau, float* work, lapack_int lwork );
   5230 lapack_int LAPACKE_dgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
   5231                                 double* a, lapack_int lda, lapack_int* jpvt,
   5232                                 double* tau, double* work, lapack_int lwork );
   5233 lapack_int LAPACKE_cgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
   5234                                 lapack_complex_float* a, lapack_int lda,
   5235                                 lapack_int* jpvt, lapack_complex_float* tau,
   5236                                 lapack_complex_float* work, lapack_int lwork,
   5237                                 float* rwork );
   5238 lapack_int LAPACKE_zgeqp3_work( int matrix_order, lapack_int m, lapack_int n,
   5239                                 lapack_complex_double* a, lapack_int lda,
   5240                                 lapack_int* jpvt, lapack_complex_double* tau,
   5241                                 lapack_complex_double* work, lapack_int lwork,
   5242                                 double* rwork );
   5243 
   5244 lapack_int LAPACKE_sgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
   5245                                 float* a, lapack_int lda, lapack_int* jpvt,
   5246                                 float* tau, float* work );
   5247 lapack_int LAPACKE_dgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
   5248                                 double* a, lapack_int lda, lapack_int* jpvt,
   5249                                 double* tau, double* work );
   5250 lapack_int LAPACKE_cgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
   5251                                 lapack_complex_float* a, lapack_int lda,
   5252                                 lapack_int* jpvt, lapack_complex_float* tau,
   5253                                 lapack_complex_float* work, float* rwork );
   5254 lapack_int LAPACKE_zgeqpf_work( int matrix_order, lapack_int m, lapack_int n,
   5255                                 lapack_complex_double* a, lapack_int lda,
   5256                                 lapack_int* jpvt, lapack_complex_double* tau,
   5257                                 lapack_complex_double* work, double* rwork );
   5258 
   5259 lapack_int LAPACKE_sgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
   5260                                 float* a, lapack_int lda, float* tau,
   5261                                 float* work );
   5262 lapack_int LAPACKE_dgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
   5263                                 double* a, lapack_int lda, double* tau,
   5264                                 double* work );
   5265 lapack_int LAPACKE_cgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
   5266                                 lapack_complex_float* a, lapack_int lda,
   5267                                 lapack_complex_float* tau,
   5268                                 lapack_complex_float* work );
   5269 lapack_int LAPACKE_zgeqr2_work( int matrix_order, lapack_int m, lapack_int n,
   5270                                 lapack_complex_double* a, lapack_int lda,
   5271                                 lapack_complex_double* tau,
   5272                                 lapack_complex_double* work );
   5273 
   5274 lapack_int LAPACKE_sgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
   5275                                 float* a, lapack_int lda, float* tau,
   5276                                 float* work, lapack_int lwork );
   5277 lapack_int LAPACKE_dgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
   5278                                 double* a, lapack_int lda, double* tau,
   5279                                 double* work, lapack_int lwork );
   5280 lapack_int LAPACKE_cgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
   5281                                 lapack_complex_float* a, lapack_int lda,
   5282                                 lapack_complex_float* tau,
   5283                                 lapack_complex_float* work, lapack_int lwork );
   5284 lapack_int LAPACKE_zgeqrf_work( int matrix_order, lapack_int m, lapack_int n,
   5285                                 lapack_complex_double* a, lapack_int lda,
   5286                                 lapack_complex_double* tau,
   5287                                 lapack_complex_double* work, lapack_int lwork );
   5288 
   5289 lapack_int LAPACKE_sgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
   5290                                  float* a, lapack_int lda, float* tau,
   5291                                  float* work, lapack_int lwork );
   5292 lapack_int LAPACKE_dgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
   5293                                  double* a, lapack_int lda, double* tau,
   5294                                  double* work, lapack_int lwork );
   5295 lapack_int LAPACKE_cgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
   5296                                  lapack_complex_float* a, lapack_int lda,
   5297                                  lapack_complex_float* tau,
   5298                                  lapack_complex_float* work, lapack_int lwork );
   5299 lapack_int LAPACKE_zgeqrfp_work( int matrix_order, lapack_int m, lapack_int n,
   5300                                  lapack_complex_double* a, lapack_int lda,
   5301                                  lapack_complex_double* tau,
   5302                                  lapack_complex_double* work,
   5303                                  lapack_int lwork );
   5304 
   5305 lapack_int LAPACKE_sgerfs_work( int matrix_order, char trans, lapack_int n,
   5306                                 lapack_int nrhs, const float* a, lapack_int lda,
   5307                                 const float* af, lapack_int ldaf,
   5308                                 const lapack_int* ipiv, const float* b,
   5309                                 lapack_int ldb, float* x, lapack_int ldx,
   5310                                 float* ferr, float* berr, float* work,
   5311                                 lapack_int* iwork );
   5312 lapack_int LAPACKE_dgerfs_work( int matrix_order, char trans, lapack_int n,
   5313                                 lapack_int nrhs, const double* a,
   5314                                 lapack_int lda, const double* af,
   5315                                 lapack_int ldaf, const lapack_int* ipiv,
   5316                                 const double* b, lapack_int ldb, double* x,
   5317                                 lapack_int ldx, double* ferr, double* berr,
   5318                                 double* work, lapack_int* iwork );
   5319 lapack_int LAPACKE_cgerfs_work( int matrix_order, char trans, lapack_int n,
   5320                                 lapack_int nrhs, const lapack_complex_float* a,
   5321                                 lapack_int lda, const lapack_complex_float* af,
   5322                                 lapack_int ldaf, const lapack_int* ipiv,
   5323                                 const lapack_complex_float* b, lapack_int ldb,
   5324                                 lapack_complex_float* x, lapack_int ldx,
   5325                                 float* ferr, float* berr,
   5326                                 lapack_complex_float* work, float* rwork );
   5327 lapack_int LAPACKE_zgerfs_work( int matrix_order, char trans, lapack_int n,
   5328                                 lapack_int nrhs, const lapack_complex_double* a,
   5329                                 lapack_int lda, const lapack_complex_double* af,
   5330                                 lapack_int ldaf, const lapack_int* ipiv,
   5331                                 const lapack_complex_double* b, lapack_int ldb,
   5332                                 lapack_complex_double* x, lapack_int ldx,
   5333                                 double* ferr, double* berr,
   5334                                 lapack_complex_double* work, double* rwork );
   5335 
   5336 lapack_int LAPACKE_sgerfsx_work( int matrix_order, char trans, char equed,
   5337                                  lapack_int n, lapack_int nrhs, const float* a,
   5338                                  lapack_int lda, const float* af,
   5339                                  lapack_int ldaf, const lapack_int* ipiv,
   5340                                  const float* r, const float* c, const float* b,
   5341                                  lapack_int ldb, float* x, lapack_int ldx,
   5342                                  float* rcond, float* berr,
   5343                                  lapack_int n_err_bnds, float* err_bnds_norm,
   5344                                  float* err_bnds_comp, lapack_int nparams,
   5345                                  float* params, float* work,
   5346                                  lapack_int* iwork );
   5347 lapack_int LAPACKE_dgerfsx_work( int matrix_order, char trans, char equed,
   5348                                  lapack_int n, lapack_int nrhs, const double* a,
   5349                                  lapack_int lda, const double* af,
   5350                                  lapack_int ldaf, const lapack_int* ipiv,
   5351                                  const double* r, const double* c,
   5352                                  const double* b, lapack_int ldb, double* x,
   5353                                  lapack_int ldx, double* rcond, double* berr,
   5354                                  lapack_int n_err_bnds, double* err_bnds_norm,
   5355                                  double* err_bnds_comp, lapack_int nparams,
   5356                                  double* params, double* work,
   5357                                  lapack_int* iwork );
   5358 lapack_int LAPACKE_cgerfsx_work( int matrix_order, char trans, char equed,
   5359                                  lapack_int n, lapack_int nrhs,
   5360                                  const lapack_complex_float* a, lapack_int lda,
   5361                                  const lapack_complex_float* af,
   5362                                  lapack_int ldaf, const lapack_int* ipiv,
   5363                                  const float* r, const float* c,
   5364                                  const lapack_complex_float* b, lapack_int ldb,
   5365                                  lapack_complex_float* x, lapack_int ldx,
   5366                                  float* rcond, float* berr,
   5367                                  lapack_int n_err_bnds, float* err_bnds_norm,
   5368                                  float* err_bnds_comp, lapack_int nparams,
   5369                                  float* params, lapack_complex_float* work,
   5370                                  float* rwork );
   5371 lapack_int LAPACKE_zgerfsx_work( int matrix_order, char trans, char equed,
   5372                                  lapack_int n, lapack_int nrhs,
   5373                                  const lapack_complex_double* a, lapack_int lda,
   5374                                  const lapack_complex_double* af,
   5375                                  lapack_int ldaf, const lapack_int* ipiv,
   5376                                  const double* r, const double* c,
   5377                                  const lapack_complex_double* b, lapack_int ldb,
   5378                                  lapack_complex_double* x, lapack_int ldx,
   5379                                  double* rcond, double* berr,
   5380                                  lapack_int n_err_bnds, double* err_bnds_norm,
   5381                                  double* err_bnds_comp, lapack_int nparams,
   5382                                  double* params, lapack_complex_double* work,
   5383                                  double* rwork );
   5384 
   5385 lapack_int LAPACKE_sgerqf_work( int matrix_order, lapack_int m, lapack_int n,
   5386                                 float* a, lapack_int lda, float* tau,
   5387                                 float* work, lapack_int lwork );
   5388 lapack_int LAPACKE_dgerqf_work( int matrix_order, lapack_int m, lapack_int n,
   5389                                 double* a, lapack_int lda, double* tau,
   5390                                 double* work, lapack_int lwork );
   5391 lapack_int LAPACKE_cgerqf_work( int matrix_order, lapack_int m, lapack_int n,
   5392                                 lapack_complex_float* a, lapack_int lda,
   5393                                 lapack_complex_float* tau,
   5394                                 lapack_complex_float* work, lapack_int lwork );
   5395 lapack_int LAPACKE_zgerqf_work( int matrix_order, lapack_int m, lapack_int n,
   5396                                 lapack_complex_double* a, lapack_int lda,
   5397                                 lapack_complex_double* tau,
   5398                                 lapack_complex_double* work, lapack_int lwork );
   5399 
   5400 lapack_int LAPACKE_sgesdd_work( int matrix_order, char jobz, lapack_int m,
   5401                                 lapack_int n, float* a, lapack_int lda,
   5402                                 float* s, float* u, lapack_int ldu, float* vt,
   5403                                 lapack_int ldvt, float* work, lapack_int lwork,
   5404                                 lapack_int* iwork );
   5405 lapack_int LAPACKE_dgesdd_work( int matrix_order, char jobz, lapack_int m,
   5406                                 lapack_int n, double* a, lapack_int lda,
   5407                                 double* s, double* u, lapack_int ldu,
   5408                                 double* vt, lapack_int ldvt, double* work,
   5409                                 lapack_int lwork, lapack_int* iwork );
   5410 lapack_int LAPACKE_cgesdd_work( int matrix_order, char jobz, lapack_int m,
   5411                                 lapack_int n, lapack_complex_float* a,
   5412                                 lapack_int lda, float* s,
   5413                                 lapack_complex_float* u, lapack_int ldu,
   5414                                 lapack_complex_float* vt, lapack_int ldvt,
   5415                                 lapack_complex_float* work, lapack_int lwork,
   5416                                 float* rwork, lapack_int* iwork );
   5417 lapack_int LAPACKE_zgesdd_work( int matrix_order, char jobz, lapack_int m,
   5418                                 lapack_int n, lapack_complex_double* a,
   5419                                 lapack_int lda, double* s,
   5420                                 lapack_complex_double* u, lapack_int ldu,
   5421                                 lapack_complex_double* vt, lapack_int ldvt,
   5422                                 lapack_complex_double* work, lapack_int lwork,
   5423                                 double* rwork, lapack_int* iwork );
   5424 
   5425 lapack_int LAPACKE_sgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5426                                float* a, lapack_int lda, lapack_int* ipiv,
   5427                                float* b, lapack_int ldb );
   5428 lapack_int LAPACKE_dgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5429                                double* a, lapack_int lda, lapack_int* ipiv,
   5430                                double* b, lapack_int ldb );
   5431 lapack_int LAPACKE_cgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5432                                lapack_complex_float* a, lapack_int lda,
   5433                                lapack_int* ipiv, lapack_complex_float* b,
   5434                                lapack_int ldb );
   5435 lapack_int LAPACKE_zgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5436                                lapack_complex_double* a, lapack_int lda,
   5437                                lapack_int* ipiv, lapack_complex_double* b,
   5438                                lapack_int ldb );
   5439 lapack_int LAPACKE_dsgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5440                                 double* a, lapack_int lda, lapack_int* ipiv,
   5441                                 double* b, lapack_int ldb, double* x,
   5442                                 lapack_int ldx, double* work, float* swork,
   5443                                 lapack_int* iter );
   5444 lapack_int LAPACKE_zcgesv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   5445                                 lapack_complex_double* a, lapack_int lda,
   5446                                 lapack_int* ipiv, lapack_complex_double* b,
   5447                                 lapack_int ldb, lapack_complex_double* x,
   5448                                 lapack_int ldx, lapack_complex_double* work,
   5449                                 lapack_complex_float* swork, double* rwork,
   5450                                 lapack_int* iter );
   5451 
   5452 lapack_int LAPACKE_sgesvd_work( int matrix_order, char jobu, char jobvt,
   5453                                 lapack_int m, lapack_int n, float* a,
   5454                                 lapack_int lda, float* s, float* u,
   5455                                 lapack_int ldu, float* vt, lapack_int ldvt,
   5456                                 float* work, lapack_int lwork );
   5457 lapack_int LAPACKE_dgesvd_work( int matrix_order, char jobu, char jobvt,
   5458                                 lapack_int m, lapack_int n, double* a,
   5459                                 lapack_int lda, double* s, double* u,
   5460                                 lapack_int ldu, double* vt, lapack_int ldvt,
   5461                                 double* work, lapack_int lwork );
   5462 lapack_int LAPACKE_cgesvd_work( int matrix_order, char jobu, char jobvt,
   5463                                 lapack_int m, lapack_int n,
   5464                                 lapack_complex_float* a, lapack_int lda,
   5465                                 float* s, lapack_complex_float* u,
   5466                                 lapack_int ldu, lapack_complex_float* vt,
   5467                                 lapack_int ldvt, lapack_complex_float* work,
   5468                                 lapack_int lwork, float* rwork );
   5469 lapack_int LAPACKE_zgesvd_work( int matrix_order, char jobu, char jobvt,
   5470                                 lapack_int m, lapack_int n,
   5471                                 lapack_complex_double* a, lapack_int lda,
   5472                                 double* s, lapack_complex_double* u,
   5473                                 lapack_int ldu, lapack_complex_double* vt,
   5474                                 lapack_int ldvt, lapack_complex_double* work,
   5475                                 lapack_int lwork, double* rwork );
   5476 
   5477 lapack_int LAPACKE_sgesvj_work( int matrix_order, char joba, char jobu,
   5478                                 char jobv, lapack_int m, lapack_int n, float* a,
   5479                                 lapack_int lda, float* sva, lapack_int mv,
   5480                                 float* v, lapack_int ldv, float* work,
   5481                                 lapack_int lwork );
   5482 lapack_int LAPACKE_dgesvj_work( int matrix_order, char joba, char jobu,
   5483                                 char jobv, lapack_int m, lapack_int n,
   5484                                 double* a, lapack_int lda, double* sva,
   5485                                 lapack_int mv, double* v, lapack_int ldv,
   5486                                 double* work, lapack_int lwork );
   5487 
   5488 lapack_int LAPACKE_sgesvx_work( int matrix_order, char fact, char trans,
   5489                                 lapack_int n, lapack_int nrhs, float* a,
   5490                                 lapack_int lda, float* af, lapack_int ldaf,
   5491                                 lapack_int* ipiv, char* equed, float* r,
   5492                                 float* c, float* b, lapack_int ldb, float* x,
   5493                                 lapack_int ldx, float* rcond, float* ferr,
   5494                                 float* berr, float* work, lapack_int* iwork );
   5495 lapack_int LAPACKE_dgesvx_work( int matrix_order, char fact, char trans,
   5496                                 lapack_int n, lapack_int nrhs, double* a,
   5497                                 lapack_int lda, double* af, lapack_int ldaf,
   5498                                 lapack_int* ipiv, char* equed, double* r,
   5499                                 double* c, double* b, lapack_int ldb, double* x,
   5500                                 lapack_int ldx, double* rcond, double* ferr,
   5501                                 double* berr, double* work, lapack_int* iwork );
   5502 lapack_int LAPACKE_cgesvx_work( int matrix_order, char fact, char trans,
   5503                                 lapack_int n, lapack_int nrhs,
   5504                                 lapack_complex_float* a, lapack_int lda,
   5505                                 lapack_complex_float* af, lapack_int ldaf,
   5506                                 lapack_int* ipiv, char* equed, float* r,
   5507                                 float* c, lapack_complex_float* b,
   5508                                 lapack_int ldb, lapack_complex_float* x,
   5509                                 lapack_int ldx, float* rcond, float* ferr,
   5510                                 float* berr, lapack_complex_float* work,
   5511                                 float* rwork );
   5512 lapack_int LAPACKE_zgesvx_work( int matrix_order, char fact, char trans,
   5513                                 lapack_int n, lapack_int nrhs,
   5514                                 lapack_complex_double* a, lapack_int lda,
   5515                                 lapack_complex_double* af, lapack_int ldaf,
   5516                                 lapack_int* ipiv, char* equed, double* r,
   5517                                 double* c, lapack_complex_double* b,
   5518                                 lapack_int ldb, lapack_complex_double* x,
   5519                                 lapack_int ldx, double* rcond, double* ferr,
   5520                                 double* berr, lapack_complex_double* work,
   5521                                 double* rwork );
   5522 
   5523 lapack_int LAPACKE_sgesvxx_work( int matrix_order, char fact, char trans,
   5524                                  lapack_int n, lapack_int nrhs, float* a,
   5525                                  lapack_int lda, float* af, lapack_int ldaf,
   5526                                  lapack_int* ipiv, char* equed, float* r,
   5527                                  float* c, float* b, lapack_int ldb, float* x,
   5528                                  lapack_int ldx, float* rcond, float* rpvgrw,
   5529                                  float* berr, lapack_int n_err_bnds,
   5530                                  float* err_bnds_norm, float* err_bnds_comp,
   5531                                  lapack_int nparams, float* params, float* work,
   5532                                  lapack_int* iwork );
   5533 lapack_int LAPACKE_dgesvxx_work( int matrix_order, char fact, char trans,
   5534                                  lapack_int n, lapack_int nrhs, double* a,
   5535                                  lapack_int lda, double* af, lapack_int ldaf,
   5536                                  lapack_int* ipiv, char* equed, double* r,
   5537                                  double* c, double* b, lapack_int ldb,
   5538                                  double* x, lapack_int ldx, double* rcond,
   5539                                  double* rpvgrw, double* berr,
   5540                                  lapack_int n_err_bnds, double* err_bnds_norm,
   5541                                  double* err_bnds_comp, lapack_int nparams,
   5542                                  double* params, double* work,
   5543                                  lapack_int* iwork );
   5544 lapack_int LAPACKE_cgesvxx_work( int matrix_order, char fact, char trans,
   5545                                  lapack_int n, lapack_int nrhs,
   5546                                  lapack_complex_float* a, lapack_int lda,
   5547                                  lapack_complex_float* af, lapack_int ldaf,
   5548                                  lapack_int* ipiv, char* equed, float* r,
   5549                                  float* c, lapack_complex_float* b,
   5550                                  lapack_int ldb, lapack_complex_float* x,
   5551                                  lapack_int ldx, float* rcond, float* rpvgrw,
   5552                                  float* berr, lapack_int n_err_bnds,
   5553                                  float* err_bnds_norm, float* err_bnds_comp,
   5554                                  lapack_int nparams, float* params,
   5555                                  lapack_complex_float* work, float* rwork );
   5556 lapack_int LAPACKE_zgesvxx_work( int matrix_order, char fact, char trans,
   5557                                  lapack_int n, lapack_int nrhs,
   5558                                  lapack_complex_double* a, lapack_int lda,
   5559                                  lapack_complex_double* af, lapack_int ldaf,
   5560                                  lapack_int* ipiv, char* equed, double* r,
   5561                                  double* c, lapack_complex_double* b,
   5562                                  lapack_int ldb, lapack_complex_double* x,
   5563                                  lapack_int ldx, double* rcond, double* rpvgrw,
   5564                                  double* berr, lapack_int n_err_bnds,
   5565                                  double* err_bnds_norm, double* err_bnds_comp,
   5566                                  lapack_int nparams, double* params,
   5567                                  lapack_complex_double* work, double* rwork );
   5568 
   5569 lapack_int LAPACKE_sgetf2_work( int matrix_order, lapack_int m, lapack_int n,
   5570                                 float* a, lapack_int lda, lapack_int* ipiv );
   5571 lapack_int LAPACKE_dgetf2_work( int matrix_order, lapack_int m, lapack_int n,
   5572                                 double* a, lapack_int lda, lapack_int* ipiv );
   5573 lapack_int LAPACKE_cgetf2_work( int matrix_order, lapack_int m, lapack_int n,
   5574                                 lapack_complex_float* a, lapack_int lda,
   5575                                 lapack_int* ipiv );
   5576 lapack_int LAPACKE_zgetf2_work( int matrix_order, lapack_int m, lapack_int n,
   5577                                 lapack_complex_double* a, lapack_int lda,
   5578                                 lapack_int* ipiv );
   5579 
   5580 lapack_int LAPACKE_sgetrf_work( int matrix_order, lapack_int m, lapack_int n,
   5581                                 float* a, lapack_int lda, lapack_int* ipiv );
   5582 lapack_int LAPACKE_dgetrf_work( int matrix_order, lapack_int m, lapack_int n,
   5583                                 double* a, lapack_int lda, lapack_int* ipiv );
   5584 lapack_int LAPACKE_cgetrf_work( int matrix_order, lapack_int m, lapack_int n,
   5585                                 lapack_complex_float* a, lapack_int lda,
   5586                                 lapack_int* ipiv );
   5587 lapack_int LAPACKE_zgetrf_work( int matrix_order, lapack_int m, lapack_int n,
   5588                                 lapack_complex_double* a, lapack_int lda,
   5589                                 lapack_int* ipiv );
   5590 
   5591 lapack_int LAPACKE_sgetri_work( int matrix_order, lapack_int n, float* a,
   5592                                 lapack_int lda, const lapack_int* ipiv,
   5593                                 float* work, lapack_int lwork );
   5594 lapack_int LAPACKE_dgetri_work( int matrix_order, lapack_int n, double* a,
   5595                                 lapack_int lda, const lapack_int* ipiv,
   5596                                 double* work, lapack_int lwork );
   5597 lapack_int LAPACKE_cgetri_work( int matrix_order, lapack_int n,
   5598                                 lapack_complex_float* a, lapack_int lda,
   5599                                 const lapack_int* ipiv,
   5600                                 lapack_complex_float* work, lapack_int lwork );
   5601 lapack_int LAPACKE_zgetri_work( int matrix_order, lapack_int n,
   5602                                 lapack_complex_double* a, lapack_int lda,
   5603                                 const lapack_int* ipiv,
   5604                                 lapack_complex_double* work, lapack_int lwork );
   5605 
   5606 lapack_int LAPACKE_sgetrs_work( int matrix_order, char trans, lapack_int n,
   5607                                 lapack_int nrhs, const float* a, lapack_int lda,
   5608                                 const lapack_int* ipiv, float* b,
   5609                                 lapack_int ldb );
   5610 lapack_int LAPACKE_dgetrs_work( int matrix_order, char trans, lapack_int n,
   5611                                 lapack_int nrhs, const double* a,
   5612                                 lapack_int lda, const lapack_int* ipiv,
   5613                                 double* b, lapack_int ldb );
   5614 lapack_int LAPACKE_cgetrs_work( int matrix_order, char trans, lapack_int n,
   5615                                 lapack_int nrhs, const lapack_complex_float* a,
   5616                                 lapack_int lda, const lapack_int* ipiv,
   5617                                 lapack_complex_float* b, lapack_int ldb );
   5618 lapack_int LAPACKE_zgetrs_work( int matrix_order, char trans, lapack_int n,
   5619                                 lapack_int nrhs, const lapack_complex_double* a,
   5620                                 lapack_int lda, const lapack_int* ipiv,
   5621                                 lapack_complex_double* b, lapack_int ldb );
   5622 
   5623 lapack_int LAPACKE_sggbak_work( int matrix_order, char job, char side,
   5624                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5625                                 const float* lscale, const float* rscale,
   5626                                 lapack_int m, float* v, lapack_int ldv );
   5627 lapack_int LAPACKE_dggbak_work( int matrix_order, char job, char side,
   5628                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5629                                 const double* lscale, const double* rscale,
   5630                                 lapack_int m, double* v, lapack_int ldv );
   5631 lapack_int LAPACKE_cggbak_work( int matrix_order, char job, char side,
   5632                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5633                                 const float* lscale, const float* rscale,
   5634                                 lapack_int m, lapack_complex_float* v,
   5635                                 lapack_int ldv );
   5636 lapack_int LAPACKE_zggbak_work( int matrix_order, char job, char side,
   5637                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5638                                 const double* lscale, const double* rscale,
   5639                                 lapack_int m, lapack_complex_double* v,
   5640                                 lapack_int ldv );
   5641 
   5642 lapack_int LAPACKE_sggbal_work( int matrix_order, char job, lapack_int n,
   5643                                 float* a, lapack_int lda, float* b,
   5644                                 lapack_int ldb, lapack_int* ilo,
   5645                                 lapack_int* ihi, float* lscale, float* rscale,
   5646                                 float* work );
   5647 lapack_int LAPACKE_dggbal_work( int matrix_order, char job, lapack_int n,
   5648                                 double* a, lapack_int lda, double* b,
   5649                                 lapack_int ldb, lapack_int* ilo,
   5650                                 lapack_int* ihi, double* lscale, double* rscale,
   5651                                 double* work );
   5652 lapack_int LAPACKE_cggbal_work( int matrix_order, char job, lapack_int n,
   5653                                 lapack_complex_float* a, lapack_int lda,
   5654                                 lapack_complex_float* b, lapack_int ldb,
   5655                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
   5656                                 float* rscale, float* work );
   5657 lapack_int LAPACKE_zggbal_work( int matrix_order, char job, lapack_int n,
   5658                                 lapack_complex_double* a, lapack_int lda,
   5659                                 lapack_complex_double* b, lapack_int ldb,
   5660                                 lapack_int* ilo, lapack_int* ihi,
   5661                                 double* lscale, double* rscale, double* work );
   5662 
   5663 lapack_int LAPACKE_sgges_work( int matrix_order, char jobvsl, char jobvsr,
   5664                                char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
   5665                                float* a, lapack_int lda, float* b,
   5666                                lapack_int ldb, lapack_int* sdim, float* alphar,
   5667                                float* alphai, float* beta, float* vsl,
   5668                                lapack_int ldvsl, float* vsr, lapack_int ldvsr,
   5669                                float* work, lapack_int lwork,
   5670                                lapack_logical* bwork );
   5671 lapack_int LAPACKE_dgges_work( int matrix_order, char jobvsl, char jobvsr,
   5672                                char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
   5673                                double* a, lapack_int lda, double* b,
   5674                                lapack_int ldb, lapack_int* sdim, double* alphar,
   5675                                double* alphai, double* beta, double* vsl,
   5676                                lapack_int ldvsl, double* vsr, lapack_int ldvsr,
   5677                                double* work, lapack_int lwork,
   5678                                lapack_logical* bwork );
   5679 lapack_int LAPACKE_cgges_work( int matrix_order, char jobvsl, char jobvsr,
   5680                                char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
   5681                                lapack_complex_float* a, lapack_int lda,
   5682                                lapack_complex_float* b, lapack_int ldb,
   5683                                lapack_int* sdim, lapack_complex_float* alpha,
   5684                                lapack_complex_float* beta,
   5685                                lapack_complex_float* vsl, lapack_int ldvsl,
   5686                                lapack_complex_float* vsr, lapack_int ldvsr,
   5687                                lapack_complex_float* work, lapack_int lwork,
   5688                                float* rwork, lapack_logical* bwork );
   5689 lapack_int LAPACKE_zgges_work( int matrix_order, char jobvsl, char jobvsr,
   5690                                char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
   5691                                lapack_complex_double* a, lapack_int lda,
   5692                                lapack_complex_double* b, lapack_int ldb,
   5693                                lapack_int* sdim, lapack_complex_double* alpha,
   5694                                lapack_complex_double* beta,
   5695                                lapack_complex_double* vsl, lapack_int ldvsl,
   5696                                lapack_complex_double* vsr, lapack_int ldvsr,
   5697                                lapack_complex_double* work, lapack_int lwork,
   5698                                double* rwork, lapack_logical* bwork );
   5699 
   5700 lapack_int LAPACKE_sggesx_work( int matrix_order, char jobvsl, char jobvsr,
   5701                                 char sort, LAPACK_S_SELECT3 selctg, char sense,
   5702                                 lapack_int n, float* a, lapack_int lda,
   5703                                 float* b, lapack_int ldb, lapack_int* sdim,
   5704                                 float* alphar, float* alphai, float* beta,
   5705                                 float* vsl, lapack_int ldvsl, float* vsr,
   5706                                 lapack_int ldvsr, float* rconde, float* rcondv,
   5707                                 float* work, lapack_int lwork,
   5708                                 lapack_int* iwork, lapack_int liwork,
   5709                                 lapack_logical* bwork );
   5710 lapack_int LAPACKE_dggesx_work( int matrix_order, char jobvsl, char jobvsr,
   5711                                 char sort, LAPACK_D_SELECT3 selctg, char sense,
   5712                                 lapack_int n, double* a, lapack_int lda,
   5713                                 double* b, lapack_int ldb, lapack_int* sdim,
   5714                                 double* alphar, double* alphai, double* beta,
   5715                                 double* vsl, lapack_int ldvsl, double* vsr,
   5716                                 lapack_int ldvsr, double* rconde,
   5717                                 double* rcondv, double* work, lapack_int lwork,
   5718                                 lapack_int* iwork, lapack_int liwork,
   5719                                 lapack_logical* bwork );
   5720 lapack_int LAPACKE_cggesx_work( int matrix_order, char jobvsl, char jobvsr,
   5721                                 char sort, LAPACK_C_SELECT2 selctg, char sense,
   5722                                 lapack_int n, lapack_complex_float* a,
   5723                                 lapack_int lda, lapack_complex_float* b,
   5724                                 lapack_int ldb, lapack_int* sdim,
   5725                                 lapack_complex_float* alpha,
   5726                                 lapack_complex_float* beta,
   5727                                 lapack_complex_float* vsl, lapack_int ldvsl,
   5728                                 lapack_complex_float* vsr, lapack_int ldvsr,
   5729                                 float* rconde, float* rcondv,
   5730                                 lapack_complex_float* work, lapack_int lwork,
   5731                                 float* rwork, lapack_int* iwork,
   5732                                 lapack_int liwork, lapack_logical* bwork );
   5733 lapack_int LAPACKE_zggesx_work( int matrix_order, char jobvsl, char jobvsr,
   5734                                 char sort, LAPACK_Z_SELECT2 selctg, char sense,
   5735                                 lapack_int n, lapack_complex_double* a,
   5736                                 lapack_int lda, lapack_complex_double* b,
   5737                                 lapack_int ldb, lapack_int* sdim,
   5738                                 lapack_complex_double* alpha,
   5739                                 lapack_complex_double* beta,
   5740                                 lapack_complex_double* vsl, lapack_int ldvsl,
   5741                                 lapack_complex_double* vsr, lapack_int ldvsr,
   5742                                 double* rconde, double* rcondv,
   5743                                 lapack_complex_double* work, lapack_int lwork,
   5744                                 double* rwork, lapack_int* iwork,
   5745                                 lapack_int liwork, lapack_logical* bwork );
   5746 
   5747 lapack_int LAPACKE_sggev_work( int matrix_order, char jobvl, char jobvr,
   5748                                lapack_int n, float* a, lapack_int lda, float* b,
   5749                                lapack_int ldb, float* alphar, float* alphai,
   5750                                float* beta, float* vl, lapack_int ldvl,
   5751                                float* vr, lapack_int ldvr, float* work,
   5752                                lapack_int lwork );
   5753 lapack_int LAPACKE_dggev_work( int matrix_order, char jobvl, char jobvr,
   5754                                lapack_int n, double* a, lapack_int lda,
   5755                                double* b, lapack_int ldb, double* alphar,
   5756                                double* alphai, double* beta, double* vl,
   5757                                lapack_int ldvl, double* vr, lapack_int ldvr,
   5758                                double* work, lapack_int lwork );
   5759 lapack_int LAPACKE_cggev_work( int matrix_order, char jobvl, char jobvr,
   5760                                lapack_int n, lapack_complex_float* a,
   5761                                lapack_int lda, lapack_complex_float* b,
   5762                                lapack_int ldb, lapack_complex_float* alpha,
   5763                                lapack_complex_float* beta,
   5764                                lapack_complex_float* vl, lapack_int ldvl,
   5765                                lapack_complex_float* vr, lapack_int ldvr,
   5766                                lapack_complex_float* work, lapack_int lwork,
   5767                                float* rwork );
   5768 lapack_int LAPACKE_zggev_work( int matrix_order, char jobvl, char jobvr,
   5769                                lapack_int n, lapack_complex_double* a,
   5770                                lapack_int lda, lapack_complex_double* b,
   5771                                lapack_int ldb, lapack_complex_double* alpha,
   5772                                lapack_complex_double* beta,
   5773                                lapack_complex_double* vl, lapack_int ldvl,
   5774                                lapack_complex_double* vr, lapack_int ldvr,
   5775                                lapack_complex_double* work, lapack_int lwork,
   5776                                double* rwork );
   5777 
   5778 lapack_int LAPACKE_sggevx_work( int matrix_order, char balanc, char jobvl,
   5779                                 char jobvr, char sense, lapack_int n, float* a,
   5780                                 lapack_int lda, float* b, lapack_int ldb,
   5781                                 float* alphar, float* alphai, float* beta,
   5782                                 float* vl, lapack_int ldvl, float* vr,
   5783                                 lapack_int ldvr, lapack_int* ilo,
   5784                                 lapack_int* ihi, float* lscale, float* rscale,
   5785                                 float* abnrm, float* bbnrm, float* rconde,
   5786                                 float* rcondv, float* work, lapack_int lwork,
   5787                                 lapack_int* iwork, lapack_logical* bwork );
   5788 lapack_int LAPACKE_dggevx_work( int matrix_order, char balanc, char jobvl,
   5789                                 char jobvr, char sense, lapack_int n, double* a,
   5790                                 lapack_int lda, double* b, lapack_int ldb,
   5791                                 double* alphar, double* alphai, double* beta,
   5792                                 double* vl, lapack_int ldvl, double* vr,
   5793                                 lapack_int ldvr, lapack_int* ilo,
   5794                                 lapack_int* ihi, double* lscale, double* rscale,
   5795                                 double* abnrm, double* bbnrm, double* rconde,
   5796                                 double* rcondv, double* work, lapack_int lwork,
   5797                                 lapack_int* iwork, lapack_logical* bwork );
   5798 lapack_int LAPACKE_cggevx_work( int matrix_order, char balanc, char jobvl,
   5799                                 char jobvr, char sense, lapack_int n,
   5800                                 lapack_complex_float* a, lapack_int lda,
   5801                                 lapack_complex_float* b, lapack_int ldb,
   5802                                 lapack_complex_float* alpha,
   5803                                 lapack_complex_float* beta,
   5804                                 lapack_complex_float* vl, lapack_int ldvl,
   5805                                 lapack_complex_float* vr, lapack_int ldvr,
   5806                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
   5807                                 float* rscale, float* abnrm, float* bbnrm,
   5808                                 float* rconde, float* rcondv,
   5809                                 lapack_complex_float* work, lapack_int lwork,
   5810                                 float* rwork, lapack_int* iwork,
   5811                                 lapack_logical* bwork );
   5812 lapack_int LAPACKE_zggevx_work( int matrix_order, char balanc, char jobvl,
   5813                                 char jobvr, char sense, lapack_int n,
   5814                                 lapack_complex_double* a, lapack_int lda,
   5815                                 lapack_complex_double* b, lapack_int ldb,
   5816                                 lapack_complex_double* alpha,
   5817                                 lapack_complex_double* beta,
   5818                                 lapack_complex_double* vl, lapack_int ldvl,
   5819                                 lapack_complex_double* vr, lapack_int ldvr,
   5820                                 lapack_int* ilo, lapack_int* ihi,
   5821                                 double* lscale, double* rscale, double* abnrm,
   5822                                 double* bbnrm, double* rconde, double* rcondv,
   5823                                 lapack_complex_double* work, lapack_int lwork,
   5824                                 double* rwork, lapack_int* iwork,
   5825                                 lapack_logical* bwork );
   5826 
   5827 lapack_int LAPACKE_sggglm_work( int matrix_order, lapack_int n, lapack_int m,
   5828                                 lapack_int p, float* a, lapack_int lda,
   5829                                 float* b, lapack_int ldb, float* d, float* x,
   5830                                 float* y, float* work, lapack_int lwork );
   5831 lapack_int LAPACKE_dggglm_work( int matrix_order, lapack_int n, lapack_int m,
   5832                                 lapack_int p, double* a, lapack_int lda,
   5833                                 double* b, lapack_int ldb, double* d, double* x,
   5834                                 double* y, double* work, lapack_int lwork );
   5835 lapack_int LAPACKE_cggglm_work( int matrix_order, lapack_int n, lapack_int m,
   5836                                 lapack_int p, lapack_complex_float* a,
   5837                                 lapack_int lda, lapack_complex_float* b,
   5838                                 lapack_int ldb, lapack_complex_float* d,
   5839                                 lapack_complex_float* x,
   5840                                 lapack_complex_float* y,
   5841                                 lapack_complex_float* work, lapack_int lwork );
   5842 lapack_int LAPACKE_zggglm_work( int matrix_order, lapack_int n, lapack_int m,
   5843                                 lapack_int p, lapack_complex_double* a,
   5844                                 lapack_int lda, lapack_complex_double* b,
   5845                                 lapack_int ldb, lapack_complex_double* d,
   5846                                 lapack_complex_double* x,
   5847                                 lapack_complex_double* y,
   5848                                 lapack_complex_double* work, lapack_int lwork );
   5849 
   5850 lapack_int LAPACKE_sgghrd_work( int matrix_order, char compq, char compz,
   5851                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5852                                 float* a, lapack_int lda, float* b,
   5853                                 lapack_int ldb, float* q, lapack_int ldq,
   5854                                 float* z, lapack_int ldz );
   5855 lapack_int LAPACKE_dgghrd_work( int matrix_order, char compq, char compz,
   5856                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5857                                 double* a, lapack_int lda, double* b,
   5858                                 lapack_int ldb, double* q, lapack_int ldq,
   5859                                 double* z, lapack_int ldz );
   5860 lapack_int LAPACKE_cgghrd_work( int matrix_order, char compq, char compz,
   5861                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5862                                 lapack_complex_float* a, lapack_int lda,
   5863                                 lapack_complex_float* b, lapack_int ldb,
   5864                                 lapack_complex_float* q, lapack_int ldq,
   5865                                 lapack_complex_float* z, lapack_int ldz );
   5866 lapack_int LAPACKE_zgghrd_work( int matrix_order, char compq, char compz,
   5867                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   5868                                 lapack_complex_double* a, lapack_int lda,
   5869                                 lapack_complex_double* b, lapack_int ldb,
   5870                                 lapack_complex_double* q, lapack_int ldq,
   5871                                 lapack_complex_double* z, lapack_int ldz );
   5872 
   5873 lapack_int LAPACKE_sgglse_work( int matrix_order, lapack_int m, lapack_int n,
   5874                                 lapack_int p, float* a, lapack_int lda,
   5875                                 float* b, lapack_int ldb, float* c, float* d,
   5876                                 float* x, float* work, lapack_int lwork );
   5877 lapack_int LAPACKE_dgglse_work( int matrix_order, lapack_int m, lapack_int n,
   5878                                 lapack_int p, double* a, lapack_int lda,
   5879                                 double* b, lapack_int ldb, double* c, double* d,
   5880                                 double* x, double* work, lapack_int lwork );
   5881 lapack_int LAPACKE_cgglse_work( int matrix_order, lapack_int m, lapack_int n,
   5882                                 lapack_int p, lapack_complex_float* a,
   5883                                 lapack_int lda, lapack_complex_float* b,
   5884                                 lapack_int ldb, lapack_complex_float* c,
   5885                                 lapack_complex_float* d,
   5886                                 lapack_complex_float* x,
   5887                                 lapack_complex_float* work, lapack_int lwork );
   5888 lapack_int LAPACKE_zgglse_work( int matrix_order, lapack_int m, lapack_int n,
   5889                                 lapack_int p, lapack_complex_double* a,
   5890                                 lapack_int lda, lapack_complex_double* b,
   5891                                 lapack_int ldb, lapack_complex_double* c,
   5892                                 lapack_complex_double* d,
   5893                                 lapack_complex_double* x,
   5894                                 lapack_complex_double* work, lapack_int lwork );
   5895 
   5896 lapack_int LAPACKE_sggqrf_work( int matrix_order, lapack_int n, lapack_int m,
   5897                                 lapack_int p, float* a, lapack_int lda,
   5898                                 float* taua, float* b, lapack_int ldb,
   5899                                 float* taub, float* work, lapack_int lwork );
   5900 lapack_int LAPACKE_dggqrf_work( int matrix_order, lapack_int n, lapack_int m,
   5901                                 lapack_int p, double* a, lapack_int lda,
   5902                                 double* taua, double* b, lapack_int ldb,
   5903                                 double* taub, double* work, lapack_int lwork );
   5904 lapack_int LAPACKE_cggqrf_work( int matrix_order, lapack_int n, lapack_int m,
   5905                                 lapack_int p, lapack_complex_float* a,
   5906                                 lapack_int lda, lapack_complex_float* taua,
   5907                                 lapack_complex_float* b, lapack_int ldb,
   5908                                 lapack_complex_float* taub,
   5909                                 lapack_complex_float* work, lapack_int lwork );
   5910 lapack_int LAPACKE_zggqrf_work( int matrix_order, lapack_int n, lapack_int m,
   5911                                 lapack_int p, lapack_complex_double* a,
   5912                                 lapack_int lda, lapack_complex_double* taua,
   5913                                 lapack_complex_double* b, lapack_int ldb,
   5914                                 lapack_complex_double* taub,
   5915                                 lapack_complex_double* work, lapack_int lwork );
   5916 
   5917 lapack_int LAPACKE_sggrqf_work( int matrix_order, lapack_int m, lapack_int p,
   5918                                 lapack_int n, float* a, lapack_int lda,
   5919                                 float* taua, float* b, lapack_int ldb,
   5920                                 float* taub, float* work, lapack_int lwork );
   5921 lapack_int LAPACKE_dggrqf_work( int matrix_order, lapack_int m, lapack_int p,
   5922                                 lapack_int n, double* a, lapack_int lda,
   5923                                 double* taua, double* b, lapack_int ldb,
   5924                                 double* taub, double* work, lapack_int lwork );
   5925 lapack_int LAPACKE_cggrqf_work( int matrix_order, lapack_int m, lapack_int p,
   5926                                 lapack_int n, lapack_complex_float* a,
   5927                                 lapack_int lda, lapack_complex_float* taua,
   5928                                 lapack_complex_float* b, lapack_int ldb,
   5929                                 lapack_complex_float* taub,
   5930                                 lapack_complex_float* work, lapack_int lwork );
   5931 lapack_int LAPACKE_zggrqf_work( int matrix_order, lapack_int m, lapack_int p,
   5932                                 lapack_int n, lapack_complex_double* a,
   5933                                 lapack_int lda, lapack_complex_double* taua,
   5934                                 lapack_complex_double* b, lapack_int ldb,
   5935                                 lapack_complex_double* taub,
   5936                                 lapack_complex_double* work, lapack_int lwork );
   5937 
   5938 lapack_int LAPACKE_sggsvd_work( int matrix_order, char jobu, char jobv,
   5939                                 char jobq, lapack_int m, lapack_int n,
   5940                                 lapack_int p, lapack_int* k, lapack_int* l,
   5941                                 float* a, lapack_int lda, float* b,
   5942                                 lapack_int ldb, float* alpha, float* beta,
   5943                                 float* u, lapack_int ldu, float* v,
   5944                                 lapack_int ldv, float* q, lapack_int ldq,
   5945                                 float* work, lapack_int* iwork );
   5946 lapack_int LAPACKE_dggsvd_work( int matrix_order, char jobu, char jobv,
   5947                                 char jobq, lapack_int m, lapack_int n,
   5948                                 lapack_int p, lapack_int* k, lapack_int* l,
   5949                                 double* a, lapack_int lda, double* b,
   5950                                 lapack_int ldb, double* alpha, double* beta,
   5951                                 double* u, lapack_int ldu, double* v,
   5952                                 lapack_int ldv, double* q, lapack_int ldq,
   5953                                 double* work, lapack_int* iwork );
   5954 lapack_int LAPACKE_cggsvd_work( int matrix_order, char jobu, char jobv,
   5955                                 char jobq, lapack_int m, lapack_int n,
   5956                                 lapack_int p, lapack_int* k, lapack_int* l,
   5957                                 lapack_complex_float* a, lapack_int lda,
   5958                                 lapack_complex_float* b, lapack_int ldb,
   5959                                 float* alpha, float* beta,
   5960                                 lapack_complex_float* u, lapack_int ldu,
   5961                                 lapack_complex_float* v, lapack_int ldv,
   5962                                 lapack_complex_float* q, lapack_int ldq,
   5963                                 lapack_complex_float* work, float* rwork,
   5964                                 lapack_int* iwork );
   5965 lapack_int LAPACKE_zggsvd_work( int matrix_order, char jobu, char jobv,
   5966                                 char jobq, lapack_int m, lapack_int n,
   5967                                 lapack_int p, lapack_int* k, lapack_int* l,
   5968                                 lapack_complex_double* a, lapack_int lda,
   5969                                 lapack_complex_double* b, lapack_int ldb,
   5970                                 double* alpha, double* beta,
   5971                                 lapack_complex_double* u, lapack_int ldu,
   5972                                 lapack_complex_double* v, lapack_int ldv,
   5973                                 lapack_complex_double* q, lapack_int ldq,
   5974                                 lapack_complex_double* work, double* rwork,
   5975                                 lapack_int* iwork );
   5976 
   5977 lapack_int LAPACKE_sggsvp_work( int matrix_order, char jobu, char jobv,
   5978                                 char jobq, lapack_int m, lapack_int p,
   5979                                 lapack_int n, float* a, lapack_int lda,
   5980                                 float* b, lapack_int ldb, float tola,
   5981                                 float tolb, lapack_int* k, lapack_int* l,
   5982                                 float* u, lapack_int ldu, float* v,
   5983                                 lapack_int ldv, float* q, lapack_int ldq,
   5984                                 lapack_int* iwork, float* tau, float* work );
   5985 lapack_int LAPACKE_dggsvp_work( int matrix_order, char jobu, char jobv,
   5986                                 char jobq, lapack_int m, lapack_int p,
   5987                                 lapack_int n, double* a, lapack_int lda,
   5988                                 double* b, lapack_int ldb, double tola,
   5989                                 double tolb, lapack_int* k, lapack_int* l,
   5990                                 double* u, lapack_int ldu, double* v,
   5991                                 lapack_int ldv, double* q, lapack_int ldq,
   5992                                 lapack_int* iwork, double* tau, double* work );
   5993 lapack_int LAPACKE_cggsvp_work( int matrix_order, char jobu, char jobv,
   5994                                 char jobq, lapack_int m, lapack_int p,
   5995                                 lapack_int n, lapack_complex_float* a,
   5996                                 lapack_int lda, lapack_complex_float* b,
   5997                                 lapack_int ldb, float tola, float tolb,
   5998                                 lapack_int* k, lapack_int* l,
   5999                                 lapack_complex_float* u, lapack_int ldu,
   6000                                 lapack_complex_float* v, lapack_int ldv,
   6001                                 lapack_complex_float* q, lapack_int ldq,
   6002                                 lapack_int* iwork, float* rwork,
   6003                                 lapack_complex_float* tau,
   6004                                 lapack_complex_float* work );
   6005 lapack_int LAPACKE_zggsvp_work( int matrix_order, char jobu, char jobv,
   6006                                 char jobq, lapack_int m, lapack_int p,
   6007                                 lapack_int n, lapack_complex_double* a,
   6008                                 lapack_int lda, lapack_complex_double* b,
   6009                                 lapack_int ldb, double tola, double tolb,
   6010                                 lapack_int* k, lapack_int* l,
   6011                                 lapack_complex_double* u, lapack_int ldu,
   6012                                 lapack_complex_double* v, lapack_int ldv,
   6013                                 lapack_complex_double* q, lapack_int ldq,
   6014                                 lapack_int* iwork, double* rwork,
   6015                                 lapack_complex_double* tau,
   6016                                 lapack_complex_double* work );
   6017 
   6018 lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
   6019                                 const float* d, const float* du,
   6020                                 const float* du2, const lapack_int* ipiv,
   6021                                 float anorm, float* rcond, float* work,
   6022                                 lapack_int* iwork );
   6023 lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
   6024                                 const double* d, const double* du,
   6025                                 const double* du2, const lapack_int* ipiv,
   6026                                 double anorm, double* rcond, double* work,
   6027                                 lapack_int* iwork );
   6028 lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
   6029                                 const lapack_complex_float* dl,
   6030                                 const lapack_complex_float* d,
   6031                                 const lapack_complex_float* du,
   6032                                 const lapack_complex_float* du2,
   6033                                 const lapack_int* ipiv, float anorm,
   6034                                 float* rcond, lapack_complex_float* work );
   6035 lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
   6036                                 const lapack_complex_double* dl,
   6037                                 const lapack_complex_double* d,
   6038                                 const lapack_complex_double* du,
   6039                                 const lapack_complex_double* du2,
   6040                                 const lapack_int* ipiv, double anorm,
   6041                                 double* rcond, lapack_complex_double* work );
   6042 
   6043 lapack_int LAPACKE_sgtrfs_work( int matrix_order, char trans, lapack_int n,
   6044                                 lapack_int nrhs, const float* dl,
   6045                                 const float* d, const float* du,
   6046                                 const float* dlf, const float* df,
   6047                                 const float* duf, const float* du2,
   6048                                 const lapack_int* ipiv, const float* b,
   6049                                 lapack_int ldb, float* x, lapack_int ldx,
   6050                                 float* ferr, float* berr, float* work,
   6051                                 lapack_int* iwork );
   6052 lapack_int LAPACKE_dgtrfs_work( int matrix_order, char trans, lapack_int n,
   6053                                 lapack_int nrhs, const double* dl,
   6054                                 const double* d, const double* du,
   6055                                 const double* dlf, const double* df,
   6056                                 const double* duf, const double* du2,
   6057                                 const lapack_int* ipiv, const double* b,
   6058                                 lapack_int ldb, double* x, lapack_int ldx,
   6059                                 double* ferr, double* berr, double* work,
   6060                                 lapack_int* iwork );
   6061 lapack_int LAPACKE_cgtrfs_work( int matrix_order, char trans, lapack_int n,
   6062                                 lapack_int nrhs, const lapack_complex_float* dl,
   6063                                 const lapack_complex_float* d,
   6064                                 const lapack_complex_float* du,
   6065                                 const lapack_complex_float* dlf,
   6066                                 const lapack_complex_float* df,
   6067                                 const lapack_complex_float* duf,
   6068                                 const lapack_complex_float* du2,
   6069                                 const lapack_int* ipiv,
   6070                                 const lapack_complex_float* b, lapack_int ldb,
   6071                                 lapack_complex_float* x, lapack_int ldx,
   6072                                 float* ferr, float* berr,
   6073                                 lapack_complex_float* work, float* rwork );
   6074 lapack_int LAPACKE_zgtrfs_work( int matrix_order, char trans, lapack_int n,
   6075                                 lapack_int nrhs,
   6076                                 const lapack_complex_double* dl,
   6077                                 const lapack_complex_double* d,
   6078                                 const lapack_complex_double* du,
   6079                                 const lapack_complex_double* dlf,
   6080                                 const lapack_complex_double* df,
   6081                                 const lapack_complex_double* duf,
   6082                                 const lapack_complex_double* du2,
   6083                                 const lapack_int* ipiv,
   6084                                 const lapack_complex_double* b, lapack_int ldb,
   6085                                 lapack_complex_double* x, lapack_int ldx,
   6086                                 double* ferr, double* berr,
   6087                                 lapack_complex_double* work, double* rwork );
   6088 
   6089 lapack_int LAPACKE_sgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   6090                                float* dl, float* d, float* du, float* b,
   6091                                lapack_int ldb );
   6092 lapack_int LAPACKE_dgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   6093                                double* dl, double* d, double* du, double* b,
   6094                                lapack_int ldb );
   6095 lapack_int LAPACKE_cgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   6096                                lapack_complex_float* dl,
   6097                                lapack_complex_float* d,
   6098                                lapack_complex_float* du,
   6099                                lapack_complex_float* b, lapack_int ldb );
   6100 lapack_int LAPACKE_zgtsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   6101                                lapack_complex_double* dl,
   6102                                lapack_complex_double* d,
   6103                                lapack_complex_double* du,
   6104                                lapack_complex_double* b, lapack_int ldb );
   6105 
   6106 lapack_int LAPACKE_sgtsvx_work( int matrix_order, char fact, char trans,
   6107                                 lapack_int n, lapack_int nrhs, const float* dl,
   6108                                 const float* d, const float* du, float* dlf,
   6109                                 float* df, float* duf, float* du2,
   6110                                 lapack_int* ipiv, const float* b,
   6111                                 lapack_int ldb, float* x, lapack_int ldx,
   6112                                 float* rcond, float* ferr, float* berr,
   6113                                 float* work, lapack_int* iwork );
   6114 lapack_int LAPACKE_dgtsvx_work( int matrix_order, char fact, char trans,
   6115                                 lapack_int n, lapack_int nrhs, const double* dl,
   6116                                 const double* d, const double* du, double* dlf,
   6117                                 double* df, double* duf, double* du2,
   6118                                 lapack_int* ipiv, const double* b,
   6119                                 lapack_int ldb, double* x, lapack_int ldx,
   6120                                 double* rcond, double* ferr, double* berr,
   6121                                 double* work, lapack_int* iwork );
   6122 lapack_int LAPACKE_cgtsvx_work( int matrix_order, char fact, char trans,
   6123                                 lapack_int n, lapack_int nrhs,
   6124                                 const lapack_complex_float* dl,
   6125                                 const lapack_complex_float* d,
   6126                                 const lapack_complex_float* du,
   6127                                 lapack_complex_float* dlf,
   6128                                 lapack_complex_float* df,
   6129                                 lapack_complex_float* duf,
   6130                                 lapack_complex_float* du2, lapack_int* ipiv,
   6131                                 const lapack_complex_float* b, lapack_int ldb,
   6132                                 lapack_complex_float* x, lapack_int ldx,
   6133                                 float* rcond, float* ferr, float* berr,
   6134                                 lapack_complex_float* work, float* rwork );
   6135 lapack_int LAPACKE_zgtsvx_work( int matrix_order, char fact, char trans,
   6136                                 lapack_int n, lapack_int nrhs,
   6137                                 const lapack_complex_double* dl,
   6138                                 const lapack_complex_double* d,
   6139                                 const lapack_complex_double* du,
   6140                                 lapack_complex_double* dlf,
   6141                                 lapack_complex_double* df,
   6142                                 lapack_complex_double* duf,
   6143                                 lapack_complex_double* du2, lapack_int* ipiv,
   6144                                 const lapack_complex_double* b, lapack_int ldb,
   6145                                 lapack_complex_double* x, lapack_int ldx,
   6146                                 double* rcond, double* ferr, double* berr,
   6147                                 lapack_complex_double* work, double* rwork );
   6148 
   6149 lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
   6150                                 float* du2, lapack_int* ipiv );
   6151 lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
   6152                                 double* du2, lapack_int* ipiv );
   6153 lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
   6154                                 lapack_complex_float* d,
   6155                                 lapack_complex_float* du,
   6156                                 lapack_complex_float* du2, lapack_int* ipiv );
   6157 lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
   6158                                 lapack_complex_double* d,
   6159                                 lapack_complex_double* du,
   6160                                 lapack_complex_double* du2, lapack_int* ipiv );
   6161 
   6162 lapack_int LAPACKE_sgttrs_work( int matrix_order, char trans, lapack_int n,
   6163                                 lapack_int nrhs, const float* dl,
   6164                                 const float* d, const float* du,
   6165                                 const float* du2, const lapack_int* ipiv,
   6166                                 float* b, lapack_int ldb );
   6167 lapack_int LAPACKE_dgttrs_work( int matrix_order, char trans, lapack_int n,
   6168                                 lapack_int nrhs, const double* dl,
   6169                                 const double* d, const double* du,
   6170                                 const double* du2, const lapack_int* ipiv,
   6171                                 double* b, lapack_int ldb );
   6172 lapack_int LAPACKE_cgttrs_work( int matrix_order, char trans, lapack_int n,
   6173                                 lapack_int nrhs, const lapack_complex_float* dl,
   6174                                 const lapack_complex_float* d,
   6175                                 const lapack_complex_float* du,
   6176                                 const lapack_complex_float* du2,
   6177                                 const lapack_int* ipiv, lapack_complex_float* b,
   6178                                 lapack_int ldb );
   6179 lapack_int LAPACKE_zgttrs_work( int matrix_order, char trans, lapack_int n,
   6180                                 lapack_int nrhs,
   6181                                 const lapack_complex_double* dl,
   6182                                 const lapack_complex_double* d,
   6183                                 const lapack_complex_double* du,
   6184                                 const lapack_complex_double* du2,
   6185                                 const lapack_int* ipiv,
   6186                                 lapack_complex_double* b, lapack_int ldb );
   6187 
   6188 lapack_int LAPACKE_chbev_work( int matrix_order, char jobz, char uplo,
   6189                                lapack_int n, lapack_int kd,
   6190                                lapack_complex_float* ab, lapack_int ldab,
   6191                                float* w, lapack_complex_float* z,
   6192                                lapack_int ldz, lapack_complex_float* work,
   6193                                float* rwork );
   6194 lapack_int LAPACKE_zhbev_work( int matrix_order, char jobz, char uplo,
   6195                                lapack_int n, lapack_int kd,
   6196                                lapack_complex_double* ab, lapack_int ldab,
   6197                                double* w, lapack_complex_double* z,
   6198                                lapack_int ldz, lapack_complex_double* work,
   6199                                double* rwork );
   6200 
   6201 lapack_int LAPACKE_chbevd_work( int matrix_order, char jobz, char uplo,
   6202                                 lapack_int n, lapack_int kd,
   6203                                 lapack_complex_float* ab, lapack_int ldab,
   6204                                 float* w, lapack_complex_float* z,
   6205                                 lapack_int ldz, lapack_complex_float* work,
   6206                                 lapack_int lwork, float* rwork,
   6207                                 lapack_int lrwork, lapack_int* iwork,
   6208                                 lapack_int liwork );
   6209 lapack_int LAPACKE_zhbevd_work( int matrix_order, char jobz, char uplo,
   6210                                 lapack_int n, lapack_int kd,
   6211                                 lapack_complex_double* ab, lapack_int ldab,
   6212                                 double* w, lapack_complex_double* z,
   6213                                 lapack_int ldz, lapack_complex_double* work,
   6214                                 lapack_int lwork, double* rwork,
   6215                                 lapack_int lrwork, lapack_int* iwork,
   6216                                 lapack_int liwork );
   6217 
   6218 lapack_int LAPACKE_chbevx_work( int matrix_order, char jobz, char range,
   6219                                 char uplo, lapack_int n, lapack_int kd,
   6220                                 lapack_complex_float* ab, lapack_int ldab,
   6221                                 lapack_complex_float* q, lapack_int ldq,
   6222                                 float vl, float vu, lapack_int il,
   6223                                 lapack_int iu, float abstol, lapack_int* m,
   6224                                 float* w, lapack_complex_float* z,
   6225                                 lapack_int ldz, lapack_complex_float* work,
   6226                                 float* rwork, lapack_int* iwork,
   6227                                 lapack_int* ifail );
   6228 lapack_int LAPACKE_zhbevx_work( int matrix_order, char jobz, char range,
   6229                                 char uplo, lapack_int n, lapack_int kd,
   6230                                 lapack_complex_double* ab, lapack_int ldab,
   6231                                 lapack_complex_double* q, lapack_int ldq,
   6232                                 double vl, double vu, lapack_int il,
   6233                                 lapack_int iu, double abstol, lapack_int* m,
   6234                                 double* w, lapack_complex_double* z,
   6235                                 lapack_int ldz, lapack_complex_double* work,
   6236                                 double* rwork, lapack_int* iwork,
   6237                                 lapack_int* ifail );
   6238 
   6239 lapack_int LAPACKE_chbgst_work( int matrix_order, char vect, char uplo,
   6240                                 lapack_int n, lapack_int ka, lapack_int kb,
   6241                                 lapack_complex_float* ab, lapack_int ldab,
   6242                                 const lapack_complex_float* bb, lapack_int ldbb,
   6243                                 lapack_complex_float* x, lapack_int ldx,
   6244                                 lapack_complex_float* work, float* rwork );
   6245 lapack_int LAPACKE_zhbgst_work( int matrix_order, char vect, char uplo,
   6246                                 lapack_int n, lapack_int ka, lapack_int kb,
   6247                                 lapack_complex_double* ab, lapack_int ldab,
   6248                                 const lapack_complex_double* bb,
   6249                                 lapack_int ldbb, lapack_complex_double* x,
   6250                                 lapack_int ldx, lapack_complex_double* work,
   6251                                 double* rwork );
   6252 
   6253 lapack_int LAPACKE_chbgv_work( int matrix_order, char jobz, char uplo,
   6254                                lapack_int n, lapack_int ka, lapack_int kb,
   6255                                lapack_complex_float* ab, lapack_int ldab,
   6256                                lapack_complex_float* bb, lapack_int ldbb,
   6257                                float* w, lapack_complex_float* z,
   6258                                lapack_int ldz, lapack_complex_float* work,
   6259                                float* rwork );
   6260 lapack_int LAPACKE_zhbgv_work( int matrix_order, char jobz, char uplo,
   6261                                lapack_int n, lapack_int ka, lapack_int kb,
   6262                                lapack_complex_double* ab, lapack_int ldab,
   6263                                lapack_complex_double* bb, lapack_int ldbb,
   6264                                double* w, lapack_complex_double* z,
   6265                                lapack_int ldz, lapack_complex_double* work,
   6266                                double* rwork );
   6267 
   6268 lapack_int LAPACKE_chbgvd_work( int matrix_order, char jobz, char uplo,
   6269                                 lapack_int n, lapack_int ka, lapack_int kb,
   6270                                 lapack_complex_float* ab, lapack_int ldab,
   6271                                 lapack_complex_float* bb, lapack_int ldbb,
   6272                                 float* w, lapack_complex_float* z,
   6273                                 lapack_int ldz, lapack_complex_float* work,
   6274                                 lapack_int lwork, float* rwork,
   6275                                 lapack_int lrwork, lapack_int* iwork,
   6276                                 lapack_int liwork );
   6277 lapack_int LAPACKE_zhbgvd_work( int matrix_order, char jobz, char uplo,
   6278                                 lapack_int n, lapack_int ka, lapack_int kb,
   6279                                 lapack_complex_double* ab, lapack_int ldab,
   6280                                 lapack_complex_double* bb, lapack_int ldbb,
   6281                                 double* w, lapack_complex_double* z,
   6282                                 lapack_int ldz, lapack_complex_double* work,
   6283                                 lapack_int lwork, double* rwork,
   6284                                 lapack_int lrwork, lapack_int* iwork,
   6285                                 lapack_int liwork );
   6286 
   6287 lapack_int LAPACKE_chbgvx_work( int matrix_order, char jobz, char range,
   6288                                 char uplo, lapack_int n, lapack_int ka,
   6289                                 lapack_int kb, lapack_complex_float* ab,
   6290                                 lapack_int ldab, lapack_complex_float* bb,
   6291                                 lapack_int ldbb, lapack_complex_float* q,
   6292                                 lapack_int ldq, float vl, float vu,
   6293                                 lapack_int il, lapack_int iu, float abstol,
   6294                                 lapack_int* m, float* w,
   6295                                 lapack_complex_float* z, lapack_int ldz,
   6296                                 lapack_complex_float* work, float* rwork,
   6297                                 lapack_int* iwork, lapack_int* ifail );
   6298 lapack_int LAPACKE_zhbgvx_work( int matrix_order, char jobz, char range,
   6299                                 char uplo, lapack_int n, lapack_int ka,
   6300                                 lapack_int kb, lapack_complex_double* ab,
   6301                                 lapack_int ldab, lapack_complex_double* bb,
   6302                                 lapack_int ldbb, lapack_complex_double* q,
   6303                                 lapack_int ldq, double vl, double vu,
   6304                                 lapack_int il, lapack_int iu, double abstol,
   6305                                 lapack_int* m, double* w,
   6306                                 lapack_complex_double* z, lapack_int ldz,
   6307                                 lapack_complex_double* work, double* rwork,
   6308                                 lapack_int* iwork, lapack_int* ifail );
   6309 
   6310 lapack_int LAPACKE_chbtrd_work( int matrix_order, char vect, char uplo,
   6311                                 lapack_int n, lapack_int kd,
   6312                                 lapack_complex_float* ab, lapack_int ldab,
   6313                                 float* d, float* e, lapack_complex_float* q,
   6314                                 lapack_int ldq, lapack_complex_float* work );
   6315 lapack_int LAPACKE_zhbtrd_work( int matrix_order, char vect, char uplo,
   6316                                 lapack_int n, lapack_int kd,
   6317                                 lapack_complex_double* ab, lapack_int ldab,
   6318                                 double* d, double* e, lapack_complex_double* q,
   6319                                 lapack_int ldq, lapack_complex_double* work );
   6320 
   6321 lapack_int LAPACKE_checon_work( int matrix_order, char uplo, lapack_int n,
   6322                                 const lapack_complex_float* a, lapack_int lda,
   6323                                 const lapack_int* ipiv, float anorm,
   6324                                 float* rcond, lapack_complex_float* work );
   6325 lapack_int LAPACKE_zhecon_work( int matrix_order, char uplo, lapack_int n,
   6326                                 const lapack_complex_double* a, lapack_int lda,
   6327                                 const lapack_int* ipiv, double anorm,
   6328                                 double* rcond, lapack_complex_double* work );
   6329 
   6330 lapack_int LAPACKE_cheequb_work( int matrix_order, char uplo, lapack_int n,
   6331                                  const lapack_complex_float* a, lapack_int lda,
   6332                                  float* s, float* scond, float* amax,
   6333                                  lapack_complex_float* work );
   6334 lapack_int LAPACKE_zheequb_work( int matrix_order, char uplo, lapack_int n,
   6335                                  const lapack_complex_double* a, lapack_int lda,
   6336                                  double* s, double* scond, double* amax,
   6337                                  lapack_complex_double* work );
   6338 
   6339 lapack_int LAPACKE_cheev_work( int matrix_order, char jobz, char uplo,
   6340                                lapack_int n, lapack_complex_float* a,
   6341                                lapack_int lda, float* w,
   6342                                lapack_complex_float* work, lapack_int lwork,
   6343                                float* rwork );
   6344 lapack_int LAPACKE_zheev_work( int matrix_order, char jobz, char uplo,
   6345                                lapack_int n, lapack_complex_double* a,
   6346                                lapack_int lda, double* w,
   6347                                lapack_complex_double* work, lapack_int lwork,
   6348                                double* rwork );
   6349 
   6350 lapack_int LAPACKE_cheevd_work( int matrix_order, char jobz, char uplo,
   6351                                 lapack_int n, lapack_complex_float* a,
   6352                                 lapack_int lda, float* w,
   6353                                 lapack_complex_float* work, lapack_int lwork,
   6354                                 float* rwork, lapack_int lrwork,
   6355                                 lapack_int* iwork, lapack_int liwork );
   6356 lapack_int LAPACKE_zheevd_work( int matrix_order, char jobz, char uplo,
   6357                                 lapack_int n, lapack_complex_double* a,
   6358                                 lapack_int lda, double* w,
   6359                                 lapack_complex_double* work, lapack_int lwork,
   6360                                 double* rwork, lapack_int lrwork,
   6361                                 lapack_int* iwork, lapack_int liwork );
   6362 
   6363 lapack_int LAPACKE_cheevr_work( int matrix_order, char jobz, char range,
   6364                                 char uplo, lapack_int n,
   6365                                 lapack_complex_float* a, lapack_int lda,
   6366                                 float vl, float vu, lapack_int il,
   6367                                 lapack_int iu, float abstol, lapack_int* m,
   6368                                 float* w, lapack_complex_float* z,
   6369                                 lapack_int ldz, lapack_int* isuppz,
   6370                                 lapack_complex_float* work, lapack_int lwork,
   6371                                 float* rwork, lapack_int lrwork,
   6372                                 lapack_int* iwork, lapack_int liwork );
   6373 lapack_int LAPACKE_zheevr_work( int matrix_order, char jobz, char range,
   6374                                 char uplo, lapack_int n,
   6375                                 lapack_complex_double* a, lapack_int lda,
   6376                                 double vl, double vu, lapack_int il,
   6377                                 lapack_int iu, double abstol, lapack_int* m,
   6378                                 double* w, lapack_complex_double* z,
   6379                                 lapack_int ldz, lapack_int* isuppz,
   6380                                 lapack_complex_double* work, lapack_int lwork,
   6381                                 double* rwork, lapack_int lrwork,
   6382                                 lapack_int* iwork, lapack_int liwork );
   6383 
   6384 lapack_int LAPACKE_cheevx_work( int matrix_order, char jobz, char range,
   6385                                 char uplo, lapack_int n,
   6386                                 lapack_complex_float* a, lapack_int lda,
   6387                                 float vl, float vu, lapack_int il,
   6388                                 lapack_int iu, float abstol, lapack_int* m,
   6389                                 float* w, lapack_complex_float* z,
   6390                                 lapack_int ldz, lapack_complex_float* work,
   6391                                 lapack_int lwork, float* rwork,
   6392                                 lapack_int* iwork, lapack_int* ifail );
   6393 lapack_int LAPACKE_zheevx_work( int matrix_order, char jobz, char range,
   6394                                 char uplo, lapack_int n,
   6395                                 lapack_complex_double* a, lapack_int lda,
   6396                                 double vl, double vu, lapack_int il,
   6397                                 lapack_int iu, double abstol, lapack_int* m,
   6398                                 double* w, lapack_complex_double* z,
   6399                                 lapack_int ldz, lapack_complex_double* work,
   6400                                 lapack_int lwork, double* rwork,
   6401                                 lapack_int* iwork, lapack_int* ifail );
   6402 
   6403 lapack_int LAPACKE_chegst_work( int matrix_order, lapack_int itype, char uplo,
   6404                                 lapack_int n, lapack_complex_float* a,
   6405                                 lapack_int lda, const lapack_complex_float* b,
   6406                                 lapack_int ldb );
   6407 lapack_int LAPACKE_zhegst_work( int matrix_order, lapack_int itype, char uplo,
   6408                                 lapack_int n, lapack_complex_double* a,
   6409                                 lapack_int lda, const lapack_complex_double* b,
   6410                                 lapack_int ldb );
   6411 
   6412 lapack_int LAPACKE_chegv_work( int matrix_order, lapack_int itype, char jobz,
   6413                                char uplo, lapack_int n, lapack_complex_float* a,
   6414                                lapack_int lda, lapack_complex_float* b,
   6415                                lapack_int ldb, float* w,
   6416                                lapack_complex_float* work, lapack_int lwork,
   6417                                float* rwork );
   6418 lapack_int LAPACKE_zhegv_work( int matrix_order, lapack_int itype, char jobz,
   6419                                char uplo, lapack_int n,
   6420                                lapack_complex_double* a, lapack_int lda,
   6421                                lapack_complex_double* b, lapack_int ldb,
   6422                                double* w, lapack_complex_double* work,
   6423                                lapack_int lwork, double* rwork );
   6424 
   6425 lapack_int LAPACKE_chegvd_work( int matrix_order, lapack_int itype, char jobz,
   6426                                 char uplo, lapack_int n,
   6427                                 lapack_complex_float* a, lapack_int lda,
   6428                                 lapack_complex_float* b, lapack_int ldb,
   6429                                 float* w, lapack_complex_float* work,
   6430                                 lapack_int lwork, float* rwork,
   6431                                 lapack_int lrwork, lapack_int* iwork,
   6432                                 lapack_int liwork );
   6433 lapack_int LAPACKE_zhegvd_work( int matrix_order, lapack_int itype, char jobz,
   6434                                 char uplo, lapack_int n,
   6435                                 lapack_complex_double* a, lapack_int lda,
   6436                                 lapack_complex_double* b, lapack_int ldb,
   6437                                 double* w, lapack_complex_double* work,
   6438                                 lapack_int lwork, double* rwork,
   6439                                 lapack_int lrwork, lapack_int* iwork,
   6440                                 lapack_int liwork );
   6441 
   6442 lapack_int LAPACKE_chegvx_work( int matrix_order, lapack_int itype, char jobz,
   6443                                 char range, char uplo, lapack_int n,
   6444                                 lapack_complex_float* a, lapack_int lda,
   6445                                 lapack_complex_float* b, lapack_int ldb,
   6446                                 float vl, float vu, lapack_int il,
   6447                                 lapack_int iu, float abstol, lapack_int* m,
   6448                                 float* w, lapack_complex_float* z,
   6449                                 lapack_int ldz, lapack_complex_float* work,
   6450                                 lapack_int lwork, float* rwork,
   6451                                 lapack_int* iwork, lapack_int* ifail );
   6452 lapack_int LAPACKE_zhegvx_work( int matrix_order, lapack_int itype, char jobz,
   6453                                 char range, char uplo, lapack_int n,
   6454                                 lapack_complex_double* a, lapack_int lda,
   6455                                 lapack_complex_double* b, lapack_int ldb,
   6456                                 double vl, double vu, lapack_int il,
   6457                                 lapack_int iu, double abstol, lapack_int* m,
   6458                                 double* w, lapack_complex_double* z,
   6459                                 lapack_int ldz, lapack_complex_double* work,
   6460                                 lapack_int lwork, double* rwork,
   6461                                 lapack_int* iwork, lapack_int* ifail );
   6462 
   6463 lapack_int LAPACKE_cherfs_work( int matrix_order, char uplo, lapack_int n,
   6464                                 lapack_int nrhs, const lapack_complex_float* a,
   6465                                 lapack_int lda, const lapack_complex_float* af,
   6466                                 lapack_int ldaf, const lapack_int* ipiv,
   6467                                 const lapack_complex_float* b, lapack_int ldb,
   6468                                 lapack_complex_float* x, lapack_int ldx,
   6469                                 float* ferr, float* berr,
   6470                                 lapack_complex_float* work, float* rwork );
   6471 lapack_int LAPACKE_zherfs_work( int matrix_order, char uplo, lapack_int n,
   6472                                 lapack_int nrhs, const lapack_complex_double* a,
   6473                                 lapack_int lda, const lapack_complex_double* af,
   6474                                 lapack_int ldaf, const lapack_int* ipiv,
   6475                                 const lapack_complex_double* b, lapack_int ldb,
   6476                                 lapack_complex_double* x, lapack_int ldx,
   6477                                 double* ferr, double* berr,
   6478                                 lapack_complex_double* work, double* rwork );
   6479 
   6480 lapack_int LAPACKE_cherfsx_work( int matrix_order, char uplo, char equed,
   6481                                  lapack_int n, lapack_int nrhs,
   6482                                  const lapack_complex_float* a, lapack_int lda,
   6483                                  const lapack_complex_float* af,
   6484                                  lapack_int ldaf, const lapack_int* ipiv,
   6485                                  const float* s, const lapack_complex_float* b,
   6486                                  lapack_int ldb, lapack_complex_float* x,
   6487                                  lapack_int ldx, float* rcond, float* berr,
   6488                                  lapack_int n_err_bnds, float* err_bnds_norm,
   6489                                  float* err_bnds_comp, lapack_int nparams,
   6490                                  float* params, lapack_complex_float* work,
   6491                                  float* rwork );
   6492 lapack_int LAPACKE_zherfsx_work( int matrix_order, char uplo, char equed,
   6493                                  lapack_int n, lapack_int nrhs,
   6494                                  const lapack_complex_double* a, lapack_int lda,
   6495                                  const lapack_complex_double* af,
   6496                                  lapack_int ldaf, const lapack_int* ipiv,
   6497                                  const double* s,
   6498                                  const lapack_complex_double* b, lapack_int ldb,
   6499                                  lapack_complex_double* x, lapack_int ldx,
   6500                                  double* rcond, double* berr,
   6501                                  lapack_int n_err_bnds, double* err_bnds_norm,
   6502                                  double* err_bnds_comp, lapack_int nparams,
   6503                                  double* params, lapack_complex_double* work,
   6504                                  double* rwork );
   6505 
   6506 lapack_int LAPACKE_chesv_work( int matrix_order, char uplo, lapack_int n,
   6507                                lapack_int nrhs, lapack_complex_float* a,
   6508                                lapack_int lda, lapack_int* ipiv,
   6509                                lapack_complex_float* b, lapack_int ldb,
   6510                                lapack_complex_float* work, lapack_int lwork );
   6511 lapack_int LAPACKE_zhesv_work( int matrix_order, char uplo, lapack_int n,
   6512                                lapack_int nrhs, lapack_complex_double* a,
   6513                                lapack_int lda, lapack_int* ipiv,
   6514                                lapack_complex_double* b, lapack_int ldb,
   6515                                lapack_complex_double* work, lapack_int lwork );
   6516 
   6517 lapack_int LAPACKE_chesvx_work( int matrix_order, char fact, char uplo,
   6518                                 lapack_int n, lapack_int nrhs,
   6519                                 const lapack_complex_float* a, lapack_int lda,
   6520                                 lapack_complex_float* af, lapack_int ldaf,
   6521                                 lapack_int* ipiv, const lapack_complex_float* b,
   6522                                 lapack_int ldb, lapack_complex_float* x,
   6523                                 lapack_int ldx, float* rcond, float* ferr,
   6524                                 float* berr, lapack_complex_float* work,
   6525                                 lapack_int lwork, float* rwork );
   6526 lapack_int LAPACKE_zhesvx_work( int matrix_order, char fact, char uplo,
   6527                                 lapack_int n, lapack_int nrhs,
   6528                                 const lapack_complex_double* a, lapack_int lda,
   6529                                 lapack_complex_double* af, lapack_int ldaf,
   6530                                 lapack_int* ipiv,
   6531                                 const lapack_complex_double* b, lapack_int ldb,
   6532                                 lapack_complex_double* x, lapack_int ldx,
   6533                                 double* rcond, double* ferr, double* berr,
   6534                                 lapack_complex_double* work, lapack_int lwork,
   6535                                 double* rwork );
   6536 
   6537 lapack_int LAPACKE_chesvxx_work( int matrix_order, char fact, char uplo,
   6538                                  lapack_int n, lapack_int nrhs,
   6539                                  lapack_complex_float* a, lapack_int lda,
   6540                                  lapack_complex_float* af, lapack_int ldaf,
   6541                                  lapack_int* ipiv, char* equed, float* s,
   6542                                  lapack_complex_float* b, lapack_int ldb,
   6543                                  lapack_complex_float* x, lapack_int ldx,
   6544                                  float* rcond, float* rpvgrw, float* berr,
   6545                                  lapack_int n_err_bnds, float* err_bnds_norm,
   6546                                  float* err_bnds_comp, lapack_int nparams,
   6547                                  float* params, lapack_complex_float* work,
   6548                                  float* rwork );
   6549 lapack_int LAPACKE_zhesvxx_work( int matrix_order, char fact, char uplo,
   6550                                  lapack_int n, lapack_int nrhs,
   6551                                  lapack_complex_double* a, lapack_int lda,
   6552                                  lapack_complex_double* af, lapack_int ldaf,
   6553                                  lapack_int* ipiv, char* equed, double* s,
   6554                                  lapack_complex_double* b, lapack_int ldb,
   6555                                  lapack_complex_double* x, lapack_int ldx,
   6556                                  double* rcond, double* rpvgrw, double* berr,
   6557                                  lapack_int n_err_bnds, double* err_bnds_norm,
   6558                                  double* err_bnds_comp, lapack_int nparams,
   6559                                  double* params, lapack_complex_double* work,
   6560                                  double* rwork );
   6561 
   6562 lapack_int LAPACKE_chetrd_work( int matrix_order, char uplo, lapack_int n,
   6563                                 lapack_complex_float* a, lapack_int lda,
   6564                                 float* d, float* e, lapack_complex_float* tau,
   6565                                 lapack_complex_float* work, lapack_int lwork );
   6566 lapack_int LAPACKE_zhetrd_work( int matrix_order, char uplo, lapack_int n,
   6567                                 lapack_complex_double* a, lapack_int lda,
   6568                                 double* d, double* e,
   6569                                 lapack_complex_double* tau,
   6570                                 lapack_complex_double* work, lapack_int lwork );
   6571 
   6572 lapack_int LAPACKE_chetrf_work( int matrix_order, char uplo, lapack_int n,
   6573                                 lapack_complex_float* a, lapack_int lda,
   6574                                 lapack_int* ipiv, lapack_complex_float* work,
   6575                                 lapack_int lwork );
   6576 lapack_int LAPACKE_zhetrf_work( int matrix_order, char uplo, lapack_int n,
   6577                                 lapack_complex_double* a, lapack_int lda,
   6578                                 lapack_int* ipiv, lapack_complex_double* work,
   6579                                 lapack_int lwork );
   6580 
   6581 lapack_int LAPACKE_chetri_work( int matrix_order, char uplo, lapack_int n,
   6582                                 lapack_complex_float* a, lapack_int lda,
   6583                                 const lapack_int* ipiv,
   6584                                 lapack_complex_float* work );
   6585 lapack_int LAPACKE_zhetri_work( int matrix_order, char uplo, lapack_int n,
   6586                                 lapack_complex_double* a, lapack_int lda,
   6587                                 const lapack_int* ipiv,
   6588                                 lapack_complex_double* work );
   6589 
   6590 lapack_int LAPACKE_chetrs_work( int matrix_order, char uplo, lapack_int n,
   6591                                 lapack_int nrhs, const lapack_complex_float* a,
   6592                                 lapack_int lda, const lapack_int* ipiv,
   6593                                 lapack_complex_float* b, lapack_int ldb );
   6594 lapack_int LAPACKE_zhetrs_work( int matrix_order, char uplo, lapack_int n,
   6595                                 lapack_int nrhs, const lapack_complex_double* a,
   6596                                 lapack_int lda, const lapack_int* ipiv,
   6597                                 lapack_complex_double* b, lapack_int ldb );
   6598 
   6599 lapack_int LAPACKE_chfrk_work( int matrix_order, char transr, char uplo,
   6600                                char trans, lapack_int n, lapack_int k,
   6601                                float alpha, const lapack_complex_float* a,
   6602                                lapack_int lda, float beta,
   6603                                lapack_complex_float* c );
   6604 lapack_int LAPACKE_zhfrk_work( int matrix_order, char transr, char uplo,
   6605                                char trans, lapack_int n, lapack_int k,
   6606                                double alpha, const lapack_complex_double* a,
   6607                                lapack_int lda, double beta,
   6608                                lapack_complex_double* c );
   6609 
   6610 lapack_int LAPACKE_shgeqz_work( int matrix_order, char job, char compq,
   6611                                 char compz, lapack_int n, lapack_int ilo,
   6612                                 lapack_int ihi, float* h, lapack_int ldh,
   6613                                 float* t, lapack_int ldt, float* alphar,
   6614                                 float* alphai, float* beta, float* q,
   6615                                 lapack_int ldq, float* z, lapack_int ldz,
   6616                                 float* work, lapack_int lwork );
   6617 lapack_int LAPACKE_dhgeqz_work( int matrix_order, char job, char compq,
   6618                                 char compz, lapack_int n, lapack_int ilo,
   6619                                 lapack_int ihi, double* h, lapack_int ldh,
   6620                                 double* t, lapack_int ldt, double* alphar,
   6621                                 double* alphai, double* beta, double* q,
   6622                                 lapack_int ldq, double* z, lapack_int ldz,
   6623                                 double* work, lapack_int lwork );
   6624 lapack_int LAPACKE_chgeqz_work( int matrix_order, char job, char compq,
   6625                                 char compz, lapack_int n, lapack_int ilo,
   6626                                 lapack_int ihi, lapack_complex_float* h,
   6627                                 lapack_int ldh, lapack_complex_float* t,
   6628                                 lapack_int ldt, lapack_complex_float* alpha,
   6629                                 lapack_complex_float* beta,
   6630                                 lapack_complex_float* q, lapack_int ldq,
   6631                                 lapack_complex_float* z, lapack_int ldz,
   6632                                 lapack_complex_float* work, lapack_int lwork,
   6633                                 float* rwork );
   6634 lapack_int LAPACKE_zhgeqz_work( int matrix_order, char job, char compq,
   6635                                 char compz, lapack_int n, lapack_int ilo,
   6636                                 lapack_int ihi, lapack_complex_double* h,
   6637                                 lapack_int ldh, lapack_complex_double* t,
   6638                                 lapack_int ldt, lapack_complex_double* alpha,
   6639                                 lapack_complex_double* beta,
   6640                                 lapack_complex_double* q, lapack_int ldq,
   6641                                 lapack_complex_double* z, lapack_int ldz,
   6642                                 lapack_complex_double* work, lapack_int lwork,
   6643                                 double* rwork );
   6644 
   6645 lapack_int LAPACKE_chpcon_work( int matrix_order, char uplo, lapack_int n,
   6646                                 const lapack_complex_float* ap,
   6647                                 const lapack_int* ipiv, float anorm,
   6648                                 float* rcond, lapack_complex_float* work );
   6649 lapack_int LAPACKE_zhpcon_work( int matrix_order, char uplo, lapack_int n,
   6650                                 const lapack_complex_double* ap,
   6651                                 const lapack_int* ipiv, double anorm,
   6652                                 double* rcond, lapack_complex_double* work );
   6653 
   6654 lapack_int LAPACKE_chpev_work( int matrix_order, char jobz, char uplo,
   6655                                lapack_int n, lapack_complex_float* ap, float* w,
   6656                                lapack_complex_float* z, lapack_int ldz,
   6657                                lapack_complex_float* work, float* rwork );
   6658 lapack_int LAPACKE_zhpev_work( int matrix_order, char jobz, char uplo,
   6659                                lapack_int n, lapack_complex_double* ap,
   6660                                double* w, lapack_complex_double* z,
   6661                                lapack_int ldz, lapack_complex_double* work,
   6662                                double* rwork );
   6663 
   6664 lapack_int LAPACKE_chpevd_work( int matrix_order, char jobz, char uplo,
   6665                                 lapack_int n, lapack_complex_float* ap,
   6666                                 float* w, lapack_complex_float* z,
   6667                                 lapack_int ldz, lapack_complex_float* work,
   6668                                 lapack_int lwork, float* rwork,
   6669                                 lapack_int lrwork, lapack_int* iwork,
   6670                                 lapack_int liwork );
   6671 lapack_int LAPACKE_zhpevd_work( int matrix_order, char jobz, char uplo,
   6672                                 lapack_int n, lapack_complex_double* ap,
   6673                                 double* w, lapack_complex_double* z,
   6674                                 lapack_int ldz, lapack_complex_double* work,
   6675                                 lapack_int lwork, double* rwork,
   6676                                 lapack_int lrwork, lapack_int* iwork,
   6677                                 lapack_int liwork );
   6678 
   6679 lapack_int LAPACKE_chpevx_work( int matrix_order, char jobz, char range,
   6680                                 char uplo, lapack_int n,
   6681                                 lapack_complex_float* ap, float vl, float vu,
   6682                                 lapack_int il, lapack_int iu, float abstol,
   6683                                 lapack_int* m, float* w,
   6684                                 lapack_complex_float* z, lapack_int ldz,
   6685                                 lapack_complex_float* work, float* rwork,
   6686                                 lapack_int* iwork, lapack_int* ifail );
   6687 lapack_int LAPACKE_zhpevx_work( int matrix_order, char jobz, char range,
   6688                                 char uplo, lapack_int n,
   6689                                 lapack_complex_double* ap, double vl, double vu,
   6690                                 lapack_int il, lapack_int iu, double abstol,
   6691                                 lapack_int* m, double* w,
   6692                                 lapack_complex_double* z, lapack_int ldz,
   6693                                 lapack_complex_double* work, double* rwork,
   6694                                 lapack_int* iwork, lapack_int* ifail );
   6695 
   6696 lapack_int LAPACKE_chpgst_work( int matrix_order, lapack_int itype, char uplo,
   6697                                 lapack_int n, lapack_complex_float* ap,
   6698                                 const lapack_complex_float* bp );
   6699 lapack_int LAPACKE_zhpgst_work( int matrix_order, lapack_int itype, char uplo,
   6700                                 lapack_int n, lapack_complex_double* ap,
   6701                                 const lapack_complex_double* bp );
   6702 
   6703 lapack_int LAPACKE_chpgv_work( int matrix_order, lapack_int itype, char jobz,
   6704                                char uplo, lapack_int n,
   6705                                lapack_complex_float* ap,
   6706                                lapack_complex_float* bp, float* w,
   6707                                lapack_complex_float* z, lapack_int ldz,
   6708                                lapack_complex_float* work, float* rwork );
   6709 lapack_int LAPACKE_zhpgv_work( int matrix_order, lapack_int itype, char jobz,
   6710                                char uplo, lapack_int n,
   6711                                lapack_complex_double* ap,
   6712                                lapack_complex_double* bp, double* w,
   6713                                lapack_complex_double* z, lapack_int ldz,
   6714                                lapack_complex_double* work, double* rwork );
   6715 
   6716 lapack_int LAPACKE_chpgvd_work( int matrix_order, lapack_int itype, char jobz,
   6717                                 char uplo, lapack_int n,
   6718                                 lapack_complex_float* ap,
   6719                                 lapack_complex_float* bp, float* w,
   6720                                 lapack_complex_float* z, lapack_int ldz,
   6721                                 lapack_complex_float* work, lapack_int lwork,
   6722                                 float* rwork, lapack_int lrwork,
   6723                                 lapack_int* iwork, lapack_int liwork );
   6724 lapack_int LAPACKE_zhpgvd_work( int matrix_order, lapack_int itype, char jobz,
   6725                                 char uplo, lapack_int n,
   6726                                 lapack_complex_double* ap,
   6727                                 lapack_complex_double* bp, double* w,
   6728                                 lapack_complex_double* z, lapack_int ldz,
   6729                                 lapack_complex_double* work, lapack_int lwork,
   6730                                 double* rwork, lapack_int lrwork,
   6731                                 lapack_int* iwork, lapack_int liwork );
   6732 
   6733 lapack_int LAPACKE_chpgvx_work( int matrix_order, lapack_int itype, char jobz,
   6734                                 char range, char uplo, lapack_int n,
   6735                                 lapack_complex_float* ap,
   6736                                 lapack_complex_float* bp, float vl, float vu,
   6737                                 lapack_int il, lapack_int iu, float abstol,
   6738                                 lapack_int* m, float* w,
   6739                                 lapack_complex_float* z, lapack_int ldz,
   6740                                 lapack_complex_float* work, float* rwork,
   6741                                 lapack_int* iwork, lapack_int* ifail );
   6742 lapack_int LAPACKE_zhpgvx_work( int matrix_order, lapack_int itype, char jobz,
   6743                                 char range, char uplo, lapack_int n,
   6744                                 lapack_complex_double* ap,
   6745                                 lapack_complex_double* bp, double vl, double vu,
   6746                                 lapack_int il, lapack_int iu, double abstol,
   6747                                 lapack_int* m, double* w,
   6748                                 lapack_complex_double* z, lapack_int ldz,
   6749                                 lapack_complex_double* work, double* rwork,
   6750                                 lapack_int* iwork, lapack_int* ifail );
   6751 
   6752 lapack_int LAPACKE_chprfs_work( int matrix_order, char uplo, lapack_int n,
   6753                                 lapack_int nrhs, const lapack_complex_float* ap,
   6754                                 const lapack_complex_float* afp,
   6755                                 const lapack_int* ipiv,
   6756                                 const lapack_complex_float* b, lapack_int ldb,
   6757                                 lapack_complex_float* x, lapack_int ldx,
   6758                                 float* ferr, float* berr,
   6759                                 lapack_complex_float* work, float* rwork );
   6760 lapack_int LAPACKE_zhprfs_work( int matrix_order, char uplo, lapack_int n,
   6761                                 lapack_int nrhs,
   6762                                 const lapack_complex_double* ap,
   6763                                 const lapack_complex_double* afp,
   6764                                 const lapack_int* ipiv,
   6765                                 const lapack_complex_double* b, lapack_int ldb,
   6766                                 lapack_complex_double* x, lapack_int ldx,
   6767                                 double* ferr, double* berr,
   6768                                 lapack_complex_double* work, double* rwork );
   6769 
   6770 lapack_int LAPACKE_chpsv_work( int matrix_order, char uplo, lapack_int n,
   6771                                lapack_int nrhs, lapack_complex_float* ap,
   6772                                lapack_int* ipiv, lapack_complex_float* b,
   6773                                lapack_int ldb );
   6774 lapack_int LAPACKE_zhpsv_work( int matrix_order, char uplo, lapack_int n,
   6775                                lapack_int nrhs, lapack_complex_double* ap,
   6776                                lapack_int* ipiv, lapack_complex_double* b,
   6777                                lapack_int ldb );
   6778 
   6779 lapack_int LAPACKE_chpsvx_work( int matrix_order, char fact, char uplo,
   6780                                 lapack_int n, lapack_int nrhs,
   6781                                 const lapack_complex_float* ap,
   6782                                 lapack_complex_float* afp, lapack_int* ipiv,
   6783                                 const lapack_complex_float* b, lapack_int ldb,
   6784                                 lapack_complex_float* x, lapack_int ldx,
   6785                                 float* rcond, float* ferr, float* berr,
   6786                                 lapack_complex_float* work, float* rwork );
   6787 lapack_int LAPACKE_zhpsvx_work( int matrix_order, char fact, char uplo,
   6788                                 lapack_int n, lapack_int nrhs,
   6789                                 const lapack_complex_double* ap,
   6790                                 lapack_complex_double* afp, lapack_int* ipiv,
   6791                                 const lapack_complex_double* b, lapack_int ldb,
   6792                                 lapack_complex_double* x, lapack_int ldx,
   6793                                 double* rcond, double* ferr, double* berr,
   6794                                 lapack_complex_double* work, double* rwork );
   6795 
   6796 lapack_int LAPACKE_chptrd_work( int matrix_order, char uplo, lapack_int n,
   6797                                 lapack_complex_float* ap, float* d, float* e,
   6798                                 lapack_complex_float* tau );
   6799 lapack_int LAPACKE_zhptrd_work( int matrix_order, char uplo, lapack_int n,
   6800                                 lapack_complex_double* ap, double* d, double* e,
   6801                                 lapack_complex_double* tau );
   6802 
   6803 lapack_int LAPACKE_chptrf_work( int matrix_order, char uplo, lapack_int n,
   6804                                 lapack_complex_float* ap, lapack_int* ipiv );
   6805 lapack_int LAPACKE_zhptrf_work( int matrix_order, char uplo, lapack_int n,
   6806                                 lapack_complex_double* ap, lapack_int* ipiv );
   6807 
   6808 lapack_int LAPACKE_chptri_work( int matrix_order, char uplo, lapack_int n,
   6809                                 lapack_complex_float* ap,
   6810                                 const lapack_int* ipiv,
   6811                                 lapack_complex_float* work );
   6812 lapack_int LAPACKE_zhptri_work( int matrix_order, char uplo, lapack_int n,
   6813                                 lapack_complex_double* ap,
   6814                                 const lapack_int* ipiv,
   6815                                 lapack_complex_double* work );
   6816 
   6817 lapack_int LAPACKE_chptrs_work( int matrix_order, char uplo, lapack_int n,
   6818                                 lapack_int nrhs, const lapack_complex_float* ap,
   6819                                 const lapack_int* ipiv, lapack_complex_float* b,
   6820                                 lapack_int ldb );
   6821 lapack_int LAPACKE_zhptrs_work( int matrix_order, char uplo, lapack_int n,
   6822                                 lapack_int nrhs,
   6823                                 const lapack_complex_double* ap,
   6824                                 const lapack_int* ipiv,
   6825                                 lapack_complex_double* b, lapack_int ldb );
   6826 
   6827 lapack_int LAPACKE_shsein_work( int matrix_order, char job, char eigsrc,
   6828                                 char initv, lapack_logical* select,
   6829                                 lapack_int n, const float* h, lapack_int ldh,
   6830                                 float* wr, const float* wi, float* vl,
   6831                                 lapack_int ldvl, float* vr, lapack_int ldvr,
   6832                                 lapack_int mm, lapack_int* m, float* work,
   6833                                 lapack_int* ifaill, lapack_int* ifailr );
   6834 lapack_int LAPACKE_dhsein_work( int matrix_order, char job, char eigsrc,
   6835                                 char initv, lapack_logical* select,
   6836                                 lapack_int n, const double* h, lapack_int ldh,
   6837                                 double* wr, const double* wi, double* vl,
   6838                                 lapack_int ldvl, double* vr, lapack_int ldvr,
   6839                                 lapack_int mm, lapack_int* m, double* work,
   6840                                 lapack_int* ifaill, lapack_int* ifailr );
   6841 lapack_int LAPACKE_chsein_work( int matrix_order, char job, char eigsrc,
   6842                                 char initv, const lapack_logical* select,
   6843                                 lapack_int n, const lapack_complex_float* h,
   6844                                 lapack_int ldh, lapack_complex_float* w,
   6845                                 lapack_complex_float* vl, lapack_int ldvl,
   6846                                 lapack_complex_float* vr, lapack_int ldvr,
   6847                                 lapack_int mm, lapack_int* m,
   6848                                 lapack_complex_float* work, float* rwork,
   6849                                 lapack_int* ifaill, lapack_int* ifailr );
   6850 lapack_int LAPACKE_zhsein_work( int matrix_order, char job, char eigsrc,
   6851                                 char initv, const lapack_logical* select,
   6852                                 lapack_int n, const lapack_complex_double* h,
   6853                                 lapack_int ldh, lapack_complex_double* w,
   6854                                 lapack_complex_double* vl, lapack_int ldvl,
   6855                                 lapack_complex_double* vr, lapack_int ldvr,
   6856                                 lapack_int mm, lapack_int* m,
   6857                                 lapack_complex_double* work, double* rwork,
   6858                                 lapack_int* ifaill, lapack_int* ifailr );
   6859 
   6860 lapack_int LAPACKE_shseqr_work( int matrix_order, char job, char compz,
   6861                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   6862                                 float* h, lapack_int ldh, float* wr, float* wi,
   6863                                 float* z, lapack_int ldz, float* work,
   6864                                 lapack_int lwork );
   6865 lapack_int LAPACKE_dhseqr_work( int matrix_order, char job, char compz,
   6866                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   6867                                 double* h, lapack_int ldh, double* wr,
   6868                                 double* wi, double* z, lapack_int ldz,
   6869                                 double* work, lapack_int lwork );
   6870 lapack_int LAPACKE_chseqr_work( int matrix_order, char job, char compz,
   6871                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   6872                                 lapack_complex_float* h, lapack_int ldh,
   6873                                 lapack_complex_float* w,
   6874                                 lapack_complex_float* z, lapack_int ldz,
   6875                                 lapack_complex_float* work, lapack_int lwork );
   6876 lapack_int LAPACKE_zhseqr_work( int matrix_order, char job, char compz,
   6877                                 lapack_int n, lapack_int ilo, lapack_int ihi,
   6878                                 lapack_complex_double* h, lapack_int ldh,
   6879                                 lapack_complex_double* w,
   6880                                 lapack_complex_double* z, lapack_int ldz,
   6881                                 lapack_complex_double* work, lapack_int lwork );
   6882 
   6883 lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
   6884                                 lapack_int incx );
   6885 lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
   6886                                 lapack_int incx );
   6887 
   6888 lapack_int LAPACKE_slacpy_work( int matrix_order, char uplo, lapack_int m,
   6889                                 lapack_int n, const float* a, lapack_int lda,
   6890                                 float* b, lapack_int ldb );
   6891 lapack_int LAPACKE_dlacpy_work( int matrix_order, char uplo, lapack_int m,
   6892                                 lapack_int n, const double* a, lapack_int lda,
   6893                                 double* b, lapack_int ldb );
   6894 lapack_int LAPACKE_clacpy_work( int matrix_order, char uplo, lapack_int m,
   6895                                 lapack_int n, const lapack_complex_float* a,
   6896                                 lapack_int lda, lapack_complex_float* b,
   6897                                 lapack_int ldb );
   6898 lapack_int LAPACKE_zlacpy_work( int matrix_order, char uplo, lapack_int m,
   6899                                 lapack_int n, const lapack_complex_double* a,
   6900                                 lapack_int lda, lapack_complex_double* b,
   6901                                 lapack_int ldb );
   6902 
   6903 lapack_int LAPACKE_zlag2c_work( int matrix_order, lapack_int m, lapack_int n,
   6904                                 const lapack_complex_double* a, lapack_int lda,
   6905                                 lapack_complex_float* sa, lapack_int ldsa );
   6906 
   6907 lapack_int LAPACKE_slag2d_work( int matrix_order, lapack_int m, lapack_int n,
   6908                                 const float* sa, lapack_int ldsa, double* a,
   6909                                 lapack_int lda );
   6910 
   6911 lapack_int LAPACKE_dlag2s_work( int matrix_order, lapack_int m, lapack_int n,
   6912                                 const double* a, lapack_int lda, float* sa,
   6913                                 lapack_int ldsa );
   6914 
   6915 lapack_int LAPACKE_clag2z_work( int matrix_order, lapack_int m, lapack_int n,
   6916                                 const lapack_complex_float* sa, lapack_int ldsa,
   6917                                 lapack_complex_double* a, lapack_int lda );
   6918 
   6919 lapack_int LAPACKE_slagge_work( int matrix_order, lapack_int m, lapack_int n,
   6920                                 lapack_int kl, lapack_int ku, const float* d,
   6921                                 float* a, lapack_int lda, lapack_int* iseed,
   6922                                 float* work );
   6923 lapack_int LAPACKE_dlagge_work( int matrix_order, lapack_int m, lapack_int n,
   6924                                 lapack_int kl, lapack_int ku, const double* d,
   6925                                 double* a, lapack_int lda, lapack_int* iseed,
   6926                                 double* work );
   6927 lapack_int LAPACKE_clagge_work( int matrix_order, lapack_int m, lapack_int n,
   6928                                 lapack_int kl, lapack_int ku, const float* d,
   6929                                 lapack_complex_float* a, lapack_int lda,
   6930                                 lapack_int* iseed, lapack_complex_float* work );
   6931 lapack_int LAPACKE_zlagge_work( int matrix_order, lapack_int m, lapack_int n,
   6932                                 lapack_int kl, lapack_int ku, const double* d,
   6933                                 lapack_complex_double* a, lapack_int lda,
   6934                                 lapack_int* iseed,
   6935                                 lapack_complex_double* work );
   6936 
   6937 lapack_int LAPACKE_claghe_work( int matrix_order, lapack_int n, lapack_int k,
   6938                                 const float* d, lapack_complex_float* a,
   6939                                 lapack_int lda, lapack_int* iseed,
   6940                                 lapack_complex_float* work );
   6941 lapack_int LAPACKE_zlaghe_work( int matrix_order, lapack_int n, lapack_int k,
   6942                                 const double* d, lapack_complex_double* a,
   6943                                 lapack_int lda, lapack_int* iseed,
   6944                                 lapack_complex_double* work );
   6945 
   6946 lapack_int LAPACKE_slagsy_work( int matrix_order, lapack_int n, lapack_int k,
   6947                                 const float* d, float* a, lapack_int lda,
   6948                                 lapack_int* iseed, float* work );
   6949 lapack_int LAPACKE_dlagsy_work( int matrix_order, lapack_int n, lapack_int k,
   6950                                 const double* d, double* a, lapack_int lda,
   6951                                 lapack_int* iseed, double* work );
   6952 lapack_int LAPACKE_clagsy_work( int matrix_order, lapack_int n, lapack_int k,
   6953                                 const float* d, lapack_complex_float* a,
   6954                                 lapack_int lda, lapack_int* iseed,
   6955                                 lapack_complex_float* work );
   6956 lapack_int LAPACKE_zlagsy_work( int matrix_order, lapack_int n, lapack_int k,
   6957                                 const double* d, lapack_complex_double* a,
   6958                                 lapack_int lda, lapack_int* iseed,
   6959                                 lapack_complex_double* work );
   6960 
   6961 lapack_int LAPACKE_slapmr_work( int matrix_order, lapack_logical forwrd,
   6962                                 lapack_int m, lapack_int n, float* x,
   6963                                 lapack_int ldx, lapack_int* k );
   6964 lapack_int LAPACKE_dlapmr_work( int matrix_order, lapack_logical forwrd,
   6965                                 lapack_int m, lapack_int n, double* x,
   6966                                 lapack_int ldx, lapack_int* k );
   6967 lapack_int LAPACKE_clapmr_work( int matrix_order, lapack_logical forwrd,
   6968                                 lapack_int m, lapack_int n,
   6969                                 lapack_complex_float* x, lapack_int ldx,
   6970                                 lapack_int* k );
   6971 lapack_int LAPACKE_zlapmr_work( int matrix_order, lapack_logical forwrd,
   6972                                 lapack_int m, lapack_int n,
   6973                                 lapack_complex_double* x, lapack_int ldx,
   6974                                 lapack_int* k );
   6975 
   6976 lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
   6977                                  float* r );
   6978 lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
   6979                                  double* r );
   6980 
   6981 lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
   6982                                  float* sn );
   6983 lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
   6984                                  double* sn );
   6985 
   6986 float LAPACKE_slapy2_work( float x, float y );
   6987 double LAPACKE_dlapy2_work( double x, double y );
   6988 
   6989 float LAPACKE_slapy3_work( float x, float y, float z );
   6990 double LAPACKE_dlapy3_work( double x, double y, double z );
   6991 
   6992 float LAPACKE_slamch_work( char cmach );
   6993 double LAPACKE_dlamch_work( char cmach );
   6994 
   6995 float LAPACKE_slange_work( int matrix_order, char norm, lapack_int m,
   6996                                 lapack_int n, const float* a, lapack_int lda,
   6997                                 float* work );
   6998 double LAPACKE_dlange_work( int matrix_order, char norm, lapack_int m,
   6999                                 lapack_int n, const double* a, lapack_int lda,
   7000                                 double* work );
   7001 float LAPACKE_clange_work( int matrix_order, char norm, lapack_int m,
   7002                                 lapack_int n, const lapack_complex_float* a,
   7003                                 lapack_int lda, float* work );
   7004 double LAPACKE_zlange_work( int matrix_order, char norm, lapack_int m,
   7005                                 lapack_int n, const lapack_complex_double* a,
   7006                                 lapack_int lda, double* work );
   7007 
   7008 float LAPACKE_clanhe_work( int matrix_order, char norm, char uplo,
   7009                                 lapack_int n, const lapack_complex_float* a,
   7010                                 lapack_int lda, float* work );
   7011 double LAPACKE_zlanhe_work( int matrix_order, char norm, char uplo,
   7012                                 lapack_int n, const lapack_complex_double* a,
   7013                                 lapack_int lda, double* work );
   7014 
   7015 float LAPACKE_slansy_work( int matrix_order, char norm, char uplo,
   7016                                 lapack_int n, const float* a, lapack_int lda,
   7017                                 float* work );
   7018 double LAPACKE_dlansy_work( int matrix_order, char norm, char uplo,
   7019                                 lapack_int n, const double* a, lapack_int lda,
   7020                                 double* work );
   7021 float LAPACKE_clansy_work( int matrix_order, char norm, char uplo,
   7022                                 lapack_int n, const lapack_complex_float* a,
   7023                                 lapack_int lda, float* work );
   7024 double LAPACKE_zlansy_work( int matrix_order, char norm, char uplo,
   7025                                 lapack_int n, const lapack_complex_double* a,
   7026                                 lapack_int lda, double* work );
   7027 
   7028 float LAPACKE_slantr_work( int matrix_order, char norm, char uplo,
   7029                                 char diag, lapack_int m, lapack_int n, const float* a,
   7030                                 lapack_int lda, float* work );
   7031 double LAPACKE_dlantr_work( int matrix_order, char norm, char uplo,
   7032                                 char diag, lapack_int m, lapack_int n,
   7033                                 const double* a, lapack_int lda, double* work );
   7034 float LAPACKE_clantr_work( int matrix_order, char norm, char uplo,
   7035                                 char diag, lapack_int m, lapack_int n,
   7036                                 const lapack_complex_float* a, lapack_int lda,
   7037                                 float* work );
   7038 double LAPACKE_zlantr_work( int matrix_order, char norm, char uplo,
   7039                                 char diag, lapack_int m, lapack_int n,
   7040                                 const lapack_complex_double* a, lapack_int lda,
   7041                                 double* work );
   7042 
   7043 lapack_int LAPACKE_slarfb_work( int matrix_order, char side, char trans,
   7044                                 char direct, char storev, lapack_int m,
   7045                                 lapack_int n, lapack_int k, const float* v,
   7046                                 lapack_int ldv, const float* t, lapack_int ldt,
   7047                                 float* c, lapack_int ldc, float* work,
   7048                                 lapack_int ldwork );
   7049 lapack_int LAPACKE_dlarfb_work( int matrix_order, char side, char trans,
   7050                                 char direct, char storev, lapack_int m,
   7051                                 lapack_int n, lapack_int k, const double* v,
   7052                                 lapack_int ldv, const double* t, lapack_int ldt,
   7053                                 double* c, lapack_int ldc, double* work,
   7054                                 lapack_int ldwork );
   7055 lapack_int LAPACKE_clarfb_work( int matrix_order, char side, char trans,
   7056                                 char direct, char storev, lapack_int m,
   7057                                 lapack_int n, lapack_int k,
   7058                                 const lapack_complex_float* v, lapack_int ldv,
   7059                                 const lapack_complex_float* t, lapack_int ldt,
   7060                                 lapack_complex_float* c, lapack_int ldc,
   7061                                 lapack_complex_float* work, lapack_int ldwork );
   7062 lapack_int LAPACKE_zlarfb_work( int matrix_order, char side, char trans,
   7063                                 char direct, char storev, lapack_int m,
   7064                                 lapack_int n, lapack_int k,
   7065                                 const lapack_complex_double* v, lapack_int ldv,
   7066                                 const lapack_complex_double* t, lapack_int ldt,
   7067                                 lapack_complex_double* c, lapack_int ldc,
   7068                                 lapack_complex_double* work,
   7069                                 lapack_int ldwork );
   7070 
   7071 lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
   7072                                 lapack_int incx, float* tau );
   7073 lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
   7074                                 lapack_int incx, double* tau );
   7075 lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
   7076                                 lapack_complex_float* x, lapack_int incx,
   7077                                 lapack_complex_float* tau );
   7078 lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
   7079                                 lapack_complex_double* x, lapack_int incx,
   7080                                 lapack_complex_double* tau );
   7081 
   7082 lapack_int LAPACKE_slarft_work( int matrix_order, char direct, char storev,
   7083                                 lapack_int n, lapack_int k, const float* v,
   7084                                 lapack_int ldv, const float* tau, float* t,
   7085                                 lapack_int ldt );
   7086 lapack_int LAPACKE_dlarft_work( int matrix_order, char direct, char storev,
   7087                                 lapack_int n, lapack_int k, const double* v,
   7088                                 lapack_int ldv, const double* tau, double* t,
   7089                                 lapack_int ldt );
   7090 lapack_int LAPACKE_clarft_work( int matrix_order, char direct, char storev,
   7091                                 lapack_int n, lapack_int k,
   7092                                 const lapack_complex_float* v, lapack_int ldv,
   7093                                 const lapack_complex_float* tau,
   7094                                 lapack_complex_float* t, lapack_int ldt );
   7095 lapack_int LAPACKE_zlarft_work( int matrix_order, char direct, char storev,
   7096                                 lapack_int n, lapack_int k,
   7097                                 const lapack_complex_double* v, lapack_int ldv,
   7098                                 const lapack_complex_double* tau,
   7099                                 lapack_complex_double* t, lapack_int ldt );
   7100 
   7101 lapack_int LAPACKE_slarfx_work( int matrix_order, char side, lapack_int m,
   7102                                 lapack_int n, const float* v, float tau,
   7103                                 float* c, lapack_int ldc, float* work );
   7104 lapack_int LAPACKE_dlarfx_work( int matrix_order, char side, lapack_int m,
   7105                                 lapack_int n, const double* v, double tau,
   7106                                 double* c, lapack_int ldc, double* work );
   7107 lapack_int LAPACKE_clarfx_work( int matrix_order, char side, lapack_int m,
   7108                                 lapack_int n, const lapack_complex_float* v,
   7109                                 lapack_complex_float tau,
   7110                                 lapack_complex_float* c, lapack_int ldc,
   7111                                 lapack_complex_float* work );
   7112 lapack_int LAPACKE_zlarfx_work( int matrix_order, char side, lapack_int m,
   7113                                 lapack_int n, const lapack_complex_double* v,
   7114                                 lapack_complex_double tau,
   7115                                 lapack_complex_double* c, lapack_int ldc,
   7116                                 lapack_complex_double* work );
   7117 
   7118 lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
   7119                                 lapack_int n, float* x );
   7120 lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
   7121                                 lapack_int n, double* x );
   7122 lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
   7123                                 lapack_int n, lapack_complex_float* x );
   7124 lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
   7125                                 lapack_int n, lapack_complex_double* x );
   7126 
   7127 lapack_int LAPACKE_slaset_work( int matrix_order, char uplo, lapack_int m,
   7128                                 lapack_int n, float alpha, float beta, float* a,
   7129                                 lapack_int lda );
   7130 lapack_int LAPACKE_dlaset_work( int matrix_order, char uplo, lapack_int m,
   7131                                 lapack_int n, double alpha, double beta,
   7132                                 double* a, lapack_int lda );
   7133 lapack_int LAPACKE_claset_work( int matrix_order, char uplo, lapack_int m,
   7134                                 lapack_int n, lapack_complex_float alpha,
   7135                                 lapack_complex_float beta,
   7136                                 lapack_complex_float* a, lapack_int lda );
   7137 lapack_int LAPACKE_zlaset_work( int matrix_order, char uplo, lapack_int m,
   7138                                 lapack_int n, lapack_complex_double alpha,
   7139                                 lapack_complex_double beta,
   7140                                 lapack_complex_double* a, lapack_int lda );
   7141 
   7142 lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
   7143 lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
   7144 
   7145 lapack_int LAPACKE_slaswp_work( int matrix_order, lapack_int n, float* a,
   7146                                 lapack_int lda, lapack_int k1, lapack_int k2,
   7147                                 const lapack_int* ipiv, lapack_int incx );
   7148 lapack_int LAPACKE_dlaswp_work( int matrix_order, lapack_int n, double* a,
   7149                                 lapack_int lda, lapack_int k1, lapack_int k2,
   7150                                 const lapack_int* ipiv, lapack_int incx );
   7151 lapack_int LAPACKE_claswp_work( int matrix_order, lapack_int n,
   7152                                 lapack_complex_float* a, lapack_int lda,
   7153                                 lapack_int k1, lapack_int k2,
   7154                                 const lapack_int* ipiv, lapack_int incx );
   7155 lapack_int LAPACKE_zlaswp_work( int matrix_order, lapack_int n,
   7156                                 lapack_complex_double* a, lapack_int lda,
   7157                                 lapack_int k1, lapack_int k2,
   7158                                 const lapack_int* ipiv, lapack_int incx );
   7159 
   7160 lapack_int LAPACKE_slatms_work( int matrix_order, lapack_int m, lapack_int n,
   7161                                 char dist, lapack_int* iseed, char sym,
   7162                                 float* d, lapack_int mode, float cond,
   7163                                 float dmax, lapack_int kl, lapack_int ku,
   7164                                 char pack, float* a, lapack_int lda,
   7165                                 float* work );
   7166 lapack_int LAPACKE_dlatms_work( int matrix_order, lapack_int m, lapack_int n,
   7167                                 char dist, lapack_int* iseed, char sym,
   7168                                 double* d, lapack_int mode, double cond,
   7169                                 double dmax, lapack_int kl, lapack_int ku,
   7170                                 char pack, double* a, lapack_int lda,
   7171                                 double* work );
   7172 lapack_int LAPACKE_clatms_work( int matrix_order, lapack_int m, lapack_int n,
   7173                                 char dist, lapack_int* iseed, char sym,
   7174                                 float* d, lapack_int mode, float cond,
   7175                                 float dmax, lapack_int kl, lapack_int ku,
   7176                                 char pack, lapack_complex_float* a,
   7177                                 lapack_int lda, lapack_complex_float* work );
   7178 lapack_int LAPACKE_zlatms_work( int matrix_order, lapack_int m, lapack_int n,
   7179                                 char dist, lapack_int* iseed, char sym,
   7180                                 double* d, lapack_int mode, double cond,
   7181                                 double dmax, lapack_int kl, lapack_int ku,
   7182                                 char pack, lapack_complex_double* a,
   7183                                 lapack_int lda, lapack_complex_double* work );
   7184 
   7185 lapack_int LAPACKE_slauum_work( int matrix_order, char uplo, lapack_int n,
   7186                                 float* a, lapack_int lda );
   7187 lapack_int LAPACKE_dlauum_work( int matrix_order, char uplo, lapack_int n,
   7188                                 double* a, lapack_int lda );
   7189 lapack_int LAPACKE_clauum_work( int matrix_order, char uplo, lapack_int n,
   7190                                 lapack_complex_float* a, lapack_int lda );
   7191 lapack_int LAPACKE_zlauum_work( int matrix_order, char uplo, lapack_int n,
   7192                                 lapack_complex_double* a, lapack_int lda );
   7193 
   7194 lapack_int LAPACKE_sopgtr_work( int matrix_order, char uplo, lapack_int n,
   7195                                 const float* ap, const float* tau, float* q,
   7196                                 lapack_int ldq, float* work );
   7197 lapack_int LAPACKE_dopgtr_work( int matrix_order, char uplo, lapack_int n,
   7198                                 const double* ap, const double* tau, double* q,
   7199                                 lapack_int ldq, double* work );
   7200 
   7201 lapack_int LAPACKE_sopmtr_work( int matrix_order, char side, char uplo,
   7202                                 char trans, lapack_int m, lapack_int n,
   7203                                 const float* ap, const float* tau, float* c,
   7204                                 lapack_int ldc, float* work );
   7205 lapack_int LAPACKE_dopmtr_work( int matrix_order, char side, char uplo,
   7206                                 char trans, lapack_int m, lapack_int n,
   7207                                 const double* ap, const double* tau, double* c,
   7208                                 lapack_int ldc, double* work );
   7209 
   7210 lapack_int LAPACKE_sorgbr_work( int matrix_order, char vect, lapack_int m,
   7211                                 lapack_int n, lapack_int k, float* a,
   7212                                 lapack_int lda, const float* tau, float* work,
   7213                                 lapack_int lwork );
   7214 lapack_int LAPACKE_dorgbr_work( int matrix_order, char vect, lapack_int m,
   7215                                 lapack_int n, lapack_int k, double* a,
   7216                                 lapack_int lda, const double* tau, double* work,
   7217                                 lapack_int lwork );
   7218 
   7219 lapack_int LAPACKE_sorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
   7220                                 lapack_int ihi, float* a, lapack_int lda,
   7221                                 const float* tau, float* work,
   7222                                 lapack_int lwork );
   7223 lapack_int LAPACKE_dorghr_work( int matrix_order, lapack_int n, lapack_int ilo,
   7224                                 lapack_int ihi, double* a, lapack_int lda,
   7225                                 const double* tau, double* work,
   7226                                 lapack_int lwork );
   7227 
   7228 lapack_int LAPACKE_sorglq_work( int matrix_order, lapack_int m, lapack_int n,
   7229                                 lapack_int k, float* a, lapack_int lda,
   7230                                 const float* tau, float* work,
   7231                                 lapack_int lwork );
   7232 lapack_int LAPACKE_dorglq_work( int matrix_order, lapack_int m, lapack_int n,
   7233                                 lapack_int k, double* a, lapack_int lda,
   7234                                 const double* tau, double* work,
   7235                                 lapack_int lwork );
   7236 
   7237 lapack_int LAPACKE_sorgql_work( int matrix_order, lapack_int m, lapack_int n,
   7238                                 lapack_int k, float* a, lapack_int lda,
   7239                                 const float* tau, float* work,
   7240                                 lapack_int lwork );
   7241 lapack_int LAPACKE_dorgql_work( int matrix_order, lapack_int m, lapack_int n,
   7242                                 lapack_int k, double* a, lapack_int lda,
   7243                                 const double* tau, double* work,
   7244                                 lapack_int lwork );
   7245 
   7246 lapack_int LAPACKE_sorgqr_work( int matrix_order, lapack_int m, lapack_int n,
   7247                                 lapack_int k, float* a, lapack_int lda,
   7248                                 const float* tau, float* work,
   7249                                 lapack_int lwork );
   7250 lapack_int LAPACKE_dorgqr_work( int matrix_order, lapack_int m, lapack_int n,
   7251                                 lapack_int k, double* a, lapack_int lda,
   7252                                 const double* tau, double* work,
   7253                                 lapack_int lwork );
   7254 
   7255 lapack_int LAPACKE_sorgrq_work( int matrix_order, lapack_int m, lapack_int n,
   7256                                 lapack_int k, float* a, lapack_int lda,
   7257                                 const float* tau, float* work,
   7258                                 lapack_int lwork );
   7259 lapack_int LAPACKE_dorgrq_work( int matrix_order, lapack_int m, lapack_int n,
   7260                                 lapack_int k, double* a, lapack_int lda,
   7261                                 const double* tau, double* work,
   7262                                 lapack_int lwork );
   7263 
   7264 lapack_int LAPACKE_sorgtr_work( int matrix_order, char uplo, lapack_int n,
   7265                                 float* a, lapack_int lda, const float* tau,
   7266                                 float* work, lapack_int lwork );
   7267 lapack_int LAPACKE_dorgtr_work( int matrix_order, char uplo, lapack_int n,
   7268                                 double* a, lapack_int lda, const double* tau,
   7269                                 double* work, lapack_int lwork );
   7270 
   7271 lapack_int LAPACKE_sormbr_work( int matrix_order, char vect, char side,
   7272                                 char trans, lapack_int m, lapack_int n,
   7273                                 lapack_int k, const float* a, lapack_int lda,
   7274                                 const float* tau, float* c, lapack_int ldc,
   7275                                 float* work, lapack_int lwork );
   7276 lapack_int LAPACKE_dormbr_work( int matrix_order, char vect, char side,
   7277                                 char trans, lapack_int m, lapack_int n,
   7278                                 lapack_int k, const double* a, lapack_int lda,
   7279                                 const double* tau, double* c, lapack_int ldc,
   7280                                 double* work, lapack_int lwork );
   7281 
   7282 lapack_int LAPACKE_sormhr_work( int matrix_order, char side, char trans,
   7283                                 lapack_int m, lapack_int n, lapack_int ilo,
   7284                                 lapack_int ihi, const float* a, lapack_int lda,
   7285                                 const float* tau, float* c, lapack_int ldc,
   7286                                 float* work, lapack_int lwork );
   7287 lapack_int LAPACKE_dormhr_work( int matrix_order, char side, char trans,
   7288                                 lapack_int m, lapack_int n, lapack_int ilo,
   7289                                 lapack_int ihi, const double* a, lapack_int lda,
   7290                                 const double* tau, double* c, lapack_int ldc,
   7291                                 double* work, lapack_int lwork );
   7292 
   7293 lapack_int LAPACKE_sormlq_work( int matrix_order, char side, char trans,
   7294                                 lapack_int m, lapack_int n, lapack_int k,
   7295                                 const float* a, lapack_int lda,
   7296                                 const float* tau, float* c, lapack_int ldc,
   7297                                 float* work, lapack_int lwork );
   7298 lapack_int LAPACKE_dormlq_work( int matrix_order, char side, char trans,
   7299                                 lapack_int m, lapack_int n, lapack_int k,
   7300                                 const double* a, lapack_int lda,
   7301                                 const double* tau, double* c, lapack_int ldc,
   7302                                 double* work, lapack_int lwork );
   7303 
   7304 lapack_int LAPACKE_sormql_work( int matrix_order, char side, char trans,
   7305                                 lapack_int m, lapack_int n, lapack_int k,
   7306                                 const float* a, lapack_int lda,
   7307                                 const float* tau, float* c, lapack_int ldc,
   7308                                 float* work, lapack_int lwork );
   7309 lapack_int LAPACKE_dormql_work( int matrix_order, char side, char trans,
   7310                                 lapack_int m, lapack_int n, lapack_int k,
   7311                                 const double* a, lapack_int lda,
   7312                                 const double* tau, double* c, lapack_int ldc,
   7313                                 double* work, lapack_int lwork );
   7314 
   7315 lapack_int LAPACKE_sormqr_work( int matrix_order, char side, char trans,
   7316                                 lapack_int m, lapack_int n, lapack_int k,
   7317                                 const float* a, lapack_int lda,
   7318                                 const float* tau, float* c, lapack_int ldc,
   7319                                 float* work, lapack_int lwork );
   7320 lapack_int LAPACKE_dormqr_work( int matrix_order, char side, char trans,
   7321                                 lapack_int m, lapack_int n, lapack_int k,
   7322                                 const double* a, lapack_int lda,
   7323                                 const double* tau, double* c, lapack_int ldc,
   7324                                 double* work, lapack_int lwork );
   7325 
   7326 lapack_int LAPACKE_sormrq_work( int matrix_order, char side, char trans,
   7327                                 lapack_int m, lapack_int n, lapack_int k,
   7328                                 const float* a, lapack_int lda,
   7329                                 const float* tau, float* c, lapack_int ldc,
   7330                                 float* work, lapack_int lwork );
   7331 lapack_int LAPACKE_dormrq_work( int matrix_order, char side, char trans,
   7332                                 lapack_int m, lapack_int n, lapack_int k,
   7333                                 const double* a, lapack_int lda,
   7334                                 const double* tau, double* c, lapack_int ldc,
   7335                                 double* work, lapack_int lwork );
   7336 
   7337 lapack_int LAPACKE_sormrz_work( int matrix_order, char side, char trans,
   7338                                 lapack_int m, lapack_int n, lapack_int k,
   7339                                 lapack_int l, const float* a, lapack_int lda,
   7340                                 const float* tau, float* c, lapack_int ldc,
   7341                                 float* work, lapack_int lwork );
   7342 lapack_int LAPACKE_dormrz_work( int matrix_order, char side, char trans,
   7343                                 lapack_int m, lapack_int n, lapack_int k,
   7344                                 lapack_int l, const double* a, lapack_int lda,
   7345                                 const double* tau, double* c, lapack_int ldc,
   7346                                 double* work, lapack_int lwork );
   7347 
   7348 lapack_int LAPACKE_sormtr_work( int matrix_order, char side, char uplo,
   7349                                 char trans, lapack_int m, lapack_int n,
   7350                                 const float* a, lapack_int lda,
   7351                                 const float* tau, float* c, lapack_int ldc,
   7352                                 float* work, lapack_int lwork );
   7353 lapack_int LAPACKE_dormtr_work( int matrix_order, char side, char uplo,
   7354                                 char trans, lapack_int m, lapack_int n,
   7355                                 const double* a, lapack_int lda,
   7356                                 const double* tau, double* c, lapack_int ldc,
   7357                                 double* work, lapack_int lwork );
   7358 
   7359 lapack_int LAPACKE_spbcon_work( int matrix_order, char uplo, lapack_int n,
   7360                                 lapack_int kd, const float* ab, lapack_int ldab,
   7361                                 float anorm, float* rcond, float* work,
   7362                                 lapack_int* iwork );
   7363 lapack_int LAPACKE_dpbcon_work( int matrix_order, char uplo, lapack_int n,
   7364                                 lapack_int kd, const double* ab,
   7365                                 lapack_int ldab, double anorm, double* rcond,
   7366                                 double* work, lapack_int* iwork );
   7367 lapack_int LAPACKE_cpbcon_work( int matrix_order, char uplo, lapack_int n,
   7368                                 lapack_int kd, const lapack_complex_float* ab,
   7369                                 lapack_int ldab, float anorm, float* rcond,
   7370                                 lapack_complex_float* work, float* rwork );
   7371 lapack_int LAPACKE_zpbcon_work( int matrix_order, char uplo, lapack_int n,
   7372                                 lapack_int kd, const lapack_complex_double* ab,
   7373                                 lapack_int ldab, double anorm, double* rcond,
   7374                                 lapack_complex_double* work, double* rwork );
   7375 
   7376 lapack_int LAPACKE_spbequ_work( int matrix_order, char uplo, lapack_int n,
   7377                                 lapack_int kd, const float* ab, lapack_int ldab,
   7378                                 float* s, float* scond, float* amax );
   7379 lapack_int LAPACKE_dpbequ_work( int matrix_order, char uplo, lapack_int n,
   7380                                 lapack_int kd, const double* ab,
   7381                                 lapack_int ldab, double* s, double* scond,
   7382                                 double* amax );
   7383 lapack_int LAPACKE_cpbequ_work( int matrix_order, char uplo, lapack_int n,
   7384                                 lapack_int kd, const lapack_complex_float* ab,
   7385                                 lapack_int ldab, float* s, float* scond,
   7386                                 float* amax );
   7387 lapack_int LAPACKE_zpbequ_work( int matrix_order, char uplo, lapack_int n,
   7388                                 lapack_int kd, const lapack_complex_double* ab,
   7389                                 lapack_int ldab, double* s, double* scond,
   7390                                 double* amax );
   7391 
   7392 lapack_int LAPACKE_spbrfs_work( int matrix_order, char uplo, lapack_int n,
   7393                                 lapack_int kd, lapack_int nrhs, const float* ab,
   7394                                 lapack_int ldab, const float* afb,
   7395                                 lapack_int ldafb, const float* b,
   7396                                 lapack_int ldb, float* x, lapack_int ldx,
   7397                                 float* ferr, float* berr, float* work,
   7398                                 lapack_int* iwork );
   7399 lapack_int LAPACKE_dpbrfs_work( int matrix_order, char uplo, lapack_int n,
   7400                                 lapack_int kd, lapack_int nrhs,
   7401                                 const double* ab, lapack_int ldab,
   7402                                 const double* afb, lapack_int ldafb,
   7403                                 const double* b, lapack_int ldb, double* x,
   7404                                 lapack_int ldx, double* ferr, double* berr,
   7405                                 double* work, lapack_int* iwork );
   7406 lapack_int LAPACKE_cpbrfs_work( int matrix_order, char uplo, lapack_int n,
   7407                                 lapack_int kd, lapack_int nrhs,
   7408                                 const lapack_complex_float* ab, lapack_int ldab,
   7409                                 const lapack_complex_float* afb,
   7410                                 lapack_int ldafb, const lapack_complex_float* b,
   7411                                 lapack_int ldb, lapack_complex_float* x,
   7412                                 lapack_int ldx, float* ferr, float* berr,
   7413                                 lapack_complex_float* work, float* rwork );
   7414 lapack_int LAPACKE_zpbrfs_work( int matrix_order, char uplo, lapack_int n,
   7415                                 lapack_int kd, lapack_int nrhs,
   7416                                 const lapack_complex_double* ab,
   7417                                 lapack_int ldab,
   7418                                 const lapack_complex_double* afb,
   7419                                 lapack_int ldafb,
   7420                                 const lapack_complex_double* b, lapack_int ldb,
   7421                                 lapack_complex_double* x, lapack_int ldx,
   7422                                 double* ferr, double* berr,
   7423                                 lapack_complex_double* work, double* rwork );
   7424 
   7425 lapack_int LAPACKE_spbstf_work( int matrix_order, char uplo, lapack_int n,
   7426                                 lapack_int kb, float* bb, lapack_int ldbb );
   7427 lapack_int LAPACKE_dpbstf_work( int matrix_order, char uplo, lapack_int n,
   7428                                 lapack_int kb, double* bb, lapack_int ldbb );
   7429 lapack_int LAPACKE_cpbstf_work( int matrix_order, char uplo, lapack_int n,
   7430                                 lapack_int kb, lapack_complex_float* bb,
   7431                                 lapack_int ldbb );
   7432 lapack_int LAPACKE_zpbstf_work( int matrix_order, char uplo, lapack_int n,
   7433                                 lapack_int kb, lapack_complex_double* bb,
   7434                                 lapack_int ldbb );
   7435 
   7436 lapack_int LAPACKE_spbsv_work( int matrix_order, char uplo, lapack_int n,
   7437                                lapack_int kd, lapack_int nrhs, float* ab,
   7438                                lapack_int ldab, float* b, lapack_int ldb );
   7439 lapack_int LAPACKE_dpbsv_work( int matrix_order, char uplo, lapack_int n,
   7440                                lapack_int kd, lapack_int nrhs, double* ab,
   7441                                lapack_int ldab, double* b, lapack_int ldb );
   7442 lapack_int LAPACKE_cpbsv_work( int matrix_order, char uplo, lapack_int n,
   7443                                lapack_int kd, lapack_int nrhs,
   7444                                lapack_complex_float* ab, lapack_int ldab,
   7445                                lapack_complex_float* b, lapack_int ldb );
   7446 lapack_int LAPACKE_zpbsv_work( int matrix_order, char uplo, lapack_int n,
   7447                                lapack_int kd, lapack_int nrhs,
   7448                                lapack_complex_double* ab, lapack_int ldab,
   7449                                lapack_complex_double* b, lapack_int ldb );
   7450 
   7451 lapack_int LAPACKE_spbsvx_work( int matrix_order, char fact, char uplo,
   7452                                 lapack_int n, lapack_int kd, lapack_int nrhs,
   7453                                 float* ab, lapack_int ldab, float* afb,
   7454                                 lapack_int ldafb, char* equed, float* s,
   7455                                 float* b, lapack_int ldb, float* x,
   7456                                 lapack_int ldx, float* rcond, float* ferr,
   7457                                 float* berr, float* work, lapack_int* iwork );
   7458 lapack_int LAPACKE_dpbsvx_work( int matrix_order, char fact, char uplo,
   7459                                 lapack_int n, lapack_int kd, lapack_int nrhs,
   7460                                 double* ab, lapack_int ldab, double* afb,
   7461                                 lapack_int ldafb, char* equed, double* s,
   7462                                 double* b, lapack_int ldb, double* x,
   7463                                 lapack_int ldx, double* rcond, double* ferr,
   7464                                 double* berr, double* work, lapack_int* iwork );
   7465 lapack_int LAPACKE_cpbsvx_work( int matrix_order, char fact, char uplo,
   7466                                 lapack_int n, lapack_int kd, lapack_int nrhs,
   7467                                 lapack_complex_float* ab, lapack_int ldab,
   7468                                 lapack_complex_float* afb, lapack_int ldafb,
   7469                                 char* equed, float* s, lapack_complex_float* b,
   7470                                 lapack_int ldb, lapack_complex_float* x,
   7471                                 lapack_int ldx, float* rcond, float* ferr,
   7472                                 float* berr, lapack_complex_float* work,
   7473                                 float* rwork );
   7474 lapack_int LAPACKE_zpbsvx_work( int matrix_order, char fact, char uplo,
   7475                                 lapack_int n, lapack_int kd, lapack_int nrhs,
   7476                                 lapack_complex_double* ab, lapack_int ldab,
   7477                                 lapack_complex_double* afb, lapack_int ldafb,
   7478                                 char* equed, double* s,
   7479                                 lapack_complex_double* b, lapack_int ldb,
   7480                                 lapack_complex_double* x, lapack_int ldx,
   7481                                 double* rcond, double* ferr, double* berr,
   7482                                 lapack_complex_double* work, double* rwork );
   7483 
   7484 lapack_int LAPACKE_spbtrf_work( int matrix_order, char uplo, lapack_int n,
   7485                                 lapack_int kd, float* ab, lapack_int ldab );
   7486 lapack_int LAPACKE_dpbtrf_work( int matrix_order, char uplo, lapack_int n,
   7487                                 lapack_int kd, double* ab, lapack_int ldab );
   7488 lapack_int LAPACKE_cpbtrf_work( int matrix_order, char uplo, lapack_int n,
   7489                                 lapack_int kd, lapack_complex_float* ab,
   7490                                 lapack_int ldab );
   7491 lapack_int LAPACKE_zpbtrf_work( int matrix_order, char uplo, lapack_int n,
   7492                                 lapack_int kd, lapack_complex_double* ab,
   7493                                 lapack_int ldab );
   7494 
   7495 lapack_int LAPACKE_spbtrs_work( int matrix_order, char uplo, lapack_int n,
   7496                                 lapack_int kd, lapack_int nrhs, const float* ab,
   7497                                 lapack_int ldab, float* b, lapack_int ldb );
   7498 lapack_int LAPACKE_dpbtrs_work( int matrix_order, char uplo, lapack_int n,
   7499                                 lapack_int kd, lapack_int nrhs,
   7500                                 const double* ab, lapack_int ldab, double* b,
   7501                                 lapack_int ldb );
   7502 lapack_int LAPACKE_cpbtrs_work( int matrix_order, char uplo, lapack_int n,
   7503                                 lapack_int kd, lapack_int nrhs,
   7504                                 const lapack_complex_float* ab, lapack_int ldab,
   7505                                 lapack_complex_float* b, lapack_int ldb );
   7506 lapack_int LAPACKE_zpbtrs_work( int matrix_order, char uplo, lapack_int n,
   7507                                 lapack_int kd, lapack_int nrhs,
   7508                                 const lapack_complex_double* ab,
   7509                                 lapack_int ldab, lapack_complex_double* b,
   7510                                 lapack_int ldb );
   7511 
   7512 lapack_int LAPACKE_spftrf_work( int matrix_order, char transr, char uplo,
   7513                                 lapack_int n, float* a );
   7514 lapack_int LAPACKE_dpftrf_work( int matrix_order, char transr, char uplo,
   7515                                 lapack_int n, double* a );
   7516 lapack_int LAPACKE_cpftrf_work( int matrix_order, char transr, char uplo,
   7517                                 lapack_int n, lapack_complex_float* a );
   7518 lapack_int LAPACKE_zpftrf_work( int matrix_order, char transr, char uplo,
   7519                                 lapack_int n, lapack_complex_double* a );
   7520 
   7521 lapack_int LAPACKE_spftri_work( int matrix_order, char transr, char uplo,
   7522                                 lapack_int n, float* a );
   7523 lapack_int LAPACKE_dpftri_work( int matrix_order, char transr, char uplo,
   7524                                 lapack_int n, double* a );
   7525 lapack_int LAPACKE_cpftri_work( int matrix_order, char transr, char uplo,
   7526                                 lapack_int n, lapack_complex_float* a );
   7527 lapack_int LAPACKE_zpftri_work( int matrix_order, char transr, char uplo,
   7528                                 lapack_int n, lapack_complex_double* a );
   7529 
   7530 lapack_int LAPACKE_spftrs_work( int matrix_order, char transr, char uplo,
   7531                                 lapack_int n, lapack_int nrhs, const float* a,
   7532                                 float* b, lapack_int ldb );
   7533 lapack_int LAPACKE_dpftrs_work( int matrix_order, char transr, char uplo,
   7534                                 lapack_int n, lapack_int nrhs, const double* a,
   7535                                 double* b, lapack_int ldb );
   7536 lapack_int LAPACKE_cpftrs_work( int matrix_order, char transr, char uplo,
   7537                                 lapack_int n, lapack_int nrhs,
   7538                                 const lapack_complex_float* a,
   7539                                 lapack_complex_float* b, lapack_int ldb );
   7540 lapack_int LAPACKE_zpftrs_work( int matrix_order, char transr, char uplo,
   7541                                 lapack_int n, lapack_int nrhs,
   7542                                 const lapack_complex_double* a,
   7543                                 lapack_complex_double* b, lapack_int ldb );
   7544 
   7545 lapack_int LAPACKE_spocon_work( int matrix_order, char uplo, lapack_int n,
   7546                                 const float* a, lapack_int lda, float anorm,
   7547                                 float* rcond, float* work, lapack_int* iwork );
   7548 lapack_int LAPACKE_dpocon_work( int matrix_order, char uplo, lapack_int n,
   7549                                 const double* a, lapack_int lda, double anorm,
   7550                                 double* rcond, double* work,
   7551                                 lapack_int* iwork );
   7552 lapack_int LAPACKE_cpocon_work( int matrix_order, char uplo, lapack_int n,
   7553                                 const lapack_complex_float* a, lapack_int lda,
   7554                                 float anorm, float* rcond,
   7555                                 lapack_complex_float* work, float* rwork );
   7556 lapack_int LAPACKE_zpocon_work( int matrix_order, char uplo, lapack_int n,
   7557                                 const lapack_complex_double* a, lapack_int lda,
   7558                                 double anorm, double* rcond,
   7559                                 lapack_complex_double* work, double* rwork );
   7560 
   7561 lapack_int LAPACKE_spoequ_work( int matrix_order, lapack_int n, const float* a,
   7562                                 lapack_int lda, float* s, float* scond,
   7563                                 float* amax );
   7564 lapack_int LAPACKE_dpoequ_work( int matrix_order, lapack_int n, const double* a,
   7565                                 lapack_int lda, double* s, double* scond,
   7566                                 double* amax );
   7567 lapack_int LAPACKE_cpoequ_work( int matrix_order, lapack_int n,
   7568                                 const lapack_complex_float* a, lapack_int lda,
   7569                                 float* s, float* scond, float* amax );
   7570 lapack_int LAPACKE_zpoequ_work( int matrix_order, lapack_int n,
   7571                                 const lapack_complex_double* a, lapack_int lda,
   7572                                 double* s, double* scond, double* amax );
   7573 
   7574 lapack_int LAPACKE_spoequb_work( int matrix_order, lapack_int n, const float* a,
   7575                                  lapack_int lda, float* s, float* scond,
   7576                                  float* amax );
   7577 lapack_int LAPACKE_dpoequb_work( int matrix_order, lapack_int n,
   7578                                  const double* a, lapack_int lda, double* s,
   7579                                  double* scond, double* amax );
   7580 lapack_int LAPACKE_cpoequb_work( int matrix_order, lapack_int n,
   7581                                  const lapack_complex_float* a, lapack_int lda,
   7582                                  float* s, float* scond, float* amax );
   7583 lapack_int LAPACKE_zpoequb_work( int matrix_order, lapack_int n,
   7584                                  const lapack_complex_double* a, lapack_int lda,
   7585                                  double* s, double* scond, double* amax );
   7586 
   7587 lapack_int LAPACKE_sporfs_work( int matrix_order, char uplo, lapack_int n,
   7588                                 lapack_int nrhs, const float* a, lapack_int lda,
   7589                                 const float* af, lapack_int ldaf,
   7590                                 const float* b, lapack_int ldb, float* x,
   7591                                 lapack_int ldx, float* ferr, float* berr,
   7592                                 float* work, lapack_int* iwork );
   7593 lapack_int LAPACKE_dporfs_work( int matrix_order, char uplo, lapack_int n,
   7594                                 lapack_int nrhs, const double* a,
   7595                                 lapack_int lda, const double* af,
   7596                                 lapack_int ldaf, const double* b,
   7597                                 lapack_int ldb, double* x, lapack_int ldx,
   7598                                 double* ferr, double* berr, double* work,
   7599                                 lapack_int* iwork );
   7600 lapack_int LAPACKE_cporfs_work( int matrix_order, char uplo, lapack_int n,
   7601                                 lapack_int nrhs, const lapack_complex_float* a,
   7602                                 lapack_int lda, const lapack_complex_float* af,
   7603                                 lapack_int ldaf, const lapack_complex_float* b,
   7604                                 lapack_int ldb, lapack_complex_float* x,
   7605                                 lapack_int ldx, float* ferr, float* berr,
   7606                                 lapack_complex_float* work, float* rwork );
   7607 lapack_int LAPACKE_zporfs_work( int matrix_order, char uplo, lapack_int n,
   7608                                 lapack_int nrhs, const lapack_complex_double* a,
   7609                                 lapack_int lda, const lapack_complex_double* af,
   7610                                 lapack_int ldaf, const lapack_complex_double* b,
   7611                                 lapack_int ldb, lapack_complex_double* x,
   7612                                 lapack_int ldx, double* ferr, double* berr,
   7613                                 lapack_complex_double* work, double* rwork );
   7614 
   7615 lapack_int LAPACKE_sporfsx_work( int matrix_order, char uplo, char equed,
   7616                                  lapack_int n, lapack_int nrhs, const float* a,
   7617                                  lapack_int lda, const float* af,
   7618                                  lapack_int ldaf, const float* s,
   7619                                  const float* b, lapack_int ldb, float* x,
   7620                                  lapack_int ldx, float* rcond, float* berr,
   7621                                  lapack_int n_err_bnds, float* err_bnds_norm,
   7622                                  float* err_bnds_comp, lapack_int nparams,
   7623                                  float* params, float* work,
   7624                                  lapack_int* iwork );
   7625 lapack_int LAPACKE_dporfsx_work( int matrix_order, char uplo, char equed,
   7626                                  lapack_int n, lapack_int nrhs, const double* a,
   7627                                  lapack_int lda, const double* af,
   7628                                  lapack_int ldaf, const double* s,
   7629                                  const double* b, lapack_int ldb, double* x,
   7630                                  lapack_int ldx, double* rcond, double* berr,
   7631                                  lapack_int n_err_bnds, double* err_bnds_norm,
   7632                                  double* err_bnds_comp, lapack_int nparams,
   7633                                  double* params, double* work,
   7634                                  lapack_int* iwork );
   7635 lapack_int LAPACKE_cporfsx_work( int matrix_order, char uplo, char equed,
   7636                                  lapack_int n, lapack_int nrhs,
   7637                                  const lapack_complex_float* a, lapack_int lda,
   7638                                  const lapack_complex_float* af,
   7639                                  lapack_int ldaf, const float* s,
   7640                                  const lapack_complex_float* b, lapack_int ldb,
   7641                                  lapack_complex_float* x, lapack_int ldx,
   7642                                  float* rcond, float* berr,
   7643                                  lapack_int n_err_bnds, float* err_bnds_norm,
   7644                                  float* err_bnds_comp, lapack_int nparams,
   7645                                  float* params, lapack_complex_float* work,
   7646                                  float* rwork );
   7647 lapack_int LAPACKE_zporfsx_work( int matrix_order, char uplo, char equed,
   7648                                  lapack_int n, lapack_int nrhs,
   7649                                  const lapack_complex_double* a, lapack_int lda,
   7650                                  const lapack_complex_double* af,
   7651                                  lapack_int ldaf, const double* s,
   7652                                  const lapack_complex_double* b, lapack_int ldb,
   7653                                  lapack_complex_double* x, lapack_int ldx,
   7654                                  double* rcond, double* berr,
   7655                                  lapack_int n_err_bnds, double* err_bnds_norm,
   7656                                  double* err_bnds_comp, lapack_int nparams,
   7657                                  double* params, lapack_complex_double* work,
   7658                                  double* rwork );
   7659 
   7660 lapack_int LAPACKE_sposv_work( int matrix_order, char uplo, lapack_int n,
   7661                                lapack_int nrhs, float* a, lapack_int lda,
   7662                                float* b, lapack_int ldb );
   7663 lapack_int LAPACKE_dposv_work( int matrix_order, char uplo, lapack_int n,
   7664                                lapack_int nrhs, double* a, lapack_int lda,
   7665                                double* b, lapack_int ldb );
   7666 lapack_int LAPACKE_cposv_work( int matrix_order, char uplo, lapack_int n,
   7667                                lapack_int nrhs, lapack_complex_float* a,
   7668                                lapack_int lda, lapack_complex_float* b,
   7669                                lapack_int ldb );
   7670 lapack_int LAPACKE_zposv_work( int matrix_order, char uplo, lapack_int n,
   7671                                lapack_int nrhs, lapack_complex_double* a,
   7672                                lapack_int lda, lapack_complex_double* b,
   7673                                lapack_int ldb );
   7674 lapack_int LAPACKE_dsposv_work( int matrix_order, char uplo, lapack_int n,
   7675                                 lapack_int nrhs, double* a, lapack_int lda,
   7676                                 double* b, lapack_int ldb, double* x,
   7677                                 lapack_int ldx, double* work, float* swork,
   7678                                 lapack_int* iter );
   7679 lapack_int LAPACKE_zcposv_work( int matrix_order, char uplo, lapack_int n,
   7680                                 lapack_int nrhs, lapack_complex_double* a,
   7681                                 lapack_int lda, lapack_complex_double* b,
   7682                                 lapack_int ldb, lapack_complex_double* x,
   7683                                 lapack_int ldx, lapack_complex_double* work,
   7684                                 lapack_complex_float* swork, double* rwork,
   7685                                 lapack_int* iter );
   7686 
   7687 lapack_int LAPACKE_sposvx_work( int matrix_order, char fact, char uplo,
   7688                                 lapack_int n, lapack_int nrhs, float* a,
   7689                                 lapack_int lda, float* af, lapack_int ldaf,
   7690                                 char* equed, float* s, float* b, lapack_int ldb,
   7691                                 float* x, lapack_int ldx, float* rcond,
   7692                                 float* ferr, float* berr, float* work,
   7693                                 lapack_int* iwork );
   7694 lapack_int LAPACKE_dposvx_work( int matrix_order, char fact, char uplo,
   7695                                 lapack_int n, lapack_int nrhs, double* a,
   7696                                 lapack_int lda, double* af, lapack_int ldaf,
   7697                                 char* equed, double* s, double* b,
   7698                                 lapack_int ldb, double* x, lapack_int ldx,
   7699                                 double* rcond, double* ferr, double* berr,
   7700                                 double* work, lapack_int* iwork );
   7701 lapack_int LAPACKE_cposvx_work( int matrix_order, char fact, char uplo,
   7702                                 lapack_int n, lapack_int nrhs,
   7703                                 lapack_complex_float* a, lapack_int lda,
   7704                                 lapack_complex_float* af, lapack_int ldaf,
   7705                                 char* equed, float* s, lapack_complex_float* b,
   7706                                 lapack_int ldb, lapack_complex_float* x,
   7707                                 lapack_int ldx, float* rcond, float* ferr,
   7708                                 float* berr, lapack_complex_float* work,
   7709                                 float* rwork );
   7710 lapack_int LAPACKE_zposvx_work( int matrix_order, char fact, char uplo,
   7711                                 lapack_int n, lapack_int nrhs,
   7712                                 lapack_complex_double* a, lapack_int lda,
   7713                                 lapack_complex_double* af, lapack_int ldaf,
   7714                                 char* equed, double* s,
   7715                                 lapack_complex_double* b, lapack_int ldb,
   7716                                 lapack_complex_double* x, lapack_int ldx,
   7717                                 double* rcond, double* ferr, double* berr,
   7718                                 lapack_complex_double* work, double* rwork );
   7719 
   7720 lapack_int LAPACKE_sposvxx_work( int matrix_order, char fact, char uplo,
   7721                                  lapack_int n, lapack_int nrhs, float* a,
   7722                                  lapack_int lda, float* af, lapack_int ldaf,
   7723                                  char* equed, float* s, float* b,
   7724                                  lapack_int ldb, float* x, lapack_int ldx,
   7725                                  float* rcond, float* rpvgrw, float* berr,
   7726                                  lapack_int n_err_bnds, float* err_bnds_norm,
   7727                                  float* err_bnds_comp, lapack_int nparams,
   7728                                  float* params, float* work,
   7729                                  lapack_int* iwork );
   7730 lapack_int LAPACKE_dposvxx_work( int matrix_order, char fact, char uplo,
   7731                                  lapack_int n, lapack_int nrhs, double* a,
   7732                                  lapack_int lda, double* af, lapack_int ldaf,
   7733                                  char* equed, double* s, double* b,
   7734                                  lapack_int ldb, double* x, lapack_int ldx,
   7735                                  double* rcond, double* rpvgrw, double* berr,
   7736                                  lapack_int n_err_bnds, double* err_bnds_norm,
   7737                                  double* err_bnds_comp, lapack_int nparams,
   7738                                  double* params, double* work,
   7739                                  lapack_int* iwork );
   7740 lapack_int LAPACKE_cposvxx_work( int matrix_order, char fact, char uplo,
   7741                                  lapack_int n, lapack_int nrhs,
   7742                                  lapack_complex_float* a, lapack_int lda,
   7743                                  lapack_complex_float* af, lapack_int ldaf,
   7744                                  char* equed, float* s, lapack_complex_float* b,
   7745                                  lapack_int ldb, lapack_complex_float* x,
   7746                                  lapack_int ldx, float* rcond, float* rpvgrw,
   7747                                  float* berr, lapack_int n_err_bnds,
   7748                                  float* err_bnds_norm, float* err_bnds_comp,
   7749                                  lapack_int nparams, float* params,
   7750                                  lapack_complex_float* work, float* rwork );
   7751 lapack_int LAPACKE_zposvxx_work( int matrix_order, char fact, char uplo,
   7752                                  lapack_int n, lapack_int nrhs,
   7753                                  lapack_complex_double* a, lapack_int lda,
   7754                                  lapack_complex_double* af, lapack_int ldaf,
   7755                                  char* equed, double* s,
   7756                                  lapack_complex_double* b, lapack_int ldb,
   7757                                  lapack_complex_double* x, lapack_int ldx,
   7758                                  double* rcond, double* rpvgrw, double* berr,
   7759                                  lapack_int n_err_bnds, double* err_bnds_norm,
   7760                                  double* err_bnds_comp, lapack_int nparams,
   7761                                  double* params, lapack_complex_double* work,
   7762                                  double* rwork );
   7763 
   7764 lapack_int LAPACKE_spotrf_work( int matrix_order, char uplo, lapack_int n,
   7765                                 float* a, lapack_int lda );
   7766 lapack_int LAPACKE_dpotrf_work( int matrix_order, char uplo, lapack_int n,
   7767                                 double* a, lapack_int lda );
   7768 lapack_int LAPACKE_cpotrf_work( int matrix_order, char uplo, lapack_int n,
   7769                                 lapack_complex_float* a, lapack_int lda );
   7770 lapack_int LAPACKE_zpotrf_work( int matrix_order, char uplo, lapack_int n,
   7771                                 lapack_complex_double* a, lapack_int lda );
   7772 
   7773 lapack_int LAPACKE_spotri_work( int matrix_order, char uplo, lapack_int n,
   7774                                 float* a, lapack_int lda );
   7775 lapack_int LAPACKE_dpotri_work( int matrix_order, char uplo, lapack_int n,
   7776                                 double* a, lapack_int lda );
   7777 lapack_int LAPACKE_cpotri_work( int matrix_order, char uplo, lapack_int n,
   7778                                 lapack_complex_float* a, lapack_int lda );
   7779 lapack_int LAPACKE_zpotri_work( int matrix_order, char uplo, lapack_int n,
   7780                                 lapack_complex_double* a, lapack_int lda );
   7781 
   7782 lapack_int LAPACKE_spotrs_work( int matrix_order, char uplo, lapack_int n,
   7783                                 lapack_int nrhs, const float* a, lapack_int lda,
   7784                                 float* b, lapack_int ldb );
   7785 lapack_int LAPACKE_dpotrs_work( int matrix_order, char uplo, lapack_int n,
   7786                                 lapack_int nrhs, const double* a,
   7787                                 lapack_int lda, double* b, lapack_int ldb );
   7788 lapack_int LAPACKE_cpotrs_work( int matrix_order, char uplo, lapack_int n,
   7789                                 lapack_int nrhs, const lapack_complex_float* a,
   7790                                 lapack_int lda, lapack_complex_float* b,
   7791                                 lapack_int ldb );
   7792 lapack_int LAPACKE_zpotrs_work( int matrix_order, char uplo, lapack_int n,
   7793                                 lapack_int nrhs, const lapack_complex_double* a,
   7794                                 lapack_int lda, lapack_complex_double* b,
   7795                                 lapack_int ldb );
   7796 
   7797 lapack_int LAPACKE_sppcon_work( int matrix_order, char uplo, lapack_int n,
   7798                                 const float* ap, float anorm, float* rcond,
   7799                                 float* work, lapack_int* iwork );
   7800 lapack_int LAPACKE_dppcon_work( int matrix_order, char uplo, lapack_int n,
   7801                                 const double* ap, double anorm, double* rcond,
   7802                                 double* work, lapack_int* iwork );
   7803 lapack_int LAPACKE_cppcon_work( int matrix_order, char uplo, lapack_int n,
   7804                                 const lapack_complex_float* ap, float anorm,
   7805                                 float* rcond, lapack_complex_float* work,
   7806                                 float* rwork );
   7807 lapack_int LAPACKE_zppcon_work( int matrix_order, char uplo, lapack_int n,
   7808                                 const lapack_complex_double* ap, double anorm,
   7809                                 double* rcond, lapack_complex_double* work,
   7810                                 double* rwork );
   7811 
   7812 lapack_int LAPACKE_sppequ_work( int matrix_order, char uplo, lapack_int n,
   7813                                 const float* ap, float* s, float* scond,
   7814                                 float* amax );
   7815 lapack_int LAPACKE_dppequ_work( int matrix_order, char uplo, lapack_int n,
   7816                                 const double* ap, double* s, double* scond,
   7817                                 double* amax );
   7818 lapack_int LAPACKE_cppequ_work( int matrix_order, char uplo, lapack_int n,
   7819                                 const lapack_complex_float* ap, float* s,
   7820                                 float* scond, float* amax );
   7821 lapack_int LAPACKE_zppequ_work( int matrix_order, char uplo, lapack_int n,
   7822                                 const lapack_complex_double* ap, double* s,
   7823                                 double* scond, double* amax );
   7824 
   7825 lapack_int LAPACKE_spprfs_work( int matrix_order, char uplo, lapack_int n,
   7826                                 lapack_int nrhs, const float* ap,
   7827                                 const float* afp, const float* b,
   7828                                 lapack_int ldb, float* x, lapack_int ldx,
   7829                                 float* ferr, float* berr, float* work,
   7830                                 lapack_int* iwork );
   7831 lapack_int LAPACKE_dpprfs_work( int matrix_order, char uplo, lapack_int n,
   7832                                 lapack_int nrhs, const double* ap,
   7833                                 const double* afp, const double* b,
   7834                                 lapack_int ldb, double* x, lapack_int ldx,
   7835                                 double* ferr, double* berr, double* work,
   7836                                 lapack_int* iwork );
   7837 lapack_int LAPACKE_cpprfs_work( int matrix_order, char uplo, lapack_int n,
   7838                                 lapack_int nrhs, const lapack_complex_float* ap,
   7839                                 const lapack_complex_float* afp,
   7840                                 const lapack_complex_float* b, lapack_int ldb,
   7841                                 lapack_complex_float* x, lapack_int ldx,
   7842                                 float* ferr, float* berr,
   7843                                 lapack_complex_float* work, float* rwork );
   7844 lapack_int LAPACKE_zpprfs_work( int matrix_order, char uplo, lapack_int n,
   7845                                 lapack_int nrhs,
   7846                                 const lapack_complex_double* ap,
   7847                                 const lapack_complex_double* afp,
   7848                                 const lapack_complex_double* b, lapack_int ldb,
   7849                                 lapack_complex_double* x, lapack_int ldx,
   7850                                 double* ferr, double* berr,
   7851                                 lapack_complex_double* work, double* rwork );
   7852 
   7853 lapack_int LAPACKE_sppsv_work( int matrix_order, char uplo, lapack_int n,
   7854                                lapack_int nrhs, float* ap, float* b,
   7855                                lapack_int ldb );
   7856 lapack_int LAPACKE_dppsv_work( int matrix_order, char uplo, lapack_int n,
   7857                                lapack_int nrhs, double* ap, double* b,
   7858                                lapack_int ldb );
   7859 lapack_int LAPACKE_cppsv_work( int matrix_order, char uplo, lapack_int n,
   7860                                lapack_int nrhs, lapack_complex_float* ap,
   7861                                lapack_complex_float* b, lapack_int ldb );
   7862 lapack_int LAPACKE_zppsv_work( int matrix_order, char uplo, lapack_int n,
   7863                                lapack_int nrhs, lapack_complex_double* ap,
   7864                                lapack_complex_double* b, lapack_int ldb );
   7865 
   7866 lapack_int LAPACKE_sppsvx_work( int matrix_order, char fact, char uplo,
   7867                                 lapack_int n, lapack_int nrhs, float* ap,
   7868                                 float* afp, char* equed, float* s, float* b,
   7869                                 lapack_int ldb, float* x, lapack_int ldx,
   7870                                 float* rcond, float* ferr, float* berr,
   7871                                 float* work, lapack_int* iwork );
   7872 lapack_int LAPACKE_dppsvx_work( int matrix_order, char fact, char uplo,
   7873                                 lapack_int n, lapack_int nrhs, double* ap,
   7874                                 double* afp, char* equed, double* s, double* b,
   7875                                 lapack_int ldb, double* x, lapack_int ldx,
   7876                                 double* rcond, double* ferr, double* berr,
   7877                                 double* work, lapack_int* iwork );
   7878 lapack_int LAPACKE_cppsvx_work( int matrix_order, char fact, char uplo,
   7879                                 lapack_int n, lapack_int nrhs,
   7880                                 lapack_complex_float* ap,
   7881                                 lapack_complex_float* afp, char* equed,
   7882                                 float* s, lapack_complex_float* b,
   7883                                 lapack_int ldb, lapack_complex_float* x,
   7884                                 lapack_int ldx, float* rcond, float* ferr,
   7885                                 float* berr, lapack_complex_float* work,
   7886                                 float* rwork );
   7887 lapack_int LAPACKE_zppsvx_work( int matrix_order, char fact, char uplo,
   7888                                 lapack_int n, lapack_int nrhs,
   7889                                 lapack_complex_double* ap,
   7890                                 lapack_complex_double* afp, char* equed,
   7891                                 double* s, lapack_complex_double* b,
   7892                                 lapack_int ldb, lapack_complex_double* x,
   7893                                 lapack_int ldx, double* rcond, double* ferr,
   7894                                 double* berr, lapack_complex_double* work,
   7895                                 double* rwork );
   7896 
   7897 lapack_int LAPACKE_spptrf_work( int matrix_order, char uplo, lapack_int n,
   7898                                 float* ap );
   7899 lapack_int LAPACKE_dpptrf_work( int matrix_order, char uplo, lapack_int n,
   7900                                 double* ap );
   7901 lapack_int LAPACKE_cpptrf_work( int matrix_order, char uplo, lapack_int n,
   7902                                 lapack_complex_float* ap );
   7903 lapack_int LAPACKE_zpptrf_work( int matrix_order, char uplo, lapack_int n,
   7904                                 lapack_complex_double* ap );
   7905 
   7906 lapack_int LAPACKE_spptri_work( int matrix_order, char uplo, lapack_int n,
   7907                                 float* ap );
   7908 lapack_int LAPACKE_dpptri_work( int matrix_order, char uplo, lapack_int n,
   7909                                 double* ap );
   7910 lapack_int LAPACKE_cpptri_work( int matrix_order, char uplo, lapack_int n,
   7911                                 lapack_complex_float* ap );
   7912 lapack_int LAPACKE_zpptri_work( int matrix_order, char uplo, lapack_int n,
   7913                                 lapack_complex_double* ap );
   7914 
   7915 lapack_int LAPACKE_spptrs_work( int matrix_order, char uplo, lapack_int n,
   7916                                 lapack_int nrhs, const float* ap, float* b,
   7917                                 lapack_int ldb );
   7918 lapack_int LAPACKE_dpptrs_work( int matrix_order, char uplo, lapack_int n,
   7919                                 lapack_int nrhs, const double* ap, double* b,
   7920                                 lapack_int ldb );
   7921 lapack_int LAPACKE_cpptrs_work( int matrix_order, char uplo, lapack_int n,
   7922                                 lapack_int nrhs, const lapack_complex_float* ap,
   7923                                 lapack_complex_float* b, lapack_int ldb );
   7924 lapack_int LAPACKE_zpptrs_work( int matrix_order, char uplo, lapack_int n,
   7925                                 lapack_int nrhs,
   7926                                 const lapack_complex_double* ap,
   7927                                 lapack_complex_double* b, lapack_int ldb );
   7928 
   7929 lapack_int LAPACKE_spstrf_work( int matrix_order, char uplo, lapack_int n,
   7930                                 float* a, lapack_int lda, lapack_int* piv,
   7931                                 lapack_int* rank, float tol, float* work );
   7932 lapack_int LAPACKE_dpstrf_work( int matrix_order, char uplo, lapack_int n,
   7933                                 double* a, lapack_int lda, lapack_int* piv,
   7934                                 lapack_int* rank, double tol, double* work );
   7935 lapack_int LAPACKE_cpstrf_work( int matrix_order, char uplo, lapack_int n,
   7936                                 lapack_complex_float* a, lapack_int lda,
   7937                                 lapack_int* piv, lapack_int* rank, float tol,
   7938                                 float* work );
   7939 lapack_int LAPACKE_zpstrf_work( int matrix_order, char uplo, lapack_int n,
   7940                                 lapack_complex_double* a, lapack_int lda,
   7941                                 lapack_int* piv, lapack_int* rank, double tol,
   7942                                 double* work );
   7943 
   7944 lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
   7945                                 float anorm, float* rcond, float* work );
   7946 lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
   7947                                 double anorm, double* rcond, double* work );
   7948 lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
   7949                                 const lapack_complex_float* e, float anorm,
   7950                                 float* rcond, float* work );
   7951 lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
   7952                                 const lapack_complex_double* e, double anorm,
   7953                                 double* rcond, double* work );
   7954 
   7955 lapack_int LAPACKE_spteqr_work( int matrix_order, char compz, lapack_int n,
   7956                                 float* d, float* e, float* z, lapack_int ldz,
   7957                                 float* work );
   7958 lapack_int LAPACKE_dpteqr_work( int matrix_order, char compz, lapack_int n,
   7959                                 double* d, double* e, double* z, lapack_int ldz,
   7960                                 double* work );
   7961 lapack_int LAPACKE_cpteqr_work( int matrix_order, char compz, lapack_int n,
   7962                                 float* d, float* e, lapack_complex_float* z,
   7963                                 lapack_int ldz, float* work );
   7964 lapack_int LAPACKE_zpteqr_work( int matrix_order, char compz, lapack_int n,
   7965                                 double* d, double* e, lapack_complex_double* z,
   7966                                 lapack_int ldz, double* work );
   7967 
   7968 lapack_int LAPACKE_sptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
   7969                                 const float* d, const float* e, const float* df,
   7970                                 const float* ef, const float* b, lapack_int ldb,
   7971                                 float* x, lapack_int ldx, float* ferr,
   7972                                 float* berr, float* work );
   7973 lapack_int LAPACKE_dptrfs_work( int matrix_order, lapack_int n, lapack_int nrhs,
   7974                                 const double* d, const double* e,
   7975                                 const double* df, const double* ef,
   7976                                 const double* b, lapack_int ldb, double* x,
   7977                                 lapack_int ldx, double* ferr, double* berr,
   7978                                 double* work );
   7979 lapack_int LAPACKE_cptrfs_work( int matrix_order, char uplo, lapack_int n,
   7980                                 lapack_int nrhs, const float* d,
   7981                                 const lapack_complex_float* e, const float* df,
   7982                                 const lapack_complex_float* ef,
   7983                                 const lapack_complex_float* b, lapack_int ldb,
   7984                                 lapack_complex_float* x, lapack_int ldx,
   7985                                 float* ferr, float* berr,
   7986                                 lapack_complex_float* work, float* rwork );
   7987 lapack_int LAPACKE_zptrfs_work( int matrix_order, char uplo, lapack_int n,
   7988                                 lapack_int nrhs, const double* d,
   7989                                 const lapack_complex_double* e,
   7990                                 const double* df,
   7991                                 const lapack_complex_double* ef,
   7992                                 const lapack_complex_double* b, lapack_int ldb,
   7993                                 lapack_complex_double* x, lapack_int ldx,
   7994                                 double* ferr, double* berr,
   7995                                 lapack_complex_double* work, double* rwork );
   7996 
   7997 lapack_int LAPACKE_sptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   7998                                float* d, float* e, float* b, lapack_int ldb );
   7999 lapack_int LAPACKE_dptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   8000                                double* d, double* e, double* b,
   8001                                lapack_int ldb );
   8002 lapack_int LAPACKE_cptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   8003                                float* d, lapack_complex_float* e,
   8004                                lapack_complex_float* b, lapack_int ldb );
   8005 lapack_int LAPACKE_zptsv_work( int matrix_order, lapack_int n, lapack_int nrhs,
   8006                                double* d, lapack_complex_double* e,
   8007                                lapack_complex_double* b, lapack_int ldb );
   8008 
   8009 lapack_int LAPACKE_sptsvx_work( int matrix_order, char fact, lapack_int n,
   8010                                 lapack_int nrhs, const float* d, const float* e,
   8011                                 float* df, float* ef, const float* b,
   8012                                 lapack_int ldb, float* x, lapack_int ldx,
   8013                                 float* rcond, float* ferr, float* berr,
   8014                                 float* work );
   8015 lapack_int LAPACKE_dptsvx_work( int matrix_order, char fact, lapack_int n,
   8016                                 lapack_int nrhs, const double* d,
   8017                                 const double* e, double* df, double* ef,
   8018                                 const double* b, lapack_int ldb, double* x,
   8019                                 lapack_int ldx, double* rcond, double* ferr,
   8020                                 double* berr, double* work );
   8021 lapack_int LAPACKE_cptsvx_work( int matrix_order, char fact, lapack_int n,
   8022                                 lapack_int nrhs, const float* d,
   8023                                 const lapack_complex_float* e, float* df,
   8024                                 lapack_complex_float* ef,
   8025                                 const lapack_complex_float* b, lapack_int ldb,
   8026                                 lapack_complex_float* x, lapack_int ldx,
   8027                                 float* rcond, float* ferr, float* berr,
   8028                                 lapack_complex_float* work, float* rwork );
   8029 lapack_int LAPACKE_zptsvx_work( int matrix_order, char fact, lapack_int n,
   8030                                 lapack_int nrhs, const double* d,
   8031                                 const lapack_complex_double* e, double* df,
   8032                                 lapack_complex_double* ef,
   8033                                 const lapack_complex_double* b, lapack_int ldb,
   8034                                 lapack_complex_double* x, lapack_int ldx,
   8035                                 double* rcond, double* ferr, double* berr,
   8036                                 lapack_complex_double* work, double* rwork );
   8037 
   8038 lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
   8039 lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
   8040 lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
   8041                                 lapack_complex_float* e );
   8042 lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
   8043                                 lapack_complex_double* e );
   8044 
   8045 lapack_int LAPACKE_spttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
   8046                                 const float* d, const float* e, float* b,
   8047                                 lapack_int ldb );
   8048 lapack_int LAPACKE_dpttrs_work( int matrix_order, lapack_int n, lapack_int nrhs,
   8049                                 const double* d, const double* e, double* b,
   8050                                 lapack_int ldb );
   8051 lapack_int LAPACKE_cpttrs_work( int matrix_order, char uplo, lapack_int n,
   8052                                 lapack_int nrhs, const float* d,
   8053                                 const lapack_complex_float* e,
   8054                                 lapack_complex_float* b, lapack_int ldb );
   8055 lapack_int LAPACKE_zpttrs_work( int matrix_order, char uplo, lapack_int n,
   8056                                 lapack_int nrhs, const double* d,
   8057                                 const lapack_complex_double* e,
   8058                                 lapack_complex_double* b, lapack_int ldb );
   8059 
   8060 lapack_int LAPACKE_ssbev_work( int matrix_order, char jobz, char uplo,
   8061                                lapack_int n, lapack_int kd, float* ab,
   8062                                lapack_int ldab, float* w, float* z,
   8063                                lapack_int ldz, float* work );
   8064 lapack_int LAPACKE_dsbev_work( int matrix_order, char jobz, char uplo,
   8065                                lapack_int n, lapack_int kd, double* ab,
   8066                                lapack_int ldab, double* w, double* z,
   8067                                lapack_int ldz, double* work );
   8068 
   8069 lapack_int LAPACKE_ssbevd_work( int matrix_order, char jobz, char uplo,
   8070                                 lapack_int n, lapack_int kd, float* ab,
   8071                                 lapack_int ldab, float* w, float* z,
   8072                                 lapack_int ldz, float* work, lapack_int lwork,
   8073                                 lapack_int* iwork, lapack_int liwork );
   8074 lapack_int LAPACKE_dsbevd_work( int matrix_order, char jobz, char uplo,
   8075                                 lapack_int n, lapack_int kd, double* ab,
   8076                                 lapack_int ldab, double* w, double* z,
   8077                                 lapack_int ldz, double* work, lapack_int lwork,
   8078                                 lapack_int* iwork, lapack_int liwork );
   8079 
   8080 lapack_int LAPACKE_ssbevx_work( int matrix_order, char jobz, char range,
   8081                                 char uplo, lapack_int n, lapack_int kd,
   8082                                 float* ab, lapack_int ldab, float* q,
   8083                                 lapack_int ldq, float vl, float vu,
   8084                                 lapack_int il, lapack_int iu, float abstol,
   8085                                 lapack_int* m, float* w, float* z,
   8086                                 lapack_int ldz, float* work, lapack_int* iwork,
   8087                                 lapack_int* ifail );
   8088 lapack_int LAPACKE_dsbevx_work( int matrix_order, char jobz, char range,
   8089                                 char uplo, lapack_int n, lapack_int kd,
   8090                                 double* ab, lapack_int ldab, double* q,
   8091                                 lapack_int ldq, double vl, double vu,
   8092                                 lapack_int il, lapack_int iu, double abstol,
   8093                                 lapack_int* m, double* w, double* z,
   8094                                 lapack_int ldz, double* work, lapack_int* iwork,
   8095                                 lapack_int* ifail );
   8096 
   8097 lapack_int LAPACKE_ssbgst_work( int matrix_order, char vect, char uplo,
   8098                                 lapack_int n, lapack_int ka, lapack_int kb,
   8099                                 float* ab, lapack_int ldab, const float* bb,
   8100                                 lapack_int ldbb, float* x, lapack_int ldx,
   8101                                 float* work );
   8102 lapack_int LAPACKE_dsbgst_work( int matrix_order, char vect, char uplo,
   8103                                 lapack_int n, lapack_int ka, lapack_int kb,
   8104                                 double* ab, lapack_int ldab, const double* bb,
   8105                                 lapack_int ldbb, double* x, lapack_int ldx,
   8106                                 double* work );
   8107 
   8108 lapack_int LAPACKE_ssbgv_work( int matrix_order, char jobz, char uplo,
   8109                                lapack_int n, lapack_int ka, lapack_int kb,
   8110                                float* ab, lapack_int ldab, float* bb,
   8111                                lapack_int ldbb, float* w, float* z,
   8112                                lapack_int ldz, float* work );
   8113 lapack_int LAPACKE_dsbgv_work( int matrix_order, char jobz, char uplo,
   8114                                lapack_int n, lapack_int ka, lapack_int kb,
   8115                                double* ab, lapack_int ldab, double* bb,
   8116                                lapack_int ldbb, double* w, double* z,
   8117                                lapack_int ldz, double* work );
   8118 
   8119 lapack_int LAPACKE_ssbgvd_work( int matrix_order, char jobz, char uplo,
   8120                                 lapack_int n, lapack_int ka, lapack_int kb,
   8121                                 float* ab, lapack_int ldab, float* bb,
   8122                                 lapack_int ldbb, float* w, float* z,
   8123                                 lapack_int ldz, float* work, lapack_int lwork,
   8124                                 lapack_int* iwork, lapack_int liwork );
   8125 lapack_int LAPACKE_dsbgvd_work( int matrix_order, char jobz, char uplo,
   8126                                 lapack_int n, lapack_int ka, lapack_int kb,
   8127                                 double* ab, lapack_int ldab, double* bb,
   8128                                 lapack_int ldbb, double* w, double* z,
   8129                                 lapack_int ldz, double* work, lapack_int lwork,
   8130                                 lapack_int* iwork, lapack_int liwork );
   8131 
   8132 lapack_int LAPACKE_ssbgvx_work( int matrix_order, char jobz, char range,
   8133                                 char uplo, lapack_int n, lapack_int ka,
   8134                                 lapack_int kb, float* ab, lapack_int ldab,
   8135                                 float* bb, lapack_int ldbb, float* q,
   8136                                 lapack_int ldq, float vl, float vu,
   8137                                 lapack_int il, lapack_int iu, float abstol,
   8138                                 lapack_int* m, float* w, float* z,
   8139                                 lapack_int ldz, float* work, lapack_int* iwork,
   8140                                 lapack_int* ifail );
   8141 lapack_int LAPACKE_dsbgvx_work( int matrix_order, char jobz, char range,
   8142                                 char uplo, lapack_int n, lapack_int ka,
   8143                                 lapack_int kb, double* ab, lapack_int ldab,
   8144                                 double* bb, lapack_int ldbb, double* q,
   8145                                 lapack_int ldq, double vl, double vu,
   8146                                 lapack_int il, lapack_int iu, double abstol,
   8147                                 lapack_int* m, double* w, double* z,
   8148                                 lapack_int ldz, double* work, lapack_int* iwork,
   8149                                 lapack_int* ifail );
   8150 
   8151 lapack_int LAPACKE_ssbtrd_work( int matrix_order, char vect, char uplo,
   8152                                 lapack_int n, lapack_int kd, float* ab,
   8153                                 lapack_int ldab, float* d, float* e, float* q,
   8154                                 lapack_int ldq, float* work );
   8155 lapack_int LAPACKE_dsbtrd_work( int matrix_order, char vect, char uplo,
   8156                                 lapack_int n, lapack_int kd, double* ab,
   8157                                 lapack_int ldab, double* d, double* e,
   8158                                 double* q, lapack_int ldq, double* work );
   8159 
   8160 lapack_int LAPACKE_ssfrk_work( int matrix_order, char transr, char uplo,
   8161                                char trans, lapack_int n, lapack_int k,
   8162                                float alpha, const float* a, lapack_int lda,
   8163                                float beta, float* c );
   8164 lapack_int LAPACKE_dsfrk_work( int matrix_order, char transr, char uplo,
   8165                                char trans, lapack_int n, lapack_int k,
   8166                                double alpha, const double* a, lapack_int lda,
   8167                                double beta, double* c );
   8168 
   8169 lapack_int LAPACKE_sspcon_work( int matrix_order, char uplo, lapack_int n,
   8170                                 const float* ap, const lapack_int* ipiv,
   8171                                 float anorm, float* rcond, float* work,
   8172                                 lapack_int* iwork );
   8173 lapack_int LAPACKE_dspcon_work( int matrix_order, char uplo, lapack_int n,
   8174                                 const double* ap, const lapack_int* ipiv,
   8175                                 double anorm, double* rcond, double* work,
   8176                                 lapack_int* iwork );
   8177 lapack_int LAPACKE_cspcon_work( int matrix_order, char uplo, lapack_int n,
   8178                                 const lapack_complex_float* ap,
   8179                                 const lapack_int* ipiv, float anorm,
   8180                                 float* rcond, lapack_complex_float* work );
   8181 lapack_int LAPACKE_zspcon_work( int matrix_order, char uplo, lapack_int n,
   8182                                 const lapack_complex_double* ap,
   8183                                 const lapack_int* ipiv, double anorm,
   8184                                 double* rcond, lapack_complex_double* work );
   8185 
   8186 lapack_int LAPACKE_sspev_work( int matrix_order, char jobz, char uplo,
   8187                                lapack_int n, float* ap, float* w, float* z,
   8188                                lapack_int ldz, float* work );
   8189 lapack_int LAPACKE_dspev_work( int matrix_order, char jobz, char uplo,
   8190                                lapack_int n, double* ap, double* w, double* z,
   8191                                lapack_int ldz, double* work );
   8192 
   8193 lapack_int LAPACKE_sspevd_work( int matrix_order, char jobz, char uplo,
   8194                                 lapack_int n, float* ap, float* w, float* z,
   8195                                 lapack_int ldz, float* work, lapack_int lwork,
   8196                                 lapack_int* iwork, lapack_int liwork );
   8197 lapack_int LAPACKE_dspevd_work( int matrix_order, char jobz, char uplo,
   8198                                 lapack_int n, double* ap, double* w, double* z,
   8199                                 lapack_int ldz, double* work, lapack_int lwork,
   8200                                 lapack_int* iwork, lapack_int liwork );
   8201 
   8202 lapack_int LAPACKE_sspevx_work( int matrix_order, char jobz, char range,
   8203                                 char uplo, lapack_int n, float* ap, float vl,
   8204                                 float vu, lapack_int il, lapack_int iu,
   8205                                 float abstol, lapack_int* m, float* w, float* z,
   8206                                 lapack_int ldz, float* work, lapack_int* iwork,
   8207                                 lapack_int* ifail );
   8208 lapack_int LAPACKE_dspevx_work( int matrix_order, char jobz, char range,
   8209                                 char uplo, lapack_int n, double* ap, double vl,
   8210                                 double vu, lapack_int il, lapack_int iu,
   8211                                 double abstol, lapack_int* m, double* w,
   8212                                 double* z, lapack_int ldz, double* work,
   8213                                 lapack_int* iwork, lapack_int* ifail );
   8214 
   8215 lapack_int LAPACKE_sspgst_work( int matrix_order, lapack_int itype, char uplo,
   8216                                 lapack_int n, float* ap, const float* bp );
   8217 lapack_int LAPACKE_dspgst_work( int matrix_order, lapack_int itype, char uplo,
   8218                                 lapack_int n, double* ap, const double* bp );
   8219 
   8220 lapack_int LAPACKE_sspgv_work( int matrix_order, lapack_int itype, char jobz,
   8221                                char uplo, lapack_int n, float* ap, float* bp,
   8222                                float* w, float* z, lapack_int ldz,
   8223                                float* work );
   8224 lapack_int LAPACKE_dspgv_work( int matrix_order, lapack_int itype, char jobz,
   8225                                char uplo, lapack_int n, double* ap, double* bp,
   8226                                double* w, double* z, lapack_int ldz,
   8227                                double* work );
   8228 
   8229 lapack_int LAPACKE_sspgvd_work( int matrix_order, lapack_int itype, char jobz,
   8230                                 char uplo, lapack_int n, float* ap, float* bp,
   8231                                 float* w, float* z, lapack_int ldz, float* work,
   8232                                 lapack_int lwork, lapack_int* iwork,
   8233                                 lapack_int liwork );
   8234 lapack_int LAPACKE_dspgvd_work( int matrix_order, lapack_int itype, char jobz,
   8235                                 char uplo, lapack_int n, double* ap, double* bp,
   8236                                 double* w, double* z, lapack_int ldz,
   8237                                 double* work, lapack_int lwork,
   8238                                 lapack_int* iwork, lapack_int liwork );
   8239 
   8240 lapack_int LAPACKE_sspgvx_work( int matrix_order, lapack_int itype, char jobz,
   8241                                 char range, char uplo, lapack_int n, float* ap,
   8242                                 float* bp, float vl, float vu, lapack_int il,
   8243                                 lapack_int iu, float abstol, lapack_int* m,
   8244                                 float* w, float* z, lapack_int ldz, float* work,
   8245                                 lapack_int* iwork, lapack_int* ifail );
   8246 lapack_int LAPACKE_dspgvx_work( int matrix_order, lapack_int itype, char jobz,
   8247                                 char range, char uplo, lapack_int n, double* ap,
   8248                                 double* bp, double vl, double vu, lapack_int il,
   8249                                 lapack_int iu, double abstol, lapack_int* m,
   8250                                 double* w, double* z, lapack_int ldz,
   8251                                 double* work, lapack_int* iwork,
   8252                                 lapack_int* ifail );
   8253 
   8254 lapack_int LAPACKE_ssprfs_work( int matrix_order, char uplo, lapack_int n,
   8255                                 lapack_int nrhs, const float* ap,
   8256                                 const float* afp, const lapack_int* ipiv,
   8257                                 const float* b, lapack_int ldb, float* x,
   8258                                 lapack_int ldx, float* ferr, float* berr,
   8259                                 float* work, lapack_int* iwork );
   8260 lapack_int LAPACKE_dsprfs_work( int matrix_order, char uplo, lapack_int n,
   8261                                 lapack_int nrhs, const double* ap,
   8262                                 const double* afp, const lapack_int* ipiv,
   8263                                 const double* b, lapack_int ldb, double* x,
   8264                                 lapack_int ldx, double* ferr, double* berr,
   8265                                 double* work, lapack_int* iwork );
   8266 lapack_int LAPACKE_csprfs_work( int matrix_order, char uplo, lapack_int n,
   8267                                 lapack_int nrhs, const lapack_complex_float* ap,
   8268                                 const lapack_complex_float* afp,
   8269                                 const lapack_int* ipiv,
   8270                                 const lapack_complex_float* b, lapack_int ldb,
   8271                                 lapack_complex_float* x, lapack_int ldx,
   8272                                 float* ferr, float* berr,
   8273                                 lapack_complex_float* work, float* rwork );
   8274 lapack_int LAPACKE_zsprfs_work( int matrix_order, char uplo, lapack_int n,
   8275                                 lapack_int nrhs,
   8276                                 const lapack_complex_double* ap,
   8277                                 const lapack_complex_double* afp,
   8278                                 const lapack_int* ipiv,
   8279                                 const lapack_complex_double* b, lapack_int ldb,
   8280                                 lapack_complex_double* x, lapack_int ldx,
   8281                                 double* ferr, double* berr,
   8282                                 lapack_complex_double* work, double* rwork );
   8283 
   8284 lapack_int LAPACKE_sspsv_work( int matrix_order, char uplo, lapack_int n,
   8285                                lapack_int nrhs, float* ap, lapack_int* ipiv,
   8286                                float* b, lapack_int ldb );
   8287 lapack_int LAPACKE_dspsv_work( int matrix_order, char uplo, lapack_int n,
   8288                                lapack_int nrhs, double* ap, lapack_int* ipiv,
   8289                                double* b, lapack_int ldb );
   8290 lapack_int LAPACKE_cspsv_work( int matrix_order, char uplo, lapack_int n,
   8291                                lapack_int nrhs, lapack_complex_float* ap,
   8292                                lapack_int* ipiv, lapack_complex_float* b,
   8293                                lapack_int ldb );
   8294 lapack_int LAPACKE_zspsv_work( int matrix_order, char uplo, lapack_int n,
   8295                                lapack_int nrhs, lapack_complex_double* ap,
   8296                                lapack_int* ipiv, lapack_complex_double* b,
   8297                                lapack_int ldb );
   8298 
   8299 lapack_int LAPACKE_sspsvx_work( int matrix_order, char fact, char uplo,
   8300                                 lapack_int n, lapack_int nrhs, const float* ap,
   8301                                 float* afp, lapack_int* ipiv, const float* b,
   8302                                 lapack_int ldb, float* x, lapack_int ldx,
   8303                                 float* rcond, float* ferr, float* berr,
   8304                                 float* work, lapack_int* iwork );
   8305 lapack_int LAPACKE_dspsvx_work( int matrix_order, char fact, char uplo,
   8306                                 lapack_int n, lapack_int nrhs, const double* ap,
   8307                                 double* afp, lapack_int* ipiv, const double* b,
   8308                                 lapack_int ldb, double* x, lapack_int ldx,
   8309                                 double* rcond, double* ferr, double* berr,
   8310                                 double* work, lapack_int* iwork );
   8311 lapack_int LAPACKE_cspsvx_work( int matrix_order, char fact, char uplo,
   8312                                 lapack_int n, lapack_int nrhs,
   8313                                 const lapack_complex_float* ap,
   8314                                 lapack_complex_float* afp, lapack_int* ipiv,
   8315                                 const lapack_complex_float* b, lapack_int ldb,
   8316                                 lapack_complex_float* x, lapack_int ldx,
   8317                                 float* rcond, float* ferr, float* berr,
   8318                                 lapack_complex_float* work, float* rwork );
   8319 lapack_int LAPACKE_zspsvx_work( int matrix_order, char fact, char uplo,
   8320                                 lapack_int n, lapack_int nrhs,
   8321                                 const lapack_complex_double* ap,
   8322                                 lapack_complex_double* afp, lapack_int* ipiv,
   8323                                 const lapack_complex_double* b, lapack_int ldb,
   8324                                 lapack_complex_double* x, lapack_int ldx,
   8325                                 double* rcond, double* ferr, double* berr,
   8326                                 lapack_complex_double* work, double* rwork );
   8327 
   8328 lapack_int LAPACKE_ssptrd_work( int matrix_order, char uplo, lapack_int n,
   8329                                 float* ap, float* d, float* e, float* tau );
   8330 lapack_int LAPACKE_dsptrd_work( int matrix_order, char uplo, lapack_int n,
   8331                                 double* ap, double* d, double* e, double* tau );
   8332 
   8333 lapack_int LAPACKE_ssptrf_work( int matrix_order, char uplo, lapack_int n,
   8334                                 float* ap, lapack_int* ipiv );
   8335 lapack_int LAPACKE_dsptrf_work( int matrix_order, char uplo, lapack_int n,
   8336                                 double* ap, lapack_int* ipiv );
   8337 lapack_int LAPACKE_csptrf_work( int matrix_order, char uplo, lapack_int n,
   8338                                 lapack_complex_float* ap, lapack_int* ipiv );
   8339 lapack_int LAPACKE_zsptrf_work( int matrix_order, char uplo, lapack_int n,
   8340                                 lapack_complex_double* ap, lapack_int* ipiv );
   8341 
   8342 lapack_int LAPACKE_ssptri_work( int matrix_order, char uplo, lapack_int n,
   8343                                 float* ap, const lapack_int* ipiv,
   8344                                 float* work );
   8345 lapack_int LAPACKE_dsptri_work( int matrix_order, char uplo, lapack_int n,
   8346                                 double* ap, const lapack_int* ipiv,
   8347                                 double* work );
   8348 lapack_int LAPACKE_csptri_work( int matrix_order, char uplo, lapack_int n,
   8349                                 lapack_complex_float* ap,
   8350                                 const lapack_int* ipiv,
   8351                                 lapack_complex_float* work );
   8352 lapack_int LAPACKE_zsptri_work( int matrix_order, char uplo, lapack_int n,
   8353                                 lapack_complex_double* ap,
   8354                                 const lapack_int* ipiv,
   8355                                 lapack_complex_double* work );
   8356 
   8357 lapack_int LAPACKE_ssptrs_work( int matrix_order, char uplo, lapack_int n,
   8358                                 lapack_int nrhs, const float* ap,
   8359                                 const lapack_int* ipiv, float* b,
   8360                                 lapack_int ldb );
   8361 lapack_int LAPACKE_dsptrs_work( int matrix_order, char uplo, lapack_int n,
   8362                                 lapack_int nrhs, const double* ap,
   8363                                 const lapack_int* ipiv, double* b,
   8364                                 lapack_int ldb );
   8365 lapack_int LAPACKE_csptrs_work( int matrix_order, char uplo, lapack_int n,
   8366                                 lapack_int nrhs, const lapack_complex_float* ap,
   8367                                 const lapack_int* ipiv, lapack_complex_float* b,
   8368                                 lapack_int ldb );
   8369 lapack_int LAPACKE_zsptrs_work( int matrix_order, char uplo, lapack_int n,
   8370                                 lapack_int nrhs,
   8371                                 const lapack_complex_double* ap,
   8372                                 const lapack_int* ipiv,
   8373                                 lapack_complex_double* b, lapack_int ldb );
   8374 
   8375 lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
   8376                                 float vu, lapack_int il, lapack_int iu,
   8377                                 float abstol, const float* d, const float* e,
   8378                                 lapack_int* m, lapack_int* nsplit, float* w,
   8379                                 lapack_int* iblock, lapack_int* isplit,
   8380                                 float* work, lapack_int* iwork );
   8381 lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
   8382                                 double vu, lapack_int il, lapack_int iu,
   8383                                 double abstol, const double* d, const double* e,
   8384                                 lapack_int* m, lapack_int* nsplit, double* w,
   8385                                 lapack_int* iblock, lapack_int* isplit,
   8386                                 double* work, lapack_int* iwork );
   8387 
   8388 lapack_int LAPACKE_sstedc_work( int matrix_order, char compz, lapack_int n,
   8389                                 float* d, float* e, float* z, lapack_int ldz,
   8390                                 float* work, lapack_int lwork,
   8391                                 lapack_int* iwork, lapack_int liwork );
   8392 lapack_int LAPACKE_dstedc_work( int matrix_order, char compz, lapack_int n,
   8393                                 double* d, double* e, double* z, lapack_int ldz,
   8394                                 double* work, lapack_int lwork,
   8395                                 lapack_int* iwork, lapack_int liwork );
   8396 lapack_int LAPACKE_cstedc_work( int matrix_order, char compz, lapack_int n,
   8397                                 float* d, float* e, lapack_complex_float* z,
   8398                                 lapack_int ldz, lapack_complex_float* work,
   8399                                 lapack_int lwork, float* rwork,
   8400                                 lapack_int lrwork, lapack_int* iwork,
   8401                                 lapack_int liwork );
   8402 lapack_int LAPACKE_zstedc_work( int matrix_order, char compz, lapack_int n,
   8403                                 double* d, double* e, lapack_complex_double* z,
   8404                                 lapack_int ldz, lapack_complex_double* work,
   8405                                 lapack_int lwork, double* rwork,
   8406                                 lapack_int lrwork, lapack_int* iwork,
   8407                                 lapack_int liwork );
   8408 
   8409 lapack_int LAPACKE_sstegr_work( int matrix_order, char jobz, char range,
   8410                                 lapack_int n, float* d, float* e, float vl,
   8411                                 float vu, lapack_int il, lapack_int iu,
   8412                                 float abstol, lapack_int* m, float* w, float* z,
   8413                                 lapack_int ldz, lapack_int* isuppz, float* work,
   8414                                 lapack_int lwork, lapack_int* iwork,
   8415                                 lapack_int liwork );
   8416 lapack_int LAPACKE_dstegr_work( int matrix_order, char jobz, char range,
   8417                                 lapack_int n, double* d, double* e, double vl,
   8418                                 double vu, lapack_int il, lapack_int iu,
   8419                                 double abstol, lapack_int* m, double* w,
   8420                                 double* z, lapack_int ldz, lapack_int* isuppz,
   8421                                 double* work, lapack_int lwork,
   8422                                 lapack_int* iwork, lapack_int liwork );
   8423 lapack_int LAPACKE_cstegr_work( int matrix_order, char jobz, char range,
   8424                                 lapack_int n, float* d, float* e, float vl,
   8425                                 float vu, lapack_int il, lapack_int iu,
   8426                                 float abstol, lapack_int* m, float* w,
   8427                                 lapack_complex_float* z, lapack_int ldz,
   8428                                 lapack_int* isuppz, float* work,
   8429                                 lapack_int lwork, lapack_int* iwork,
   8430                                 lapack_int liwork );
   8431 lapack_int LAPACKE_zstegr_work( int matrix_order, char jobz, char range,
   8432                                 lapack_int n, double* d, double* e, double vl,
   8433                                 double vu, lapack_int il, lapack_int iu,
   8434                                 double abstol, lapack_int* m, double* w,
   8435                                 lapack_complex_double* z, lapack_int ldz,
   8436                                 lapack_int* isuppz, double* work,
   8437                                 lapack_int lwork, lapack_int* iwork,
   8438                                 lapack_int liwork );
   8439 
   8440 lapack_int LAPACKE_sstein_work( int matrix_order, lapack_int n, const float* d,
   8441                                 const float* e, lapack_int m, const float* w,
   8442                                 const lapack_int* iblock,
   8443                                 const lapack_int* isplit, float* z,
   8444                                 lapack_int ldz, float* work, lapack_int* iwork,
   8445                                 lapack_int* ifailv );
   8446 lapack_int LAPACKE_dstein_work( int matrix_order, lapack_int n, const double* d,
   8447                                 const double* e, lapack_int m, const double* w,
   8448                                 const lapack_int* iblock,
   8449                                 const lapack_int* isplit, double* z,
   8450                                 lapack_int ldz, double* work, lapack_int* iwork,
   8451                                 lapack_int* ifailv );
   8452 lapack_int LAPACKE_cstein_work( int matrix_order, lapack_int n, const float* d,
   8453                                 const float* e, lapack_int m, const float* w,
   8454                                 const lapack_int* iblock,
   8455                                 const lapack_int* isplit,
   8456                                 lapack_complex_float* z, lapack_int ldz,
   8457                                 float* work, lapack_int* iwork,
   8458                                 lapack_int* ifailv );
   8459 lapack_int LAPACKE_zstein_work( int matrix_order, lapack_int n, const double* d,
   8460                                 const double* e, lapack_int m, const double* w,
   8461                                 const lapack_int* iblock,
   8462                                 const lapack_int* isplit,
   8463                                 lapack_complex_double* z, lapack_int ldz,
   8464                                 double* work, lapack_int* iwork,
   8465                                 lapack_int* ifailv );
   8466 
   8467 lapack_int LAPACKE_sstemr_work( int matrix_order, char jobz, char range,
   8468                                 lapack_int n, float* d, float* e, float vl,
   8469                                 float vu, lapack_int il, lapack_int iu,
   8470                                 lapack_int* m, float* w, float* z,
   8471                                 lapack_int ldz, lapack_int nzc,
   8472                                 lapack_int* isuppz, lapack_logical* tryrac,
   8473                                 float* work, lapack_int lwork,
   8474                                 lapack_int* iwork, lapack_int liwork );
   8475 lapack_int LAPACKE_dstemr_work( int matrix_order, char jobz, char range,
   8476                                 lapack_int n, double* d, double* e, double vl,
   8477                                 double vu, lapack_int il, lapack_int iu,
   8478                                 lapack_int* m, double* w, double* z,
   8479                                 lapack_int ldz, lapack_int nzc,
   8480                                 lapack_int* isuppz, lapack_logical* tryrac,
   8481                                 double* work, lapack_int lwork,
   8482                                 lapack_int* iwork, lapack_int liwork );
   8483 lapack_int LAPACKE_cstemr_work( int matrix_order, char jobz, char range,
   8484                                 lapack_int n, float* d, float* e, float vl,
   8485                                 float vu, lapack_int il, lapack_int iu,
   8486                                 lapack_int* m, float* w,
   8487                                 lapack_complex_float* z, lapack_int ldz,
   8488                                 lapack_int nzc, lapack_int* isuppz,
   8489                                 lapack_logical* tryrac, float* work,
   8490                                 lapack_int lwork, lapack_int* iwork,
   8491                                 lapack_int liwork );
   8492 lapack_int LAPACKE_zstemr_work( int matrix_order, char jobz, char range,
   8493                                 lapack_int n, double* d, double* e, double vl,
   8494                                 double vu, lapack_int il, lapack_int iu,
   8495                                 lapack_int* m, double* w,
   8496                                 lapack_complex_double* z, lapack_int ldz,
   8497                                 lapack_int nzc, lapack_int* isuppz,
   8498                                 lapack_logical* tryrac, double* work,
   8499                                 lapack_int lwork, lapack_int* iwork,
   8500                                 lapack_int liwork );
   8501 
   8502 lapack_int LAPACKE_ssteqr_work( int matrix_order, char compz, lapack_int n,
   8503                                 float* d, float* e, float* z, lapack_int ldz,
   8504                                 float* work );
   8505 lapack_int LAPACKE_dsteqr_work( int matrix_order, char compz, lapack_int n,
   8506                                 double* d, double* e, double* z, lapack_int ldz,
   8507                                 double* work );
   8508 lapack_int LAPACKE_csteqr_work( int matrix_order, char compz, lapack_int n,
   8509                                 float* d, float* e, lapack_complex_float* z,
   8510                                 lapack_int ldz, float* work );
   8511 lapack_int LAPACKE_zsteqr_work( int matrix_order, char compz, lapack_int n,
   8512                                 double* d, double* e, lapack_complex_double* z,
   8513                                 lapack_int ldz, double* work );
   8514 
   8515 lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
   8516 lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
   8517 
   8518 lapack_int LAPACKE_sstev_work( int matrix_order, char jobz, lapack_int n,
   8519                                float* d, float* e, float* z, lapack_int ldz,
   8520                                float* work );
   8521 lapack_int LAPACKE_dstev_work( int matrix_order, char jobz, lapack_int n,
   8522                                double* d, double* e, double* z, lapack_int ldz,
   8523                                double* work );
   8524 
   8525 lapack_int LAPACKE_sstevd_work( int matrix_order, char jobz, lapack_int n,
   8526                                 float* d, float* e, float* z, lapack_int ldz,
   8527                                 float* work, lapack_int lwork,
   8528                                 lapack_int* iwork, lapack_int liwork );
   8529 lapack_int LAPACKE_dstevd_work( int matrix_order, char jobz, lapack_int n,
   8530                                 double* d, double* e, double* z, lapack_int ldz,
   8531                                 double* work, lapack_int lwork,
   8532                                 lapack_int* iwork, lapack_int liwork );
   8533 
   8534 lapack_int LAPACKE_sstevr_work( int matrix_order, char jobz, char range,
   8535                                 lapack_int n, float* d, float* e, float vl,
   8536                                 float vu, lapack_int il, lapack_int iu,
   8537                                 float abstol, lapack_int* m, float* w, float* z,
   8538                                 lapack_int ldz, lapack_int* isuppz, float* work,
   8539                                 lapack_int lwork, lapack_int* iwork,
   8540                                 lapack_int liwork );
   8541 lapack_int LAPACKE_dstevr_work( int matrix_order, char jobz, char range,
   8542                                 lapack_int n, double* d, double* e, double vl,
   8543                                 double vu, lapack_int il, lapack_int iu,
   8544                                 double abstol, lapack_int* m, double* w,
   8545                                 double* z, lapack_int ldz, lapack_int* isuppz,
   8546                                 double* work, lapack_int lwork,
   8547                                 lapack_int* iwork, lapack_int liwork );
   8548 
   8549 lapack_int LAPACKE_sstevx_work( int matrix_order, char jobz, char range,
   8550                                 lapack_int n, float* d, float* e, float vl,
   8551                                 float vu, lapack_int il, lapack_int iu,
   8552                                 float abstol, lapack_int* m, float* w, float* z,
   8553                                 lapack_int ldz, float* work, lapack_int* iwork,
   8554                                 lapack_int* ifail );
   8555 lapack_int LAPACKE_dstevx_work( int matrix_order, char jobz, char range,
   8556                                 lapack_int n, double* d, double* e, double vl,
   8557                                 double vu, lapack_int il, lapack_int iu,
   8558                                 double abstol, lapack_int* m, double* w,
   8559                                 double* z, lapack_int ldz, double* work,
   8560                                 lapack_int* iwork, lapack_int* ifail );
   8561 
   8562 lapack_int LAPACKE_ssycon_work( int matrix_order, char uplo, lapack_int n,
   8563                                 const float* a, lapack_int lda,
   8564                                 const lapack_int* ipiv, float anorm,
   8565                                 float* rcond, float* work, lapack_int* iwork );
   8566 lapack_int LAPACKE_dsycon_work( int matrix_order, char uplo, lapack_int n,
   8567                                 const double* a, lapack_int lda,
   8568                                 const lapack_int* ipiv, double anorm,
   8569                                 double* rcond, double* work,
   8570                                 lapack_int* iwork );
   8571 lapack_int LAPACKE_csycon_work( int matrix_order, char uplo, lapack_int n,
   8572                                 const lapack_complex_float* a, lapack_int lda,
   8573                                 const lapack_int* ipiv, float anorm,
   8574                                 float* rcond, lapack_complex_float* work );
   8575 lapack_int LAPACKE_zsycon_work( int matrix_order, char uplo, lapack_int n,
   8576                                 const lapack_complex_double* a, lapack_int lda,
   8577                                 const lapack_int* ipiv, double anorm,
   8578                                 double* rcond, lapack_complex_double* work );
   8579 
   8580 lapack_int LAPACKE_ssyequb_work( int matrix_order, char uplo, lapack_int n,
   8581                                  const float* a, lapack_int lda, float* s,
   8582                                  float* scond, float* amax, float* work );
   8583 lapack_int LAPACKE_dsyequb_work( int matrix_order, char uplo, lapack_int n,
   8584                                  const double* a, lapack_int lda, double* s,
   8585                                  double* scond, double* amax, double* work );
   8586 lapack_int LAPACKE_csyequb_work( int matrix_order, char uplo, lapack_int n,
   8587                                  const lapack_complex_float* a, lapack_int lda,
   8588                                  float* s, float* scond, float* amax,
   8589                                  lapack_complex_float* work );
   8590 lapack_int LAPACKE_zsyequb_work( int matrix_order, char uplo, lapack_int n,
   8591                                  const lapack_complex_double* a, lapack_int lda,
   8592                                  double* s, double* scond, double* amax,
   8593                                  lapack_complex_double* work );
   8594 
   8595 lapack_int LAPACKE_ssyev_work( int matrix_order, char jobz, char uplo,
   8596                                lapack_int n, float* a, lapack_int lda, float* w,
   8597                                float* work, lapack_int lwork );
   8598 lapack_int LAPACKE_dsyev_work( int matrix_order, char jobz, char uplo,
   8599                                lapack_int n, double* a, lapack_int lda,
   8600                                double* w, double* work, lapack_int lwork );
   8601 
   8602 lapack_int LAPACKE_ssyevd_work( int matrix_order, char jobz, char uplo,
   8603                                 lapack_int n, float* a, lapack_int lda,
   8604                                 float* w, float* work, lapack_int lwork,
   8605                                 lapack_int* iwork, lapack_int liwork );
   8606 lapack_int LAPACKE_dsyevd_work( int matrix_order, char jobz, char uplo,
   8607                                 lapack_int n, double* a, lapack_int lda,
   8608                                 double* w, double* work, lapack_int lwork,
   8609                                 lapack_int* iwork, lapack_int liwork );
   8610 
   8611 lapack_int LAPACKE_ssyevr_work( int matrix_order, char jobz, char range,
   8612                                 char uplo, lapack_int n, float* a,
   8613                                 lapack_int lda, float vl, float vu,
   8614                                 lapack_int il, lapack_int iu, float abstol,
   8615                                 lapack_int* m, float* w, float* z,
   8616                                 lapack_int ldz, lapack_int* isuppz, float* work,
   8617                                 lapack_int lwork, lapack_int* iwork,
   8618                                 lapack_int liwork );
   8619 lapack_int LAPACKE_dsyevr_work( int matrix_order, char jobz, char range,
   8620                                 char uplo, lapack_int n, double* a,
   8621                                 lapack_int lda, double vl, double vu,
   8622                                 lapack_int il, lapack_int iu, double abstol,
   8623                                 lapack_int* m, double* w, double* z,
   8624                                 lapack_int ldz, lapack_int* isuppz,
   8625                                 double* work, lapack_int lwork,
   8626                                 lapack_int* iwork, lapack_int liwork );
   8627 
   8628 lapack_int LAPACKE_ssyevx_work( int matrix_order, char jobz, char range,
   8629                                 char uplo, lapack_int n, float* a,
   8630                                 lapack_int lda, float vl, float vu,
   8631                                 lapack_int il, lapack_int iu, float abstol,
   8632                                 lapack_int* m, float* w, float* z,
   8633                                 lapack_int ldz, float* work, lapack_int lwork,
   8634                                 lapack_int* iwork, lapack_int* ifail );
   8635 lapack_int LAPACKE_dsyevx_work( int matrix_order, char jobz, char range,
   8636                                 char uplo, lapack_int n, double* a,
   8637                                 lapack_int lda, double vl, double vu,
   8638                                 lapack_int il, lapack_int iu, double abstol,
   8639                                 lapack_int* m, double* w, double* z,
   8640                                 lapack_int ldz, double* work, lapack_int lwork,
   8641                                 lapack_int* iwork, lapack_int* ifail );
   8642 
   8643 lapack_int LAPACKE_ssygst_work( int matrix_order, lapack_int itype, char uplo,
   8644                                 lapack_int n, float* a, lapack_int lda,
   8645                                 const float* b, lapack_int ldb );
   8646 lapack_int LAPACKE_dsygst_work( int matrix_order, lapack_int itype, char uplo,
   8647                                 lapack_int n, double* a, lapack_int lda,
   8648                                 const double* b, lapack_int ldb );
   8649 
   8650 lapack_int LAPACKE_ssygv_work( int matrix_order, lapack_int itype, char jobz,
   8651                                char uplo, lapack_int n, float* a,
   8652                                lapack_int lda, float* b, lapack_int ldb,
   8653                                float* w, float* work, lapack_int lwork );
   8654 lapack_int LAPACKE_dsygv_work( int matrix_order, lapack_int itype, char jobz,
   8655                                char uplo, lapack_int n, double* a,
   8656                                lapack_int lda, double* b, lapack_int ldb,
   8657                                double* w, double* work, lapack_int lwork );
   8658 
   8659 lapack_int LAPACKE_ssygvd_work( int matrix_order, lapack_int itype, char jobz,
   8660                                 char uplo, lapack_int n, float* a,
   8661                                 lapack_int lda, float* b, lapack_int ldb,
   8662                                 float* w, float* work, lapack_int lwork,
   8663                                 lapack_int* iwork, lapack_int liwork );
   8664 lapack_int LAPACKE_dsygvd_work( int matrix_order, lapack_int itype, char jobz,
   8665                                 char uplo, lapack_int n, double* a,
   8666                                 lapack_int lda, double* b, lapack_int ldb,
   8667                                 double* w, double* work, lapack_int lwork,
   8668                                 lapack_int* iwork, lapack_int liwork );
   8669 
   8670 lapack_int LAPACKE_ssygvx_work( int matrix_order, lapack_int itype, char jobz,
   8671                                 char range, char uplo, lapack_int n, float* a,
   8672                                 lapack_int lda, float* b, lapack_int ldb,
   8673                                 float vl, float vu, lapack_int il,
   8674                                 lapack_int iu, float abstol, lapack_int* m,
   8675                                 float* w, float* z, lapack_int ldz, float* work,
   8676                                 lapack_int lwork, lapack_int* iwork,
   8677                                 lapack_int* ifail );
   8678 lapack_int LAPACKE_dsygvx_work( int matrix_order, lapack_int itype, char jobz,
   8679                                 char range, char uplo, lapack_int n, double* a,
   8680                                 lapack_int lda, double* b, lapack_int ldb,
   8681                                 double vl, double vu, lapack_int il,
   8682                                 lapack_int iu, double abstol, lapack_int* m,
   8683                                 double* w, double* z, lapack_int ldz,
   8684                                 double* work, lapack_int lwork,
   8685                                 lapack_int* iwork, lapack_int* ifail );
   8686 
   8687 lapack_int LAPACKE_ssyrfs_work( int matrix_order, char uplo, lapack_int n,
   8688                                 lapack_int nrhs, const float* a, lapack_int lda,
   8689                                 const float* af, lapack_int ldaf,
   8690                                 const lapack_int* ipiv, const float* b,
   8691                                 lapack_int ldb, float* x, lapack_int ldx,
   8692                                 float* ferr, float* berr, float* work,
   8693                                 lapack_int* iwork );
   8694 lapack_int LAPACKE_dsyrfs_work( int matrix_order, char uplo, lapack_int n,
   8695                                 lapack_int nrhs, const double* a,
   8696                                 lapack_int lda, const double* af,
   8697                                 lapack_int ldaf, const lapack_int* ipiv,
   8698                                 const double* b, lapack_int ldb, double* x,
   8699                                 lapack_int ldx, double* ferr, double* berr,
   8700                                 double* work, lapack_int* iwork );
   8701 lapack_int LAPACKE_csyrfs_work( int matrix_order, char uplo, lapack_int n,
   8702                                 lapack_int nrhs, const lapack_complex_float* a,
   8703                                 lapack_int lda, const lapack_complex_float* af,
   8704                                 lapack_int ldaf, const lapack_int* ipiv,
   8705                                 const lapack_complex_float* b, lapack_int ldb,
   8706                                 lapack_complex_float* x, lapack_int ldx,
   8707                                 float* ferr, float* berr,
   8708                                 lapack_complex_float* work, float* rwork );
   8709 lapack_int LAPACKE_zsyrfs_work( int matrix_order, char uplo, lapack_int n,
   8710                                 lapack_int nrhs, const lapack_complex_double* a,
   8711                                 lapack_int lda, const lapack_complex_double* af,
   8712                                 lapack_int ldaf, const lapack_int* ipiv,
   8713                                 const lapack_complex_double* b, lapack_int ldb,
   8714                                 lapack_complex_double* x, lapack_int ldx,
   8715                                 double* ferr, double* berr,
   8716                                 lapack_complex_double* work, double* rwork );
   8717 
   8718 lapack_int LAPACKE_ssyrfsx_work( int matrix_order, char uplo, char equed,
   8719                                  lapack_int n, lapack_int nrhs, const float* a,
   8720                                  lapack_int lda, const float* af,
   8721                                  lapack_int ldaf, const lapack_int* ipiv,
   8722                                  const float* s, const float* b, lapack_int ldb,
   8723                                  float* x, lapack_int ldx, float* rcond,
   8724                                  float* berr, lapack_int n_err_bnds,
   8725                                  float* err_bnds_norm, float* err_bnds_comp,
   8726                                  lapack_int nparams, float* params, float* work,
   8727                                  lapack_int* iwork );
   8728 lapack_int LAPACKE_dsyrfsx_work( int matrix_order, char uplo, char equed,
   8729                                  lapack_int n, lapack_int nrhs, const double* a,
   8730                                  lapack_int lda, const double* af,
   8731                                  lapack_int ldaf, const lapack_int* ipiv,
   8732                                  const double* s, const double* b,
   8733                                  lapack_int ldb, double* x, lapack_int ldx,
   8734                                  double* rcond, double* berr,
   8735                                  lapack_int n_err_bnds, double* err_bnds_norm,
   8736                                  double* err_bnds_comp, lapack_int nparams,
   8737                                  double* params, double* work,
   8738                                  lapack_int* iwork );
   8739 lapack_int LAPACKE_csyrfsx_work( int matrix_order, char uplo, char equed,
   8740                                  lapack_int n, lapack_int nrhs,
   8741                                  const lapack_complex_float* a, lapack_int lda,
   8742                                  const lapack_complex_float* af,
   8743                                  lapack_int ldaf, const lapack_int* ipiv,
   8744                                  const float* s, const lapack_complex_float* b,
   8745                                  lapack_int ldb, lapack_complex_float* x,
   8746                                  lapack_int ldx, float* rcond, float* berr,
   8747                                  lapack_int n_err_bnds, float* err_bnds_norm,
   8748                                  float* err_bnds_comp, lapack_int nparams,
   8749                                  float* params, lapack_complex_float* work,
   8750                                  float* rwork );
   8751 lapack_int LAPACKE_zsyrfsx_work( int matrix_order, char uplo, char equed,
   8752                                  lapack_int n, lapack_int nrhs,
   8753                                  const lapack_complex_double* a, lapack_int lda,
   8754                                  const lapack_complex_double* af,
   8755                                  lapack_int ldaf, const lapack_int* ipiv,
   8756                                  const double* s,
   8757                                  const lapack_complex_double* b, lapack_int ldb,
   8758                                  lapack_complex_double* x, lapack_int ldx,
   8759                                  double* rcond, double* berr,
   8760                                  lapack_int n_err_bnds, double* err_bnds_norm,
   8761                                  double* err_bnds_comp, lapack_int nparams,
   8762                                  double* params, lapack_complex_double* work,
   8763                                  double* rwork );
   8764 
   8765 lapack_int LAPACKE_ssysv_work( int matrix_order, char uplo, lapack_int n,
   8766                                lapack_int nrhs, float* a, lapack_int lda,
   8767                                lapack_int* ipiv, float* b, lapack_int ldb,
   8768                                float* work, lapack_int lwork );
   8769 lapack_int LAPACKE_dsysv_work( int matrix_order, char uplo, lapack_int n,
   8770                                lapack_int nrhs, double* a, lapack_int lda,
   8771                                lapack_int* ipiv, double* b, lapack_int ldb,
   8772                                double* work, lapack_int lwork );
   8773 lapack_int LAPACKE_csysv_work( int matrix_order, char uplo, lapack_int n,
   8774                                lapack_int nrhs, lapack_complex_float* a,
   8775                                lapack_int lda, lapack_int* ipiv,
   8776                                lapack_complex_float* b, lapack_int ldb,
   8777                                lapack_complex_float* work, lapack_int lwork );
   8778 lapack_int LAPACKE_zsysv_work( int matrix_order, char uplo, lapack_int n,
   8779                                lapack_int nrhs, lapack_complex_double* a,
   8780                                lapack_int lda, lapack_int* ipiv,
   8781                                lapack_complex_double* b, lapack_int ldb,
   8782                                lapack_complex_double* work, lapack_int lwork );
   8783 
   8784 lapack_int LAPACKE_ssysvx_work( int matrix_order, char fact, char uplo,
   8785                                 lapack_int n, lapack_int nrhs, const float* a,
   8786                                 lapack_int lda, float* af, lapack_int ldaf,
   8787                                 lapack_int* ipiv, const float* b,
   8788                                 lapack_int ldb, float* x, lapack_int ldx,
   8789                                 float* rcond, float* ferr, float* berr,
   8790                                 float* work, lapack_int lwork,
   8791                                 lapack_int* iwork );
   8792 lapack_int LAPACKE_dsysvx_work( int matrix_order, char fact, char uplo,
   8793                                 lapack_int n, lapack_int nrhs, const double* a,
   8794                                 lapack_int lda, double* af, lapack_int ldaf,
   8795                                 lapack_int* ipiv, const double* b,
   8796                                 lapack_int ldb, double* x, lapack_int ldx,
   8797                                 double* rcond, double* ferr, double* berr,
   8798                                 double* work, lapack_int lwork,
   8799                                 lapack_int* iwork );
   8800 lapack_int LAPACKE_csysvx_work( int matrix_order, char fact, char uplo,
   8801                                 lapack_int n, lapack_int nrhs,
   8802                                 const lapack_complex_float* a, lapack_int lda,
   8803                                 lapack_complex_float* af, lapack_int ldaf,
   8804                                 lapack_int* ipiv, const lapack_complex_float* b,
   8805                                 lapack_int ldb, lapack_complex_float* x,
   8806                                 lapack_int ldx, float* rcond, float* ferr,
   8807                                 float* berr, lapack_complex_float* work,
   8808                                 lapack_int lwork, float* rwork );
   8809 lapack_int LAPACKE_zsysvx_work( int matrix_order, char fact, char uplo,
   8810                                 lapack_int n, lapack_int nrhs,
   8811                                 const lapack_complex_double* a, lapack_int lda,
   8812                                 lapack_complex_double* af, lapack_int ldaf,
   8813                                 lapack_int* ipiv,
   8814                                 const lapack_complex_double* b, lapack_int ldb,
   8815                                 lapack_complex_double* x, lapack_int ldx,
   8816                                 double* rcond, double* ferr, double* berr,
   8817                                 lapack_complex_double* work, lapack_int lwork,
   8818                                 double* rwork );
   8819 
   8820 lapack_int LAPACKE_ssysvxx_work( int matrix_order, char fact, char uplo,
   8821                                  lapack_int n, lapack_int nrhs, float* a,
   8822                                  lapack_int lda, float* af, lapack_int ldaf,
   8823                                  lapack_int* ipiv, char* equed, float* s,
   8824                                  float* b, lapack_int ldb, float* x,
   8825                                  lapack_int ldx, float* rcond, float* rpvgrw,
   8826                                  float* berr, lapack_int n_err_bnds,
   8827                                  float* err_bnds_norm, float* err_bnds_comp,
   8828                                  lapack_int nparams, float* params, float* work,
   8829                                  lapack_int* iwork );
   8830 lapack_int LAPACKE_dsysvxx_work( int matrix_order, char fact, char uplo,
   8831                                  lapack_int n, lapack_int nrhs, double* a,
   8832                                  lapack_int lda, double* af, lapack_int ldaf,
   8833                                  lapack_int* ipiv, char* equed, double* s,
   8834                                  double* b, lapack_int ldb, double* x,
   8835                                  lapack_int ldx, double* rcond, double* rpvgrw,
   8836                                  double* berr, lapack_int n_err_bnds,
   8837                                  double* err_bnds_norm, double* err_bnds_comp,
   8838                                  lapack_int nparams, double* params,
   8839                                  double* work, lapack_int* iwork );
   8840 lapack_int LAPACKE_csysvxx_work( int matrix_order, char fact, char uplo,
   8841                                  lapack_int n, lapack_int nrhs,
   8842                                  lapack_complex_float* a, lapack_int lda,
   8843                                  lapack_complex_float* af, lapack_int ldaf,
   8844                                  lapack_int* ipiv, char* equed, float* s,
   8845                                  lapack_complex_float* b, lapack_int ldb,
   8846                                  lapack_complex_float* x, lapack_int ldx,
   8847                                  float* rcond, float* rpvgrw, float* berr,
   8848                                  lapack_int n_err_bnds, float* err_bnds_norm,
   8849                                  float* err_bnds_comp, lapack_int nparams,
   8850                                  float* params, lapack_complex_float* work,
   8851                                  float* rwork );
   8852 lapack_int LAPACKE_zsysvxx_work( int matrix_order, char fact, char uplo,
   8853                                  lapack_int n, lapack_int nrhs,
   8854                                  lapack_complex_double* a, lapack_int lda,
   8855                                  lapack_complex_double* af, lapack_int ldaf,
   8856                                  lapack_int* ipiv, char* equed, double* s,
   8857                                  lapack_complex_double* b, lapack_int ldb,
   8858                                  lapack_complex_double* x, lapack_int ldx,
   8859                                  double* rcond, double* rpvgrw, double* berr,
   8860                                  lapack_int n_err_bnds, double* err_bnds_norm,
   8861                                  double* err_bnds_comp, lapack_int nparams,
   8862                                  double* params, lapack_complex_double* work,
   8863                                  double* rwork );
   8864 
   8865 lapack_int LAPACKE_ssytrd_work( int matrix_order, char uplo, lapack_int n,
   8866                                 float* a, lapack_int lda, float* d, float* e,
   8867                                 float* tau, float* work, lapack_int lwork );
   8868 lapack_int LAPACKE_dsytrd_work( int matrix_order, char uplo, lapack_int n,
   8869                                 double* a, lapack_int lda, double* d, double* e,
   8870                                 double* tau, double* work, lapack_int lwork );
   8871 
   8872 lapack_int LAPACKE_ssytrf_work( int matrix_order, char uplo, lapack_int n,
   8873                                 float* a, lapack_int lda, lapack_int* ipiv,
   8874                                 float* work, lapack_int lwork );
   8875 lapack_int LAPACKE_dsytrf_work( int matrix_order, char uplo, lapack_int n,
   8876                                 double* a, lapack_int lda, lapack_int* ipiv,
   8877                                 double* work, lapack_int lwork );
   8878 lapack_int LAPACKE_csytrf_work( int matrix_order, char uplo, lapack_int n,
   8879                                 lapack_complex_float* a, lapack_int lda,
   8880                                 lapack_int* ipiv, lapack_complex_float* work,
   8881                                 lapack_int lwork );
   8882 lapack_int LAPACKE_zsytrf_work( int matrix_order, char uplo, lapack_int n,
   8883                                 lapack_complex_double* a, lapack_int lda,
   8884                                 lapack_int* ipiv, lapack_complex_double* work,
   8885                                 lapack_int lwork );
   8886 
   8887 lapack_int LAPACKE_ssytri_work( int matrix_order, char uplo, lapack_int n,
   8888                                 float* a, lapack_int lda,
   8889                                 const lapack_int* ipiv, float* work );
   8890 lapack_int LAPACKE_dsytri_work( int matrix_order, char uplo, lapack_int n,
   8891                                 double* a, lapack_int lda,
   8892                                 const lapack_int* ipiv, double* work );
   8893 lapack_int LAPACKE_csytri_work( int matrix_order, char uplo, lapack_int n,
   8894                                 lapack_complex_float* a, lapack_int lda,
   8895                                 const lapack_int* ipiv,
   8896                                 lapack_complex_float* work );
   8897 lapack_int LAPACKE_zsytri_work( int matrix_order, char uplo, lapack_int n,
   8898                                 lapack_complex_double* a, lapack_int lda,
   8899                                 const lapack_int* ipiv,
   8900                                 lapack_complex_double* work );
   8901 
   8902 lapack_int LAPACKE_ssytrs_work( int matrix_order, char uplo, lapack_int n,
   8903                                 lapack_int nrhs, const float* a, lapack_int lda,
   8904                                 const lapack_int* ipiv, float* b,
   8905                                 lapack_int ldb );
   8906 lapack_int LAPACKE_dsytrs_work( int matrix_order, char uplo, lapack_int n,
   8907                                 lapack_int nrhs, const double* a,
   8908                                 lapack_int lda, const lapack_int* ipiv,
   8909                                 double* b, lapack_int ldb );
   8910 lapack_int LAPACKE_csytrs_work( int matrix_order, char uplo, lapack_int n,
   8911                                 lapack_int nrhs, const lapack_complex_float* a,
   8912                                 lapack_int lda, const lapack_int* ipiv,
   8913                                 lapack_complex_float* b, lapack_int ldb );
   8914 lapack_int LAPACKE_zsytrs_work( int matrix_order, char uplo, lapack_int n,
   8915                                 lapack_int nrhs, const lapack_complex_double* a,
   8916                                 lapack_int lda, const lapack_int* ipiv,
   8917                                 lapack_complex_double* b, lapack_int ldb );
   8918 
   8919 lapack_int LAPACKE_stbcon_work( int matrix_order, char norm, char uplo,
   8920                                 char diag, lapack_int n, lapack_int kd,
   8921                                 const float* ab, lapack_int ldab, float* rcond,
   8922                                 float* work, lapack_int* iwork );
   8923 lapack_int LAPACKE_dtbcon_work( int matrix_order, char norm, char uplo,
   8924                                 char diag, lapack_int n, lapack_int kd,
   8925                                 const double* ab, lapack_int ldab,
   8926                                 double* rcond, double* work,
   8927                                 lapack_int* iwork );
   8928 lapack_int LAPACKE_ctbcon_work( int matrix_order, char norm, char uplo,
   8929                                 char diag, lapack_int n, lapack_int kd,
   8930                                 const lapack_complex_float* ab, lapack_int ldab,
   8931                                 float* rcond, lapack_complex_float* work,
   8932                                 float* rwork );
   8933 lapack_int LAPACKE_ztbcon_work( int matrix_order, char norm, char uplo,
   8934                                 char diag, lapack_int n, lapack_int kd,
   8935                                 const lapack_complex_double* ab,
   8936                                 lapack_int ldab, double* rcond,
   8937                                 lapack_complex_double* work, double* rwork );
   8938 
   8939 lapack_int LAPACKE_stbrfs_work( int matrix_order, char uplo, char trans,
   8940                                 char diag, lapack_int n, lapack_int kd,
   8941                                 lapack_int nrhs, const float* ab,
   8942                                 lapack_int ldab, const float* b, lapack_int ldb,
   8943                                 const float* x, lapack_int ldx, float* ferr,
   8944                                 float* berr, float* work, lapack_int* iwork );
   8945 lapack_int LAPACKE_dtbrfs_work( int matrix_order, char uplo, char trans,
   8946                                 char diag, lapack_int n, lapack_int kd,
   8947                                 lapack_int nrhs, const double* ab,
   8948                                 lapack_int ldab, const double* b,
   8949                                 lapack_int ldb, const double* x, lapack_int ldx,
   8950                                 double* ferr, double* berr, double* work,
   8951                                 lapack_int* iwork );
   8952 lapack_int LAPACKE_ctbrfs_work( int matrix_order, char uplo, char trans,
   8953                                 char diag, lapack_int n, lapack_int kd,
   8954                                 lapack_int nrhs, const lapack_complex_float* ab,
   8955                                 lapack_int ldab, const lapack_complex_float* b,
   8956                                 lapack_int ldb, const lapack_complex_float* x,
   8957                                 lapack_int ldx, float* ferr, float* berr,
   8958                                 lapack_complex_float* work, float* rwork );
   8959 lapack_int LAPACKE_ztbrfs_work( int matrix_order, char uplo, char trans,
   8960                                 char diag, lapack_int n, lapack_int kd,
   8961                                 lapack_int nrhs,
   8962                                 const lapack_complex_double* ab,
   8963                                 lapack_int ldab, const lapack_complex_double* b,
   8964                                 lapack_int ldb, const lapack_complex_double* x,
   8965                                 lapack_int ldx, double* ferr, double* berr,
   8966                                 lapack_complex_double* work, double* rwork );
   8967 
   8968 lapack_int LAPACKE_stbtrs_work( int matrix_order, char uplo, char trans,
   8969                                 char diag, lapack_int n, lapack_int kd,
   8970                                 lapack_int nrhs, const float* ab,
   8971                                 lapack_int ldab, float* b, lapack_int ldb );
   8972 lapack_int LAPACKE_dtbtrs_work( int matrix_order, char uplo, char trans,
   8973                                 char diag, lapack_int n, lapack_int kd,
   8974                                 lapack_int nrhs, const double* ab,
   8975                                 lapack_int ldab, double* b, lapack_int ldb );
   8976 lapack_int LAPACKE_ctbtrs_work( int matrix_order, char uplo, char trans,
   8977                                 char diag, lapack_int n, lapack_int kd,
   8978                                 lapack_int nrhs, const lapack_complex_float* ab,
   8979                                 lapack_int ldab, lapack_complex_float* b,
   8980                                 lapack_int ldb );
   8981 lapack_int LAPACKE_ztbtrs_work( int matrix_order, char uplo, char trans,
   8982                                 char diag, lapack_int n, lapack_int kd,
   8983                                 lapack_int nrhs,
   8984                                 const lapack_complex_double* ab,
   8985                                 lapack_int ldab, lapack_complex_double* b,
   8986                                 lapack_int ldb );
   8987 
   8988 lapack_int LAPACKE_stfsm_work( int matrix_order, char transr, char side,
   8989                                char uplo, char trans, char diag, lapack_int m,
   8990                                lapack_int n, float alpha, const float* a,
   8991                                float* b, lapack_int ldb );
   8992 lapack_int LAPACKE_dtfsm_work( int matrix_order, char transr, char side,
   8993                                char uplo, char trans, char diag, lapack_int m,
   8994                                lapack_int n, double alpha, const double* a,
   8995                                double* b, lapack_int ldb );
   8996 lapack_int LAPACKE_ctfsm_work( int matrix_order, char transr, char side,
   8997                                char uplo, char trans, char diag, lapack_int m,
   8998                                lapack_int n, lapack_complex_float alpha,
   8999                                const lapack_complex_float* a,
   9000                                lapack_complex_float* b, lapack_int ldb );
   9001 lapack_int LAPACKE_ztfsm_work( int matrix_order, char transr, char side,
   9002                                char uplo, char trans, char diag, lapack_int m,
   9003                                lapack_int n, lapack_complex_double alpha,
   9004                                const lapack_complex_double* a,
   9005                                lapack_complex_double* b, lapack_int ldb );
   9006 
   9007 lapack_int LAPACKE_stftri_work( int matrix_order, char transr, char uplo,
   9008                                 char diag, lapack_int n, float* a );
   9009 lapack_int LAPACKE_dtftri_work( int matrix_order, char transr, char uplo,
   9010                                 char diag, lapack_int n, double* a );
   9011 lapack_int LAPACKE_ctftri_work( int matrix_order, char transr, char uplo,
   9012                                 char diag, lapack_int n,
   9013                                 lapack_complex_float* a );
   9014 lapack_int LAPACKE_ztftri_work( int matrix_order, char transr, char uplo,
   9015                                 char diag, lapack_int n,
   9016                                 lapack_complex_double* a );
   9017 
   9018 lapack_int LAPACKE_stfttp_work( int matrix_order, char transr, char uplo,
   9019                                 lapack_int n, const float* arf, float* ap );
   9020 lapack_int LAPACKE_dtfttp_work( int matrix_order, char transr, char uplo,
   9021                                 lapack_int n, const double* arf, double* ap );
   9022 lapack_int LAPACKE_ctfttp_work( int matrix_order, char transr, char uplo,
   9023                                 lapack_int n, const lapack_complex_float* arf,
   9024                                 lapack_complex_float* ap );
   9025 lapack_int LAPACKE_ztfttp_work( int matrix_order, char transr, char uplo,
   9026                                 lapack_int n, const lapack_complex_double* arf,
   9027                                 lapack_complex_double* ap );
   9028 
   9029 lapack_int LAPACKE_stfttr_work( int matrix_order, char transr, char uplo,
   9030                                 lapack_int n, const float* arf, float* a,
   9031                                 lapack_int lda );
   9032 lapack_int LAPACKE_dtfttr_work( int matrix_order, char transr, char uplo,
   9033                                 lapack_int n, const double* arf, double* a,
   9034                                 lapack_int lda );
   9035 lapack_int LAPACKE_ctfttr_work( int matrix_order, char transr, char uplo,
   9036                                 lapack_int n, const lapack_complex_float* arf,
   9037                                 lapack_complex_float* a, lapack_int lda );
   9038 lapack_int LAPACKE_ztfttr_work( int matrix_order, char transr, char uplo,
   9039                                 lapack_int n, const lapack_complex_double* arf,
   9040                                 lapack_complex_double* a, lapack_int lda );
   9041 
   9042 lapack_int LAPACKE_stgevc_work( int matrix_order, char side, char howmny,
   9043                                 const lapack_logical* select, lapack_int n,
   9044                                 const float* s, lapack_int lds, const float* p,
   9045                                 lapack_int ldp, float* vl, lapack_int ldvl,
   9046                                 float* vr, lapack_int ldvr, lapack_int mm,
   9047                                 lapack_int* m, float* work );
   9048 lapack_int LAPACKE_dtgevc_work( int matrix_order, char side, char howmny,
   9049                                 const lapack_logical* select, lapack_int n,
   9050                                 const double* s, lapack_int lds,
   9051                                 const double* p, lapack_int ldp, double* vl,
   9052                                 lapack_int ldvl, double* vr, lapack_int ldvr,
   9053                                 lapack_int mm, lapack_int* m, double* work );
   9054 lapack_int LAPACKE_ctgevc_work( int matrix_order, char side, char howmny,
   9055                                 const lapack_logical* select, lapack_int n,
   9056                                 const lapack_complex_float* s, lapack_int lds,
   9057                                 const lapack_complex_float* p, lapack_int ldp,
   9058                                 lapack_complex_float* vl, lapack_int ldvl,
   9059                                 lapack_complex_float* vr, lapack_int ldvr,
   9060                                 lapack_int mm, lapack_int* m,
   9061                                 lapack_complex_float* work, float* rwork );
   9062 lapack_int LAPACKE_ztgevc_work( int matrix_order, char side, char howmny,
   9063                                 const lapack_logical* select, lapack_int n,
   9064                                 const lapack_complex_double* s, lapack_int lds,
   9065                                 const lapack_complex_double* p, lapack_int ldp,
   9066                                 lapack_complex_double* vl, lapack_int ldvl,
   9067                                 lapack_complex_double* vr, lapack_int ldvr,
   9068                                 lapack_int mm, lapack_int* m,
   9069                                 lapack_complex_double* work, double* rwork );
   9070 
   9071 lapack_int LAPACKE_stgexc_work( int matrix_order, lapack_logical wantq,
   9072                                 lapack_logical wantz, lapack_int n, float* a,
   9073                                 lapack_int lda, float* b, lapack_int ldb,
   9074                                 float* q, lapack_int ldq, float* z,
   9075                                 lapack_int ldz, lapack_int* ifst,
   9076                                 lapack_int* ilst, float* work,
   9077                                 lapack_int lwork );
   9078 lapack_int LAPACKE_dtgexc_work( int matrix_order, lapack_logical wantq,
   9079                                 lapack_logical wantz, lapack_int n, double* a,
   9080                                 lapack_int lda, double* b, lapack_int ldb,
   9081                                 double* q, lapack_int ldq, double* z,
   9082                                 lapack_int ldz, lapack_int* ifst,
   9083                                 lapack_int* ilst, double* work,
   9084                                 lapack_int lwork );
   9085 lapack_int LAPACKE_ctgexc_work( int matrix_order, lapack_logical wantq,
   9086                                 lapack_logical wantz, lapack_int n,
   9087                                 lapack_complex_float* a, lapack_int lda,
   9088                                 lapack_complex_float* b, lapack_int ldb,
   9089                                 lapack_complex_float* q, lapack_int ldq,
   9090                                 lapack_complex_float* z, lapack_int ldz,
   9091                                 lapack_int ifst, lapack_int ilst );
   9092 lapack_int LAPACKE_ztgexc_work( int matrix_order, lapack_logical wantq,
   9093                                 lapack_logical wantz, lapack_int n,
   9094                                 lapack_complex_double* a, lapack_int lda,
   9095                                 lapack_complex_double* b, lapack_int ldb,
   9096                                 lapack_complex_double* q, lapack_int ldq,
   9097                                 lapack_complex_double* z, lapack_int ldz,
   9098                                 lapack_int ifst, lapack_int ilst );
   9099 
   9100 lapack_int LAPACKE_stgsen_work( int matrix_order, lapack_int ijob,
   9101                                 lapack_logical wantq, lapack_logical wantz,
   9102                                 const lapack_logical* select, lapack_int n,
   9103                                 float* a, lapack_int lda, float* b,
   9104                                 lapack_int ldb, float* alphar, float* alphai,
   9105                                 float* beta, float* q, lapack_int ldq, float* z,
   9106                                 lapack_int ldz, lapack_int* m, float* pl,
   9107                                 float* pr, float* dif, float* work,
   9108                                 lapack_int lwork, lapack_int* iwork,
   9109                                 lapack_int liwork );
   9110 lapack_int LAPACKE_dtgsen_work( int matrix_order, lapack_int ijob,
   9111                                 lapack_logical wantq, lapack_logical wantz,
   9112                                 const lapack_logical* select, lapack_int n,
   9113                                 double* a, lapack_int lda, double* b,
   9114                                 lapack_int ldb, double* alphar, double* alphai,
   9115                                 double* beta, double* q, lapack_int ldq,
   9116                                 double* z, lapack_int ldz, lapack_int* m,
   9117                                 double* pl, double* pr, double* dif,
   9118                                 double* work, lapack_int lwork,
   9119                                 lapack_int* iwork, lapack_int liwork );
   9120 lapack_int LAPACKE_ctgsen_work( int matrix_order, lapack_int ijob,
   9121                                 lapack_logical wantq, lapack_logical wantz,
   9122                                 const lapack_logical* select, lapack_int n,
   9123                                 lapack_complex_float* a, lapack_int lda,
   9124                                 lapack_complex_float* b, lapack_int ldb,
   9125                                 lapack_complex_float* alpha,
   9126                                 lapack_complex_float* beta,
   9127                                 lapack_complex_float* q, lapack_int ldq,
   9128                                 lapack_complex_float* z, lapack_int ldz,
   9129                                 lapack_int* m, float* pl, float* pr, float* dif,
   9130                                 lapack_complex_float* work, lapack_int lwork,
   9131                                 lapack_int* iwork, lapack_int liwork );
   9132 lapack_int LAPACKE_ztgsen_work( int matrix_order, lapack_int ijob,
   9133                                 lapack_logical wantq, lapack_logical wantz,
   9134                                 const lapack_logical* select, lapack_int n,
   9135                                 lapack_complex_double* a, lapack_int lda,
   9136                                 lapack_complex_double* b, lapack_int ldb,
   9137                                 lapack_complex_double* alpha,
   9138                                 lapack_complex_double* beta,
   9139                                 lapack_complex_double* q, lapack_int ldq,
   9140                                 lapack_complex_double* z, lapack_int ldz,
   9141                                 lapack_int* m, double* pl, double* pr,
   9142                                 double* dif, lapack_complex_double* work,
   9143                                 lapack_int lwork, lapack_int* iwork,
   9144                                 lapack_int liwork );
   9145 
   9146 lapack_int LAPACKE_stgsja_work( int matrix_order, char jobu, char jobv,
   9147                                 char jobq, lapack_int m, lapack_int p,
   9148                                 lapack_int n, lapack_int k, lapack_int l,
   9149                                 float* a, lapack_int lda, float* b,
   9150                                 lapack_int ldb, float tola, float tolb,
   9151                                 float* alpha, float* beta, float* u,
   9152                                 lapack_int ldu, float* v, lapack_int ldv,
   9153                                 float* q, lapack_int ldq, float* work,
   9154                                 lapack_int* ncycle );
   9155 lapack_int LAPACKE_dtgsja_work( int matrix_order, char jobu, char jobv,
   9156                                 char jobq, lapack_int m, lapack_int p,
   9157                                 lapack_int n, lapack_int k, lapack_int l,
   9158                                 double* a, lapack_int lda, double* b,
   9159                                 lapack_int ldb, double tola, double tolb,
   9160                                 double* alpha, double* beta, double* u,
   9161                                 lapack_int ldu, double* v, lapack_int ldv,
   9162                                 double* q, lapack_int ldq, double* work,
   9163                                 lapack_int* ncycle );
   9164 lapack_int LAPACKE_ctgsja_work( int matrix_order, char jobu, char jobv,
   9165                                 char jobq, lapack_int m, lapack_int p,
   9166                                 lapack_int n, lapack_int k, lapack_int l,
   9167                                 lapack_complex_float* a, lapack_int lda,
   9168                                 lapack_complex_float* b, lapack_int ldb,
   9169                                 float tola, float tolb, float* alpha,
   9170                                 float* beta, lapack_complex_float* u,
   9171                                 lapack_int ldu, lapack_complex_float* v,
   9172                                 lapack_int ldv, lapack_complex_float* q,
   9173                                 lapack_int ldq, lapack_complex_float* work,
   9174                                 lapack_int* ncycle );
   9175 lapack_int LAPACKE_ztgsja_work( int matrix_order, char jobu, char jobv,
   9176                                 char jobq, lapack_int m, lapack_int p,
   9177                                 lapack_int n, lapack_int k, lapack_int l,
   9178                                 lapack_complex_double* a, lapack_int lda,
   9179                                 lapack_complex_double* b, lapack_int ldb,
   9180                                 double tola, double tolb, double* alpha,
   9181                                 double* beta, lapack_complex_double* u,
   9182                                 lapack_int ldu, lapack_complex_double* v,
   9183                                 lapack_int ldv, lapack_complex_double* q,
   9184                                 lapack_int ldq, lapack_complex_double* work,
   9185                                 lapack_int* ncycle );
   9186 
   9187 lapack_int LAPACKE_stgsna_work( int matrix_order, char job, char howmny,
   9188                                 const lapack_logical* select, lapack_int n,
   9189                                 const float* a, lapack_int lda, const float* b,
   9190                                 lapack_int ldb, const float* vl,
   9191                                 lapack_int ldvl, const float* vr,
   9192                                 lapack_int ldvr, float* s, float* dif,
   9193                                 lapack_int mm, lapack_int* m, float* work,
   9194                                 lapack_int lwork, lapack_int* iwork );
   9195 lapack_int LAPACKE_dtgsna_work( int matrix_order, char job, char howmny,
   9196                                 const lapack_logical* select, lapack_int n,
   9197                                 const double* a, lapack_int lda,
   9198                                 const double* b, lapack_int ldb,
   9199                                 const double* vl, lapack_int ldvl,
   9200                                 const double* vr, lapack_int ldvr, double* s,
   9201                                 double* dif, lapack_int mm, lapack_int* m,
   9202                                 double* work, lapack_int lwork,
   9203                                 lapack_int* iwork );
   9204 lapack_int LAPACKE_ctgsna_work( int matrix_order, char job, char howmny,
   9205                                 const lapack_logical* select, lapack_int n,
   9206                                 const lapack_complex_float* a, lapack_int lda,
   9207                                 const lapack_complex_float* b, lapack_int ldb,
   9208                                 const lapack_complex_float* vl, lapack_int ldvl,
   9209                                 const lapack_complex_float* vr, lapack_int ldvr,
   9210                                 float* s, float* dif, lapack_int mm,
   9211                                 lapack_int* m, lapack_complex_float* work,
   9212                                 lapack_int lwork, lapack_int* iwork );
   9213 lapack_int LAPACKE_ztgsna_work( int matrix_order, char job, char howmny,
   9214                                 const lapack_logical* select, lapack_int n,
   9215                                 const lapack_complex_double* a, lapack_int lda,
   9216                                 const lapack_complex_double* b, lapack_int ldb,
   9217                                 const lapack_complex_double* vl,
   9218                                 lapack_int ldvl,
   9219                                 const lapack_complex_double* vr,
   9220                                 lapack_int ldvr, double* s, double* dif,
   9221                                 lapack_int mm, lapack_int* m,
   9222                                 lapack_complex_double* work, lapack_int lwork,
   9223                                 lapack_int* iwork );
   9224 
   9225 lapack_int LAPACKE_stgsyl_work( int matrix_order, char trans, lapack_int ijob,
   9226                                 lapack_int m, lapack_int n, const float* a,
   9227                                 lapack_int lda, const float* b, lapack_int ldb,
   9228                                 float* c, lapack_int ldc, const float* d,
   9229                                 lapack_int ldd, const float* e, lapack_int lde,
   9230                                 float* f, lapack_int ldf, float* scale,
   9231                                 float* dif, float* work, lapack_int lwork,
   9232                                 lapack_int* iwork );
   9233 lapack_int LAPACKE_dtgsyl_work( int matrix_order, char trans, lapack_int ijob,
   9234                                 lapack_int m, lapack_int n, const double* a,
   9235                                 lapack_int lda, const double* b, lapack_int ldb,
   9236                                 double* c, lapack_int ldc, const double* d,
   9237                                 lapack_int ldd, const double* e, lapack_int lde,
   9238                                 double* f, lapack_int ldf, double* scale,
   9239                                 double* dif, double* work, lapack_int lwork,
   9240                                 lapack_int* iwork );
   9241 lapack_int LAPACKE_ctgsyl_work( int matrix_order, char trans, lapack_int ijob,
   9242                                 lapack_int m, lapack_int n,
   9243                                 const lapack_complex_float* a, lapack_int lda,
   9244                                 const lapack_complex_float* b, lapack_int ldb,
   9245                                 lapack_complex_float* c, lapack_int ldc,
   9246                                 const lapack_complex_float* d, lapack_int ldd,
   9247                                 const lapack_complex_float* e, lapack_int lde,
   9248                                 lapack_complex_float* f, lapack_int ldf,
   9249                                 float* scale, float* dif,
   9250                                 lapack_complex_float* work, lapack_int lwork,
   9251                                 lapack_int* iwork );
   9252 lapack_int LAPACKE_ztgsyl_work( int matrix_order, char trans, lapack_int ijob,
   9253                                 lapack_int m, lapack_int n,
   9254                                 const lapack_complex_double* a, lapack_int lda,
   9255                                 const lapack_complex_double* b, lapack_int ldb,
   9256                                 lapack_complex_double* c, lapack_int ldc,
   9257                                 const lapack_complex_double* d, lapack_int ldd,
   9258                                 const lapack_complex_double* e, lapack_int lde,
   9259                                 lapack_complex_double* f, lapack_int ldf,
   9260                                 double* scale, double* dif,
   9261                                 lapack_complex_double* work, lapack_int lwork,
   9262                                 lapack_int* iwork );
   9263 
   9264 lapack_int LAPACKE_stpcon_work( int matrix_order, char norm, char uplo,
   9265                                 char diag, lapack_int n, const float* ap,
   9266                                 float* rcond, float* work, lapack_int* iwork );
   9267 lapack_int LAPACKE_dtpcon_work( int matrix_order, char norm, char uplo,
   9268                                 char diag, lapack_int n, const double* ap,
   9269                                 double* rcond, double* work,
   9270                                 lapack_int* iwork );
   9271 lapack_int LAPACKE_ctpcon_work( int matrix_order, char norm, char uplo,
   9272                                 char diag, lapack_int n,
   9273                                 const lapack_complex_float* ap, float* rcond,
   9274                                 lapack_complex_float* work, float* rwork );
   9275 lapack_int LAPACKE_ztpcon_work( int matrix_order, char norm, char uplo,
   9276                                 char diag, lapack_int n,
   9277                                 const lapack_complex_double* ap, double* rcond,
   9278                                 lapack_complex_double* work, double* rwork );
   9279 
   9280 lapack_int LAPACKE_stprfs_work( int matrix_order, char uplo, char trans,
   9281                                 char diag, lapack_int n, lapack_int nrhs,
   9282                                 const float* ap, const float* b, lapack_int ldb,
   9283                                 const float* x, lapack_int ldx, float* ferr,
   9284                                 float* berr, float* work, lapack_int* iwork );
   9285 lapack_int LAPACKE_dtprfs_work( int matrix_order, char uplo, char trans,
   9286                                 char diag, lapack_int n, lapack_int nrhs,
   9287                                 const double* ap, const double* b,
   9288                                 lapack_int ldb, const double* x, lapack_int ldx,
   9289                                 double* ferr, double* berr, double* work,
   9290                                 lapack_int* iwork );
   9291 lapack_int LAPACKE_ctprfs_work( int matrix_order, char uplo, char trans,
   9292                                 char diag, lapack_int n, lapack_int nrhs,
   9293                                 const lapack_complex_float* ap,
   9294                                 const lapack_complex_float* b, lapack_int ldb,
   9295                                 const lapack_complex_float* x, lapack_int ldx,
   9296                                 float* ferr, float* berr,
   9297                                 lapack_complex_float* work, float* rwork );
   9298 lapack_int LAPACKE_ztprfs_work( int matrix_order, char uplo, char trans,
   9299                                 char diag, lapack_int n, lapack_int nrhs,
   9300                                 const lapack_complex_double* ap,
   9301                                 const lapack_complex_double* b, lapack_int ldb,
   9302                                 const lapack_complex_double* x, lapack_int ldx,
   9303                                 double* ferr, double* berr,
   9304                                 lapack_complex_double* work, double* rwork );
   9305 
   9306 lapack_int LAPACKE_stptri_work( int matrix_order, char uplo, char diag,
   9307                                 lapack_int n, float* ap );
   9308 lapack_int LAPACKE_dtptri_work( int matrix_order, char uplo, char diag,
   9309                                 lapack_int n, double* ap );
   9310 lapack_int LAPACKE_ctptri_work( int matrix_order, char uplo, char diag,
   9311                                 lapack_int n, lapack_complex_float* ap );
   9312 lapack_int LAPACKE_ztptri_work( int matrix_order, char uplo, char diag,
   9313                                 lapack_int n, lapack_complex_double* ap );
   9314 
   9315 lapack_int LAPACKE_stptrs_work( int matrix_order, char uplo, char trans,
   9316                                 char diag, lapack_int n, lapack_int nrhs,
   9317                                 const float* ap, float* b, lapack_int ldb );
   9318 lapack_int LAPACKE_dtptrs_work( int matrix_order, char uplo, char trans,
   9319                                 char diag, lapack_int n, lapack_int nrhs,
   9320                                 const double* ap, double* b, lapack_int ldb );
   9321 lapack_int LAPACKE_ctptrs_work( int matrix_order, char uplo, char trans,
   9322                                 char diag, lapack_int n, lapack_int nrhs,
   9323                                 const lapack_complex_float* ap,
   9324                                 lapack_complex_float* b, lapack_int ldb );
   9325 lapack_int LAPACKE_ztptrs_work( int matrix_order, char uplo, char trans,
   9326                                 char diag, lapack_int n, lapack_int nrhs,
   9327                                 const lapack_complex_double* ap,
   9328                                 lapack_complex_double* b, lapack_int ldb );
   9329 
   9330 lapack_int LAPACKE_stpttf_work( int matrix_order, char transr, char uplo,
   9331                                 lapack_int n, const float* ap, float* arf );
   9332 lapack_int LAPACKE_dtpttf_work( int matrix_order, char transr, char uplo,
   9333                                 lapack_int n, const double* ap, double* arf );
   9334 lapack_int LAPACKE_ctpttf_work( int matrix_order, char transr, char uplo,
   9335                                 lapack_int n, const lapack_complex_float* ap,
   9336                                 lapack_complex_float* arf );
   9337 lapack_int LAPACKE_ztpttf_work( int matrix_order, char transr, char uplo,
   9338                                 lapack_int n, const lapack_complex_double* ap,
   9339                                 lapack_complex_double* arf );
   9340 
   9341 lapack_int LAPACKE_stpttr_work( int matrix_order, char uplo, lapack_int n,
   9342                                 const float* ap, float* a, lapack_int lda );
   9343 lapack_int LAPACKE_dtpttr_work( int matrix_order, char uplo, lapack_int n,
   9344                                 const double* ap, double* a, lapack_int lda );
   9345 lapack_int LAPACKE_ctpttr_work( int matrix_order, char uplo, lapack_int n,
   9346                                 const lapack_complex_float* ap,
   9347                                 lapack_complex_float* a, lapack_int lda );
   9348 lapack_int LAPACKE_ztpttr_work( int matrix_order, char uplo, lapack_int n,
   9349                                 const lapack_complex_double* ap,
   9350                                 lapack_complex_double* a, lapack_int lda );
   9351 
   9352 lapack_int LAPACKE_strcon_work( int matrix_order, char norm, char uplo,
   9353                                 char diag, lapack_int n, const float* a,
   9354                                 lapack_int lda, float* rcond, float* work,
   9355                                 lapack_int* iwork );
   9356 lapack_int LAPACKE_dtrcon_work( int matrix_order, char norm, char uplo,
   9357                                 char diag, lapack_int n, const double* a,
   9358                                 lapack_int lda, double* rcond, double* work,
   9359                                 lapack_int* iwork );
   9360 lapack_int LAPACKE_ctrcon_work( int matrix_order, char norm, char uplo,
   9361                                 char diag, lapack_int n,
   9362                                 const lapack_complex_float* a, lapack_int lda,
   9363                                 float* rcond, lapack_complex_float* work,
   9364                                 float* rwork );
   9365 lapack_int LAPACKE_ztrcon_work( int matrix_order, char norm, char uplo,
   9366                                 char diag, lapack_int n,
   9367                                 const lapack_complex_double* a, lapack_int lda,
   9368                                 double* rcond, lapack_complex_double* work,
   9369                                 double* rwork );
   9370 
   9371 lapack_int LAPACKE_strevc_work( int matrix_order, char side, char howmny,
   9372                                 lapack_logical* select, lapack_int n,
   9373                                 const float* t, lapack_int ldt, float* vl,
   9374                                 lapack_int ldvl, float* vr, lapack_int ldvr,
   9375                                 lapack_int mm, lapack_int* m, float* work );
   9376 lapack_int LAPACKE_dtrevc_work( int matrix_order, char side, char howmny,
   9377                                 lapack_logical* select, lapack_int n,
   9378                                 const double* t, lapack_int ldt, double* vl,
   9379                                 lapack_int ldvl, double* vr, lapack_int ldvr,
   9380                                 lapack_int mm, lapack_int* m, double* work );
   9381 lapack_int LAPACKE_ctrevc_work( int matrix_order, char side, char howmny,
   9382                                 const lapack_logical* select, lapack_int n,
   9383                                 lapack_complex_float* t, lapack_int ldt,
   9384                                 lapack_complex_float* vl, lapack_int ldvl,
   9385                                 lapack_complex_float* vr, lapack_int ldvr,
   9386                                 lapack_int mm, lapack_int* m,
   9387                                 lapack_complex_float* work, float* rwork );
   9388 lapack_int LAPACKE_ztrevc_work( int matrix_order, char side, char howmny,
   9389                                 const lapack_logical* select, lapack_int n,
   9390                                 lapack_complex_double* t, lapack_int ldt,
   9391                                 lapack_complex_double* vl, lapack_int ldvl,
   9392                                 lapack_complex_double* vr, lapack_int ldvr,
   9393                                 lapack_int mm, lapack_int* m,
   9394                                 lapack_complex_double* work, double* rwork );
   9395 
   9396 lapack_int LAPACKE_strexc_work( int matrix_order, char compq, lapack_int n,
   9397                                 float* t, lapack_int ldt, float* q,
   9398                                 lapack_int ldq, lapack_int* ifst,
   9399                                 lapack_int* ilst, float* work );
   9400 lapack_int LAPACKE_dtrexc_work( int matrix_order, char compq, lapack_int n,
   9401                                 double* t, lapack_int ldt, double* q,
   9402                                 lapack_int ldq, lapack_int* ifst,
   9403                                 lapack_int* ilst, double* work );
   9404 lapack_int LAPACKE_ctrexc_work( int matrix_order, char compq, lapack_int n,
   9405                                 lapack_complex_float* t, lapack_int ldt,
   9406                                 lapack_complex_float* q, lapack_int ldq,
   9407                                 lapack_int ifst, lapack_int ilst );
   9408 lapack_int LAPACKE_ztrexc_work( int matrix_order, char compq, lapack_int n,
   9409                                 lapack_complex_double* t, lapack_int ldt,
   9410                                 lapack_complex_double* q, lapack_int ldq,
   9411                                 lapack_int ifst, lapack_int ilst );
   9412 
   9413 lapack_int LAPACKE_strrfs_work( int matrix_order, char uplo, char trans,
   9414                                 char diag, lapack_int n, lapack_int nrhs,
   9415                                 const float* a, lapack_int lda, const float* b,
   9416                                 lapack_int ldb, const float* x, lapack_int ldx,
   9417                                 float* ferr, float* berr, float* work,
   9418                                 lapack_int* iwork );
   9419 lapack_int LAPACKE_dtrrfs_work( int matrix_order, char uplo, char trans,
   9420                                 char diag, lapack_int n, lapack_int nrhs,
   9421                                 const double* a, lapack_int lda,
   9422                                 const double* b, lapack_int ldb,
   9423                                 const double* x, lapack_int ldx, double* ferr,
   9424                                 double* berr, double* work, lapack_int* iwork );
   9425 lapack_int LAPACKE_ctrrfs_work( int matrix_order, char uplo, char trans,
   9426                                 char diag, lapack_int n, lapack_int nrhs,
   9427                                 const lapack_complex_float* a, lapack_int lda,
   9428                                 const lapack_complex_float* b, lapack_int ldb,
   9429                                 const lapack_complex_float* x, lapack_int ldx,
   9430                                 float* ferr, float* berr,
   9431                                 lapack_complex_float* work, float* rwork );
   9432 lapack_int LAPACKE_ztrrfs_work( int matrix_order, char uplo, char trans,
   9433                                 char diag, lapack_int n, lapack_int nrhs,
   9434                                 const lapack_complex_double* a, lapack_int lda,
   9435                                 const lapack_complex_double* b, lapack_int ldb,
   9436                                 const lapack_complex_double* x, lapack_int ldx,
   9437                                 double* ferr, double* berr,
   9438                                 lapack_complex_double* work, double* rwork );
   9439 
   9440 lapack_int LAPACKE_strsen_work( int matrix_order, char job, char compq,
   9441                                 const lapack_logical* select, lapack_int n,
   9442                                 float* t, lapack_int ldt, float* q,
   9443                                 lapack_int ldq, float* wr, float* wi,
   9444                                 lapack_int* m, float* s, float* sep,
   9445                                 float* work, lapack_int lwork,
   9446                                 lapack_int* iwork, lapack_int liwork );
   9447 lapack_int LAPACKE_dtrsen_work( int matrix_order, char job, char compq,
   9448                                 const lapack_logical* select, lapack_int n,
   9449                                 double* t, lapack_int ldt, double* q,
   9450                                 lapack_int ldq, double* wr, double* wi,
   9451                                 lapack_int* m, double* s, double* sep,
   9452                                 double* work, lapack_int lwork,
   9453                                 lapack_int* iwork, lapack_int liwork );
   9454 lapack_int LAPACKE_ctrsen_work( int matrix_order, char job, char compq,
   9455                                 const lapack_logical* select, lapack_int n,
   9456                                 lapack_complex_float* t, lapack_int ldt,
   9457                                 lapack_complex_float* q, lapack_int ldq,
   9458                                 lapack_complex_float* w, lapack_int* m,
   9459                                 float* s, float* sep,
   9460                                 lapack_complex_float* work, lapack_int lwork );
   9461 lapack_int LAPACKE_ztrsen_work( int matrix_order, char job, char compq,
   9462                                 const lapack_logical* select, lapack_int n,
   9463                                 lapack_complex_double* t, lapack_int ldt,
   9464                                 lapack_complex_double* q, lapack_int ldq,
   9465                                 lapack_complex_double* w, lapack_int* m,
   9466                                 double* s, double* sep,
   9467                                 lapack_complex_double* work, lapack_int lwork );
   9468 
   9469 lapack_int LAPACKE_strsna_work( int matrix_order, char job, char howmny,
   9470                                 const lapack_logical* select, lapack_int n,
   9471                                 const float* t, lapack_int ldt, const float* vl,
   9472                                 lapack_int ldvl, const float* vr,
   9473                                 lapack_int ldvr, float* s, float* sep,
   9474                                 lapack_int mm, lapack_int* m, float* work,
   9475                                 lapack_int ldwork, lapack_int* iwork );
   9476 lapack_int LAPACKE_dtrsna_work( int matrix_order, char job, char howmny,
   9477                                 const lapack_logical* select, lapack_int n,
   9478                                 const double* t, lapack_int ldt,
   9479                                 const double* vl, lapack_int ldvl,
   9480                                 const double* vr, lapack_int ldvr, double* s,
   9481                                 double* sep, lapack_int mm, lapack_int* m,
   9482                                 double* work, lapack_int ldwork,
   9483                                 lapack_int* iwork );
   9484 lapack_int LAPACKE_ctrsna_work( int matrix_order, char job, char howmny,
   9485                                 const lapack_logical* select, lapack_int n,
   9486                                 const lapack_complex_float* t, lapack_int ldt,
   9487                                 const lapack_complex_float* vl, lapack_int ldvl,
   9488                                 const lapack_complex_float* vr, lapack_int ldvr,
   9489                                 float* s, float* sep, lapack_int mm,
   9490                                 lapack_int* m, lapack_complex_float* work,
   9491                                 lapack_int ldwork, float* rwork );
   9492 lapack_int LAPACKE_ztrsna_work( int matrix_order, char job, char howmny,
   9493                                 const lapack_logical* select, lapack_int n,
   9494                                 const lapack_complex_double* t, lapack_int ldt,
   9495                                 const lapack_complex_double* vl,
   9496                                 lapack_int ldvl,
   9497                                 const lapack_complex_double* vr,
   9498                                 lapack_int ldvr, double* s, double* sep,
   9499                                 lapack_int mm, lapack_int* m,
   9500                                 lapack_complex_double* work, lapack_int ldwork,
   9501                                 double* rwork );
   9502 
   9503 lapack_int LAPACKE_strsyl_work( int matrix_order, char trana, char tranb,
   9504                                 lapack_int isgn, lapack_int m, lapack_int n,
   9505                                 const float* a, lapack_int lda, const float* b,
   9506                                 lapack_int ldb, float* c, lapack_int ldc,
   9507                                 float* scale );
   9508 lapack_int LAPACKE_dtrsyl_work( int matrix_order, char trana, char tranb,
   9509                                 lapack_int isgn, lapack_int m, lapack_int n,
   9510                                 const double* a, lapack_int lda,
   9511                                 const double* b, lapack_int ldb, double* c,
   9512                                 lapack_int ldc, double* scale );
   9513 lapack_int LAPACKE_ctrsyl_work( int matrix_order, char trana, char tranb,
   9514                                 lapack_int isgn, lapack_int m, lapack_int n,
   9515                                 const lapack_complex_float* a, lapack_int lda,
   9516                                 const lapack_complex_float* b, lapack_int ldb,
   9517                                 lapack_complex_float* c, lapack_int ldc,
   9518                                 float* scale );
   9519 lapack_int LAPACKE_ztrsyl_work( int matrix_order, char trana, char tranb,
   9520                                 lapack_int isgn, lapack_int m, lapack_int n,
   9521                                 const lapack_complex_double* a, lapack_int lda,
   9522                                 const lapack_complex_double* b, lapack_int ldb,
   9523                                 lapack_complex_double* c, lapack_int ldc,
   9524                                 double* scale );
   9525 
   9526 lapack_int LAPACKE_strtri_work( int matrix_order, char uplo, char diag,
   9527                                 lapack_int n, float* a, lapack_int lda );
   9528 lapack_int LAPACKE_dtrtri_work( int matrix_order, char uplo, char diag,
   9529                                 lapack_int n, double* a, lapack_int lda );
   9530 lapack_int LAPACKE_ctrtri_work( int matrix_order, char uplo, char diag,
   9531                                 lapack_int n, lapack_complex_float* a,
   9532                                 lapack_int lda );
   9533 lapack_int LAPACKE_ztrtri_work( int matrix_order, char uplo, char diag,
   9534                                 lapack_int n, lapack_complex_double* a,
   9535                                 lapack_int lda );
   9536 
   9537 lapack_int LAPACKE_strtrs_work( int matrix_order, char uplo, char trans,
   9538                                 char diag, lapack_int n, lapack_int nrhs,
   9539                                 const float* a, lapack_int lda, float* b,
   9540                                 lapack_int ldb );
   9541 lapack_int LAPACKE_dtrtrs_work( int matrix_order, char uplo, char trans,
   9542                                 char diag, lapack_int n, lapack_int nrhs,
   9543                                 const double* a, lapack_int lda, double* b,
   9544                                 lapack_int ldb );
   9545 lapack_int LAPACKE_ctrtrs_work( int matrix_order, char uplo, char trans,
   9546                                 char diag, lapack_int n, lapack_int nrhs,
   9547                                 const lapack_complex_float* a, lapack_int lda,
   9548                                 lapack_complex_float* b, lapack_int ldb );
   9549 lapack_int LAPACKE_ztrtrs_work( int matrix_order, char uplo, char trans,
   9550                                 char diag, lapack_int n, lapack_int nrhs,
   9551                                 const lapack_complex_double* a, lapack_int lda,
   9552                                 lapack_complex_double* b, lapack_int ldb );
   9553 
   9554 lapack_int LAPACKE_strttf_work( int matrix_order, char transr, char uplo,
   9555                                 lapack_int n, const float* a, lapack_int lda,
   9556                                 float* arf );
   9557 lapack_int LAPACKE_dtrttf_work( int matrix_order, char transr, char uplo,
   9558                                 lapack_int n, const double* a, lapack_int lda,
   9559                                 double* arf );
   9560 lapack_int LAPACKE_ctrttf_work( int matrix_order, char transr, char uplo,
   9561                                 lapack_int n, const lapack_complex_float* a,
   9562                                 lapack_int lda, lapack_complex_float* arf );
   9563 lapack_int LAPACKE_ztrttf_work( int matrix_order, char transr, char uplo,
   9564                                 lapack_int n, const lapack_complex_double* a,
   9565                                 lapack_int lda, lapack_complex_double* arf );
   9566 
   9567 lapack_int LAPACKE_strttp_work( int matrix_order, char uplo, lapack_int n,
   9568                                 const float* a, lapack_int lda, float* ap );
   9569 lapack_int LAPACKE_dtrttp_work( int matrix_order, char uplo, lapack_int n,
   9570                                 const double* a, lapack_int lda, double* ap );
   9571 lapack_int LAPACKE_ctrttp_work( int matrix_order, char uplo, lapack_int n,
   9572                                 const lapack_complex_float* a, lapack_int lda,
   9573                                 lapack_complex_float* ap );
   9574 lapack_int LAPACKE_ztrttp_work( int matrix_order, char uplo, lapack_int n,
   9575                                 const lapack_complex_double* a, lapack_int lda,
   9576                                 lapack_complex_double* ap );
   9577 
   9578 lapack_int LAPACKE_stzrzf_work( int matrix_order, lapack_int m, lapack_int n,
   9579                                 float* a, lapack_int lda, float* tau,
   9580                                 float* work, lapack_int lwork );
   9581 lapack_int LAPACKE_dtzrzf_work( int matrix_order, lapack_int m, lapack_int n,
   9582                                 double* a, lapack_int lda, double* tau,
   9583                                 double* work, lapack_int lwork );
   9584 lapack_int LAPACKE_ctzrzf_work( int matrix_order, lapack_int m, lapack_int n,
   9585                                 lapack_complex_float* a, lapack_int lda,
   9586                                 lapack_complex_float* tau,
   9587                                 lapack_complex_float* work, lapack_int lwork );
   9588 lapack_int LAPACKE_ztzrzf_work( int matrix_order, lapack_int m, lapack_int n,
   9589                                 lapack_complex_double* a, lapack_int lda,
   9590                                 lapack_complex_double* tau,
   9591                                 lapack_complex_double* work, lapack_int lwork );
   9592 
   9593 lapack_int LAPACKE_cungbr_work( int matrix_order, char vect, lapack_int m,
   9594                                 lapack_int n, lapack_int k,
   9595                                 lapack_complex_float* a, lapack_int lda,
   9596                                 const lapack_complex_float* tau,
   9597                                 lapack_complex_float* work, lapack_int lwork );
   9598 lapack_int LAPACKE_zungbr_work( int matrix_order, char vect, lapack_int m,
   9599                                 lapack_int n, lapack_int k,
   9600                                 lapack_complex_double* a, lapack_int lda,
   9601                                 const lapack_complex_double* tau,
   9602                                 lapack_complex_double* work, lapack_int lwork );
   9603 
   9604 lapack_int LAPACKE_cunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
   9605                                 lapack_int ihi, lapack_complex_float* a,
   9606                                 lapack_int lda, const lapack_complex_float* tau,
   9607                                 lapack_complex_float* work, lapack_int lwork );
   9608 lapack_int LAPACKE_zunghr_work( int matrix_order, lapack_int n, lapack_int ilo,
   9609                                 lapack_int ihi, lapack_complex_double* a,
   9610                                 lapack_int lda,
   9611                                 const lapack_complex_double* tau,
   9612                                 lapack_complex_double* work, lapack_int lwork );
   9613 
   9614 lapack_int LAPACKE_cunglq_work( int matrix_order, lapack_int m, lapack_int n,
   9615                                 lapack_int k, lapack_complex_float* a,
   9616                                 lapack_int lda, const lapack_complex_float* tau,
   9617                                 lapack_complex_float* work, lapack_int lwork );
   9618 lapack_int LAPACKE_zunglq_work( int matrix_order, lapack_int m, lapack_int n,
   9619                                 lapack_int k, lapack_complex_double* a,
   9620                                 lapack_int lda,
   9621                                 const lapack_complex_double* tau,
   9622                                 lapack_complex_double* work, lapack_int lwork );
   9623 
   9624 lapack_int LAPACKE_cungql_work( int matrix_order, lapack_int m, lapack_int n,
   9625                                 lapack_int k, lapack_complex_float* a,
   9626                                 lapack_int lda, const lapack_complex_float* tau,
   9627                                 lapack_complex_float* work, lapack_int lwork );
   9628 lapack_int LAPACKE_zungql_work( int matrix_order, lapack_int m, lapack_int n,
   9629                                 lapack_int k, lapack_complex_double* a,
   9630                                 lapack_int lda,
   9631                                 const lapack_complex_double* tau,
   9632                                 lapack_complex_double* work, lapack_int lwork );
   9633 
   9634 lapack_int LAPACKE_cungqr_work( int matrix_order, lapack_int m, lapack_int n,
   9635                                 lapack_int k, lapack_complex_float* a,
   9636                                 lapack_int lda, const lapack_complex_float* tau,
   9637                                 lapack_complex_float* work, lapack_int lwork );
   9638 lapack_int LAPACKE_zungqr_work( int matrix_order, lapack_int m, lapack_int n,
   9639                                 lapack_int k, lapack_complex_double* a,
   9640                                 lapack_int lda,
   9641                                 const lapack_complex_double* tau,
   9642                                 lapack_complex_double* work, lapack_int lwork );
   9643 
   9644 lapack_int LAPACKE_cungrq_work( int matrix_order, lapack_int m, lapack_int n,
   9645                                 lapack_int k, lapack_complex_float* a,
   9646                                 lapack_int lda, const lapack_complex_float* tau,
   9647                                 lapack_complex_float* work, lapack_int lwork );
   9648 lapack_int LAPACKE_zungrq_work( int matrix_order, lapack_int m, lapack_int n,
   9649                                 lapack_int k, lapack_complex_double* a,
   9650                                 lapack_int lda,
   9651                                 const lapack_complex_double* tau,
   9652                                 lapack_complex_double* work, lapack_int lwork );
   9653 
   9654 lapack_int LAPACKE_cungtr_work( int matrix_order, char uplo, lapack_int n,
   9655                                 lapack_complex_float* a, lapack_int lda,
   9656                                 const lapack_complex_float* tau,
   9657                                 lapack_complex_float* work, lapack_int lwork );
   9658 lapack_int LAPACKE_zungtr_work( int matrix_order, char uplo, lapack_int n,
   9659                                 lapack_complex_double* a, lapack_int lda,
   9660                                 const lapack_complex_double* tau,
   9661                                 lapack_complex_double* work, lapack_int lwork );
   9662 
   9663 lapack_int LAPACKE_cunmbr_work( int matrix_order, char vect, char side,
   9664                                 char trans, lapack_int m, lapack_int n,
   9665                                 lapack_int k, const lapack_complex_float* a,
   9666                                 lapack_int lda, const lapack_complex_float* tau,
   9667                                 lapack_complex_float* c, lapack_int ldc,
   9668                                 lapack_complex_float* work, lapack_int lwork );
   9669 lapack_int LAPACKE_zunmbr_work( int matrix_order, char vect, char side,
   9670                                 char trans, lapack_int m, lapack_int n,
   9671                                 lapack_int k, const lapack_complex_double* a,
   9672                                 lapack_int lda,
   9673                                 const lapack_complex_double* tau,
   9674                                 lapack_complex_double* c, lapack_int ldc,
   9675                                 lapack_complex_double* work, lapack_int lwork );
   9676 
   9677 lapack_int LAPACKE_cunmhr_work( int matrix_order, char side, char trans,
   9678                                 lapack_int m, lapack_int n, lapack_int ilo,
   9679                                 lapack_int ihi, const lapack_complex_float* a,
   9680                                 lapack_int lda, const lapack_complex_float* tau,
   9681                                 lapack_complex_float* c, lapack_int ldc,
   9682                                 lapack_complex_float* work, lapack_int lwork );
   9683 lapack_int LAPACKE_zunmhr_work( int matrix_order, char side, char trans,
   9684                                 lapack_int m, lapack_int n, lapack_int ilo,
   9685                                 lapack_int ihi, const lapack_complex_double* a,
   9686                                 lapack_int lda,
   9687                                 const lapack_complex_double* tau,
   9688                                 lapack_complex_double* c, lapack_int ldc,
   9689                                 lapack_complex_double* work, lapack_int lwork );
   9690 
   9691 lapack_int LAPACKE_cunmlq_work( int matrix_order, char side, char trans,
   9692                                 lapack_int m, lapack_int n, lapack_int k,
   9693                                 const lapack_complex_float* a, lapack_int lda,
   9694                                 const lapack_complex_float* tau,
   9695                                 lapack_complex_float* c, lapack_int ldc,
   9696                                 lapack_complex_float* work, lapack_int lwork );
   9697 lapack_int LAPACKE_zunmlq_work( int matrix_order, char side, char trans,
   9698                                 lapack_int m, lapack_int n, lapack_int k,
   9699                                 const lapack_complex_double* a, lapack_int lda,
   9700                                 const lapack_complex_double* tau,
   9701                                 lapack_complex_double* c, lapack_int ldc,
   9702                                 lapack_complex_double* work, lapack_int lwork );
   9703 
   9704 lapack_int LAPACKE_cunmql_work( int matrix_order, char side, char trans,
   9705                                 lapack_int m, lapack_int n, lapack_int k,
   9706                                 const lapack_complex_float* a, lapack_int lda,
   9707                                 const lapack_complex_float* tau,
   9708                                 lapack_complex_float* c, lapack_int ldc,
   9709                                 lapack_complex_float* work, lapack_int lwork );
   9710 lapack_int LAPACKE_zunmql_work( int matrix_order, char side, char trans,
   9711                                 lapack_int m, lapack_int n, lapack_int k,
   9712                                 const lapack_complex_double* a, lapack_int lda,
   9713                                 const lapack_complex_double* tau,
   9714                                 lapack_complex_double* c, lapack_int ldc,
   9715                                 lapack_complex_double* work, lapack_int lwork );
   9716 
   9717 lapack_int LAPACKE_cunmqr_work( int matrix_order, char side, char trans,
   9718                                 lapack_int m, lapack_int n, lapack_int k,
   9719                                 const lapack_complex_float* a, lapack_int lda,
   9720                                 const lapack_complex_float* tau,
   9721                                 lapack_complex_float* c, lapack_int ldc,
   9722                                 lapack_complex_float* work, lapack_int lwork );
   9723 lapack_int LAPACKE_zunmqr_work( int matrix_order, char side, char trans,
   9724                                 lapack_int m, lapack_int n, lapack_int k,
   9725                                 const lapack_complex_double* a, lapack_int lda,
   9726                                 const lapack_complex_double* tau,
   9727                                 lapack_complex_double* c, lapack_int ldc,
   9728                                 lapack_complex_double* work, lapack_int lwork );
   9729 
   9730 lapack_int LAPACKE_cunmrq_work( int matrix_order, char side, char trans,
   9731                                 lapack_int m, lapack_int n, lapack_int k,
   9732                                 const lapack_complex_float* a, lapack_int lda,
   9733                                 const lapack_complex_float* tau,
   9734                                 lapack_complex_float* c, lapack_int ldc,
   9735                                 lapack_complex_float* work, lapack_int lwork );
   9736 lapack_int LAPACKE_zunmrq_work( int matrix_order, char side, char trans,
   9737                                 lapack_int m, lapack_int n, lapack_int k,
   9738                                 const lapack_complex_double* a, lapack_int lda,
   9739                                 const lapack_complex_double* tau,
   9740                                 lapack_complex_double* c, lapack_int ldc,
   9741                                 lapack_complex_double* work, lapack_int lwork );
   9742 
   9743 lapack_int LAPACKE_cunmrz_work( int matrix_order, char side, char trans,
   9744                                 lapack_int m, lapack_int n, lapack_int k,
   9745                                 lapack_int l, const lapack_complex_float* a,
   9746                                 lapack_int lda, const lapack_complex_float* tau,
   9747                                 lapack_complex_float* c, lapack_int ldc,
   9748                                 lapack_complex_float* work, lapack_int lwork );
   9749 lapack_int LAPACKE_zunmrz_work( int matrix_order, char side, char trans,
   9750                                 lapack_int m, lapack_int n, lapack_int k,
   9751                                 lapack_int l, const lapack_complex_double* a,
   9752                                 lapack_int lda,
   9753                                 const lapack_complex_double* tau,
   9754                                 lapack_complex_double* c, lapack_int ldc,
   9755                                 lapack_complex_double* work, lapack_int lwork );
   9756 
   9757 lapack_int LAPACKE_cunmtr_work( int matrix_order, char side, char uplo,
   9758                                 char trans, lapack_int m, lapack_int n,
   9759                                 const lapack_complex_float* a, lapack_int lda,
   9760                                 const lapack_complex_float* tau,
   9761                                 lapack_complex_float* c, lapack_int ldc,
   9762                                 lapack_complex_float* work, lapack_int lwork );
   9763 lapack_int LAPACKE_zunmtr_work( int matrix_order, char side, char uplo,
   9764                                 char trans, lapack_int m, lapack_int n,
   9765                                 const lapack_complex_double* a, lapack_int lda,
   9766                                 const lapack_complex_double* tau,
   9767                                 lapack_complex_double* c, lapack_int ldc,
   9768                                 lapack_complex_double* work, lapack_int lwork );
   9769 
   9770 lapack_int LAPACKE_cupgtr_work( int matrix_order, char uplo, lapack_int n,
   9771                                 const lapack_complex_float* ap,
   9772                                 const lapack_complex_float* tau,
   9773                                 lapack_complex_float* q, lapack_int ldq,
   9774                                 lapack_complex_float* work );
   9775 lapack_int LAPACKE_zupgtr_work( int matrix_order, char uplo, lapack_int n,
   9776                                 const lapack_complex_double* ap,
   9777                                 const lapack_complex_double* tau,
   9778                                 lapack_complex_double* q, lapack_int ldq,
   9779                                 lapack_complex_double* work );
   9780 
   9781 lapack_int LAPACKE_cupmtr_work( int matrix_order, char side, char uplo,
   9782                                 char trans, lapack_int m, lapack_int n,
   9783                                 const lapack_complex_float* ap,
   9784                                 const lapack_complex_float* tau,
   9785                                 lapack_complex_float* c, lapack_int ldc,
   9786                                 lapack_complex_float* work );
   9787 lapack_int LAPACKE_zupmtr_work( int matrix_order, char side, char uplo,
   9788                                 char trans, lapack_int m, lapack_int n,
   9789                                 const lapack_complex_double* ap,
   9790                                 const lapack_complex_double* tau,
   9791                                 lapack_complex_double* c, lapack_int ldc,
   9792                                 lapack_complex_double* work );
   9793 
   9794 lapack_int LAPACKE_claghe( int matrix_order, lapack_int n, lapack_int k,
   9795                            const float* d, lapack_complex_float* a,
   9796                            lapack_int lda, lapack_int* iseed );
   9797 lapack_int LAPACKE_zlaghe( int matrix_order, lapack_int n, lapack_int k,
   9798                            const double* d, lapack_complex_double* a,
   9799                            lapack_int lda, lapack_int* iseed );
   9800 
   9801 lapack_int LAPACKE_slagsy( int matrix_order, lapack_int n, lapack_int k,
   9802                            const float* d, float* a, lapack_int lda,
   9803                            lapack_int* iseed );
   9804 lapack_int LAPACKE_dlagsy( int matrix_order, lapack_int n, lapack_int k,
   9805                            const double* d, double* a, lapack_int lda,
   9806                            lapack_int* iseed );
   9807 lapack_int LAPACKE_clagsy( int matrix_order, lapack_int n, lapack_int k,
   9808                            const float* d, lapack_complex_float* a,
   9809                            lapack_int lda, lapack_int* iseed );
   9810 lapack_int LAPACKE_zlagsy( int matrix_order, lapack_int n, lapack_int k,
   9811                            const double* d, lapack_complex_double* a,
   9812                            lapack_int lda, lapack_int* iseed );
   9813 
   9814 lapack_int LAPACKE_slapmr( int matrix_order, lapack_logical forwrd,
   9815                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
   9816                            lapack_int* k );
   9817 lapack_int LAPACKE_dlapmr( int matrix_order, lapack_logical forwrd,
   9818                            lapack_int m, lapack_int n, double* x,
   9819                            lapack_int ldx, lapack_int* k );
   9820 lapack_int LAPACKE_clapmr( int matrix_order, lapack_logical forwrd,
   9821                            lapack_int m, lapack_int n, lapack_complex_float* x,
   9822                            lapack_int ldx, lapack_int* k );
   9823 lapack_int LAPACKE_zlapmr( int matrix_order, lapack_logical forwrd,
   9824                            lapack_int m, lapack_int n, lapack_complex_double* x,
   9825                            lapack_int ldx, lapack_int* k );
   9826 
   9827 
   9828 float LAPACKE_slapy2( float x, float y );
   9829 double LAPACKE_dlapy2( double x, double y );
   9830 
   9831 float LAPACKE_slapy3( float x, float y, float z );
   9832 double LAPACKE_dlapy3( double x, double y, double z );
   9833 
   9834 lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
   9835 lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
   9836                             double* r );
   9837 
   9838 lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
   9839                             float* sn );
   9840 lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
   9841                             double* sn );
   9842 
   9843 
   9844 //LAPACK 3.3.0
   9845 lapack_int LAPACKE_cbbcsd( int matrix_order, char jobu1, char jobu2,
   9846                            char jobv1t, char jobv2t, char trans, lapack_int m,
   9847                            lapack_int p, lapack_int q, float* theta, float* phi,
   9848                            lapack_complex_float* u1, lapack_int ldu1,
   9849                            lapack_complex_float* u2, lapack_int ldu2,
   9850                            lapack_complex_float* v1t, lapack_int ldv1t,
   9851                            lapack_complex_float* v2t, lapack_int ldv2t,
   9852                            float* b11d, float* b11e, float* b12d, float* b12e,
   9853                            float* b21d, float* b21e, float* b22d, float* b22e );
   9854 lapack_int LAPACKE_cbbcsd_work( int matrix_order, char jobu1, char jobu2,
   9855                                 char jobv1t, char jobv2t, char trans,
   9856                                 lapack_int m, lapack_int p, lapack_int q,
   9857                                 float* theta, float* phi,
   9858                                 lapack_complex_float* u1, lapack_int ldu1,
   9859                                 lapack_complex_float* u2, lapack_int ldu2,
   9860                                 lapack_complex_float* v1t, lapack_int ldv1t,
   9861                                 lapack_complex_float* v2t, lapack_int ldv2t,
   9862                                 float* b11d, float* b11e, float* b12d,
   9863                                 float* b12e, float* b21d, float* b21e,
   9864                                 float* b22d, float* b22e, float* rwork,
   9865                                 lapack_int lrwork );
   9866 lapack_int LAPACKE_cheswapr( int matrix_order, char uplo, lapack_int n,
   9867                              lapack_complex_float* a, lapack_int i1,
   9868                              lapack_int i2 );
   9869 lapack_int LAPACKE_cheswapr_work( int matrix_order, char uplo, lapack_int n,
   9870                                   lapack_complex_float* a, lapack_int i1,
   9871                                   lapack_int i2 );
   9872 lapack_int LAPACKE_chetri2( int matrix_order, char uplo, lapack_int n,
   9873                             lapack_complex_float* a, lapack_int lda,
   9874                             const lapack_int* ipiv );
   9875 lapack_int LAPACKE_chetri2_work( int matrix_order, char uplo, lapack_int n,
   9876                                  lapack_complex_float* a, lapack_int lda,
   9877                                  const lapack_int* ipiv,
   9878                                  lapack_complex_float* work, lapack_int lwork );
   9879 lapack_int LAPACKE_chetri2x( int matrix_order, char uplo, lapack_int n,
   9880                              lapack_complex_float* a, lapack_int lda,
   9881                              const lapack_int* ipiv, lapack_int nb );
   9882 lapack_int LAPACKE_chetri2x_work( int matrix_order, char uplo, lapack_int n,
   9883                                   lapack_complex_float* a, lapack_int lda,
   9884                                   const lapack_int* ipiv,
   9885                                   lapack_complex_float* work, lapack_int nb );
   9886 lapack_int LAPACKE_chetrs2( int matrix_order, char uplo, lapack_int n,
   9887                             lapack_int nrhs, const lapack_complex_float* a,
   9888                             lapack_int lda, const lapack_int* ipiv,
   9889                             lapack_complex_float* b, lapack_int ldb );
   9890 lapack_int LAPACKE_chetrs2_work( int matrix_order, char uplo, lapack_int n,
   9891                                  lapack_int nrhs, const lapack_complex_float* a,
   9892                                  lapack_int lda, const lapack_int* ipiv,
   9893                                  lapack_complex_float* b, lapack_int ldb,
   9894                                  lapack_complex_float* work );
   9895 lapack_int LAPACKE_csyconv( int matrix_order, char uplo, char way, lapack_int n,
   9896                             lapack_complex_float* a, lapack_int lda,
   9897                             const lapack_int* ipiv );
   9898 lapack_int LAPACKE_csyconv_work( int matrix_order, char uplo, char way,
   9899                                  lapack_int n, lapack_complex_float* a,
   9900                                  lapack_int lda, const lapack_int* ipiv,
   9901                                  lapack_complex_float* work );
   9902 lapack_int LAPACKE_csyswapr( int matrix_order, char uplo, lapack_int n,
   9903                              lapack_complex_float* a, lapack_int i1,
   9904                              lapack_int i2 );
   9905 lapack_int LAPACKE_csyswapr_work( int matrix_order, char uplo, lapack_int n,
   9906                                   lapack_complex_float* a, lapack_int i1,
   9907                                   lapack_int i2 );
   9908 lapack_int LAPACKE_csytri2( int matrix_order, char uplo, lapack_int n,
   9909                             lapack_complex_float* a, lapack_int lda,
   9910                             const lapack_int* ipiv );
   9911 lapack_int LAPACKE_csytri2_work( int matrix_order, char uplo, lapack_int n,
   9912                                  lapack_complex_float* a, lapack_int lda,
   9913                                  const lapack_int* ipiv,
   9914                                  lapack_complex_float* work, lapack_int lwork );
   9915 lapack_int LAPACKE_csytri2x( int matrix_order, char uplo, lapack_int n,
   9916                              lapack_complex_float* a, lapack_int lda,
   9917                              const lapack_int* ipiv, lapack_int nb );
   9918 lapack_int LAPACKE_csytri2x_work( int matrix_order, char uplo, lapack_int n,
   9919                                   lapack_complex_float* a, lapack_int lda,
   9920                                   const lapack_int* ipiv,
   9921                                   lapack_complex_float* work, lapack_int nb );
   9922 lapack_int LAPACKE_csytrs2( int matrix_order, char uplo, lapack_int n,
   9923                             lapack_int nrhs, const lapack_complex_float* a,
   9924                             lapack_int lda, const lapack_int* ipiv,
   9925                             lapack_complex_float* b, lapack_int ldb );
   9926 lapack_int LAPACKE_csytrs2_work( int matrix_order, char uplo, lapack_int n,
   9927                                  lapack_int nrhs, const lapack_complex_float* a,
   9928                                  lapack_int lda, const lapack_int* ipiv,
   9929                                  lapack_complex_float* b, lapack_int ldb,
   9930                                  lapack_complex_float* work );
   9931 lapack_int LAPACKE_cunbdb( int matrix_order, char trans, char signs,
   9932                            lapack_int m, lapack_int p, lapack_int q,
   9933                            lapack_complex_float* x11, lapack_int ldx11,
   9934                            lapack_complex_float* x12, lapack_int ldx12,
   9935                            lapack_complex_float* x21, lapack_int ldx21,
   9936                            lapack_complex_float* x22, lapack_int ldx22,
   9937                            float* theta, float* phi,
   9938                            lapack_complex_float* taup1,
   9939                            lapack_complex_float* taup2,
   9940                            lapack_complex_float* tauq1,
   9941                            lapack_complex_float* tauq2 );
   9942 lapack_int LAPACKE_cunbdb_work( int matrix_order, char trans, char signs,
   9943                                 lapack_int m, lapack_int p, lapack_int q,
   9944                                 lapack_complex_float* x11, lapack_int ldx11,
   9945                                 lapack_complex_float* x12, lapack_int ldx12,
   9946                                 lapack_complex_float* x21, lapack_int ldx21,
   9947                                 lapack_complex_float* x22, lapack_int ldx22,
   9948                                 float* theta, float* phi,
   9949                                 lapack_complex_float* taup1,
   9950                                 lapack_complex_float* taup2,
   9951                                 lapack_complex_float* tauq1,
   9952                                 lapack_complex_float* tauq2,
   9953                                 lapack_complex_float* work, lapack_int lwork );
   9954 lapack_int LAPACKE_cuncsd( int matrix_order, char jobu1, char jobu2,
   9955                            char jobv1t, char jobv2t, char trans, char signs,
   9956                            lapack_int m, lapack_int p, lapack_int q,
   9957                            lapack_complex_float* x11, lapack_int ldx11,
   9958                            lapack_complex_float* x12, lapack_int ldx12,
   9959                            lapack_complex_float* x21, lapack_int ldx21,
   9960                            lapack_complex_float* x22, lapack_int ldx22,
   9961                            float* theta, lapack_complex_float* u1,
   9962                            lapack_int ldu1, lapack_complex_float* u2,
   9963                            lapack_int ldu2, lapack_complex_float* v1t,
   9964                            lapack_int ldv1t, lapack_complex_float* v2t,
   9965                            lapack_int ldv2t );
   9966 lapack_int LAPACKE_cuncsd_work( int matrix_order, char jobu1, char jobu2,
   9967                                 char jobv1t, char jobv2t, char trans,
   9968                                 char signs, lapack_int m, lapack_int p,
   9969                                 lapack_int q, lapack_complex_float* x11,
   9970                                 lapack_int ldx11, lapack_complex_float* x12,
   9971                                 lapack_int ldx12, lapack_complex_float* x21,
   9972                                 lapack_int ldx21, lapack_complex_float* x22,
   9973                                 lapack_int ldx22, float* theta,
   9974                                 lapack_complex_float* u1, lapack_int ldu1,
   9975                                 lapack_complex_float* u2, lapack_int ldu2,
   9976                                 lapack_complex_float* v1t, lapack_int ldv1t,
   9977                                 lapack_complex_float* v2t, lapack_int ldv2t,
   9978                                 lapack_complex_float* work, lapack_int lwork,
   9979                                 float* rwork, lapack_int lrwork,
   9980                                 lapack_int* iwork );
   9981 lapack_int LAPACKE_dbbcsd( int matrix_order, char jobu1, char jobu2,
   9982                            char jobv1t, char jobv2t, char trans, lapack_int m,
   9983                            lapack_int p, lapack_int q, double* theta,
   9984                            double* phi, double* u1, lapack_int ldu1, double* u2,
   9985                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
   9986                            double* v2t, lapack_int ldv2t, double* b11d,
   9987                            double* b11e, double* b12d, double* b12e,
   9988                            double* b21d, double* b21e, double* b22d,
   9989                            double* b22e );
   9990 lapack_int LAPACKE_dbbcsd_work( int matrix_order, char jobu1, char jobu2,
   9991                                 char jobv1t, char jobv2t, char trans,
   9992                                 lapack_int m, lapack_int p, lapack_int q,
   9993                                 double* theta, double* phi, double* u1,
   9994                                 lapack_int ldu1, double* u2, lapack_int ldu2,
   9995                                 double* v1t, lapack_int ldv1t, double* v2t,
   9996                                 lapack_int ldv2t, double* b11d, double* b11e,
   9997                                 double* b12d, double* b12e, double* b21d,
   9998                                 double* b21e, double* b22d, double* b22e,
   9999                                 double* work, lapack_int lwork );
   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_ */
   16292