github.com/gonum/lapack@v0.0.0-20181123203213-e4cdc5a0bff9/cgo/lapacke/lapacke.h (about)

     1  /*****************************************************************************
     2    Copyright (c) 2014, 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 August, 2015
    32  *****************************************************************************/
    33  
    34  #ifndef _LAPACKE_H_
    35  #define _LAPACKE_H_
    36  
    37  /*
    38  *  Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
    39  */
    40  #ifdef HAVE_LAPACK_CONFIG_H
    41  #include "lapacke_config.h"
    42  #endif
    43  
    44  #include <stdlib.h>
    45  
    46  #ifndef lapack_int
    47  #define lapack_int     int
    48  #endif
    49  
    50  #ifndef lapack_logical
    51  #define lapack_logical lapack_int
    52  #endif
    53  
    54  /* Complex types are structures equivalent to the
    55  * Fortran complex types COMPLEX(4) and COMPLEX(8).
    56  *
    57  * One can also redefine the types with his own types
    58  * for example by including in the code definitions like
    59  *
    60  * #define lapack_complex_float std::complex<float>
    61  * #define lapack_complex_double std::complex<double>
    62  *
    63  * or define these types in the command line:
    64  *
    65  * -Dlapack_complex_float="std::complex<float>"
    66  * -Dlapack_complex_double="std::complex<double>"
    67  */
    68  
    69  #ifndef LAPACK_COMPLEX_CUSTOM
    70  
    71  /* Complex type (single precision) */
    72  #ifndef lapack_complex_float
    73  #include <complex.h>
    74  #define lapack_complex_float    float _Complex
    75  #endif
    76  
    77  #ifndef lapack_complex_float_real
    78  #define lapack_complex_float_real(z)       (creal(z))
    79  #endif
    80  
    81  #ifndef lapack_complex_float_imag
    82  #define lapack_complex_float_imag(z)       (cimag(z))
    83  #endif
    84  
    85  lapack_complex_float lapack_make_complex_float( float re, float im );
    86  
    87  /* Complex type (double precision) */
    88  #ifndef lapack_complex_double
    89  #include <complex.h>
    90  #define lapack_complex_double   double _Complex
    91  #endif
    92  
    93  #ifndef lapack_complex_double_real
    94  #define lapack_complex_double_real(z)      (creal(z))
    95  #endif
    96  
    97  #ifndef lapack_complex_double_imag
    98  #define lapack_complex_double_imag(z)       (cimag(z))
    99  #endif
   100  
   101  lapack_complex_double lapack_make_complex_double( double re, double im );
   102  
   103  #endif
   104  
   105  #ifdef __cplusplus
   106  extern "C" {
   107  #endif /* __cplusplus */
   108  
   109  #ifndef LAPACKE_malloc
   110  #define LAPACKE_malloc( size ) malloc( size )
   111  #endif
   112  #ifndef LAPACKE_free
   113  #define LAPACKE_free( p )      free( p )
   114  #endif
   115  
   116  #define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
   117  #define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
   118  
   119  #define LAPACK_ROW_MAJOR               101
   120  #define LAPACK_COL_MAJOR               102
   121  
   122  #define LAPACK_WORK_MEMORY_ERROR       -1010
   123  #define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
   124  
   125  /* Callback logical functions of one, two, or three arguments are used
   126  *  to select eigenvalues to sort to the top left of the Schur form.
   127  *  The value is selected if function returns TRUE (non-zero). */
   128  
   129  typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
   130  typedef lapack_logical (*LAPACK_S_SELECT3)
   131      ( const float*, const float*, const float* );
   132  typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
   133  typedef lapack_logical (*LAPACK_D_SELECT3)
   134      ( const double*, const double*, const double* );
   135  
   136  typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
   137  typedef lapack_logical (*LAPACK_C_SELECT2)
   138      ( const lapack_complex_float*, const lapack_complex_float* );
   139  typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
   140  typedef lapack_logical (*LAPACK_Z_SELECT2)
   141      ( const lapack_complex_double*, const lapack_complex_double* );
   142  
   143  #include "lapacke_mangling.h"
   144  
   145  #define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
   146  lapack_logical LAPACK_lsame( char* ca,  char* cb,
   147                                lapack_int lca, lapack_int lcb );
   148  
   149  /* C-LAPACK function prototypes */
   150  
   151  lapack_int LAPACKE_sbdsdc( int matrix_layout, char uplo, char compq,
   152                             lapack_int n, float* d, float* e, float* u,
   153                             lapack_int ldu, float* vt, lapack_int ldvt, float* q,
   154                             lapack_int* iq );
   155  lapack_int LAPACKE_dbdsdc( int matrix_layout, char uplo, char compq,
   156                             lapack_int n, double* d, double* e, double* u,
   157                             lapack_int ldu, double* vt, lapack_int ldvt,
   158                             double* q, lapack_int* iq );
   159  
   160  lapack_int LAPACKE_sbdsqr( int matrix_layout, char uplo, lapack_int n,
   161                             lapack_int ncvt, lapack_int nru, lapack_int ncc,
   162                             float* d, float* e, float* vt, lapack_int ldvt,
   163                             float* u, lapack_int ldu, float* c, lapack_int ldc );
   164  lapack_int LAPACKE_dbdsqr( int matrix_layout, char uplo, lapack_int n,
   165                             lapack_int ncvt, lapack_int nru, lapack_int ncc,
   166                             double* d, double* e, double* vt, lapack_int ldvt,
   167                             double* u, lapack_int ldu, double* c,
   168                             lapack_int ldc );
   169  lapack_int LAPACKE_cbdsqr( int matrix_layout, char uplo, lapack_int n,
   170                             lapack_int ncvt, lapack_int nru, lapack_int ncc,
   171                             float* d, float* e, lapack_complex_float* vt,
   172                             lapack_int ldvt, lapack_complex_float* u,
   173                             lapack_int ldu, lapack_complex_float* c,
   174                             lapack_int ldc );
   175  lapack_int LAPACKE_zbdsqr( int matrix_layout, char uplo, lapack_int n,
   176                             lapack_int ncvt, lapack_int nru, lapack_int ncc,
   177                             double* d, double* e, lapack_complex_double* vt,
   178                             lapack_int ldvt, lapack_complex_double* u,
   179                             lapack_int ldu, lapack_complex_double* c,
   180                             lapack_int ldc );
   181  lapack_int LAPACKE_sbdsvdx( int matrix_layout, char uplo, char jobz, char range,
   182                             lapack_int n, float* d, float* e,
   183                             lapack_int vl, lapack_int vu,
   184                             lapack_int il, lapack_int iu, lapack_int ns,
   185                             float* s, float* z, lapack_int ldz,
   186                             lapack_int* superb );
   187  lapack_int LAPACKE_dbdsvdx( int matrix_layout, char uplo, char jobz, char range,
   188                             lapack_int n, double* d, double* e,
   189                             lapack_int vl, lapack_int vu,
   190                             lapack_int il, lapack_int iu, lapack_int ns,
   191                             double* s, double* z, lapack_int ldz,
   192                             lapack_int* superb );
   193  lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
   194                             float* sep );
   195  lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
   196                             const double* d, double* sep );
   197  
   198  lapack_int LAPACKE_sgbbrd( int matrix_layout, char vect, lapack_int m,
   199                             lapack_int n, lapack_int ncc, lapack_int kl,
   200                             lapack_int ku, float* ab, lapack_int ldab, float* d,
   201                             float* e, float* q, lapack_int ldq, float* pt,
   202                             lapack_int ldpt, float* c, lapack_int ldc );
   203  lapack_int LAPACKE_dgbbrd( int matrix_layout, char vect, lapack_int m,
   204                             lapack_int n, lapack_int ncc, lapack_int kl,
   205                             lapack_int ku, double* ab, lapack_int ldab,
   206                             double* d, double* e, double* q, lapack_int ldq,
   207                             double* pt, lapack_int ldpt, double* c,
   208                             lapack_int ldc );
   209  lapack_int LAPACKE_cgbbrd( int matrix_layout, char vect, lapack_int m,
   210                             lapack_int n, lapack_int ncc, lapack_int kl,
   211                             lapack_int ku, lapack_complex_float* ab,
   212                             lapack_int ldab, float* d, float* e,
   213                             lapack_complex_float* q, lapack_int ldq,
   214                             lapack_complex_float* pt, lapack_int ldpt,
   215                             lapack_complex_float* c, lapack_int ldc );
   216  lapack_int LAPACKE_zgbbrd( int matrix_layout, char vect, lapack_int m,
   217                             lapack_int n, lapack_int ncc, lapack_int kl,
   218                             lapack_int ku, lapack_complex_double* ab,
   219                             lapack_int ldab, double* d, double* e,
   220                             lapack_complex_double* q, lapack_int ldq,
   221                             lapack_complex_double* pt, lapack_int ldpt,
   222                             lapack_complex_double* c, lapack_int ldc );
   223  
   224  lapack_int LAPACKE_sgbcon( int matrix_layout, char norm, lapack_int n,
   225                             lapack_int kl, lapack_int ku, const float* ab,
   226                             lapack_int ldab, const lapack_int* ipiv, float anorm,
   227                             float* rcond );
   228  lapack_int LAPACKE_dgbcon( int matrix_layout, char norm, lapack_int n,
   229                             lapack_int kl, lapack_int ku, const double* ab,
   230                             lapack_int ldab, const lapack_int* ipiv,
   231                             double anorm, double* rcond );
   232  lapack_int LAPACKE_cgbcon( int matrix_layout, char norm, lapack_int n,
   233                             lapack_int kl, lapack_int ku,
   234                             const lapack_complex_float* ab, lapack_int ldab,
   235                             const lapack_int* ipiv, float anorm, float* rcond );
   236  lapack_int LAPACKE_zgbcon( int matrix_layout, char norm, lapack_int n,
   237                             lapack_int kl, lapack_int ku,
   238                             const lapack_complex_double* ab, lapack_int ldab,
   239                             const lapack_int* ipiv, double anorm,
   240                             double* rcond );
   241  
   242  lapack_int LAPACKE_sgbequ( int matrix_layout, lapack_int m, lapack_int n,
   243                             lapack_int kl, lapack_int ku, const float* ab,
   244                             lapack_int ldab, float* r, float* c, float* rowcnd,
   245                             float* colcnd, float* amax );
   246  lapack_int LAPACKE_dgbequ( int matrix_layout, lapack_int m, lapack_int n,
   247                             lapack_int kl, lapack_int ku, const double* ab,
   248                             lapack_int ldab, double* r, double* c,
   249                             double* rowcnd, double* colcnd, double* amax );
   250  lapack_int LAPACKE_cgbequ( int matrix_layout, lapack_int m, lapack_int n,
   251                             lapack_int kl, lapack_int ku,
   252                             const lapack_complex_float* ab, lapack_int ldab,
   253                             float* r, float* c, float* rowcnd, float* colcnd,
   254                             float* amax );
   255  lapack_int LAPACKE_zgbequ( int matrix_layout, lapack_int m, lapack_int n,
   256                             lapack_int kl, lapack_int ku,
   257                             const lapack_complex_double* ab, lapack_int ldab,
   258                             double* r, double* c, double* rowcnd, double* colcnd,
   259                             double* amax );
   260  
   261  lapack_int LAPACKE_sgbequb( int matrix_layout, lapack_int m, lapack_int n,
   262                              lapack_int kl, lapack_int ku, const float* ab,
   263                              lapack_int ldab, float* r, float* c, float* rowcnd,
   264                              float* colcnd, float* amax );
   265  lapack_int LAPACKE_dgbequb( int matrix_layout, lapack_int m, lapack_int n,
   266                              lapack_int kl, lapack_int ku, const double* ab,
   267                              lapack_int ldab, double* r, double* c,
   268                              double* rowcnd, double* colcnd, double* amax );
   269  lapack_int LAPACKE_cgbequb( int matrix_layout, lapack_int m, lapack_int n,
   270                              lapack_int kl, lapack_int ku,
   271                              const lapack_complex_float* ab, lapack_int ldab,
   272                              float* r, float* c, float* rowcnd, float* colcnd,
   273                              float* amax );
   274  lapack_int LAPACKE_zgbequb( int matrix_layout, lapack_int m, lapack_int n,
   275                              lapack_int kl, lapack_int ku,
   276                              const lapack_complex_double* ab, lapack_int ldab,
   277                              double* r, double* c, double* rowcnd,
   278                              double* colcnd, double* amax );
   279  
   280  lapack_int LAPACKE_sgbrfs( int matrix_layout, char trans, lapack_int n,
   281                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   282                             const float* ab, lapack_int ldab, const float* afb,
   283                             lapack_int ldafb, const lapack_int* ipiv,
   284                             const float* b, lapack_int ldb, float* x,
   285                             lapack_int ldx, float* ferr, float* berr );
   286  lapack_int LAPACKE_dgbrfs( int matrix_layout, char trans, lapack_int n,
   287                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   288                             const double* ab, lapack_int ldab, const double* afb,
   289                             lapack_int ldafb, const lapack_int* ipiv,
   290                             const double* b, lapack_int ldb, double* x,
   291                             lapack_int ldx, double* ferr, double* berr );
   292  lapack_int LAPACKE_cgbrfs( int matrix_layout, char trans, lapack_int n,
   293                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   294                             const lapack_complex_float* ab, lapack_int ldab,
   295                             const lapack_complex_float* afb, lapack_int ldafb,
   296                             const lapack_int* ipiv,
   297                             const lapack_complex_float* b, lapack_int ldb,
   298                             lapack_complex_float* x, lapack_int ldx, float* ferr,
   299                             float* berr );
   300  lapack_int LAPACKE_zgbrfs( int matrix_layout, char trans, lapack_int n,
   301                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   302                             const lapack_complex_double* ab, lapack_int ldab,
   303                             const lapack_complex_double* afb, lapack_int ldafb,
   304                             const lapack_int* ipiv,
   305                             const lapack_complex_double* b, lapack_int ldb,
   306                             lapack_complex_double* x, lapack_int ldx,
   307                             double* ferr, double* berr );
   308  
   309  lapack_int LAPACKE_sgbrfsx( int matrix_layout, char trans, char equed,
   310                              lapack_int n, lapack_int kl, lapack_int ku,
   311                              lapack_int nrhs, const float* ab, lapack_int ldab,
   312                              const float* afb, lapack_int ldafb,
   313                              const lapack_int* ipiv, const float* r,
   314                              const float* c, const float* b, lapack_int ldb,
   315                              float* x, lapack_int ldx, float* rcond, float* berr,
   316                              lapack_int n_err_bnds, float* err_bnds_norm,
   317                              float* err_bnds_comp, lapack_int nparams,
   318                              float* params );
   319  lapack_int LAPACKE_dgbrfsx( int matrix_layout, char trans, char equed,
   320                              lapack_int n, lapack_int kl, lapack_int ku,
   321                              lapack_int nrhs, const double* ab, lapack_int ldab,
   322                              const double* afb, lapack_int ldafb,
   323                              const lapack_int* ipiv, const double* r,
   324                              const double* c, const double* b, lapack_int ldb,
   325                              double* x, lapack_int ldx, double* rcond,
   326                              double* berr, lapack_int n_err_bnds,
   327                              double* err_bnds_norm, double* err_bnds_comp,
   328                              lapack_int nparams, double* params );
   329  lapack_int LAPACKE_cgbrfsx( int matrix_layout, char trans, char equed,
   330                              lapack_int n, lapack_int kl, lapack_int ku,
   331                              lapack_int nrhs, const lapack_complex_float* ab,
   332                              lapack_int ldab, const lapack_complex_float* afb,
   333                              lapack_int ldafb, const lapack_int* ipiv,
   334                              const float* r, const float* c,
   335                              const lapack_complex_float* b, lapack_int ldb,
   336                              lapack_complex_float* x, lapack_int ldx,
   337                              float* rcond, float* berr, lapack_int n_err_bnds,
   338                              float* err_bnds_norm, float* err_bnds_comp,
   339                              lapack_int nparams, float* params );
   340  lapack_int LAPACKE_zgbrfsx( int matrix_layout, char trans, char equed,
   341                              lapack_int n, lapack_int kl, lapack_int ku,
   342                              lapack_int nrhs, const lapack_complex_double* ab,
   343                              lapack_int ldab, const lapack_complex_double* afb,
   344                              lapack_int ldafb, const lapack_int* ipiv,
   345                              const double* r, const double* c,
   346                              const lapack_complex_double* b, lapack_int ldb,
   347                              lapack_complex_double* x, lapack_int ldx,
   348                              double* rcond, double* berr, lapack_int n_err_bnds,
   349                              double* err_bnds_norm, double* err_bnds_comp,
   350                              lapack_int nparams, double* params );
   351  
   352  lapack_int LAPACKE_sgbsv( int matrix_layout, lapack_int n, lapack_int kl,
   353                            lapack_int ku, lapack_int nrhs, float* ab,
   354                            lapack_int ldab, lapack_int* ipiv, float* b,
   355                            lapack_int ldb );
   356  lapack_int LAPACKE_dgbsv( int matrix_layout, lapack_int n, lapack_int kl,
   357                            lapack_int ku, lapack_int nrhs, double* ab,
   358                            lapack_int ldab, lapack_int* ipiv, double* b,
   359                            lapack_int ldb );
   360  lapack_int LAPACKE_cgbsv( int matrix_layout, lapack_int n, lapack_int kl,
   361                            lapack_int ku, lapack_int nrhs,
   362                            lapack_complex_float* ab, lapack_int ldab,
   363                            lapack_int* ipiv, lapack_complex_float* b,
   364                            lapack_int ldb );
   365  lapack_int LAPACKE_zgbsv( int matrix_layout, lapack_int n, lapack_int kl,
   366                            lapack_int ku, lapack_int nrhs,
   367                            lapack_complex_double* ab, lapack_int ldab,
   368                            lapack_int* ipiv, lapack_complex_double* b,
   369                            lapack_int ldb );
   370  
   371  lapack_int LAPACKE_sgbsvx( int matrix_layout, char fact, char trans,
   372                             lapack_int n, lapack_int kl, lapack_int ku,
   373                             lapack_int nrhs, float* ab, lapack_int ldab,
   374                             float* afb, lapack_int ldafb, lapack_int* ipiv,
   375                             char* equed, float* r, float* c, float* b,
   376                             lapack_int ldb, float* x, lapack_int ldx,
   377                             float* rcond, float* ferr, float* berr,
   378                             float* rpivot );
   379  lapack_int LAPACKE_dgbsvx( int matrix_layout, char fact, char trans,
   380                             lapack_int n, lapack_int kl, lapack_int ku,
   381                             lapack_int nrhs, double* ab, lapack_int ldab,
   382                             double* afb, lapack_int ldafb, lapack_int* ipiv,
   383                             char* equed, double* r, double* c, double* b,
   384                             lapack_int ldb, double* x, lapack_int ldx,
   385                             double* rcond, double* ferr, double* berr,
   386                             double* rpivot );
   387  lapack_int LAPACKE_cgbsvx( int matrix_layout, char fact, char trans,
   388                             lapack_int n, lapack_int kl, lapack_int ku,
   389                             lapack_int nrhs, lapack_complex_float* ab,
   390                             lapack_int ldab, lapack_complex_float* afb,
   391                             lapack_int ldafb, lapack_int* ipiv, char* equed,
   392                             float* r, float* c, lapack_complex_float* b,
   393                             lapack_int ldb, lapack_complex_float* x,
   394                             lapack_int ldx, float* rcond, float* ferr,
   395                             float* berr, float* rpivot );
   396  lapack_int LAPACKE_zgbsvx( int matrix_layout, char fact, char trans,
   397                             lapack_int n, lapack_int kl, lapack_int ku,
   398                             lapack_int nrhs, lapack_complex_double* ab,
   399                             lapack_int ldab, lapack_complex_double* afb,
   400                             lapack_int ldafb, lapack_int* ipiv, char* equed,
   401                             double* r, double* c, lapack_complex_double* b,
   402                             lapack_int ldb, lapack_complex_double* x,
   403                             lapack_int ldx, double* rcond, double* ferr,
   404                             double* berr, double* rpivot );
   405  
   406  lapack_int LAPACKE_sgbsvxx( int matrix_layout, char fact, char trans,
   407                              lapack_int n, lapack_int kl, lapack_int ku,
   408                              lapack_int nrhs, float* ab, lapack_int ldab,
   409                              float* afb, lapack_int ldafb, lapack_int* ipiv,
   410                              char* equed, float* r, float* c, float* b,
   411                              lapack_int ldb, float* x, lapack_int ldx,
   412                              float* rcond, float* rpvgrw, float* berr,
   413                              lapack_int n_err_bnds, float* err_bnds_norm,
   414                              float* err_bnds_comp, lapack_int nparams,
   415                              float* params );
   416  lapack_int LAPACKE_dgbsvxx( int matrix_layout, char fact, char trans,
   417                              lapack_int n, lapack_int kl, lapack_int ku,
   418                              lapack_int nrhs, double* ab, lapack_int ldab,
   419                              double* afb, lapack_int ldafb, lapack_int* ipiv,
   420                              char* equed, double* r, double* c, double* b,
   421                              lapack_int ldb, double* x, lapack_int ldx,
   422                              double* rcond, double* rpvgrw, double* berr,
   423                              lapack_int n_err_bnds, double* err_bnds_norm,
   424                              double* err_bnds_comp, lapack_int nparams,
   425                              double* params );
   426  lapack_int LAPACKE_cgbsvxx( int matrix_layout, char fact, char trans,
   427                              lapack_int n, lapack_int kl, lapack_int ku,
   428                              lapack_int nrhs, lapack_complex_float* ab,
   429                              lapack_int ldab, lapack_complex_float* afb,
   430                              lapack_int ldafb, lapack_int* ipiv, char* equed,
   431                              float* r, float* c, lapack_complex_float* b,
   432                              lapack_int ldb, lapack_complex_float* x,
   433                              lapack_int ldx, float* rcond, float* rpvgrw,
   434                              float* berr, lapack_int n_err_bnds,
   435                              float* err_bnds_norm, float* err_bnds_comp,
   436                              lapack_int nparams, float* params );
   437  lapack_int LAPACKE_zgbsvxx( int matrix_layout, char fact, char trans,
   438                              lapack_int n, lapack_int kl, lapack_int ku,
   439                              lapack_int nrhs, lapack_complex_double* ab,
   440                              lapack_int ldab, lapack_complex_double* afb,
   441                              lapack_int ldafb, lapack_int* ipiv, char* equed,
   442                              double* r, double* c, lapack_complex_double* b,
   443                              lapack_int ldb, lapack_complex_double* x,
   444                              lapack_int ldx, double* rcond, double* rpvgrw,
   445                              double* berr, lapack_int n_err_bnds,
   446                              double* err_bnds_norm, double* err_bnds_comp,
   447                              lapack_int nparams, double* params );
   448  
   449  lapack_int LAPACKE_sgbtrf( int matrix_layout, lapack_int m, lapack_int n,
   450                             lapack_int kl, lapack_int ku, float* ab,
   451                             lapack_int ldab, lapack_int* ipiv );
   452  lapack_int LAPACKE_dgbtrf( int matrix_layout, lapack_int m, lapack_int n,
   453                             lapack_int kl, lapack_int ku, double* ab,
   454                             lapack_int ldab, lapack_int* ipiv );
   455  lapack_int LAPACKE_cgbtrf( int matrix_layout, lapack_int m, lapack_int n,
   456                             lapack_int kl, lapack_int ku,
   457                             lapack_complex_float* ab, lapack_int ldab,
   458                             lapack_int* ipiv );
   459  lapack_int LAPACKE_zgbtrf( int matrix_layout, lapack_int m, lapack_int n,
   460                             lapack_int kl, lapack_int ku,
   461                             lapack_complex_double* ab, lapack_int ldab,
   462                             lapack_int* ipiv );
   463  
   464  lapack_int LAPACKE_sgbtrs( int matrix_layout, char trans, lapack_int n,
   465                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   466                             const float* ab, lapack_int ldab,
   467                             const lapack_int* ipiv, float* b, lapack_int ldb );
   468  lapack_int LAPACKE_dgbtrs( int matrix_layout, char trans, lapack_int n,
   469                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   470                             const double* ab, lapack_int ldab,
   471                             const lapack_int* ipiv, double* b, lapack_int ldb );
   472  lapack_int LAPACKE_cgbtrs( int matrix_layout, char trans, lapack_int n,
   473                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   474                             const lapack_complex_float* ab, lapack_int ldab,
   475                             const lapack_int* ipiv, lapack_complex_float* b,
   476                             lapack_int ldb );
   477  lapack_int LAPACKE_zgbtrs( int matrix_layout, char trans, lapack_int n,
   478                             lapack_int kl, lapack_int ku, lapack_int nrhs,
   479                             const lapack_complex_double* ab, lapack_int ldab,
   480                             const lapack_int* ipiv, lapack_complex_double* b,
   481                             lapack_int ldb );
   482  
   483  lapack_int LAPACKE_sgebak( int matrix_layout, char job, char side, lapack_int n,
   484                             lapack_int ilo, lapack_int ihi, const float* scale,
   485                             lapack_int m, float* v, lapack_int ldv );
   486  lapack_int LAPACKE_dgebak( int matrix_layout, char job, char side, lapack_int n,
   487                             lapack_int ilo, lapack_int ihi, const double* scale,
   488                             lapack_int m, double* v, lapack_int ldv );
   489  lapack_int LAPACKE_cgebak( int matrix_layout, char job, char side, lapack_int n,
   490                             lapack_int ilo, lapack_int ihi, const float* scale,
   491                             lapack_int m, lapack_complex_float* v,
   492                             lapack_int ldv );
   493  lapack_int LAPACKE_zgebak( int matrix_layout, char job, char side, lapack_int n,
   494                             lapack_int ilo, lapack_int ihi, const double* scale,
   495                             lapack_int m, lapack_complex_double* v,
   496                             lapack_int ldv );
   497  
   498  lapack_int LAPACKE_sgebal( int matrix_layout, char job, lapack_int n, float* a,
   499                             lapack_int lda, lapack_int* ilo, lapack_int* ihi,
   500                             float* scale );
   501  lapack_int LAPACKE_dgebal( int matrix_layout, char job, lapack_int n, double* a,
   502                             lapack_int lda, lapack_int* ilo, lapack_int* ihi,
   503                             double* scale );
   504  lapack_int LAPACKE_cgebal( int matrix_layout, char job, lapack_int n,
   505                             lapack_complex_float* a, lapack_int lda,
   506                             lapack_int* ilo, lapack_int* ihi, float* scale );
   507  lapack_int LAPACKE_zgebal( int matrix_layout, char job, lapack_int n,
   508                             lapack_complex_double* a, lapack_int lda,
   509                             lapack_int* ilo, lapack_int* ihi, double* scale );
   510  
   511  lapack_int LAPACKE_sgebrd( int matrix_layout, lapack_int m, lapack_int n,
   512                             float* a, lapack_int lda, float* d, float* e,
   513                             float* tauq, float* taup );
   514  lapack_int LAPACKE_dgebrd( int matrix_layout, lapack_int m, lapack_int n,
   515                             double* a, lapack_int lda, double* d, double* e,
   516                             double* tauq, double* taup );
   517  lapack_int LAPACKE_cgebrd( int matrix_layout, lapack_int m, lapack_int n,
   518                             lapack_complex_float* a, lapack_int lda, float* d,
   519                             float* e, lapack_complex_float* tauq,
   520                             lapack_complex_float* taup );
   521  lapack_int LAPACKE_zgebrd( int matrix_layout, lapack_int m, lapack_int n,
   522                             lapack_complex_double* a, lapack_int lda, double* d,
   523                             double* e, lapack_complex_double* tauq,
   524                             lapack_complex_double* taup );
   525  
   526  lapack_int LAPACKE_sgecon( int matrix_layout, char norm, lapack_int n,
   527                             const float* a, lapack_int lda, float anorm,
   528                             float* rcond );
   529  lapack_int LAPACKE_dgecon( int matrix_layout, char norm, lapack_int n,
   530                             const double* a, lapack_int lda, double anorm,
   531                             double* rcond );
   532  lapack_int LAPACKE_cgecon( int matrix_layout, char norm, lapack_int n,
   533                             const lapack_complex_float* a, lapack_int lda,
   534                             float anorm, float* rcond );
   535  lapack_int LAPACKE_zgecon( int matrix_layout, char norm, lapack_int n,
   536                             const lapack_complex_double* a, lapack_int lda,
   537                             double anorm, double* rcond );
   538  
   539  lapack_int LAPACKE_sgeequ( int matrix_layout, lapack_int m, lapack_int n,
   540                             const float* a, lapack_int lda, float* r, float* c,
   541                             float* rowcnd, float* colcnd, float* amax );
   542  lapack_int LAPACKE_dgeequ( int matrix_layout, lapack_int m, lapack_int n,
   543                             const double* a, lapack_int lda, double* r,
   544                             double* c, double* rowcnd, double* colcnd,
   545                             double* amax );
   546  lapack_int LAPACKE_cgeequ( int matrix_layout, lapack_int m, lapack_int n,
   547                             const lapack_complex_float* a, lapack_int lda,
   548                             float* r, float* c, float* rowcnd, float* colcnd,
   549                             float* amax );
   550  lapack_int LAPACKE_zgeequ( int matrix_layout, lapack_int m, lapack_int n,
   551                             const lapack_complex_double* a, lapack_int lda,
   552                             double* r, double* c, double* rowcnd, double* colcnd,
   553                             double* amax );
   554  
   555  lapack_int LAPACKE_sgeequb( int matrix_layout, lapack_int m, lapack_int n,
   556                              const float* a, lapack_int lda, float* r, float* c,
   557                              float* rowcnd, float* colcnd, float* amax );
   558  lapack_int LAPACKE_dgeequb( int matrix_layout, lapack_int m, lapack_int n,
   559                              const double* a, lapack_int lda, double* r,
   560                              double* c, double* rowcnd, double* colcnd,
   561                              double* amax );
   562  lapack_int LAPACKE_cgeequb( int matrix_layout, lapack_int m, lapack_int n,
   563                              const lapack_complex_float* a, lapack_int lda,
   564                              float* r, float* c, float* rowcnd, float* colcnd,
   565                              float* amax );
   566  lapack_int LAPACKE_zgeequb( int matrix_layout, lapack_int m, lapack_int n,
   567                              const lapack_complex_double* a, lapack_int lda,
   568                              double* r, double* c, double* rowcnd,
   569                              double* colcnd, double* amax );
   570  
   571  lapack_int LAPACKE_sgees( int matrix_layout, char jobvs, char sort,
   572                            LAPACK_S_SELECT2 select, lapack_int n, float* a,
   573                            lapack_int lda, lapack_int* sdim, float* wr,
   574                            float* wi, float* vs, lapack_int ldvs );
   575  lapack_int LAPACKE_dgees( int matrix_layout, char jobvs, char sort,
   576                            LAPACK_D_SELECT2 select, lapack_int n, double* a,
   577                            lapack_int lda, lapack_int* sdim, double* wr,
   578                            double* wi, double* vs, lapack_int ldvs );
   579  lapack_int LAPACKE_cgees( int matrix_layout, char jobvs, char sort,
   580                            LAPACK_C_SELECT1 select, lapack_int n,
   581                            lapack_complex_float* a, lapack_int lda,
   582                            lapack_int* sdim, lapack_complex_float* w,
   583                            lapack_complex_float* vs, lapack_int ldvs );
   584  lapack_int LAPACKE_zgees( int matrix_layout, char jobvs, char sort,
   585                            LAPACK_Z_SELECT1 select, lapack_int n,
   586                            lapack_complex_double* a, lapack_int lda,
   587                            lapack_int* sdim, lapack_complex_double* w,
   588                            lapack_complex_double* vs, lapack_int ldvs );
   589  
   590  lapack_int LAPACKE_sgeesx( int matrix_layout, char jobvs, char sort,
   591                             LAPACK_S_SELECT2 select, char sense, lapack_int n,
   592                             float* a, lapack_int lda, lapack_int* sdim,
   593                             float* wr, float* wi, float* vs, lapack_int ldvs,
   594                             float* rconde, float* rcondv );
   595  lapack_int LAPACKE_dgeesx( int matrix_layout, char jobvs, char sort,
   596                             LAPACK_D_SELECT2 select, char sense, lapack_int n,
   597                             double* a, lapack_int lda, lapack_int* sdim,
   598                             double* wr, double* wi, double* vs, lapack_int ldvs,
   599                             double* rconde, double* rcondv );
   600  lapack_int LAPACKE_cgeesx( int matrix_layout, char jobvs, char sort,
   601                             LAPACK_C_SELECT1 select, char sense, lapack_int n,
   602                             lapack_complex_float* a, lapack_int lda,
   603                             lapack_int* sdim, lapack_complex_float* w,
   604                             lapack_complex_float* vs, lapack_int ldvs,
   605                             float* rconde, float* rcondv );
   606  lapack_int LAPACKE_zgeesx( int matrix_layout, char jobvs, char sort,
   607                             LAPACK_Z_SELECT1 select, char sense, lapack_int n,
   608                             lapack_complex_double* a, lapack_int lda,
   609                             lapack_int* sdim, lapack_complex_double* w,
   610                             lapack_complex_double* vs, lapack_int ldvs,
   611                             double* rconde, double* rcondv );
   612  
   613  lapack_int LAPACKE_sgeev( int matrix_layout, char jobvl, char jobvr,
   614                            lapack_int n, float* a, lapack_int lda, float* wr,
   615                            float* wi, float* vl, lapack_int ldvl, float* vr,
   616                            lapack_int ldvr );
   617  lapack_int LAPACKE_dgeev( int matrix_layout, char jobvl, char jobvr,
   618                            lapack_int n, double* a, lapack_int lda, double* wr,
   619                            double* wi, double* vl, lapack_int ldvl, double* vr,
   620                            lapack_int ldvr );
   621  lapack_int LAPACKE_cgeev( int matrix_layout, char jobvl, char jobvr,
   622                            lapack_int n, lapack_complex_float* a, lapack_int lda,
   623                            lapack_complex_float* w, lapack_complex_float* vl,
   624                            lapack_int ldvl, lapack_complex_float* vr,
   625                            lapack_int ldvr );
   626  lapack_int LAPACKE_zgeev( int matrix_layout, char jobvl, char jobvr,
   627                            lapack_int n, lapack_complex_double* a,
   628                            lapack_int lda, lapack_complex_double* w,
   629                            lapack_complex_double* vl, lapack_int ldvl,
   630                            lapack_complex_double* vr, lapack_int ldvr );
   631  
   632  lapack_int LAPACKE_sgeevx( int matrix_layout, char balanc, char jobvl,
   633                             char jobvr, char sense, lapack_int n, float* a,
   634                             lapack_int lda, float* wr, float* wi, float* vl,
   635                             lapack_int ldvl, float* vr, lapack_int ldvr,
   636                             lapack_int* ilo, lapack_int* ihi, float* scale,
   637                             float* abnrm, float* rconde, float* rcondv );
   638  lapack_int LAPACKE_dgeevx( int matrix_layout, char balanc, char jobvl,
   639                             char jobvr, char sense, lapack_int n, double* a,
   640                             lapack_int lda, double* wr, double* wi, double* vl,
   641                             lapack_int ldvl, double* vr, lapack_int ldvr,
   642                             lapack_int* ilo, lapack_int* ihi, double* scale,
   643                             double* abnrm, double* rconde, double* rcondv );
   644  lapack_int LAPACKE_cgeevx( int matrix_layout, char balanc, char jobvl,
   645                             char jobvr, char sense, lapack_int n,
   646                             lapack_complex_float* a, lapack_int lda,
   647                             lapack_complex_float* w, lapack_complex_float* vl,
   648                             lapack_int ldvl, lapack_complex_float* vr,
   649                             lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
   650                             float* scale, float* abnrm, float* rconde,
   651                             float* rcondv );
   652  lapack_int LAPACKE_zgeevx( int matrix_layout, char balanc, char jobvl,
   653                             char jobvr, char sense, lapack_int n,
   654                             lapack_complex_double* a, lapack_int lda,
   655                             lapack_complex_double* w, lapack_complex_double* vl,
   656                             lapack_int ldvl, lapack_complex_double* vr,
   657                             lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
   658                             double* scale, double* abnrm, double* rconde,
   659                             double* rcondv );
   660  
   661  lapack_int LAPACKE_sgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
   662                             lapack_int ihi, float* a, lapack_int lda,
   663                             float* tau );
   664  lapack_int LAPACKE_dgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
   665                             lapack_int ihi, double* a, lapack_int lda,
   666                             double* tau );
   667  lapack_int LAPACKE_cgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
   668                             lapack_int ihi, lapack_complex_float* a,
   669                             lapack_int lda, lapack_complex_float* tau );
   670  lapack_int LAPACKE_zgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
   671                             lapack_int ihi, lapack_complex_double* a,
   672                             lapack_int lda, lapack_complex_double* tau );
   673  
   674  lapack_int LAPACKE_sgejsv( int matrix_layout, char joba, char jobu, char jobv,
   675                             char jobr, char jobt, char jobp, lapack_int m,
   676                             lapack_int n, float* a, lapack_int lda, float* sva,
   677                             float* u, lapack_int ldu, float* v, lapack_int ldv,
   678                             float* stat, lapack_int* istat );
   679  lapack_int LAPACKE_dgejsv( int matrix_layout, char joba, char jobu, char jobv,
   680                             char jobr, char jobt, char jobp, lapack_int m,
   681                             lapack_int n, double* a, lapack_int lda, double* sva,
   682                             double* u, lapack_int ldu, double* v, lapack_int ldv,
   683                             double* stat, lapack_int* istat );
   684  lapack_int LAPACKE_cgejsv( int matrix_layout, char joba, char jobu, char jobv,
   685                             char jobr, char jobt, char jobp, lapack_int m,
   686                             lapack_int n, lapack_complex_float* a, lapack_int lda, float* sva,
   687                             lapack_complex_float* u, lapack_int ldu, lapack_complex_float* v, lapack_int ldv,
   688                             float* stat, lapack_int* istat );
   689  lapack_int LAPACKE_zgejsv( int matrix_layout, char joba, char jobu, char jobv,
   690                             char jobr, char jobt, char jobp, lapack_int m,
   691                             lapack_int n, lapack_complex_double* a, lapack_int lda, double* sva,
   692                             lapack_complex_double* u, lapack_int ldu, lapack_complex_double* v, lapack_int ldv,
   693                             double* stat, lapack_int* istat );
   694  
   695  lapack_int LAPACKE_sgelq2( int matrix_layout, lapack_int m, lapack_int n,
   696                             float* a, lapack_int lda, float* tau );
   697  lapack_int LAPACKE_dgelq2( int matrix_layout, lapack_int m, lapack_int n,
   698                             double* a, lapack_int lda, double* tau );
   699  lapack_int LAPACKE_cgelq2( int matrix_layout, lapack_int m, lapack_int n,
   700                             lapack_complex_float* a, lapack_int lda,
   701                             lapack_complex_float* tau );
   702  lapack_int LAPACKE_zgelq2( int matrix_layout, lapack_int m, lapack_int n,
   703                             lapack_complex_double* a, lapack_int lda,
   704                             lapack_complex_double* tau );
   705  
   706  lapack_int LAPACKE_sgelqf( int matrix_layout, lapack_int m, lapack_int n,
   707                             float* a, lapack_int lda, float* tau );
   708  lapack_int LAPACKE_dgelqf( int matrix_layout, lapack_int m, lapack_int n,
   709                             double* a, lapack_int lda, double* tau );
   710  lapack_int LAPACKE_cgelqf( int matrix_layout, lapack_int m, lapack_int n,
   711                             lapack_complex_float* a, lapack_int lda,
   712                             lapack_complex_float* tau );
   713  lapack_int LAPACKE_zgelqf( int matrix_layout, lapack_int m, lapack_int n,
   714                             lapack_complex_double* a, lapack_int lda,
   715                             lapack_complex_double* tau );
   716  
   717  lapack_int LAPACKE_sgels( int matrix_layout, char trans, lapack_int m,
   718                            lapack_int n, lapack_int nrhs, float* a,
   719                            lapack_int lda, float* b, lapack_int ldb );
   720  lapack_int LAPACKE_dgels( int matrix_layout, char trans, lapack_int m,
   721                            lapack_int n, lapack_int nrhs, double* a,
   722                            lapack_int lda, double* b, lapack_int ldb );
   723  lapack_int LAPACKE_cgels( int matrix_layout, char trans, lapack_int m,
   724                            lapack_int n, lapack_int nrhs,
   725                            lapack_complex_float* a, lapack_int lda,
   726                            lapack_complex_float* b, lapack_int ldb );
   727  lapack_int LAPACKE_zgels( int matrix_layout, char trans, lapack_int m,
   728                            lapack_int n, lapack_int nrhs,
   729                            lapack_complex_double* a, lapack_int lda,
   730                            lapack_complex_double* b, lapack_int ldb );
   731  
   732  lapack_int LAPACKE_sgelsd( int matrix_layout, 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_dgelsd( int matrix_layout, 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_cgelsd( int matrix_layout, 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_zgelsd( int matrix_layout, 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_sgelss( int matrix_layout, lapack_int m, lapack_int n,
   752                             lapack_int nrhs, float* a, lapack_int lda, float* b,
   753                             lapack_int ldb, float* s, float rcond,
   754                             lapack_int* rank );
   755  lapack_int LAPACKE_dgelss( int matrix_layout, lapack_int m, lapack_int n,
   756                             lapack_int nrhs, double* a, lapack_int lda,
   757                             double* b, lapack_int ldb, double* s, double rcond,
   758                             lapack_int* rank );
   759  lapack_int LAPACKE_cgelss( int matrix_layout, 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, float* s, float rcond,
   763                             lapack_int* rank );
   764  lapack_int LAPACKE_zgelss( int matrix_layout, 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, double* s, double rcond,
   768                             lapack_int* rank );
   769  
   770  lapack_int LAPACKE_sgelsy( int matrix_layout, lapack_int m, lapack_int n,
   771                             lapack_int nrhs, float* a, lapack_int lda, float* b,
   772                             lapack_int ldb, lapack_int* jpvt, float rcond,
   773                             lapack_int* rank );
   774  lapack_int LAPACKE_dgelsy( int matrix_layout, lapack_int m, lapack_int n,
   775                             lapack_int nrhs, double* a, lapack_int lda,
   776                             double* b, lapack_int ldb, lapack_int* jpvt,
   777                             double rcond, lapack_int* rank );
   778  lapack_int LAPACKE_cgelsy( int matrix_layout, lapack_int m, lapack_int n,
   779                             lapack_int nrhs, lapack_complex_float* a,
   780                             lapack_int lda, lapack_complex_float* b,
   781                             lapack_int ldb, lapack_int* jpvt, float rcond,
   782                             lapack_int* rank );
   783  lapack_int LAPACKE_zgelsy( int matrix_layout, lapack_int m, lapack_int n,
   784                             lapack_int nrhs, lapack_complex_double* a,
   785                             lapack_int lda, lapack_complex_double* b,
   786                             lapack_int ldb, lapack_int* jpvt, double rcond,
   787                             lapack_int* rank );
   788  
   789  lapack_int LAPACKE_sgeqlf( int matrix_layout, lapack_int m, lapack_int n,
   790                             float* a, lapack_int lda, float* tau );
   791  lapack_int LAPACKE_dgeqlf( int matrix_layout, lapack_int m, lapack_int n,
   792                             double* a, lapack_int lda, double* tau );
   793  lapack_int LAPACKE_cgeqlf( int matrix_layout, lapack_int m, lapack_int n,
   794                             lapack_complex_float* a, lapack_int lda,
   795                             lapack_complex_float* tau );
   796  lapack_int LAPACKE_zgeqlf( int matrix_layout, lapack_int m, lapack_int n,
   797                             lapack_complex_double* a, lapack_int lda,
   798                             lapack_complex_double* tau );
   799  
   800  lapack_int LAPACKE_sgeqp3( int matrix_layout, lapack_int m, lapack_int n,
   801                             float* a, lapack_int lda, lapack_int* jpvt,
   802                             float* tau );
   803  lapack_int LAPACKE_dgeqp3( int matrix_layout, lapack_int m, lapack_int n,
   804                             double* a, lapack_int lda, lapack_int* jpvt,
   805                             double* tau );
   806  lapack_int LAPACKE_cgeqp3( int matrix_layout, lapack_int m, lapack_int n,
   807                             lapack_complex_float* a, lapack_int lda,
   808                             lapack_int* jpvt, lapack_complex_float* tau );
   809  lapack_int LAPACKE_zgeqp3( int matrix_layout, lapack_int m, lapack_int n,
   810                             lapack_complex_double* a, lapack_int lda,
   811                             lapack_int* jpvt, lapack_complex_double* tau );
   812  
   813  lapack_int LAPACKE_sgeqpf( int matrix_layout, lapack_int m, lapack_int n,
   814                             float* a, lapack_int lda, lapack_int* jpvt,
   815                             float* tau );
   816  lapack_int LAPACKE_dgeqpf( int matrix_layout, lapack_int m, lapack_int n,
   817                             double* a, lapack_int lda, lapack_int* jpvt,
   818                             double* tau );
   819  lapack_int LAPACKE_cgeqpf( int matrix_layout, lapack_int m, lapack_int n,
   820                             lapack_complex_float* a, lapack_int lda,
   821                             lapack_int* jpvt, lapack_complex_float* tau );
   822  lapack_int LAPACKE_zgeqpf( int matrix_layout, lapack_int m, lapack_int n,
   823                             lapack_complex_double* a, lapack_int lda,
   824                             lapack_int* jpvt, lapack_complex_double* tau );
   825  
   826  lapack_int LAPACKE_sgeqr2( int matrix_layout, lapack_int m, lapack_int n,
   827                             float* a, lapack_int lda, float* tau );
   828  lapack_int LAPACKE_dgeqr2( int matrix_layout, lapack_int m, lapack_int n,
   829                             double* a, lapack_int lda, double* tau );
   830  lapack_int LAPACKE_cgeqr2( int matrix_layout, lapack_int m, lapack_int n,
   831                             lapack_complex_float* a, lapack_int lda,
   832                             lapack_complex_float* tau );
   833  lapack_int LAPACKE_zgeqr2( int matrix_layout, lapack_int m, lapack_int n,
   834                             lapack_complex_double* a, lapack_int lda,
   835                             lapack_complex_double* tau );
   836  
   837  lapack_int LAPACKE_sgeqrf( int matrix_layout, lapack_int m, lapack_int n,
   838                             float* a, lapack_int lda, float* tau );
   839  lapack_int LAPACKE_dgeqrf( int matrix_layout, lapack_int m, lapack_int n,
   840                             double* a, lapack_int lda, double* tau );
   841  lapack_int LAPACKE_cgeqrf( int matrix_layout, lapack_int m, lapack_int n,
   842                             lapack_complex_float* a, lapack_int lda,
   843                             lapack_complex_float* tau );
   844  lapack_int LAPACKE_zgeqrf( int matrix_layout, lapack_int m, lapack_int n,
   845                             lapack_complex_double* a, lapack_int lda,
   846                             lapack_complex_double* tau );
   847  
   848  lapack_int LAPACKE_sgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
   849                              float* a, lapack_int lda, float* tau );
   850  lapack_int LAPACKE_dgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
   851                              double* a, lapack_int lda, double* tau );
   852  lapack_int LAPACKE_cgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
   853                              lapack_complex_float* a, lapack_int lda,
   854                              lapack_complex_float* tau );
   855  lapack_int LAPACKE_zgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
   856                              lapack_complex_double* a, lapack_int lda,
   857                              lapack_complex_double* tau );
   858  
   859  lapack_int LAPACKE_sgerfs( int matrix_layout, char trans, lapack_int n,
   860                             lapack_int nrhs, const float* a, lapack_int lda,
   861                             const float* af, lapack_int ldaf,
   862                             const lapack_int* ipiv, const float* b,
   863                             lapack_int ldb, float* x, lapack_int ldx,
   864                             float* ferr, float* berr );
   865  lapack_int LAPACKE_dgerfs( int matrix_layout, char trans, lapack_int n,
   866                             lapack_int nrhs, const double* a, lapack_int lda,
   867                             const double* af, lapack_int ldaf,
   868                             const lapack_int* ipiv, const double* b,
   869                             lapack_int ldb, double* x, lapack_int ldx,
   870                             double* ferr, double* berr );
   871  lapack_int LAPACKE_cgerfs( int matrix_layout, char trans, lapack_int n,
   872                             lapack_int nrhs, const lapack_complex_float* a,
   873                             lapack_int lda, const lapack_complex_float* af,
   874                             lapack_int ldaf, const lapack_int* ipiv,
   875                             const lapack_complex_float* b, lapack_int ldb,
   876                             lapack_complex_float* x, lapack_int ldx, float* ferr,
   877                             float* berr );
   878  lapack_int LAPACKE_zgerfs( int matrix_layout, char trans, lapack_int n,
   879                             lapack_int nrhs, const lapack_complex_double* a,
   880                             lapack_int lda, const lapack_complex_double* af,
   881                             lapack_int ldaf, const lapack_int* ipiv,
   882                             const lapack_complex_double* b, lapack_int ldb,
   883                             lapack_complex_double* x, lapack_int ldx,
   884                             double* ferr, double* berr );
   885  
   886  lapack_int LAPACKE_sgerfsx( int matrix_layout, char trans, char equed,
   887                              lapack_int n, lapack_int nrhs, const float* a,
   888                              lapack_int lda, const float* af, lapack_int ldaf,
   889                              const lapack_int* ipiv, const float* r,
   890                              const float* c, const float* b, lapack_int ldb,
   891                              float* x, lapack_int ldx, float* rcond, float* berr,
   892                              lapack_int n_err_bnds, float* err_bnds_norm,
   893                              float* err_bnds_comp, lapack_int nparams,
   894                              float* params );
   895  lapack_int LAPACKE_dgerfsx( int matrix_layout, char trans, char equed,
   896                              lapack_int n, lapack_int nrhs, const double* a,
   897                              lapack_int lda, const double* af, lapack_int ldaf,
   898                              const lapack_int* ipiv, const double* r,
   899                              const double* c, const double* b, lapack_int ldb,
   900                              double* x, lapack_int ldx, double* rcond,
   901                              double* berr, lapack_int n_err_bnds,
   902                              double* err_bnds_norm, double* err_bnds_comp,
   903                              lapack_int nparams, double* params );
   904  lapack_int LAPACKE_cgerfsx( int matrix_layout, char trans, char equed,
   905                              lapack_int n, lapack_int nrhs,
   906                              const lapack_complex_float* a, lapack_int lda,
   907                              const lapack_complex_float* af, lapack_int ldaf,
   908                              const lapack_int* ipiv, const float* r,
   909                              const float* c, const lapack_complex_float* b,
   910                              lapack_int ldb, lapack_complex_float* x,
   911                              lapack_int ldx, float* rcond, float* berr,
   912                              lapack_int n_err_bnds, float* err_bnds_norm,
   913                              float* err_bnds_comp, lapack_int nparams,
   914                              float* params );
   915  lapack_int LAPACKE_zgerfsx( int matrix_layout, char trans, char equed,
   916                              lapack_int n, lapack_int nrhs,
   917                              const lapack_complex_double* a, lapack_int lda,
   918                              const lapack_complex_double* af, lapack_int ldaf,
   919                              const lapack_int* ipiv, const double* r,
   920                              const double* c, const lapack_complex_double* b,
   921                              lapack_int ldb, lapack_complex_double* x,
   922                              lapack_int ldx, double* rcond, double* berr,
   923                              lapack_int n_err_bnds, double* err_bnds_norm,
   924                              double* err_bnds_comp, lapack_int nparams,
   925                              double* params );
   926  
   927  lapack_int LAPACKE_sgerqf( int matrix_layout, lapack_int m, lapack_int n,
   928                             float* a, lapack_int lda, float* tau );
   929  lapack_int LAPACKE_dgerqf( int matrix_layout, lapack_int m, lapack_int n,
   930                             double* a, lapack_int lda, double* tau );
   931  lapack_int LAPACKE_cgerqf( int matrix_layout, lapack_int m, lapack_int n,
   932                             lapack_complex_float* a, lapack_int lda,
   933                             lapack_complex_float* tau );
   934  lapack_int LAPACKE_zgerqf( int matrix_layout, lapack_int m, lapack_int n,
   935                             lapack_complex_double* a, lapack_int lda,
   936                             lapack_complex_double* tau );
   937  
   938  lapack_int LAPACKE_sgesdd( int matrix_layout, char jobz, lapack_int m,
   939                             lapack_int n, float* a, lapack_int lda, float* s,
   940                             float* u, lapack_int ldu, float* vt,
   941                             lapack_int ldvt );
   942  lapack_int LAPACKE_dgesdd( int matrix_layout, char jobz, lapack_int m,
   943                             lapack_int n, double* a, lapack_int lda, double* s,
   944                             double* u, lapack_int ldu, double* vt,
   945                             lapack_int ldvt );
   946  lapack_int LAPACKE_cgesdd( int matrix_layout, char jobz, lapack_int m,
   947                             lapack_int n, lapack_complex_float* a,
   948                             lapack_int lda, float* s, lapack_complex_float* u,
   949                             lapack_int ldu, lapack_complex_float* vt,
   950                             lapack_int ldvt );
   951  lapack_int LAPACKE_zgesdd( int matrix_layout, char jobz, lapack_int m,
   952                             lapack_int n, lapack_complex_double* a,
   953                             lapack_int lda, double* s, lapack_complex_double* u,
   954                             lapack_int ldu, lapack_complex_double* vt,
   955                             lapack_int ldvt );
   956  
   957  lapack_int LAPACKE_sgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   958                            float* a, lapack_int lda, lapack_int* ipiv, float* b,
   959                            lapack_int ldb );
   960  lapack_int LAPACKE_dgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   961                            double* a, lapack_int lda, lapack_int* ipiv,
   962                            double* b, lapack_int ldb );
   963  lapack_int LAPACKE_cgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   964                            lapack_complex_float* a, lapack_int lda,
   965                            lapack_int* ipiv, lapack_complex_float* b,
   966                            lapack_int ldb );
   967  lapack_int LAPACKE_zgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   968                            lapack_complex_double* a, lapack_int lda,
   969                            lapack_int* ipiv, lapack_complex_double* b,
   970                            lapack_int ldb );
   971  lapack_int LAPACKE_dsgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   972                             double* a, lapack_int lda, lapack_int* ipiv,
   973                             double* b, lapack_int ldb, double* x, lapack_int ldx,
   974                             lapack_int* iter );
   975  lapack_int LAPACKE_zcgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
   976                             lapack_complex_double* a, lapack_int lda,
   977                             lapack_int* ipiv, lapack_complex_double* b,
   978                             lapack_int ldb, lapack_complex_double* x,
   979                             lapack_int ldx, lapack_int* iter );
   980  
   981  lapack_int LAPACKE_sgesvd( int matrix_layout, char jobu, char jobvt,
   982                             lapack_int m, lapack_int n, float* a, lapack_int lda,
   983                             float* s, float* u, lapack_int ldu, float* vt,
   984                             lapack_int ldvt, float* superb );
   985  lapack_int LAPACKE_dgesvd( int matrix_layout, char jobu, char jobvt,
   986                             lapack_int m, lapack_int n, double* a,
   987                             lapack_int lda, double* s, double* u, lapack_int ldu,
   988                             double* vt, lapack_int ldvt, double* superb );
   989  lapack_int LAPACKE_cgesvd( int matrix_layout, char jobu, char jobvt,
   990                             lapack_int m, lapack_int n, lapack_complex_float* a,
   991                             lapack_int lda, float* s, lapack_complex_float* u,
   992                             lapack_int ldu, lapack_complex_float* vt,
   993                             lapack_int ldvt, float* superb );
   994  lapack_int LAPACKE_zgesvd( int matrix_layout, char jobu, char jobvt,
   995                             lapack_int m, lapack_int n, lapack_complex_double* a,
   996                             lapack_int lda, double* s, lapack_complex_double* u,
   997                             lapack_int ldu, lapack_complex_double* vt,
   998                             lapack_int ldvt, double* superb );
   999  
  1000  lapack_int LAPACKE_sgesvdx( int matrix_layout, char jobu, char jobvt, char range,
  1001                             lapack_int m, lapack_int n, float* a,
  1002                             lapack_int lda, lapack_int vl, lapack_int vu,
  1003                             lapack_int il, lapack_int iu, lapack_int ns,
  1004                             float* s, float* u, lapack_int ldu,
  1005                             float* vt, lapack_int ldvt,
  1006                             lapack_int* superb );
  1007  lapack_int LAPACKE_dgesvdx( int matrix_layout, char jobu, char jobvt, char range,
  1008                             lapack_int m, lapack_int n, double* a,
  1009                             lapack_int lda, lapack_int vl, lapack_int vu,
  1010                             lapack_int il, lapack_int iu, lapack_int ns,
  1011                             double* s, double* u, lapack_int ldu,
  1012                             double* vt, lapack_int ldvt,
  1013                             lapack_int* superb );
  1014  lapack_int LAPACKE_cgesvdx( int matrix_layout, char jobu, char jobvt, char range,
  1015                             lapack_int m, lapack_int n, lapack_complex_float* a,
  1016                             lapack_int lda, lapack_int vl, lapack_int vu,
  1017                             lapack_int il, lapack_int iu, lapack_int ns,
  1018                             float* s, lapack_complex_float* u, lapack_int ldu,
  1019                             lapack_complex_float* vt, lapack_int ldvt,
  1020                             lapack_int* superb );
  1021  lapack_int LAPACKE_zgesvdx( int matrix_layout, char jobu, char jobvt, char range,
  1022                             lapack_int m, lapack_int n, lapack_complex_double* a,
  1023                             lapack_int lda, lapack_int vl, lapack_int vu,
  1024                             lapack_int il, lapack_int iu, lapack_int ns,
  1025                             double* s, lapack_complex_double* u, lapack_int ldu,
  1026                             lapack_complex_double* vt, lapack_int ldvt,
  1027                             lapack_int* superb );
  1028  
  1029  lapack_int LAPACKE_sgesvj( int matrix_layout, char joba, char jobu, char jobv,
  1030                             lapack_int m, lapack_int n, float* a, lapack_int lda,
  1031                             float* sva, lapack_int mv, float* v, lapack_int ldv,
  1032                             float* stat );
  1033  lapack_int LAPACKE_dgesvj( int matrix_layout, char joba, char jobu, char jobv,
  1034                             lapack_int m, lapack_int n, double* a,
  1035                             lapack_int lda, double* sva, lapack_int mv,
  1036                             double* v, lapack_int ldv, double* stat );
  1037  lapack_int LAPACKE_cgesvj( int matrix_layout, char joba, char jobu, char jobv,
  1038                             lapack_int m, lapack_int n, lapack_complex_float* a,
  1039                             lapack_int lda, float* sva, lapack_int mv,
  1040                             lapack_complex_float* v, lapack_int ldv, float* stat );
  1041  lapack_int LAPACKE_zgesvj( int matrix_layout, char joba, char jobu, char jobv,
  1042                             lapack_int m, lapack_int n, lapack_complex_double* a,
  1043                             lapack_int lda, double* sva, lapack_int mv,
  1044                             lapack_complex_double* v, lapack_int ldv, double* stat );
  1045  
  1046  lapack_int LAPACKE_sgesvx( int matrix_layout, char fact, char trans,
  1047                             lapack_int n, lapack_int nrhs, float* a,
  1048                             lapack_int lda, float* af, lapack_int ldaf,
  1049                             lapack_int* ipiv, char* equed, float* r, float* c,
  1050                             float* b, lapack_int ldb, float* x, lapack_int ldx,
  1051                             float* rcond, float* ferr, float* berr,
  1052                             float* rpivot );
  1053  lapack_int LAPACKE_dgesvx( int matrix_layout, char fact, char trans,
  1054                             lapack_int n, lapack_int nrhs, double* a,
  1055                             lapack_int lda, double* af, lapack_int ldaf,
  1056                             lapack_int* ipiv, char* equed, double* r, double* c,
  1057                             double* b, lapack_int ldb, double* x, lapack_int ldx,
  1058                             double* rcond, double* ferr, double* berr,
  1059                             double* rpivot );
  1060  lapack_int LAPACKE_cgesvx( int matrix_layout, char fact, char trans,
  1061                             lapack_int n, lapack_int nrhs,
  1062                             lapack_complex_float* a, lapack_int lda,
  1063                             lapack_complex_float* af, lapack_int ldaf,
  1064                             lapack_int* ipiv, char* equed, float* r, float* c,
  1065                             lapack_complex_float* b, lapack_int ldb,
  1066                             lapack_complex_float* x, lapack_int ldx,
  1067                             float* rcond, float* ferr, float* berr,
  1068                             float* rpivot );
  1069  lapack_int LAPACKE_zgesvx( int matrix_layout, char fact, char trans,
  1070                             lapack_int n, lapack_int nrhs,
  1071                             lapack_complex_double* a, lapack_int lda,
  1072                             lapack_complex_double* af, lapack_int ldaf,
  1073                             lapack_int* ipiv, char* equed, double* r, double* c,
  1074                             lapack_complex_double* b, lapack_int ldb,
  1075                             lapack_complex_double* x, lapack_int ldx,
  1076                             double* rcond, double* ferr, double* berr,
  1077                             double* rpivot );
  1078  
  1079  lapack_int LAPACKE_sgesvxx( int matrix_layout, char fact, char trans,
  1080                              lapack_int n, lapack_int nrhs, float* a,
  1081                              lapack_int lda, float* af, lapack_int ldaf,
  1082                              lapack_int* ipiv, char* equed, float* r, float* c,
  1083                              float* b, lapack_int ldb, float* x, lapack_int ldx,
  1084                              float* rcond, float* rpvgrw, float* berr,
  1085                              lapack_int n_err_bnds, float* err_bnds_norm,
  1086                              float* err_bnds_comp, lapack_int nparams,
  1087                              float* params );
  1088  lapack_int LAPACKE_dgesvxx( int matrix_layout, char fact, char trans,
  1089                              lapack_int n, lapack_int nrhs, double* a,
  1090                              lapack_int lda, double* af, lapack_int ldaf,
  1091                              lapack_int* ipiv, char* equed, double* r, double* c,
  1092                              double* b, lapack_int ldb, double* x,
  1093                              lapack_int ldx, double* rcond, double* rpvgrw,
  1094                              double* berr, lapack_int n_err_bnds,
  1095                              double* err_bnds_norm, double* err_bnds_comp,
  1096                              lapack_int nparams, double* params );
  1097  lapack_int LAPACKE_cgesvxx( int matrix_layout, char fact, char trans,
  1098                              lapack_int n, lapack_int nrhs,
  1099                              lapack_complex_float* a, lapack_int lda,
  1100                              lapack_complex_float* af, lapack_int ldaf,
  1101                              lapack_int* ipiv, char* equed, float* r, float* c,
  1102                              lapack_complex_float* b, lapack_int ldb,
  1103                              lapack_complex_float* x, lapack_int ldx,
  1104                              float* rcond, float* rpvgrw, float* berr,
  1105                              lapack_int n_err_bnds, float* err_bnds_norm,
  1106                              float* err_bnds_comp, lapack_int nparams,
  1107                              float* params );
  1108  lapack_int LAPACKE_zgesvxx( int matrix_layout, char fact, char trans,
  1109                              lapack_int n, lapack_int nrhs,
  1110                              lapack_complex_double* a, lapack_int lda,
  1111                              lapack_complex_double* af, lapack_int ldaf,
  1112                              lapack_int* ipiv, char* equed, double* r, double* c,
  1113                              lapack_complex_double* b, lapack_int ldb,
  1114                              lapack_complex_double* x, lapack_int ldx,
  1115                              double* rcond, double* rpvgrw, double* berr,
  1116                              lapack_int n_err_bnds, double* err_bnds_norm,
  1117                              double* err_bnds_comp, lapack_int nparams,
  1118                              double* params );
  1119  
  1120  lapack_int LAPACKE_sgetf2( int matrix_layout, lapack_int m, lapack_int n,
  1121                             float* a, lapack_int lda, lapack_int* ipiv );
  1122  lapack_int LAPACKE_dgetf2( int matrix_layout, lapack_int m, lapack_int n,
  1123                             double* a, lapack_int lda, lapack_int* ipiv );
  1124  lapack_int LAPACKE_cgetf2( int matrix_layout, lapack_int m, lapack_int n,
  1125                             lapack_complex_float* a, lapack_int lda,
  1126                             lapack_int* ipiv );
  1127  lapack_int LAPACKE_zgetf2( int matrix_layout, lapack_int m, lapack_int n,
  1128                             lapack_complex_double* a, lapack_int lda,
  1129                             lapack_int* ipiv );
  1130  
  1131  lapack_int LAPACKE_sgetrf( int matrix_layout, lapack_int m, lapack_int n,
  1132                             float* a, lapack_int lda, lapack_int* ipiv );
  1133  lapack_int LAPACKE_dgetrf( int matrix_layout, lapack_int m, lapack_int n,
  1134                             double* a, lapack_int lda, lapack_int* ipiv );
  1135  lapack_int LAPACKE_cgetrf( int matrix_layout, lapack_int m, lapack_int n,
  1136                             lapack_complex_float* a, lapack_int lda,
  1137                             lapack_int* ipiv );
  1138  lapack_int LAPACKE_zgetrf( int matrix_layout, lapack_int m, lapack_int n,
  1139                             lapack_complex_double* a, lapack_int lda,
  1140                             lapack_int* ipiv );
  1141  
  1142  lapack_int LAPACKE_sgetrf2( int matrix_layout, lapack_int m, lapack_int n,
  1143                             float* a, lapack_int lda, lapack_int* ipiv );
  1144  lapack_int LAPACKE_dgetrf2( int matrix_layout, lapack_int m, lapack_int n,
  1145                             double* a, lapack_int lda, lapack_int* ipiv );
  1146  lapack_int LAPACKE_cgetrf2( int matrix_layout, lapack_int m, lapack_int n,
  1147                             lapack_complex_float* a, lapack_int lda,
  1148                             lapack_int* ipiv );
  1149  lapack_int LAPACKE_zgetrf2( int matrix_layout, lapack_int m, lapack_int n,
  1150                             lapack_complex_double* a, lapack_int lda,
  1151                             lapack_int* ipiv );
  1152  
  1153  lapack_int LAPACKE_sgetri( int matrix_layout, lapack_int n, float* a,
  1154                             lapack_int lda, const lapack_int* ipiv );
  1155  lapack_int LAPACKE_dgetri( int matrix_layout, lapack_int n, double* a,
  1156                             lapack_int lda, const lapack_int* ipiv );
  1157  lapack_int LAPACKE_cgetri( int matrix_layout, lapack_int n,
  1158                             lapack_complex_float* a, lapack_int lda,
  1159                             const lapack_int* ipiv );
  1160  lapack_int LAPACKE_zgetri( int matrix_layout, lapack_int n,
  1161                             lapack_complex_double* a, lapack_int lda,
  1162                             const lapack_int* ipiv );
  1163  
  1164  lapack_int LAPACKE_sgetrs( int matrix_layout, char trans, lapack_int n,
  1165                             lapack_int nrhs, const float* a, lapack_int lda,
  1166                             const lapack_int* ipiv, float* b, lapack_int ldb );
  1167  lapack_int LAPACKE_dgetrs( int matrix_layout, char trans, lapack_int n,
  1168                             lapack_int nrhs, const double* a, lapack_int lda,
  1169                             const lapack_int* ipiv, double* b, lapack_int ldb );
  1170  lapack_int LAPACKE_cgetrs( int matrix_layout, char trans, lapack_int n,
  1171                             lapack_int nrhs, const lapack_complex_float* a,
  1172                             lapack_int lda, const lapack_int* ipiv,
  1173                             lapack_complex_float* b, lapack_int ldb );
  1174  lapack_int LAPACKE_zgetrs( int matrix_layout, char trans, lapack_int n,
  1175                             lapack_int nrhs, const lapack_complex_double* a,
  1176                             lapack_int lda, const lapack_int* ipiv,
  1177                             lapack_complex_double* b, lapack_int ldb );
  1178  
  1179  lapack_int LAPACKE_sggbak( int matrix_layout, char job, char side, lapack_int n,
  1180                             lapack_int ilo, lapack_int ihi, const float* lscale,
  1181                             const float* rscale, lapack_int m, float* v,
  1182                             lapack_int ldv );
  1183  lapack_int LAPACKE_dggbak( int matrix_layout, char job, char side, lapack_int n,
  1184                             lapack_int ilo, lapack_int ihi, const double* lscale,
  1185                             const double* rscale, lapack_int m, double* v,
  1186                             lapack_int ldv );
  1187  lapack_int LAPACKE_cggbak( int matrix_layout, char job, char side, lapack_int n,
  1188                             lapack_int ilo, lapack_int ihi, const float* lscale,
  1189                             const float* rscale, lapack_int m,
  1190                             lapack_complex_float* v, lapack_int ldv );
  1191  lapack_int LAPACKE_zggbak( int matrix_layout, char job, char side, lapack_int n,
  1192                             lapack_int ilo, lapack_int ihi, const double* lscale,
  1193                             const double* rscale, lapack_int m,
  1194                             lapack_complex_double* v, lapack_int ldv );
  1195  
  1196  lapack_int LAPACKE_sggbal( int matrix_layout, char job, lapack_int n, float* a,
  1197                             lapack_int lda, float* b, lapack_int ldb,
  1198                             lapack_int* ilo, lapack_int* ihi, float* lscale,
  1199                             float* rscale );
  1200  lapack_int LAPACKE_dggbal( int matrix_layout, char job, lapack_int n, double* a,
  1201                             lapack_int lda, double* b, lapack_int ldb,
  1202                             lapack_int* ilo, lapack_int* ihi, double* lscale,
  1203                             double* rscale );
  1204  lapack_int LAPACKE_cggbal( int matrix_layout, char job, lapack_int n,
  1205                             lapack_complex_float* a, lapack_int lda,
  1206                             lapack_complex_float* b, lapack_int ldb,
  1207                             lapack_int* ilo, lapack_int* ihi, float* lscale,
  1208                             float* rscale );
  1209  lapack_int LAPACKE_zggbal( int matrix_layout, char job, lapack_int n,
  1210                             lapack_complex_double* a, lapack_int lda,
  1211                             lapack_complex_double* b, lapack_int ldb,
  1212                             lapack_int* ilo, lapack_int* ihi, double* lscale,
  1213                             double* rscale );
  1214  
  1215  lapack_int LAPACKE_sgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
  1216                            LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
  1217                            lapack_int lda, float* b, lapack_int ldb,
  1218                            lapack_int* sdim, float* alphar, float* alphai,
  1219                            float* beta, float* vsl, lapack_int ldvsl, float* vsr,
  1220                            lapack_int ldvsr );
  1221  lapack_int LAPACKE_dgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
  1222                            LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
  1223                            lapack_int lda, double* b, lapack_int ldb,
  1224                            lapack_int* sdim, double* alphar, double* alphai,
  1225                            double* beta, double* vsl, lapack_int ldvsl,
  1226                            double* vsr, lapack_int ldvsr );
  1227  lapack_int LAPACKE_cgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
  1228                            LAPACK_C_SELECT2 selctg, lapack_int n,
  1229                            lapack_complex_float* a, lapack_int lda,
  1230                            lapack_complex_float* b, lapack_int ldb,
  1231                            lapack_int* sdim, lapack_complex_float* alpha,
  1232                            lapack_complex_float* beta, lapack_complex_float* vsl,
  1233                            lapack_int ldvsl, lapack_complex_float* vsr,
  1234                            lapack_int ldvsr );
  1235  lapack_int LAPACKE_zgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
  1236                            LAPACK_Z_SELECT2 selctg, lapack_int n,
  1237                            lapack_complex_double* a, lapack_int lda,
  1238                            lapack_complex_double* b, lapack_int ldb,
  1239                            lapack_int* sdim, lapack_complex_double* alpha,
  1240                            lapack_complex_double* beta,
  1241                            lapack_complex_double* vsl, lapack_int ldvsl,
  1242                            lapack_complex_double* vsr, lapack_int ldvsr );
  1243  
  1244  lapack_int LAPACKE_sgges3( int matrix_layout, char jobvsl, char jobvsr,
  1245                             char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
  1246                             float* a, lapack_int lda, float* b, lapack_int ldb,
  1247                             lapack_int* sdim, float* alphar, float* alphai,
  1248                             float* beta, float* vsl, lapack_int ldvsl,
  1249                             float* vsr, lapack_int ldvsr );
  1250  lapack_int LAPACKE_dgges3( int matrix_layout, char jobvsl, char jobvsr,
  1251                             char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
  1252                             double* a, lapack_int lda, double* b, lapack_int ldb,
  1253                             lapack_int* sdim, double* alphar, double* alphai,
  1254                             double* beta, double* vsl, lapack_int ldvsl,
  1255                             double* vsr, lapack_int ldvsr );
  1256  lapack_int LAPACKE_cgges3( int matrix_layout, char jobvsl, char jobvsr,
  1257                             char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
  1258                             lapack_complex_float* a, lapack_int lda,
  1259                             lapack_complex_float* b, lapack_int ldb,
  1260                             lapack_int* sdim, lapack_complex_float* alpha,
  1261                             lapack_complex_float* beta,
  1262                             lapack_complex_float* vsl, lapack_int ldvsl,
  1263                             lapack_complex_float* vsr, lapack_int ldvsr );
  1264  lapack_int LAPACKE_zgges3( int matrix_layout, char jobvsl, char jobvsr,
  1265                             char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
  1266                             lapack_complex_double* a, lapack_int lda,
  1267                             lapack_complex_double* b, lapack_int ldb,
  1268                             lapack_int* sdim, lapack_complex_double* alpha,
  1269                             lapack_complex_double* beta,
  1270                             lapack_complex_double* vsl, lapack_int ldvsl,
  1271                             lapack_complex_double* vsr, lapack_int ldvsr );
  1272  
  1273  lapack_int LAPACKE_sggesx( int matrix_layout, char jobvsl, char jobvsr,
  1274                             char sort, LAPACK_S_SELECT3 selctg, char sense,
  1275                             lapack_int n, float* a, lapack_int lda, float* b,
  1276                             lapack_int ldb, lapack_int* sdim, float* alphar,
  1277                             float* alphai, float* beta, float* vsl,
  1278                             lapack_int ldvsl, float* vsr, lapack_int ldvsr,
  1279                             float* rconde, float* rcondv );
  1280  lapack_int LAPACKE_dggesx( int matrix_layout, char jobvsl, char jobvsr,
  1281                             char sort, LAPACK_D_SELECT3 selctg, char sense,
  1282                             lapack_int n, double* a, lapack_int lda, double* b,
  1283                             lapack_int ldb, lapack_int* sdim, double* alphar,
  1284                             double* alphai, double* beta, double* vsl,
  1285                             lapack_int ldvsl, double* vsr, lapack_int ldvsr,
  1286                             double* rconde, double* rcondv );
  1287  lapack_int LAPACKE_cggesx( int matrix_layout, char jobvsl, char jobvsr,
  1288                             char sort, LAPACK_C_SELECT2 selctg, char sense,
  1289                             lapack_int n, lapack_complex_float* a,
  1290                             lapack_int lda, lapack_complex_float* b,
  1291                             lapack_int ldb, lapack_int* sdim,
  1292                             lapack_complex_float* alpha,
  1293                             lapack_complex_float* beta,
  1294                             lapack_complex_float* vsl, lapack_int ldvsl,
  1295                             lapack_complex_float* vsr, lapack_int ldvsr,
  1296                             float* rconde, float* rcondv );
  1297  lapack_int LAPACKE_zggesx( int matrix_layout, char jobvsl, char jobvsr,
  1298                             char sort, LAPACK_Z_SELECT2 selctg, char sense,
  1299                             lapack_int n, lapack_complex_double* a,
  1300                             lapack_int lda, lapack_complex_double* b,
  1301                             lapack_int ldb, lapack_int* sdim,
  1302                             lapack_complex_double* alpha,
  1303                             lapack_complex_double* beta,
  1304                             lapack_complex_double* vsl, lapack_int ldvsl,
  1305                             lapack_complex_double* vsr, lapack_int ldvsr,
  1306                             double* rconde, double* rcondv );
  1307  
  1308  lapack_int LAPACKE_sggev( int matrix_layout, char jobvl, char jobvr,
  1309                            lapack_int n, float* a, lapack_int lda, float* b,
  1310                            lapack_int ldb, float* alphar, float* alphai,
  1311                            float* beta, float* vl, lapack_int ldvl, float* vr,
  1312                            lapack_int ldvr );
  1313  lapack_int LAPACKE_dggev( int matrix_layout, char jobvl, char jobvr,
  1314                            lapack_int n, double* a, lapack_int lda, double* b,
  1315                            lapack_int ldb, double* alphar, double* alphai,
  1316                            double* beta, double* vl, lapack_int ldvl, double* vr,
  1317                            lapack_int ldvr );
  1318  lapack_int LAPACKE_cggev( int matrix_layout, char jobvl, char jobvr,
  1319                            lapack_int n, lapack_complex_float* a, lapack_int lda,
  1320                            lapack_complex_float* b, lapack_int ldb,
  1321                            lapack_complex_float* alpha,
  1322                            lapack_complex_float* beta, lapack_complex_float* vl,
  1323                            lapack_int ldvl, lapack_complex_float* vr,
  1324                            lapack_int ldvr );
  1325  lapack_int LAPACKE_zggev( int matrix_layout, char jobvl, char jobvr,
  1326                            lapack_int n, lapack_complex_double* a,
  1327                            lapack_int lda, lapack_complex_double* b,
  1328                            lapack_int ldb, lapack_complex_double* alpha,
  1329                            lapack_complex_double* beta,
  1330                            lapack_complex_double* vl, lapack_int ldvl,
  1331                            lapack_complex_double* vr, lapack_int ldvr );
  1332  
  1333  lapack_int LAPACKE_sggev3( int matrix_layout, char jobvl, char jobvr,
  1334                             lapack_int n, float* a, lapack_int lda,
  1335                             float* b, lapack_int ldb,
  1336                             float* alphar, float* alphai, float* beta,
  1337                             float* vl, lapack_int ldvl,
  1338                             float* vr, lapack_int ldvr );
  1339  lapack_int LAPACKE_dggev3( int matrix_layout, char jobvl, char jobvr,
  1340                             lapack_int n, double* a, lapack_int lda,
  1341                             double* b, lapack_int ldb,
  1342                             double* alphar, double* alphai, double* beta,
  1343                             double* vl, lapack_int ldvl,
  1344                             double* vr, lapack_int ldvr );
  1345  lapack_int LAPACKE_cggev3( int matrix_layout, char jobvl, char jobvr,
  1346                             lapack_int n,
  1347                             lapack_complex_float* a, lapack_int lda,
  1348                             lapack_complex_float* b, lapack_int ldb,
  1349                             lapack_complex_float* alpha,
  1350                             lapack_complex_float* beta,
  1351                             lapack_complex_float* vl, lapack_int ldvl,
  1352                             lapack_complex_float* vr, lapack_int ldvr );
  1353  lapack_int LAPACKE_zggev3( int matrix_layout, char jobvl, char jobvr,
  1354                             lapack_int n,
  1355                             lapack_complex_double* a, lapack_int lda,
  1356                             lapack_complex_double* b, lapack_int ldb,
  1357                             lapack_complex_double* alpha,
  1358                             lapack_complex_double* beta,
  1359                             lapack_complex_double* vl, lapack_int ldvl,
  1360                             lapack_complex_double* vr, lapack_int ldvr );
  1361  
  1362  lapack_int LAPACKE_sggevx( int matrix_layout, char balanc, char jobvl,
  1363                             char jobvr, char sense, lapack_int n, float* a,
  1364                             lapack_int lda, float* b, lapack_int ldb,
  1365                             float* alphar, float* alphai, float* beta, float* vl,
  1366                             lapack_int ldvl, float* vr, lapack_int ldvr,
  1367                             lapack_int* ilo, lapack_int* ihi, float* lscale,
  1368                             float* rscale, float* abnrm, float* bbnrm,
  1369                             float* rconde, float* rcondv );
  1370  lapack_int LAPACKE_dggevx( int matrix_layout, char balanc, char jobvl,
  1371                             char jobvr, char sense, lapack_int n, double* a,
  1372                             lapack_int lda, double* b, lapack_int ldb,
  1373                             double* alphar, double* alphai, double* beta,
  1374                             double* vl, lapack_int ldvl, double* vr,
  1375                             lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
  1376                             double* lscale, double* rscale, double* abnrm,
  1377                             double* bbnrm, double* rconde, double* rcondv );
  1378  lapack_int LAPACKE_cggevx( int matrix_layout, char balanc, char jobvl,
  1379                             char jobvr, char sense, lapack_int n,
  1380                             lapack_complex_float* a, lapack_int lda,
  1381                             lapack_complex_float* b, lapack_int ldb,
  1382                             lapack_complex_float* alpha,
  1383                             lapack_complex_float* beta, lapack_complex_float* vl,
  1384                             lapack_int ldvl, lapack_complex_float* vr,
  1385                             lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
  1386                             float* lscale, float* rscale, float* abnrm,
  1387                             float* bbnrm, float* rconde, float* rcondv );
  1388  lapack_int LAPACKE_zggevx( int matrix_layout, char balanc, char jobvl,
  1389                             char jobvr, char sense, lapack_int n,
  1390                             lapack_complex_double* a, lapack_int lda,
  1391                             lapack_complex_double* b, lapack_int ldb,
  1392                             lapack_complex_double* alpha,
  1393                             lapack_complex_double* beta,
  1394                             lapack_complex_double* vl, lapack_int ldvl,
  1395                             lapack_complex_double* vr, lapack_int ldvr,
  1396                             lapack_int* ilo, lapack_int* ihi, double* lscale,
  1397                             double* rscale, double* abnrm, double* bbnrm,
  1398                             double* rconde, double* rcondv );
  1399  
  1400  lapack_int LAPACKE_sggglm( int matrix_layout, lapack_int n, lapack_int m,
  1401                             lapack_int p, float* a, lapack_int lda, float* b,
  1402                             lapack_int ldb, float* d, float* x, float* y );
  1403  lapack_int LAPACKE_dggglm( int matrix_layout, lapack_int n, lapack_int m,
  1404                             lapack_int p, double* a, lapack_int lda, double* b,
  1405                             lapack_int ldb, double* d, double* x, double* y );
  1406  lapack_int LAPACKE_cggglm( int matrix_layout, lapack_int n, lapack_int m,
  1407                             lapack_int p, lapack_complex_float* a,
  1408                             lapack_int lda, lapack_complex_float* b,
  1409                             lapack_int ldb, lapack_complex_float* d,
  1410                             lapack_complex_float* x, lapack_complex_float* y );
  1411  lapack_int LAPACKE_zggglm( int matrix_layout, lapack_int n, lapack_int m,
  1412                             lapack_int p, lapack_complex_double* a,
  1413                             lapack_int lda, lapack_complex_double* b,
  1414                             lapack_int ldb, lapack_complex_double* d,
  1415                             lapack_complex_double* x, lapack_complex_double* y );
  1416  
  1417  lapack_int LAPACKE_sgghrd( int matrix_layout, char compq, char compz,
  1418                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1419                             float* a, lapack_int lda, float* b, lapack_int ldb,
  1420                             float* q, lapack_int ldq, float* z, lapack_int ldz );
  1421  lapack_int LAPACKE_dgghrd( int matrix_layout, char compq, char compz,
  1422                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1423                             double* a, lapack_int lda, double* b, lapack_int ldb,
  1424                             double* q, lapack_int ldq, double* z,
  1425                             lapack_int ldz );
  1426  lapack_int LAPACKE_cgghrd( int matrix_layout, char compq, char compz,
  1427                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1428                             lapack_complex_float* a, lapack_int lda,
  1429                             lapack_complex_float* b, lapack_int ldb,
  1430                             lapack_complex_float* q, lapack_int ldq,
  1431                             lapack_complex_float* z, lapack_int ldz );
  1432  lapack_int LAPACKE_zgghrd( int matrix_layout, char compq, char compz,
  1433                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1434                             lapack_complex_double* a, lapack_int lda,
  1435                             lapack_complex_double* b, lapack_int ldb,
  1436                             lapack_complex_double* q, lapack_int ldq,
  1437                             lapack_complex_double* z, lapack_int ldz );
  1438  
  1439  lapack_int LAPACKE_sgghd3( int matrix_layout, char compq, char compz,
  1440                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1441                             float* a, lapack_int lda, float* b, lapack_int ldb,
  1442                             float* q, lapack_int ldq, float* z, lapack_int ldz );
  1443  lapack_int LAPACKE_dgghd3( int matrix_layout, char compq, char compz,
  1444                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1445                             double* a, lapack_int lda, double* b, lapack_int ldb,
  1446                             double* q, lapack_int ldq, double* z,
  1447                             lapack_int ldz );
  1448  lapack_int LAPACKE_cgghd3( int matrix_layout, char compq, char compz,
  1449                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1450                             lapack_complex_float* a, lapack_int lda,
  1451                             lapack_complex_float* b, lapack_int ldb,
  1452                             lapack_complex_float* q, lapack_int ldq,
  1453                             lapack_complex_float* z, lapack_int ldz );
  1454  lapack_int LAPACKE_zgghd3( int matrix_layout, char compq, char compz,
  1455                             lapack_int n, lapack_int ilo, lapack_int ihi,
  1456                             lapack_complex_double* a, lapack_int lda,
  1457                             lapack_complex_double* b, lapack_int ldb,
  1458                             lapack_complex_double* q, lapack_int ldq,
  1459                             lapack_complex_double* z, lapack_int ldz );
  1460  
  1461  lapack_int LAPACKE_sgglse( int matrix_layout, lapack_int m, lapack_int n,
  1462                             lapack_int p, float* a, lapack_int lda, float* b,
  1463                             lapack_int ldb, float* c, float* d, float* x );
  1464  lapack_int LAPACKE_dgglse( int matrix_layout, lapack_int m, lapack_int n,
  1465                             lapack_int p, double* a, lapack_int lda, double* b,
  1466                             lapack_int ldb, double* c, double* d, double* x );
  1467  lapack_int LAPACKE_cgglse( int matrix_layout, lapack_int m, lapack_int n,
  1468                             lapack_int p, lapack_complex_float* a,
  1469                             lapack_int lda, lapack_complex_float* b,
  1470                             lapack_int ldb, lapack_complex_float* c,
  1471                             lapack_complex_float* d, lapack_complex_float* x );
  1472  lapack_int LAPACKE_zgglse( int matrix_layout, lapack_int m, lapack_int n,
  1473                             lapack_int p, lapack_complex_double* a,
  1474                             lapack_int lda, lapack_complex_double* b,
  1475                             lapack_int ldb, lapack_complex_double* c,
  1476                             lapack_complex_double* d, lapack_complex_double* x );
  1477  
  1478  lapack_int LAPACKE_sggqrf( int matrix_layout, lapack_int n, lapack_int m,
  1479                             lapack_int p, float* a, lapack_int lda, float* taua,
  1480                             float* b, lapack_int ldb, float* taub );
  1481  lapack_int LAPACKE_dggqrf( int matrix_layout, lapack_int n, lapack_int m,
  1482                             lapack_int p, double* a, lapack_int lda,
  1483                             double* taua, double* b, lapack_int ldb,
  1484                             double* taub );
  1485  lapack_int LAPACKE_cggqrf( int matrix_layout, lapack_int n, lapack_int m,
  1486                             lapack_int p, lapack_complex_float* a,
  1487                             lapack_int lda, lapack_complex_float* taua,
  1488                             lapack_complex_float* b, lapack_int ldb,
  1489                             lapack_complex_float* taub );
  1490  lapack_int LAPACKE_zggqrf( int matrix_layout, lapack_int n, lapack_int m,
  1491                             lapack_int p, lapack_complex_double* a,
  1492                             lapack_int lda, lapack_complex_double* taua,
  1493                             lapack_complex_double* b, lapack_int ldb,
  1494                             lapack_complex_double* taub );
  1495  
  1496  lapack_int LAPACKE_sggrqf( int matrix_layout, lapack_int m, lapack_int p,
  1497                             lapack_int n, float* a, lapack_int lda, float* taua,
  1498                             float* b, lapack_int ldb, float* taub );
  1499  lapack_int LAPACKE_dggrqf( int matrix_layout, lapack_int m, lapack_int p,
  1500                             lapack_int n, double* a, lapack_int lda,
  1501                             double* taua, double* b, lapack_int ldb,
  1502                             double* taub );
  1503  lapack_int LAPACKE_cggrqf( int matrix_layout, lapack_int m, lapack_int p,
  1504                             lapack_int n, lapack_complex_float* a,
  1505                             lapack_int lda, lapack_complex_float* taua,
  1506                             lapack_complex_float* b, lapack_int ldb,
  1507                             lapack_complex_float* taub );
  1508  lapack_int LAPACKE_zggrqf( int matrix_layout, lapack_int m, lapack_int p,
  1509                             lapack_int n, lapack_complex_double* a,
  1510                             lapack_int lda, lapack_complex_double* taua,
  1511                             lapack_complex_double* b, lapack_int ldb,
  1512                             lapack_complex_double* taub );
  1513  
  1514  lapack_int LAPACKE_sggsvd( int matrix_layout, char jobu, char jobv, char jobq,
  1515                             lapack_int m, lapack_int n, lapack_int p,
  1516                             lapack_int* k, lapack_int* l, float* a,
  1517                             lapack_int lda, float* b, lapack_int ldb,
  1518                             float* alpha, float* beta, float* u, lapack_int ldu,
  1519                             float* v, lapack_int ldv, float* q, lapack_int ldq,
  1520                             lapack_int* iwork );
  1521  lapack_int LAPACKE_dggsvd( int matrix_layout, char jobu, char jobv, char jobq,
  1522                             lapack_int m, lapack_int n, lapack_int p,
  1523                             lapack_int* k, lapack_int* l, double* a,
  1524                             lapack_int lda, double* b, lapack_int ldb,
  1525                             double* alpha, double* beta, double* u,
  1526                             lapack_int ldu, double* v, lapack_int ldv, double* q,
  1527                             lapack_int ldq, lapack_int* iwork );
  1528  lapack_int LAPACKE_cggsvd( int matrix_layout, char jobu, char jobv, char jobq,
  1529                             lapack_int m, lapack_int n, lapack_int p,
  1530                             lapack_int* k, lapack_int* l,
  1531                             lapack_complex_float* a, lapack_int lda,
  1532                             lapack_complex_float* b, lapack_int ldb,
  1533                             float* alpha, float* beta, lapack_complex_float* u,
  1534                             lapack_int ldu, lapack_complex_float* v,
  1535                             lapack_int ldv, lapack_complex_float* q,
  1536                             lapack_int ldq, lapack_int* iwork );
  1537  lapack_int LAPACKE_zggsvd( int matrix_layout, char jobu, char jobv, char jobq,
  1538                             lapack_int m, lapack_int n, lapack_int p,
  1539                             lapack_int* k, lapack_int* l,
  1540                             lapack_complex_double* a, lapack_int lda,
  1541                             lapack_complex_double* b, lapack_int ldb,
  1542                             double* alpha, double* beta,
  1543                             lapack_complex_double* u, lapack_int ldu,
  1544                             lapack_complex_double* v, lapack_int ldv,
  1545                             lapack_complex_double* q, lapack_int ldq,
  1546                             lapack_int* iwork );
  1547  
  1548  lapack_int LAPACKE_sggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
  1549                              lapack_int m, lapack_int n, lapack_int p,
  1550                              lapack_int* k, lapack_int* l, float* a,
  1551                              lapack_int lda, float* b, lapack_int ldb,
  1552                              float* alpha, float* beta, float* u, lapack_int ldu,
  1553                              float* v, lapack_int ldv, float* q, lapack_int ldq,
  1554                              lapack_int* iwork );
  1555  lapack_int LAPACKE_dggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
  1556                              lapack_int m, lapack_int n, lapack_int p,
  1557                              lapack_int* k, lapack_int* l, double* a,
  1558                              lapack_int lda, double* b, lapack_int ldb,
  1559                              double* alpha, double* beta, double* u,
  1560                              lapack_int ldu, double* v, lapack_int ldv, double* q,
  1561                              lapack_int ldq, lapack_int* iwork );
  1562  lapack_int LAPACKE_cggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
  1563                              lapack_int m, lapack_int n, lapack_int p,
  1564                              lapack_int* k, lapack_int* l,
  1565                              lapack_complex_float* a, lapack_int lda,
  1566                              lapack_complex_float* b, lapack_int ldb,
  1567                              float* alpha, float* beta, lapack_complex_float* u,
  1568                              lapack_int ldu, lapack_complex_float* v,
  1569                              lapack_int ldv, lapack_complex_float* q,
  1570                              lapack_int ldq, lapack_int* iwork );
  1571  lapack_int LAPACKE_zggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
  1572                              lapack_int m, lapack_int n, lapack_int p,
  1573                              lapack_int* k, lapack_int* l,
  1574                              lapack_complex_double* a, lapack_int lda,
  1575                              lapack_complex_double* b, lapack_int ldb,
  1576                              double* alpha, double* beta,
  1577                              lapack_complex_double* u, lapack_int ldu,
  1578                              lapack_complex_double* v, lapack_int ldv,
  1579                              lapack_complex_double* q, lapack_int ldq,
  1580                              lapack_int* iwork );
  1581  
  1582  lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
  1583                             lapack_int m, lapack_int p, lapack_int n, float* a,
  1584                             lapack_int lda, float* b, lapack_int ldb, float tola,
  1585                             float tolb, lapack_int* k, lapack_int* l, float* u,
  1586                             lapack_int ldu, float* v, lapack_int ldv, float* q,
  1587                             lapack_int ldq );
  1588  lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
  1589                             lapack_int m, lapack_int p, lapack_int n, double* a,
  1590                             lapack_int lda, double* b, lapack_int ldb,
  1591                             double tola, double tolb, lapack_int* k,
  1592                             lapack_int* l, double* u, lapack_int ldu, double* v,
  1593                             lapack_int ldv, double* q, lapack_int ldq );
  1594  lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
  1595                             lapack_int m, lapack_int p, lapack_int n,
  1596                             lapack_complex_float* a, lapack_int lda,
  1597                             lapack_complex_float* b, lapack_int ldb, float tola,
  1598                             float tolb, lapack_int* k, lapack_int* l,
  1599                             lapack_complex_float* u, lapack_int ldu,
  1600                             lapack_complex_float* v, lapack_int ldv,
  1601                             lapack_complex_float* q, lapack_int ldq );
  1602  lapack_int LAPACKE_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
  1603                             lapack_int m, lapack_int p, lapack_int n,
  1604                             lapack_complex_double* a, lapack_int lda,
  1605                             lapack_complex_double* b, lapack_int ldb,
  1606                             double tola, double tolb, lapack_int* k,
  1607                             lapack_int* l, lapack_complex_double* u,
  1608                             lapack_int ldu, lapack_complex_double* v,
  1609                             lapack_int ldv, lapack_complex_double* q,
  1610                             lapack_int ldq );
  1611  
  1612  lapack_int LAPACKE_sggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
  1613                              lapack_int m, lapack_int p, lapack_int n, float* a,
  1614                              lapack_int lda, float* b, lapack_int ldb, float tola,
  1615                              float tolb, lapack_int* k, lapack_int* l, float* u,
  1616                              lapack_int ldu, float* v, lapack_int ldv, float* q,
  1617                              lapack_int ldq );
  1618  lapack_int LAPACKE_dggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
  1619                              lapack_int m, lapack_int p, lapack_int n, double* a,
  1620                              lapack_int lda, double* b, lapack_int ldb,
  1621                              double tola, double tolb, lapack_int* k,
  1622                              lapack_int* l, double* u, lapack_int ldu, double* v,
  1623                              lapack_int ldv, double* q, lapack_int ldq );
  1624  lapack_int LAPACKE_cggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
  1625                              lapack_int m, lapack_int p, lapack_int n,
  1626                              lapack_complex_float* a, lapack_int lda,
  1627                              lapack_complex_float* b, lapack_int ldb, float tola,
  1628                              float tolb, lapack_int* k, lapack_int* l,
  1629                              lapack_complex_float* u, lapack_int ldu,
  1630                              lapack_complex_float* v, lapack_int ldv,
  1631                              lapack_complex_float* q, lapack_int ldq );
  1632  lapack_int LAPACKE_zggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
  1633                              lapack_int m, lapack_int p, lapack_int n,
  1634                              lapack_complex_double* a, lapack_int lda,
  1635                              lapack_complex_double* b, lapack_int ldb,
  1636                              double tola, double tolb, lapack_int* k,
  1637                              lapack_int* l, lapack_complex_double* u,
  1638                              lapack_int ldu, lapack_complex_double* v,
  1639                              lapack_int ldv, lapack_complex_double* q,
  1640                              lapack_int ldq );
  1641  
  1642  lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
  1643                             const float* d, const float* du, const float* du2,
  1644                             const lapack_int* ipiv, float anorm, float* rcond );
  1645  lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
  1646                             const double* d, const double* du, const double* du2,
  1647                             const lapack_int* ipiv, double anorm,
  1648                             double* rcond );
  1649  lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
  1650                             const lapack_complex_float* dl,
  1651                             const lapack_complex_float* d,
  1652                             const lapack_complex_float* du,
  1653                             const lapack_complex_float* du2,
  1654                             const lapack_int* ipiv, float anorm, float* rcond );
  1655  lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
  1656                             const lapack_complex_double* dl,
  1657                             const lapack_complex_double* d,
  1658                             const lapack_complex_double* du,
  1659                             const lapack_complex_double* du2,
  1660                             const lapack_int* ipiv, double anorm,
  1661                             double* rcond );
  1662  
  1663  lapack_int LAPACKE_sgtrfs( int matrix_layout, char trans, lapack_int n,
  1664                             lapack_int nrhs, const float* dl, const float* d,
  1665                             const float* du, const float* dlf, const float* df,
  1666                             const float* duf, const float* du2,
  1667                             const lapack_int* ipiv, const float* b,
  1668                             lapack_int ldb, float* x, lapack_int ldx,
  1669                             float* ferr, float* berr );
  1670  lapack_int LAPACKE_dgtrfs( int matrix_layout, char trans, lapack_int n,
  1671                             lapack_int nrhs, const double* dl, const double* d,
  1672                             const double* du, const double* dlf,
  1673                             const double* df, const double* duf,
  1674                             const double* du2, const lapack_int* ipiv,
  1675                             const double* b, lapack_int ldb, double* x,
  1676                             lapack_int ldx, double* ferr, double* berr );
  1677  lapack_int LAPACKE_cgtrfs( int matrix_layout, char trans, lapack_int n,
  1678                             lapack_int nrhs, const lapack_complex_float* dl,
  1679                             const lapack_complex_float* d,
  1680                             const lapack_complex_float* du,
  1681                             const lapack_complex_float* dlf,
  1682                             const lapack_complex_float* df,
  1683                             const lapack_complex_float* duf,
  1684                             const lapack_complex_float* du2,
  1685                             const lapack_int* ipiv,
  1686                             const lapack_complex_float* b, lapack_int ldb,
  1687                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  1688                             float* berr );
  1689  lapack_int LAPACKE_zgtrfs( int matrix_layout, char trans, lapack_int n,
  1690                             lapack_int nrhs, const lapack_complex_double* dl,
  1691                             const lapack_complex_double* d,
  1692                             const lapack_complex_double* du,
  1693                             const lapack_complex_double* dlf,
  1694                             const lapack_complex_double* df,
  1695                             const lapack_complex_double* duf,
  1696                             const lapack_complex_double* du2,
  1697                             const lapack_int* ipiv,
  1698                             const lapack_complex_double* b, lapack_int ldb,
  1699                             lapack_complex_double* x, lapack_int ldx,
  1700                             double* ferr, double* berr );
  1701  
  1702  lapack_int LAPACKE_sgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  1703                            float* dl, float* d, float* du, float* b,
  1704                            lapack_int ldb );
  1705  lapack_int LAPACKE_dgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  1706                            double* dl, double* d, double* du, double* b,
  1707                            lapack_int ldb );
  1708  lapack_int LAPACKE_cgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  1709                            lapack_complex_float* dl, lapack_complex_float* d,
  1710                            lapack_complex_float* du, lapack_complex_float* b,
  1711                            lapack_int ldb );
  1712  lapack_int LAPACKE_zgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  1713                            lapack_complex_double* dl, lapack_complex_double* d,
  1714                            lapack_complex_double* du, lapack_complex_double* b,
  1715                            lapack_int ldb );
  1716  
  1717  lapack_int LAPACKE_sgtsvx( int matrix_layout, char fact, char trans,
  1718                             lapack_int n, lapack_int nrhs, const float* dl,
  1719                             const float* d, const float* du, float* dlf,
  1720                             float* df, float* duf, float* du2, lapack_int* ipiv,
  1721                             const float* b, lapack_int ldb, float* x,
  1722                             lapack_int ldx, float* rcond, float* ferr,
  1723                             float* berr );
  1724  lapack_int LAPACKE_dgtsvx( int matrix_layout, char fact, char trans,
  1725                             lapack_int n, lapack_int nrhs, const double* dl,
  1726                             const double* d, const double* du, double* dlf,
  1727                             double* df, double* duf, double* du2,
  1728                             lapack_int* ipiv, const double* b, lapack_int ldb,
  1729                             double* x, lapack_int ldx, double* rcond,
  1730                             double* ferr, double* berr );
  1731  lapack_int LAPACKE_cgtsvx( int matrix_layout, char fact, char trans,
  1732                             lapack_int n, lapack_int nrhs,
  1733                             const lapack_complex_float* dl,
  1734                             const lapack_complex_float* d,
  1735                             const lapack_complex_float* du,
  1736                             lapack_complex_float* dlf, lapack_complex_float* df,
  1737                             lapack_complex_float* duf, lapack_complex_float* du2,
  1738                             lapack_int* ipiv, const lapack_complex_float* b,
  1739                             lapack_int ldb, lapack_complex_float* x,
  1740                             lapack_int ldx, float* rcond, float* ferr,
  1741                             float* berr );
  1742  lapack_int LAPACKE_zgtsvx( int matrix_layout, char fact, char trans,
  1743                             lapack_int n, lapack_int nrhs,
  1744                             const lapack_complex_double* dl,
  1745                             const lapack_complex_double* d,
  1746                             const lapack_complex_double* du,
  1747                             lapack_complex_double* dlf,
  1748                             lapack_complex_double* df,
  1749                             lapack_complex_double* duf,
  1750                             lapack_complex_double* du2, lapack_int* ipiv,
  1751                             const lapack_complex_double* b, lapack_int ldb,
  1752                             lapack_complex_double* x, lapack_int ldx,
  1753                             double* rcond, double* ferr, double* berr );
  1754  
  1755  lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
  1756                             float* du2, lapack_int* ipiv );
  1757  lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
  1758                             double* du2, lapack_int* ipiv );
  1759  lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
  1760                             lapack_complex_float* d, lapack_complex_float* du,
  1761                             lapack_complex_float* du2, lapack_int* ipiv );
  1762  lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
  1763                             lapack_complex_double* d, lapack_complex_double* du,
  1764                             lapack_complex_double* du2, lapack_int* ipiv );
  1765  
  1766  lapack_int LAPACKE_sgttrs( int matrix_layout, char trans, lapack_int n,
  1767                             lapack_int nrhs, const float* dl, const float* d,
  1768                             const float* du, const float* du2,
  1769                             const lapack_int* ipiv, float* b, lapack_int ldb );
  1770  lapack_int LAPACKE_dgttrs( int matrix_layout, char trans, lapack_int n,
  1771                             lapack_int nrhs, const double* dl, const double* d,
  1772                             const double* du, const double* du2,
  1773                             const lapack_int* ipiv, double* b, lapack_int ldb );
  1774  lapack_int LAPACKE_cgttrs( int matrix_layout, char trans, lapack_int n,
  1775                             lapack_int nrhs, const lapack_complex_float* dl,
  1776                             const lapack_complex_float* d,
  1777                             const lapack_complex_float* du,
  1778                             const lapack_complex_float* du2,
  1779                             const lapack_int* ipiv, lapack_complex_float* b,
  1780                             lapack_int ldb );
  1781  lapack_int LAPACKE_zgttrs( int matrix_layout, char trans, lapack_int n,
  1782                             lapack_int nrhs, const lapack_complex_double* dl,
  1783                             const lapack_complex_double* d,
  1784                             const lapack_complex_double* du,
  1785                             const lapack_complex_double* du2,
  1786                             const lapack_int* ipiv, lapack_complex_double* b,
  1787                             lapack_int ldb );
  1788  
  1789  lapack_int LAPACKE_chbev( int matrix_layout, char jobz, char uplo, lapack_int n,
  1790                            lapack_int kd, lapack_complex_float* ab,
  1791                            lapack_int ldab, float* w, lapack_complex_float* z,
  1792                            lapack_int ldz );
  1793  lapack_int LAPACKE_zhbev( int matrix_layout, char jobz, char uplo, lapack_int n,
  1794                            lapack_int kd, lapack_complex_double* ab,
  1795                            lapack_int ldab, double* w, lapack_complex_double* z,
  1796                            lapack_int ldz );
  1797  
  1798  lapack_int LAPACKE_chbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1799                             lapack_int kd, lapack_complex_float* ab,
  1800                             lapack_int ldab, float* w, lapack_complex_float* z,
  1801                             lapack_int ldz );
  1802  lapack_int LAPACKE_zhbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1803                             lapack_int kd, lapack_complex_double* ab,
  1804                             lapack_int ldab, double* w, lapack_complex_double* z,
  1805                             lapack_int ldz );
  1806  
  1807  lapack_int LAPACKE_chbevx( int matrix_layout, char jobz, char range, char uplo,
  1808                             lapack_int n, lapack_int kd,
  1809                             lapack_complex_float* ab, lapack_int ldab,
  1810                             lapack_complex_float* q, lapack_int ldq, float vl,
  1811                             float vu, lapack_int il, lapack_int iu, float abstol,
  1812                             lapack_int* m, float* w, lapack_complex_float* z,
  1813                             lapack_int ldz, lapack_int* ifail );
  1814  lapack_int LAPACKE_zhbevx( int matrix_layout, char jobz, char range, char uplo,
  1815                             lapack_int n, lapack_int kd,
  1816                             lapack_complex_double* ab, lapack_int ldab,
  1817                             lapack_complex_double* q, lapack_int ldq, double vl,
  1818                             double vu, lapack_int il, lapack_int iu,
  1819                             double abstol, lapack_int* m, double* w,
  1820                             lapack_complex_double* z, lapack_int ldz,
  1821                             lapack_int* ifail );
  1822  
  1823  lapack_int LAPACKE_chbgst( int matrix_layout, char vect, char uplo, lapack_int n,
  1824                             lapack_int ka, lapack_int kb,
  1825                             lapack_complex_float* ab, lapack_int ldab,
  1826                             const lapack_complex_float* bb, lapack_int ldbb,
  1827                             lapack_complex_float* x, lapack_int ldx );
  1828  lapack_int LAPACKE_zhbgst( int matrix_layout, char vect, char uplo, lapack_int n,
  1829                             lapack_int ka, lapack_int kb,
  1830                             lapack_complex_double* ab, lapack_int ldab,
  1831                             const lapack_complex_double* bb, lapack_int ldbb,
  1832                             lapack_complex_double* x, lapack_int ldx );
  1833  
  1834  lapack_int LAPACKE_chbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
  1835                            lapack_int ka, lapack_int kb,
  1836                            lapack_complex_float* ab, lapack_int ldab,
  1837                            lapack_complex_float* bb, lapack_int ldbb, float* w,
  1838                            lapack_complex_float* z, lapack_int ldz );
  1839  lapack_int LAPACKE_zhbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
  1840                            lapack_int ka, lapack_int kb,
  1841                            lapack_complex_double* ab, lapack_int ldab,
  1842                            lapack_complex_double* bb, lapack_int ldbb, double* w,
  1843                            lapack_complex_double* z, lapack_int ldz );
  1844  
  1845  lapack_int LAPACKE_chbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1846                             lapack_int ka, lapack_int kb,
  1847                             lapack_complex_float* ab, lapack_int ldab,
  1848                             lapack_complex_float* bb, lapack_int ldbb, float* w,
  1849                             lapack_complex_float* z, lapack_int ldz );
  1850  lapack_int LAPACKE_zhbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1851                             lapack_int ka, lapack_int kb,
  1852                             lapack_complex_double* ab, lapack_int ldab,
  1853                             lapack_complex_double* bb, lapack_int ldbb,
  1854                             double* w, lapack_complex_double* z,
  1855                             lapack_int ldz );
  1856  
  1857  lapack_int LAPACKE_chbgvx( int matrix_layout, char jobz, char range, char uplo,
  1858                             lapack_int n, lapack_int ka, lapack_int kb,
  1859                             lapack_complex_float* ab, lapack_int ldab,
  1860                             lapack_complex_float* bb, lapack_int ldbb,
  1861                             lapack_complex_float* q, lapack_int ldq, float vl,
  1862                             float vu, lapack_int il, lapack_int iu, float abstol,
  1863                             lapack_int* m, float* w, lapack_complex_float* z,
  1864                             lapack_int ldz, lapack_int* ifail );
  1865  lapack_int LAPACKE_zhbgvx( int matrix_layout, char jobz, char range, char uplo,
  1866                             lapack_int n, lapack_int ka, lapack_int kb,
  1867                             lapack_complex_double* ab, lapack_int ldab,
  1868                             lapack_complex_double* bb, lapack_int ldbb,
  1869                             lapack_complex_double* q, lapack_int ldq, double vl,
  1870                             double vu, lapack_int il, lapack_int iu,
  1871                             double abstol, lapack_int* m, double* w,
  1872                             lapack_complex_double* z, lapack_int ldz,
  1873                             lapack_int* ifail );
  1874  
  1875  lapack_int LAPACKE_chbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
  1876                             lapack_int kd, lapack_complex_float* ab,
  1877                             lapack_int ldab, float* d, float* e,
  1878                             lapack_complex_float* q, lapack_int ldq );
  1879  lapack_int LAPACKE_zhbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
  1880                             lapack_int kd, lapack_complex_double* ab,
  1881                             lapack_int ldab, double* d, double* e,
  1882                             lapack_complex_double* q, lapack_int ldq );
  1883  
  1884  lapack_int LAPACKE_checon( int matrix_layout, char uplo, lapack_int n,
  1885                             const lapack_complex_float* a, lapack_int lda,
  1886                             const lapack_int* ipiv, float anorm, float* rcond );
  1887  lapack_int LAPACKE_zhecon( int matrix_layout, char uplo, lapack_int n,
  1888                             const lapack_complex_double* a, lapack_int lda,
  1889                             const lapack_int* ipiv, double anorm,
  1890                             double* rcond );
  1891  
  1892  lapack_int LAPACKE_cheequb( int matrix_layout, char uplo, lapack_int n,
  1893                              const lapack_complex_float* a, lapack_int lda,
  1894                              float* s, float* scond, float* amax );
  1895  lapack_int LAPACKE_zheequb( int matrix_layout, char uplo, lapack_int n,
  1896                              const lapack_complex_double* a, lapack_int lda,
  1897                              double* s, double* scond, double* amax );
  1898  
  1899  lapack_int LAPACKE_cheev( int matrix_layout, char jobz, char uplo, lapack_int n,
  1900                            lapack_complex_float* a, lapack_int lda, float* w );
  1901  lapack_int LAPACKE_zheev( int matrix_layout, char jobz, char uplo, lapack_int n,
  1902                            lapack_complex_double* a, lapack_int lda, double* w );
  1903  
  1904  lapack_int LAPACKE_cheevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1905                             lapack_complex_float* a, lapack_int lda, float* w );
  1906  lapack_int LAPACKE_zheevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  1907                             lapack_complex_double* a, lapack_int lda,
  1908                             double* w );
  1909  
  1910  lapack_int LAPACKE_cheevr( int matrix_layout, char jobz, char range, char uplo,
  1911                             lapack_int n, lapack_complex_float* a,
  1912                             lapack_int lda, float vl, float vu, lapack_int il,
  1913                             lapack_int iu, float abstol, lapack_int* m, float* w,
  1914                             lapack_complex_float* z, lapack_int ldz,
  1915                             lapack_int* isuppz );
  1916  lapack_int LAPACKE_zheevr( int matrix_layout, char jobz, char range, char uplo,
  1917                             lapack_int n, lapack_complex_double* a,
  1918                             lapack_int lda, double vl, double vu, lapack_int il,
  1919                             lapack_int iu, double abstol, lapack_int* m,
  1920                             double* w, lapack_complex_double* z, lapack_int ldz,
  1921                             lapack_int* isuppz );
  1922  
  1923  lapack_int LAPACKE_cheevx( int matrix_layout, char jobz, char range, char uplo,
  1924                             lapack_int n, lapack_complex_float* a,
  1925                             lapack_int lda, float vl, float vu, lapack_int il,
  1926                             lapack_int iu, float abstol, lapack_int* m, float* w,
  1927                             lapack_complex_float* z, lapack_int ldz,
  1928                             lapack_int* ifail );
  1929  lapack_int LAPACKE_zheevx( int matrix_layout, char jobz, char range, char uplo,
  1930                             lapack_int n, lapack_complex_double* a,
  1931                             lapack_int lda, double vl, double vu, lapack_int il,
  1932                             lapack_int iu, double abstol, lapack_int* m,
  1933                             double* w, lapack_complex_double* z, lapack_int ldz,
  1934                             lapack_int* ifail );
  1935  
  1936  lapack_int LAPACKE_chegst( int matrix_layout, lapack_int itype, char uplo,
  1937                             lapack_int n, lapack_complex_float* a,
  1938                             lapack_int lda, const lapack_complex_float* b,
  1939                             lapack_int ldb );
  1940  lapack_int LAPACKE_zhegst( int matrix_layout, lapack_int itype, char uplo,
  1941                             lapack_int n, lapack_complex_double* a,
  1942                             lapack_int lda, const lapack_complex_double* b,
  1943                             lapack_int ldb );
  1944  
  1945  lapack_int LAPACKE_chegv( int matrix_layout, lapack_int itype, char jobz,
  1946                            char uplo, lapack_int n, lapack_complex_float* a,
  1947                            lapack_int lda, lapack_complex_float* b,
  1948                            lapack_int ldb, float* w );
  1949  lapack_int LAPACKE_zhegv( int matrix_layout, lapack_int itype, char jobz,
  1950                            char uplo, lapack_int n, lapack_complex_double* a,
  1951                            lapack_int lda, lapack_complex_double* b,
  1952                            lapack_int ldb, double* w );
  1953  
  1954  lapack_int LAPACKE_chegvd( int matrix_layout, lapack_int itype, char jobz,
  1955                             char uplo, lapack_int n, lapack_complex_float* a,
  1956                             lapack_int lda, lapack_complex_float* b,
  1957                             lapack_int ldb, float* w );
  1958  lapack_int LAPACKE_zhegvd( int matrix_layout, lapack_int itype, char jobz,
  1959                             char uplo, lapack_int n, lapack_complex_double* a,
  1960                             lapack_int lda, lapack_complex_double* b,
  1961                             lapack_int ldb, double* w );
  1962  
  1963  lapack_int LAPACKE_chegvx( int matrix_layout, lapack_int itype, char jobz,
  1964                             char range, char uplo, lapack_int n,
  1965                             lapack_complex_float* a, lapack_int lda,
  1966                             lapack_complex_float* b, lapack_int ldb, float vl,
  1967                             float vu, lapack_int il, lapack_int iu, float abstol,
  1968                             lapack_int* m, float* w, lapack_complex_float* z,
  1969                             lapack_int ldz, lapack_int* ifail );
  1970  lapack_int LAPACKE_zhegvx( int matrix_layout, lapack_int itype, char jobz,
  1971                             char range, char uplo, lapack_int n,
  1972                             lapack_complex_double* a, lapack_int lda,
  1973                             lapack_complex_double* b, lapack_int ldb, double vl,
  1974                             double vu, lapack_int il, lapack_int iu,
  1975                             double abstol, lapack_int* m, double* w,
  1976                             lapack_complex_double* z, lapack_int ldz,
  1977                             lapack_int* ifail );
  1978  
  1979  lapack_int LAPACKE_cherfs( int matrix_layout, char uplo, lapack_int n,
  1980                             lapack_int nrhs, const lapack_complex_float* a,
  1981                             lapack_int lda, const lapack_complex_float* af,
  1982                             lapack_int ldaf, const lapack_int* ipiv,
  1983                             const lapack_complex_float* b, lapack_int ldb,
  1984                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  1985                             float* berr );
  1986  lapack_int LAPACKE_zherfs( int matrix_layout, char uplo, lapack_int n,
  1987                             lapack_int nrhs, const lapack_complex_double* a,
  1988                             lapack_int lda, const lapack_complex_double* af,
  1989                             lapack_int ldaf, const lapack_int* ipiv,
  1990                             const lapack_complex_double* b, lapack_int ldb,
  1991                             lapack_complex_double* x, lapack_int ldx,
  1992                             double* ferr, double* berr );
  1993  
  1994  lapack_int LAPACKE_cherfsx( int matrix_layout, char uplo, char equed,
  1995                              lapack_int n, lapack_int nrhs,
  1996                              const lapack_complex_float* a, lapack_int lda,
  1997                              const lapack_complex_float* af, lapack_int ldaf,
  1998                              const lapack_int* ipiv, const float* s,
  1999                              const lapack_complex_float* b, lapack_int ldb,
  2000                              lapack_complex_float* x, lapack_int ldx,
  2001                              float* rcond, float* berr, lapack_int n_err_bnds,
  2002                              float* err_bnds_norm, float* err_bnds_comp,
  2003                              lapack_int nparams, float* params );
  2004  lapack_int LAPACKE_zherfsx( int matrix_layout, char uplo, char equed,
  2005                              lapack_int n, lapack_int nrhs,
  2006                              const lapack_complex_double* a, lapack_int lda,
  2007                              const lapack_complex_double* af, lapack_int ldaf,
  2008                              const lapack_int* ipiv, const double* s,
  2009                              const lapack_complex_double* b, lapack_int ldb,
  2010                              lapack_complex_double* x, lapack_int ldx,
  2011                              double* rcond, double* berr, lapack_int n_err_bnds,
  2012                              double* err_bnds_norm, double* err_bnds_comp,
  2013                              lapack_int nparams, double* params );
  2014  
  2015  lapack_int LAPACKE_chesv( int matrix_layout, char uplo, lapack_int n,
  2016                            lapack_int nrhs, lapack_complex_float* a,
  2017                            lapack_int lda, lapack_int* ipiv,
  2018                            lapack_complex_float* b, lapack_int ldb );
  2019  lapack_int LAPACKE_zhesv( int matrix_layout, char uplo, lapack_int n,
  2020                            lapack_int nrhs, lapack_complex_double* a,
  2021                            lapack_int lda, lapack_int* ipiv,
  2022                            lapack_complex_double* b, lapack_int ldb );
  2023  
  2024  lapack_int LAPACKE_chesvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2025                             lapack_int nrhs, const lapack_complex_float* a,
  2026                             lapack_int lda, lapack_complex_float* af,
  2027                             lapack_int ldaf, lapack_int* ipiv,
  2028                             const lapack_complex_float* b, lapack_int ldb,
  2029                             lapack_complex_float* x, lapack_int ldx,
  2030                             float* rcond, float* ferr, float* berr );
  2031  lapack_int LAPACKE_zhesvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2032                             lapack_int nrhs, const lapack_complex_double* a,
  2033                             lapack_int lda, lapack_complex_double* af,
  2034                             lapack_int ldaf, lapack_int* ipiv,
  2035                             const lapack_complex_double* b, lapack_int ldb,
  2036                             lapack_complex_double* x, lapack_int ldx,
  2037                             double* rcond, double* ferr, double* berr );
  2038  
  2039  lapack_int LAPACKE_chesvxx( int matrix_layout, char fact, char uplo,
  2040                              lapack_int n, lapack_int nrhs,
  2041                              lapack_complex_float* a, lapack_int lda,
  2042                              lapack_complex_float* af, lapack_int ldaf,
  2043                              lapack_int* ipiv, char* equed, float* s,
  2044                              lapack_complex_float* b, lapack_int ldb,
  2045                              lapack_complex_float* x, lapack_int ldx,
  2046                              float* rcond, float* rpvgrw, float* berr,
  2047                              lapack_int n_err_bnds, float* err_bnds_norm,
  2048                              float* err_bnds_comp, lapack_int nparams,
  2049                              float* params );
  2050  lapack_int LAPACKE_zhesvxx( int matrix_layout, char fact, char uplo,
  2051                              lapack_int n, lapack_int nrhs,
  2052                              lapack_complex_double* a, lapack_int lda,
  2053                              lapack_complex_double* af, lapack_int ldaf,
  2054                              lapack_int* ipiv, char* equed, double* s,
  2055                              lapack_complex_double* b, lapack_int ldb,
  2056                              lapack_complex_double* x, lapack_int ldx,
  2057                              double* rcond, double* rpvgrw, double* berr,
  2058                              lapack_int n_err_bnds, double* err_bnds_norm,
  2059                              double* err_bnds_comp, lapack_int nparams,
  2060                              double* params );
  2061  
  2062  lapack_int LAPACKE_chetrd( int matrix_layout, char uplo, lapack_int n,
  2063                             lapack_complex_float* a, lapack_int lda, float* d,
  2064                             float* e, lapack_complex_float* tau );
  2065  lapack_int LAPACKE_zhetrd( int matrix_layout, char uplo, lapack_int n,
  2066                             lapack_complex_double* a, lapack_int lda, double* d,
  2067                             double* e, lapack_complex_double* tau );
  2068  
  2069  lapack_int LAPACKE_chetrf( int matrix_layout, char uplo, lapack_int n,
  2070                             lapack_complex_float* a, lapack_int lda,
  2071                             lapack_int* ipiv );
  2072  lapack_int LAPACKE_zhetrf( int matrix_layout, char uplo, lapack_int n,
  2073                             lapack_complex_double* a, lapack_int lda,
  2074                             lapack_int* ipiv );
  2075  
  2076  lapack_int LAPACKE_chetri( int matrix_layout, char uplo, lapack_int n,
  2077                             lapack_complex_float* a, lapack_int lda,
  2078                             const lapack_int* ipiv );
  2079  lapack_int LAPACKE_zhetri( int matrix_layout, char uplo, lapack_int n,
  2080                             lapack_complex_double* a, lapack_int lda,
  2081                             const lapack_int* ipiv );
  2082  
  2083  lapack_int LAPACKE_chetrs( int matrix_layout, char uplo, lapack_int n,
  2084                             lapack_int nrhs, const lapack_complex_float* a,
  2085                             lapack_int lda, const lapack_int* ipiv,
  2086                             lapack_complex_float* b, lapack_int ldb );
  2087  lapack_int LAPACKE_zhetrs( int matrix_layout, char uplo, lapack_int n,
  2088                             lapack_int nrhs, const lapack_complex_double* a,
  2089                             lapack_int lda, const lapack_int* ipiv,
  2090                             lapack_complex_double* b, lapack_int ldb );
  2091  
  2092  lapack_int LAPACKE_chfrk( int matrix_layout, char transr, char uplo, char trans,
  2093                            lapack_int n, lapack_int k, float alpha,
  2094                            const lapack_complex_float* a, lapack_int lda,
  2095                            float beta, lapack_complex_float* c );
  2096  lapack_int LAPACKE_zhfrk( int matrix_layout, char transr, char uplo, char trans,
  2097                            lapack_int n, lapack_int k, double alpha,
  2098                            const lapack_complex_double* a, lapack_int lda,
  2099                            double beta, lapack_complex_double* c );
  2100  
  2101  lapack_int LAPACKE_shgeqz( int matrix_layout, char job, char compq, char compz,
  2102                             lapack_int n, lapack_int ilo, lapack_int ihi,
  2103                             float* h, lapack_int ldh, float* t, lapack_int ldt,
  2104                             float* alphar, float* alphai, float* beta, float* q,
  2105                             lapack_int ldq, float* z, lapack_int ldz );
  2106  lapack_int LAPACKE_dhgeqz( int matrix_layout, char job, char compq, char compz,
  2107                             lapack_int n, lapack_int ilo, lapack_int ihi,
  2108                             double* h, lapack_int ldh, double* t, lapack_int ldt,
  2109                             double* alphar, double* alphai, double* beta,
  2110                             double* q, lapack_int ldq, double* z,
  2111                             lapack_int ldz );
  2112  lapack_int LAPACKE_chgeqz( int matrix_layout, char job, char compq, char compz,
  2113                             lapack_int n, lapack_int ilo, lapack_int ihi,
  2114                             lapack_complex_float* h, lapack_int ldh,
  2115                             lapack_complex_float* t, lapack_int ldt,
  2116                             lapack_complex_float* alpha,
  2117                             lapack_complex_float* beta, lapack_complex_float* q,
  2118                             lapack_int ldq, lapack_complex_float* z,
  2119                             lapack_int ldz );
  2120  lapack_int LAPACKE_zhgeqz( int matrix_layout, char job, char compq, char compz,
  2121                             lapack_int n, lapack_int ilo, lapack_int ihi,
  2122                             lapack_complex_double* h, lapack_int ldh,
  2123                             lapack_complex_double* t, lapack_int ldt,
  2124                             lapack_complex_double* alpha,
  2125                             lapack_complex_double* beta,
  2126                             lapack_complex_double* q, lapack_int ldq,
  2127                             lapack_complex_double* z, lapack_int ldz );
  2128  
  2129  lapack_int LAPACKE_chpcon( int matrix_layout, char uplo, lapack_int n,
  2130                             const lapack_complex_float* ap,
  2131                             const lapack_int* ipiv, float anorm, float* rcond );
  2132  lapack_int LAPACKE_zhpcon( int matrix_layout, char uplo, lapack_int n,
  2133                             const lapack_complex_double* ap,
  2134                             const lapack_int* ipiv, double anorm,
  2135                             double* rcond );
  2136  
  2137  lapack_int LAPACKE_chpev( int matrix_layout, char jobz, char uplo, lapack_int n,
  2138                            lapack_complex_float* ap, float* w,
  2139                            lapack_complex_float* z, lapack_int ldz );
  2140  lapack_int LAPACKE_zhpev( int matrix_layout, char jobz, char uplo, lapack_int n,
  2141                            lapack_complex_double* ap, double* w,
  2142                            lapack_complex_double* z, lapack_int ldz );
  2143  
  2144  lapack_int LAPACKE_chpevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  2145                             lapack_complex_float* ap, float* w,
  2146                             lapack_complex_float* z, lapack_int ldz );
  2147  lapack_int LAPACKE_zhpevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  2148                             lapack_complex_double* ap, double* w,
  2149                             lapack_complex_double* z, lapack_int ldz );
  2150  
  2151  lapack_int LAPACKE_chpevx( int matrix_layout, char jobz, char range, char uplo,
  2152                             lapack_int n, lapack_complex_float* ap, float vl,
  2153                             float vu, lapack_int il, lapack_int iu, float abstol,
  2154                             lapack_int* m, float* w, lapack_complex_float* z,
  2155                             lapack_int ldz, lapack_int* ifail );
  2156  lapack_int LAPACKE_zhpevx( int matrix_layout, char jobz, char range, char uplo,
  2157                             lapack_int n, lapack_complex_double* ap, double vl,
  2158                             double vu, lapack_int il, lapack_int iu,
  2159                             double abstol, lapack_int* m, double* w,
  2160                             lapack_complex_double* z, lapack_int ldz,
  2161                             lapack_int* ifail );
  2162  
  2163  lapack_int LAPACKE_chpgst( int matrix_layout, lapack_int itype, char uplo,
  2164                             lapack_int n, lapack_complex_float* ap,
  2165                             const lapack_complex_float* bp );
  2166  lapack_int LAPACKE_zhpgst( int matrix_layout, lapack_int itype, char uplo,
  2167                             lapack_int n, lapack_complex_double* ap,
  2168                             const lapack_complex_double* bp );
  2169  
  2170  lapack_int LAPACKE_chpgv( int matrix_layout, lapack_int itype, char jobz,
  2171                            char uplo, lapack_int n, lapack_complex_float* ap,
  2172                            lapack_complex_float* bp, float* w,
  2173                            lapack_complex_float* z, lapack_int ldz );
  2174  lapack_int LAPACKE_zhpgv( int matrix_layout, lapack_int itype, char jobz,
  2175                            char uplo, lapack_int n, lapack_complex_double* ap,
  2176                            lapack_complex_double* bp, double* w,
  2177                            lapack_complex_double* z, lapack_int ldz );
  2178  
  2179  lapack_int LAPACKE_chpgvd( int matrix_layout, lapack_int itype, char jobz,
  2180                             char uplo, lapack_int n, lapack_complex_float* ap,
  2181                             lapack_complex_float* bp, float* w,
  2182                             lapack_complex_float* z, lapack_int ldz );
  2183  lapack_int LAPACKE_zhpgvd( int matrix_layout, lapack_int itype, char jobz,
  2184                             char uplo, lapack_int n, lapack_complex_double* ap,
  2185                             lapack_complex_double* bp, double* w,
  2186                             lapack_complex_double* z, lapack_int ldz );
  2187  
  2188  lapack_int LAPACKE_chpgvx( int matrix_layout, lapack_int itype, char jobz,
  2189                             char range, char uplo, lapack_int n,
  2190                             lapack_complex_float* ap, lapack_complex_float* bp,
  2191                             float vl, float vu, lapack_int il, lapack_int iu,
  2192                             float abstol, lapack_int* m, float* w,
  2193                             lapack_complex_float* z, lapack_int ldz,
  2194                             lapack_int* ifail );
  2195  lapack_int LAPACKE_zhpgvx( int matrix_layout, lapack_int itype, char jobz,
  2196                             char range, char uplo, lapack_int n,
  2197                             lapack_complex_double* ap, lapack_complex_double* bp,
  2198                             double vl, double vu, lapack_int il, lapack_int iu,
  2199                             double abstol, lapack_int* m, double* w,
  2200                             lapack_complex_double* z, lapack_int ldz,
  2201                             lapack_int* ifail );
  2202  
  2203  lapack_int LAPACKE_chprfs( int matrix_layout, char uplo, lapack_int n,
  2204                             lapack_int nrhs, const lapack_complex_float* ap,
  2205                             const lapack_complex_float* afp,
  2206                             const lapack_int* ipiv,
  2207                             const lapack_complex_float* b, lapack_int ldb,
  2208                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  2209                             float* berr );
  2210  lapack_int LAPACKE_zhprfs( int matrix_layout, char uplo, lapack_int n,
  2211                             lapack_int nrhs, const lapack_complex_double* ap,
  2212                             const lapack_complex_double* afp,
  2213                             const lapack_int* ipiv,
  2214                             const lapack_complex_double* b, lapack_int ldb,
  2215                             lapack_complex_double* x, lapack_int ldx,
  2216                             double* ferr, double* berr );
  2217  
  2218  lapack_int LAPACKE_chpsv( int matrix_layout, char uplo, lapack_int n,
  2219                            lapack_int nrhs, lapack_complex_float* ap,
  2220                            lapack_int* ipiv, lapack_complex_float* b,
  2221                            lapack_int ldb );
  2222  lapack_int LAPACKE_zhpsv( int matrix_layout, char uplo, lapack_int n,
  2223                            lapack_int nrhs, lapack_complex_double* ap,
  2224                            lapack_int* ipiv, lapack_complex_double* b,
  2225                            lapack_int ldb );
  2226  
  2227  lapack_int LAPACKE_chpsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2228                             lapack_int nrhs, const lapack_complex_float* ap,
  2229                             lapack_complex_float* afp, lapack_int* ipiv,
  2230                             const lapack_complex_float* b, lapack_int ldb,
  2231                             lapack_complex_float* x, lapack_int ldx,
  2232                             float* rcond, float* ferr, float* berr );
  2233  lapack_int LAPACKE_zhpsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2234                             lapack_int nrhs, const lapack_complex_double* ap,
  2235                             lapack_complex_double* afp, lapack_int* ipiv,
  2236                             const lapack_complex_double* b, lapack_int ldb,
  2237                             lapack_complex_double* x, lapack_int ldx,
  2238                             double* rcond, double* ferr, double* berr );
  2239  
  2240  lapack_int LAPACKE_chptrd( int matrix_layout, char uplo, lapack_int n,
  2241                             lapack_complex_float* ap, float* d, float* e,
  2242                             lapack_complex_float* tau );
  2243  lapack_int LAPACKE_zhptrd( int matrix_layout, char uplo, lapack_int n,
  2244                             lapack_complex_double* ap, double* d, double* e,
  2245                             lapack_complex_double* tau );
  2246  
  2247  lapack_int LAPACKE_chptrf( int matrix_layout, char uplo, lapack_int n,
  2248                             lapack_complex_float* ap, lapack_int* ipiv );
  2249  lapack_int LAPACKE_zhptrf( int matrix_layout, char uplo, lapack_int n,
  2250                             lapack_complex_double* ap, lapack_int* ipiv );
  2251  
  2252  lapack_int LAPACKE_chptri( int matrix_layout, char uplo, lapack_int n,
  2253                             lapack_complex_float* ap, const lapack_int* ipiv );
  2254  lapack_int LAPACKE_zhptri( int matrix_layout, char uplo, lapack_int n,
  2255                             lapack_complex_double* ap, const lapack_int* ipiv );
  2256  
  2257  lapack_int LAPACKE_chptrs( int matrix_layout, char uplo, lapack_int n,
  2258                             lapack_int nrhs, const lapack_complex_float* ap,
  2259                             const lapack_int* ipiv, lapack_complex_float* b,
  2260                             lapack_int ldb );
  2261  lapack_int LAPACKE_zhptrs( int matrix_layout, char uplo, lapack_int n,
  2262                             lapack_int nrhs, const lapack_complex_double* ap,
  2263                             const lapack_int* ipiv, lapack_complex_double* b,
  2264                             lapack_int ldb );
  2265  
  2266  lapack_int LAPACKE_shsein( int matrix_layout, char job, char eigsrc, char initv,
  2267                             lapack_logical* select, lapack_int n, const float* h,
  2268                             lapack_int ldh, float* wr, const float* wi,
  2269                             float* vl, lapack_int ldvl, float* vr,
  2270                             lapack_int ldvr, lapack_int mm, lapack_int* m,
  2271                             lapack_int* ifaill, lapack_int* ifailr );
  2272  lapack_int LAPACKE_dhsein( int matrix_layout, char job, char eigsrc, char initv,
  2273                             lapack_logical* select, lapack_int n,
  2274                             const double* h, lapack_int ldh, double* wr,
  2275                             const double* wi, double* vl, lapack_int ldvl,
  2276                             double* vr, lapack_int ldvr, lapack_int mm,
  2277                             lapack_int* m, lapack_int* ifaill,
  2278                             lapack_int* ifailr );
  2279  lapack_int LAPACKE_chsein( int matrix_layout, char job, char eigsrc, char initv,
  2280                             const lapack_logical* select, lapack_int n,
  2281                             const lapack_complex_float* h, lapack_int ldh,
  2282                             lapack_complex_float* w, lapack_complex_float* vl,
  2283                             lapack_int ldvl, lapack_complex_float* vr,
  2284                             lapack_int ldvr, lapack_int mm, lapack_int* m,
  2285                             lapack_int* ifaill, lapack_int* ifailr );
  2286  lapack_int LAPACKE_zhsein( int matrix_layout, char job, char eigsrc, char initv,
  2287                             const lapack_logical* select, lapack_int n,
  2288                             const lapack_complex_double* h, lapack_int ldh,
  2289                             lapack_complex_double* w, lapack_complex_double* vl,
  2290                             lapack_int ldvl, lapack_complex_double* vr,
  2291                             lapack_int ldvr, lapack_int mm, lapack_int* m,
  2292                             lapack_int* ifaill, lapack_int* ifailr );
  2293  
  2294  lapack_int LAPACKE_shseqr( int matrix_layout, char job, char compz, lapack_int n,
  2295                             lapack_int ilo, lapack_int ihi, float* h,
  2296                             lapack_int ldh, float* wr, float* wi, float* z,
  2297                             lapack_int ldz );
  2298  lapack_int LAPACKE_dhseqr( int matrix_layout, char job, char compz, lapack_int n,
  2299                             lapack_int ilo, lapack_int ihi, double* h,
  2300                             lapack_int ldh, double* wr, double* wi, double* z,
  2301                             lapack_int ldz );
  2302  lapack_int LAPACKE_chseqr( int matrix_layout, char job, char compz, lapack_int n,
  2303                             lapack_int ilo, lapack_int ihi,
  2304                             lapack_complex_float* h, lapack_int ldh,
  2305                             lapack_complex_float* w, lapack_complex_float* z,
  2306                             lapack_int ldz );
  2307  lapack_int LAPACKE_zhseqr( int matrix_layout, char job, char compz, lapack_int n,
  2308                             lapack_int ilo, lapack_int ihi,
  2309                             lapack_complex_double* h, lapack_int ldh,
  2310                             lapack_complex_double* w, lapack_complex_double* z,
  2311                             lapack_int ldz );
  2312  
  2313  lapack_int LAPACKE_clacgv( lapack_int n, lapack_complex_float* x,
  2314                             lapack_int incx );
  2315  lapack_int LAPACKE_zlacgv( lapack_int n, lapack_complex_double* x,
  2316                             lapack_int incx );
  2317  
  2318  lapack_int LAPACKE_slacn2( lapack_int n, float* v, float* x, lapack_int* isgn,
  2319                             float* est, lapack_int* kase, lapack_int* isave );
  2320  lapack_int LAPACKE_dlacn2( lapack_int n, double* v, double* x, lapack_int* isgn,
  2321                             double* est, lapack_int* kase, lapack_int* isave );
  2322  lapack_int LAPACKE_clacn2( lapack_int n, lapack_complex_float* v,
  2323                             lapack_complex_float* x,
  2324                             float* est, lapack_int* kase, lapack_int* isave );
  2325  lapack_int LAPACKE_zlacn2( lapack_int n, lapack_complex_double* v,
  2326                             lapack_complex_double* x,
  2327                             double* est, lapack_int* kase, lapack_int* isave );
  2328  
  2329  lapack_int LAPACKE_slacpy( int matrix_layout, char uplo, lapack_int m,
  2330                             lapack_int n, const float* a, lapack_int lda, float* b,
  2331                             lapack_int ldb );
  2332  lapack_int LAPACKE_dlacpy( int matrix_layout, char uplo, lapack_int m,
  2333                             lapack_int n, const double* a, lapack_int lda, double* b,
  2334                             lapack_int ldb );
  2335  lapack_int LAPACKE_clacpy( int matrix_layout, char uplo, lapack_int m,
  2336                             lapack_int n, const lapack_complex_float* a,
  2337                             lapack_int lda, lapack_complex_float* b,
  2338                             lapack_int ldb );
  2339  lapack_int LAPACKE_zlacpy( int matrix_layout, char uplo, lapack_int m,
  2340                             lapack_int n, const lapack_complex_double* a,
  2341                             lapack_int lda, lapack_complex_double* b,
  2342                             lapack_int ldb );
  2343  
  2344  lapack_int LAPACKE_clacp2( int matrix_layout, char uplo, lapack_int m,
  2345                             lapack_int n, const float* a, lapack_int lda,
  2346                             lapack_complex_float* b, lapack_int ldb );
  2347  lapack_int LAPACKE_zlacp2( int matrix_layout, char uplo, lapack_int m,
  2348                             lapack_int n, const double* a, lapack_int lda,
  2349                             lapack_complex_double* b, lapack_int ldb );
  2350  
  2351  lapack_int LAPACKE_zlag2c( int matrix_layout, lapack_int m, lapack_int n,
  2352                             const lapack_complex_double* a, lapack_int lda,
  2353                             lapack_complex_float* sa, lapack_int ldsa );
  2354  
  2355  lapack_int LAPACKE_slag2d( int matrix_layout, lapack_int m, lapack_int n,
  2356                             const float* sa, lapack_int ldsa, double* a,
  2357                             lapack_int lda );
  2358  
  2359  lapack_int LAPACKE_dlag2s( int matrix_layout, lapack_int m, lapack_int n,
  2360                             const double* a, lapack_int lda, float* sa,
  2361                             lapack_int ldsa );
  2362  
  2363  lapack_int LAPACKE_clag2z( int matrix_layout, lapack_int m, lapack_int n,
  2364                             const lapack_complex_float* sa, lapack_int ldsa,
  2365                             lapack_complex_double* a, lapack_int lda );
  2366  
  2367  lapack_int LAPACKE_slagge( int matrix_layout, lapack_int m, lapack_int n,
  2368                             lapack_int kl, lapack_int ku, const float* d,
  2369                             float* a, lapack_int lda, lapack_int* iseed );
  2370  lapack_int LAPACKE_dlagge( int matrix_layout, lapack_int m, lapack_int n,
  2371                             lapack_int kl, lapack_int ku, const double* d,
  2372                             double* a, lapack_int lda, lapack_int* iseed );
  2373  lapack_int LAPACKE_clagge( int matrix_layout, lapack_int m, lapack_int n,
  2374                             lapack_int kl, lapack_int ku, const float* d,
  2375                             lapack_complex_float* a, lapack_int lda,
  2376                             lapack_int* iseed );
  2377  lapack_int LAPACKE_zlagge( int matrix_layout, lapack_int m, lapack_int n,
  2378                             lapack_int kl, lapack_int ku, const double* d,
  2379                             lapack_complex_double* a, lapack_int lda,
  2380                             lapack_int* iseed );
  2381  
  2382  float LAPACKE_slamch( char cmach );
  2383  double LAPACKE_dlamch( char cmach );
  2384  
  2385  float LAPACKE_slange( int matrix_layout, char norm, lapack_int m,
  2386                             lapack_int n, const float* a, lapack_int lda );
  2387  double LAPACKE_dlange( int matrix_layout, char norm, lapack_int m,
  2388                             lapack_int n, const double* a, lapack_int lda );
  2389  float LAPACKE_clange( int matrix_layout, char norm, lapack_int m,
  2390                             lapack_int n, const lapack_complex_float* a,
  2391                             lapack_int lda );
  2392  double LAPACKE_zlange( int matrix_layout, char norm, lapack_int m,
  2393                             lapack_int n, const lapack_complex_double* a,
  2394                             lapack_int lda );
  2395  
  2396  float LAPACKE_clanhe( int matrix_layout, char norm, char uplo, lapack_int n,
  2397                             const lapack_complex_float* a, lapack_int lda );
  2398  double LAPACKE_zlanhe( int matrix_layout, char norm, char uplo, lapack_int n,
  2399                             const lapack_complex_double* a, lapack_int lda );
  2400  
  2401  float LAPACKE_slansy( int matrix_layout, char norm, char uplo, lapack_int n,
  2402                             const float* a, lapack_int lda );
  2403  double LAPACKE_dlansy( int matrix_layout, char norm, char uplo, lapack_int n,
  2404                             const double* a, lapack_int lda );
  2405  float LAPACKE_clansy( int matrix_layout, char norm, char uplo, lapack_int n,
  2406                             const lapack_complex_float* a, lapack_int lda );
  2407  double LAPACKE_zlansy( int matrix_layout, char norm, char uplo, lapack_int n,
  2408                             const lapack_complex_double* a, lapack_int lda );
  2409  
  2410  float LAPACKE_slantr( int matrix_layout, char norm, char uplo, char diag,
  2411                             lapack_int m, lapack_int n, const float* a,
  2412                             lapack_int lda );
  2413  double LAPACKE_dlantr( int matrix_layout, char norm, char uplo, char diag,
  2414                             lapack_int m, lapack_int n, const double* a,
  2415                             lapack_int lda );
  2416  float LAPACKE_clantr( int matrix_layout, char norm, char uplo, char diag,
  2417                             lapack_int m, lapack_int n, const lapack_complex_float* a,
  2418                             lapack_int lda );
  2419  double LAPACKE_zlantr( int matrix_layout, char norm, char uplo, char diag,
  2420                             lapack_int m, lapack_int n, const lapack_complex_double* a,
  2421                             lapack_int lda );
  2422  
  2423  
  2424  lapack_int LAPACKE_slarfb( int matrix_layout, char side, char trans, char direct,
  2425                             char storev, lapack_int m, lapack_int n,
  2426                             lapack_int k, const float* v, lapack_int ldv,
  2427                             const float* t, lapack_int ldt, float* c,
  2428                             lapack_int ldc );
  2429  lapack_int LAPACKE_dlarfb( int matrix_layout, char side, char trans, char direct,
  2430                             char storev, lapack_int m, lapack_int n,
  2431                             lapack_int k, const double* v, lapack_int ldv,
  2432                             const double* t, lapack_int ldt, double* c,
  2433                             lapack_int ldc );
  2434  lapack_int LAPACKE_clarfb( int matrix_layout, char side, char trans, char direct,
  2435                             char storev, lapack_int m, lapack_int n,
  2436                             lapack_int k, const lapack_complex_float* v,
  2437                             lapack_int ldv, const lapack_complex_float* t,
  2438                             lapack_int ldt, lapack_complex_float* c,
  2439                             lapack_int ldc );
  2440  lapack_int LAPACKE_zlarfb( int matrix_layout, char side, char trans, char direct,
  2441                             char storev, lapack_int m, lapack_int n,
  2442                             lapack_int k, const lapack_complex_double* v,
  2443                             lapack_int ldv, const lapack_complex_double* t,
  2444                             lapack_int ldt, lapack_complex_double* c,
  2445                             lapack_int ldc );
  2446  
  2447  lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
  2448                             lapack_int incx, float* tau );
  2449  lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
  2450                             lapack_int incx, double* tau );
  2451  lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
  2452                             lapack_complex_float* x, lapack_int incx,
  2453                             lapack_complex_float* tau );
  2454  lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
  2455                             lapack_complex_double* x, lapack_int incx,
  2456                             lapack_complex_double* tau );
  2457  
  2458  lapack_int LAPACKE_slarft( int matrix_layout, char direct, char storev,
  2459                             lapack_int n, lapack_int k, const float* v,
  2460                             lapack_int ldv, const float* tau, float* t,
  2461                             lapack_int ldt );
  2462  lapack_int LAPACKE_dlarft( int matrix_layout, char direct, char storev,
  2463                             lapack_int n, lapack_int k, const double* v,
  2464                             lapack_int ldv, const double* tau, double* t,
  2465                             lapack_int ldt );
  2466  lapack_int LAPACKE_clarft( int matrix_layout, char direct, char storev,
  2467                             lapack_int n, lapack_int k,
  2468                             const lapack_complex_float* v, lapack_int ldv,
  2469                             const lapack_complex_float* tau,
  2470                             lapack_complex_float* t, lapack_int ldt );
  2471  lapack_int LAPACKE_zlarft( int matrix_layout, char direct, char storev,
  2472                             lapack_int n, lapack_int k,
  2473                             const lapack_complex_double* v, lapack_int ldv,
  2474                             const lapack_complex_double* tau,
  2475                             lapack_complex_double* t, lapack_int ldt );
  2476  
  2477  lapack_int LAPACKE_slarfx( int matrix_layout, char side, lapack_int m,
  2478                             lapack_int n, const float* v, float tau, float* c,
  2479                             lapack_int ldc, float* work );
  2480  lapack_int LAPACKE_dlarfx( int matrix_layout, char side, lapack_int m,
  2481                             lapack_int n, const double* v, double tau, double* c,
  2482                             lapack_int ldc, double* work );
  2483  lapack_int LAPACKE_clarfx( int matrix_layout, char side, lapack_int m,
  2484                             lapack_int n, const lapack_complex_float* v,
  2485                             lapack_complex_float tau, lapack_complex_float* c,
  2486                             lapack_int ldc, lapack_complex_float* work );
  2487  lapack_int LAPACKE_zlarfx( int matrix_layout, char side, lapack_int m,
  2488                             lapack_int n, const lapack_complex_double* v,
  2489                             lapack_complex_double tau, lapack_complex_double* c,
  2490                             lapack_int ldc, lapack_complex_double* work );
  2491  
  2492  lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
  2493                             float* x );
  2494  lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
  2495                             double* x );
  2496  lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
  2497                             lapack_complex_float* x );
  2498  lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
  2499                             lapack_complex_double* x );
  2500  
  2501  lapack_int LAPACKE_slascl( int matrix_layout, char type, lapack_int kl,
  2502                             lapack_int ku, float cfrom, float cto, 
  2503                             lapack_int m, lapack_int n, float* a, 
  2504                             lapack_int lda );
  2505  lapack_int LAPACKE_dlascl( int matrix_layout, char type, lapack_int kl,
  2506                             lapack_int ku, double cfrom, double cto, 
  2507                             lapack_int m, lapack_int n, double* a, 
  2508                             lapack_int lda );
  2509  lapack_int LAPACKE_clascl( int matrix_layout, char type, lapack_int kl,
  2510                             lapack_int ku, float cfrom, float cto, 
  2511                             lapack_int m, lapack_int n, lapack_complex_float* a, 
  2512                             lapack_int lda );
  2513  lapack_int LAPACKE_zlascl( int matrix_layout, char type, lapack_int kl,
  2514                             lapack_int ku, double cfrom, double cto, 
  2515                             lapack_int m, lapack_int n, lapack_complex_double* a, 
  2516                             lapack_int lda );
  2517  
  2518  lapack_int LAPACKE_slaset( int matrix_layout, char uplo, lapack_int m,
  2519                             lapack_int n, float alpha, float beta, float* a,
  2520                             lapack_int lda );
  2521  lapack_int LAPACKE_dlaset( int matrix_layout, char uplo, lapack_int m,
  2522                             lapack_int n, double alpha, double beta, double* a,
  2523                             lapack_int lda );
  2524  lapack_int LAPACKE_claset( int matrix_layout, char uplo, lapack_int m,
  2525                             lapack_int n, lapack_complex_float alpha,
  2526                             lapack_complex_float beta, lapack_complex_float* a,
  2527                             lapack_int lda );
  2528  lapack_int LAPACKE_zlaset( int matrix_layout, char uplo, lapack_int m,
  2529                             lapack_int n, lapack_complex_double alpha,
  2530                             lapack_complex_double beta, lapack_complex_double* a,
  2531                             lapack_int lda );
  2532  
  2533  lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
  2534  lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
  2535  
  2536  lapack_int LAPACKE_slaswp( int matrix_layout, lapack_int n, float* a,
  2537                             lapack_int lda, lapack_int k1, lapack_int k2,
  2538                             const lapack_int* ipiv, lapack_int incx );
  2539  lapack_int LAPACKE_dlaswp( int matrix_layout, lapack_int n, double* a,
  2540                             lapack_int lda, lapack_int k1, lapack_int k2,
  2541                             const lapack_int* ipiv, lapack_int incx );
  2542  lapack_int LAPACKE_claswp( int matrix_layout, lapack_int n,
  2543                             lapack_complex_float* a, lapack_int lda,
  2544                             lapack_int k1, lapack_int k2, const lapack_int* ipiv,
  2545                             lapack_int incx );
  2546  lapack_int LAPACKE_zlaswp( int matrix_layout, lapack_int n,
  2547                             lapack_complex_double* a, lapack_int lda,
  2548                             lapack_int k1, lapack_int k2, const lapack_int* ipiv,
  2549                             lapack_int incx );
  2550  
  2551  lapack_int LAPACKE_slatms( int matrix_layout, lapack_int m, lapack_int n,
  2552                             char dist, lapack_int* iseed, char sym, float* d,
  2553                             lapack_int mode, float cond, float dmax,
  2554                             lapack_int kl, lapack_int ku, char pack, float* a,
  2555                             lapack_int lda );
  2556  lapack_int LAPACKE_dlatms( int matrix_layout, lapack_int m, lapack_int n,
  2557                             char dist, lapack_int* iseed, char sym, double* d,
  2558                             lapack_int mode, double cond, double dmax,
  2559                             lapack_int kl, lapack_int ku, char pack, double* a,
  2560                             lapack_int lda );
  2561  lapack_int LAPACKE_clatms( int matrix_layout, lapack_int m, lapack_int n,
  2562                             char dist, lapack_int* iseed, char sym, float* d,
  2563                             lapack_int mode, float cond, float dmax,
  2564                             lapack_int kl, lapack_int ku, char pack,
  2565                             lapack_complex_float* a, lapack_int lda );
  2566  lapack_int LAPACKE_zlatms( int matrix_layout, lapack_int m, lapack_int n,
  2567                             char dist, lapack_int* iseed, char sym, double* d,
  2568                             lapack_int mode, double cond, double dmax,
  2569                             lapack_int kl, lapack_int ku, char pack,
  2570                             lapack_complex_double* a, lapack_int lda );
  2571  
  2572  lapack_int LAPACKE_slauum( int matrix_layout, char uplo, lapack_int n, float* a,
  2573                             lapack_int lda );
  2574  lapack_int LAPACKE_dlauum( int matrix_layout, char uplo, lapack_int n, double* a,
  2575                             lapack_int lda );
  2576  lapack_int LAPACKE_clauum( int matrix_layout, char uplo, lapack_int n,
  2577                             lapack_complex_float* a, lapack_int lda );
  2578  lapack_int LAPACKE_zlauum( int matrix_layout, char uplo, lapack_int n,
  2579                             lapack_complex_double* a, lapack_int lda );
  2580  
  2581  lapack_int LAPACKE_sopgtr( int matrix_layout, char uplo, lapack_int n,
  2582                             const float* ap, const float* tau, float* q,
  2583                             lapack_int ldq );
  2584  lapack_int LAPACKE_dopgtr( int matrix_layout, char uplo, lapack_int n,
  2585                             const double* ap, const double* tau, double* q,
  2586                             lapack_int ldq );
  2587  
  2588  lapack_int LAPACKE_sopmtr( int matrix_layout, char side, char uplo, char trans,
  2589                             lapack_int m, lapack_int n, const float* ap,
  2590                             const float* tau, float* c, lapack_int ldc );
  2591  lapack_int LAPACKE_dopmtr( int matrix_layout, char side, char uplo, char trans,
  2592                             lapack_int m, lapack_int n, const double* ap,
  2593                             const double* tau, double* c, lapack_int ldc );
  2594  
  2595  lapack_int LAPACKE_sorgbr( int matrix_layout, char vect, lapack_int m,
  2596                             lapack_int n, lapack_int k, float* a, lapack_int lda,
  2597                             const float* tau );
  2598  lapack_int LAPACKE_dorgbr( int matrix_layout, char vect, lapack_int m,
  2599                             lapack_int n, lapack_int k, double* a,
  2600                             lapack_int lda, const double* tau );
  2601  
  2602  lapack_int LAPACKE_sorghr( int matrix_layout, lapack_int n, lapack_int ilo,
  2603                             lapack_int ihi, float* a, lapack_int lda,
  2604                             const float* tau );
  2605  lapack_int LAPACKE_dorghr( int matrix_layout, lapack_int n, lapack_int ilo,
  2606                             lapack_int ihi, double* a, lapack_int lda,
  2607                             const double* tau );
  2608  
  2609  lapack_int LAPACKE_sorglq( int matrix_layout, lapack_int m, lapack_int n,
  2610                             lapack_int k, float* a, lapack_int lda,
  2611                             const float* tau );
  2612  lapack_int LAPACKE_dorglq( int matrix_layout, lapack_int m, lapack_int n,
  2613                             lapack_int k, double* a, lapack_int lda,
  2614                             const double* tau );
  2615  
  2616  lapack_int LAPACKE_sorgql( int matrix_layout, lapack_int m, lapack_int n,
  2617                             lapack_int k, float* a, lapack_int lda,
  2618                             const float* tau );
  2619  lapack_int LAPACKE_dorgql( int matrix_layout, lapack_int m, lapack_int n,
  2620                             lapack_int k, double* a, lapack_int lda,
  2621                             const double* tau );
  2622  
  2623  lapack_int LAPACKE_sorgqr( int matrix_layout, lapack_int m, lapack_int n,
  2624                             lapack_int k, float* a, lapack_int lda,
  2625                             const float* tau );
  2626  lapack_int LAPACKE_dorgqr( int matrix_layout, lapack_int m, lapack_int n,
  2627                             lapack_int k, double* a, lapack_int lda,
  2628                             const double* tau );
  2629  
  2630  lapack_int LAPACKE_sorgrq( int matrix_layout, lapack_int m, lapack_int n,
  2631                             lapack_int k, float* a, lapack_int lda,
  2632                             const float* tau );
  2633  lapack_int LAPACKE_dorgrq( int matrix_layout, lapack_int m, lapack_int n,
  2634                             lapack_int k, double* a, lapack_int lda,
  2635                             const double* tau );
  2636  
  2637  lapack_int LAPACKE_sorgtr( int matrix_layout, char uplo, lapack_int n, float* a,
  2638                             lapack_int lda, const float* tau );
  2639  lapack_int LAPACKE_dorgtr( int matrix_layout, char uplo, lapack_int n, double* a,
  2640                             lapack_int lda, const double* tau );
  2641  
  2642  lapack_int LAPACKE_sormbr( int matrix_layout, char vect, char side, char trans,
  2643                             lapack_int m, lapack_int n, lapack_int k,
  2644                             const float* a, lapack_int lda, const float* tau,
  2645                             float* c, lapack_int ldc );
  2646  lapack_int LAPACKE_dormbr( int matrix_layout, char vect, char side, char trans,
  2647                             lapack_int m, lapack_int n, lapack_int k,
  2648                             const double* a, lapack_int lda, const double* tau,
  2649                             double* c, lapack_int ldc );
  2650  
  2651  lapack_int LAPACKE_sormhr( int matrix_layout, char side, char trans,
  2652                             lapack_int m, lapack_int n, lapack_int ilo,
  2653                             lapack_int ihi, const float* a, lapack_int lda,
  2654                             const float* tau, float* c, lapack_int ldc );
  2655  lapack_int LAPACKE_dormhr( int matrix_layout, char side, char trans,
  2656                             lapack_int m, lapack_int n, lapack_int ilo,
  2657                             lapack_int ihi, const double* a, lapack_int lda,
  2658                             const double* tau, double* c, lapack_int ldc );
  2659  
  2660  lapack_int LAPACKE_sormlq( int matrix_layout, char side, char trans,
  2661                             lapack_int m, lapack_int n, lapack_int k,
  2662                             const float* a, lapack_int lda, const float* tau,
  2663                             float* c, lapack_int ldc );
  2664  lapack_int LAPACKE_dormlq( int matrix_layout, char side, char trans,
  2665                             lapack_int m, lapack_int n, lapack_int k,
  2666                             const double* a, lapack_int lda, const double* tau,
  2667                             double* c, lapack_int ldc );
  2668  
  2669  lapack_int LAPACKE_sormql( int matrix_layout, char side, char trans,
  2670                             lapack_int m, lapack_int n, lapack_int k,
  2671                             const float* a, lapack_int lda, const float* tau,
  2672                             float* c, lapack_int ldc );
  2673  lapack_int LAPACKE_dormql( int matrix_layout, char side, char trans,
  2674                             lapack_int m, lapack_int n, lapack_int k,
  2675                             const double* a, lapack_int lda, const double* tau,
  2676                             double* c, lapack_int ldc );
  2677  
  2678  lapack_int LAPACKE_sormqr( int matrix_layout, char side, char trans,
  2679                             lapack_int m, lapack_int n, lapack_int k,
  2680                             const float* a, lapack_int lda, const float* tau,
  2681                             float* c, lapack_int ldc );
  2682  lapack_int LAPACKE_dormqr( int matrix_layout, char side, char trans,
  2683                             lapack_int m, lapack_int n, lapack_int k,
  2684                             const double* a, lapack_int lda, const double* tau,
  2685                             double* c, lapack_int ldc );
  2686  
  2687  lapack_int LAPACKE_sormrq( int matrix_layout, char side, char trans,
  2688                             lapack_int m, lapack_int n, lapack_int k,
  2689                             const float* a, lapack_int lda, const float* tau,
  2690                             float* c, lapack_int ldc );
  2691  lapack_int LAPACKE_dormrq( int matrix_layout, char side, char trans,
  2692                             lapack_int m, lapack_int n, lapack_int k,
  2693                             const double* a, lapack_int lda, const double* tau,
  2694                             double* c, lapack_int ldc );
  2695  
  2696  lapack_int LAPACKE_sormrz( int matrix_layout, char side, char trans,
  2697                             lapack_int m, lapack_int n, lapack_int k,
  2698                             lapack_int l, const float* a, lapack_int lda,
  2699                             const float* tau, float* c, lapack_int ldc );
  2700  lapack_int LAPACKE_dormrz( int matrix_layout, char side, char trans,
  2701                             lapack_int m, lapack_int n, lapack_int k,
  2702                             lapack_int l, const double* a, lapack_int lda,
  2703                             const double* tau, double* c, lapack_int ldc );
  2704  
  2705  lapack_int LAPACKE_sormtr( int matrix_layout, char side, char uplo, char trans,
  2706                             lapack_int m, lapack_int n, const float* a,
  2707                             lapack_int lda, const float* tau, float* c,
  2708                             lapack_int ldc );
  2709  lapack_int LAPACKE_dormtr( int matrix_layout, char side, char uplo, char trans,
  2710                             lapack_int m, lapack_int n, const double* a,
  2711                             lapack_int lda, const double* tau, double* c,
  2712                             lapack_int ldc );
  2713  
  2714  lapack_int LAPACKE_spbcon( int matrix_layout, char uplo, lapack_int n,
  2715                             lapack_int kd, const float* ab, lapack_int ldab,
  2716                             float anorm, float* rcond );
  2717  lapack_int LAPACKE_dpbcon( int matrix_layout, char uplo, lapack_int n,
  2718                             lapack_int kd, const double* ab, lapack_int ldab,
  2719                             double anorm, double* rcond );
  2720  lapack_int LAPACKE_cpbcon( int matrix_layout, char uplo, lapack_int n,
  2721                             lapack_int kd, const lapack_complex_float* ab,
  2722                             lapack_int ldab, float anorm, float* rcond );
  2723  lapack_int LAPACKE_zpbcon( int matrix_layout, char uplo, lapack_int n,
  2724                             lapack_int kd, const lapack_complex_double* ab,
  2725                             lapack_int ldab, double anorm, double* rcond );
  2726  
  2727  lapack_int LAPACKE_spbequ( int matrix_layout, char uplo, lapack_int n,
  2728                             lapack_int kd, const float* ab, lapack_int ldab,
  2729                             float* s, float* scond, float* amax );
  2730  lapack_int LAPACKE_dpbequ( int matrix_layout, char uplo, lapack_int n,
  2731                             lapack_int kd, const double* ab, lapack_int ldab,
  2732                             double* s, double* scond, double* amax );
  2733  lapack_int LAPACKE_cpbequ( int matrix_layout, char uplo, lapack_int n,
  2734                             lapack_int kd, const lapack_complex_float* ab,
  2735                             lapack_int ldab, float* s, float* scond,
  2736                             float* amax );
  2737  lapack_int LAPACKE_zpbequ( int matrix_layout, char uplo, lapack_int n,
  2738                             lapack_int kd, const lapack_complex_double* ab,
  2739                             lapack_int ldab, double* s, double* scond,
  2740                             double* amax );
  2741  
  2742  lapack_int LAPACKE_spbrfs( int matrix_layout, char uplo, lapack_int n,
  2743                             lapack_int kd, lapack_int nrhs, const float* ab,
  2744                             lapack_int ldab, const float* afb, lapack_int ldafb,
  2745                             const float* b, lapack_int ldb, float* x,
  2746                             lapack_int ldx, float* ferr, float* berr );
  2747  lapack_int LAPACKE_dpbrfs( int matrix_layout, char uplo, lapack_int n,
  2748                             lapack_int kd, lapack_int nrhs, const double* ab,
  2749                             lapack_int ldab, const double* afb, lapack_int ldafb,
  2750                             const double* b, lapack_int ldb, double* x,
  2751                             lapack_int ldx, double* ferr, double* berr );
  2752  lapack_int LAPACKE_cpbrfs( int matrix_layout, char uplo, lapack_int n,
  2753                             lapack_int kd, lapack_int nrhs,
  2754                             const lapack_complex_float* ab, lapack_int ldab,
  2755                             const lapack_complex_float* afb, lapack_int ldafb,
  2756                             const lapack_complex_float* b, lapack_int ldb,
  2757                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  2758                             float* berr );
  2759  lapack_int LAPACKE_zpbrfs( int matrix_layout, char uplo, lapack_int n,
  2760                             lapack_int kd, lapack_int nrhs,
  2761                             const lapack_complex_double* ab, lapack_int ldab,
  2762                             const lapack_complex_double* afb, lapack_int ldafb,
  2763                             const lapack_complex_double* b, lapack_int ldb,
  2764                             lapack_complex_double* x, lapack_int ldx,
  2765                             double* ferr, double* berr );
  2766  
  2767  lapack_int LAPACKE_spbstf( int matrix_layout, char uplo, lapack_int n,
  2768                             lapack_int kb, float* bb, lapack_int ldbb );
  2769  lapack_int LAPACKE_dpbstf( int matrix_layout, char uplo, lapack_int n,
  2770                             lapack_int kb, double* bb, lapack_int ldbb );
  2771  lapack_int LAPACKE_cpbstf( int matrix_layout, char uplo, lapack_int n,
  2772                             lapack_int kb, lapack_complex_float* bb,
  2773                             lapack_int ldbb );
  2774  lapack_int LAPACKE_zpbstf( int matrix_layout, char uplo, lapack_int n,
  2775                             lapack_int kb, lapack_complex_double* bb,
  2776                             lapack_int ldbb );
  2777  
  2778  lapack_int LAPACKE_spbsv( int matrix_layout, char uplo, lapack_int n,
  2779                            lapack_int kd, lapack_int nrhs, float* ab,
  2780                            lapack_int ldab, float* b, lapack_int ldb );
  2781  lapack_int LAPACKE_dpbsv( int matrix_layout, char uplo, lapack_int n,
  2782                            lapack_int kd, lapack_int nrhs, double* ab,
  2783                            lapack_int ldab, double* b, lapack_int ldb );
  2784  lapack_int LAPACKE_cpbsv( int matrix_layout, char uplo, lapack_int n,
  2785                            lapack_int kd, lapack_int nrhs,
  2786                            lapack_complex_float* ab, lapack_int ldab,
  2787                            lapack_complex_float* b, lapack_int ldb );
  2788  lapack_int LAPACKE_zpbsv( int matrix_layout, char uplo, lapack_int n,
  2789                            lapack_int kd, lapack_int nrhs,
  2790                            lapack_complex_double* ab, lapack_int ldab,
  2791                            lapack_complex_double* b, lapack_int ldb );
  2792  
  2793  lapack_int LAPACKE_spbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2794                             lapack_int kd, lapack_int nrhs, float* ab,
  2795                             lapack_int ldab, float* afb, lapack_int ldafb,
  2796                             char* equed, float* s, float* b, lapack_int ldb,
  2797                             float* x, lapack_int ldx, float* rcond, float* ferr,
  2798                             float* berr );
  2799  lapack_int LAPACKE_dpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2800                             lapack_int kd, lapack_int nrhs, double* ab,
  2801                             lapack_int ldab, double* afb, lapack_int ldafb,
  2802                             char* equed, double* s, double* b, lapack_int ldb,
  2803                             double* x, lapack_int ldx, double* rcond,
  2804                             double* ferr, double* berr );
  2805  lapack_int LAPACKE_cpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2806                             lapack_int kd, lapack_int nrhs,
  2807                             lapack_complex_float* ab, lapack_int ldab,
  2808                             lapack_complex_float* afb, lapack_int ldafb,
  2809                             char* equed, float* s, lapack_complex_float* b,
  2810                             lapack_int ldb, lapack_complex_float* x,
  2811                             lapack_int ldx, float* rcond, float* ferr,
  2812                             float* berr );
  2813  lapack_int LAPACKE_zpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  2814                             lapack_int kd, lapack_int nrhs,
  2815                             lapack_complex_double* ab, lapack_int ldab,
  2816                             lapack_complex_double* afb, lapack_int ldafb,
  2817                             char* equed, double* s, lapack_complex_double* b,
  2818                             lapack_int ldb, lapack_complex_double* x,
  2819                             lapack_int ldx, double* rcond, double* ferr,
  2820                             double* berr );
  2821  
  2822  lapack_int LAPACKE_spbtrf( int matrix_layout, char uplo, lapack_int n,
  2823                             lapack_int kd, float* ab, lapack_int ldab );
  2824  lapack_int LAPACKE_dpbtrf( int matrix_layout, char uplo, lapack_int n,
  2825                             lapack_int kd, double* ab, lapack_int ldab );
  2826  lapack_int LAPACKE_cpbtrf( int matrix_layout, char uplo, lapack_int n,
  2827                             lapack_int kd, lapack_complex_float* ab,
  2828                             lapack_int ldab );
  2829  lapack_int LAPACKE_zpbtrf( int matrix_layout, char uplo, lapack_int n,
  2830                             lapack_int kd, lapack_complex_double* ab,
  2831                             lapack_int ldab );
  2832  
  2833  lapack_int LAPACKE_spbtrs( int matrix_layout, char uplo, lapack_int n,
  2834                             lapack_int kd, lapack_int nrhs, const float* ab,
  2835                             lapack_int ldab, float* b, lapack_int ldb );
  2836  lapack_int LAPACKE_dpbtrs( int matrix_layout, char uplo, lapack_int n,
  2837                             lapack_int kd, lapack_int nrhs, const double* ab,
  2838                             lapack_int ldab, double* b, lapack_int ldb );
  2839  lapack_int LAPACKE_cpbtrs( int matrix_layout, char uplo, lapack_int n,
  2840                             lapack_int kd, lapack_int nrhs,
  2841                             const lapack_complex_float* ab, lapack_int ldab,
  2842                             lapack_complex_float* b, lapack_int ldb );
  2843  lapack_int LAPACKE_zpbtrs( int matrix_layout, char uplo, lapack_int n,
  2844                             lapack_int kd, lapack_int nrhs,
  2845                             const lapack_complex_double* ab, lapack_int ldab,
  2846                             lapack_complex_double* b, lapack_int ldb );
  2847  
  2848  lapack_int LAPACKE_spftrf( int matrix_layout, char transr, char uplo,
  2849                             lapack_int n, float* a );
  2850  lapack_int LAPACKE_dpftrf( int matrix_layout, char transr, char uplo,
  2851                             lapack_int n, double* a );
  2852  lapack_int LAPACKE_cpftrf( int matrix_layout, char transr, char uplo,
  2853                             lapack_int n, lapack_complex_float* a );
  2854  lapack_int LAPACKE_zpftrf( int matrix_layout, char transr, char uplo,
  2855                             lapack_int n, lapack_complex_double* a );
  2856  
  2857  lapack_int LAPACKE_spftri( int matrix_layout, char transr, char uplo,
  2858                             lapack_int n, float* a );
  2859  lapack_int LAPACKE_dpftri( int matrix_layout, char transr, char uplo,
  2860                             lapack_int n, double* a );
  2861  lapack_int LAPACKE_cpftri( int matrix_layout, char transr, char uplo,
  2862                             lapack_int n, lapack_complex_float* a );
  2863  lapack_int LAPACKE_zpftri( int matrix_layout, char transr, char uplo,
  2864                             lapack_int n, lapack_complex_double* a );
  2865  
  2866  lapack_int LAPACKE_spftrs( int matrix_layout, char transr, char uplo,
  2867                             lapack_int n, lapack_int nrhs, const float* a,
  2868                             float* b, lapack_int ldb );
  2869  lapack_int LAPACKE_dpftrs( int matrix_layout, char transr, char uplo,
  2870                             lapack_int n, lapack_int nrhs, const double* a,
  2871                             double* b, lapack_int ldb );
  2872  lapack_int LAPACKE_cpftrs( int matrix_layout, char transr, char uplo,
  2873                             lapack_int n, lapack_int nrhs,
  2874                             const lapack_complex_float* a,
  2875                             lapack_complex_float* b, lapack_int ldb );
  2876  lapack_int LAPACKE_zpftrs( int matrix_layout, char transr, char uplo,
  2877                             lapack_int n, lapack_int nrhs,
  2878                             const lapack_complex_double* a,
  2879                             lapack_complex_double* b, lapack_int ldb );
  2880  
  2881  lapack_int LAPACKE_spocon( int matrix_layout, char uplo, lapack_int n,
  2882                             const float* a, lapack_int lda, float anorm,
  2883                             float* rcond );
  2884  lapack_int LAPACKE_dpocon( int matrix_layout, char uplo, lapack_int n,
  2885                             const double* a, lapack_int lda, double anorm,
  2886                             double* rcond );
  2887  lapack_int LAPACKE_cpocon( int matrix_layout, char uplo, lapack_int n,
  2888                             const lapack_complex_float* a, lapack_int lda,
  2889                             float anorm, float* rcond );
  2890  lapack_int LAPACKE_zpocon( int matrix_layout, char uplo, lapack_int n,
  2891                             const lapack_complex_double* a, lapack_int lda,
  2892                             double anorm, double* rcond );
  2893  
  2894  lapack_int LAPACKE_spoequ( int matrix_layout, lapack_int n, const float* a,
  2895                             lapack_int lda, float* s, float* scond,
  2896                             float* amax );
  2897  lapack_int LAPACKE_dpoequ( int matrix_layout, lapack_int n, const double* a,
  2898                             lapack_int lda, double* s, double* scond,
  2899                             double* amax );
  2900  lapack_int LAPACKE_cpoequ( int matrix_layout, lapack_int n,
  2901                             const lapack_complex_float* a, lapack_int lda,
  2902                             float* s, float* scond, float* amax );
  2903  lapack_int LAPACKE_zpoequ( int matrix_layout, lapack_int n,
  2904                             const lapack_complex_double* a, lapack_int lda,
  2905                             double* s, double* scond, double* amax );
  2906  
  2907  lapack_int LAPACKE_spoequb( int matrix_layout, lapack_int n, const float* a,
  2908                              lapack_int lda, float* s, float* scond,
  2909                              float* amax );
  2910  lapack_int LAPACKE_dpoequb( int matrix_layout, lapack_int n, const double* a,
  2911                              lapack_int lda, double* s, double* scond,
  2912                              double* amax );
  2913  lapack_int LAPACKE_cpoequb( int matrix_layout, lapack_int n,
  2914                              const lapack_complex_float* a, lapack_int lda,
  2915                              float* s, float* scond, float* amax );
  2916  lapack_int LAPACKE_zpoequb( int matrix_layout, lapack_int n,
  2917                              const lapack_complex_double* a, lapack_int lda,
  2918                              double* s, double* scond, double* amax );
  2919  
  2920  lapack_int LAPACKE_sporfs( int matrix_layout, char uplo, lapack_int n,
  2921                             lapack_int nrhs, const float* a, lapack_int lda,
  2922                             const float* af, lapack_int ldaf, const float* b,
  2923                             lapack_int ldb, float* x, lapack_int ldx,
  2924                             float* ferr, float* berr );
  2925  lapack_int LAPACKE_dporfs( int matrix_layout, char uplo, lapack_int n,
  2926                             lapack_int nrhs, const double* a, lapack_int lda,
  2927                             const double* af, lapack_int ldaf, const double* b,
  2928                             lapack_int ldb, double* x, lapack_int ldx,
  2929                             double* ferr, double* berr );
  2930  lapack_int LAPACKE_cporfs( int matrix_layout, char uplo, lapack_int n,
  2931                             lapack_int nrhs, const lapack_complex_float* a,
  2932                             lapack_int lda, const lapack_complex_float* af,
  2933                             lapack_int ldaf, const lapack_complex_float* b,
  2934                             lapack_int ldb, lapack_complex_float* x,
  2935                             lapack_int ldx, float* ferr, float* berr );
  2936  lapack_int LAPACKE_zporfs( int matrix_layout, char uplo, lapack_int n,
  2937                             lapack_int nrhs, const lapack_complex_double* a,
  2938                             lapack_int lda, const lapack_complex_double* af,
  2939                             lapack_int ldaf, const lapack_complex_double* b,
  2940                             lapack_int ldb, lapack_complex_double* x,
  2941                             lapack_int ldx, double* ferr, double* berr );
  2942  
  2943  lapack_int LAPACKE_sporfsx( int matrix_layout, char uplo, char equed,
  2944                              lapack_int n, lapack_int nrhs, const float* a,
  2945                              lapack_int lda, const float* af, lapack_int ldaf,
  2946                              const float* s, const float* b, lapack_int ldb,
  2947                              float* x, lapack_int ldx, float* rcond, float* berr,
  2948                              lapack_int n_err_bnds, float* err_bnds_norm,
  2949                              float* err_bnds_comp, lapack_int nparams,
  2950                              float* params );
  2951  lapack_int LAPACKE_dporfsx( int matrix_layout, char uplo, char equed,
  2952                              lapack_int n, lapack_int nrhs, const double* a,
  2953                              lapack_int lda, const double* af, lapack_int ldaf,
  2954                              const double* s, const double* b, lapack_int ldb,
  2955                              double* x, lapack_int ldx, double* rcond,
  2956                              double* berr, lapack_int n_err_bnds,
  2957                              double* err_bnds_norm, double* err_bnds_comp,
  2958                              lapack_int nparams, double* params );
  2959  lapack_int LAPACKE_cporfsx( int matrix_layout, char uplo, char equed,
  2960                              lapack_int n, lapack_int nrhs,
  2961                              const lapack_complex_float* a, lapack_int lda,
  2962                              const lapack_complex_float* af, lapack_int ldaf,
  2963                              const float* s, const lapack_complex_float* b,
  2964                              lapack_int ldb, lapack_complex_float* x,
  2965                              lapack_int ldx, float* rcond, float* berr,
  2966                              lapack_int n_err_bnds, float* err_bnds_norm,
  2967                              float* err_bnds_comp, lapack_int nparams,
  2968                              float* params );
  2969  lapack_int LAPACKE_zporfsx( int matrix_layout, char uplo, char equed,
  2970                              lapack_int n, lapack_int nrhs,
  2971                              const lapack_complex_double* a, lapack_int lda,
  2972                              const lapack_complex_double* af, lapack_int ldaf,
  2973                              const double* s, const lapack_complex_double* b,
  2974                              lapack_int ldb, lapack_complex_double* x,
  2975                              lapack_int ldx, double* rcond, double* berr,
  2976                              lapack_int n_err_bnds, double* err_bnds_norm,
  2977                              double* err_bnds_comp, lapack_int nparams,
  2978                              double* params );
  2979  
  2980  lapack_int LAPACKE_sposv( int matrix_layout, char uplo, lapack_int n,
  2981                            lapack_int nrhs, float* a, lapack_int lda, float* b,
  2982                            lapack_int ldb );
  2983  lapack_int LAPACKE_dposv( int matrix_layout, char uplo, lapack_int n,
  2984                            lapack_int nrhs, double* a, lapack_int lda, double* b,
  2985                            lapack_int ldb );
  2986  lapack_int LAPACKE_cposv( int matrix_layout, char uplo, lapack_int n,
  2987                            lapack_int nrhs, lapack_complex_float* a,
  2988                            lapack_int lda, lapack_complex_float* b,
  2989                            lapack_int ldb );
  2990  lapack_int LAPACKE_zposv( int matrix_layout, char uplo, lapack_int n,
  2991                            lapack_int nrhs, lapack_complex_double* a,
  2992                            lapack_int lda, lapack_complex_double* b,
  2993                            lapack_int ldb );
  2994  lapack_int LAPACKE_dsposv( int matrix_layout, char uplo, lapack_int n,
  2995                             lapack_int nrhs, double* a, lapack_int lda,
  2996                             double* b, lapack_int ldb, double* x, lapack_int ldx,
  2997                             lapack_int* iter );
  2998  lapack_int LAPACKE_zcposv( int matrix_layout, char uplo, lapack_int n,
  2999                             lapack_int nrhs, lapack_complex_double* a,
  3000                             lapack_int lda, lapack_complex_double* b,
  3001                             lapack_int ldb, lapack_complex_double* x,
  3002                             lapack_int ldx, lapack_int* iter );
  3003  
  3004  lapack_int LAPACKE_sposvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3005                             lapack_int nrhs, float* a, lapack_int lda, float* af,
  3006                             lapack_int ldaf, char* equed, float* s, float* b,
  3007                             lapack_int ldb, float* x, lapack_int ldx,
  3008                             float* rcond, float* ferr, float* berr );
  3009  lapack_int LAPACKE_dposvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3010                             lapack_int nrhs, double* a, lapack_int lda,
  3011                             double* af, lapack_int ldaf, char* equed, double* s,
  3012                             double* b, lapack_int ldb, double* x, lapack_int ldx,
  3013                             double* rcond, double* ferr, double* berr );
  3014  lapack_int LAPACKE_cposvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3015                             lapack_int nrhs, lapack_complex_float* a,
  3016                             lapack_int lda, lapack_complex_float* af,
  3017                             lapack_int ldaf, char* equed, float* s,
  3018                             lapack_complex_float* b, lapack_int ldb,
  3019                             lapack_complex_float* x, lapack_int ldx,
  3020                             float* rcond, float* ferr, float* berr );
  3021  lapack_int LAPACKE_zposvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3022                             lapack_int nrhs, lapack_complex_double* a,
  3023                             lapack_int lda, lapack_complex_double* af,
  3024                             lapack_int ldaf, char* equed, double* s,
  3025                             lapack_complex_double* b, lapack_int ldb,
  3026                             lapack_complex_double* x, lapack_int ldx,
  3027                             double* rcond, double* ferr, double* berr );
  3028  
  3029  lapack_int LAPACKE_sposvxx( int matrix_layout, char fact, char uplo,
  3030                              lapack_int n, lapack_int nrhs, float* a,
  3031                              lapack_int lda, float* af, lapack_int ldaf,
  3032                              char* equed, float* s, float* b, lapack_int ldb,
  3033                              float* x, lapack_int ldx, float* rcond,
  3034                              float* rpvgrw, float* berr, lapack_int n_err_bnds,
  3035                              float* err_bnds_norm, float* err_bnds_comp,
  3036                              lapack_int nparams, float* params );
  3037  lapack_int LAPACKE_dposvxx( int matrix_layout, char fact, char uplo,
  3038                              lapack_int n, lapack_int nrhs, double* a,
  3039                              lapack_int lda, double* af, lapack_int ldaf,
  3040                              char* equed, double* s, double* b, lapack_int ldb,
  3041                              double* x, lapack_int ldx, double* rcond,
  3042                              double* rpvgrw, double* berr, lapack_int n_err_bnds,
  3043                              double* err_bnds_norm, double* err_bnds_comp,
  3044                              lapack_int nparams, double* params );
  3045  lapack_int LAPACKE_cposvxx( int matrix_layout, char fact, char uplo,
  3046                              lapack_int n, lapack_int nrhs,
  3047                              lapack_complex_float* a, lapack_int lda,
  3048                              lapack_complex_float* af, lapack_int ldaf,
  3049                              char* equed, float* s, lapack_complex_float* b,
  3050                              lapack_int ldb, lapack_complex_float* x,
  3051                              lapack_int ldx, float* rcond, float* rpvgrw,
  3052                              float* berr, lapack_int n_err_bnds,
  3053                              float* err_bnds_norm, float* err_bnds_comp,
  3054                              lapack_int nparams, float* params );
  3055  lapack_int LAPACKE_zposvxx( int matrix_layout, char fact, char uplo,
  3056                              lapack_int n, lapack_int nrhs,
  3057                              lapack_complex_double* a, lapack_int lda,
  3058                              lapack_complex_double* af, lapack_int ldaf,
  3059                              char* equed, double* s, lapack_complex_double* b,
  3060                              lapack_int ldb, lapack_complex_double* x,
  3061                              lapack_int ldx, double* rcond, double* rpvgrw,
  3062                              double* berr, lapack_int n_err_bnds,
  3063                              double* err_bnds_norm, double* err_bnds_comp,
  3064                              lapack_int nparams, double* params );
  3065  
  3066  lapack_int LAPACKE_spotrf2( int matrix_layout, char uplo, lapack_int n, float* a,
  3067                             lapack_int lda );
  3068  lapack_int LAPACKE_dpotrf2( int matrix_layout, char uplo, lapack_int n, double* a,
  3069                             lapack_int lda );
  3070  lapack_int LAPACKE_cpotrf2( int matrix_layout, char uplo, lapack_int n,
  3071                             lapack_complex_float* a, lapack_int lda );
  3072  lapack_int LAPACKE_zpotrf2( int matrix_layout, char uplo, lapack_int n,
  3073                             lapack_complex_double* a, lapack_int lda );
  3074  
  3075  lapack_int LAPACKE_spotrf( int matrix_layout, char uplo, lapack_int n, float* a,
  3076                             lapack_int lda );
  3077  lapack_int LAPACKE_dpotrf( int matrix_layout, char uplo, lapack_int n, double* a,
  3078                             lapack_int lda );
  3079  lapack_int LAPACKE_cpotrf( int matrix_layout, char uplo, lapack_int n,
  3080                             lapack_complex_float* a, lapack_int lda );
  3081  lapack_int LAPACKE_zpotrf( int matrix_layout, char uplo, lapack_int n,
  3082                             lapack_complex_double* a, lapack_int lda );
  3083  
  3084  lapack_int LAPACKE_spotri( int matrix_layout, char uplo, lapack_int n, float* a,
  3085                             lapack_int lda );
  3086  lapack_int LAPACKE_dpotri( int matrix_layout, char uplo, lapack_int n, double* a,
  3087                             lapack_int lda );
  3088  lapack_int LAPACKE_cpotri( int matrix_layout, char uplo, lapack_int n,
  3089                             lapack_complex_float* a, lapack_int lda );
  3090  lapack_int LAPACKE_zpotri( int matrix_layout, char uplo, lapack_int n,
  3091                             lapack_complex_double* a, lapack_int lda );
  3092  
  3093  lapack_int LAPACKE_spotrs( int matrix_layout, char uplo, lapack_int n,
  3094                             lapack_int nrhs, const float* a, lapack_int lda,
  3095                             float* b, lapack_int ldb );
  3096  lapack_int LAPACKE_dpotrs( int matrix_layout, char uplo, lapack_int n,
  3097                             lapack_int nrhs, const double* a, lapack_int lda,
  3098                             double* b, lapack_int ldb );
  3099  lapack_int LAPACKE_cpotrs( int matrix_layout, char uplo, lapack_int n,
  3100                             lapack_int nrhs, const lapack_complex_float* a,
  3101                             lapack_int lda, lapack_complex_float* b,
  3102                             lapack_int ldb );
  3103  lapack_int LAPACKE_zpotrs( int matrix_layout, char uplo, lapack_int n,
  3104                             lapack_int nrhs, const lapack_complex_double* a,
  3105                             lapack_int lda, lapack_complex_double* b,
  3106                             lapack_int ldb );
  3107  
  3108  lapack_int LAPACKE_sppcon( int matrix_layout, char uplo, lapack_int n,
  3109                             const float* ap, float anorm, float* rcond );
  3110  lapack_int LAPACKE_dppcon( int matrix_layout, char uplo, lapack_int n,
  3111                             const double* ap, double anorm, double* rcond );
  3112  lapack_int LAPACKE_cppcon( int matrix_layout, char uplo, lapack_int n,
  3113                             const lapack_complex_float* ap, float anorm,
  3114                             float* rcond );
  3115  lapack_int LAPACKE_zppcon( int matrix_layout, char uplo, lapack_int n,
  3116                             const lapack_complex_double* ap, double anorm,
  3117                             double* rcond );
  3118  
  3119  lapack_int LAPACKE_sppequ( int matrix_layout, char uplo, lapack_int n,
  3120                             const float* ap, float* s, float* scond,
  3121                             float* amax );
  3122  lapack_int LAPACKE_dppequ( int matrix_layout, char uplo, lapack_int n,
  3123                             const double* ap, double* s, double* scond,
  3124                             double* amax );
  3125  lapack_int LAPACKE_cppequ( int matrix_layout, char uplo, lapack_int n,
  3126                             const lapack_complex_float* ap, float* s,
  3127                             float* scond, float* amax );
  3128  lapack_int LAPACKE_zppequ( int matrix_layout, char uplo, lapack_int n,
  3129                             const lapack_complex_double* ap, double* s,
  3130                             double* scond, double* amax );
  3131  
  3132  lapack_int LAPACKE_spprfs( int matrix_layout, char uplo, lapack_int n,
  3133                             lapack_int nrhs, const float* ap, const float* afp,
  3134                             const float* b, lapack_int ldb, float* x,
  3135                             lapack_int ldx, float* ferr, float* berr );
  3136  lapack_int LAPACKE_dpprfs( int matrix_layout, char uplo, lapack_int n,
  3137                             lapack_int nrhs, const double* ap, const double* afp,
  3138                             const double* b, lapack_int ldb, double* x,
  3139                             lapack_int ldx, double* ferr, double* berr );
  3140  lapack_int LAPACKE_cpprfs( int matrix_layout, char uplo, lapack_int n,
  3141                             lapack_int nrhs, const lapack_complex_float* ap,
  3142                             const lapack_complex_float* afp,
  3143                             const lapack_complex_float* b, lapack_int ldb,
  3144                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  3145                             float* berr );
  3146  lapack_int LAPACKE_zpprfs( int matrix_layout, char uplo, lapack_int n,
  3147                             lapack_int nrhs, const lapack_complex_double* ap,
  3148                             const lapack_complex_double* afp,
  3149                             const lapack_complex_double* b, lapack_int ldb,
  3150                             lapack_complex_double* x, lapack_int ldx,
  3151                             double* ferr, double* berr );
  3152  
  3153  lapack_int LAPACKE_sppsv( int matrix_layout, char uplo, lapack_int n,
  3154                            lapack_int nrhs, float* ap, float* b,
  3155                            lapack_int ldb );
  3156  lapack_int LAPACKE_dppsv( int matrix_layout, char uplo, lapack_int n,
  3157                            lapack_int nrhs, double* ap, double* b,
  3158                            lapack_int ldb );
  3159  lapack_int LAPACKE_cppsv( int matrix_layout, char uplo, lapack_int n,
  3160                            lapack_int nrhs, lapack_complex_float* ap,
  3161                            lapack_complex_float* b, lapack_int ldb );
  3162  lapack_int LAPACKE_zppsv( int matrix_layout, char uplo, lapack_int n,
  3163                            lapack_int nrhs, lapack_complex_double* ap,
  3164                            lapack_complex_double* b, lapack_int ldb );
  3165  
  3166  lapack_int LAPACKE_sppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3167                             lapack_int nrhs, float* ap, float* afp, char* equed,
  3168                             float* s, float* b, lapack_int ldb, float* x,
  3169                             lapack_int ldx, float* rcond, float* ferr,
  3170                             float* berr );
  3171  lapack_int LAPACKE_dppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3172                             lapack_int nrhs, double* ap, double* afp,
  3173                             char* equed, double* s, double* b, lapack_int ldb,
  3174                             double* x, lapack_int ldx, double* rcond,
  3175                             double* ferr, double* berr );
  3176  lapack_int LAPACKE_cppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3177                             lapack_int nrhs, lapack_complex_float* ap,
  3178                             lapack_complex_float* afp, char* equed, float* s,
  3179                             lapack_complex_float* b, lapack_int ldb,
  3180                             lapack_complex_float* x, lapack_int ldx,
  3181                             float* rcond, float* ferr, float* berr );
  3182  lapack_int LAPACKE_zppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3183                             lapack_int nrhs, lapack_complex_double* ap,
  3184                             lapack_complex_double* afp, char* equed, double* s,
  3185                             lapack_complex_double* b, lapack_int ldb,
  3186                             lapack_complex_double* x, lapack_int ldx,
  3187                             double* rcond, double* ferr, double* berr );
  3188  
  3189  lapack_int LAPACKE_spptrf( int matrix_layout, char uplo, lapack_int n,
  3190                             float* ap );
  3191  lapack_int LAPACKE_dpptrf( int matrix_layout, char uplo, lapack_int n,
  3192                             double* ap );
  3193  lapack_int LAPACKE_cpptrf( int matrix_layout, char uplo, lapack_int n,
  3194                             lapack_complex_float* ap );
  3195  lapack_int LAPACKE_zpptrf( int matrix_layout, char uplo, lapack_int n,
  3196                             lapack_complex_double* ap );
  3197  
  3198  lapack_int LAPACKE_spptri( int matrix_layout, char uplo, lapack_int n,
  3199                             float* ap );
  3200  lapack_int LAPACKE_dpptri( int matrix_layout, char uplo, lapack_int n,
  3201                             double* ap );
  3202  lapack_int LAPACKE_cpptri( int matrix_layout, char uplo, lapack_int n,
  3203                             lapack_complex_float* ap );
  3204  lapack_int LAPACKE_zpptri( int matrix_layout, char uplo, lapack_int n,
  3205                             lapack_complex_double* ap );
  3206  
  3207  lapack_int LAPACKE_spptrs( int matrix_layout, char uplo, lapack_int n,
  3208                             lapack_int nrhs, const float* ap, float* b,
  3209                             lapack_int ldb );
  3210  lapack_int LAPACKE_dpptrs( int matrix_layout, char uplo, lapack_int n,
  3211                             lapack_int nrhs, const double* ap, double* b,
  3212                             lapack_int ldb );
  3213  lapack_int LAPACKE_cpptrs( int matrix_layout, char uplo, lapack_int n,
  3214                             lapack_int nrhs, const lapack_complex_float* ap,
  3215                             lapack_complex_float* b, lapack_int ldb );
  3216  lapack_int LAPACKE_zpptrs( int matrix_layout, char uplo, lapack_int n,
  3217                             lapack_int nrhs, const lapack_complex_double* ap,
  3218                             lapack_complex_double* b, lapack_int ldb );
  3219  
  3220  lapack_int LAPACKE_spstrf( int matrix_layout, char uplo, lapack_int n, float* a,
  3221                             lapack_int lda, lapack_int* piv, lapack_int* rank,
  3222                             float tol );
  3223  lapack_int LAPACKE_dpstrf( int matrix_layout, char uplo, lapack_int n, double* a,
  3224                             lapack_int lda, lapack_int* piv, lapack_int* rank,
  3225                             double tol );
  3226  lapack_int LAPACKE_cpstrf( int matrix_layout, char uplo, lapack_int n,
  3227                             lapack_complex_float* a, lapack_int lda,
  3228                             lapack_int* piv, lapack_int* rank, float tol );
  3229  lapack_int LAPACKE_zpstrf( int matrix_layout, char uplo, lapack_int n,
  3230                             lapack_complex_double* a, lapack_int lda,
  3231                             lapack_int* piv, lapack_int* rank, double tol );
  3232  
  3233  lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
  3234                             float anorm, float* rcond );
  3235  lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
  3236                             double anorm, double* rcond );
  3237  lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
  3238                             const lapack_complex_float* e, float anorm,
  3239                             float* rcond );
  3240  lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
  3241                             const lapack_complex_double* e, double anorm,
  3242                             double* rcond );
  3243  
  3244  lapack_int LAPACKE_spteqr( int matrix_layout, char compz, lapack_int n, float* d,
  3245                             float* e, float* z, lapack_int ldz );
  3246  lapack_int LAPACKE_dpteqr( int matrix_layout, char compz, lapack_int n,
  3247                             double* d, double* e, double* z, lapack_int ldz );
  3248  lapack_int LAPACKE_cpteqr( int matrix_layout, char compz, lapack_int n, float* d,
  3249                             float* e, lapack_complex_float* z, lapack_int ldz );
  3250  lapack_int LAPACKE_zpteqr( int matrix_layout, char compz, lapack_int n,
  3251                             double* d, double* e, lapack_complex_double* z,
  3252                             lapack_int ldz );
  3253  
  3254  lapack_int LAPACKE_sptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
  3255                             const float* d, const float* e, const float* df,
  3256                             const float* ef, const float* b, lapack_int ldb,
  3257                             float* x, lapack_int ldx, float* ferr, float* berr );
  3258  lapack_int LAPACKE_dptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
  3259                             const double* d, const double* e, const double* df,
  3260                             const double* ef, const double* b, lapack_int ldb,
  3261                             double* x, lapack_int ldx, double* ferr,
  3262                             double* berr );
  3263  lapack_int LAPACKE_cptrfs( int matrix_layout, char uplo, lapack_int n,
  3264                             lapack_int nrhs, const float* d,
  3265                             const lapack_complex_float* e, const float* df,
  3266                             const lapack_complex_float* ef,
  3267                             const lapack_complex_float* b, lapack_int ldb,
  3268                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  3269                             float* berr );
  3270  lapack_int LAPACKE_zptrfs( int matrix_layout, char uplo, lapack_int n,
  3271                             lapack_int nrhs, const double* d,
  3272                             const lapack_complex_double* e, const double* df,
  3273                             const lapack_complex_double* ef,
  3274                             const lapack_complex_double* b, lapack_int ldb,
  3275                             lapack_complex_double* x, lapack_int ldx,
  3276                             double* ferr, double* berr );
  3277  
  3278  lapack_int LAPACKE_sptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  3279                            float* d, float* e, float* b, lapack_int ldb );
  3280  lapack_int LAPACKE_dptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  3281                            double* d, double* e, double* b, lapack_int ldb );
  3282  lapack_int LAPACKE_cptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  3283                            float* d, lapack_complex_float* e,
  3284                            lapack_complex_float* b, lapack_int ldb );
  3285  lapack_int LAPACKE_zptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
  3286                            double* d, lapack_complex_double* e,
  3287                            lapack_complex_double* b, lapack_int ldb );
  3288  
  3289  lapack_int LAPACKE_sptsvx( int matrix_layout, char fact, lapack_int n,
  3290                             lapack_int nrhs, const float* d, const float* e,
  3291                             float* df, float* ef, const float* b, lapack_int ldb,
  3292                             float* x, lapack_int ldx, float* rcond, float* ferr,
  3293                             float* berr );
  3294  lapack_int LAPACKE_dptsvx( int matrix_layout, char fact, lapack_int n,
  3295                             lapack_int nrhs, const double* d, const double* e,
  3296                             double* df, double* ef, const double* b,
  3297                             lapack_int ldb, double* x, lapack_int ldx,
  3298                             double* rcond, double* ferr, double* berr );
  3299  lapack_int LAPACKE_cptsvx( int matrix_layout, char fact, lapack_int n,
  3300                             lapack_int nrhs, const float* d,
  3301                             const lapack_complex_float* e, float* df,
  3302                             lapack_complex_float* ef,
  3303                             const lapack_complex_float* b, lapack_int ldb,
  3304                             lapack_complex_float* x, lapack_int ldx,
  3305                             float* rcond, float* ferr, float* berr );
  3306  lapack_int LAPACKE_zptsvx( int matrix_layout, char fact, lapack_int n,
  3307                             lapack_int nrhs, const double* d,
  3308                             const lapack_complex_double* e, double* df,
  3309                             lapack_complex_double* ef,
  3310                             const lapack_complex_double* b, lapack_int ldb,
  3311                             lapack_complex_double* x, lapack_int ldx,
  3312                             double* rcond, double* ferr, double* berr );
  3313  
  3314  lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
  3315  lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
  3316  lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
  3317  lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
  3318  
  3319  lapack_int LAPACKE_spttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
  3320                             const float* d, const float* e, float* b,
  3321                             lapack_int ldb );
  3322  lapack_int LAPACKE_dpttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
  3323                             const double* d, const double* e, double* b,
  3324                             lapack_int ldb );
  3325  lapack_int LAPACKE_cpttrs( int matrix_layout, char uplo, lapack_int n,
  3326                             lapack_int nrhs, const float* d,
  3327                             const lapack_complex_float* e,
  3328                             lapack_complex_float* b, lapack_int ldb );
  3329  lapack_int LAPACKE_zpttrs( int matrix_layout, char uplo, lapack_int n,
  3330                             lapack_int nrhs, const double* d,
  3331                             const lapack_complex_double* e,
  3332                             lapack_complex_double* b, lapack_int ldb );
  3333  
  3334  lapack_int LAPACKE_ssbev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3335                            lapack_int kd, float* ab, lapack_int ldab, float* w,
  3336                            float* z, lapack_int ldz );
  3337  lapack_int LAPACKE_dsbev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3338                            lapack_int kd, double* ab, lapack_int ldab, double* w,
  3339                            double* z, lapack_int ldz );
  3340  
  3341  lapack_int LAPACKE_ssbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3342                             lapack_int kd, float* ab, lapack_int ldab, float* w,
  3343                             float* z, lapack_int ldz );
  3344  lapack_int LAPACKE_dsbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3345                             lapack_int kd, double* ab, lapack_int ldab,
  3346                             double* w, double* z, lapack_int ldz );
  3347  
  3348  lapack_int LAPACKE_ssbevx( int matrix_layout, char jobz, char range, char uplo,
  3349                             lapack_int n, lapack_int kd, float* ab,
  3350                             lapack_int ldab, float* q, lapack_int ldq, float vl,
  3351                             float vu, lapack_int il, lapack_int iu, float abstol,
  3352                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3353                             lapack_int* ifail );
  3354  lapack_int LAPACKE_dsbevx( int matrix_layout, char jobz, char range, char uplo,
  3355                             lapack_int n, lapack_int kd, double* ab,
  3356                             lapack_int ldab, double* q, lapack_int ldq,
  3357                             double vl, double vu, lapack_int il, lapack_int iu,
  3358                             double abstol, lapack_int* m, double* w, double* z,
  3359                             lapack_int ldz, lapack_int* ifail );
  3360  
  3361  lapack_int LAPACKE_ssbgst( int matrix_layout, char vect, char uplo, lapack_int n,
  3362                             lapack_int ka, lapack_int kb, float* ab,
  3363                             lapack_int ldab, const float* bb, lapack_int ldbb,
  3364                             float* x, lapack_int ldx );
  3365  lapack_int LAPACKE_dsbgst( int matrix_layout, char vect, char uplo, lapack_int n,
  3366                             lapack_int ka, lapack_int kb, double* ab,
  3367                             lapack_int ldab, const double* bb, lapack_int ldbb,
  3368                             double* x, lapack_int ldx );
  3369  
  3370  lapack_int LAPACKE_ssbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
  3371                            lapack_int ka, lapack_int kb, float* ab,
  3372                            lapack_int ldab, float* bb, lapack_int ldbb, float* w,
  3373                            float* z, lapack_int ldz );
  3374  lapack_int LAPACKE_dsbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
  3375                            lapack_int ka, lapack_int kb, double* ab,
  3376                            lapack_int ldab, double* bb, lapack_int ldbb,
  3377                            double* w, double* z, lapack_int ldz );
  3378  
  3379  lapack_int LAPACKE_ssbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3380                             lapack_int ka, lapack_int kb, float* ab,
  3381                             lapack_int ldab, float* bb, lapack_int ldbb,
  3382                             float* w, float* z, lapack_int ldz );
  3383  lapack_int LAPACKE_dsbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3384                             lapack_int ka, lapack_int kb, double* ab,
  3385                             lapack_int ldab, double* bb, lapack_int ldbb,
  3386                             double* w, double* z, lapack_int ldz );
  3387  
  3388  lapack_int LAPACKE_ssbgvx( int matrix_layout, char jobz, char range, char uplo,
  3389                             lapack_int n, lapack_int ka, lapack_int kb,
  3390                             float* ab, lapack_int ldab, float* bb,
  3391                             lapack_int ldbb, float* q, lapack_int ldq, float vl,
  3392                             float vu, lapack_int il, lapack_int iu, float abstol,
  3393                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3394                             lapack_int* ifail );
  3395  lapack_int LAPACKE_dsbgvx( int matrix_layout, char jobz, char range, char uplo,
  3396                             lapack_int n, lapack_int ka, lapack_int kb,
  3397                             double* ab, lapack_int ldab, double* bb,
  3398                             lapack_int ldbb, double* q, lapack_int ldq,
  3399                             double vl, double vu, lapack_int il, lapack_int iu,
  3400                             double abstol, lapack_int* m, double* w, double* z,
  3401                             lapack_int ldz, lapack_int* ifail );
  3402  
  3403  lapack_int LAPACKE_ssbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
  3404                             lapack_int kd, float* ab, lapack_int ldab, float* d,
  3405                             float* e, float* q, lapack_int ldq );
  3406  lapack_int LAPACKE_dsbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
  3407                             lapack_int kd, double* ab, lapack_int ldab,
  3408                             double* d, double* e, double* q, lapack_int ldq );
  3409  
  3410  lapack_int LAPACKE_ssfrk( int matrix_layout, char transr, char uplo, char trans,
  3411                            lapack_int n, lapack_int k, float alpha,
  3412                            const float* a, lapack_int lda, float beta,
  3413                            float* c );
  3414  lapack_int LAPACKE_dsfrk( int matrix_layout, char transr, char uplo, char trans,
  3415                            lapack_int n, lapack_int k, double alpha,
  3416                            const double* a, lapack_int lda, double beta,
  3417                            double* c );
  3418  
  3419  lapack_int LAPACKE_sspcon( int matrix_layout, char uplo, lapack_int n,
  3420                             const float* ap, const lapack_int* ipiv, float anorm,
  3421                             float* rcond );
  3422  lapack_int LAPACKE_dspcon( int matrix_layout, char uplo, lapack_int n,
  3423                             const double* ap, const lapack_int* ipiv,
  3424                             double anorm, double* rcond );
  3425  lapack_int LAPACKE_cspcon( int matrix_layout, char uplo, lapack_int n,
  3426                             const lapack_complex_float* ap,
  3427                             const lapack_int* ipiv, float anorm, float* rcond );
  3428  lapack_int LAPACKE_zspcon( int matrix_layout, char uplo, lapack_int n,
  3429                             const lapack_complex_double* ap,
  3430                             const lapack_int* ipiv, double anorm,
  3431                             double* rcond );
  3432  
  3433  lapack_int LAPACKE_sspev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3434                            float* ap, float* w, float* z, lapack_int ldz );
  3435  lapack_int LAPACKE_dspev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3436                            double* ap, double* w, double* z, lapack_int ldz );
  3437  
  3438  lapack_int LAPACKE_sspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3439                             float* ap, float* w, float* z, lapack_int ldz );
  3440  lapack_int LAPACKE_dspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3441                             double* ap, double* w, double* z, lapack_int ldz );
  3442  
  3443  lapack_int LAPACKE_sspevx( int matrix_layout, char jobz, char range, char uplo,
  3444                             lapack_int n, float* ap, float vl, float vu,
  3445                             lapack_int il, lapack_int iu, float abstol,
  3446                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3447                             lapack_int* ifail );
  3448  lapack_int LAPACKE_dspevx( int matrix_layout, char jobz, char range, char uplo,
  3449                             lapack_int n, double* ap, double vl, double vu,
  3450                             lapack_int il, lapack_int iu, double abstol,
  3451                             lapack_int* m, double* w, double* z, lapack_int ldz,
  3452                             lapack_int* ifail );
  3453  
  3454  lapack_int LAPACKE_sspgst( int matrix_layout, lapack_int itype, char uplo,
  3455                             lapack_int n, float* ap, const float* bp );
  3456  lapack_int LAPACKE_dspgst( int matrix_layout, lapack_int itype, char uplo,
  3457                             lapack_int n, double* ap, const double* bp );
  3458  
  3459  lapack_int LAPACKE_sspgv( int matrix_layout, lapack_int itype, char jobz,
  3460                            char uplo, lapack_int n, float* ap, float* bp,
  3461                            float* w, float* z, lapack_int ldz );
  3462  lapack_int LAPACKE_dspgv( int matrix_layout, lapack_int itype, char jobz,
  3463                            char uplo, lapack_int n, double* ap, double* bp,
  3464                            double* w, double* z, lapack_int ldz );
  3465  
  3466  lapack_int LAPACKE_sspgvd( int matrix_layout, lapack_int itype, char jobz,
  3467                             char uplo, lapack_int n, float* ap, float* bp,
  3468                             float* w, float* z, lapack_int ldz );
  3469  lapack_int LAPACKE_dspgvd( int matrix_layout, lapack_int itype, char jobz,
  3470                             char uplo, lapack_int n, double* ap, double* bp,
  3471                             double* w, double* z, lapack_int ldz );
  3472  
  3473  lapack_int LAPACKE_sspgvx( int matrix_layout, lapack_int itype, char jobz,
  3474                             char range, char uplo, lapack_int n, float* ap,
  3475                             float* bp, float vl, float vu, lapack_int il,
  3476                             lapack_int iu, float abstol, lapack_int* m, float* w,
  3477                             float* z, lapack_int ldz, lapack_int* ifail );
  3478  lapack_int LAPACKE_dspgvx( int matrix_layout, lapack_int itype, char jobz,
  3479                             char range, char uplo, lapack_int n, double* ap,
  3480                             double* bp, double vl, double vu, lapack_int il,
  3481                             lapack_int iu, double abstol, lapack_int* m,
  3482                             double* w, double* z, lapack_int ldz,
  3483                             lapack_int* ifail );
  3484  
  3485  lapack_int LAPACKE_ssprfs( int matrix_layout, char uplo, lapack_int n,
  3486                             lapack_int nrhs, const float* ap, const float* afp,
  3487                             const lapack_int* ipiv, const float* b,
  3488                             lapack_int ldb, float* x, lapack_int ldx,
  3489                             float* ferr, float* berr );
  3490  lapack_int LAPACKE_dsprfs( int matrix_layout, char uplo, lapack_int n,
  3491                             lapack_int nrhs, const double* ap, const double* afp,
  3492                             const lapack_int* ipiv, const double* b,
  3493                             lapack_int ldb, double* x, lapack_int ldx,
  3494                             double* ferr, double* berr );
  3495  lapack_int LAPACKE_csprfs( int matrix_layout, char uplo, lapack_int n,
  3496                             lapack_int nrhs, const lapack_complex_float* ap,
  3497                             const lapack_complex_float* afp,
  3498                             const lapack_int* ipiv,
  3499                             const lapack_complex_float* b, lapack_int ldb,
  3500                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  3501                             float* berr );
  3502  lapack_int LAPACKE_zsprfs( int matrix_layout, char uplo, lapack_int n,
  3503                             lapack_int nrhs, const lapack_complex_double* ap,
  3504                             const lapack_complex_double* afp,
  3505                             const lapack_int* ipiv,
  3506                             const lapack_complex_double* b, lapack_int ldb,
  3507                             lapack_complex_double* x, lapack_int ldx,
  3508                             double* ferr, double* berr );
  3509  
  3510  lapack_int LAPACKE_sspsv( int matrix_layout, char uplo, lapack_int n,
  3511                            lapack_int nrhs, float* ap, lapack_int* ipiv,
  3512                            float* b, lapack_int ldb );
  3513  lapack_int LAPACKE_dspsv( int matrix_layout, char uplo, lapack_int n,
  3514                            lapack_int nrhs, double* ap, lapack_int* ipiv,
  3515                            double* b, lapack_int ldb );
  3516  lapack_int LAPACKE_cspsv( int matrix_layout, char uplo, lapack_int n,
  3517                            lapack_int nrhs, lapack_complex_float* ap,
  3518                            lapack_int* ipiv, lapack_complex_float* b,
  3519                            lapack_int ldb );
  3520  lapack_int LAPACKE_zspsv( int matrix_layout, char uplo, lapack_int n,
  3521                            lapack_int nrhs, lapack_complex_double* ap,
  3522                            lapack_int* ipiv, lapack_complex_double* b,
  3523                            lapack_int ldb );
  3524  
  3525  lapack_int LAPACKE_sspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3526                             lapack_int nrhs, const float* ap, float* afp,
  3527                             lapack_int* ipiv, const float* b, lapack_int ldb,
  3528                             float* x, lapack_int ldx, float* rcond, float* ferr,
  3529                             float* berr );
  3530  lapack_int LAPACKE_dspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3531                             lapack_int nrhs, const double* ap, double* afp,
  3532                             lapack_int* ipiv, const double* b, lapack_int ldb,
  3533                             double* x, lapack_int ldx, double* rcond,
  3534                             double* ferr, double* berr );
  3535  lapack_int LAPACKE_cspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3536                             lapack_int nrhs, const lapack_complex_float* ap,
  3537                             lapack_complex_float* afp, lapack_int* ipiv,
  3538                             const lapack_complex_float* b, lapack_int ldb,
  3539                             lapack_complex_float* x, lapack_int ldx,
  3540                             float* rcond, float* ferr, float* berr );
  3541  lapack_int LAPACKE_zspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3542                             lapack_int nrhs, const lapack_complex_double* ap,
  3543                             lapack_complex_double* afp, lapack_int* ipiv,
  3544                             const lapack_complex_double* b, lapack_int ldb,
  3545                             lapack_complex_double* x, lapack_int ldx,
  3546                             double* rcond, double* ferr, double* berr );
  3547  
  3548  lapack_int LAPACKE_ssptrd( int matrix_layout, char uplo, lapack_int n, float* ap,
  3549                             float* d, float* e, float* tau );
  3550  lapack_int LAPACKE_dsptrd( int matrix_layout, char uplo, lapack_int n,
  3551                             double* ap, double* d, double* e, double* tau );
  3552  
  3553  lapack_int LAPACKE_ssptrf( int matrix_layout, char uplo, lapack_int n, float* ap,
  3554                             lapack_int* ipiv );
  3555  lapack_int LAPACKE_dsptrf( int matrix_layout, char uplo, lapack_int n,
  3556                             double* ap, lapack_int* ipiv );
  3557  lapack_int LAPACKE_csptrf( int matrix_layout, char uplo, lapack_int n,
  3558                             lapack_complex_float* ap, lapack_int* ipiv );
  3559  lapack_int LAPACKE_zsptrf( int matrix_layout, char uplo, lapack_int n,
  3560                             lapack_complex_double* ap, lapack_int* ipiv );
  3561  
  3562  lapack_int LAPACKE_ssptri( int matrix_layout, char uplo, lapack_int n, float* ap,
  3563                             const lapack_int* ipiv );
  3564  lapack_int LAPACKE_dsptri( int matrix_layout, char uplo, lapack_int n,
  3565                             double* ap, const lapack_int* ipiv );
  3566  lapack_int LAPACKE_csptri( int matrix_layout, char uplo, lapack_int n,
  3567                             lapack_complex_float* ap, const lapack_int* ipiv );
  3568  lapack_int LAPACKE_zsptri( int matrix_layout, char uplo, lapack_int n,
  3569                             lapack_complex_double* ap, const lapack_int* ipiv );
  3570  
  3571  lapack_int LAPACKE_ssptrs( int matrix_layout, char uplo, lapack_int n,
  3572                             lapack_int nrhs, const float* ap,
  3573                             const lapack_int* ipiv, float* b, lapack_int ldb );
  3574  lapack_int LAPACKE_dsptrs( int matrix_layout, char uplo, lapack_int n,
  3575                             lapack_int nrhs, const double* ap,
  3576                             const lapack_int* ipiv, double* b, lapack_int ldb );
  3577  lapack_int LAPACKE_csptrs( int matrix_layout, char uplo, lapack_int n,
  3578                             lapack_int nrhs, const lapack_complex_float* ap,
  3579                             const lapack_int* ipiv, lapack_complex_float* b,
  3580                             lapack_int ldb );
  3581  lapack_int LAPACKE_zsptrs( int matrix_layout, char uplo, lapack_int n,
  3582                             lapack_int nrhs, const lapack_complex_double* ap,
  3583                             const lapack_int* ipiv, lapack_complex_double* b,
  3584                             lapack_int ldb );
  3585  
  3586  lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
  3587                             float vu, lapack_int il, lapack_int iu, float abstol,
  3588                             const float* d, const float* e, lapack_int* m,
  3589                             lapack_int* nsplit, float* w, lapack_int* iblock,
  3590                             lapack_int* isplit );
  3591  lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
  3592                             double vu, lapack_int il, lapack_int iu,
  3593                             double abstol, const double* d, const double* e,
  3594                             lapack_int* m, lapack_int* nsplit, double* w,
  3595                             lapack_int* iblock, lapack_int* isplit );
  3596  
  3597  lapack_int LAPACKE_sstedc( int matrix_layout, char compz, lapack_int n, float* d,
  3598                             float* e, float* z, lapack_int ldz );
  3599  lapack_int LAPACKE_dstedc( int matrix_layout, char compz, lapack_int n,
  3600                             double* d, double* e, double* z, lapack_int ldz );
  3601  lapack_int LAPACKE_cstedc( int matrix_layout, char compz, lapack_int n, float* d,
  3602                             float* e, lapack_complex_float* z, lapack_int ldz );
  3603  lapack_int LAPACKE_zstedc( int matrix_layout, char compz, lapack_int n,
  3604                             double* d, double* e, lapack_complex_double* z,
  3605                             lapack_int ldz );
  3606  
  3607  lapack_int LAPACKE_sstegr( int matrix_layout, char jobz, char range,
  3608                             lapack_int n, float* d, float* e, float vl, float vu,
  3609                             lapack_int il, lapack_int iu, float abstol,
  3610                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3611                             lapack_int* isuppz );
  3612  lapack_int LAPACKE_dstegr( int matrix_layout, char jobz, char range,
  3613                             lapack_int n, double* d, double* e, double vl,
  3614                             double vu, lapack_int il, lapack_int iu,
  3615                             double abstol, lapack_int* m, double* w, double* z,
  3616                             lapack_int ldz, lapack_int* isuppz );
  3617  lapack_int LAPACKE_cstegr( int matrix_layout, char jobz, char range,
  3618                             lapack_int n, float* d, float* e, float vl, float vu,
  3619                             lapack_int il, lapack_int iu, float abstol,
  3620                             lapack_int* m, float* w, lapack_complex_float* z,
  3621                             lapack_int ldz, lapack_int* isuppz );
  3622  lapack_int LAPACKE_zstegr( int matrix_layout, char jobz, char range,
  3623                             lapack_int n, double* d, double* e, double vl,
  3624                             double vu, lapack_int il, lapack_int iu,
  3625                             double abstol, lapack_int* m, double* w,
  3626                             lapack_complex_double* z, lapack_int ldz,
  3627                             lapack_int* isuppz );
  3628  
  3629  lapack_int LAPACKE_sstein( int matrix_layout, lapack_int n, const float* d,
  3630                             const float* e, lapack_int m, const float* w,
  3631                             const lapack_int* iblock, const lapack_int* isplit,
  3632                             float* z, lapack_int ldz, lapack_int* ifailv );
  3633  lapack_int LAPACKE_dstein( int matrix_layout, lapack_int n, const double* d,
  3634                             const double* e, lapack_int m, const double* w,
  3635                             const lapack_int* iblock, const lapack_int* isplit,
  3636                             double* z, lapack_int ldz, lapack_int* ifailv );
  3637  lapack_int LAPACKE_cstein( int matrix_layout, lapack_int n, const float* d,
  3638                             const float* e, lapack_int m, const float* w,
  3639                             const lapack_int* iblock, const lapack_int* isplit,
  3640                             lapack_complex_float* z, lapack_int ldz,
  3641                             lapack_int* ifailv );
  3642  lapack_int LAPACKE_zstein( int matrix_layout, lapack_int n, const double* d,
  3643                             const double* e, lapack_int m, const double* w,
  3644                             const lapack_int* iblock, const lapack_int* isplit,
  3645                             lapack_complex_double* z, lapack_int ldz,
  3646                             lapack_int* ifailv );
  3647  
  3648  lapack_int LAPACKE_sstemr( int matrix_layout, char jobz, char range,
  3649                             lapack_int n, float* d, float* e, float vl, float vu,
  3650                             lapack_int il, lapack_int iu, lapack_int* m,
  3651                             float* w, float* z, lapack_int ldz, lapack_int nzc,
  3652                             lapack_int* isuppz, lapack_logical* tryrac );
  3653  lapack_int LAPACKE_dstemr( int matrix_layout, char jobz, char range,
  3654                             lapack_int n, double* d, double* e, double vl,
  3655                             double vu, lapack_int il, lapack_int iu,
  3656                             lapack_int* m, double* w, double* z, lapack_int ldz,
  3657                             lapack_int nzc, lapack_int* isuppz,
  3658                             lapack_logical* tryrac );
  3659  lapack_int LAPACKE_cstemr( int matrix_layout, char jobz, char range,
  3660                             lapack_int n, float* d, float* e, float vl, float vu,
  3661                             lapack_int il, lapack_int iu, lapack_int* m,
  3662                             float* w, lapack_complex_float* z, lapack_int ldz,
  3663                             lapack_int nzc, lapack_int* isuppz,
  3664                             lapack_logical* tryrac );
  3665  lapack_int LAPACKE_zstemr( int matrix_layout, char jobz, char range,
  3666                             lapack_int n, double* d, double* e, double vl,
  3667                             double vu, lapack_int il, lapack_int iu,
  3668                             lapack_int* m, double* w, lapack_complex_double* z,
  3669                             lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
  3670                             lapack_logical* tryrac );
  3671  
  3672  lapack_int LAPACKE_ssteqr( int matrix_layout, char compz, lapack_int n, float* d,
  3673                             float* e, float* z, lapack_int ldz );
  3674  lapack_int LAPACKE_dsteqr( int matrix_layout, char compz, lapack_int n,
  3675                             double* d, double* e, double* z, lapack_int ldz );
  3676  lapack_int LAPACKE_csteqr( int matrix_layout, char compz, lapack_int n, float* d,
  3677                             float* e, lapack_complex_float* z, lapack_int ldz );
  3678  lapack_int LAPACKE_zsteqr( int matrix_layout, char compz, lapack_int n,
  3679                             double* d, double* e, lapack_complex_double* z,
  3680                             lapack_int ldz );
  3681  
  3682  lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
  3683  lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
  3684  
  3685  lapack_int LAPACKE_sstev( int matrix_layout, char jobz, lapack_int n, float* d,
  3686                            float* e, float* z, lapack_int ldz );
  3687  lapack_int LAPACKE_dstev( int matrix_layout, char jobz, lapack_int n, double* d,
  3688                            double* e, double* z, lapack_int ldz );
  3689  
  3690  lapack_int LAPACKE_sstevd( int matrix_layout, char jobz, lapack_int n, float* d,
  3691                             float* e, float* z, lapack_int ldz );
  3692  lapack_int LAPACKE_dstevd( int matrix_layout, char jobz, lapack_int n, double* d,
  3693                             double* e, double* z, lapack_int ldz );
  3694  
  3695  lapack_int LAPACKE_sstevr( int matrix_layout, char jobz, char range,
  3696                             lapack_int n, float* d, float* e, float vl, float vu,
  3697                             lapack_int il, lapack_int iu, float abstol,
  3698                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3699                             lapack_int* isuppz );
  3700  lapack_int LAPACKE_dstevr( int matrix_layout, char jobz, char range,
  3701                             lapack_int n, double* d, double* e, double vl,
  3702                             double vu, lapack_int il, lapack_int iu,
  3703                             double abstol, lapack_int* m, double* w, double* z,
  3704                             lapack_int ldz, lapack_int* isuppz );
  3705  
  3706  lapack_int LAPACKE_sstevx( int matrix_layout, char jobz, char range,
  3707                             lapack_int n, float* d, float* e, float vl, float vu,
  3708                             lapack_int il, lapack_int iu, float abstol,
  3709                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3710                             lapack_int* ifail );
  3711  lapack_int LAPACKE_dstevx( int matrix_layout, char jobz, char range,
  3712                             lapack_int n, double* d, double* e, double vl,
  3713                             double vu, lapack_int il, lapack_int iu,
  3714                             double abstol, lapack_int* m, double* w, double* z,
  3715                             lapack_int ldz, lapack_int* ifail );
  3716  
  3717  lapack_int LAPACKE_ssycon( int matrix_layout, char uplo, lapack_int n,
  3718                             const float* a, lapack_int lda,
  3719                             const lapack_int* ipiv, float anorm, float* rcond );
  3720  lapack_int LAPACKE_dsycon( int matrix_layout, char uplo, lapack_int n,
  3721                             const double* a, lapack_int lda,
  3722                             const lapack_int* ipiv, double anorm,
  3723                             double* rcond );
  3724  lapack_int LAPACKE_csycon( int matrix_layout, char uplo, lapack_int n,
  3725                             const lapack_complex_float* a, lapack_int lda,
  3726                             const lapack_int* ipiv, float anorm, float* rcond );
  3727  lapack_int LAPACKE_zsycon( int matrix_layout, char uplo, lapack_int n,
  3728                             const lapack_complex_double* a, lapack_int lda,
  3729                             const lapack_int* ipiv, double anorm,
  3730                             double* rcond );
  3731  
  3732  lapack_int LAPACKE_ssyequb( int matrix_layout, char uplo, lapack_int n,
  3733                              const float* a, lapack_int lda, float* s,
  3734                              float* scond, float* amax );
  3735  lapack_int LAPACKE_dsyequb( int matrix_layout, char uplo, lapack_int n,
  3736                              const double* a, lapack_int lda, double* s,
  3737                              double* scond, double* amax );
  3738  lapack_int LAPACKE_csyequb( int matrix_layout, char uplo, lapack_int n,
  3739                              const lapack_complex_float* a, lapack_int lda,
  3740                              float* s, float* scond, float* amax );
  3741  lapack_int LAPACKE_zsyequb( int matrix_layout, char uplo, lapack_int n,
  3742                              const lapack_complex_double* a, lapack_int lda,
  3743                              double* s, double* scond, double* amax );
  3744  
  3745  lapack_int LAPACKE_ssyev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3746                            float* a, lapack_int lda, float* w );
  3747  lapack_int LAPACKE_dsyev( int matrix_layout, char jobz, char uplo, lapack_int n,
  3748                            double* a, lapack_int lda, double* w );
  3749  
  3750  lapack_int LAPACKE_ssyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3751                             float* a, lapack_int lda, float* w );
  3752  lapack_int LAPACKE_dsyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
  3753                             double* a, lapack_int lda, double* w );
  3754  
  3755  lapack_int LAPACKE_ssyevr( int matrix_layout, char jobz, char range, char uplo,
  3756                             lapack_int n, float* a, lapack_int lda, float vl,
  3757                             float vu, lapack_int il, lapack_int iu, float abstol,
  3758                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3759                             lapack_int* isuppz );
  3760  lapack_int LAPACKE_dsyevr( int matrix_layout, char jobz, char range, char uplo,
  3761                             lapack_int n, double* a, lapack_int lda, double vl,
  3762                             double vu, lapack_int il, lapack_int iu,
  3763                             double abstol, lapack_int* m, double* w, double* z,
  3764                             lapack_int ldz, lapack_int* isuppz );
  3765  
  3766  lapack_int LAPACKE_ssyevx( int matrix_layout, char jobz, char range, char uplo,
  3767                             lapack_int n, float* a, lapack_int lda, float vl,
  3768                             float vu, lapack_int il, lapack_int iu, float abstol,
  3769                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3770                             lapack_int* ifail );
  3771  lapack_int LAPACKE_dsyevx( int matrix_layout, char jobz, char range, char uplo,
  3772                             lapack_int n, double* a, lapack_int lda, double vl,
  3773                             double vu, lapack_int il, lapack_int iu,
  3774                             double abstol, lapack_int* m, double* w, double* z,
  3775                             lapack_int ldz, lapack_int* ifail );
  3776  
  3777  lapack_int LAPACKE_ssygst( int matrix_layout, lapack_int itype, char uplo,
  3778                             lapack_int n, float* a, lapack_int lda,
  3779                             const float* b, lapack_int ldb );
  3780  lapack_int LAPACKE_dsygst( int matrix_layout, lapack_int itype, char uplo,
  3781                             lapack_int n, double* a, lapack_int lda,
  3782                             const double* b, lapack_int ldb );
  3783  
  3784  lapack_int LAPACKE_ssygv( int matrix_layout, lapack_int itype, char jobz,
  3785                            char uplo, lapack_int n, float* a, lapack_int lda,
  3786                            float* b, lapack_int ldb, float* w );
  3787  lapack_int LAPACKE_dsygv( int matrix_layout, lapack_int itype, char jobz,
  3788                            char uplo, lapack_int n, double* a, lapack_int lda,
  3789                            double* b, lapack_int ldb, double* w );
  3790  
  3791  lapack_int LAPACKE_ssygvd( int matrix_layout, lapack_int itype, char jobz,
  3792                             char uplo, lapack_int n, float* a, lapack_int lda,
  3793                             float* b, lapack_int ldb, float* w );
  3794  lapack_int LAPACKE_dsygvd( int matrix_layout, lapack_int itype, char jobz,
  3795                             char uplo, lapack_int n, double* a, lapack_int lda,
  3796                             double* b, lapack_int ldb, double* w );
  3797  
  3798  lapack_int LAPACKE_ssygvx( int matrix_layout, lapack_int itype, char jobz,
  3799                             char range, char uplo, lapack_int n, float* a,
  3800                             lapack_int lda, float* b, lapack_int ldb, float vl,
  3801                             float vu, lapack_int il, lapack_int iu, float abstol,
  3802                             lapack_int* m, float* w, float* z, lapack_int ldz,
  3803                             lapack_int* ifail );
  3804  lapack_int LAPACKE_dsygvx( int matrix_layout, lapack_int itype, char jobz,
  3805                             char range, char uplo, lapack_int n, double* a,
  3806                             lapack_int lda, double* b, lapack_int ldb, double vl,
  3807                             double vu, lapack_int il, lapack_int iu,
  3808                             double abstol, lapack_int* m, double* w, double* z,
  3809                             lapack_int ldz, lapack_int* ifail );
  3810  
  3811  lapack_int LAPACKE_ssyrfs( int matrix_layout, char uplo, lapack_int n,
  3812                             lapack_int nrhs, const float* a, lapack_int lda,
  3813                             const float* af, lapack_int ldaf,
  3814                             const lapack_int* ipiv, const float* b,
  3815                             lapack_int ldb, float* x, lapack_int ldx,
  3816                             float* ferr, float* berr );
  3817  lapack_int LAPACKE_dsyrfs( int matrix_layout, char uplo, lapack_int n,
  3818                             lapack_int nrhs, const double* a, lapack_int lda,
  3819                             const double* af, lapack_int ldaf,
  3820                             const lapack_int* ipiv, const double* b,
  3821                             lapack_int ldb, double* x, lapack_int ldx,
  3822                             double* ferr, double* berr );
  3823  lapack_int LAPACKE_csyrfs( int matrix_layout, char uplo, lapack_int n,
  3824                             lapack_int nrhs, const lapack_complex_float* a,
  3825                             lapack_int lda, const lapack_complex_float* af,
  3826                             lapack_int ldaf, const lapack_int* ipiv,
  3827                             const lapack_complex_float* b, lapack_int ldb,
  3828                             lapack_complex_float* x, lapack_int ldx, float* ferr,
  3829                             float* berr );
  3830  lapack_int LAPACKE_zsyrfs( int matrix_layout, char uplo, lapack_int n,
  3831                             lapack_int nrhs, const lapack_complex_double* a,
  3832                             lapack_int lda, const lapack_complex_double* af,
  3833                             lapack_int ldaf, const lapack_int* ipiv,
  3834                             const lapack_complex_double* b, lapack_int ldb,
  3835                             lapack_complex_double* x, lapack_int ldx,
  3836                             double* ferr, double* berr );
  3837  
  3838  lapack_int LAPACKE_ssyrfsx( int matrix_layout, char uplo, char equed,
  3839                              lapack_int n, lapack_int nrhs, const float* a,
  3840                              lapack_int lda, const float* af, lapack_int ldaf,
  3841                              const lapack_int* ipiv, const float* s,
  3842                              const float* b, lapack_int ldb, float* x,
  3843                              lapack_int ldx, float* rcond, float* berr,
  3844                              lapack_int n_err_bnds, float* err_bnds_norm,
  3845                              float* err_bnds_comp, lapack_int nparams,
  3846                              float* params );
  3847  lapack_int LAPACKE_dsyrfsx( int matrix_layout, char uplo, char equed,
  3848                              lapack_int n, lapack_int nrhs, const double* a,
  3849                              lapack_int lda, const double* af, lapack_int ldaf,
  3850                              const lapack_int* ipiv, const double* s,
  3851                              const double* b, lapack_int ldb, double* x,
  3852                              lapack_int ldx, double* rcond, double* berr,
  3853                              lapack_int n_err_bnds, double* err_bnds_norm,
  3854                              double* err_bnds_comp, lapack_int nparams,
  3855                              double* params );
  3856  lapack_int LAPACKE_csyrfsx( int matrix_layout, char uplo, char equed,
  3857                              lapack_int n, lapack_int nrhs,
  3858                              const lapack_complex_float* a, lapack_int lda,
  3859                              const lapack_complex_float* af, lapack_int ldaf,
  3860                              const lapack_int* ipiv, const float* s,
  3861                              const lapack_complex_float* b, lapack_int ldb,
  3862                              lapack_complex_float* x, lapack_int ldx,
  3863                              float* rcond, float* berr, lapack_int n_err_bnds,
  3864                              float* err_bnds_norm, float* err_bnds_comp,
  3865                              lapack_int nparams, float* params );
  3866  lapack_int LAPACKE_zsyrfsx( int matrix_layout, char uplo, char equed,
  3867                              lapack_int n, lapack_int nrhs,
  3868                              const lapack_complex_double* a, lapack_int lda,
  3869                              const lapack_complex_double* af, lapack_int ldaf,
  3870                              const lapack_int* ipiv, const double* s,
  3871                              const lapack_complex_double* b, lapack_int ldb,
  3872                              lapack_complex_double* x, lapack_int ldx,
  3873                              double* rcond, double* berr, lapack_int n_err_bnds,
  3874                              double* err_bnds_norm, double* err_bnds_comp,
  3875                              lapack_int nparams, double* params );
  3876  
  3877  lapack_int LAPACKE_ssysv( int matrix_layout, char uplo, lapack_int n,
  3878                            lapack_int nrhs, float* a, lapack_int lda,
  3879                            lapack_int* ipiv, float* b, lapack_int ldb );
  3880  lapack_int LAPACKE_dsysv( int matrix_layout, char uplo, lapack_int n,
  3881                            lapack_int nrhs, double* a, lapack_int lda,
  3882                            lapack_int* ipiv, double* b, lapack_int ldb );
  3883  lapack_int LAPACKE_csysv( int matrix_layout, char uplo, lapack_int n,
  3884                            lapack_int nrhs, lapack_complex_float* a,
  3885                            lapack_int lda, lapack_int* ipiv,
  3886                            lapack_complex_float* b, lapack_int ldb );
  3887  lapack_int LAPACKE_zsysv( int matrix_layout, char uplo, lapack_int n,
  3888                            lapack_int nrhs, lapack_complex_double* a,
  3889                            lapack_int lda, lapack_int* ipiv,
  3890                            lapack_complex_double* b, lapack_int ldb );
  3891  
  3892  lapack_int LAPACKE_ssysvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3893                             lapack_int nrhs, const float* a, lapack_int lda,
  3894                             float* af, lapack_int ldaf, lapack_int* ipiv,
  3895                             const float* b, lapack_int ldb, float* x,
  3896                             lapack_int ldx, float* rcond, float* ferr,
  3897                             float* berr );
  3898  lapack_int LAPACKE_dsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3899                             lapack_int nrhs, const double* a, lapack_int lda,
  3900                             double* af, lapack_int ldaf, lapack_int* ipiv,
  3901                             const double* b, lapack_int ldb, double* x,
  3902                             lapack_int ldx, double* rcond, double* ferr,
  3903                             double* berr );
  3904  lapack_int LAPACKE_csysvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3905                             lapack_int nrhs, const lapack_complex_float* a,
  3906                             lapack_int lda, lapack_complex_float* af,
  3907                             lapack_int ldaf, lapack_int* ipiv,
  3908                             const lapack_complex_float* b, lapack_int ldb,
  3909                             lapack_complex_float* x, lapack_int ldx,
  3910                             float* rcond, float* ferr, float* berr );
  3911  lapack_int LAPACKE_zsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
  3912                             lapack_int nrhs, const lapack_complex_double* a,
  3913                             lapack_int lda, lapack_complex_double* af,
  3914                             lapack_int ldaf, lapack_int* ipiv,
  3915                             const lapack_complex_double* b, lapack_int ldb,
  3916                             lapack_complex_double* x, lapack_int ldx,
  3917                             double* rcond, double* ferr, double* berr );
  3918  
  3919  lapack_int LAPACKE_ssysvxx( int matrix_layout, char fact, char uplo,
  3920                              lapack_int n, lapack_int nrhs, float* a,
  3921                              lapack_int lda, float* af, lapack_int ldaf,
  3922                              lapack_int* ipiv, char* equed, float* s, float* b,
  3923                              lapack_int ldb, float* x, lapack_int ldx,
  3924                              float* rcond, float* rpvgrw, float* berr,
  3925                              lapack_int n_err_bnds, float* err_bnds_norm,
  3926                              float* err_bnds_comp, lapack_int nparams,
  3927                              float* params );
  3928  lapack_int LAPACKE_dsysvxx( int matrix_layout, char fact, char uplo,
  3929                              lapack_int n, lapack_int nrhs, double* a,
  3930                              lapack_int lda, double* af, lapack_int ldaf,
  3931                              lapack_int* ipiv, char* equed, double* s, double* b,
  3932                              lapack_int ldb, double* x, lapack_int ldx,
  3933                              double* rcond, double* rpvgrw, double* berr,
  3934                              lapack_int n_err_bnds, double* err_bnds_norm,
  3935                              double* err_bnds_comp, lapack_int nparams,
  3936                              double* params );
  3937  lapack_int LAPACKE_csysvxx( int matrix_layout, char fact, char uplo,
  3938                              lapack_int n, lapack_int nrhs,
  3939                              lapack_complex_float* a, lapack_int lda,
  3940                              lapack_complex_float* af, lapack_int ldaf,
  3941                              lapack_int* ipiv, char* equed, float* s,
  3942                              lapack_complex_float* b, lapack_int ldb,
  3943                              lapack_complex_float* x, lapack_int ldx,
  3944                              float* rcond, float* rpvgrw, float* berr,
  3945                              lapack_int n_err_bnds, float* err_bnds_norm,
  3946                              float* err_bnds_comp, lapack_int nparams,
  3947                              float* params );
  3948  lapack_int LAPACKE_zsysvxx( int matrix_layout, char fact, char uplo,
  3949                              lapack_int n, lapack_int nrhs,
  3950                              lapack_complex_double* a, lapack_int lda,
  3951                              lapack_complex_double* af, lapack_int ldaf,
  3952                              lapack_int* ipiv, char* equed, double* s,
  3953                              lapack_complex_double* b, lapack_int ldb,
  3954                              lapack_complex_double* x, lapack_int ldx,
  3955                              double* rcond, double* rpvgrw, double* berr,
  3956                              lapack_int n_err_bnds, double* err_bnds_norm,
  3957                              double* err_bnds_comp, lapack_int nparams,
  3958                              double* params );
  3959  
  3960  lapack_int LAPACKE_ssytrd( int matrix_layout, char uplo, lapack_int n, float* a,
  3961                             lapack_int lda, float* d, float* e, float* tau );
  3962  lapack_int LAPACKE_dsytrd( int matrix_layout, char uplo, lapack_int n, double* a,
  3963                             lapack_int lda, double* d, double* e, double* tau );
  3964  
  3965  lapack_int LAPACKE_ssytrf( int matrix_layout, char uplo, lapack_int n, float* a,
  3966                             lapack_int lda, lapack_int* ipiv );
  3967  lapack_int LAPACKE_dsytrf( int matrix_layout, char uplo, lapack_int n, double* a,
  3968                             lapack_int lda, lapack_int* ipiv );
  3969  lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n,
  3970                             lapack_complex_float* a, lapack_int lda,
  3971                             lapack_int* ipiv );
  3972  lapack_int LAPACKE_zsytrf( int matrix_layout, char uplo, lapack_int n,
  3973                             lapack_complex_double* a, lapack_int lda,
  3974                             lapack_int* ipiv );
  3975  
  3976  lapack_int LAPACKE_ssytri( int matrix_layout, char uplo, lapack_int n, float* a,
  3977                             lapack_int lda, const lapack_int* ipiv );
  3978  lapack_int LAPACKE_dsytri( int matrix_layout, char uplo, lapack_int n, double* a,
  3979                             lapack_int lda, const lapack_int* ipiv );
  3980  lapack_int LAPACKE_csytri( int matrix_layout, char uplo, lapack_int n,
  3981                             lapack_complex_float* a, lapack_int lda,
  3982                             const lapack_int* ipiv );
  3983  lapack_int LAPACKE_zsytri( int matrix_layout, char uplo, lapack_int n,
  3984                             lapack_complex_double* a, lapack_int lda,
  3985                             const lapack_int* ipiv );
  3986  
  3987  lapack_int LAPACKE_ssytrs( int matrix_layout, char uplo, lapack_int n,
  3988                             lapack_int nrhs, const float* a, lapack_int lda,
  3989                             const lapack_int* ipiv, float* b, lapack_int ldb );
  3990  lapack_int LAPACKE_dsytrs( int matrix_layout, char uplo, lapack_int n,
  3991                             lapack_int nrhs, const double* a, lapack_int lda,
  3992                             const lapack_int* ipiv, double* b, lapack_int ldb );
  3993  lapack_int LAPACKE_csytrs( int matrix_layout, char uplo, lapack_int n,
  3994                             lapack_int nrhs, const lapack_complex_float* a,
  3995                             lapack_int lda, const lapack_int* ipiv,
  3996                             lapack_complex_float* b, lapack_int ldb );
  3997  lapack_int LAPACKE_zsytrs( int matrix_layout, char uplo, lapack_int n,
  3998                             lapack_int nrhs, const lapack_complex_double* a,
  3999                             lapack_int lda, const lapack_int* ipiv,
  4000                             lapack_complex_double* b, lapack_int ldb );
  4001  
  4002  lapack_int LAPACKE_stbcon( int matrix_layout, char norm, char uplo, char diag,
  4003                             lapack_int n, lapack_int kd, const float* ab,
  4004                             lapack_int ldab, float* rcond );
  4005  lapack_int LAPACKE_dtbcon( int matrix_layout, char norm, char uplo, char diag,
  4006                             lapack_int n, lapack_int kd, const double* ab,
  4007                             lapack_int ldab, double* rcond );
  4008  lapack_int LAPACKE_ctbcon( int matrix_layout, char norm, char uplo, char diag,
  4009                             lapack_int n, lapack_int kd,
  4010                             const lapack_complex_float* ab, lapack_int ldab,
  4011                             float* rcond );
  4012  lapack_int LAPACKE_ztbcon( int matrix_layout, char norm, char uplo, char diag,
  4013                             lapack_int n, lapack_int kd,
  4014                             const lapack_complex_double* ab, lapack_int ldab,
  4015                             double* rcond );
  4016  
  4017  lapack_int LAPACKE_stbrfs( int matrix_layout, char uplo, char trans, char diag,
  4018                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4019                             const float* ab, lapack_int ldab, const float* b,
  4020                             lapack_int ldb, const float* x, lapack_int ldx,
  4021                             float* ferr, float* berr );
  4022  lapack_int LAPACKE_dtbrfs( int matrix_layout, char uplo, char trans, char diag,
  4023                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4024                             const double* ab, lapack_int ldab, const double* b,
  4025                             lapack_int ldb, const double* x, lapack_int ldx,
  4026                             double* ferr, double* berr );
  4027  lapack_int LAPACKE_ctbrfs( int matrix_layout, char uplo, char trans, char diag,
  4028                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4029                             const lapack_complex_float* ab, lapack_int ldab,
  4030                             const lapack_complex_float* b, lapack_int ldb,
  4031                             const lapack_complex_float* x, lapack_int ldx,
  4032                             float* ferr, float* berr );
  4033  lapack_int LAPACKE_ztbrfs( int matrix_layout, char uplo, char trans, char diag,
  4034                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4035                             const lapack_complex_double* ab, lapack_int ldab,
  4036                             const lapack_complex_double* b, lapack_int ldb,
  4037                             const lapack_complex_double* x, lapack_int ldx,
  4038                             double* ferr, double* berr );
  4039  
  4040  lapack_int LAPACKE_stbtrs( int matrix_layout, char uplo, char trans, char diag,
  4041                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4042                             const float* ab, lapack_int ldab, float* b,
  4043                             lapack_int ldb );
  4044  lapack_int LAPACKE_dtbtrs( int matrix_layout, char uplo, char trans, char diag,
  4045                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4046                             const double* ab, lapack_int ldab, double* b,
  4047                             lapack_int ldb );
  4048  lapack_int LAPACKE_ctbtrs( int matrix_layout, char uplo, char trans, char diag,
  4049                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4050                             const lapack_complex_float* ab, lapack_int ldab,
  4051                             lapack_complex_float* b, lapack_int ldb );
  4052  lapack_int LAPACKE_ztbtrs( int matrix_layout, char uplo, char trans, char diag,
  4053                             lapack_int n, lapack_int kd, lapack_int nrhs,
  4054                             const lapack_complex_double* ab, lapack_int ldab,
  4055                             lapack_complex_double* b, lapack_int ldb );
  4056  
  4057  lapack_int LAPACKE_stfsm( int matrix_layout, char transr, char side, char uplo,
  4058                            char trans, char diag, lapack_int m, lapack_int n,
  4059                            float alpha, const float* a, float* b,
  4060                            lapack_int ldb );
  4061  lapack_int LAPACKE_dtfsm( int matrix_layout, char transr, char side, char uplo,
  4062                            char trans, char diag, lapack_int m, lapack_int n,
  4063                            double alpha, const double* a, double* b,
  4064                            lapack_int ldb );
  4065  lapack_int LAPACKE_ctfsm( int matrix_layout, char transr, char side, char uplo,
  4066                            char trans, char diag, lapack_int m, lapack_int n,
  4067                            lapack_complex_float alpha,
  4068                            const lapack_complex_float* a,
  4069                            lapack_complex_float* b, lapack_int ldb );
  4070  lapack_int LAPACKE_ztfsm( int matrix_layout, char transr, char side, char uplo,
  4071                            char trans, char diag, lapack_int m, lapack_int n,
  4072                            lapack_complex_double alpha,
  4073                            const lapack_complex_double* a,
  4074                            lapack_complex_double* b, lapack_int ldb );
  4075  
  4076  lapack_int LAPACKE_stftri( int matrix_layout, char transr, char uplo, char diag,
  4077                             lapack_int n, float* a );
  4078  lapack_int LAPACKE_dtftri( int matrix_layout, char transr, char uplo, char diag,
  4079                             lapack_int n, double* a );
  4080  lapack_int LAPACKE_ctftri( int matrix_layout, char transr, char uplo, char diag,
  4081                             lapack_int n, lapack_complex_float* a );
  4082  lapack_int LAPACKE_ztftri( int matrix_layout, char transr, char uplo, char diag,
  4083                             lapack_int n, lapack_complex_double* a );
  4084  
  4085  lapack_int LAPACKE_stfttp( int matrix_layout, char transr, char uplo,
  4086                             lapack_int n, const float* arf, float* ap );
  4087  lapack_int LAPACKE_dtfttp( int matrix_layout, char transr, char uplo,
  4088                             lapack_int n, const double* arf, double* ap );
  4089  lapack_int LAPACKE_ctfttp( int matrix_layout, char transr, char uplo,
  4090                             lapack_int n, const lapack_complex_float* arf,
  4091                             lapack_complex_float* ap );
  4092  lapack_int LAPACKE_ztfttp( int matrix_layout, char transr, char uplo,
  4093                             lapack_int n, const lapack_complex_double* arf,
  4094                             lapack_complex_double* ap );
  4095  
  4096  lapack_int LAPACKE_stfttr( int matrix_layout, char transr, char uplo,
  4097                             lapack_int n, const float* arf, float* a,
  4098                             lapack_int lda );
  4099  lapack_int LAPACKE_dtfttr( int matrix_layout, char transr, char uplo,
  4100                             lapack_int n, const double* arf, double* a,
  4101                             lapack_int lda );
  4102  lapack_int LAPACKE_ctfttr( int matrix_layout, char transr, char uplo,
  4103                             lapack_int n, const lapack_complex_float* arf,
  4104                             lapack_complex_float* a, lapack_int lda );
  4105  lapack_int LAPACKE_ztfttr( int matrix_layout, char transr, char uplo,
  4106                             lapack_int n, const lapack_complex_double* arf,
  4107                             lapack_complex_double* a, lapack_int lda );
  4108  
  4109  lapack_int LAPACKE_stgevc( int matrix_layout, char side, char howmny,
  4110                             const lapack_logical* select, lapack_int n,
  4111                             const float* s, lapack_int lds, const float* p,
  4112                             lapack_int ldp, float* vl, lapack_int ldvl,
  4113                             float* vr, lapack_int ldvr, lapack_int mm,
  4114                             lapack_int* m );
  4115  lapack_int LAPACKE_dtgevc( int matrix_layout, char side, char howmny,
  4116                             const lapack_logical* select, lapack_int n,
  4117                             const double* s, lapack_int lds, const double* p,
  4118                             lapack_int ldp, double* vl, lapack_int ldvl,
  4119                             double* vr, lapack_int ldvr, lapack_int mm,
  4120                             lapack_int* m );
  4121  lapack_int LAPACKE_ctgevc( int matrix_layout, char side, char howmny,
  4122                             const lapack_logical* select, lapack_int n,
  4123                             const lapack_complex_float* s, lapack_int lds,
  4124                             const lapack_complex_float* p, lapack_int ldp,
  4125                             lapack_complex_float* vl, lapack_int ldvl,
  4126                             lapack_complex_float* vr, lapack_int ldvr,
  4127                             lapack_int mm, lapack_int* m );
  4128  lapack_int LAPACKE_ztgevc( int matrix_layout, char side, char howmny,
  4129                             const lapack_logical* select, lapack_int n,
  4130                             const lapack_complex_double* s, lapack_int lds,
  4131                             const lapack_complex_double* p, lapack_int ldp,
  4132                             lapack_complex_double* vl, lapack_int ldvl,
  4133                             lapack_complex_double* vr, lapack_int ldvr,
  4134                             lapack_int mm, lapack_int* m );
  4135  
  4136  lapack_int LAPACKE_stgexc( int matrix_layout, lapack_logical wantq,
  4137                             lapack_logical wantz, lapack_int n, float* a,
  4138                             lapack_int lda, float* b, lapack_int ldb, float* q,
  4139                             lapack_int ldq, float* z, lapack_int ldz,
  4140                             lapack_int* ifst, lapack_int* ilst );
  4141  lapack_int LAPACKE_dtgexc( int matrix_layout, lapack_logical wantq,
  4142                             lapack_logical wantz, lapack_int n, double* a,
  4143                             lapack_int lda, double* b, lapack_int ldb, double* q,
  4144                             lapack_int ldq, double* z, lapack_int ldz,
  4145                             lapack_int* ifst, lapack_int* ilst );
  4146  lapack_int LAPACKE_ctgexc( int matrix_layout, lapack_logical wantq,
  4147                             lapack_logical wantz, lapack_int n,
  4148                             lapack_complex_float* a, lapack_int lda,
  4149                             lapack_complex_float* b, lapack_int ldb,
  4150                             lapack_complex_float* q, lapack_int ldq,
  4151                             lapack_complex_float* z, lapack_int ldz,
  4152                             lapack_int ifst, lapack_int ilst );
  4153  lapack_int LAPACKE_ztgexc( int matrix_layout, lapack_logical wantq,
  4154                             lapack_logical wantz, lapack_int n,
  4155                             lapack_complex_double* a, lapack_int lda,
  4156                             lapack_complex_double* b, lapack_int ldb,
  4157                             lapack_complex_double* q, lapack_int ldq,
  4158                             lapack_complex_double* z, lapack_int ldz,
  4159                             lapack_int ifst, lapack_int ilst );
  4160  
  4161  lapack_int LAPACKE_stgsen( int matrix_layout, lapack_int ijob,
  4162                             lapack_logical wantq, lapack_logical wantz,
  4163                             const lapack_logical* select, lapack_int n, float* a,
  4164                             lapack_int lda, float* b, lapack_int ldb,
  4165                             float* alphar, float* alphai, float* beta, float* q,
  4166                             lapack_int ldq, float* z, lapack_int ldz,
  4167                             lapack_int* m, float* pl, float* pr, float* dif );
  4168  lapack_int LAPACKE_dtgsen( int matrix_layout, lapack_int ijob,
  4169                             lapack_logical wantq, lapack_logical wantz,
  4170                             const lapack_logical* select, lapack_int n,
  4171                             double* a, lapack_int lda, double* b, lapack_int ldb,
  4172                             double* alphar, double* alphai, double* beta,
  4173                             double* q, lapack_int ldq, double* z, lapack_int ldz,
  4174                             lapack_int* m, double* pl, double* pr, double* dif );
  4175  lapack_int LAPACKE_ctgsen( int matrix_layout, lapack_int ijob,
  4176                             lapack_logical wantq, lapack_logical wantz,
  4177                             const lapack_logical* select, lapack_int n,
  4178                             lapack_complex_float* a, lapack_int lda,
  4179                             lapack_complex_float* b, lapack_int ldb,
  4180                             lapack_complex_float* alpha,
  4181                             lapack_complex_float* beta, lapack_complex_float* q,
  4182                             lapack_int ldq, lapack_complex_float* z,
  4183                             lapack_int ldz, lapack_int* m, float* pl, float* pr,
  4184                             float* dif );
  4185  lapack_int LAPACKE_ztgsen( int matrix_layout, lapack_int ijob,
  4186                             lapack_logical wantq, lapack_logical wantz,
  4187                             const lapack_logical* select, lapack_int n,
  4188                             lapack_complex_double* a, lapack_int lda,
  4189                             lapack_complex_double* b, lapack_int ldb,
  4190                             lapack_complex_double* alpha,
  4191                             lapack_complex_double* beta,
  4192                             lapack_complex_double* q, lapack_int ldq,
  4193                             lapack_complex_double* z, lapack_int ldz,
  4194                             lapack_int* m, double* pl, double* pr, double* dif );
  4195  
  4196  lapack_int LAPACKE_stgsja( int matrix_layout, char jobu, char jobv, char jobq,
  4197                             lapack_int m, lapack_int p, lapack_int n,
  4198                             lapack_int k, lapack_int l, float* a, lapack_int lda,
  4199                             float* b, lapack_int ldb, float tola, float tolb,
  4200                             float* alpha, float* beta, float* u, lapack_int ldu,
  4201                             float* v, lapack_int ldv, float* q, lapack_int ldq,
  4202                             lapack_int* ncycle );
  4203  lapack_int LAPACKE_dtgsja( int matrix_layout, char jobu, char jobv, char jobq,
  4204                             lapack_int m, lapack_int p, lapack_int n,
  4205                             lapack_int k, lapack_int l, double* a,
  4206                             lapack_int lda, double* b, lapack_int ldb,
  4207                             double tola, double tolb, double* alpha,
  4208                             double* beta, double* u, lapack_int ldu, double* v,
  4209                             lapack_int ldv, double* q, lapack_int ldq,
  4210                             lapack_int* ncycle );
  4211  lapack_int LAPACKE_ctgsja( int matrix_layout, char jobu, char jobv, char jobq,
  4212                             lapack_int m, lapack_int p, lapack_int n,
  4213                             lapack_int k, lapack_int l, lapack_complex_float* a,
  4214                             lapack_int lda, lapack_complex_float* b,
  4215                             lapack_int ldb, float tola, float tolb, float* alpha,
  4216                             float* beta, lapack_complex_float* u, lapack_int ldu,
  4217                             lapack_complex_float* v, lapack_int ldv,
  4218                             lapack_complex_float* q, lapack_int ldq,
  4219                             lapack_int* ncycle );
  4220  lapack_int LAPACKE_ztgsja( int matrix_layout, char jobu, char jobv, char jobq,
  4221                             lapack_int m, lapack_int p, lapack_int n,
  4222                             lapack_int k, lapack_int l, lapack_complex_double* a,
  4223                             lapack_int lda, lapack_complex_double* b,
  4224                             lapack_int ldb, double tola, double tolb,
  4225                             double* alpha, double* beta,
  4226                             lapack_complex_double* u, lapack_int ldu,
  4227                             lapack_complex_double* v, lapack_int ldv,
  4228                             lapack_complex_double* q, lapack_int ldq,
  4229                             lapack_int* ncycle );
  4230  
  4231  lapack_int LAPACKE_stgsna( int matrix_layout, char job, char howmny,
  4232                             const lapack_logical* select, lapack_int n,
  4233                             const float* a, lapack_int lda, const float* b,
  4234                             lapack_int ldb, const float* vl, lapack_int ldvl,
  4235                             const float* vr, lapack_int ldvr, float* s,
  4236                             float* dif, lapack_int mm, lapack_int* m );
  4237  lapack_int LAPACKE_dtgsna( int matrix_layout, char job, char howmny,
  4238                             const lapack_logical* select, lapack_int n,
  4239                             const double* a, lapack_int lda, const double* b,
  4240                             lapack_int ldb, const double* vl, lapack_int ldvl,
  4241                             const double* vr, lapack_int ldvr, double* s,
  4242                             double* dif, lapack_int mm, lapack_int* m );
  4243  lapack_int LAPACKE_ctgsna( int matrix_layout, char job, char howmny,
  4244                             const lapack_logical* select, lapack_int n,
  4245                             const lapack_complex_float* a, lapack_int lda,
  4246                             const lapack_complex_float* b, lapack_int ldb,
  4247                             const lapack_complex_float* vl, lapack_int ldvl,
  4248                             const lapack_complex_float* vr, lapack_int ldvr,
  4249                             float* s, float* dif, lapack_int mm, lapack_int* m );
  4250  lapack_int LAPACKE_ztgsna( int matrix_layout, char job, char howmny,
  4251                             const lapack_logical* select, lapack_int n,
  4252                             const lapack_complex_double* a, lapack_int lda,
  4253                             const lapack_complex_double* b, lapack_int ldb,
  4254                             const lapack_complex_double* vl, lapack_int ldvl,
  4255                             const lapack_complex_double* vr, lapack_int ldvr,
  4256                             double* s, double* dif, lapack_int mm,
  4257                             lapack_int* m );
  4258  
  4259  lapack_int LAPACKE_stgsyl( int matrix_layout, char trans, lapack_int ijob,
  4260                             lapack_int m, lapack_int n, const float* a,
  4261                             lapack_int lda, const float* b, lapack_int ldb,
  4262                             float* c, lapack_int ldc, const float* d,
  4263                             lapack_int ldd, const float* e, lapack_int lde,
  4264                             float* f, lapack_int ldf, float* scale, float* dif );
  4265  lapack_int LAPACKE_dtgsyl( int matrix_layout, char trans, lapack_int ijob,
  4266                             lapack_int m, lapack_int n, const double* a,
  4267                             lapack_int lda, const double* b, lapack_int ldb,
  4268                             double* c, lapack_int ldc, const double* d,
  4269                             lapack_int ldd, const double* e, lapack_int lde,
  4270                             double* f, lapack_int ldf, double* scale,
  4271                             double* dif );
  4272  lapack_int LAPACKE_ctgsyl( int matrix_layout, char trans, lapack_int ijob,
  4273                             lapack_int m, lapack_int n,
  4274                             const lapack_complex_float* a, lapack_int lda,
  4275                             const lapack_complex_float* b, lapack_int ldb,
  4276                             lapack_complex_float* c, lapack_int ldc,
  4277                             const lapack_complex_float* d, lapack_int ldd,
  4278                             const lapack_complex_float* e, lapack_int lde,
  4279                             lapack_complex_float* f, lapack_int ldf,
  4280                             float* scale, float* dif );
  4281  lapack_int LAPACKE_ztgsyl( int matrix_layout, char trans, lapack_int ijob,
  4282                             lapack_int m, lapack_int n,
  4283                             const lapack_complex_double* a, lapack_int lda,
  4284                             const lapack_complex_double* b, lapack_int ldb,
  4285                             lapack_complex_double* c, lapack_int ldc,
  4286                             const lapack_complex_double* d, lapack_int ldd,
  4287                             const lapack_complex_double* e, lapack_int lde,
  4288                             lapack_complex_double* f, lapack_int ldf,
  4289                             double* scale, double* dif );
  4290  
  4291  lapack_int LAPACKE_stpcon( int matrix_layout, char norm, char uplo, char diag,
  4292                             lapack_int n, const float* ap, float* rcond );
  4293  lapack_int LAPACKE_dtpcon( int matrix_layout, char norm, char uplo, char diag,
  4294                             lapack_int n, const double* ap, double* rcond );
  4295  lapack_int LAPACKE_ctpcon( int matrix_layout, char norm, char uplo, char diag,
  4296                             lapack_int n, const lapack_complex_float* ap,
  4297                             float* rcond );
  4298  lapack_int LAPACKE_ztpcon( int matrix_layout, char norm, char uplo, char diag,
  4299                             lapack_int n, const lapack_complex_double* ap,
  4300                             double* rcond );
  4301  
  4302  lapack_int LAPACKE_stprfs( int matrix_layout, char uplo, char trans, char diag,
  4303                             lapack_int n, lapack_int nrhs, const float* ap,
  4304                             const float* b, lapack_int ldb, const float* x,
  4305                             lapack_int ldx, float* ferr, float* berr );
  4306  lapack_int LAPACKE_dtprfs( int matrix_layout, char uplo, char trans, char diag,
  4307                             lapack_int n, lapack_int nrhs, const double* ap,
  4308                             const double* b, lapack_int ldb, const double* x,
  4309                             lapack_int ldx, double* ferr, double* berr );
  4310  lapack_int LAPACKE_ctprfs( int matrix_layout, char uplo, char trans, char diag,
  4311                             lapack_int n, lapack_int nrhs,
  4312                             const lapack_complex_float* ap,
  4313                             const lapack_complex_float* b, lapack_int ldb,
  4314                             const lapack_complex_float* x, lapack_int ldx,
  4315                             float* ferr, float* berr );
  4316  lapack_int LAPACKE_ztprfs( int matrix_layout, char uplo, char trans, char diag,
  4317                             lapack_int n, lapack_int nrhs,
  4318                             const lapack_complex_double* ap,
  4319                             const lapack_complex_double* b, lapack_int ldb,
  4320                             const lapack_complex_double* x, lapack_int ldx,
  4321                             double* ferr, double* berr );
  4322  
  4323  lapack_int LAPACKE_stptri( int matrix_layout, char uplo, char diag, lapack_int n,
  4324                             float* ap );
  4325  lapack_int LAPACKE_dtptri( int matrix_layout, char uplo, char diag, lapack_int n,
  4326                             double* ap );
  4327  lapack_int LAPACKE_ctptri( int matrix_layout, char uplo, char diag, lapack_int n,
  4328                             lapack_complex_float* ap );
  4329  lapack_int LAPACKE_ztptri( int matrix_layout, char uplo, char diag, lapack_int n,
  4330                             lapack_complex_double* ap );
  4331  
  4332  lapack_int LAPACKE_stptrs( int matrix_layout, char uplo, char trans, char diag,
  4333                             lapack_int n, lapack_int nrhs, const float* ap,
  4334                             float* b, lapack_int ldb );
  4335  lapack_int LAPACKE_dtptrs( int matrix_layout, char uplo, char trans, char diag,
  4336                             lapack_int n, lapack_int nrhs, const double* ap,
  4337                             double* b, lapack_int ldb );
  4338  lapack_int LAPACKE_ctptrs( int matrix_layout, char uplo, char trans, char diag,
  4339                             lapack_int n, lapack_int nrhs,
  4340                             const lapack_complex_float* ap,
  4341                             lapack_complex_float* b, lapack_int ldb );
  4342  lapack_int LAPACKE_ztptrs( int matrix_layout, char uplo, char trans, char diag,
  4343                             lapack_int n, lapack_int nrhs,
  4344                             const lapack_complex_double* ap,
  4345                             lapack_complex_double* b, lapack_int ldb );
  4346  
  4347  lapack_int LAPACKE_stpttf( int matrix_layout, char transr, char uplo,
  4348                             lapack_int n, const float* ap, float* arf );
  4349  lapack_int LAPACKE_dtpttf( int matrix_layout, char transr, char uplo,
  4350                             lapack_int n, const double* ap, double* arf );
  4351  lapack_int LAPACKE_ctpttf( int matrix_layout, char transr, char uplo,
  4352                             lapack_int n, const lapack_complex_float* ap,
  4353                             lapack_complex_float* arf );
  4354  lapack_int LAPACKE_ztpttf( int matrix_layout, char transr, char uplo,
  4355                             lapack_int n, const lapack_complex_double* ap,
  4356                             lapack_complex_double* arf );
  4357  
  4358  lapack_int LAPACKE_stpttr( int matrix_layout, char uplo, lapack_int n,
  4359                             const float* ap, float* a, lapack_int lda );
  4360  lapack_int LAPACKE_dtpttr( int matrix_layout, char uplo, lapack_int n,
  4361                             const double* ap, double* a, lapack_int lda );
  4362  lapack_int LAPACKE_ctpttr( int matrix_layout, char uplo, lapack_int n,
  4363                             const lapack_complex_float* ap,
  4364                             lapack_complex_float* a, lapack_int lda );
  4365  lapack_int LAPACKE_ztpttr( int matrix_layout, char uplo, lapack_int n,
  4366                             const lapack_complex_double* ap,
  4367                             lapack_complex_double* a, lapack_int lda );
  4368  
  4369  lapack_int LAPACKE_strcon( int matrix_layout, char norm, char uplo, char diag,
  4370                             lapack_int n, const float* a, lapack_int lda,
  4371                             float* rcond );
  4372  lapack_int LAPACKE_dtrcon( int matrix_layout, char norm, char uplo, char diag,
  4373                             lapack_int n, const double* a, lapack_int lda,
  4374                             double* rcond );
  4375  lapack_int LAPACKE_ctrcon( int matrix_layout, char norm, char uplo, char diag,
  4376                             lapack_int n, const lapack_complex_float* a,
  4377                             lapack_int lda, float* rcond );
  4378  lapack_int LAPACKE_ztrcon( int matrix_layout, char norm, char uplo, char diag,
  4379                             lapack_int n, const lapack_complex_double* a,
  4380                             lapack_int lda, double* rcond );
  4381  
  4382  lapack_int LAPACKE_strevc( int matrix_layout, char side, char howmny,
  4383                             lapack_logical* select, lapack_int n, const float* t,
  4384                             lapack_int ldt, float* vl, lapack_int ldvl,
  4385                             float* vr, lapack_int ldvr, lapack_int mm,
  4386                             lapack_int* m );
  4387  lapack_int LAPACKE_dtrevc( int matrix_layout, char side, char howmny,
  4388                             lapack_logical* select, lapack_int n,
  4389                             const double* t, lapack_int ldt, double* vl,
  4390                             lapack_int ldvl, double* vr, lapack_int ldvr,
  4391                             lapack_int mm, lapack_int* m );
  4392  lapack_int LAPACKE_ctrevc( int matrix_layout, char side, char howmny,
  4393                             const lapack_logical* select, lapack_int n,
  4394                             lapack_complex_float* t, lapack_int ldt,
  4395                             lapack_complex_float* vl, lapack_int ldvl,
  4396                             lapack_complex_float* vr, lapack_int ldvr,
  4397                             lapack_int mm, lapack_int* m );
  4398  lapack_int LAPACKE_ztrevc( int matrix_layout, char side, char howmny,
  4399                             const lapack_logical* select, lapack_int n,
  4400                             lapack_complex_double* t, lapack_int ldt,
  4401                             lapack_complex_double* vl, lapack_int ldvl,
  4402                             lapack_complex_double* vr, lapack_int ldvr,
  4403                             lapack_int mm, lapack_int* m );
  4404  
  4405  lapack_int LAPACKE_strexc( int matrix_layout, char compq, lapack_int n, float* t,
  4406                             lapack_int ldt, float* q, lapack_int ldq,
  4407                             lapack_int* ifst, lapack_int* ilst );
  4408  lapack_int LAPACKE_dtrexc( int matrix_layout, char compq, lapack_int n,
  4409                             double* t, lapack_int ldt, double* q, lapack_int ldq,
  4410                             lapack_int* ifst, lapack_int* ilst );
  4411  lapack_int LAPACKE_ctrexc( int matrix_layout, char compq, lapack_int n,
  4412                             lapack_complex_float* t, lapack_int ldt,
  4413                             lapack_complex_float* q, lapack_int ldq,
  4414                             lapack_int ifst, lapack_int ilst );
  4415  lapack_int LAPACKE_ztrexc( int matrix_layout, char compq, lapack_int n,
  4416                             lapack_complex_double* t, lapack_int ldt,
  4417                             lapack_complex_double* q, lapack_int ldq,
  4418                             lapack_int ifst, lapack_int ilst );
  4419  
  4420  lapack_int LAPACKE_strrfs( int matrix_layout, char uplo, char trans, char diag,
  4421                             lapack_int n, lapack_int nrhs, const float* a,
  4422                             lapack_int lda, const float* b, lapack_int ldb,
  4423                             const float* x, lapack_int ldx, float* ferr,
  4424                             float* berr );
  4425  lapack_int LAPACKE_dtrrfs( int matrix_layout, char uplo, char trans, char diag,
  4426                             lapack_int n, lapack_int nrhs, const double* a,
  4427                             lapack_int lda, const double* b, lapack_int ldb,
  4428                             const double* x, lapack_int ldx, double* ferr,
  4429                             double* berr );
  4430  lapack_int LAPACKE_ctrrfs( int matrix_layout, char uplo, char trans, char diag,
  4431                             lapack_int n, lapack_int nrhs,
  4432                             const lapack_complex_float* a, lapack_int lda,
  4433                             const lapack_complex_float* b, lapack_int ldb,
  4434                             const lapack_complex_float* x, lapack_int ldx,
  4435                             float* ferr, float* berr );
  4436  lapack_int LAPACKE_ztrrfs( int matrix_layout, char uplo, char trans, char diag,
  4437                             lapack_int n, lapack_int nrhs,
  4438                             const lapack_complex_double* a, lapack_int lda,
  4439                             const lapack_complex_double* b, lapack_int ldb,
  4440                             const lapack_complex_double* x, lapack_int ldx,
  4441                             double* ferr, double* berr );
  4442  
  4443  lapack_int LAPACKE_strsen( int matrix_layout, char job, char compq,
  4444                             const lapack_logical* select, lapack_int n, float* t,
  4445                             lapack_int ldt, float* q, lapack_int ldq, float* wr,
  4446                             float* wi, lapack_int* m, float* s, float* sep );
  4447  lapack_int LAPACKE_dtrsen( int matrix_layout, char job, char compq,
  4448                             const lapack_logical* select, lapack_int n,
  4449                             double* t, lapack_int ldt, double* q, lapack_int ldq,
  4450                             double* wr, double* wi, lapack_int* m, double* s,
  4451                             double* sep );
  4452  lapack_int LAPACKE_ctrsen( int matrix_layout, char job, char compq,
  4453                             const lapack_logical* select, lapack_int n,
  4454                             lapack_complex_float* t, lapack_int ldt,
  4455                             lapack_complex_float* q, lapack_int ldq,
  4456                             lapack_complex_float* w, lapack_int* m, float* s,
  4457                             float* sep );
  4458  lapack_int LAPACKE_ztrsen( int matrix_layout, char job, char compq,
  4459                             const lapack_logical* select, lapack_int n,
  4460                             lapack_complex_double* t, lapack_int ldt,
  4461                             lapack_complex_double* q, lapack_int ldq,
  4462                             lapack_complex_double* w, lapack_int* m, double* s,
  4463                             double* sep );
  4464  
  4465  lapack_int LAPACKE_strsna( int matrix_layout, char job, char howmny,
  4466                             const lapack_logical* select, lapack_int n,
  4467                             const float* t, lapack_int ldt, const float* vl,
  4468                             lapack_int ldvl, const float* vr, lapack_int ldvr,
  4469                             float* s, float* sep, lapack_int mm, lapack_int* m );
  4470  lapack_int LAPACKE_dtrsna( int matrix_layout, char job, char howmny,
  4471                             const lapack_logical* select, lapack_int n,
  4472                             const double* t, lapack_int ldt, const double* vl,
  4473                             lapack_int ldvl, const double* vr, lapack_int ldvr,
  4474                             double* s, double* sep, lapack_int mm,
  4475                             lapack_int* m );
  4476  lapack_int LAPACKE_ctrsna( int matrix_layout, char job, char howmny,
  4477                             const lapack_logical* select, lapack_int n,
  4478                             const lapack_complex_float* t, lapack_int ldt,
  4479                             const lapack_complex_float* vl, lapack_int ldvl,
  4480                             const lapack_complex_float* vr, lapack_int ldvr,
  4481                             float* s, float* sep, lapack_int mm, lapack_int* m );
  4482  lapack_int LAPACKE_ztrsna( int matrix_layout, char job, char howmny,
  4483                             const lapack_logical* select, lapack_int n,
  4484                             const lapack_complex_double* t, lapack_int ldt,
  4485                             const lapack_complex_double* vl, lapack_int ldvl,
  4486                             const lapack_complex_double* vr, lapack_int ldvr,
  4487                             double* s, double* sep, lapack_int mm,
  4488                             lapack_int* m );
  4489  
  4490  lapack_int LAPACKE_strsyl( int matrix_layout, char trana, char tranb,
  4491                             lapack_int isgn, lapack_int m, lapack_int n,
  4492                             const float* a, lapack_int lda, const float* b,
  4493                             lapack_int ldb, float* c, lapack_int ldc,
  4494                             float* scale );
  4495  lapack_int LAPACKE_dtrsyl( int matrix_layout, char trana, char tranb,
  4496                             lapack_int isgn, lapack_int m, lapack_int n,
  4497                             const double* a, lapack_int lda, const double* b,
  4498                             lapack_int ldb, double* c, lapack_int ldc,
  4499                             double* scale );
  4500  lapack_int LAPACKE_ctrsyl( int matrix_layout, char trana, char tranb,
  4501                             lapack_int isgn, lapack_int m, lapack_int n,
  4502                             const lapack_complex_float* a, lapack_int lda,
  4503                             const lapack_complex_float* b, lapack_int ldb,
  4504                             lapack_complex_float* c, lapack_int ldc,
  4505                             float* scale );
  4506  lapack_int LAPACKE_ztrsyl( int matrix_layout, char trana, char tranb,
  4507                             lapack_int isgn, lapack_int m, lapack_int n,
  4508                             const lapack_complex_double* a, lapack_int lda,
  4509                             const lapack_complex_double* b, lapack_int ldb,
  4510                             lapack_complex_double* c, lapack_int ldc,
  4511                             double* scale );
  4512  
  4513  lapack_int LAPACKE_strtri( int matrix_layout, char uplo, char diag, lapack_int n,
  4514                             float* a, lapack_int lda );
  4515  lapack_int LAPACKE_dtrtri( int matrix_layout, char uplo, char diag, lapack_int n,
  4516                             double* a, lapack_int lda );
  4517  lapack_int LAPACKE_ctrtri( int matrix_layout, char uplo, char diag, lapack_int n,
  4518                             lapack_complex_float* a, lapack_int lda );
  4519  lapack_int LAPACKE_ztrtri( int matrix_layout, char uplo, char diag, lapack_int n,
  4520                             lapack_complex_double* a, lapack_int lda );
  4521  
  4522  lapack_int LAPACKE_strtrs( int matrix_layout, char uplo, char trans, char diag,
  4523                             lapack_int n, lapack_int nrhs, const float* a,
  4524                             lapack_int lda, float* b, lapack_int ldb );
  4525  lapack_int LAPACKE_dtrtrs( int matrix_layout, char uplo, char trans, char diag,
  4526                             lapack_int n, lapack_int nrhs, const double* a,
  4527                             lapack_int lda, double* b, lapack_int ldb );
  4528  lapack_int LAPACKE_ctrtrs( int matrix_layout, char uplo, char trans, char diag,
  4529                             lapack_int n, lapack_int nrhs,
  4530                             const lapack_complex_float* a, lapack_int lda,
  4531                             lapack_complex_float* b, lapack_int ldb );
  4532  lapack_int LAPACKE_ztrtrs( int matrix_layout, char uplo, char trans, char diag,
  4533                             lapack_int n, lapack_int nrhs,
  4534                             const lapack_complex_double* a, lapack_int lda,
  4535                             lapack_complex_double* b, lapack_int ldb );
  4536  
  4537  lapack_int LAPACKE_strttf( int matrix_layout, char transr, char uplo,
  4538                             lapack_int n, const float* a, lapack_int lda,
  4539                             float* arf );
  4540  lapack_int LAPACKE_dtrttf( int matrix_layout, char transr, char uplo,
  4541                             lapack_int n, const double* a, lapack_int lda,
  4542                             double* arf );
  4543  lapack_int LAPACKE_ctrttf( int matrix_layout, char transr, char uplo,
  4544                             lapack_int n, const lapack_complex_float* a,
  4545                             lapack_int lda, lapack_complex_float* arf );
  4546  lapack_int LAPACKE_ztrttf( int matrix_layout, char transr, char uplo,
  4547                             lapack_int n, const lapack_complex_double* a,
  4548                             lapack_int lda, lapack_complex_double* arf );
  4549  
  4550  lapack_int LAPACKE_strttp( int matrix_layout, char uplo, lapack_int n,
  4551                             const float* a, lapack_int lda, float* ap );
  4552  lapack_int LAPACKE_dtrttp( int matrix_layout, char uplo, lapack_int n,
  4553                             const double* a, lapack_int lda, double* ap );
  4554  lapack_int LAPACKE_ctrttp( int matrix_layout, char uplo, lapack_int n,
  4555                             const lapack_complex_float* a, lapack_int lda,
  4556                             lapack_complex_float* ap );
  4557  lapack_int LAPACKE_ztrttp( int matrix_layout, char uplo, lapack_int n,
  4558                             const lapack_complex_double* a, lapack_int lda,
  4559                             lapack_complex_double* ap );
  4560  
  4561  lapack_int LAPACKE_stzrzf( int matrix_layout, lapack_int m, lapack_int n,
  4562                             float* a, lapack_int lda, float* tau );
  4563  lapack_int LAPACKE_dtzrzf( int matrix_layout, lapack_int m, lapack_int n,
  4564                             double* a, lapack_int lda, double* tau );
  4565  lapack_int LAPACKE_ctzrzf( int matrix_layout, lapack_int m, lapack_int n,
  4566                             lapack_complex_float* a, lapack_int lda,
  4567                             lapack_complex_float* tau );
  4568  lapack_int LAPACKE_ztzrzf( int matrix_layout, lapack_int m, lapack_int n,
  4569                             lapack_complex_double* a, lapack_int lda,
  4570                             lapack_complex_double* tau );
  4571  
  4572  lapack_int LAPACKE_cungbr( int matrix_layout, char vect, lapack_int m,
  4573                             lapack_int n, lapack_int k, lapack_complex_float* a,
  4574                             lapack_int lda, const lapack_complex_float* tau );
  4575  lapack_int LAPACKE_zungbr( int matrix_layout, char vect, lapack_int m,
  4576                             lapack_int n, lapack_int k, lapack_complex_double* a,
  4577                             lapack_int lda, const lapack_complex_double* tau );
  4578  
  4579  lapack_int LAPACKE_cunghr( int matrix_layout, lapack_int n, lapack_int ilo,
  4580                             lapack_int ihi, lapack_complex_float* a,
  4581                             lapack_int lda, const lapack_complex_float* tau );
  4582  lapack_int LAPACKE_zunghr( int matrix_layout, lapack_int n, lapack_int ilo,
  4583                             lapack_int ihi, lapack_complex_double* a,
  4584                             lapack_int lda, const lapack_complex_double* tau );
  4585  
  4586  lapack_int LAPACKE_cunglq( int matrix_layout, lapack_int m, lapack_int n,
  4587                             lapack_int k, lapack_complex_float* a,
  4588                             lapack_int lda, const lapack_complex_float* tau );
  4589  lapack_int LAPACKE_zunglq( int matrix_layout, lapack_int m, lapack_int n,
  4590                             lapack_int k, lapack_complex_double* a,
  4591                             lapack_int lda, const lapack_complex_double* tau );
  4592  
  4593  lapack_int LAPACKE_cungql( int matrix_layout, lapack_int m, lapack_int n,
  4594                             lapack_int k, lapack_complex_float* a,
  4595                             lapack_int lda, const lapack_complex_float* tau );
  4596  lapack_int LAPACKE_zungql( int matrix_layout, lapack_int m, lapack_int n,
  4597                             lapack_int k, lapack_complex_double* a,
  4598                             lapack_int lda, const lapack_complex_double* tau );
  4599  
  4600  lapack_int LAPACKE_cungqr( int matrix_layout, lapack_int m, lapack_int n,
  4601                             lapack_int k, lapack_complex_float* a,
  4602                             lapack_int lda, const lapack_complex_float* tau );
  4603  lapack_int LAPACKE_zungqr( int matrix_layout, lapack_int m, lapack_int n,
  4604                             lapack_int k, lapack_complex_double* a,
  4605                             lapack_int lda, const lapack_complex_double* tau );
  4606  
  4607  lapack_int LAPACKE_cungrq( int matrix_layout, lapack_int m, lapack_int n,
  4608                             lapack_int k, lapack_complex_float* a,
  4609                             lapack_int lda, const lapack_complex_float* tau );
  4610  lapack_int LAPACKE_zungrq( int matrix_layout, lapack_int m, lapack_int n,
  4611                             lapack_int k, lapack_complex_double* a,
  4612                             lapack_int lda, const lapack_complex_double* tau );
  4613  
  4614  lapack_int LAPACKE_cungtr( int matrix_layout, char uplo, lapack_int n,
  4615                             lapack_complex_float* a, lapack_int lda,
  4616                             const lapack_complex_float* tau );
  4617  lapack_int LAPACKE_zungtr( int matrix_layout, char uplo, lapack_int n,
  4618                             lapack_complex_double* a, lapack_int lda,
  4619                             const lapack_complex_double* tau );
  4620  
  4621  lapack_int LAPACKE_cunmbr( int matrix_layout, char vect, char side, char trans,
  4622                             lapack_int m, lapack_int n, lapack_int k,
  4623                             const lapack_complex_float* a, lapack_int lda,
  4624                             const lapack_complex_float* tau,
  4625                             lapack_complex_float* c, lapack_int ldc );
  4626  lapack_int LAPACKE_zunmbr( int matrix_layout, char vect, char side, char trans,
  4627                             lapack_int m, lapack_int n, lapack_int k,
  4628                             const lapack_complex_double* a, lapack_int lda,
  4629                             const lapack_complex_double* tau,
  4630                             lapack_complex_double* c, lapack_int ldc );
  4631  
  4632  lapack_int LAPACKE_cunmhr( int matrix_layout, char side, char trans,
  4633                             lapack_int m, lapack_int n, lapack_int ilo,
  4634                             lapack_int ihi, const lapack_complex_float* a,
  4635                             lapack_int lda, const lapack_complex_float* tau,
  4636                             lapack_complex_float* c, lapack_int ldc );
  4637  lapack_int LAPACKE_zunmhr( int matrix_layout, char side, char trans,
  4638                             lapack_int m, lapack_int n, lapack_int ilo,
  4639                             lapack_int ihi, const lapack_complex_double* a,
  4640                             lapack_int lda, const lapack_complex_double* tau,
  4641                             lapack_complex_double* c, lapack_int ldc );
  4642  
  4643  lapack_int LAPACKE_cunmlq( int matrix_layout, char side, char trans,
  4644                             lapack_int m, lapack_int n, lapack_int k,
  4645                             const lapack_complex_float* a, lapack_int lda,
  4646                             const lapack_complex_float* tau,
  4647                             lapack_complex_float* c, lapack_int ldc );
  4648  lapack_int LAPACKE_zunmlq( int matrix_layout, char side, char trans,
  4649                             lapack_int m, lapack_int n, lapack_int k,
  4650                             const lapack_complex_double* a, lapack_int lda,
  4651                             const lapack_complex_double* tau,
  4652                             lapack_complex_double* c, lapack_int ldc );
  4653  
  4654  lapack_int LAPACKE_cunmql( int matrix_layout, char side, char trans,
  4655                             lapack_int m, lapack_int n, lapack_int k,
  4656                             const lapack_complex_float* a, lapack_int lda,
  4657                             const lapack_complex_float* tau,
  4658                             lapack_complex_float* c, lapack_int ldc );
  4659  lapack_int LAPACKE_zunmql( int matrix_layout, char side, char trans,
  4660                             lapack_int m, lapack_int n, lapack_int k,
  4661                             const lapack_complex_double* a, lapack_int lda,
  4662                             const lapack_complex_double* tau,
  4663                             lapack_complex_double* c, lapack_int ldc );
  4664  
  4665  lapack_int LAPACKE_cunmqr( int matrix_layout, char side, char trans,
  4666                             lapack_int m, lapack_int n, lapack_int k,
  4667                             const lapack_complex_float* a, lapack_int lda,
  4668                             const lapack_complex_float* tau,
  4669                             lapack_complex_float* c, lapack_int ldc );
  4670  lapack_int LAPACKE_zunmqr( int matrix_layout, char side, char trans,
  4671                             lapack_int m, lapack_int n, lapack_int k,
  4672                             const lapack_complex_double* a, lapack_int lda,
  4673                             const lapack_complex_double* tau,
  4674                             lapack_complex_double* c, lapack_int ldc );
  4675  
  4676  lapack_int LAPACKE_cunmrq( int matrix_layout, char side, char trans,
  4677                             lapack_int m, lapack_int n, lapack_int k,
  4678                             const lapack_complex_float* a, lapack_int lda,
  4679                             const lapack_complex_float* tau,
  4680                             lapack_complex_float* c, lapack_int ldc );
  4681  lapack_int LAPACKE_zunmrq( int matrix_layout, char side, char trans,
  4682                             lapack_int m, lapack_int n, lapack_int k,
  4683                             const lapack_complex_double* a, lapack_int lda,
  4684                             const lapack_complex_double* tau,
  4685                             lapack_complex_double* c, lapack_int ldc );
  4686  
  4687  lapack_int LAPACKE_cunmrz( int matrix_layout, char side, char trans,
  4688                             lapack_int m, lapack_int n, lapack_int k,
  4689                             lapack_int l, const lapack_complex_float* a,
  4690                             lapack_int lda, const lapack_complex_float* tau,
  4691                             lapack_complex_float* c, lapack_int ldc );
  4692  lapack_int LAPACKE_zunmrz( int matrix_layout, char side, char trans,
  4693                             lapack_int m, lapack_int n, lapack_int k,
  4694                             lapack_int l, const lapack_complex_double* a,
  4695                             lapack_int lda, const lapack_complex_double* tau,
  4696                             lapack_complex_double* c, lapack_int ldc );
  4697  
  4698  lapack_int LAPACKE_cunmtr( int matrix_layout, char side, char uplo, char trans,
  4699                             lapack_int m, lapack_int n,
  4700                             const lapack_complex_float* a, lapack_int lda,
  4701                             const lapack_complex_float* tau,
  4702                             lapack_complex_float* c, lapack_int ldc );
  4703  lapack_int LAPACKE_zunmtr( int matrix_layout, char side, char uplo, char trans,
  4704                             lapack_int m, lapack_int n,
  4705                             const lapack_complex_double* a, lapack_int lda,
  4706                             const lapack_complex_double* tau,
  4707                             lapack_complex_double* c, lapack_int ldc );
  4708  
  4709  lapack_int LAPACKE_cupgtr( int matrix_layout, char uplo, lapack_int n,
  4710                             const lapack_complex_float* ap,
  4711                             const lapack_complex_float* tau,
  4712                             lapack_complex_float* q, lapack_int ldq );
  4713  lapack_int LAPACKE_zupgtr( int matrix_layout, char uplo, lapack_int n,
  4714                             const lapack_complex_double* ap,
  4715                             const lapack_complex_double* tau,
  4716                             lapack_complex_double* q, lapack_int ldq );
  4717  
  4718  lapack_int LAPACKE_cupmtr( int matrix_layout, char side, char uplo, char trans,
  4719                             lapack_int m, lapack_int n,
  4720                             const lapack_complex_float* ap,
  4721                             const lapack_complex_float* tau,
  4722                             lapack_complex_float* c, lapack_int ldc );
  4723  lapack_int LAPACKE_zupmtr( int matrix_layout, char side, char uplo, char trans,
  4724                             lapack_int m, lapack_int n,
  4725                             const lapack_complex_double* ap,
  4726                             const lapack_complex_double* tau,
  4727                             lapack_complex_double* c, lapack_int ldc );
  4728  
  4729  lapack_int LAPACKE_sbdsdc_work( int matrix_layout, char uplo, char compq,
  4730                                  lapack_int n, float* d, float* e, float* u,
  4731                                  lapack_int ldu, float* vt, lapack_int ldvt,
  4732                                  float* q, lapack_int* iq, float* work,
  4733                                  lapack_int* iwork );
  4734  lapack_int LAPACKE_dbdsdc_work( int matrix_layout, char uplo, char compq,
  4735                                  lapack_int n, double* d, double* e, double* u,
  4736                                  lapack_int ldu, double* vt, lapack_int ldvt,
  4737                                  double* q, lapack_int* iq, double* work,
  4738                                  lapack_int* iwork );
  4739  
  4740  lapack_int LAPACKE_sbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
  4741                             		lapack_int n, float* d, float* e,
  4742                             		lapack_int vl, lapack_int vu,
  4743                             		lapack_int il, lapack_int iu, lapack_int ns,
  4744                             		float* s, float* z, lapack_int ldz,	
  4745                                  float* work, lapack_int* iwork );
  4746  lapack_int LAPACKE_dbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
  4747                             		lapack_int n, double* d, double* e,
  4748                             		lapack_int vl, lapack_int vu,
  4749                             		lapack_int il, lapack_int iu, lapack_int ns,
  4750                             		double* s, double* z, lapack_int ldz,	
  4751                                  double* work, lapack_int* iwork );
  4752  
  4753  lapack_int LAPACKE_sbdsqr_work( int matrix_layout, char uplo, lapack_int n,
  4754                                  lapack_int ncvt, lapack_int nru, lapack_int ncc,
  4755                                  float* d, float* e, float* vt, lapack_int ldvt,
  4756                                  float* u, lapack_int ldu, float* c,
  4757                                  lapack_int ldc, float* work );
  4758  lapack_int LAPACKE_dbdsqr_work( int matrix_layout, char uplo, lapack_int n,
  4759                                  lapack_int ncvt, lapack_int nru, lapack_int ncc,
  4760                                  double* d, double* e, double* vt,
  4761                                  lapack_int ldvt, double* u, lapack_int ldu,
  4762                                  double* c, lapack_int ldc, double* work );
  4763  lapack_int LAPACKE_cbdsqr_work( int matrix_layout, char uplo, lapack_int n,
  4764                                  lapack_int ncvt, lapack_int nru, lapack_int ncc,
  4765                                  float* d, float* e, lapack_complex_float* vt,
  4766                                  lapack_int ldvt, lapack_complex_float* u,
  4767                                  lapack_int ldu, lapack_complex_float* c,
  4768                                  lapack_int ldc, float* work );
  4769  lapack_int LAPACKE_zbdsqr_work( int matrix_layout, char uplo, lapack_int n,
  4770                                  lapack_int ncvt, lapack_int nru, lapack_int ncc,
  4771                                  double* d, double* e, lapack_complex_double* vt,
  4772                                  lapack_int ldvt, lapack_complex_double* u,
  4773                                  lapack_int ldu, lapack_complex_double* c,
  4774                                  lapack_int ldc, double* work );
  4775  
  4776  lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
  4777                                  const float* d, float* sep );
  4778  lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
  4779                                  const double* d, double* sep );
  4780  
  4781  lapack_int LAPACKE_sgbbrd_work( int matrix_layout, char vect, lapack_int m,
  4782                                  lapack_int n, lapack_int ncc, lapack_int kl,
  4783                                  lapack_int ku, float* ab, lapack_int ldab,
  4784                                  float* d, float* e, float* q, lapack_int ldq,
  4785                                  float* pt, lapack_int ldpt, float* c,
  4786                                  lapack_int ldc, float* work );
  4787  lapack_int LAPACKE_dgbbrd_work( int matrix_layout, char vect, lapack_int m,
  4788                                  lapack_int n, lapack_int ncc, lapack_int kl,
  4789                                  lapack_int ku, double* ab, lapack_int ldab,
  4790                                  double* d, double* e, double* q, lapack_int ldq,
  4791                                  double* pt, lapack_int ldpt, double* c,
  4792                                  lapack_int ldc, double* work );
  4793  lapack_int LAPACKE_cgbbrd_work( int matrix_layout, char vect, lapack_int m,
  4794                                  lapack_int n, lapack_int ncc, lapack_int kl,
  4795                                  lapack_int ku, lapack_complex_float* ab,
  4796                                  lapack_int ldab, float* d, float* e,
  4797                                  lapack_complex_float* q, lapack_int ldq,
  4798                                  lapack_complex_float* pt, lapack_int ldpt,
  4799                                  lapack_complex_float* c, lapack_int ldc,
  4800                                  lapack_complex_float* work, float* rwork );
  4801  lapack_int LAPACKE_zgbbrd_work( int matrix_layout, char vect, lapack_int m,
  4802                                  lapack_int n, lapack_int ncc, lapack_int kl,
  4803                                  lapack_int ku, lapack_complex_double* ab,
  4804                                  lapack_int ldab, double* d, double* e,
  4805                                  lapack_complex_double* q, lapack_int ldq,
  4806                                  lapack_complex_double* pt, lapack_int ldpt,
  4807                                  lapack_complex_double* c, lapack_int ldc,
  4808                                  lapack_complex_double* work, double* rwork );
  4809  
  4810  lapack_int LAPACKE_sgbcon_work( int matrix_layout, char norm, lapack_int n,
  4811                                  lapack_int kl, lapack_int ku, const float* ab,
  4812                                  lapack_int ldab, const lapack_int* ipiv,
  4813                                  float anorm, float* rcond, float* work,
  4814                                  lapack_int* iwork );
  4815  lapack_int LAPACKE_dgbcon_work( int matrix_layout, char norm, lapack_int n,
  4816                                  lapack_int kl, lapack_int ku, const double* ab,
  4817                                  lapack_int ldab, const lapack_int* ipiv,
  4818                                  double anorm, double* rcond, double* work,
  4819                                  lapack_int* iwork );
  4820  lapack_int LAPACKE_cgbcon_work( int matrix_layout, char norm, lapack_int n,
  4821                                  lapack_int kl, lapack_int ku,
  4822                                  const lapack_complex_float* ab, lapack_int ldab,
  4823                                  const lapack_int* ipiv, float anorm,
  4824                                  float* rcond, lapack_complex_float* work,
  4825                                  float* rwork );
  4826  lapack_int LAPACKE_zgbcon_work( int matrix_layout, char norm, lapack_int n,
  4827                                  lapack_int kl, lapack_int ku,
  4828                                  const lapack_complex_double* ab,
  4829                                  lapack_int ldab, const lapack_int* ipiv,
  4830                                  double anorm, double* rcond,
  4831                                  lapack_complex_double* work, double* rwork );
  4832  
  4833  lapack_int LAPACKE_sgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
  4834                                  lapack_int kl, lapack_int ku, const float* ab,
  4835                                  lapack_int ldab, float* r, float* c,
  4836                                  float* rowcnd, float* colcnd, float* amax );
  4837  lapack_int LAPACKE_dgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
  4838                                  lapack_int kl, lapack_int ku, const double* ab,
  4839                                  lapack_int ldab, double* r, double* c,
  4840                                  double* rowcnd, double* colcnd, double* amax );
  4841  lapack_int LAPACKE_cgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
  4842                                  lapack_int kl, lapack_int ku,
  4843                                  const lapack_complex_float* ab, lapack_int ldab,
  4844                                  float* r, float* c, float* rowcnd,
  4845                                  float* colcnd, float* amax );
  4846  lapack_int LAPACKE_zgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
  4847                                  lapack_int kl, lapack_int ku,
  4848                                  const lapack_complex_double* ab,
  4849                                  lapack_int ldab, double* r, double* c,
  4850                                  double* rowcnd, double* colcnd, double* amax );
  4851  
  4852  lapack_int LAPACKE_sgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
  4853                                   lapack_int kl, lapack_int ku, const float* ab,
  4854                                   lapack_int ldab, float* r, float* c,
  4855                                   float* rowcnd, float* colcnd, float* amax );
  4856  lapack_int LAPACKE_dgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
  4857                                   lapack_int kl, lapack_int ku, const double* ab,
  4858                                   lapack_int ldab, double* r, double* c,
  4859                                   double* rowcnd, double* colcnd, double* amax );
  4860  lapack_int LAPACKE_cgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
  4861                                   lapack_int kl, lapack_int ku,
  4862                                   const lapack_complex_float* ab,
  4863                                   lapack_int ldab, float* r, float* c,
  4864                                   float* rowcnd, float* colcnd, float* amax );
  4865  lapack_int LAPACKE_zgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
  4866                                   lapack_int kl, lapack_int ku,
  4867                                   const lapack_complex_double* ab,
  4868                                   lapack_int ldab, double* r, double* c,
  4869                                   double* rowcnd, double* colcnd, double* amax );
  4870  
  4871  lapack_int LAPACKE_sgbrfs_work( int matrix_layout, char trans, lapack_int n,
  4872                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  4873                                  const float* ab, lapack_int ldab,
  4874                                  const float* afb, lapack_int ldafb,
  4875                                  const lapack_int* ipiv, const float* b,
  4876                                  lapack_int ldb, float* x, lapack_int ldx,
  4877                                  float* ferr, float* berr, float* work,
  4878                                  lapack_int* iwork );
  4879  lapack_int LAPACKE_dgbrfs_work( int matrix_layout, char trans, lapack_int n,
  4880                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  4881                                  const double* ab, lapack_int ldab,
  4882                                  const double* afb, lapack_int ldafb,
  4883                                  const lapack_int* ipiv, const double* b,
  4884                                  lapack_int ldb, double* x, lapack_int ldx,
  4885                                  double* ferr, double* berr, double* work,
  4886                                  lapack_int* iwork );
  4887  lapack_int LAPACKE_cgbrfs_work( int matrix_layout, char trans, lapack_int n,
  4888                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  4889                                  const lapack_complex_float* ab, lapack_int ldab,
  4890                                  const lapack_complex_float* afb,
  4891                                  lapack_int ldafb, const lapack_int* ipiv,
  4892                                  const lapack_complex_float* b, lapack_int ldb,
  4893                                  lapack_complex_float* x, lapack_int ldx,
  4894                                  float* ferr, float* berr,
  4895                                  lapack_complex_float* work, float* rwork );
  4896  lapack_int LAPACKE_zgbrfs_work( int matrix_layout, char trans, lapack_int n,
  4897                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  4898                                  const lapack_complex_double* ab,
  4899                                  lapack_int ldab,
  4900                                  const lapack_complex_double* afb,
  4901                                  lapack_int ldafb, const lapack_int* ipiv,
  4902                                  const lapack_complex_double* b, lapack_int ldb,
  4903                                  lapack_complex_double* x, lapack_int ldx,
  4904                                  double* ferr, double* berr,
  4905                                  lapack_complex_double* work, double* rwork );
  4906  
  4907  lapack_int LAPACKE_sgbrfsx_work( int matrix_layout, char trans, char equed,
  4908                                   lapack_int n, lapack_int kl, lapack_int ku,
  4909                                   lapack_int nrhs, const float* ab,
  4910                                   lapack_int ldab, const float* afb,
  4911                                   lapack_int ldafb, const lapack_int* ipiv,
  4912                                   const float* r, const float* c, const float* b,
  4913                                   lapack_int ldb, float* x, lapack_int ldx,
  4914                                   float* rcond, float* berr,
  4915                                   lapack_int n_err_bnds, float* err_bnds_norm,
  4916                                   float* err_bnds_comp, lapack_int nparams,
  4917                                   float* params, float* work,
  4918                                   lapack_int* iwork );
  4919  lapack_int LAPACKE_dgbrfsx_work( int matrix_layout, char trans, char equed,
  4920                                   lapack_int n, lapack_int kl, lapack_int ku,
  4921                                   lapack_int nrhs, const double* ab,
  4922                                   lapack_int ldab, const double* afb,
  4923                                   lapack_int ldafb, const lapack_int* ipiv,
  4924                                   const double* r, const double* c,
  4925                                   const double* b, lapack_int ldb, double* x,
  4926                                   lapack_int ldx, double* rcond, double* berr,
  4927                                   lapack_int n_err_bnds, double* err_bnds_norm,
  4928                                   double* err_bnds_comp, lapack_int nparams,
  4929                                   double* params, double* work,
  4930                                   lapack_int* iwork );
  4931  lapack_int LAPACKE_cgbrfsx_work( int matrix_layout, char trans, char equed,
  4932                                   lapack_int n, lapack_int kl, lapack_int ku,
  4933                                   lapack_int nrhs,
  4934                                   const lapack_complex_float* ab,
  4935                                   lapack_int ldab,
  4936                                   const lapack_complex_float* afb,
  4937                                   lapack_int ldafb, const lapack_int* ipiv,
  4938                                   const float* r, const float* c,
  4939                                   const lapack_complex_float* b, lapack_int ldb,
  4940                                   lapack_complex_float* x, lapack_int ldx,
  4941                                   float* rcond, float* berr,
  4942                                   lapack_int n_err_bnds, float* err_bnds_norm,
  4943                                   float* err_bnds_comp, lapack_int nparams,
  4944                                   float* params, lapack_complex_float* work,
  4945                                   float* rwork );
  4946  lapack_int LAPACKE_zgbrfsx_work( int matrix_layout, char trans, char equed,
  4947                                   lapack_int n, lapack_int kl, lapack_int ku,
  4948                                   lapack_int nrhs,
  4949                                   const lapack_complex_double* ab,
  4950                                   lapack_int ldab,
  4951                                   const lapack_complex_double* afb,
  4952                                   lapack_int ldafb, const lapack_int* ipiv,
  4953                                   const double* r, const double* c,
  4954                                   const lapack_complex_double* b, lapack_int ldb,
  4955                                   lapack_complex_double* x, lapack_int ldx,
  4956                                   double* rcond, double* berr,
  4957                                   lapack_int n_err_bnds, double* err_bnds_norm,
  4958                                   double* err_bnds_comp, lapack_int nparams,
  4959                                   double* params, lapack_complex_double* work,
  4960                                   double* rwork );
  4961  
  4962  lapack_int LAPACKE_sgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
  4963                                 lapack_int ku, lapack_int nrhs, float* ab,
  4964                                 lapack_int ldab, lapack_int* ipiv, float* b,
  4965                                 lapack_int ldb );
  4966  lapack_int LAPACKE_dgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
  4967                                 lapack_int ku, lapack_int nrhs, double* ab,
  4968                                 lapack_int ldab, lapack_int* ipiv, double* b,
  4969                                 lapack_int ldb );
  4970  lapack_int LAPACKE_cgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
  4971                                 lapack_int ku, lapack_int nrhs,
  4972                                 lapack_complex_float* ab, lapack_int ldab,
  4973                                 lapack_int* ipiv, lapack_complex_float* b,
  4974                                 lapack_int ldb );
  4975  lapack_int LAPACKE_zgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
  4976                                 lapack_int ku, lapack_int nrhs,
  4977                                 lapack_complex_double* ab, lapack_int ldab,
  4978                                 lapack_int* ipiv, lapack_complex_double* b,
  4979                                 lapack_int ldb );
  4980  
  4981  lapack_int LAPACKE_sgbsvx_work( int matrix_layout, char fact, char trans,
  4982                                  lapack_int n, lapack_int kl, lapack_int ku,
  4983                                  lapack_int nrhs, float* ab, lapack_int ldab,
  4984                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
  4985                                  char* equed, float* r, float* c, float* b,
  4986                                  lapack_int ldb, float* x, lapack_int ldx,
  4987                                  float* rcond, float* ferr, float* berr,
  4988                                  float* work, lapack_int* iwork );
  4989  lapack_int LAPACKE_dgbsvx_work( int matrix_layout, char fact, char trans,
  4990                                  lapack_int n, lapack_int kl, lapack_int ku,
  4991                                  lapack_int nrhs, double* ab, lapack_int ldab,
  4992                                  double* afb, lapack_int ldafb, lapack_int* ipiv,
  4993                                  char* equed, double* r, double* c, double* b,
  4994                                  lapack_int ldb, double* x, lapack_int ldx,
  4995                                  double* rcond, double* ferr, double* berr,
  4996                                  double* work, lapack_int* iwork );
  4997  lapack_int LAPACKE_cgbsvx_work( int matrix_layout, char fact, char trans,
  4998                                  lapack_int n, lapack_int kl, lapack_int ku,
  4999                                  lapack_int nrhs, lapack_complex_float* ab,
  5000                                  lapack_int ldab, lapack_complex_float* afb,
  5001                                  lapack_int ldafb, lapack_int* ipiv, char* equed,
  5002                                  float* r, float* c, lapack_complex_float* b,
  5003                                  lapack_int ldb, lapack_complex_float* x,
  5004                                  lapack_int ldx, float* rcond, float* ferr,
  5005                                  float* berr, lapack_complex_float* work,
  5006                                  float* rwork );
  5007  lapack_int LAPACKE_zgbsvx_work( int matrix_layout, char fact, char trans,
  5008                                  lapack_int n, lapack_int kl, lapack_int ku,
  5009                                  lapack_int nrhs, lapack_complex_double* ab,
  5010                                  lapack_int ldab, lapack_complex_double* afb,
  5011                                  lapack_int ldafb, lapack_int* ipiv, char* equed,
  5012                                  double* r, double* c, lapack_complex_double* b,
  5013                                  lapack_int ldb, lapack_complex_double* x,
  5014                                  lapack_int ldx, double* rcond, double* ferr,
  5015                                  double* berr, lapack_complex_double* work,
  5016                                  double* rwork );
  5017  
  5018  lapack_int LAPACKE_sgbsvxx_work( int matrix_layout, char fact, char trans,
  5019                                   lapack_int n, lapack_int kl, lapack_int ku,
  5020                                   lapack_int nrhs, float* ab, lapack_int ldab,
  5021                                   float* afb, lapack_int ldafb, lapack_int* ipiv,
  5022                                   char* equed, float* r, float* c, float* b,
  5023                                   lapack_int ldb, float* x, lapack_int ldx,
  5024                                   float* rcond, float* rpvgrw, float* berr,
  5025                                   lapack_int n_err_bnds, float* err_bnds_norm,
  5026                                   float* err_bnds_comp, lapack_int nparams,
  5027                                   float* params, float* work,
  5028                                   lapack_int* iwork );
  5029  lapack_int LAPACKE_dgbsvxx_work( int matrix_layout, char fact, char trans,
  5030                                   lapack_int n, lapack_int kl, lapack_int ku,
  5031                                   lapack_int nrhs, double* ab, lapack_int ldab,
  5032                                   double* afb, lapack_int ldafb,
  5033                                   lapack_int* ipiv, char* equed, double* r,
  5034                                   double* c, double* b, lapack_int ldb,
  5035                                   double* x, lapack_int ldx, double* rcond,
  5036                                   double* rpvgrw, double* berr,
  5037                                   lapack_int n_err_bnds, double* err_bnds_norm,
  5038                                   double* err_bnds_comp, lapack_int nparams,
  5039                                   double* params, double* work,
  5040                                   lapack_int* iwork );
  5041  lapack_int LAPACKE_cgbsvxx_work( int matrix_layout, char fact, char trans,
  5042                                   lapack_int n, lapack_int kl, lapack_int ku,
  5043                                   lapack_int nrhs, lapack_complex_float* ab,
  5044                                   lapack_int ldab, lapack_complex_float* afb,
  5045                                   lapack_int ldafb, lapack_int* ipiv,
  5046                                   char* equed, float* r, float* c,
  5047                                   lapack_complex_float* b, lapack_int ldb,
  5048                                   lapack_complex_float* x, lapack_int ldx,
  5049                                   float* rcond, float* rpvgrw, float* berr,
  5050                                   lapack_int n_err_bnds, float* err_bnds_norm,
  5051                                   float* err_bnds_comp, lapack_int nparams,
  5052                                   float* params, lapack_complex_float* work,
  5053                                   float* rwork );
  5054  lapack_int LAPACKE_zgbsvxx_work( int matrix_layout, char fact, char trans,
  5055                                   lapack_int n, lapack_int kl, lapack_int ku,
  5056                                   lapack_int nrhs, lapack_complex_double* ab,
  5057                                   lapack_int ldab, lapack_complex_double* afb,
  5058                                   lapack_int ldafb, lapack_int* ipiv,
  5059                                   char* equed, double* r, double* c,
  5060                                   lapack_complex_double* b, lapack_int ldb,
  5061                                   lapack_complex_double* x, lapack_int ldx,
  5062                                   double* rcond, double* rpvgrw, double* berr,
  5063                                   lapack_int n_err_bnds, double* err_bnds_norm,
  5064                                   double* err_bnds_comp, lapack_int nparams,
  5065                                   double* params, lapack_complex_double* work,
  5066                                   double* rwork );
  5067  
  5068  lapack_int LAPACKE_sgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5069                                  lapack_int kl, lapack_int ku, float* ab,
  5070                                  lapack_int ldab, lapack_int* ipiv );
  5071  lapack_int LAPACKE_dgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5072                                  lapack_int kl, lapack_int ku, double* ab,
  5073                                  lapack_int ldab, lapack_int* ipiv );
  5074  lapack_int LAPACKE_cgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5075                                  lapack_int kl, lapack_int ku,
  5076                                  lapack_complex_float* ab, lapack_int ldab,
  5077                                  lapack_int* ipiv );
  5078  lapack_int LAPACKE_zgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5079                                  lapack_int kl, lapack_int ku,
  5080                                  lapack_complex_double* ab, lapack_int ldab,
  5081                                  lapack_int* ipiv );
  5082  
  5083  lapack_int LAPACKE_sgbtrs_work( int matrix_layout, char trans, lapack_int n,
  5084                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  5085                                  const float* ab, lapack_int ldab,
  5086                                  const lapack_int* ipiv, float* b,
  5087                                  lapack_int ldb );
  5088  lapack_int LAPACKE_dgbtrs_work( int matrix_layout, char trans, lapack_int n,
  5089                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  5090                                  const double* ab, lapack_int ldab,
  5091                                  const lapack_int* ipiv, double* b,
  5092                                  lapack_int ldb );
  5093  lapack_int LAPACKE_cgbtrs_work( int matrix_layout, char trans, lapack_int n,
  5094                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  5095                                  const lapack_complex_float* ab, lapack_int ldab,
  5096                                  const lapack_int* ipiv, lapack_complex_float* b,
  5097                                  lapack_int ldb );
  5098  lapack_int LAPACKE_zgbtrs_work( int matrix_layout, char trans, lapack_int n,
  5099                                  lapack_int kl, lapack_int ku, lapack_int nrhs,
  5100                                  const lapack_complex_double* ab,
  5101                                  lapack_int ldab, const lapack_int* ipiv,
  5102                                  lapack_complex_double* b, lapack_int ldb );
  5103  
  5104  lapack_int LAPACKE_sgebak_work( int matrix_layout, char job, char side,
  5105                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5106                                  const float* scale, lapack_int m, float* v,
  5107                                  lapack_int ldv );
  5108  lapack_int LAPACKE_dgebak_work( int matrix_layout, char job, char side,
  5109                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5110                                  const double* scale, lapack_int m, double* v,
  5111                                  lapack_int ldv );
  5112  lapack_int LAPACKE_cgebak_work( int matrix_layout, char job, char side,
  5113                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5114                                  const float* scale, lapack_int m,
  5115                                  lapack_complex_float* v, lapack_int ldv );
  5116  lapack_int LAPACKE_zgebak_work( int matrix_layout, char job, char side,
  5117                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5118                                  const double* scale, lapack_int m,
  5119                                  lapack_complex_double* v, lapack_int ldv );
  5120  
  5121  lapack_int LAPACKE_sgebal_work( int matrix_layout, char job, lapack_int n,
  5122                                  float* a, lapack_int lda, lapack_int* ilo,
  5123                                  lapack_int* ihi, float* scale );
  5124  lapack_int LAPACKE_dgebal_work( int matrix_layout, char job, lapack_int n,
  5125                                  double* a, lapack_int lda, lapack_int* ilo,
  5126                                  lapack_int* ihi, double* scale );
  5127  lapack_int LAPACKE_cgebal_work( int matrix_layout, char job, lapack_int n,
  5128                                  lapack_complex_float* a, lapack_int lda,
  5129                                  lapack_int* ilo, lapack_int* ihi,
  5130                                  float* scale );
  5131  lapack_int LAPACKE_zgebal_work( int matrix_layout, char job, lapack_int n,
  5132                                  lapack_complex_double* a, lapack_int lda,
  5133                                  lapack_int* ilo, lapack_int* ihi,
  5134                                  double* scale );
  5135  
  5136  lapack_int LAPACKE_sgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
  5137                                  float* a, lapack_int lda, float* d, float* e,
  5138                                  float* tauq, float* taup, float* work,
  5139                                  lapack_int lwork );
  5140  lapack_int LAPACKE_dgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
  5141                                  double* a, lapack_int lda, double* d, double* e,
  5142                                  double* tauq, double* taup, double* work,
  5143                                  lapack_int lwork );
  5144  lapack_int LAPACKE_cgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
  5145                                  lapack_complex_float* a, lapack_int lda,
  5146                                  float* d, float* e, lapack_complex_float* tauq,
  5147                                  lapack_complex_float* taup,
  5148                                  lapack_complex_float* work, lapack_int lwork );
  5149  lapack_int LAPACKE_zgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
  5150                                  lapack_complex_double* a, lapack_int lda,
  5151                                  double* d, double* e,
  5152                                  lapack_complex_double* tauq,
  5153                                  lapack_complex_double* taup,
  5154                                  lapack_complex_double* work, lapack_int lwork );
  5155  
  5156  lapack_int LAPACKE_sgecon_work( int matrix_layout, char norm, lapack_int n,
  5157                                  const float* a, lapack_int lda, float anorm,
  5158                                  float* rcond, float* work, lapack_int* iwork );
  5159  lapack_int LAPACKE_dgecon_work( int matrix_layout, char norm, lapack_int n,
  5160                                  const double* a, lapack_int lda, double anorm,
  5161                                  double* rcond, double* work,
  5162                                  lapack_int* iwork );
  5163  lapack_int LAPACKE_cgecon_work( int matrix_layout, char norm, lapack_int n,
  5164                                  const lapack_complex_float* a, lapack_int lda,
  5165                                  float anorm, float* rcond,
  5166                                  lapack_complex_float* work, float* rwork );
  5167  lapack_int LAPACKE_zgecon_work( int matrix_layout, char norm, lapack_int n,
  5168                                  const lapack_complex_double* a, lapack_int lda,
  5169                                  double anorm, double* rcond,
  5170                                  lapack_complex_double* work, double* rwork );
  5171  
  5172  lapack_int LAPACKE_sgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
  5173                                  const float* a, lapack_int lda, float* r,
  5174                                  float* c, float* rowcnd, float* colcnd,
  5175                                  float* amax );
  5176  lapack_int LAPACKE_dgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
  5177                                  const double* a, lapack_int lda, double* r,
  5178                                  double* c, double* rowcnd, double* colcnd,
  5179                                  double* amax );
  5180  lapack_int LAPACKE_cgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
  5181                                  const lapack_complex_float* a, lapack_int lda,
  5182                                  float* r, float* c, float* rowcnd,
  5183                                  float* colcnd, float* amax );
  5184  lapack_int LAPACKE_zgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
  5185                                  const lapack_complex_double* a, lapack_int lda,
  5186                                  double* r, double* c, double* rowcnd,
  5187                                  double* colcnd, double* amax );
  5188  
  5189  lapack_int LAPACKE_sgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
  5190                                   const float* a, lapack_int lda, float* r,
  5191                                   float* c, float* rowcnd, float* colcnd,
  5192                                   float* amax );
  5193  lapack_int LAPACKE_dgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
  5194                                   const double* a, lapack_int lda, double* r,
  5195                                   double* c, double* rowcnd, double* colcnd,
  5196                                   double* amax );
  5197  lapack_int LAPACKE_cgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
  5198                                   const lapack_complex_float* a, lapack_int lda,
  5199                                   float* r, float* c, float* rowcnd,
  5200                                   float* colcnd, float* amax );
  5201  lapack_int LAPACKE_zgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
  5202                                   const lapack_complex_double* a, lapack_int lda,
  5203                                   double* r, double* c, double* rowcnd,
  5204                                   double* colcnd, double* amax );
  5205  
  5206  lapack_int LAPACKE_sgees_work( int matrix_layout, char jobvs, char sort,
  5207                                 LAPACK_S_SELECT2 select, lapack_int n, float* a,
  5208                                 lapack_int lda, lapack_int* sdim, float* wr,
  5209                                 float* wi, float* vs, lapack_int ldvs,
  5210                                 float* work, lapack_int lwork,
  5211                                 lapack_logical* bwork );
  5212  lapack_int LAPACKE_dgees_work( int matrix_layout, char jobvs, char sort,
  5213                                 LAPACK_D_SELECT2 select, lapack_int n, double* a,
  5214                                 lapack_int lda, lapack_int* sdim, double* wr,
  5215                                 double* wi, double* vs, lapack_int ldvs,
  5216                                 double* work, lapack_int lwork,
  5217                                 lapack_logical* bwork );
  5218  lapack_int LAPACKE_cgees_work( int matrix_layout, char jobvs, char sort,
  5219                                 LAPACK_C_SELECT1 select, lapack_int n,
  5220                                 lapack_complex_float* a, lapack_int lda,
  5221                                 lapack_int* sdim, lapack_complex_float* w,
  5222                                 lapack_complex_float* vs, lapack_int ldvs,
  5223                                 lapack_complex_float* work, lapack_int lwork,
  5224                                 float* rwork, lapack_logical* bwork );
  5225  lapack_int LAPACKE_zgees_work( int matrix_layout, char jobvs, char sort,
  5226                                 LAPACK_Z_SELECT1 select, lapack_int n,
  5227                                 lapack_complex_double* a, lapack_int lda,
  5228                                 lapack_int* sdim, lapack_complex_double* w,
  5229                                 lapack_complex_double* vs, lapack_int ldvs,
  5230                                 lapack_complex_double* work, lapack_int lwork,
  5231                                 double* rwork, lapack_logical* bwork );
  5232  
  5233  lapack_int LAPACKE_sgeesx_work( int matrix_layout, char jobvs, char sort,
  5234                                  LAPACK_S_SELECT2 select, char sense,
  5235                                  lapack_int n, float* a, lapack_int lda,
  5236                                  lapack_int* sdim, float* wr, float* wi,
  5237                                  float* vs, lapack_int ldvs, float* rconde,
  5238                                  float* rcondv, float* work, lapack_int lwork,
  5239                                  lapack_int* iwork, lapack_int liwork,
  5240                                  lapack_logical* bwork );
  5241  lapack_int LAPACKE_dgeesx_work( int matrix_layout, char jobvs, char sort,
  5242                                  LAPACK_D_SELECT2 select, char sense,
  5243                                  lapack_int n, double* a, lapack_int lda,
  5244                                  lapack_int* sdim, double* wr, double* wi,
  5245                                  double* vs, lapack_int ldvs, double* rconde,
  5246                                  double* rcondv, double* work, lapack_int lwork,
  5247                                  lapack_int* iwork, lapack_int liwork,
  5248                                  lapack_logical* bwork );
  5249  lapack_int LAPACKE_cgeesx_work( int matrix_layout, char jobvs, char sort,
  5250                                  LAPACK_C_SELECT1 select, char sense,
  5251                                  lapack_int n, lapack_complex_float* a,
  5252                                  lapack_int lda, lapack_int* sdim,
  5253                                  lapack_complex_float* w,
  5254                                  lapack_complex_float* vs, lapack_int ldvs,
  5255                                  float* rconde, float* rcondv,
  5256                                  lapack_complex_float* work, lapack_int lwork,
  5257                                  float* rwork, lapack_logical* bwork );
  5258  lapack_int LAPACKE_zgeesx_work( int matrix_layout, char jobvs, char sort,
  5259                                  LAPACK_Z_SELECT1 select, char sense,
  5260                                  lapack_int n, lapack_complex_double* a,
  5261                                  lapack_int lda, lapack_int* sdim,
  5262                                  lapack_complex_double* w,
  5263                                  lapack_complex_double* vs, lapack_int ldvs,
  5264                                  double* rconde, double* rcondv,
  5265                                  lapack_complex_double* work, lapack_int lwork,
  5266                                  double* rwork, lapack_logical* bwork );
  5267  
  5268  lapack_int LAPACKE_sgeev_work( int matrix_layout, char jobvl, char jobvr,
  5269                                 lapack_int n, float* a, lapack_int lda,
  5270                                 float* wr, float* wi, float* vl, lapack_int ldvl,
  5271                                 float* vr, lapack_int ldvr, float* work,
  5272                                 lapack_int lwork );
  5273  lapack_int LAPACKE_dgeev_work( int matrix_layout, char jobvl, char jobvr,
  5274                                 lapack_int n, double* a, lapack_int lda,
  5275                                 double* wr, double* wi, double* vl,
  5276                                 lapack_int ldvl, double* vr, lapack_int ldvr,
  5277                                 double* work, lapack_int lwork );
  5278  lapack_int LAPACKE_cgeev_work( int matrix_layout, char jobvl, char jobvr,
  5279                                 lapack_int n, lapack_complex_float* a,
  5280                                 lapack_int lda, lapack_complex_float* w,
  5281                                 lapack_complex_float* vl, lapack_int ldvl,
  5282                                 lapack_complex_float* vr, lapack_int ldvr,
  5283                                 lapack_complex_float* work, lapack_int lwork,
  5284                                 float* rwork );
  5285  lapack_int LAPACKE_zgeev_work( int matrix_layout, char jobvl, char jobvr,
  5286                                 lapack_int n, lapack_complex_double* a,
  5287                                 lapack_int lda, lapack_complex_double* w,
  5288                                 lapack_complex_double* vl, lapack_int ldvl,
  5289                                 lapack_complex_double* vr, lapack_int ldvr,
  5290                                 lapack_complex_double* work, lapack_int lwork,
  5291                                 double* rwork );
  5292  
  5293  lapack_int LAPACKE_sgeevx_work( int matrix_layout, char balanc, char jobvl,
  5294                                  char jobvr, char sense, lapack_int n, float* a,
  5295                                  lapack_int lda, float* wr, float* wi, float* vl,
  5296                                  lapack_int ldvl, float* vr, lapack_int ldvr,
  5297                                  lapack_int* ilo, lapack_int* ihi, float* scale,
  5298                                  float* abnrm, float* rconde, float* rcondv,
  5299                                  float* work, lapack_int lwork,
  5300                                  lapack_int* iwork );
  5301  lapack_int LAPACKE_dgeevx_work( int matrix_layout, char balanc, char jobvl,
  5302                                  char jobvr, char sense, lapack_int n, double* a,
  5303                                  lapack_int lda, double* wr, double* wi,
  5304                                  double* vl, lapack_int ldvl, double* vr,
  5305                                  lapack_int ldvr, lapack_int* ilo,
  5306                                  lapack_int* ihi, double* scale, double* abnrm,
  5307                                  double* rconde, double* rcondv, double* work,
  5308                                  lapack_int lwork, lapack_int* iwork );
  5309  lapack_int LAPACKE_cgeevx_work( int matrix_layout, char balanc, char jobvl,
  5310                                  char jobvr, char sense, lapack_int n,
  5311                                  lapack_complex_float* a, lapack_int lda,
  5312                                  lapack_complex_float* w,
  5313                                  lapack_complex_float* vl, lapack_int ldvl,
  5314                                  lapack_complex_float* vr, lapack_int ldvr,
  5315                                  lapack_int* ilo, lapack_int* ihi, float* scale,
  5316                                  float* abnrm, float* rconde, float* rcondv,
  5317                                  lapack_complex_float* work, lapack_int lwork,
  5318                                  float* rwork );
  5319  lapack_int LAPACKE_zgeevx_work( int matrix_layout, char balanc, char jobvl,
  5320                                  char jobvr, char sense, lapack_int n,
  5321                                  lapack_complex_double* a, lapack_int lda,
  5322                                  lapack_complex_double* w,
  5323                                  lapack_complex_double* vl, lapack_int ldvl,
  5324                                  lapack_complex_double* vr, lapack_int ldvr,
  5325                                  lapack_int* ilo, lapack_int* ihi, double* scale,
  5326                                  double* abnrm, double* rconde, double* rcondv,
  5327                                  lapack_complex_double* work, lapack_int lwork,
  5328                                  double* rwork );
  5329  
  5330  lapack_int LAPACKE_sgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
  5331                                  lapack_int ihi, float* a, lapack_int lda,
  5332                                  float* tau, float* work, lapack_int lwork );
  5333  lapack_int LAPACKE_dgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
  5334                                  lapack_int ihi, double* a, lapack_int lda,
  5335                                  double* tau, double* work, lapack_int lwork );
  5336  lapack_int LAPACKE_cgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
  5337                                  lapack_int ihi, lapack_complex_float* a,
  5338                                  lapack_int lda, lapack_complex_float* tau,
  5339                                  lapack_complex_float* work, lapack_int lwork );
  5340  lapack_int LAPACKE_zgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
  5341                                  lapack_int ihi, lapack_complex_double* a,
  5342                                  lapack_int lda, lapack_complex_double* tau,
  5343                                  lapack_complex_double* work, lapack_int lwork );
  5344  
  5345  lapack_int LAPACKE_sgejsv_work( int matrix_layout, char joba, char jobu,
  5346                                  char jobv, char jobr, char jobt, char jobp,
  5347                                  lapack_int m, lapack_int n, float* a,
  5348                                  lapack_int lda, float* sva, float* u,
  5349                                  lapack_int ldu, float* v, lapack_int ldv,
  5350                                  float* work, lapack_int lwork,
  5351                                  lapack_int* iwork );
  5352  lapack_int LAPACKE_dgejsv_work( int matrix_layout, char joba, char jobu,
  5353                                  char jobv, char jobr, char jobt, char jobp,
  5354                                  lapack_int m, lapack_int n, double* a,
  5355                                  lapack_int lda, double* sva, double* u,
  5356                                  lapack_int ldu, double* v, lapack_int ldv,
  5357                                  double* work, lapack_int lwork,
  5358                                  lapack_int* iwork );
  5359  lapack_int LAPACKE_cgejsv_work( int matrix_layout, char joba, char jobu,
  5360                                  char jobv, char jobr, char jobt, char jobp,
  5361                                  lapack_int m, lapack_int n, lapack_complex_float* a,
  5362                                  lapack_int lda, float* sva, lapack_complex_float* u,
  5363                                  lapack_int ldu, lapack_complex_float* v, lapack_int ldv,
  5364                                  lapack_complex_float* cwork, lapack_int lwork,
  5365                                  float* work, lapack_int lrwork,
  5366                                  lapack_int* iwork );
  5367  lapack_int LAPACKE_zgejsv_work( int matrix_layout, char joba, char jobu,
  5368                                  char jobv, char jobr, char jobt, char jobp,
  5369                                  lapack_int m, lapack_int n, lapack_complex_double* a,
  5370                                  lapack_int lda, double* sva, lapack_complex_double* u,
  5371                                  lapack_int ldu, lapack_complex_double* v, lapack_int ldv,
  5372                                  lapack_complex_double* cwork, lapack_int lwork,
  5373                                  double* work, lapack_int lrwork,
  5374                                  lapack_int* iwork );
  5375  
  5376  lapack_int LAPACKE_sgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
  5377                                  float* a, lapack_int lda, float* tau,
  5378                                  float* work );
  5379  lapack_int LAPACKE_dgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
  5380                                  double* a, lapack_int lda, double* tau,
  5381                                  double* work );
  5382  lapack_int LAPACKE_cgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
  5383                                  lapack_complex_float* a, lapack_int lda,
  5384                                  lapack_complex_float* tau,
  5385                                  lapack_complex_float* work );
  5386  lapack_int LAPACKE_zgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
  5387                                  lapack_complex_double* a, lapack_int lda,
  5388                                  lapack_complex_double* tau,
  5389                                  lapack_complex_double* work );
  5390  
  5391  lapack_int LAPACKE_sgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5392                                  float* a, lapack_int lda, float* tau,
  5393                                  float* work, lapack_int lwork );
  5394  lapack_int LAPACKE_dgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5395                                  double* a, lapack_int lda, double* tau,
  5396                                  double* work, lapack_int lwork );
  5397  lapack_int LAPACKE_cgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5398                                  lapack_complex_float* a, lapack_int lda,
  5399                                  lapack_complex_float* tau,
  5400                                  lapack_complex_float* work, lapack_int lwork );
  5401  lapack_int LAPACKE_zgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5402                                  lapack_complex_double* a, lapack_int lda,
  5403                                  lapack_complex_double* tau,
  5404                                  lapack_complex_double* work, lapack_int lwork );
  5405  
  5406  lapack_int LAPACKE_sgels_work( int matrix_layout, char trans, lapack_int m,
  5407                                 lapack_int n, lapack_int nrhs, float* a,
  5408                                 lapack_int lda, float* b, lapack_int ldb,
  5409                                 float* work, lapack_int lwork );
  5410  lapack_int LAPACKE_dgels_work( int matrix_layout, char trans, lapack_int m,
  5411                                 lapack_int n, lapack_int nrhs, double* a,
  5412                                 lapack_int lda, double* b, lapack_int ldb,
  5413                                 double* work, lapack_int lwork );
  5414  lapack_int LAPACKE_cgels_work( int matrix_layout, char trans, lapack_int m,
  5415                                 lapack_int n, lapack_int nrhs,
  5416                                 lapack_complex_float* a, lapack_int lda,
  5417                                 lapack_complex_float* b, lapack_int ldb,
  5418                                 lapack_complex_float* work, lapack_int lwork );
  5419  lapack_int LAPACKE_zgels_work( int matrix_layout, char trans, lapack_int m,
  5420                                 lapack_int n, lapack_int nrhs,
  5421                                 lapack_complex_double* a, lapack_int lda,
  5422                                 lapack_complex_double* b, lapack_int ldb,
  5423                                 lapack_complex_double* work, lapack_int lwork );
  5424  
  5425  lapack_int LAPACKE_sgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
  5426                                  lapack_int nrhs, float* a, lapack_int lda,
  5427                                  float* b, lapack_int ldb, float* s, float rcond,
  5428                                  lapack_int* rank, float* work, lapack_int lwork,
  5429                                  lapack_int* iwork );
  5430  lapack_int LAPACKE_dgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
  5431                                  lapack_int nrhs, double* a, lapack_int lda,
  5432                                  double* b, lapack_int ldb, double* s,
  5433                                  double rcond, lapack_int* rank, double* work,
  5434                                  lapack_int lwork, lapack_int* iwork );
  5435  lapack_int LAPACKE_cgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
  5436                                  lapack_int nrhs, lapack_complex_float* a,
  5437                                  lapack_int lda, lapack_complex_float* b,
  5438                                  lapack_int ldb, float* s, float rcond,
  5439                                  lapack_int* rank, lapack_complex_float* work,
  5440                                  lapack_int lwork, float* rwork,
  5441                                  lapack_int* iwork );
  5442  lapack_int LAPACKE_zgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
  5443                                  lapack_int nrhs, lapack_complex_double* a,
  5444                                  lapack_int lda, lapack_complex_double* b,
  5445                                  lapack_int ldb, double* s, double rcond,
  5446                                  lapack_int* rank, lapack_complex_double* work,
  5447                                  lapack_int lwork, double* rwork,
  5448                                  lapack_int* iwork );
  5449  
  5450  lapack_int LAPACKE_sgelss_work( int matrix_layout, lapack_int m, lapack_int n,
  5451                                  lapack_int nrhs, float* a, lapack_int lda,
  5452                                  float* b, lapack_int ldb, float* s, float rcond,
  5453                                  lapack_int* rank, float* work,
  5454                                  lapack_int lwork );
  5455  lapack_int LAPACKE_dgelss_work( int matrix_layout, lapack_int m, lapack_int n,
  5456                                  lapack_int nrhs, double* a, lapack_int lda,
  5457                                  double* b, lapack_int ldb, double* s,
  5458                                  double rcond, lapack_int* rank, double* work,
  5459                                  lapack_int lwork );
  5460  lapack_int LAPACKE_cgelss_work( int matrix_layout, lapack_int m, lapack_int n,
  5461                                  lapack_int nrhs, lapack_complex_float* a,
  5462                                  lapack_int lda, lapack_complex_float* b,
  5463                                  lapack_int ldb, float* s, float rcond,
  5464                                  lapack_int* rank, lapack_complex_float* work,
  5465                                  lapack_int lwork, float* rwork );
  5466  lapack_int LAPACKE_zgelss_work( int matrix_layout, lapack_int m, lapack_int n,
  5467                                  lapack_int nrhs, lapack_complex_double* a,
  5468                                  lapack_int lda, lapack_complex_double* b,
  5469                                  lapack_int ldb, double* s, double rcond,
  5470                                  lapack_int* rank, lapack_complex_double* work,
  5471                                  lapack_int lwork, double* rwork );
  5472  
  5473  lapack_int LAPACKE_sgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
  5474                                  lapack_int nrhs, float* a, lapack_int lda,
  5475                                  float* b, lapack_int ldb, lapack_int* jpvt,
  5476                                  float rcond, lapack_int* rank, float* work,
  5477                                  lapack_int lwork );
  5478  lapack_int LAPACKE_dgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
  5479                                  lapack_int nrhs, double* a, lapack_int lda,
  5480                                  double* b, lapack_int ldb, lapack_int* jpvt,
  5481                                  double rcond, lapack_int* rank, double* work,
  5482                                  lapack_int lwork );
  5483  lapack_int LAPACKE_cgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
  5484                                  lapack_int nrhs, lapack_complex_float* a,
  5485                                  lapack_int lda, lapack_complex_float* b,
  5486                                  lapack_int ldb, lapack_int* jpvt, float rcond,
  5487                                  lapack_int* rank, lapack_complex_float* work,
  5488                                  lapack_int lwork, float* rwork );
  5489  lapack_int LAPACKE_zgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
  5490                                  lapack_int nrhs, lapack_complex_double* a,
  5491                                  lapack_int lda, lapack_complex_double* b,
  5492                                  lapack_int ldb, lapack_int* jpvt, double rcond,
  5493                                  lapack_int* rank, lapack_complex_double* work,
  5494                                  lapack_int lwork, double* rwork );
  5495  
  5496  lapack_int LAPACKE_sgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
  5497                                  float* a, lapack_int lda, float* tau,
  5498                                  float* work, lapack_int lwork );
  5499  lapack_int LAPACKE_dgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
  5500                                  double* a, lapack_int lda, double* tau,
  5501                                  double* work, lapack_int lwork );
  5502  lapack_int LAPACKE_cgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
  5503                                  lapack_complex_float* a, lapack_int lda,
  5504                                  lapack_complex_float* tau,
  5505                                  lapack_complex_float* work, lapack_int lwork );
  5506  lapack_int LAPACKE_zgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
  5507                                  lapack_complex_double* a, lapack_int lda,
  5508                                  lapack_complex_double* tau,
  5509                                  lapack_complex_double* work, lapack_int lwork );
  5510  
  5511  lapack_int LAPACKE_sgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
  5512                                  float* a, lapack_int lda, lapack_int* jpvt,
  5513                                  float* tau, float* work, lapack_int lwork );
  5514  lapack_int LAPACKE_dgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
  5515                                  double* a, lapack_int lda, lapack_int* jpvt,
  5516                                  double* tau, double* work, lapack_int lwork );
  5517  lapack_int LAPACKE_cgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
  5518                                  lapack_complex_float* a, lapack_int lda,
  5519                                  lapack_int* jpvt, lapack_complex_float* tau,
  5520                                  lapack_complex_float* work, lapack_int lwork,
  5521                                  float* rwork );
  5522  lapack_int LAPACKE_zgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
  5523                                  lapack_complex_double* a, lapack_int lda,
  5524                                  lapack_int* jpvt, lapack_complex_double* tau,
  5525                                  lapack_complex_double* work, lapack_int lwork,
  5526                                  double* rwork );
  5527  
  5528  lapack_int LAPACKE_sgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
  5529                                  float* a, lapack_int lda, lapack_int* jpvt,
  5530                                  float* tau, float* work );
  5531  lapack_int LAPACKE_dgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
  5532                                  double* a, lapack_int lda, lapack_int* jpvt,
  5533                                  double* tau, double* work );
  5534  lapack_int LAPACKE_cgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
  5535                                  lapack_complex_float* a, lapack_int lda,
  5536                                  lapack_int* jpvt, lapack_complex_float* tau,
  5537                                  lapack_complex_float* work, float* rwork );
  5538  lapack_int LAPACKE_zgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
  5539                                  lapack_complex_double* a, lapack_int lda,
  5540                                  lapack_int* jpvt, lapack_complex_double* tau,
  5541                                  lapack_complex_double* work, double* rwork );
  5542  
  5543  lapack_int LAPACKE_sgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
  5544                                  float* a, lapack_int lda, float* tau,
  5545                                  float* work );
  5546  lapack_int LAPACKE_dgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
  5547                                  double* a, lapack_int lda, double* tau,
  5548                                  double* work );
  5549  lapack_int LAPACKE_cgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
  5550                                  lapack_complex_float* a, lapack_int lda,
  5551                                  lapack_complex_float* tau,
  5552                                  lapack_complex_float* work );
  5553  lapack_int LAPACKE_zgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
  5554                                  lapack_complex_double* a, lapack_int lda,
  5555                                  lapack_complex_double* tau,
  5556                                  lapack_complex_double* work );
  5557  
  5558  lapack_int LAPACKE_sgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5559                                  float* a, lapack_int lda, float* tau,
  5560                                  float* work, lapack_int lwork );
  5561  lapack_int LAPACKE_dgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5562                                  double* a, lapack_int lda, double* tau,
  5563                                  double* work, lapack_int lwork );
  5564  lapack_int LAPACKE_cgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5565                                  lapack_complex_float* a, lapack_int lda,
  5566                                  lapack_complex_float* tau,
  5567                                  lapack_complex_float* work, lapack_int lwork );
  5568  lapack_int LAPACKE_zgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5569                                  lapack_complex_double* a, lapack_int lda,
  5570                                  lapack_complex_double* tau,
  5571                                  lapack_complex_double* work, lapack_int lwork );
  5572  
  5573  lapack_int LAPACKE_sgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
  5574                                   float* a, lapack_int lda, float* tau,
  5575                                   float* work, lapack_int lwork );
  5576  lapack_int LAPACKE_dgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
  5577                                   double* a, lapack_int lda, double* tau,
  5578                                   double* work, lapack_int lwork );
  5579  lapack_int LAPACKE_cgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
  5580                                   lapack_complex_float* a, lapack_int lda,
  5581                                   lapack_complex_float* tau,
  5582                                   lapack_complex_float* work, lapack_int lwork );
  5583  lapack_int LAPACKE_zgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
  5584                                   lapack_complex_double* a, lapack_int lda,
  5585                                   lapack_complex_double* tau,
  5586                                   lapack_complex_double* work,
  5587                                   lapack_int lwork );
  5588  
  5589  lapack_int LAPACKE_sgerfs_work( int matrix_layout, char trans, lapack_int n,
  5590                                  lapack_int nrhs, const float* a, lapack_int lda,
  5591                                  const float* af, lapack_int ldaf,
  5592                                  const lapack_int* ipiv, const float* b,
  5593                                  lapack_int ldb, float* x, lapack_int ldx,
  5594                                  float* ferr, float* berr, float* work,
  5595                                  lapack_int* iwork );
  5596  lapack_int LAPACKE_dgerfs_work( int matrix_layout, char trans, lapack_int n,
  5597                                  lapack_int nrhs, const double* a,
  5598                                  lapack_int lda, const double* af,
  5599                                  lapack_int ldaf, const lapack_int* ipiv,
  5600                                  const double* b, lapack_int ldb, double* x,
  5601                                  lapack_int ldx, double* ferr, double* berr,
  5602                                  double* work, lapack_int* iwork );
  5603  lapack_int LAPACKE_cgerfs_work( int matrix_layout, char trans, lapack_int n,
  5604                                  lapack_int nrhs, const lapack_complex_float* a,
  5605                                  lapack_int lda, const lapack_complex_float* af,
  5606                                  lapack_int ldaf, const lapack_int* ipiv,
  5607                                  const lapack_complex_float* b, lapack_int ldb,
  5608                                  lapack_complex_float* x, lapack_int ldx,
  5609                                  float* ferr, float* berr,
  5610                                  lapack_complex_float* work, float* rwork );
  5611  lapack_int LAPACKE_zgerfs_work( int matrix_layout, char trans, lapack_int n,
  5612                                  lapack_int nrhs, const lapack_complex_double* a,
  5613                                  lapack_int lda, const lapack_complex_double* af,
  5614                                  lapack_int ldaf, const lapack_int* ipiv,
  5615                                  const lapack_complex_double* b, lapack_int ldb,
  5616                                  lapack_complex_double* x, lapack_int ldx,
  5617                                  double* ferr, double* berr,
  5618                                  lapack_complex_double* work, double* rwork );
  5619  
  5620  lapack_int LAPACKE_sgerfsx_work( int matrix_layout, char trans, char equed,
  5621                                   lapack_int n, lapack_int nrhs, const float* a,
  5622                                   lapack_int lda, const float* af,
  5623                                   lapack_int ldaf, const lapack_int* ipiv,
  5624                                   const float* r, const float* c, const float* b,
  5625                                   lapack_int ldb, float* x, lapack_int ldx,
  5626                                   float* rcond, float* berr,
  5627                                   lapack_int n_err_bnds, float* err_bnds_norm,
  5628                                   float* err_bnds_comp, lapack_int nparams,
  5629                                   float* params, float* work,
  5630                                   lapack_int* iwork );
  5631  lapack_int LAPACKE_dgerfsx_work( int matrix_layout, char trans, char equed,
  5632                                   lapack_int n, lapack_int nrhs, const double* a,
  5633                                   lapack_int lda, const double* af,
  5634                                   lapack_int ldaf, const lapack_int* ipiv,
  5635                                   const double* r, const double* c,
  5636                                   const double* b, lapack_int ldb, double* x,
  5637                                   lapack_int ldx, double* rcond, double* berr,
  5638                                   lapack_int n_err_bnds, double* err_bnds_norm,
  5639                                   double* err_bnds_comp, lapack_int nparams,
  5640                                   double* params, double* work,
  5641                                   lapack_int* iwork );
  5642  lapack_int LAPACKE_cgerfsx_work( int matrix_layout, char trans, char equed,
  5643                                   lapack_int n, lapack_int nrhs,
  5644                                   const lapack_complex_float* a, lapack_int lda,
  5645                                   const lapack_complex_float* af,
  5646                                   lapack_int ldaf, const lapack_int* ipiv,
  5647                                   const float* r, const float* c,
  5648                                   const lapack_complex_float* b, lapack_int ldb,
  5649                                   lapack_complex_float* x, lapack_int ldx,
  5650                                   float* rcond, float* berr,
  5651                                   lapack_int n_err_bnds, float* err_bnds_norm,
  5652                                   float* err_bnds_comp, lapack_int nparams,
  5653                                   float* params, lapack_complex_float* work,
  5654                                   float* rwork );
  5655  lapack_int LAPACKE_zgerfsx_work( int matrix_layout, char trans, char equed,
  5656                                   lapack_int n, lapack_int nrhs,
  5657                                   const lapack_complex_double* a, lapack_int lda,
  5658                                   const lapack_complex_double* af,
  5659                                   lapack_int ldaf, const lapack_int* ipiv,
  5660                                   const double* r, const double* c,
  5661                                   const lapack_complex_double* b, lapack_int ldb,
  5662                                   lapack_complex_double* x, lapack_int ldx,
  5663                                   double* rcond, double* berr,
  5664                                   lapack_int n_err_bnds, double* err_bnds_norm,
  5665                                   double* err_bnds_comp, lapack_int nparams,
  5666                                   double* params, lapack_complex_double* work,
  5667                                   double* rwork );
  5668  
  5669  lapack_int LAPACKE_sgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5670                                  float* a, lapack_int lda, float* tau,
  5671                                  float* work, lapack_int lwork );
  5672  lapack_int LAPACKE_dgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5673                                  double* a, lapack_int lda, double* tau,
  5674                                  double* work, lapack_int lwork );
  5675  lapack_int LAPACKE_cgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5676                                  lapack_complex_float* a, lapack_int lda,
  5677                                  lapack_complex_float* tau,
  5678                                  lapack_complex_float* work, lapack_int lwork );
  5679  lapack_int LAPACKE_zgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
  5680                                  lapack_complex_double* a, lapack_int lda,
  5681                                  lapack_complex_double* tau,
  5682                                  lapack_complex_double* work, lapack_int lwork );
  5683  
  5684  lapack_int LAPACKE_sgesdd_work( int matrix_layout, char jobz, lapack_int m,
  5685                                  lapack_int n, float* a, lapack_int lda,
  5686                                  float* s, float* u, lapack_int ldu, float* vt,
  5687                                  lapack_int ldvt, float* work, lapack_int lwork,
  5688                                  lapack_int* iwork );
  5689  lapack_int LAPACKE_dgesdd_work( int matrix_layout, char jobz, lapack_int m,
  5690                                  lapack_int n, double* a, lapack_int lda,
  5691                                  double* s, double* u, lapack_int ldu,
  5692                                  double* vt, lapack_int ldvt, double* work,
  5693                                  lapack_int lwork, lapack_int* iwork );
  5694  lapack_int LAPACKE_cgesdd_work( int matrix_layout, char jobz, lapack_int m,
  5695                                  lapack_int n, lapack_complex_float* a,
  5696                                  lapack_int lda, float* s,
  5697                                  lapack_complex_float* u, lapack_int ldu,
  5698                                  lapack_complex_float* vt, lapack_int ldvt,
  5699                                  lapack_complex_float* work, lapack_int lwork,
  5700                                  float* rwork, lapack_int* iwork );
  5701  lapack_int LAPACKE_zgesdd_work( int matrix_layout, char jobz, lapack_int m,
  5702                                  lapack_int n, lapack_complex_double* a,
  5703                                  lapack_int lda, double* s,
  5704                                  lapack_complex_double* u, lapack_int ldu,
  5705                                  lapack_complex_double* vt, lapack_int ldvt,
  5706                                  lapack_complex_double* work, lapack_int lwork,
  5707                                  double* rwork, lapack_int* iwork );
  5708  
  5709  lapack_int LAPACKE_sgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5710                                 float* a, lapack_int lda, lapack_int* ipiv,
  5711                                 float* b, lapack_int ldb );
  5712  lapack_int LAPACKE_dgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5713                                 double* a, lapack_int lda, lapack_int* ipiv,
  5714                                 double* b, lapack_int ldb );
  5715  lapack_int LAPACKE_cgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5716                                 lapack_complex_float* a, lapack_int lda,
  5717                                 lapack_int* ipiv, lapack_complex_float* b,
  5718                                 lapack_int ldb );
  5719  lapack_int LAPACKE_zgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5720                                 lapack_complex_double* a, lapack_int lda,
  5721                                 lapack_int* ipiv, lapack_complex_double* b,
  5722                                 lapack_int ldb );
  5723  lapack_int LAPACKE_dsgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5724                                  double* a, lapack_int lda, lapack_int* ipiv,
  5725                                  double* b, lapack_int ldb, double* x,
  5726                                  lapack_int ldx, double* work, float* swork,
  5727                                  lapack_int* iter );
  5728  lapack_int LAPACKE_zcgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  5729                                  lapack_complex_double* a, lapack_int lda,
  5730                                  lapack_int* ipiv, lapack_complex_double* b,
  5731                                  lapack_int ldb, lapack_complex_double* x,
  5732                                  lapack_int ldx, lapack_complex_double* work,
  5733                                  lapack_complex_float* swork, double* rwork,
  5734                                  lapack_int* iter );
  5735  
  5736  lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt,
  5737                                  lapack_int m, lapack_int n, float* a,
  5738                                  lapack_int lda, float* s, float* u,
  5739                                  lapack_int ldu, float* vt, lapack_int ldvt,
  5740                                  float* work, lapack_int lwork );
  5741  lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt,
  5742                                  lapack_int m, lapack_int n, double* a,
  5743                                  lapack_int lda, double* s, double* u,
  5744                                  lapack_int ldu, double* vt, lapack_int ldvt,
  5745                                  double* work, lapack_int lwork );
  5746  lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt,
  5747                                  lapack_int m, lapack_int n,
  5748                                  lapack_complex_float* a, lapack_int lda,
  5749                                  float* s, lapack_complex_float* u,
  5750                                  lapack_int ldu, lapack_complex_float* vt,
  5751                                  lapack_int ldvt, lapack_complex_float* work,
  5752                                  lapack_int lwork, float* rwork );
  5753  lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt,
  5754                                  lapack_int m, lapack_int n,
  5755                                  lapack_complex_double* a, lapack_int lda,
  5756                                  double* s, lapack_complex_double* u,
  5757                                  lapack_int ldu, lapack_complex_double* vt,
  5758                                  lapack_int ldvt, lapack_complex_double* work,
  5759                                  lapack_int lwork, double* rwork );
  5760  
  5761  lapack_int LAPACKE_sgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
  5762                             		lapack_int m, lapack_int n, float* a,
  5763                            		lapack_int lda, lapack_int vl, lapack_int vu,
  5764                             		lapack_int il, lapack_int iu, lapack_int ns,
  5765                             		float* s, float* u, lapack_int ldu,
  5766                             		float* vt, lapack_int ldvt,	
  5767                                  float* work, lapack_int lwork, lapack_int* iwork );
  5768  lapack_int LAPACKE_dgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
  5769                             		lapack_int m, lapack_int n, double* a,
  5770                            		lapack_int lda, lapack_int vl, lapack_int vu,
  5771                             		lapack_int il, lapack_int iu, lapack_int ns,
  5772                             		double* s, double* u, lapack_int ldu,
  5773                             		double* vt, lapack_int ldvt,	
  5774                                  double* work, lapack_int lwork, lapack_int* iwork );
  5775  lapack_int LAPACKE_cgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
  5776                             		lapack_int m, lapack_int n, lapack_complex_float* a,
  5777                            		lapack_int lda, lapack_int vl, lapack_int vu,
  5778                             		lapack_int il, lapack_int iu, lapack_int ns,
  5779                             		float* s, lapack_complex_float* u, lapack_int ldu,
  5780                             		lapack_complex_float* vt, lapack_int ldvt,	
  5781                                  lapack_complex_float* work, lapack_int lwork,
  5782                                  float* rwork, lapack_int* iwork );
  5783  lapack_int LAPACKE_zgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
  5784                             		lapack_int m, lapack_int n, lapack_complex_double* a,
  5785                            		lapack_int lda, lapack_int vl, lapack_int vu,
  5786                             		lapack_int il, lapack_int iu, lapack_int ns,
  5787                             		double* s, lapack_complex_double* u, lapack_int ldu,
  5788                             		lapack_complex_double* vt, lapack_int ldvt,	
  5789                                  lapack_complex_double* work, lapack_int lwork, 
  5790                                  double* rwork, lapack_int* iwork );
  5791                             
  5792  lapack_int LAPACKE_sgesvj_work( int matrix_layout, char joba, char jobu,
  5793                                  char jobv, lapack_int m, lapack_int n, float* a,
  5794                                  lapack_int lda, float* sva, lapack_int mv,
  5795                                  float* v, lapack_int ldv, float* work,
  5796                                  lapack_int lwork );
  5797  lapack_int LAPACKE_dgesvj_work( int matrix_layout, char joba, char jobu,
  5798                                  char jobv, lapack_int m, lapack_int n,
  5799                                  double* a, lapack_int lda, double* sva,
  5800                                  lapack_int mv, double* v, lapack_int ldv,
  5801                                  double* work, lapack_int lwork );
  5802  lapack_int LAPACKE_cgesvj_work( int matrix_layout, char joba, char jobu,
  5803                                  char jobv, lapack_int m, lapack_int n, lapack_complex_float* a,
  5804                                  lapack_int lda, float* sva, lapack_int mv,
  5805                                  lapack_complex_float* v, lapack_int ldv,
  5806                                  lapack_complex_float* cwork, lapack_int lwork,
  5807   								float* rwork,lapack_int lrwork );
  5808  lapack_int LAPACKE_zgesvj_work( int matrix_layout, char joba, char jobu,
  5809                                  char jobv, lapack_int m, lapack_int n,
  5810                                  lapack_complex_double* a, lapack_int lda, double* sva,
  5811                                  lapack_int mv, lapack_complex_double* v, lapack_int ldv,
  5812                                  lapack_complex_double* cwork, lapack_int lwork,
  5813                                  double* rwork, lapack_int lrwork );
  5814  
  5815  lapack_int LAPACKE_sgesvx_work( int matrix_layout, char fact, char trans,
  5816                                  lapack_int n, lapack_int nrhs, float* a,
  5817                                  lapack_int lda, float* af, lapack_int ldaf,
  5818                                  lapack_int* ipiv, char* equed, float* r,
  5819                                  float* c, float* b, lapack_int ldb, float* x,
  5820                                  lapack_int ldx, float* rcond, float* ferr,
  5821                                  float* berr, float* work, lapack_int* iwork );
  5822  lapack_int LAPACKE_dgesvx_work( int matrix_layout, char fact, char trans,
  5823                                  lapack_int n, lapack_int nrhs, double* a,
  5824                                  lapack_int lda, double* af, lapack_int ldaf,
  5825                                  lapack_int* ipiv, char* equed, double* r,
  5826                                  double* c, double* b, lapack_int ldb, double* x,
  5827                                  lapack_int ldx, double* rcond, double* ferr,
  5828                                  double* berr, double* work, lapack_int* iwork );
  5829  lapack_int LAPACKE_cgesvx_work( int matrix_layout, char fact, char trans,
  5830                                  lapack_int n, lapack_int nrhs,
  5831                                  lapack_complex_float* a, lapack_int lda,
  5832                                  lapack_complex_float* af, lapack_int ldaf,
  5833                                  lapack_int* ipiv, char* equed, float* r,
  5834                                  float* c, lapack_complex_float* b,
  5835                                  lapack_int ldb, lapack_complex_float* x,
  5836                                  lapack_int ldx, float* rcond, float* ferr,
  5837                                  float* berr, lapack_complex_float* work,
  5838                                  float* rwork );
  5839  lapack_int LAPACKE_zgesvx_work( int matrix_layout, char fact, char trans,
  5840                                  lapack_int n, lapack_int nrhs,
  5841                                  lapack_complex_double* a, lapack_int lda,
  5842                                  lapack_complex_double* af, lapack_int ldaf,
  5843                                  lapack_int* ipiv, char* equed, double* r,
  5844                                  double* c, lapack_complex_double* b,
  5845                                  lapack_int ldb, lapack_complex_double* x,
  5846                                  lapack_int ldx, double* rcond, double* ferr,
  5847                                  double* berr, lapack_complex_double* work,
  5848                                  double* rwork );
  5849  
  5850  lapack_int LAPACKE_sgesvxx_work( int matrix_layout, char fact, char trans,
  5851                                   lapack_int n, lapack_int nrhs, float* a,
  5852                                   lapack_int lda, float* af, lapack_int ldaf,
  5853                                   lapack_int* ipiv, char* equed, float* r,
  5854                                   float* c, float* b, lapack_int ldb, float* x,
  5855                                   lapack_int ldx, float* rcond, float* rpvgrw,
  5856                                   float* berr, lapack_int n_err_bnds,
  5857                                   float* err_bnds_norm, float* err_bnds_comp,
  5858                                   lapack_int nparams, float* params, float* work,
  5859                                   lapack_int* iwork );
  5860  lapack_int LAPACKE_dgesvxx_work( int matrix_layout, char fact, char trans,
  5861                                   lapack_int n, lapack_int nrhs, double* a,
  5862                                   lapack_int lda, double* af, lapack_int ldaf,
  5863                                   lapack_int* ipiv, char* equed, double* r,
  5864                                   double* c, double* b, lapack_int ldb,
  5865                                   double* x, lapack_int ldx, double* rcond,
  5866                                   double* rpvgrw, double* berr,
  5867                                   lapack_int n_err_bnds, double* err_bnds_norm,
  5868                                   double* err_bnds_comp, lapack_int nparams,
  5869                                   double* params, double* work,
  5870                                   lapack_int* iwork );
  5871  lapack_int LAPACKE_cgesvxx_work( int matrix_layout, char fact, char trans,
  5872                                   lapack_int n, lapack_int nrhs,
  5873                                   lapack_complex_float* a, lapack_int lda,
  5874                                   lapack_complex_float* af, lapack_int ldaf,
  5875                                   lapack_int* ipiv, char* equed, float* r,
  5876                                   float* c, lapack_complex_float* b,
  5877                                   lapack_int ldb, lapack_complex_float* x,
  5878                                   lapack_int ldx, float* rcond, float* rpvgrw,
  5879                                   float* berr, lapack_int n_err_bnds,
  5880                                   float* err_bnds_norm, float* err_bnds_comp,
  5881                                   lapack_int nparams, float* params,
  5882                                   lapack_complex_float* work, float* rwork );
  5883  lapack_int LAPACKE_zgesvxx_work( int matrix_layout, char fact, char trans,
  5884                                   lapack_int n, lapack_int nrhs,
  5885                                   lapack_complex_double* a, lapack_int lda,
  5886                                   lapack_complex_double* af, lapack_int ldaf,
  5887                                   lapack_int* ipiv, char* equed, double* r,
  5888                                   double* c, lapack_complex_double* b,
  5889                                   lapack_int ldb, lapack_complex_double* x,
  5890                                   lapack_int ldx, double* rcond, double* rpvgrw,
  5891                                   double* berr, lapack_int n_err_bnds,
  5892                                   double* err_bnds_norm, double* err_bnds_comp,
  5893                                   lapack_int nparams, double* params,
  5894                                   lapack_complex_double* work, double* rwork );
  5895  
  5896  lapack_int LAPACKE_sgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5897                                  float* a, lapack_int lda, lapack_int* ipiv );
  5898  lapack_int LAPACKE_dgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5899                                  double* a, lapack_int lda, lapack_int* ipiv );
  5900  lapack_int LAPACKE_cgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5901                                  lapack_complex_float* a, lapack_int lda,
  5902                                  lapack_int* ipiv );
  5903  lapack_int LAPACKE_zgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5904                                  lapack_complex_double* a, lapack_int lda,
  5905                                  lapack_int* ipiv );
  5906  
  5907  lapack_int LAPACKE_sgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5908                                  float* a, lapack_int lda, lapack_int* ipiv );
  5909  lapack_int LAPACKE_dgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5910                                  double* a, lapack_int lda, lapack_int* ipiv );
  5911  lapack_int LAPACKE_cgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5912                                  lapack_complex_float* a, lapack_int lda,
  5913                                  lapack_int* ipiv );
  5914  lapack_int LAPACKE_zgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
  5915                                  lapack_complex_double* a, lapack_int lda,
  5916                                  lapack_int* ipiv );
  5917  
  5918  lapack_int LAPACKE_sgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5919                                  float* a, lapack_int lda, lapack_int* ipiv );
  5920  lapack_int LAPACKE_dgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5921                                  double* a, lapack_int lda, lapack_int* ipiv );
  5922  lapack_int LAPACKE_cgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5923                                  lapack_complex_float* a, lapack_int lda,
  5924                                  lapack_int* ipiv );
  5925  lapack_int LAPACKE_zgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
  5926                                  lapack_complex_double* a, lapack_int lda,
  5927                                  lapack_int* ipiv );
  5928  
  5929  lapack_int LAPACKE_sgetri_work( int matrix_layout, lapack_int n, float* a,
  5930                                  lapack_int lda, const lapack_int* ipiv,
  5931                                  float* work, lapack_int lwork );
  5932  lapack_int LAPACKE_dgetri_work( int matrix_layout, lapack_int n, double* a,
  5933                                  lapack_int lda, const lapack_int* ipiv,
  5934                                  double* work, lapack_int lwork );
  5935  lapack_int LAPACKE_cgetri_work( int matrix_layout, lapack_int n,
  5936                                  lapack_complex_float* a, lapack_int lda,
  5937                                  const lapack_int* ipiv,
  5938                                  lapack_complex_float* work, lapack_int lwork );
  5939  lapack_int LAPACKE_zgetri_work( int matrix_layout, lapack_int n,
  5940                                  lapack_complex_double* a, lapack_int lda,
  5941                                  const lapack_int* ipiv,
  5942                                  lapack_complex_double* work, lapack_int lwork );
  5943  
  5944  lapack_int LAPACKE_sgetrs_work( int matrix_layout, char trans, lapack_int n,
  5945                                  lapack_int nrhs, const float* a, lapack_int lda,
  5946                                  const lapack_int* ipiv, float* b,
  5947                                  lapack_int ldb );
  5948  lapack_int LAPACKE_dgetrs_work( int matrix_layout, char trans, lapack_int n,
  5949                                  lapack_int nrhs, const double* a,
  5950                                  lapack_int lda, const lapack_int* ipiv,
  5951                                  double* b, lapack_int ldb );
  5952  lapack_int LAPACKE_cgetrs_work( int matrix_layout, char trans, lapack_int n,
  5953                                  lapack_int nrhs, const lapack_complex_float* a,
  5954                                  lapack_int lda, const lapack_int* ipiv,
  5955                                  lapack_complex_float* b, lapack_int ldb );
  5956  lapack_int LAPACKE_zgetrs_work( int matrix_layout, char trans, lapack_int n,
  5957                                  lapack_int nrhs, const lapack_complex_double* a,
  5958                                  lapack_int lda, const lapack_int* ipiv,
  5959                                  lapack_complex_double* b, lapack_int ldb );
  5960  
  5961  lapack_int LAPACKE_sggbak_work( int matrix_layout, char job, char side,
  5962                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5963                                  const float* lscale, const float* rscale,
  5964                                  lapack_int m, float* v, lapack_int ldv );
  5965  lapack_int LAPACKE_dggbak_work( int matrix_layout, char job, char side,
  5966                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5967                                  const double* lscale, const double* rscale,
  5968                                  lapack_int m, double* v, lapack_int ldv );
  5969  lapack_int LAPACKE_cggbak_work( int matrix_layout, char job, char side,
  5970                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5971                                  const float* lscale, const float* rscale,
  5972                                  lapack_int m, lapack_complex_float* v,
  5973                                  lapack_int ldv );
  5974  lapack_int LAPACKE_zggbak_work( int matrix_layout, char job, char side,
  5975                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  5976                                  const double* lscale, const double* rscale,
  5977                                  lapack_int m, lapack_complex_double* v,
  5978                                  lapack_int ldv );
  5979  
  5980  lapack_int LAPACKE_sggbal_work( int matrix_layout, char job, lapack_int n,
  5981                                  float* a, lapack_int lda, float* b,
  5982                                  lapack_int ldb, lapack_int* ilo,
  5983                                  lapack_int* ihi, float* lscale, float* rscale,
  5984                                  float* work );
  5985  lapack_int LAPACKE_dggbal_work( int matrix_layout, char job, lapack_int n,
  5986                                  double* a, lapack_int lda, double* b,
  5987                                  lapack_int ldb, lapack_int* ilo,
  5988                                  lapack_int* ihi, double* lscale, double* rscale,
  5989                                  double* work );
  5990  lapack_int LAPACKE_cggbal_work( int matrix_layout, char job, lapack_int n,
  5991                                  lapack_complex_float* a, lapack_int lda,
  5992                                  lapack_complex_float* b, lapack_int ldb,
  5993                                  lapack_int* ilo, lapack_int* ihi, float* lscale,
  5994                                  float* rscale, float* work );
  5995  lapack_int LAPACKE_zggbal_work( int matrix_layout, char job, lapack_int n,
  5996                                  lapack_complex_double* a, lapack_int lda,
  5997                                  lapack_complex_double* b, lapack_int ldb,
  5998                                  lapack_int* ilo, lapack_int* ihi,
  5999                                  double* lscale, double* rscale, double* work );
  6000  
  6001  lapack_int LAPACKE_sgges_work( int matrix_layout, char jobvsl, char jobvsr,
  6002                                 char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
  6003                                 float* a, lapack_int lda, float* b,
  6004                                 lapack_int ldb, lapack_int* sdim, float* alphar,
  6005                                 float* alphai, float* beta, float* vsl,
  6006                                 lapack_int ldvsl, float* vsr, lapack_int ldvsr,
  6007                                 float* work, lapack_int lwork,
  6008                                 lapack_logical* bwork );
  6009  lapack_int LAPACKE_dgges_work( int matrix_layout, char jobvsl, char jobvsr,
  6010                                 char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
  6011                                 double* a, lapack_int lda, double* b,
  6012                                 lapack_int ldb, lapack_int* sdim, double* alphar,
  6013                                 double* alphai, double* beta, double* vsl,
  6014                                 lapack_int ldvsl, double* vsr, lapack_int ldvsr,
  6015                                 double* work, lapack_int lwork,
  6016                                 lapack_logical* bwork );
  6017  lapack_int LAPACKE_cgges_work( int matrix_layout, char jobvsl, char jobvsr,
  6018                                 char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
  6019                                 lapack_complex_float* a, lapack_int lda,
  6020                                 lapack_complex_float* b, lapack_int ldb,
  6021                                 lapack_int* sdim, lapack_complex_float* alpha,
  6022                                 lapack_complex_float* beta,
  6023                                 lapack_complex_float* vsl, lapack_int ldvsl,
  6024                                 lapack_complex_float* vsr, lapack_int ldvsr,
  6025                                 lapack_complex_float* work, lapack_int lwork,
  6026                                 float* rwork, lapack_logical* bwork );
  6027  lapack_int LAPACKE_zgges_work( int matrix_layout, char jobvsl, char jobvsr,
  6028                                 char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
  6029                                 lapack_complex_double* a, lapack_int lda,
  6030                                 lapack_complex_double* b, lapack_int ldb,
  6031                                 lapack_int* sdim, lapack_complex_double* alpha,
  6032                                 lapack_complex_double* beta,
  6033                                 lapack_complex_double* vsl, lapack_int ldvsl,
  6034                                 lapack_complex_double* vsr, lapack_int ldvsr,
  6035                                 lapack_complex_double* work, lapack_int lwork,
  6036                                 double* rwork, lapack_logical* bwork );
  6037  
  6038  lapack_int LAPACKE_sgges3_work( int matrix_layout, char jobvsl, char jobvsr,
  6039                                  char sort, LAPACK_S_SELECT3 selctg,
  6040                                  lapack_int n,
  6041                                  float* a, lapack_int lda,
  6042                                  float* b, lapack_int ldb, lapack_int* sdim,
  6043                                  float* alphar, float* alphai, float* beta,
  6044                                  float* vsl, lapack_int ldvsl,
  6045                                  float* vsr, lapack_int ldvsr,
  6046                                  float* work, lapack_int lwork,
  6047                                  lapack_logical* bwork );
  6048  lapack_int LAPACKE_dgges3_work( int matrix_layout, char jobvsl, char jobvsr,
  6049                                  char sort, LAPACK_D_SELECT3 selctg,
  6050                                  lapack_int n,
  6051                                  double* a, lapack_int lda,
  6052                                  double* b, lapack_int ldb, lapack_int* sdim,
  6053                                  double* alphar, double* alphai, double* beta,
  6054                                  double* vsl, lapack_int ldvsl,
  6055                                  double* vsr, lapack_int ldvsr,
  6056                                  double* work, lapack_int lwork,
  6057                                  lapack_logical* bwork );
  6058  lapack_int LAPACKE_cgges3_work( int matrix_layout, char jobvsl, char jobvsr,
  6059                                  char sort, LAPACK_C_SELECT2 selctg,
  6060                                  lapack_int n,
  6061                                  lapack_complex_float* a, lapack_int lda,
  6062                                  lapack_complex_float* b, lapack_int ldb,
  6063                                  lapack_int* sdim, lapack_complex_float* alpha,
  6064                                  lapack_complex_float* beta,
  6065                                  lapack_complex_float* vsl, lapack_int ldvsl,
  6066                                  lapack_complex_float* vsr, lapack_int ldvsr,
  6067                                  lapack_complex_float* work, lapack_int lwork,
  6068                                  float* rwork, lapack_logical* bwork );
  6069  lapack_int LAPACKE_zgges3_work( int matrix_layout, char jobvsl, char jobvsr,
  6070                                  char sort, LAPACK_Z_SELECT2 selctg,
  6071                                  lapack_int n,
  6072                                  lapack_complex_double* a, lapack_int lda,
  6073                                  lapack_complex_double* b, lapack_int ldb,
  6074                                  lapack_int* sdim, lapack_complex_double* alpha,
  6075                                  lapack_complex_double* beta,
  6076                                  lapack_complex_double* vsl, lapack_int ldvsl,
  6077                                  lapack_complex_double* vsr, lapack_int ldvsr,
  6078                                  lapack_complex_double* work, lapack_int lwork,
  6079                                  double* rwork, lapack_logical* bwork );
  6080  
  6081  lapack_int LAPACKE_sggesx_work( int matrix_layout, char jobvsl, char jobvsr,
  6082                                  char sort, LAPACK_S_SELECT3 selctg, char sense,
  6083                                  lapack_int n, float* a, lapack_int lda,
  6084                                  float* b, lapack_int ldb, lapack_int* sdim,
  6085                                  float* alphar, float* alphai, float* beta,
  6086                                  float* vsl, lapack_int ldvsl, float* vsr,
  6087                                  lapack_int ldvsr, float* rconde, float* rcondv,
  6088                                  float* work, lapack_int lwork,
  6089                                  lapack_int* iwork, lapack_int liwork,
  6090                                  lapack_logical* bwork );
  6091  lapack_int LAPACKE_dggesx_work( int matrix_layout, char jobvsl, char jobvsr,
  6092                                  char sort, LAPACK_D_SELECT3 selctg, char sense,
  6093                                  lapack_int n, double* a, lapack_int lda,
  6094                                  double* b, lapack_int ldb, lapack_int* sdim,
  6095                                  double* alphar, double* alphai, double* beta,
  6096                                  double* vsl, lapack_int ldvsl, double* vsr,
  6097                                  lapack_int ldvsr, double* rconde,
  6098                                  double* rcondv, double* work, lapack_int lwork,
  6099                                  lapack_int* iwork, lapack_int liwork,
  6100                                  lapack_logical* bwork );
  6101  lapack_int LAPACKE_cggesx_work( int matrix_layout, char jobvsl, char jobvsr,
  6102                                  char sort, LAPACK_C_SELECT2 selctg, char sense,
  6103                                  lapack_int n, lapack_complex_float* a,
  6104                                  lapack_int lda, lapack_complex_float* b,
  6105                                  lapack_int ldb, lapack_int* sdim,
  6106                                  lapack_complex_float* alpha,
  6107                                  lapack_complex_float* beta,
  6108                                  lapack_complex_float* vsl, lapack_int ldvsl,
  6109                                  lapack_complex_float* vsr, lapack_int ldvsr,
  6110                                  float* rconde, float* rcondv,
  6111                                  lapack_complex_float* work, lapack_int lwork,
  6112                                  float* rwork, lapack_int* iwork,
  6113                                  lapack_int liwork, lapack_logical* bwork );
  6114  lapack_int LAPACKE_zggesx_work( int matrix_layout, char jobvsl, char jobvsr,
  6115                                  char sort, LAPACK_Z_SELECT2 selctg, char sense,
  6116                                  lapack_int n, lapack_complex_double* a,
  6117                                  lapack_int lda, lapack_complex_double* b,
  6118                                  lapack_int ldb, lapack_int* sdim,
  6119                                  lapack_complex_double* alpha,
  6120                                  lapack_complex_double* beta,
  6121                                  lapack_complex_double* vsl, lapack_int ldvsl,
  6122                                  lapack_complex_double* vsr, lapack_int ldvsr,
  6123                                  double* rconde, double* rcondv,
  6124                                  lapack_complex_double* work, lapack_int lwork,
  6125                                  double* rwork, lapack_int* iwork,
  6126                                  lapack_int liwork, lapack_logical* bwork );
  6127  
  6128  lapack_int LAPACKE_sggev_work( int matrix_layout, char jobvl, char jobvr,
  6129                                 lapack_int n, float* a, lapack_int lda, float* b,
  6130                                 lapack_int ldb, float* alphar, float* alphai,
  6131                                 float* beta, float* vl, lapack_int ldvl,
  6132                                 float* vr, lapack_int ldvr, float* work,
  6133                                 lapack_int lwork );
  6134  lapack_int LAPACKE_dggev_work( int matrix_layout, char jobvl, char jobvr,
  6135                                 lapack_int n, double* a, lapack_int lda,
  6136                                 double* b, lapack_int ldb, double* alphar,
  6137                                 double* alphai, double* beta, double* vl,
  6138                                 lapack_int ldvl, double* vr, lapack_int ldvr,
  6139                                 double* work, lapack_int lwork );
  6140  lapack_int LAPACKE_cggev_work( int matrix_layout, char jobvl, char jobvr,
  6141                                 lapack_int n, lapack_complex_float* a,
  6142                                 lapack_int lda, lapack_complex_float* b,
  6143                                 lapack_int ldb, lapack_complex_float* alpha,
  6144                                 lapack_complex_float* beta,
  6145                                 lapack_complex_float* vl, lapack_int ldvl,
  6146                                 lapack_complex_float* vr, lapack_int ldvr,
  6147                                 lapack_complex_float* work, lapack_int lwork,
  6148                                 float* rwork );
  6149  lapack_int LAPACKE_zggev_work( int matrix_layout, char jobvl, char jobvr,
  6150                                 lapack_int n, lapack_complex_double* a,
  6151                                 lapack_int lda, lapack_complex_double* b,
  6152                                 lapack_int ldb, lapack_complex_double* alpha,
  6153                                 lapack_complex_double* beta,
  6154                                 lapack_complex_double* vl, lapack_int ldvl,
  6155                                 lapack_complex_double* vr, lapack_int ldvr,
  6156                                 lapack_complex_double* work, lapack_int lwork,
  6157                                 double* rwork );
  6158  
  6159  lapack_int LAPACKE_sggev3_work( int matrix_layout, char jobvl, char jobvr,
  6160                                  lapack_int n,
  6161                                  float* a, lapack_int lda,
  6162                                  float* b, lapack_int ldb,
  6163                                  float* alphar, float* alphai, float* beta,
  6164                                  float* vl, lapack_int ldvl,
  6165                                  float* vr, lapack_int ldvr,
  6166                                  float* work, lapack_int lwork );
  6167  lapack_int LAPACKE_dggev3_work( int matrix_layout, char jobvl, char jobvr,
  6168                                  lapack_int n,
  6169                                  double* a, lapack_int lda,
  6170                                  double* b, lapack_int ldb,
  6171                                  double* alphar, double* alphai, double* beta,
  6172                                  double* vl, lapack_int ldvl,
  6173                                  double* vr, lapack_int ldvr,
  6174                                  double* work, lapack_int lwork );
  6175  lapack_int LAPACKE_cggev3_work( int matrix_layout, char jobvl, char jobvr,
  6176                                  lapack_int n,
  6177                                  lapack_complex_float* a, lapack_int lda,
  6178                                  lapack_complex_float* b, lapack_int ldb,
  6179                                  lapack_complex_float* alpha,
  6180                                  lapack_complex_float* beta,
  6181                                  lapack_complex_float* vl, lapack_int ldvl,
  6182                                  lapack_complex_float* vr, lapack_int ldvr,
  6183                                  lapack_complex_float* work, lapack_int lwork,
  6184                                  float* rwork );
  6185  lapack_int LAPACKE_zggev3_work( int matrix_layout, char jobvl, char jobvr,
  6186                                  lapack_int n,
  6187                                  lapack_complex_double* a, lapack_int lda,
  6188                                  lapack_complex_double* b, lapack_int ldb,
  6189                                  lapack_complex_double* alpha,
  6190                                  lapack_complex_double* beta,
  6191                                  lapack_complex_double* vl, lapack_int ldvl,
  6192                                  lapack_complex_double* vr, lapack_int ldvr,
  6193                                  lapack_complex_double* work, lapack_int lwork,
  6194                                  double* rwork );
  6195  
  6196  lapack_int LAPACKE_sggevx_work( int matrix_layout, char balanc, char jobvl,
  6197                                  char jobvr, char sense, lapack_int n, float* a,
  6198                                  lapack_int lda, float* b, lapack_int ldb,
  6199                                  float* alphar, float* alphai, float* beta,
  6200                                  float* vl, lapack_int ldvl, float* vr,
  6201                                  lapack_int ldvr, lapack_int* ilo,
  6202                                  lapack_int* ihi, float* lscale, float* rscale,
  6203                                  float* abnrm, float* bbnrm, float* rconde,
  6204                                  float* rcondv, float* work, lapack_int lwork,
  6205                                  lapack_int* iwork, lapack_logical* bwork );
  6206  lapack_int LAPACKE_dggevx_work( int matrix_layout, char balanc, char jobvl,
  6207                                  char jobvr, char sense, lapack_int n, double* a,
  6208                                  lapack_int lda, double* b, lapack_int ldb,
  6209                                  double* alphar, double* alphai, double* beta,
  6210                                  double* vl, lapack_int ldvl, double* vr,
  6211                                  lapack_int ldvr, lapack_int* ilo,
  6212                                  lapack_int* ihi, double* lscale, double* rscale,
  6213                                  double* abnrm, double* bbnrm, double* rconde,
  6214                                  double* rcondv, double* work, lapack_int lwork,
  6215                                  lapack_int* iwork, lapack_logical* bwork );
  6216  lapack_int LAPACKE_cggevx_work( int matrix_layout, char balanc, char jobvl,
  6217                                  char jobvr, char sense, lapack_int n,
  6218                                  lapack_complex_float* a, lapack_int lda,
  6219                                  lapack_complex_float* b, lapack_int ldb,
  6220                                  lapack_complex_float* alpha,
  6221                                  lapack_complex_float* beta,
  6222                                  lapack_complex_float* vl, lapack_int ldvl,
  6223                                  lapack_complex_float* vr, lapack_int ldvr,
  6224                                  lapack_int* ilo, lapack_int* ihi, float* lscale,
  6225                                  float* rscale, float* abnrm, float* bbnrm,
  6226                                  float* rconde, float* rcondv,
  6227                                  lapack_complex_float* work, lapack_int lwork,
  6228                                  float* rwork, lapack_int* iwork,
  6229                                  lapack_logical* bwork );
  6230  lapack_int LAPACKE_zggevx_work( int matrix_layout, char balanc, char jobvl,
  6231                                  char jobvr, char sense, lapack_int n,
  6232                                  lapack_complex_double* a, lapack_int lda,
  6233                                  lapack_complex_double* b, lapack_int ldb,
  6234                                  lapack_complex_double* alpha,
  6235                                  lapack_complex_double* beta,
  6236                                  lapack_complex_double* vl, lapack_int ldvl,
  6237                                  lapack_complex_double* vr, lapack_int ldvr,
  6238                                  lapack_int* ilo, lapack_int* ihi,
  6239                                  double* lscale, double* rscale, double* abnrm,
  6240                                  double* bbnrm, double* rconde, double* rcondv,
  6241                                  lapack_complex_double* work, lapack_int lwork,
  6242                                  double* rwork, lapack_int* iwork,
  6243                                  lapack_logical* bwork );
  6244  
  6245  lapack_int LAPACKE_sggglm_work( int matrix_layout, lapack_int n, lapack_int m,
  6246                                  lapack_int p, float* a, lapack_int lda,
  6247                                  float* b, lapack_int ldb, float* d, float* x,
  6248                                  float* y, float* work, lapack_int lwork );
  6249  lapack_int LAPACKE_dggglm_work( int matrix_layout, lapack_int n, lapack_int m,
  6250                                  lapack_int p, double* a, lapack_int lda,
  6251                                  double* b, lapack_int ldb, double* d, double* x,
  6252                                  double* y, double* work, lapack_int lwork );
  6253  lapack_int LAPACKE_cggglm_work( int matrix_layout, lapack_int n, lapack_int m,
  6254                                  lapack_int p, lapack_complex_float* a,
  6255                                  lapack_int lda, lapack_complex_float* b,
  6256                                  lapack_int ldb, lapack_complex_float* d,
  6257                                  lapack_complex_float* x,
  6258                                  lapack_complex_float* y,
  6259                                  lapack_complex_float* work, lapack_int lwork );
  6260  lapack_int LAPACKE_zggglm_work( int matrix_layout, lapack_int n, lapack_int m,
  6261                                  lapack_int p, lapack_complex_double* a,
  6262                                  lapack_int lda, lapack_complex_double* b,
  6263                                  lapack_int ldb, lapack_complex_double* d,
  6264                                  lapack_complex_double* x,
  6265                                  lapack_complex_double* y,
  6266                                  lapack_complex_double* work, lapack_int lwork );
  6267  
  6268  lapack_int LAPACKE_sgghrd_work( int matrix_layout, char compq, char compz,
  6269                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6270                                  float* a, lapack_int lda, float* b,
  6271                                  lapack_int ldb, float* q, lapack_int ldq,
  6272                                  float* z, lapack_int ldz );
  6273  lapack_int LAPACKE_dgghrd_work( int matrix_layout, char compq, char compz,
  6274                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6275                                  double* a, lapack_int lda, double* b,
  6276                                  lapack_int ldb, double* q, lapack_int ldq,
  6277                                  double* z, lapack_int ldz );
  6278  lapack_int LAPACKE_cgghrd_work( int matrix_layout, char compq, char compz,
  6279                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6280                                  lapack_complex_float* a, lapack_int lda,
  6281                                  lapack_complex_float* b, lapack_int ldb,
  6282                                  lapack_complex_float* q, lapack_int ldq,
  6283                                  lapack_complex_float* z, lapack_int ldz );
  6284  lapack_int LAPACKE_zgghrd_work( int matrix_layout, char compq, char compz,
  6285                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6286                                  lapack_complex_double* a, lapack_int lda,
  6287                                  lapack_complex_double* b, lapack_int ldb,
  6288                                  lapack_complex_double* q, lapack_int ldq,
  6289                                  lapack_complex_double* z, lapack_int ldz );
  6290  
  6291  lapack_int LAPACKE_sgghd3_work( int matrix_layout, char compq, char compz,
  6292                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6293                                  float* a, lapack_int lda,
  6294                                  float* b, lapack_int ldb,
  6295                                  float* q, lapack_int ldq,
  6296                                  float* z, lapack_int ldz,
  6297                                  float* work, lapack_int lwork );
  6298  lapack_int LAPACKE_dgghd3_work( int matrix_layout, char compq, char compz,
  6299                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6300                                  double* a, lapack_int lda,
  6301                                  double* b, lapack_int ldb,
  6302                                  double* q, lapack_int ldq,
  6303                                  double* z, lapack_int ldz,
  6304                                  double* work, lapack_int lwork );
  6305  lapack_int LAPACKE_cgghd3_work( int matrix_layout, char compq, char compz,
  6306                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6307                                  lapack_complex_float* a, lapack_int lda,
  6308                                  lapack_complex_float* b, lapack_int ldb,
  6309                                  lapack_complex_float* q, lapack_int ldq,
  6310                                  lapack_complex_float* z, lapack_int ldz,
  6311                                  lapack_complex_float* work, lapack_int lwork );
  6312  lapack_int LAPACKE_zgghd3_work( int matrix_layout, char compq, char compz,
  6313                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  6314                                  lapack_complex_double* a, lapack_int lda,
  6315                                  lapack_complex_double* b, lapack_int ldb,
  6316                                  lapack_complex_double* q, lapack_int ldq,
  6317                                  lapack_complex_double* z, lapack_int ldz,
  6318                                  lapack_complex_double* work,
  6319                                  lapack_int lwork );
  6320  
  6321  lapack_int LAPACKE_sgglse_work( int matrix_layout, lapack_int m, lapack_int n,
  6322                                  lapack_int p, float* a, lapack_int lda,
  6323                                  float* b, lapack_int ldb, float* c, float* d,
  6324                                  float* x, float* work, lapack_int lwork );
  6325  lapack_int LAPACKE_dgglse_work( int matrix_layout, lapack_int m, lapack_int n,
  6326                                  lapack_int p, double* a, lapack_int lda,
  6327                                  double* b, lapack_int ldb, double* c, double* d,
  6328                                  double* x, double* work, lapack_int lwork );
  6329  lapack_int LAPACKE_cgglse_work( int matrix_layout, lapack_int m, lapack_int n,
  6330                                  lapack_int p, lapack_complex_float* a,
  6331                                  lapack_int lda, lapack_complex_float* b,
  6332                                  lapack_int ldb, lapack_complex_float* c,
  6333                                  lapack_complex_float* d,
  6334                                  lapack_complex_float* x,
  6335                                  lapack_complex_float* work, lapack_int lwork );
  6336  lapack_int LAPACKE_zgglse_work( int matrix_layout, lapack_int m, lapack_int n,
  6337                                  lapack_int p, lapack_complex_double* a,
  6338                                  lapack_int lda, lapack_complex_double* b,
  6339                                  lapack_int ldb, lapack_complex_double* c,
  6340                                  lapack_complex_double* d,
  6341                                  lapack_complex_double* x,
  6342                                  lapack_complex_double* work, lapack_int lwork );
  6343  
  6344  lapack_int LAPACKE_sggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
  6345                                  lapack_int p, float* a, lapack_int lda,
  6346                                  float* taua, float* b, lapack_int ldb,
  6347                                  float* taub, float* work, lapack_int lwork );
  6348  lapack_int LAPACKE_dggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
  6349                                  lapack_int p, double* a, lapack_int lda,
  6350                                  double* taua, double* b, lapack_int ldb,
  6351                                  double* taub, double* work, lapack_int lwork );
  6352  lapack_int LAPACKE_cggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
  6353                                  lapack_int p, lapack_complex_float* a,
  6354                                  lapack_int lda, lapack_complex_float* taua,
  6355                                  lapack_complex_float* b, lapack_int ldb,
  6356                                  lapack_complex_float* taub,
  6357                                  lapack_complex_float* work, lapack_int lwork );
  6358  lapack_int LAPACKE_zggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
  6359                                  lapack_int p, lapack_complex_double* a,
  6360                                  lapack_int lda, lapack_complex_double* taua,
  6361                                  lapack_complex_double* b, lapack_int ldb,
  6362                                  lapack_complex_double* taub,
  6363                                  lapack_complex_double* work, lapack_int lwork );
  6364  
  6365  lapack_int LAPACKE_sggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
  6366                                  lapack_int n, float* a, lapack_int lda,
  6367                                  float* taua, float* b, lapack_int ldb,
  6368                                  float* taub, float* work, lapack_int lwork );
  6369  lapack_int LAPACKE_dggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
  6370                                  lapack_int n, double* a, lapack_int lda,
  6371                                  double* taua, double* b, lapack_int ldb,
  6372                                  double* taub, double* work, lapack_int lwork );
  6373  lapack_int LAPACKE_cggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
  6374                                  lapack_int n, lapack_complex_float* a,
  6375                                  lapack_int lda, lapack_complex_float* taua,
  6376                                  lapack_complex_float* b, lapack_int ldb,
  6377                                  lapack_complex_float* taub,
  6378                                  lapack_complex_float* work, lapack_int lwork );
  6379  lapack_int LAPACKE_zggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
  6380                                  lapack_int n, lapack_complex_double* a,
  6381                                  lapack_int lda, lapack_complex_double* taua,
  6382                                  lapack_complex_double* b, lapack_int ldb,
  6383                                  lapack_complex_double* taub,
  6384                                  lapack_complex_double* work, lapack_int lwork );
  6385  
  6386  lapack_int LAPACKE_sggsvd_work( int matrix_layout, char jobu, char jobv,
  6387                                  char jobq, lapack_int m, lapack_int n,
  6388                                  lapack_int p, lapack_int* k, lapack_int* l,
  6389                                  float* a, lapack_int lda, float* b,
  6390                                  lapack_int ldb, float* alpha, float* beta,
  6391                                  float* u, lapack_int ldu, float* v,
  6392                                  lapack_int ldv, float* q, lapack_int ldq,
  6393                                  float* work, lapack_int* iwork );
  6394  lapack_int LAPACKE_dggsvd_work( int matrix_layout, char jobu, char jobv,
  6395                                  char jobq, lapack_int m, lapack_int n,
  6396                                  lapack_int p, lapack_int* k, lapack_int* l,
  6397                                  double* a, lapack_int lda, double* b,
  6398                                  lapack_int ldb, double* alpha, double* beta,
  6399                                  double* u, lapack_int ldu, double* v,
  6400                                  lapack_int ldv, double* q, lapack_int ldq,
  6401                                  double* work, lapack_int* iwork );
  6402  lapack_int LAPACKE_cggsvd_work( int matrix_layout, char jobu, char jobv,
  6403                                  char jobq, lapack_int m, lapack_int n,
  6404                                  lapack_int p, lapack_int* k, lapack_int* l,
  6405                                  lapack_complex_float* a, lapack_int lda,
  6406                                  lapack_complex_float* b, lapack_int ldb,
  6407                                  float* alpha, float* beta,
  6408                                  lapack_complex_float* u, lapack_int ldu,
  6409                                  lapack_complex_float* v, lapack_int ldv,
  6410                                  lapack_complex_float* q, lapack_int ldq,
  6411                                  lapack_complex_float* work, float* rwork,
  6412                                  lapack_int* iwork );
  6413  lapack_int LAPACKE_zggsvd_work( int matrix_layout, char jobu, char jobv,
  6414                                  char jobq, lapack_int m, lapack_int n,
  6415                                  lapack_int p, lapack_int* k, lapack_int* l,
  6416                                  lapack_complex_double* a, lapack_int lda,
  6417                                  lapack_complex_double* b, lapack_int ldb,
  6418                                  double* alpha, double* beta,
  6419                                  lapack_complex_double* u, lapack_int ldu,
  6420                                  lapack_complex_double* v, lapack_int ldv,
  6421                                  lapack_complex_double* q, lapack_int ldq,
  6422                                  lapack_complex_double* work, double* rwork,
  6423                                  lapack_int* iwork );
  6424  
  6425  lapack_int LAPACKE_sggsvd3_work( int matrix_layout, char jobu, char jobv,
  6426                                   char jobq, lapack_int m, lapack_int n,
  6427                                   lapack_int p, lapack_int* k, lapack_int* l,
  6428                                   float* a, lapack_int lda, float* b,
  6429                                   lapack_int ldb, float* alpha, float* beta,
  6430                                   float* u, lapack_int ldu, float* v,
  6431                                   lapack_int ldv, float* q, lapack_int ldq,
  6432                                   float* work, lapack_int lwork,
  6433                                   lapack_int* iwork );
  6434  lapack_int LAPACKE_dggsvd3_work( int matrix_layout, char jobu, char jobv,
  6435                                   char jobq, lapack_int m, lapack_int n,
  6436                                   lapack_int p, lapack_int* k, lapack_int* l,
  6437                                   double* a, lapack_int lda, double* b,
  6438                                   lapack_int ldb, double* alpha, double* beta,
  6439                                   double* u, lapack_int ldu, double* v,
  6440                                   lapack_int ldv, double* q, lapack_int ldq,
  6441                                   double* work, lapack_int lwork,
  6442                                   lapack_int* iwork );
  6443  lapack_int LAPACKE_cggsvd3_work( int matrix_layout, char jobu, char jobv,
  6444                                   char jobq, lapack_int m, lapack_int n,
  6445                                   lapack_int p, lapack_int* k, lapack_int* l,
  6446                                   lapack_complex_float* a, lapack_int lda,
  6447                                   lapack_complex_float* b, lapack_int ldb,
  6448                                   float* alpha, float* beta,
  6449                                   lapack_complex_float* u, lapack_int ldu,
  6450                                   lapack_complex_float* v, lapack_int ldv,
  6451                                   lapack_complex_float* q, lapack_int ldq,
  6452                                   lapack_complex_float* work, lapack_int lwork,
  6453                                   float* rwork, lapack_int* iwork );
  6454  lapack_int LAPACKE_zggsvd3_work( int matrix_layout, char jobu, char jobv,
  6455                                   char jobq, lapack_int m, lapack_int n,
  6456                                   lapack_int p, lapack_int* k, lapack_int* l,
  6457                                   lapack_complex_double* a, lapack_int lda,
  6458                                   lapack_complex_double* b, lapack_int ldb,
  6459                                   double* alpha, double* beta,
  6460                                   lapack_complex_double* u, lapack_int ldu,
  6461                                   lapack_complex_double* v, lapack_int ldv,
  6462                                   lapack_complex_double* q, lapack_int ldq,
  6463                                   lapack_complex_double* work, lapack_int lwork,
  6464                                   double* rwork, lapack_int* iwork );
  6465  
  6466  lapack_int LAPACKE_sggsvp_work( int matrix_layout, char jobu, char jobv,
  6467                                  char jobq, lapack_int m, lapack_int p,
  6468                                  lapack_int n, float* a, lapack_int lda,
  6469                                  float* b, lapack_int ldb, float tola,
  6470                                  float tolb, lapack_int* k, lapack_int* l,
  6471                                  float* u, lapack_int ldu, float* v,
  6472                                  lapack_int ldv, float* q, lapack_int ldq,
  6473                                  lapack_int* iwork, float* tau, float* work );
  6474  lapack_int LAPACKE_dggsvp_work( int matrix_layout, char jobu, char jobv,
  6475                                  char jobq, lapack_int m, lapack_int p,
  6476                                  lapack_int n, double* a, lapack_int lda,
  6477                                  double* b, lapack_int ldb, double tola,
  6478                                  double tolb, lapack_int* k, lapack_int* l,
  6479                                  double* u, lapack_int ldu, double* v,
  6480                                  lapack_int ldv, double* q, lapack_int ldq,
  6481                                  lapack_int* iwork, double* tau, double* work );
  6482  lapack_int LAPACKE_cggsvp_work( int matrix_layout, char jobu, char jobv,
  6483                                  char jobq, lapack_int m, lapack_int p,
  6484                                  lapack_int n, lapack_complex_float* a,
  6485                                  lapack_int lda, lapack_complex_float* b,
  6486                                  lapack_int ldb, float tola, float tolb,
  6487                                  lapack_int* k, lapack_int* l,
  6488                                  lapack_complex_float* u, lapack_int ldu,
  6489                                  lapack_complex_float* v, lapack_int ldv,
  6490                                  lapack_complex_float* q, lapack_int ldq,
  6491                                  lapack_int* iwork, float* rwork,
  6492                                  lapack_complex_float* tau,
  6493                                  lapack_complex_float* work );
  6494  lapack_int LAPACKE_zggsvp_work( int matrix_layout, char jobu, char jobv,
  6495                                  char jobq, lapack_int m, lapack_int p,
  6496                                  lapack_int n, lapack_complex_double* a,
  6497                                  lapack_int lda, lapack_complex_double* b,
  6498                                  lapack_int ldb, double tola, double tolb,
  6499                                  lapack_int* k, lapack_int* l,
  6500                                  lapack_complex_double* u, lapack_int ldu,
  6501                                  lapack_complex_double* v, lapack_int ldv,
  6502                                  lapack_complex_double* q, lapack_int ldq,
  6503                                  lapack_int* iwork, double* rwork,
  6504                                  lapack_complex_double* tau,
  6505                                  lapack_complex_double* work );
  6506  
  6507  lapack_int LAPACKE_sggsvp3_work( int matrix_layout, char jobu, char jobv,
  6508                                   char jobq, lapack_int m, lapack_int p,
  6509                                   lapack_int n, float* a, lapack_int lda,
  6510                                   float* b, lapack_int ldb, float tola,
  6511                                   float tolb, lapack_int* k, lapack_int* l,
  6512                                   float* u, lapack_int ldu, float* v,
  6513                                   lapack_int ldv, float* q, lapack_int ldq,
  6514                                   lapack_int* iwork, float* tau,
  6515                                   float* work, lapack_int lwork );
  6516  lapack_int LAPACKE_dggsvp3_work( int matrix_layout, char jobu, char jobv,
  6517                                   char jobq, lapack_int m, lapack_int p,
  6518                                   lapack_int n, double* a, lapack_int lda,
  6519                                   double* b, lapack_int ldb, double tola,
  6520                                   double tolb, lapack_int* k, lapack_int* l,
  6521                                   double* u, lapack_int ldu, double* v,
  6522                                   lapack_int ldv, double* q, lapack_int ldq,
  6523                                   lapack_int* iwork, double* tau, double* work,
  6524                                   lapack_int lwork );
  6525  lapack_int LAPACKE_cggsvp3_work( int matrix_layout, char jobu, char jobv,
  6526                                   char jobq, lapack_int m, lapack_int p,
  6527                                   lapack_int n, lapack_complex_float* a,
  6528                                   lapack_int lda, lapack_complex_float* b,
  6529                                   lapack_int ldb, float tola, float tolb,
  6530                                   lapack_int* k, lapack_int* l,
  6531                                   lapack_complex_float* u, lapack_int ldu,
  6532                                   lapack_complex_float* v, lapack_int ldv,
  6533                                   lapack_complex_float* q, lapack_int ldq,
  6534                                   lapack_int* iwork, float* rwork,
  6535                                   lapack_complex_float* tau,
  6536                                   lapack_complex_float* work, lapack_int lwork );
  6537  lapack_int LAPACKE_zggsvp3_work( int matrix_layout, char jobu, char jobv,
  6538                                   char jobq, lapack_int m, lapack_int p,
  6539                                   lapack_int n, lapack_complex_double* a,
  6540                                   lapack_int lda, lapack_complex_double* b,
  6541                                   lapack_int ldb, double tola, double tolb,
  6542                                   lapack_int* k, lapack_int* l,
  6543                                   lapack_complex_double* u, lapack_int ldu,
  6544                                   lapack_complex_double* v, lapack_int ldv,
  6545                                   lapack_complex_double* q, lapack_int ldq,
  6546                                   lapack_int* iwork, double* rwork,
  6547                                   lapack_complex_double* tau,
  6548                                   lapack_complex_double* work, lapack_int lwork );
  6549  
  6550  lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
  6551                                  const float* d, const float* du,
  6552                                  const float* du2, const lapack_int* ipiv,
  6553                                  float anorm, float* rcond, float* work,
  6554                                  lapack_int* iwork );
  6555  lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
  6556                                  const double* d, const double* du,
  6557                                  const double* du2, const lapack_int* ipiv,
  6558                                  double anorm, double* rcond, double* work,
  6559                                  lapack_int* iwork );
  6560  lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
  6561                                  const lapack_complex_float* dl,
  6562                                  const lapack_complex_float* d,
  6563                                  const lapack_complex_float* du,
  6564                                  const lapack_complex_float* du2,
  6565                                  const lapack_int* ipiv, float anorm,
  6566                                  float* rcond, lapack_complex_float* work );
  6567  lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
  6568                                  const lapack_complex_double* dl,
  6569                                  const lapack_complex_double* d,
  6570                                  const lapack_complex_double* du,
  6571                                  const lapack_complex_double* du2,
  6572                                  const lapack_int* ipiv, double anorm,
  6573                                  double* rcond, lapack_complex_double* work );
  6574  
  6575  lapack_int LAPACKE_sgtrfs_work( int matrix_layout, char trans, lapack_int n,
  6576                                  lapack_int nrhs, const float* dl,
  6577                                  const float* d, const float* du,
  6578                                  const float* dlf, const float* df,
  6579                                  const float* duf, const float* du2,
  6580                                  const lapack_int* ipiv, const float* b,
  6581                                  lapack_int ldb, float* x, lapack_int ldx,
  6582                                  float* ferr, float* berr, float* work,
  6583                                  lapack_int* iwork );
  6584  lapack_int LAPACKE_dgtrfs_work( int matrix_layout, char trans, lapack_int n,
  6585                                  lapack_int nrhs, const double* dl,
  6586                                  const double* d, const double* du,
  6587                                  const double* dlf, const double* df,
  6588                                  const double* duf, const double* du2,
  6589                                  const lapack_int* ipiv, const double* b,
  6590                                  lapack_int ldb, double* x, lapack_int ldx,
  6591                                  double* ferr, double* berr, double* work,
  6592                                  lapack_int* iwork );
  6593  lapack_int LAPACKE_cgtrfs_work( int matrix_layout, char trans, lapack_int n,
  6594                                  lapack_int nrhs, const lapack_complex_float* dl,
  6595                                  const lapack_complex_float* d,
  6596                                  const lapack_complex_float* du,
  6597                                  const lapack_complex_float* dlf,
  6598                                  const lapack_complex_float* df,
  6599                                  const lapack_complex_float* duf,
  6600                                  const lapack_complex_float* du2,
  6601                                  const lapack_int* ipiv,
  6602                                  const lapack_complex_float* b, lapack_int ldb,
  6603                                  lapack_complex_float* x, lapack_int ldx,
  6604                                  float* ferr, float* berr,
  6605                                  lapack_complex_float* work, float* rwork );
  6606  lapack_int LAPACKE_zgtrfs_work( int matrix_layout, char trans, lapack_int n,
  6607                                  lapack_int nrhs,
  6608                                  const lapack_complex_double* dl,
  6609                                  const lapack_complex_double* d,
  6610                                  const lapack_complex_double* du,
  6611                                  const lapack_complex_double* dlf,
  6612                                  const lapack_complex_double* df,
  6613                                  const lapack_complex_double* duf,
  6614                                  const lapack_complex_double* du2,
  6615                                  const lapack_int* ipiv,
  6616                                  const lapack_complex_double* b, lapack_int ldb,
  6617                                  lapack_complex_double* x, lapack_int ldx,
  6618                                  double* ferr, double* berr,
  6619                                  lapack_complex_double* work, double* rwork );
  6620  
  6621  lapack_int LAPACKE_sgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  6622                                 float* dl, float* d, float* du, float* b,
  6623                                 lapack_int ldb );
  6624  lapack_int LAPACKE_dgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  6625                                 double* dl, double* d, double* du, double* b,
  6626                                 lapack_int ldb );
  6627  lapack_int LAPACKE_cgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  6628                                 lapack_complex_float* dl,
  6629                                 lapack_complex_float* d,
  6630                                 lapack_complex_float* du,
  6631                                 lapack_complex_float* b, lapack_int ldb );
  6632  lapack_int LAPACKE_zgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  6633                                 lapack_complex_double* dl,
  6634                                 lapack_complex_double* d,
  6635                                 lapack_complex_double* du,
  6636                                 lapack_complex_double* b, lapack_int ldb );
  6637  
  6638  lapack_int LAPACKE_sgtsvx_work( int matrix_layout, char fact, char trans,
  6639                                  lapack_int n, lapack_int nrhs, const float* dl,
  6640                                  const float* d, const float* du, float* dlf,
  6641                                  float* df, float* duf, float* du2,
  6642                                  lapack_int* ipiv, const float* b,
  6643                                  lapack_int ldb, float* x, lapack_int ldx,
  6644                                  float* rcond, float* ferr, float* berr,
  6645                                  float* work, lapack_int* iwork );
  6646  lapack_int LAPACKE_dgtsvx_work( int matrix_layout, char fact, char trans,
  6647                                  lapack_int n, lapack_int nrhs, const double* dl,
  6648                                  const double* d, const double* du, double* dlf,
  6649                                  double* df, double* duf, double* du2,
  6650                                  lapack_int* ipiv, const double* b,
  6651                                  lapack_int ldb, double* x, lapack_int ldx,
  6652                                  double* rcond, double* ferr, double* berr,
  6653                                  double* work, lapack_int* iwork );
  6654  lapack_int LAPACKE_cgtsvx_work( int matrix_layout, char fact, char trans,
  6655                                  lapack_int n, lapack_int nrhs,
  6656                                  const lapack_complex_float* dl,
  6657                                  const lapack_complex_float* d,
  6658                                  const lapack_complex_float* du,
  6659                                  lapack_complex_float* dlf,
  6660                                  lapack_complex_float* df,
  6661                                  lapack_complex_float* duf,
  6662                                  lapack_complex_float* du2, lapack_int* ipiv,
  6663                                  const lapack_complex_float* b, lapack_int ldb,
  6664                                  lapack_complex_float* x, lapack_int ldx,
  6665                                  float* rcond, float* ferr, float* berr,
  6666                                  lapack_complex_float* work, float* rwork );
  6667  lapack_int LAPACKE_zgtsvx_work( int matrix_layout, char fact, char trans,
  6668                                  lapack_int n, lapack_int nrhs,
  6669                                  const lapack_complex_double* dl,
  6670                                  const lapack_complex_double* d,
  6671                                  const lapack_complex_double* du,
  6672                                  lapack_complex_double* dlf,
  6673                                  lapack_complex_double* df,
  6674                                  lapack_complex_double* duf,
  6675                                  lapack_complex_double* du2, lapack_int* ipiv,
  6676                                  const lapack_complex_double* b, lapack_int ldb,
  6677                                  lapack_complex_double* x, lapack_int ldx,
  6678                                  double* rcond, double* ferr, double* berr,
  6679                                  lapack_complex_double* work, double* rwork );
  6680  
  6681  lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
  6682                                  float* du2, lapack_int* ipiv );
  6683  lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
  6684                                  double* du2, lapack_int* ipiv );
  6685  lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
  6686                                  lapack_complex_float* d,
  6687                                  lapack_complex_float* du,
  6688                                  lapack_complex_float* du2, lapack_int* ipiv );
  6689  lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
  6690                                  lapack_complex_double* d,
  6691                                  lapack_complex_double* du,
  6692                                  lapack_complex_double* du2, lapack_int* ipiv );
  6693  
  6694  lapack_int LAPACKE_sgttrs_work( int matrix_layout, char trans, lapack_int n,
  6695                                  lapack_int nrhs, const float* dl,
  6696                                  const float* d, const float* du,
  6697                                  const float* du2, const lapack_int* ipiv,
  6698                                  float* b, lapack_int ldb );
  6699  lapack_int LAPACKE_dgttrs_work( int matrix_layout, char trans, lapack_int n,
  6700                                  lapack_int nrhs, const double* dl,
  6701                                  const double* d, const double* du,
  6702                                  const double* du2, const lapack_int* ipiv,
  6703                                  double* b, lapack_int ldb );
  6704  lapack_int LAPACKE_cgttrs_work( int matrix_layout, char trans, lapack_int n,
  6705                                  lapack_int nrhs, const lapack_complex_float* dl,
  6706                                  const lapack_complex_float* d,
  6707                                  const lapack_complex_float* du,
  6708                                  const lapack_complex_float* du2,
  6709                                  const lapack_int* ipiv, lapack_complex_float* b,
  6710                                  lapack_int ldb );
  6711  lapack_int LAPACKE_zgttrs_work( int matrix_layout, char trans, lapack_int n,
  6712                                  lapack_int nrhs,
  6713                                  const lapack_complex_double* dl,
  6714                                  const lapack_complex_double* d,
  6715                                  const lapack_complex_double* du,
  6716                                  const lapack_complex_double* du2,
  6717                                  const lapack_int* ipiv,
  6718                                  lapack_complex_double* b, lapack_int ldb );
  6719  
  6720  lapack_int LAPACKE_chbev_work( int matrix_layout, char jobz, char uplo,
  6721                                 lapack_int n, lapack_int kd,
  6722                                 lapack_complex_float* ab, lapack_int ldab,
  6723                                 float* w, lapack_complex_float* z,
  6724                                 lapack_int ldz, lapack_complex_float* work,
  6725                                 float* rwork );
  6726  lapack_int LAPACKE_zhbev_work( int matrix_layout, char jobz, char uplo,
  6727                                 lapack_int n, lapack_int kd,
  6728                                 lapack_complex_double* ab, lapack_int ldab,
  6729                                 double* w, lapack_complex_double* z,
  6730                                 lapack_int ldz, lapack_complex_double* work,
  6731                                 double* rwork );
  6732  
  6733  lapack_int LAPACKE_chbevd_work( int matrix_layout, char jobz, char uplo,
  6734                                  lapack_int n, lapack_int kd,
  6735                                  lapack_complex_float* ab, lapack_int ldab,
  6736                                  float* w, lapack_complex_float* z,
  6737                                  lapack_int ldz, lapack_complex_float* work,
  6738                                  lapack_int lwork, float* rwork,
  6739                                  lapack_int lrwork, lapack_int* iwork,
  6740                                  lapack_int liwork );
  6741  lapack_int LAPACKE_zhbevd_work( int matrix_layout, char jobz, char uplo,
  6742                                  lapack_int n, lapack_int kd,
  6743                                  lapack_complex_double* ab, lapack_int ldab,
  6744                                  double* w, lapack_complex_double* z,
  6745                                  lapack_int ldz, lapack_complex_double* work,
  6746                                  lapack_int lwork, double* rwork,
  6747                                  lapack_int lrwork, lapack_int* iwork,
  6748                                  lapack_int liwork );
  6749  
  6750  lapack_int LAPACKE_chbevx_work( int matrix_layout, char jobz, char range,
  6751                                  char uplo, lapack_int n, lapack_int kd,
  6752                                  lapack_complex_float* ab, lapack_int ldab,
  6753                                  lapack_complex_float* q, lapack_int ldq,
  6754                                  float vl, float vu, lapack_int il,
  6755                                  lapack_int iu, float abstol, lapack_int* m,
  6756                                  float* w, lapack_complex_float* z,
  6757                                  lapack_int ldz, lapack_complex_float* work,
  6758                                  float* rwork, lapack_int* iwork,
  6759                                  lapack_int* ifail );
  6760  lapack_int LAPACKE_zhbevx_work( int matrix_layout, char jobz, char range,
  6761                                  char uplo, lapack_int n, lapack_int kd,
  6762                                  lapack_complex_double* ab, lapack_int ldab,
  6763                                  lapack_complex_double* q, lapack_int ldq,
  6764                                  double vl, double vu, lapack_int il,
  6765                                  lapack_int iu, double abstol, lapack_int* m,
  6766                                  double* w, lapack_complex_double* z,
  6767                                  lapack_int ldz, lapack_complex_double* work,
  6768                                  double* rwork, lapack_int* iwork,
  6769                                  lapack_int* ifail );
  6770  
  6771  lapack_int LAPACKE_chbgst_work( int matrix_layout, char vect, char uplo,
  6772                                  lapack_int n, lapack_int ka, lapack_int kb,
  6773                                  lapack_complex_float* ab, lapack_int ldab,
  6774                                  const lapack_complex_float* bb, lapack_int ldbb,
  6775                                  lapack_complex_float* x, lapack_int ldx,
  6776                                  lapack_complex_float* work, float* rwork );
  6777  lapack_int LAPACKE_zhbgst_work( int matrix_layout, char vect, char uplo,
  6778                                  lapack_int n, lapack_int ka, lapack_int kb,
  6779                                  lapack_complex_double* ab, lapack_int ldab,
  6780                                  const lapack_complex_double* bb,
  6781                                  lapack_int ldbb, lapack_complex_double* x,
  6782                                  lapack_int ldx, lapack_complex_double* work,
  6783                                  double* rwork );
  6784  
  6785  lapack_int LAPACKE_chbgv_work( int matrix_layout, char jobz, char uplo,
  6786                                 lapack_int n, lapack_int ka, lapack_int kb,
  6787                                 lapack_complex_float* ab, lapack_int ldab,
  6788                                 lapack_complex_float* bb, lapack_int ldbb,
  6789                                 float* w, lapack_complex_float* z,
  6790                                 lapack_int ldz, lapack_complex_float* work,
  6791                                 float* rwork );
  6792  lapack_int LAPACKE_zhbgv_work( int matrix_layout, char jobz, char uplo,
  6793                                 lapack_int n, lapack_int ka, lapack_int kb,
  6794                                 lapack_complex_double* ab, lapack_int ldab,
  6795                                 lapack_complex_double* bb, lapack_int ldbb,
  6796                                 double* w, lapack_complex_double* z,
  6797                                 lapack_int ldz, lapack_complex_double* work,
  6798                                 double* rwork );
  6799  
  6800  lapack_int LAPACKE_chbgvd_work( int matrix_layout, char jobz, char uplo,
  6801                                  lapack_int n, lapack_int ka, lapack_int kb,
  6802                                  lapack_complex_float* ab, lapack_int ldab,
  6803                                  lapack_complex_float* bb, lapack_int ldbb,
  6804                                  float* w, lapack_complex_float* z,
  6805                                  lapack_int ldz, lapack_complex_float* work,
  6806                                  lapack_int lwork, float* rwork,
  6807                                  lapack_int lrwork, lapack_int* iwork,
  6808                                  lapack_int liwork );
  6809  lapack_int LAPACKE_zhbgvd_work( int matrix_layout, char jobz, char uplo,
  6810                                  lapack_int n, lapack_int ka, lapack_int kb,
  6811                                  lapack_complex_double* ab, lapack_int ldab,
  6812                                  lapack_complex_double* bb, lapack_int ldbb,
  6813                                  double* w, lapack_complex_double* z,
  6814                                  lapack_int ldz, lapack_complex_double* work,
  6815                                  lapack_int lwork, double* rwork,
  6816                                  lapack_int lrwork, lapack_int* iwork,
  6817                                  lapack_int liwork );
  6818  
  6819  lapack_int LAPACKE_chbgvx_work( int matrix_layout, char jobz, char range,
  6820                                  char uplo, lapack_int n, lapack_int ka,
  6821                                  lapack_int kb, lapack_complex_float* ab,
  6822                                  lapack_int ldab, lapack_complex_float* bb,
  6823                                  lapack_int ldbb, lapack_complex_float* q,
  6824                                  lapack_int ldq, float vl, float vu,
  6825                                  lapack_int il, lapack_int iu, float abstol,
  6826                                  lapack_int* m, float* w,
  6827                                  lapack_complex_float* z, lapack_int ldz,
  6828                                  lapack_complex_float* work, float* rwork,
  6829                                  lapack_int* iwork, lapack_int* ifail );
  6830  lapack_int LAPACKE_zhbgvx_work( int matrix_layout, char jobz, char range,
  6831                                  char uplo, lapack_int n, lapack_int ka,
  6832                                  lapack_int kb, lapack_complex_double* ab,
  6833                                  lapack_int ldab, lapack_complex_double* bb,
  6834                                  lapack_int ldbb, lapack_complex_double* q,
  6835                                  lapack_int ldq, double vl, double vu,
  6836                                  lapack_int il, lapack_int iu, double abstol,
  6837                                  lapack_int* m, double* w,
  6838                                  lapack_complex_double* z, lapack_int ldz,
  6839                                  lapack_complex_double* work, double* rwork,
  6840                                  lapack_int* iwork, lapack_int* ifail );
  6841  
  6842  lapack_int LAPACKE_chbtrd_work( int matrix_layout, char vect, char uplo,
  6843                                  lapack_int n, lapack_int kd,
  6844                                  lapack_complex_float* ab, lapack_int ldab,
  6845                                  float* d, float* e, lapack_complex_float* q,
  6846                                  lapack_int ldq, lapack_complex_float* work );
  6847  lapack_int LAPACKE_zhbtrd_work( int matrix_layout, char vect, char uplo,
  6848                                  lapack_int n, lapack_int kd,
  6849                                  lapack_complex_double* ab, lapack_int ldab,
  6850                                  double* d, double* e, lapack_complex_double* q,
  6851                                  lapack_int ldq, lapack_complex_double* work );
  6852  
  6853  lapack_int LAPACKE_checon_work( int matrix_layout, char uplo, lapack_int n,
  6854                                  const lapack_complex_float* a, lapack_int lda,
  6855                                  const lapack_int* ipiv, float anorm,
  6856                                  float* rcond, lapack_complex_float* work );
  6857  lapack_int LAPACKE_zhecon_work( int matrix_layout, char uplo, lapack_int n,
  6858                                  const lapack_complex_double* a, lapack_int lda,
  6859                                  const lapack_int* ipiv, double anorm,
  6860                                  double* rcond, lapack_complex_double* work );
  6861  
  6862  lapack_int LAPACKE_cheequb_work( int matrix_layout, char uplo, lapack_int n,
  6863                                   const lapack_complex_float* a, lapack_int lda,
  6864                                   float* s, float* scond, float* amax,
  6865                                   lapack_complex_float* work );
  6866  lapack_int LAPACKE_zheequb_work( int matrix_layout, char uplo, lapack_int n,
  6867                                   const lapack_complex_double* a, lapack_int lda,
  6868                                   double* s, double* scond, double* amax,
  6869                                   lapack_complex_double* work );
  6870  
  6871  lapack_int LAPACKE_cheev_work( int matrix_layout, char jobz, char uplo,
  6872                                 lapack_int n, lapack_complex_float* a,
  6873                                 lapack_int lda, float* w,
  6874                                 lapack_complex_float* work, lapack_int lwork,
  6875                                 float* rwork );
  6876  lapack_int LAPACKE_zheev_work( int matrix_layout, char jobz, char uplo,
  6877                                 lapack_int n, lapack_complex_double* a,
  6878                                 lapack_int lda, double* w,
  6879                                 lapack_complex_double* work, lapack_int lwork,
  6880                                 double* rwork );
  6881  
  6882  lapack_int LAPACKE_cheevd_work( int matrix_layout, char jobz, char uplo,
  6883                                  lapack_int n, lapack_complex_float* a,
  6884                                  lapack_int lda, float* w,
  6885                                  lapack_complex_float* work, lapack_int lwork,
  6886                                  float* rwork, lapack_int lrwork,
  6887                                  lapack_int* iwork, lapack_int liwork );
  6888  lapack_int LAPACKE_zheevd_work( int matrix_layout, char jobz, char uplo,
  6889                                  lapack_int n, lapack_complex_double* a,
  6890                                  lapack_int lda, double* w,
  6891                                  lapack_complex_double* work, lapack_int lwork,
  6892                                  double* rwork, lapack_int lrwork,
  6893                                  lapack_int* iwork, lapack_int liwork );
  6894  
  6895  lapack_int LAPACKE_cheevr_work( int matrix_layout, char jobz, char range,
  6896                                  char uplo, lapack_int n,
  6897                                  lapack_complex_float* a, lapack_int lda,
  6898                                  float vl, float vu, lapack_int il,
  6899                                  lapack_int iu, float abstol, lapack_int* m,
  6900                                  float* w, lapack_complex_float* z,
  6901                                  lapack_int ldz, lapack_int* isuppz,
  6902                                  lapack_complex_float* work, lapack_int lwork,
  6903                                  float* rwork, lapack_int lrwork,
  6904                                  lapack_int* iwork, lapack_int liwork );
  6905  lapack_int LAPACKE_zheevr_work( int matrix_layout, char jobz, char range,
  6906                                  char uplo, lapack_int n,
  6907                                  lapack_complex_double* a, lapack_int lda,
  6908                                  double vl, double vu, lapack_int il,
  6909                                  lapack_int iu, double abstol, lapack_int* m,
  6910                                  double* w, lapack_complex_double* z,
  6911                                  lapack_int ldz, lapack_int* isuppz,
  6912                                  lapack_complex_double* work, lapack_int lwork,
  6913                                  double* rwork, lapack_int lrwork,
  6914                                  lapack_int* iwork, lapack_int liwork );
  6915  
  6916  lapack_int LAPACKE_cheevx_work( int matrix_layout, char jobz, char range,
  6917                                  char uplo, lapack_int n,
  6918                                  lapack_complex_float* a, lapack_int lda,
  6919                                  float vl, float vu, lapack_int il,
  6920                                  lapack_int iu, float abstol, lapack_int* m,
  6921                                  float* w, lapack_complex_float* z,
  6922                                  lapack_int ldz, lapack_complex_float* work,
  6923                                  lapack_int lwork, float* rwork,
  6924                                  lapack_int* iwork, lapack_int* ifail );
  6925  lapack_int LAPACKE_zheevx_work( int matrix_layout, char jobz, char range,
  6926                                  char uplo, lapack_int n,
  6927                                  lapack_complex_double* a, lapack_int lda,
  6928                                  double vl, double vu, lapack_int il,
  6929                                  lapack_int iu, double abstol, lapack_int* m,
  6930                                  double* w, lapack_complex_double* z,
  6931                                  lapack_int ldz, lapack_complex_double* work,
  6932                                  lapack_int lwork, double* rwork,
  6933                                  lapack_int* iwork, lapack_int* ifail );
  6934  
  6935  lapack_int LAPACKE_chegst_work( int matrix_layout, lapack_int itype, char uplo,
  6936                                  lapack_int n, lapack_complex_float* a,
  6937                                  lapack_int lda, const lapack_complex_float* b,
  6938                                  lapack_int ldb );
  6939  lapack_int LAPACKE_zhegst_work( int matrix_layout, lapack_int itype, char uplo,
  6940                                  lapack_int n, lapack_complex_double* a,
  6941                                  lapack_int lda, const lapack_complex_double* b,
  6942                                  lapack_int ldb );
  6943  
  6944  lapack_int LAPACKE_chegv_work( int matrix_layout, lapack_int itype, char jobz,
  6945                                 char uplo, lapack_int n, lapack_complex_float* a,
  6946                                 lapack_int lda, lapack_complex_float* b,
  6947                                 lapack_int ldb, float* w,
  6948                                 lapack_complex_float* work, lapack_int lwork,
  6949                                 float* rwork );
  6950  lapack_int LAPACKE_zhegv_work( int matrix_layout, lapack_int itype, char jobz,
  6951                                 char uplo, lapack_int n,
  6952                                 lapack_complex_double* a, lapack_int lda,
  6953                                 lapack_complex_double* b, lapack_int ldb,
  6954                                 double* w, lapack_complex_double* work,
  6955                                 lapack_int lwork, double* rwork );
  6956  
  6957  lapack_int LAPACKE_chegvd_work( int matrix_layout, lapack_int itype, char jobz,
  6958                                  char uplo, lapack_int n,
  6959                                  lapack_complex_float* a, lapack_int lda,
  6960                                  lapack_complex_float* b, lapack_int ldb,
  6961                                  float* w, lapack_complex_float* work,
  6962                                  lapack_int lwork, float* rwork,
  6963                                  lapack_int lrwork, lapack_int* iwork,
  6964                                  lapack_int liwork );
  6965  lapack_int LAPACKE_zhegvd_work( int matrix_layout, lapack_int itype, char jobz,
  6966                                  char uplo, lapack_int n,
  6967                                  lapack_complex_double* a, lapack_int lda,
  6968                                  lapack_complex_double* b, lapack_int ldb,
  6969                                  double* w, lapack_complex_double* work,
  6970                                  lapack_int lwork, double* rwork,
  6971                                  lapack_int lrwork, lapack_int* iwork,
  6972                                  lapack_int liwork );
  6973  
  6974  lapack_int LAPACKE_chegvx_work( int matrix_layout, lapack_int itype, char jobz,
  6975                                  char range, char uplo, lapack_int n,
  6976                                  lapack_complex_float* a, lapack_int lda,
  6977                                  lapack_complex_float* b, lapack_int ldb,
  6978                                  float vl, float vu, lapack_int il,
  6979                                  lapack_int iu, float abstol, lapack_int* m,
  6980                                  float* w, lapack_complex_float* z,
  6981                                  lapack_int ldz, lapack_complex_float* work,
  6982                                  lapack_int lwork, float* rwork,
  6983                                  lapack_int* iwork, lapack_int* ifail );
  6984  lapack_int LAPACKE_zhegvx_work( int matrix_layout, lapack_int itype, char jobz,
  6985                                  char range, char uplo, lapack_int n,
  6986                                  lapack_complex_double* a, lapack_int lda,
  6987                                  lapack_complex_double* b, lapack_int ldb,
  6988                                  double vl, double vu, lapack_int il,
  6989                                  lapack_int iu, double abstol, lapack_int* m,
  6990                                  double* w, lapack_complex_double* z,
  6991                                  lapack_int ldz, lapack_complex_double* work,
  6992                                  lapack_int lwork, double* rwork,
  6993                                  lapack_int* iwork, lapack_int* ifail );
  6994  
  6995  lapack_int LAPACKE_cherfs_work( int matrix_layout, char uplo, lapack_int n,
  6996                                  lapack_int nrhs, const lapack_complex_float* a,
  6997                                  lapack_int lda, const lapack_complex_float* af,
  6998                                  lapack_int ldaf, const lapack_int* ipiv,
  6999                                  const lapack_complex_float* b, lapack_int ldb,
  7000                                  lapack_complex_float* x, lapack_int ldx,
  7001                                  float* ferr, float* berr,
  7002                                  lapack_complex_float* work, float* rwork );
  7003  lapack_int LAPACKE_zherfs_work( int matrix_layout, char uplo, lapack_int n,
  7004                                  lapack_int nrhs, const lapack_complex_double* a,
  7005                                  lapack_int lda, const lapack_complex_double* af,
  7006                                  lapack_int ldaf, const lapack_int* ipiv,
  7007                                  const lapack_complex_double* b, lapack_int ldb,
  7008                                  lapack_complex_double* x, lapack_int ldx,
  7009                                  double* ferr, double* berr,
  7010                                  lapack_complex_double* work, double* rwork );
  7011  
  7012  lapack_int LAPACKE_cherfsx_work( int matrix_layout, char uplo, char equed,
  7013                                   lapack_int n, lapack_int nrhs,
  7014                                   const lapack_complex_float* a, lapack_int lda,
  7015                                   const lapack_complex_float* af,
  7016                                   lapack_int ldaf, const lapack_int* ipiv,
  7017                                   const float* s, const lapack_complex_float* b,
  7018                                   lapack_int ldb, lapack_complex_float* x,
  7019                                   lapack_int ldx, float* rcond, float* berr,
  7020                                   lapack_int n_err_bnds, float* err_bnds_norm,
  7021                                   float* err_bnds_comp, lapack_int nparams,
  7022                                   float* params, lapack_complex_float* work,
  7023                                   float* rwork );
  7024  lapack_int LAPACKE_zherfsx_work( int matrix_layout, char uplo, char equed,
  7025                                   lapack_int n, lapack_int nrhs,
  7026                                   const lapack_complex_double* a, lapack_int lda,
  7027                                   const lapack_complex_double* af,
  7028                                   lapack_int ldaf, const lapack_int* ipiv,
  7029                                   const double* s,
  7030                                   const lapack_complex_double* b, lapack_int ldb,
  7031                                   lapack_complex_double* x, lapack_int ldx,
  7032                                   double* rcond, double* berr,
  7033                                   lapack_int n_err_bnds, double* err_bnds_norm,
  7034                                   double* err_bnds_comp, lapack_int nparams,
  7035                                   double* params, lapack_complex_double* work,
  7036                                   double* rwork );
  7037  
  7038  lapack_int LAPACKE_chesv_work( int matrix_layout, char uplo, lapack_int n,
  7039                                 lapack_int nrhs, lapack_complex_float* a,
  7040                                 lapack_int lda, lapack_int* ipiv,
  7041                                 lapack_complex_float* b, lapack_int ldb,
  7042                                 lapack_complex_float* work, lapack_int lwork );
  7043  lapack_int LAPACKE_zhesv_work( int matrix_layout, char uplo, lapack_int n,
  7044                                 lapack_int nrhs, lapack_complex_double* a,
  7045                                 lapack_int lda, lapack_int* ipiv,
  7046                                 lapack_complex_double* b, lapack_int ldb,
  7047                                 lapack_complex_double* work, lapack_int lwork );
  7048  
  7049  lapack_int LAPACKE_chesvx_work( int matrix_layout, char fact, char uplo,
  7050                                  lapack_int n, lapack_int nrhs,
  7051                                  const lapack_complex_float* a, lapack_int lda,
  7052                                  lapack_complex_float* af, lapack_int ldaf,
  7053                                  lapack_int* ipiv, const lapack_complex_float* b,
  7054                                  lapack_int ldb, lapack_complex_float* x,
  7055                                  lapack_int ldx, float* rcond, float* ferr,
  7056                                  float* berr, lapack_complex_float* work,
  7057                                  lapack_int lwork, float* rwork );
  7058  lapack_int LAPACKE_zhesvx_work( int matrix_layout, char fact, char uplo,
  7059                                  lapack_int n, lapack_int nrhs,
  7060                                  const lapack_complex_double* a, lapack_int lda,
  7061                                  lapack_complex_double* af, lapack_int ldaf,
  7062                                  lapack_int* ipiv,
  7063                                  const lapack_complex_double* b, lapack_int ldb,
  7064                                  lapack_complex_double* x, lapack_int ldx,
  7065                                  double* rcond, double* ferr, double* berr,
  7066                                  lapack_complex_double* work, lapack_int lwork,
  7067                                  double* rwork );
  7068  
  7069  lapack_int LAPACKE_chesvxx_work( int matrix_layout, char fact, char uplo,
  7070                                   lapack_int n, lapack_int nrhs,
  7071                                   lapack_complex_float* a, lapack_int lda,
  7072                                   lapack_complex_float* af, lapack_int ldaf,
  7073                                   lapack_int* ipiv, char* equed, float* s,
  7074                                   lapack_complex_float* b, lapack_int ldb,
  7075                                   lapack_complex_float* x, lapack_int ldx,
  7076                                   float* rcond, float* rpvgrw, float* berr,
  7077                                   lapack_int n_err_bnds, float* err_bnds_norm,
  7078                                   float* err_bnds_comp, lapack_int nparams,
  7079                                   float* params, lapack_complex_float* work,
  7080                                   float* rwork );
  7081  lapack_int LAPACKE_zhesvxx_work( int matrix_layout, char fact, char uplo,
  7082                                   lapack_int n, lapack_int nrhs,
  7083                                   lapack_complex_double* a, lapack_int lda,
  7084                                   lapack_complex_double* af, lapack_int ldaf,
  7085                                   lapack_int* ipiv, char* equed, double* s,
  7086                                   lapack_complex_double* b, lapack_int ldb,
  7087                                   lapack_complex_double* x, lapack_int ldx,
  7088                                   double* rcond, double* rpvgrw, double* berr,
  7089                                   lapack_int n_err_bnds, double* err_bnds_norm,
  7090                                   double* err_bnds_comp, lapack_int nparams,
  7091                                   double* params, lapack_complex_double* work,
  7092                                   double* rwork );
  7093  
  7094  lapack_int LAPACKE_chetrd_work( int matrix_layout, char uplo, lapack_int n,
  7095                                  lapack_complex_float* a, lapack_int lda,
  7096                                  float* d, float* e, lapack_complex_float* tau,
  7097                                  lapack_complex_float* work, lapack_int lwork );
  7098  lapack_int LAPACKE_zhetrd_work( int matrix_layout, char uplo, lapack_int n,
  7099                                  lapack_complex_double* a, lapack_int lda,
  7100                                  double* d, double* e,
  7101                                  lapack_complex_double* tau,
  7102                                  lapack_complex_double* work, lapack_int lwork );
  7103  
  7104  lapack_int LAPACKE_chetrf_work( int matrix_layout, char uplo, lapack_int n,
  7105                                  lapack_complex_float* a, lapack_int lda,
  7106                                  lapack_int* ipiv, lapack_complex_float* work,
  7107                                  lapack_int lwork );
  7108  lapack_int LAPACKE_zhetrf_work( int matrix_layout, char uplo, lapack_int n,
  7109                                  lapack_complex_double* a, lapack_int lda,
  7110                                  lapack_int* ipiv, lapack_complex_double* work,
  7111                                  lapack_int lwork );
  7112  
  7113  lapack_int LAPACKE_chetri_work( int matrix_layout, char uplo, lapack_int n,
  7114                                  lapack_complex_float* a, lapack_int lda,
  7115                                  const lapack_int* ipiv,
  7116                                  lapack_complex_float* work );
  7117  lapack_int LAPACKE_zhetri_work( int matrix_layout, char uplo, lapack_int n,
  7118                                  lapack_complex_double* a, lapack_int lda,
  7119                                  const lapack_int* ipiv,
  7120                                  lapack_complex_double* work );
  7121  
  7122  lapack_int LAPACKE_chetrs_work( int matrix_layout, char uplo, lapack_int n,
  7123                                  lapack_int nrhs, const lapack_complex_float* a,
  7124                                  lapack_int lda, const lapack_int* ipiv,
  7125                                  lapack_complex_float* b, lapack_int ldb );
  7126  lapack_int LAPACKE_zhetrs_work( int matrix_layout, char uplo, lapack_int n,
  7127                                  lapack_int nrhs, const lapack_complex_double* a,
  7128                                  lapack_int lda, const lapack_int* ipiv,
  7129                                  lapack_complex_double* b, lapack_int ldb );
  7130  
  7131  lapack_int LAPACKE_chfrk_work( int matrix_layout, char transr, char uplo,
  7132                                 char trans, lapack_int n, lapack_int k,
  7133                                 float alpha, const lapack_complex_float* a,
  7134                                 lapack_int lda, float beta,
  7135                                 lapack_complex_float* c );
  7136  lapack_int LAPACKE_zhfrk_work( int matrix_layout, char transr, char uplo,
  7137                                 char trans, lapack_int n, lapack_int k,
  7138                                 double alpha, const lapack_complex_double* a,
  7139                                 lapack_int lda, double beta,
  7140                                 lapack_complex_double* c );
  7141  
  7142  lapack_int LAPACKE_shgeqz_work( int matrix_layout, char job, char compq,
  7143                                  char compz, lapack_int n, lapack_int ilo,
  7144                                  lapack_int ihi, float* h, lapack_int ldh,
  7145                                  float* t, lapack_int ldt, float* alphar,
  7146                                  float* alphai, float* beta, float* q,
  7147                                  lapack_int ldq, float* z, lapack_int ldz,
  7148                                  float* work, lapack_int lwork );
  7149  lapack_int LAPACKE_dhgeqz_work( int matrix_layout, char job, char compq,
  7150                                  char compz, lapack_int n, lapack_int ilo,
  7151                                  lapack_int ihi, double* h, lapack_int ldh,
  7152                                  double* t, lapack_int ldt, double* alphar,
  7153                                  double* alphai, double* beta, double* q,
  7154                                  lapack_int ldq, double* z, lapack_int ldz,
  7155                                  double* work, lapack_int lwork );
  7156  lapack_int LAPACKE_chgeqz_work( int matrix_layout, char job, char compq,
  7157                                  char compz, lapack_int n, lapack_int ilo,
  7158                                  lapack_int ihi, lapack_complex_float* h,
  7159                                  lapack_int ldh, lapack_complex_float* t,
  7160                                  lapack_int ldt, lapack_complex_float* alpha,
  7161                                  lapack_complex_float* beta,
  7162                                  lapack_complex_float* q, lapack_int ldq,
  7163                                  lapack_complex_float* z, lapack_int ldz,
  7164                                  lapack_complex_float* work, lapack_int lwork,
  7165                                  float* rwork );
  7166  lapack_int LAPACKE_zhgeqz_work( int matrix_layout, char job, char compq,
  7167                                  char compz, lapack_int n, lapack_int ilo,
  7168                                  lapack_int ihi, lapack_complex_double* h,
  7169                                  lapack_int ldh, lapack_complex_double* t,
  7170                                  lapack_int ldt, lapack_complex_double* alpha,
  7171                                  lapack_complex_double* beta,
  7172                                  lapack_complex_double* q, lapack_int ldq,
  7173                                  lapack_complex_double* z, lapack_int ldz,
  7174                                  lapack_complex_double* work, lapack_int lwork,
  7175                                  double* rwork );
  7176  
  7177  lapack_int LAPACKE_chpcon_work( int matrix_layout, char uplo, lapack_int n,
  7178                                  const lapack_complex_float* ap,
  7179                                  const lapack_int* ipiv, float anorm,
  7180                                  float* rcond, lapack_complex_float* work );
  7181  lapack_int LAPACKE_zhpcon_work( int matrix_layout, char uplo, lapack_int n,
  7182                                  const lapack_complex_double* ap,
  7183                                  const lapack_int* ipiv, double anorm,
  7184                                  double* rcond, lapack_complex_double* work );
  7185  
  7186  lapack_int LAPACKE_chpev_work( int matrix_layout, char jobz, char uplo,
  7187                                 lapack_int n, lapack_complex_float* ap, float* w,
  7188                                 lapack_complex_float* z, lapack_int ldz,
  7189                                 lapack_complex_float* work, float* rwork );
  7190  lapack_int LAPACKE_zhpev_work( int matrix_layout, char jobz, char uplo,
  7191                                 lapack_int n, lapack_complex_double* ap,
  7192                                 double* w, lapack_complex_double* z,
  7193                                 lapack_int ldz, lapack_complex_double* work,
  7194                                 double* rwork );
  7195  
  7196  lapack_int LAPACKE_chpevd_work( int matrix_layout, char jobz, char uplo,
  7197                                  lapack_int n, lapack_complex_float* ap,
  7198                                  float* w, lapack_complex_float* z,
  7199                                  lapack_int ldz, lapack_complex_float* work,
  7200                                  lapack_int lwork, float* rwork,
  7201                                  lapack_int lrwork, lapack_int* iwork,
  7202                                  lapack_int liwork );
  7203  lapack_int LAPACKE_zhpevd_work( int matrix_layout, char jobz, char uplo,
  7204                                  lapack_int n, lapack_complex_double* ap,
  7205                                  double* w, lapack_complex_double* z,
  7206                                  lapack_int ldz, lapack_complex_double* work,
  7207                                  lapack_int lwork, double* rwork,
  7208                                  lapack_int lrwork, lapack_int* iwork,
  7209                                  lapack_int liwork );
  7210  
  7211  lapack_int LAPACKE_chpevx_work( int matrix_layout, char jobz, char range,
  7212                                  char uplo, lapack_int n,
  7213                                  lapack_complex_float* ap, float vl, float vu,
  7214                                  lapack_int il, lapack_int iu, float abstol,
  7215                                  lapack_int* m, float* w,
  7216                                  lapack_complex_float* z, lapack_int ldz,
  7217                                  lapack_complex_float* work, float* rwork,
  7218                                  lapack_int* iwork, lapack_int* ifail );
  7219  lapack_int LAPACKE_zhpevx_work( int matrix_layout, char jobz, char range,
  7220                                  char uplo, lapack_int n,
  7221                                  lapack_complex_double* ap, double vl, double vu,
  7222                                  lapack_int il, lapack_int iu, double abstol,
  7223                                  lapack_int* m, double* w,
  7224                                  lapack_complex_double* z, lapack_int ldz,
  7225                                  lapack_complex_double* work, double* rwork,
  7226                                  lapack_int* iwork, lapack_int* ifail );
  7227  
  7228  lapack_int LAPACKE_chpgst_work( int matrix_layout, lapack_int itype, char uplo,
  7229                                  lapack_int n, lapack_complex_float* ap,
  7230                                  const lapack_complex_float* bp );
  7231  lapack_int LAPACKE_zhpgst_work( int matrix_layout, lapack_int itype, char uplo,
  7232                                  lapack_int n, lapack_complex_double* ap,
  7233                                  const lapack_complex_double* bp );
  7234  
  7235  lapack_int LAPACKE_chpgv_work( int matrix_layout, lapack_int itype, char jobz,
  7236                                 char uplo, lapack_int n,
  7237                                 lapack_complex_float* ap,
  7238                                 lapack_complex_float* bp, float* w,
  7239                                 lapack_complex_float* z, lapack_int ldz,
  7240                                 lapack_complex_float* work, float* rwork );
  7241  lapack_int LAPACKE_zhpgv_work( int matrix_layout, lapack_int itype, char jobz,
  7242                                 char uplo, lapack_int n,
  7243                                 lapack_complex_double* ap,
  7244                                 lapack_complex_double* bp, double* w,
  7245                                 lapack_complex_double* z, lapack_int ldz,
  7246                                 lapack_complex_double* work, double* rwork );
  7247  
  7248  lapack_int LAPACKE_chpgvd_work( int matrix_layout, lapack_int itype, char jobz,
  7249                                  char uplo, lapack_int n,
  7250                                  lapack_complex_float* ap,
  7251                                  lapack_complex_float* bp, float* w,
  7252                                  lapack_complex_float* z, lapack_int ldz,
  7253                                  lapack_complex_float* work, lapack_int lwork,
  7254                                  float* rwork, lapack_int lrwork,
  7255                                  lapack_int* iwork, lapack_int liwork );
  7256  lapack_int LAPACKE_zhpgvd_work( int matrix_layout, lapack_int itype, char jobz,
  7257                                  char uplo, lapack_int n,
  7258                                  lapack_complex_double* ap,
  7259                                  lapack_complex_double* bp, double* w,
  7260                                  lapack_complex_double* z, lapack_int ldz,
  7261                                  lapack_complex_double* work, lapack_int lwork,
  7262                                  double* rwork, lapack_int lrwork,
  7263                                  lapack_int* iwork, lapack_int liwork );
  7264  
  7265  lapack_int LAPACKE_chpgvx_work( int matrix_layout, lapack_int itype, char jobz,
  7266                                  char range, char uplo, lapack_int n,
  7267                                  lapack_complex_float* ap,
  7268                                  lapack_complex_float* bp, float vl, float vu,
  7269                                  lapack_int il, lapack_int iu, float abstol,
  7270                                  lapack_int* m, float* w,
  7271                                  lapack_complex_float* z, lapack_int ldz,
  7272                                  lapack_complex_float* work, float* rwork,
  7273                                  lapack_int* iwork, lapack_int* ifail );
  7274  lapack_int LAPACKE_zhpgvx_work( int matrix_layout, lapack_int itype, char jobz,
  7275                                  char range, char uplo, lapack_int n,
  7276                                  lapack_complex_double* ap,
  7277                                  lapack_complex_double* bp, double vl, double vu,
  7278                                  lapack_int il, lapack_int iu, double abstol,
  7279                                  lapack_int* m, double* w,
  7280                                  lapack_complex_double* z, lapack_int ldz,
  7281                                  lapack_complex_double* work, double* rwork,
  7282                                  lapack_int* iwork, lapack_int* ifail );
  7283  
  7284  lapack_int LAPACKE_chprfs_work( int matrix_layout, char uplo, lapack_int n,
  7285                                  lapack_int nrhs, const lapack_complex_float* ap,
  7286                                  const lapack_complex_float* afp,
  7287                                  const lapack_int* ipiv,
  7288                                  const lapack_complex_float* b, lapack_int ldb,
  7289                                  lapack_complex_float* x, lapack_int ldx,
  7290                                  float* ferr, float* berr,
  7291                                  lapack_complex_float* work, float* rwork );
  7292  lapack_int LAPACKE_zhprfs_work( int matrix_layout, char uplo, lapack_int n,
  7293                                  lapack_int nrhs,
  7294                                  const lapack_complex_double* ap,
  7295                                  const lapack_complex_double* afp,
  7296                                  const lapack_int* ipiv,
  7297                                  const lapack_complex_double* b, lapack_int ldb,
  7298                                  lapack_complex_double* x, lapack_int ldx,
  7299                                  double* ferr, double* berr,
  7300                                  lapack_complex_double* work, double* rwork );
  7301  
  7302  lapack_int LAPACKE_chpsv_work( int matrix_layout, char uplo, lapack_int n,
  7303                                 lapack_int nrhs, lapack_complex_float* ap,
  7304                                 lapack_int* ipiv, lapack_complex_float* b,
  7305                                 lapack_int ldb );
  7306  lapack_int LAPACKE_zhpsv_work( int matrix_layout, char uplo, lapack_int n,
  7307                                 lapack_int nrhs, lapack_complex_double* ap,
  7308                                 lapack_int* ipiv, lapack_complex_double* b,
  7309                                 lapack_int ldb );
  7310  
  7311  lapack_int LAPACKE_chpsvx_work( int matrix_layout, char fact, char uplo,
  7312                                  lapack_int n, lapack_int nrhs,
  7313                                  const lapack_complex_float* ap,
  7314                                  lapack_complex_float* afp, lapack_int* ipiv,
  7315                                  const lapack_complex_float* b, lapack_int ldb,
  7316                                  lapack_complex_float* x, lapack_int ldx,
  7317                                  float* rcond, float* ferr, float* berr,
  7318                                  lapack_complex_float* work, float* rwork );
  7319  lapack_int LAPACKE_zhpsvx_work( int matrix_layout, char fact, char uplo,
  7320                                  lapack_int n, lapack_int nrhs,
  7321                                  const lapack_complex_double* ap,
  7322                                  lapack_complex_double* afp, lapack_int* ipiv,
  7323                                  const lapack_complex_double* b, lapack_int ldb,
  7324                                  lapack_complex_double* x, lapack_int ldx,
  7325                                  double* rcond, double* ferr, double* berr,
  7326                                  lapack_complex_double* work, double* rwork );
  7327  
  7328  lapack_int LAPACKE_chptrd_work( int matrix_layout, char uplo, lapack_int n,
  7329                                  lapack_complex_float* ap, float* d, float* e,
  7330                                  lapack_complex_float* tau );
  7331  lapack_int LAPACKE_zhptrd_work( int matrix_layout, char uplo, lapack_int n,
  7332                                  lapack_complex_double* ap, double* d, double* e,
  7333                                  lapack_complex_double* tau );
  7334  
  7335  lapack_int LAPACKE_chptrf_work( int matrix_layout, char uplo, lapack_int n,
  7336                                  lapack_complex_float* ap, lapack_int* ipiv );
  7337  lapack_int LAPACKE_zhptrf_work( int matrix_layout, char uplo, lapack_int n,
  7338                                  lapack_complex_double* ap, lapack_int* ipiv );
  7339  
  7340  lapack_int LAPACKE_chptri_work( int matrix_layout, char uplo, lapack_int n,
  7341                                  lapack_complex_float* ap,
  7342                                  const lapack_int* ipiv,
  7343                                  lapack_complex_float* work );
  7344  lapack_int LAPACKE_zhptri_work( int matrix_layout, char uplo, lapack_int n,
  7345                                  lapack_complex_double* ap,
  7346                                  const lapack_int* ipiv,
  7347                                  lapack_complex_double* work );
  7348  
  7349  lapack_int LAPACKE_chptrs_work( int matrix_layout, char uplo, lapack_int n,
  7350                                  lapack_int nrhs, const lapack_complex_float* ap,
  7351                                  const lapack_int* ipiv, lapack_complex_float* b,
  7352                                  lapack_int ldb );
  7353  lapack_int LAPACKE_zhptrs_work( int matrix_layout, char uplo, lapack_int n,
  7354                                  lapack_int nrhs,
  7355                                  const lapack_complex_double* ap,
  7356                                  const lapack_int* ipiv,
  7357                                  lapack_complex_double* b, lapack_int ldb );
  7358  
  7359  lapack_int LAPACKE_shsein_work( int matrix_layout, char job, char eigsrc,
  7360                                  char initv, lapack_logical* select,
  7361                                  lapack_int n, const float* h, lapack_int ldh,
  7362                                  float* wr, const float* wi, float* vl,
  7363                                  lapack_int ldvl, float* vr, lapack_int ldvr,
  7364                                  lapack_int mm, lapack_int* m, float* work,
  7365                                  lapack_int* ifaill, lapack_int* ifailr );
  7366  lapack_int LAPACKE_dhsein_work( int matrix_layout, char job, char eigsrc,
  7367                                  char initv, lapack_logical* select,
  7368                                  lapack_int n, const double* h, lapack_int ldh,
  7369                                  double* wr, const double* wi, double* vl,
  7370                                  lapack_int ldvl, double* vr, lapack_int ldvr,
  7371                                  lapack_int mm, lapack_int* m, double* work,
  7372                                  lapack_int* ifaill, lapack_int* ifailr );
  7373  lapack_int LAPACKE_chsein_work( int matrix_layout, char job, char eigsrc,
  7374                                  char initv, const lapack_logical* select,
  7375                                  lapack_int n, const lapack_complex_float* h,
  7376                                  lapack_int ldh, lapack_complex_float* w,
  7377                                  lapack_complex_float* vl, lapack_int ldvl,
  7378                                  lapack_complex_float* vr, lapack_int ldvr,
  7379                                  lapack_int mm, lapack_int* m,
  7380                                  lapack_complex_float* work, float* rwork,
  7381                                  lapack_int* ifaill, lapack_int* ifailr );
  7382  lapack_int LAPACKE_zhsein_work( int matrix_layout, char job, char eigsrc,
  7383                                  char initv, const lapack_logical* select,
  7384                                  lapack_int n, const lapack_complex_double* h,
  7385                                  lapack_int ldh, lapack_complex_double* w,
  7386                                  lapack_complex_double* vl, lapack_int ldvl,
  7387                                  lapack_complex_double* vr, lapack_int ldvr,
  7388                                  lapack_int mm, lapack_int* m,
  7389                                  lapack_complex_double* work, double* rwork,
  7390                                  lapack_int* ifaill, lapack_int* ifailr );
  7391  
  7392  lapack_int LAPACKE_shseqr_work( int matrix_layout, char job, char compz,
  7393                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  7394                                  float* h, lapack_int ldh, float* wr, float* wi,
  7395                                  float* z, lapack_int ldz, float* work,
  7396                                  lapack_int lwork );
  7397  lapack_int LAPACKE_dhseqr_work( int matrix_layout, char job, char compz,
  7398                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  7399                                  double* h, lapack_int ldh, double* wr,
  7400                                  double* wi, double* z, lapack_int ldz,
  7401                                  double* work, lapack_int lwork );
  7402  lapack_int LAPACKE_chseqr_work( int matrix_layout, char job, char compz,
  7403                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  7404                                  lapack_complex_float* h, lapack_int ldh,
  7405                                  lapack_complex_float* w,
  7406                                  lapack_complex_float* z, lapack_int ldz,
  7407                                  lapack_complex_float* work, lapack_int lwork );
  7408  lapack_int LAPACKE_zhseqr_work( int matrix_layout, char job, char compz,
  7409                                  lapack_int n, lapack_int ilo, lapack_int ihi,
  7410                                  lapack_complex_double* h, lapack_int ldh,
  7411                                  lapack_complex_double* w,
  7412                                  lapack_complex_double* z, lapack_int ldz,
  7413                                  lapack_complex_double* work, lapack_int lwork );
  7414  
  7415  lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
  7416                                  lapack_int incx );
  7417  lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
  7418                                  lapack_int incx );
  7419  
  7420  lapack_int LAPACKE_slacn2_work( lapack_int n, float* v, float* x,
  7421                                  lapack_int* isgn, float* est, lapack_int* kase,
  7422                                  lapack_int* isave );
  7423  lapack_int LAPACKE_dlacn2_work( lapack_int n, double* v, double* x,
  7424                                  lapack_int* isgn, double* est, lapack_int* kase,
  7425                                  lapack_int* isave );
  7426  lapack_int LAPACKE_clacn2_work( lapack_int n, lapack_complex_float* v,
  7427                                  lapack_complex_float* x,
  7428                                  float* est, lapack_int* kase,
  7429                                  lapack_int* isave );
  7430  lapack_int LAPACKE_zlacn2_work( lapack_int n, lapack_complex_double* v,
  7431                                  lapack_complex_double* x,
  7432                                  double* est, lapack_int* kase,
  7433                                  lapack_int* isave );
  7434  
  7435  lapack_int LAPACKE_slacpy_work( int matrix_layout, char uplo, lapack_int m,
  7436                                  lapack_int n, const float* a, lapack_int lda,
  7437                                  float* b, lapack_int ldb );
  7438  lapack_int LAPACKE_dlacpy_work( int matrix_layout, char uplo, lapack_int m,
  7439                                  lapack_int n, const double* a, lapack_int lda,
  7440                                  double* b, lapack_int ldb );
  7441  lapack_int LAPACKE_clacpy_work( int matrix_layout, char uplo, lapack_int m,
  7442                                  lapack_int n, const lapack_complex_float* a,
  7443                                  lapack_int lda, lapack_complex_float* b,
  7444                                  lapack_int ldb );
  7445  lapack_int LAPACKE_zlacpy_work( int matrix_layout, char uplo, lapack_int m,
  7446                                  lapack_int n, const lapack_complex_double* a,
  7447                                  lapack_int lda, lapack_complex_double* b,
  7448                                  lapack_int ldb );
  7449  
  7450  lapack_int LAPACKE_clacp2_work( int matrix_layout, char uplo, lapack_int m,
  7451                                  lapack_int n, const float* a, lapack_int lda,
  7452                                  lapack_complex_float* b, lapack_int ldb );
  7453  lapack_int LAPACKE_zlacp2_work( int matrix_layout, char uplo, lapack_int m,
  7454                                  lapack_int n, const double* a, lapack_int lda,
  7455                                  lapack_complex_double* b, lapack_int ldb );
  7456  
  7457  lapack_int LAPACKE_zlag2c_work( int matrix_layout, lapack_int m, lapack_int n,
  7458                                  const lapack_complex_double* a, lapack_int lda,
  7459                                  lapack_complex_float* sa, lapack_int ldsa );
  7460  
  7461  lapack_int LAPACKE_slag2d_work( int matrix_layout, lapack_int m, lapack_int n,
  7462                                  const float* sa, lapack_int ldsa, double* a,
  7463                                  lapack_int lda );
  7464  
  7465  lapack_int LAPACKE_dlag2s_work( int matrix_layout, lapack_int m, lapack_int n,
  7466                                  const double* a, lapack_int lda, float* sa,
  7467                                  lapack_int ldsa );
  7468  
  7469  lapack_int LAPACKE_clag2z_work( int matrix_layout, lapack_int m, lapack_int n,
  7470                                  const lapack_complex_float* sa, lapack_int ldsa,
  7471                                  lapack_complex_double* a, lapack_int lda );
  7472  
  7473  lapack_int LAPACKE_slagge_work( int matrix_layout, lapack_int m, lapack_int n,
  7474                                  lapack_int kl, lapack_int ku, const float* d,
  7475                                  float* a, lapack_int lda, lapack_int* iseed,
  7476                                  float* work );
  7477  lapack_int LAPACKE_dlagge_work( int matrix_layout, lapack_int m, lapack_int n,
  7478                                  lapack_int kl, lapack_int ku, const double* d,
  7479                                  double* a, lapack_int lda, lapack_int* iseed,
  7480                                  double* work );
  7481  lapack_int LAPACKE_clagge_work( int matrix_layout, lapack_int m, lapack_int n,
  7482                                  lapack_int kl, lapack_int ku, const float* d,
  7483                                  lapack_complex_float* a, lapack_int lda,
  7484                                  lapack_int* iseed, lapack_complex_float* work );
  7485  lapack_int LAPACKE_zlagge_work( int matrix_layout, lapack_int m, lapack_int n,
  7486                                  lapack_int kl, lapack_int ku, const double* d,
  7487                                  lapack_complex_double* a, lapack_int lda,
  7488                                  lapack_int* iseed,
  7489                                  lapack_complex_double* work );
  7490  
  7491  lapack_int LAPACKE_claghe_work( int matrix_layout, lapack_int n, lapack_int k,
  7492                                  const float* d, lapack_complex_float* a,
  7493                                  lapack_int lda, lapack_int* iseed,
  7494                                  lapack_complex_float* work );
  7495  lapack_int LAPACKE_zlaghe_work( int matrix_layout, lapack_int n, lapack_int k,
  7496                                  const double* d, lapack_complex_double* a,
  7497                                  lapack_int lda, lapack_int* iseed,
  7498                                  lapack_complex_double* work );
  7499  
  7500  lapack_int LAPACKE_slagsy_work( int matrix_layout, lapack_int n, lapack_int k,
  7501                                  const float* d, float* a, lapack_int lda,
  7502                                  lapack_int* iseed, float* work );
  7503  lapack_int LAPACKE_dlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
  7504                                  const double* d, double* a, lapack_int lda,
  7505                                  lapack_int* iseed, double* work );
  7506  lapack_int LAPACKE_clagsy_work( int matrix_layout, lapack_int n, lapack_int k,
  7507                                  const float* d, lapack_complex_float* a,
  7508                                  lapack_int lda, lapack_int* iseed,
  7509                                  lapack_complex_float* work );
  7510  lapack_int LAPACKE_zlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
  7511                                  const double* d, lapack_complex_double* a,
  7512                                  lapack_int lda, lapack_int* iseed,
  7513                                  lapack_complex_double* work );
  7514  
  7515  lapack_int LAPACKE_slapmr_work( int matrix_layout, lapack_logical forwrd,
  7516                                  lapack_int m, lapack_int n, float* x,
  7517                                  lapack_int ldx, lapack_int* k );
  7518  lapack_int LAPACKE_dlapmr_work( int matrix_layout, lapack_logical forwrd,
  7519                                  lapack_int m, lapack_int n, double* x,
  7520                                  lapack_int ldx, lapack_int* k );
  7521  lapack_int LAPACKE_clapmr_work( int matrix_layout, lapack_logical forwrd,
  7522                                  lapack_int m, lapack_int n,
  7523                                  lapack_complex_float* x, lapack_int ldx,
  7524                                  lapack_int* k );
  7525  lapack_int LAPACKE_zlapmr_work( int matrix_layout, lapack_logical forwrd,
  7526                                  lapack_int m, lapack_int n,
  7527                                  lapack_complex_double* x, lapack_int ldx,
  7528                                  lapack_int* k );
  7529  
  7530  lapack_int LAPACKE_slapmt_work( int matrix_layout, lapack_logical forwrd,
  7531                                  lapack_int m, lapack_int n, float* x,
  7532                                  lapack_int ldx, lapack_int* k );
  7533  lapack_int LAPACKE_dlapmt_work( int matrix_layout, lapack_logical forwrd,
  7534                                  lapack_int m, lapack_int n, double* x,
  7535                                  lapack_int ldx, lapack_int* k );
  7536  lapack_int LAPACKE_clapmt_work( int matrix_layout, lapack_logical forwrd,
  7537                                  lapack_int m, lapack_int n,
  7538                                  lapack_complex_float* x, lapack_int ldx,
  7539                                  lapack_int* k );
  7540  lapack_int LAPACKE_zlapmt_work( int matrix_layout, lapack_logical forwrd,
  7541                                  lapack_int m, lapack_int n,
  7542                                  lapack_complex_double* x, lapack_int ldx,
  7543                                  lapack_int* k );
  7544  
  7545  lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
  7546                                   float* r );
  7547  lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
  7548                                   double* r );
  7549  
  7550  lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
  7551                                   float* sn );
  7552  lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
  7553                                   double* sn );
  7554  
  7555  float LAPACKE_slapy2_work( float x, float y );
  7556  double LAPACKE_dlapy2_work( double x, double y );
  7557  
  7558  float LAPACKE_slapy3_work( float x, float y, float z );
  7559  double LAPACKE_dlapy3_work( double x, double y, double z );
  7560  
  7561  float LAPACKE_slamch_work( char cmach );
  7562  double LAPACKE_dlamch_work( char cmach );
  7563  
  7564  float LAPACKE_slange_work( int matrix_layout, char norm, lapack_int m,
  7565                                  lapack_int n, const float* a, lapack_int lda,
  7566                                  float* work );
  7567  double LAPACKE_dlange_work( int matrix_layout, char norm, lapack_int m,
  7568                                  lapack_int n, const double* a, lapack_int lda,
  7569                                  double* work );
  7570  float LAPACKE_clange_work( int matrix_layout, char norm, lapack_int m,
  7571                                  lapack_int n, const lapack_complex_float* a,
  7572                                  lapack_int lda, float* work );
  7573  double LAPACKE_zlange_work( int matrix_layout, char norm, lapack_int m,
  7574                                  lapack_int n, const lapack_complex_double* a,
  7575                                  lapack_int lda, double* work );
  7576  
  7577  float LAPACKE_clanhe_work( int matrix_layout, char norm, char uplo,
  7578                                  lapack_int n, const lapack_complex_float* a,
  7579                                  lapack_int lda, float* work );
  7580  double LAPACKE_zlanhe_work( int matrix_layout, char norm, char uplo,
  7581                                  lapack_int n, const lapack_complex_double* a,
  7582                                  lapack_int lda, double* work );
  7583  
  7584  float LAPACKE_slansy_work( int matrix_layout, char norm, char uplo,
  7585                                  lapack_int n, const float* a, lapack_int lda,
  7586                                  float* work );
  7587  double LAPACKE_dlansy_work( int matrix_layout, char norm, char uplo,
  7588                                  lapack_int n, const double* a, lapack_int lda,
  7589                                  double* work );
  7590  float LAPACKE_clansy_work( int matrix_layout, char norm, char uplo,
  7591                                  lapack_int n, const lapack_complex_float* a,
  7592                                  lapack_int lda, float* work );
  7593  double LAPACKE_zlansy_work( int matrix_layout, char norm, char uplo,
  7594                                  lapack_int n, const lapack_complex_double* a,
  7595                                  lapack_int lda, double* work );
  7596  
  7597  float LAPACKE_slantr_work( int matrix_layout, char norm, char uplo,
  7598                                  char diag, lapack_int m, lapack_int n, const float* a,
  7599                                  lapack_int lda, float* work );
  7600  double LAPACKE_dlantr_work( int matrix_layout, char norm, char uplo,
  7601                                  char diag, lapack_int m, lapack_int n,
  7602                                  const double* a, lapack_int lda, double* work );
  7603  float LAPACKE_clantr_work( int matrix_layout, char norm, char uplo,
  7604                                  char diag, lapack_int m, lapack_int n,
  7605                                  const lapack_complex_float* a, lapack_int lda,
  7606                                  float* work );
  7607  double LAPACKE_zlantr_work( int matrix_layout, char norm, char uplo,
  7608                                  char diag, lapack_int m, lapack_int n,
  7609                                  const lapack_complex_double* a, lapack_int lda,
  7610                                  double* work );
  7611  
  7612  lapack_int LAPACKE_slarfb_work( int matrix_layout, char side, char trans,
  7613                                  char direct, char storev, lapack_int m,
  7614                                  lapack_int n, lapack_int k, const float* v,
  7615                                  lapack_int ldv, const float* t, lapack_int ldt,
  7616                                  float* c, lapack_int ldc, float* work,
  7617                                  lapack_int ldwork );
  7618  lapack_int LAPACKE_dlarfb_work( int matrix_layout, char side, char trans,
  7619                                  char direct, char storev, lapack_int m,
  7620                                  lapack_int n, lapack_int k, const double* v,
  7621                                  lapack_int ldv, const double* t, lapack_int ldt,
  7622                                  double* c, lapack_int ldc, double* work,
  7623                                  lapack_int ldwork );
  7624  lapack_int LAPACKE_clarfb_work( int matrix_layout, char side, char trans,
  7625                                  char direct, char storev, lapack_int m,
  7626                                  lapack_int n, lapack_int k,
  7627                                  const lapack_complex_float* v, lapack_int ldv,
  7628                                  const lapack_complex_float* t, lapack_int ldt,
  7629                                  lapack_complex_float* c, lapack_int ldc,
  7630                                  lapack_complex_float* work, lapack_int ldwork );
  7631  lapack_int LAPACKE_zlarfb_work( int matrix_layout, char side, char trans,
  7632                                  char direct, char storev, lapack_int m,
  7633                                  lapack_int n, lapack_int k,
  7634                                  const lapack_complex_double* v, lapack_int ldv,
  7635                                  const lapack_complex_double* t, lapack_int ldt,
  7636                                  lapack_complex_double* c, lapack_int ldc,
  7637                                  lapack_complex_double* work,
  7638                                  lapack_int ldwork );
  7639  
  7640  lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
  7641                                  lapack_int incx, float* tau );
  7642  lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
  7643                                  lapack_int incx, double* tau );
  7644  lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
  7645                                  lapack_complex_float* x, lapack_int incx,
  7646                                  lapack_complex_float* tau );
  7647  lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
  7648                                  lapack_complex_double* x, lapack_int incx,
  7649                                  lapack_complex_double* tau );
  7650  
  7651  lapack_int LAPACKE_slarft_work( int matrix_layout, char direct, char storev,
  7652                                  lapack_int n, lapack_int k, const float* v,
  7653                                  lapack_int ldv, const float* tau, float* t,
  7654                                  lapack_int ldt );
  7655  lapack_int LAPACKE_dlarft_work( int matrix_layout, char direct, char storev,
  7656                                  lapack_int n, lapack_int k, const double* v,
  7657                                  lapack_int ldv, const double* tau, double* t,
  7658                                  lapack_int ldt );
  7659  lapack_int LAPACKE_clarft_work( int matrix_layout, char direct, char storev,
  7660                                  lapack_int n, lapack_int k,
  7661                                  const lapack_complex_float* v, lapack_int ldv,
  7662                                  const lapack_complex_float* tau,
  7663                                  lapack_complex_float* t, lapack_int ldt );
  7664  lapack_int LAPACKE_zlarft_work( int matrix_layout, char direct, char storev,
  7665                                  lapack_int n, lapack_int k,
  7666                                  const lapack_complex_double* v, lapack_int ldv,
  7667                                  const lapack_complex_double* tau,
  7668                                  lapack_complex_double* t, lapack_int ldt );
  7669  
  7670  lapack_int LAPACKE_slarfx_work( int matrix_layout, char side, lapack_int m,
  7671                                  lapack_int n, const float* v, float tau,
  7672                                  float* c, lapack_int ldc, float* work );
  7673  lapack_int LAPACKE_dlarfx_work( int matrix_layout, char side, lapack_int m,
  7674                                  lapack_int n, const double* v, double tau,
  7675                                  double* c, lapack_int ldc, double* work );
  7676  lapack_int LAPACKE_clarfx_work( int matrix_layout, char side, lapack_int m,
  7677                                  lapack_int n, const lapack_complex_float* v,
  7678                                  lapack_complex_float tau,
  7679                                  lapack_complex_float* c, lapack_int ldc,
  7680                                  lapack_complex_float* work );
  7681  lapack_int LAPACKE_zlarfx_work( int matrix_layout, char side, lapack_int m,
  7682                                  lapack_int n, const lapack_complex_double* v,
  7683                                  lapack_complex_double tau,
  7684                                  lapack_complex_double* c, lapack_int ldc,
  7685                                  lapack_complex_double* work );
  7686  
  7687  lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
  7688                                  lapack_int n, float* x );
  7689  lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
  7690                                  lapack_int n, double* x );
  7691  lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
  7692                                  lapack_int n, lapack_complex_float* x );
  7693  lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
  7694                                  lapack_int n, lapack_complex_double* x );
  7695  
  7696  
  7697  lapack_int LAPACKE_slascl_work( int matrix_layout, char type, lapack_int kl,
  7698                             lapack_int ku, float cfrom, float cto, 
  7699                             lapack_int m, lapack_int n, float* a, 
  7700                             lapack_int lda );
  7701  lapack_int LAPACKE_dlascl_work( int matrix_layout, char type, lapack_int kl,
  7702                             lapack_int ku, double cfrom, double cto, 
  7703                             lapack_int m, lapack_int n, double* a, 
  7704                             lapack_int lda );
  7705  lapack_int LAPACKE_clascl_work( int matrix_layout, char type, lapack_int kl,
  7706                             lapack_int ku, float cfrom, float cto, 
  7707                             lapack_int m, lapack_int n, lapack_complex_float* a, 
  7708                             lapack_int lda );
  7709  lapack_int LAPACKE_zlascl_work( int matrix_layout, char type, lapack_int kl,
  7710                             lapack_int ku, double cfrom, double cto, 
  7711                             lapack_int m, lapack_int n, lapack_complex_double* a, 
  7712                             lapack_int lda );
  7713                            
  7714  lapack_int LAPACKE_slaset_work( int matrix_layout, char uplo, lapack_int m,
  7715                                  lapack_int n, float alpha, float beta, float* a,
  7716                                  lapack_int lda );
  7717  lapack_int LAPACKE_dlaset_work( int matrix_layout, char uplo, lapack_int m,
  7718                                  lapack_int n, double alpha, double beta,
  7719                                  double* a, lapack_int lda );
  7720  lapack_int LAPACKE_claset_work( int matrix_layout, char uplo, lapack_int m,
  7721                                  lapack_int n, lapack_complex_float alpha,
  7722                                  lapack_complex_float beta,
  7723                                  lapack_complex_float* a, lapack_int lda );
  7724  lapack_int LAPACKE_zlaset_work( int matrix_layout, char uplo, lapack_int m,
  7725                                  lapack_int n, lapack_complex_double alpha,
  7726                                  lapack_complex_double beta,
  7727                                  lapack_complex_double* a, lapack_int lda );
  7728  
  7729  lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
  7730  lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
  7731  
  7732  lapack_int LAPACKE_slaswp_work( int matrix_layout, lapack_int n, float* a,
  7733                                  lapack_int lda, lapack_int k1, lapack_int k2,
  7734                                  const lapack_int* ipiv, lapack_int incx );
  7735  lapack_int LAPACKE_dlaswp_work( int matrix_layout, lapack_int n, double* a,
  7736                                  lapack_int lda, lapack_int k1, lapack_int k2,
  7737                                  const lapack_int* ipiv, lapack_int incx );
  7738  lapack_int LAPACKE_claswp_work( int matrix_layout, lapack_int n,
  7739                                  lapack_complex_float* a, lapack_int lda,
  7740                                  lapack_int k1, lapack_int k2,
  7741                                  const lapack_int* ipiv, lapack_int incx );
  7742  lapack_int LAPACKE_zlaswp_work( int matrix_layout, lapack_int n,
  7743                                  lapack_complex_double* a, lapack_int lda,
  7744                                  lapack_int k1, lapack_int k2,
  7745                                  const lapack_int* ipiv, lapack_int incx );
  7746  
  7747  lapack_int LAPACKE_slatms_work( int matrix_layout, lapack_int m, lapack_int n,
  7748                                  char dist, lapack_int* iseed, char sym,
  7749                                  float* d, lapack_int mode, float cond,
  7750                                  float dmax, lapack_int kl, lapack_int ku,
  7751                                  char pack, float* a, lapack_int lda,
  7752                                  float* work );
  7753  lapack_int LAPACKE_dlatms_work( int matrix_layout, lapack_int m, lapack_int n,
  7754                                  char dist, lapack_int* iseed, char sym,
  7755                                  double* d, lapack_int mode, double cond,
  7756                                  double dmax, lapack_int kl, lapack_int ku,
  7757                                  char pack, double* a, lapack_int lda,
  7758                                  double* work );
  7759  lapack_int LAPACKE_clatms_work( int matrix_layout, lapack_int m, lapack_int n,
  7760                                  char dist, lapack_int* iseed, char sym,
  7761                                  float* d, lapack_int mode, float cond,
  7762                                  float dmax, lapack_int kl, lapack_int ku,
  7763                                  char pack, lapack_complex_float* a,
  7764                                  lapack_int lda, lapack_complex_float* work );
  7765  lapack_int LAPACKE_zlatms_work( int matrix_layout, lapack_int m, lapack_int n,
  7766                                  char dist, lapack_int* iseed, char sym,
  7767                                  double* d, lapack_int mode, double cond,
  7768                                  double dmax, lapack_int kl, lapack_int ku,
  7769                                  char pack, lapack_complex_double* a,
  7770                                  lapack_int lda, lapack_complex_double* work );
  7771  
  7772  lapack_int LAPACKE_slauum_work( int matrix_layout, char uplo, lapack_int n,
  7773                                  float* a, lapack_int lda );
  7774  lapack_int LAPACKE_dlauum_work( int matrix_layout, char uplo, lapack_int n,
  7775                                  double* a, lapack_int lda );
  7776  lapack_int LAPACKE_clauum_work( int matrix_layout, char uplo, lapack_int n,
  7777                                  lapack_complex_float* a, lapack_int lda );
  7778  lapack_int LAPACKE_zlauum_work( int matrix_layout, char uplo, lapack_int n,
  7779                                  lapack_complex_double* a, lapack_int lda );
  7780  
  7781  lapack_int LAPACKE_sopgtr_work( int matrix_layout, char uplo, lapack_int n,
  7782                                  const float* ap, const float* tau, float* q,
  7783                                  lapack_int ldq, float* work );
  7784  lapack_int LAPACKE_dopgtr_work( int matrix_layout, char uplo, lapack_int n,
  7785                                  const double* ap, const double* tau, double* q,
  7786                                  lapack_int ldq, double* work );
  7787  
  7788  lapack_int LAPACKE_sopmtr_work( int matrix_layout, char side, char uplo,
  7789                                  char trans, lapack_int m, lapack_int n,
  7790                                  const float* ap, const float* tau, float* c,
  7791                                  lapack_int ldc, float* work );
  7792  lapack_int LAPACKE_dopmtr_work( int matrix_layout, char side, char uplo,
  7793                                  char trans, lapack_int m, lapack_int n,
  7794                                  const double* ap, const double* tau, double* c,
  7795                                  lapack_int ldc, double* work );
  7796  
  7797  lapack_int LAPACKE_sorgbr_work( int matrix_layout, char vect, lapack_int m,
  7798                                  lapack_int n, lapack_int k, float* a,
  7799                                  lapack_int lda, const float* tau, float* work,
  7800                                  lapack_int lwork );
  7801  lapack_int LAPACKE_dorgbr_work( int matrix_layout, char vect, lapack_int m,
  7802                                  lapack_int n, lapack_int k, double* a,
  7803                                  lapack_int lda, const double* tau, double* work,
  7804                                  lapack_int lwork );
  7805  
  7806  lapack_int LAPACKE_sorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
  7807                                  lapack_int ihi, float* a, lapack_int lda,
  7808                                  const float* tau, float* work,
  7809                                  lapack_int lwork );
  7810  lapack_int LAPACKE_dorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
  7811                                  lapack_int ihi, double* a, lapack_int lda,
  7812                                  const double* tau, double* work,
  7813                                  lapack_int lwork );
  7814  
  7815  lapack_int LAPACKE_sorglq_work( int matrix_layout, lapack_int m, lapack_int n,
  7816                                  lapack_int k, float* a, lapack_int lda,
  7817                                  const float* tau, float* work,
  7818                                  lapack_int lwork );
  7819  lapack_int LAPACKE_dorglq_work( int matrix_layout, lapack_int m, lapack_int n,
  7820                                  lapack_int k, double* a, lapack_int lda,
  7821                                  const double* tau, double* work,
  7822                                  lapack_int lwork );
  7823  
  7824  lapack_int LAPACKE_sorgql_work( int matrix_layout, lapack_int m, lapack_int n,
  7825                                  lapack_int k, float* a, lapack_int lda,
  7826                                  const float* tau, float* work,
  7827                                  lapack_int lwork );
  7828  lapack_int LAPACKE_dorgql_work( int matrix_layout, lapack_int m, lapack_int n,
  7829                                  lapack_int k, double* a, lapack_int lda,
  7830                                  const double* tau, double* work,
  7831                                  lapack_int lwork );
  7832  
  7833  lapack_int LAPACKE_sorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
  7834                                  lapack_int k, float* a, lapack_int lda,
  7835                                  const float* tau, float* work,
  7836                                  lapack_int lwork );
  7837  lapack_int LAPACKE_dorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
  7838                                  lapack_int k, double* a, lapack_int lda,
  7839                                  const double* tau, double* work,
  7840                                  lapack_int lwork );
  7841  
  7842  lapack_int LAPACKE_sorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
  7843                                  lapack_int k, float* a, lapack_int lda,
  7844                                  const float* tau, float* work,
  7845                                  lapack_int lwork );
  7846  lapack_int LAPACKE_dorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
  7847                                  lapack_int k, double* a, lapack_int lda,
  7848                                  const double* tau, double* work,
  7849                                  lapack_int lwork );
  7850  
  7851  lapack_int LAPACKE_sorgtr_work( int matrix_layout, char uplo, lapack_int n,
  7852                                  float* a, lapack_int lda, const float* tau,
  7853                                  float* work, lapack_int lwork );
  7854  lapack_int LAPACKE_dorgtr_work( int matrix_layout, char uplo, lapack_int n,
  7855                                  double* a, lapack_int lda, const double* tau,
  7856                                  double* work, lapack_int lwork );
  7857  
  7858  lapack_int LAPACKE_sormbr_work( int matrix_layout, char vect, char side,
  7859                                  char trans, lapack_int m, lapack_int n,
  7860                                  lapack_int k, const float* a, lapack_int lda,
  7861                                  const float* tau, float* c, lapack_int ldc,
  7862                                  float* work, lapack_int lwork );
  7863  lapack_int LAPACKE_dormbr_work( int matrix_layout, char vect, char side,
  7864                                  char trans, lapack_int m, lapack_int n,
  7865                                  lapack_int k, const double* a, lapack_int lda,
  7866                                  const double* tau, double* c, lapack_int ldc,
  7867                                  double* work, lapack_int lwork );
  7868  
  7869  lapack_int LAPACKE_sormhr_work( int matrix_layout, char side, char trans,
  7870                                  lapack_int m, lapack_int n, lapack_int ilo,
  7871                                  lapack_int ihi, const float* a, lapack_int lda,
  7872                                  const float* tau, float* c, lapack_int ldc,
  7873                                  float* work, lapack_int lwork );
  7874  lapack_int LAPACKE_dormhr_work( int matrix_layout, char side, char trans,
  7875                                  lapack_int m, lapack_int n, lapack_int ilo,
  7876                                  lapack_int ihi, const double* a, lapack_int lda,
  7877                                  const double* tau, double* c, lapack_int ldc,
  7878                                  double* work, lapack_int lwork );
  7879  
  7880  lapack_int LAPACKE_sormlq_work( int matrix_layout, char side, char trans,
  7881                                  lapack_int m, lapack_int n, lapack_int k,
  7882                                  const float* a, lapack_int lda,
  7883                                  const float* tau, float* c, lapack_int ldc,
  7884                                  float* work, lapack_int lwork );
  7885  lapack_int LAPACKE_dormlq_work( int matrix_layout, char side, char trans,
  7886                                  lapack_int m, lapack_int n, lapack_int k,
  7887                                  const double* a, lapack_int lda,
  7888                                  const double* tau, double* c, lapack_int ldc,
  7889                                  double* work, lapack_int lwork );
  7890  
  7891  lapack_int LAPACKE_sormql_work( int matrix_layout, char side, char trans,
  7892                                  lapack_int m, lapack_int n, lapack_int k,
  7893                                  const float* a, lapack_int lda,
  7894                                  const float* tau, float* c, lapack_int ldc,
  7895                                  float* work, lapack_int lwork );
  7896  lapack_int LAPACKE_dormql_work( int matrix_layout, char side, char trans,
  7897                                  lapack_int m, lapack_int n, lapack_int k,
  7898                                  const double* a, lapack_int lda,
  7899                                  const double* tau, double* c, lapack_int ldc,
  7900                                  double* work, lapack_int lwork );
  7901  
  7902  lapack_int LAPACKE_sormqr_work( int matrix_layout, char side, char trans,
  7903                                  lapack_int m, lapack_int n, lapack_int k,
  7904                                  const float* a, lapack_int lda,
  7905                                  const float* tau, float* c, lapack_int ldc,
  7906                                  float* work, lapack_int lwork );
  7907  lapack_int LAPACKE_dormqr_work( int matrix_layout, char side, char trans,
  7908                                  lapack_int m, lapack_int n, lapack_int k,
  7909                                  const double* a, lapack_int lda,
  7910                                  const double* tau, double* c, lapack_int ldc,
  7911                                  double* work, lapack_int lwork );
  7912  
  7913  lapack_int LAPACKE_sormrq_work( int matrix_layout, char side, char trans,
  7914                                  lapack_int m, lapack_int n, lapack_int k,
  7915                                  const float* a, lapack_int lda,
  7916                                  const float* tau, float* c, lapack_int ldc,
  7917                                  float* work, lapack_int lwork );
  7918  lapack_int LAPACKE_dormrq_work( int matrix_layout, char side, char trans,
  7919                                  lapack_int m, lapack_int n, lapack_int k,
  7920                                  const double* a, lapack_int lda,
  7921                                  const double* tau, double* c, lapack_int ldc,
  7922                                  double* work, lapack_int lwork );
  7923  
  7924  lapack_int LAPACKE_sormrz_work( int matrix_layout, char side, char trans,
  7925                                  lapack_int m, lapack_int n, lapack_int k,
  7926                                  lapack_int l, const float* a, lapack_int lda,
  7927                                  const float* tau, float* c, lapack_int ldc,
  7928                                  float* work, lapack_int lwork );
  7929  lapack_int LAPACKE_dormrz_work( int matrix_layout, char side, char trans,
  7930                                  lapack_int m, lapack_int n, lapack_int k,
  7931                                  lapack_int l, const double* a, lapack_int lda,
  7932                                  const double* tau, double* c, lapack_int ldc,
  7933                                  double* work, lapack_int lwork );
  7934  
  7935  lapack_int LAPACKE_sormtr_work( int matrix_layout, char side, char uplo,
  7936                                  char trans, lapack_int m, lapack_int n,
  7937                                  const float* a, lapack_int lda,
  7938                                  const float* tau, float* c, lapack_int ldc,
  7939                                  float* work, lapack_int lwork );
  7940  lapack_int LAPACKE_dormtr_work( int matrix_layout, char side, char uplo,
  7941                                  char trans, lapack_int m, lapack_int n,
  7942                                  const double* a, lapack_int lda,
  7943                                  const double* tau, double* c, lapack_int ldc,
  7944                                  double* work, lapack_int lwork );
  7945  
  7946  lapack_int LAPACKE_spbcon_work( int matrix_layout, char uplo, lapack_int n,
  7947                                  lapack_int kd, const float* ab, lapack_int ldab,
  7948                                  float anorm, float* rcond, float* work,
  7949                                  lapack_int* iwork );
  7950  lapack_int LAPACKE_dpbcon_work( int matrix_layout, char uplo, lapack_int n,
  7951                                  lapack_int kd, const double* ab,
  7952                                  lapack_int ldab, double anorm, double* rcond,
  7953                                  double* work, lapack_int* iwork );
  7954  lapack_int LAPACKE_cpbcon_work( int matrix_layout, char uplo, lapack_int n,
  7955                                  lapack_int kd, const lapack_complex_float* ab,
  7956                                  lapack_int ldab, float anorm, float* rcond,
  7957                                  lapack_complex_float* work, float* rwork );
  7958  lapack_int LAPACKE_zpbcon_work( int matrix_layout, char uplo, lapack_int n,
  7959                                  lapack_int kd, const lapack_complex_double* ab,
  7960                                  lapack_int ldab, double anorm, double* rcond,
  7961                                  lapack_complex_double* work, double* rwork );
  7962  
  7963  lapack_int LAPACKE_spbequ_work( int matrix_layout, char uplo, lapack_int n,
  7964                                  lapack_int kd, const float* ab, lapack_int ldab,
  7965                                  float* s, float* scond, float* amax );
  7966  lapack_int LAPACKE_dpbequ_work( int matrix_layout, char uplo, lapack_int n,
  7967                                  lapack_int kd, const double* ab,
  7968                                  lapack_int ldab, double* s, double* scond,
  7969                                  double* amax );
  7970  lapack_int LAPACKE_cpbequ_work( int matrix_layout, char uplo, lapack_int n,
  7971                                  lapack_int kd, const lapack_complex_float* ab,
  7972                                  lapack_int ldab, float* s, float* scond,
  7973                                  float* amax );
  7974  lapack_int LAPACKE_zpbequ_work( int matrix_layout, char uplo, lapack_int n,
  7975                                  lapack_int kd, const lapack_complex_double* ab,
  7976                                  lapack_int ldab, double* s, double* scond,
  7977                                  double* amax );
  7978  
  7979  lapack_int LAPACKE_spbrfs_work( int matrix_layout, char uplo, lapack_int n,
  7980                                  lapack_int kd, lapack_int nrhs, const float* ab,
  7981                                  lapack_int ldab, const float* afb,
  7982                                  lapack_int ldafb, const float* b,
  7983                                  lapack_int ldb, float* x, lapack_int ldx,
  7984                                  float* ferr, float* berr, float* work,
  7985                                  lapack_int* iwork );
  7986  lapack_int LAPACKE_dpbrfs_work( int matrix_layout, char uplo, lapack_int n,
  7987                                  lapack_int kd, lapack_int nrhs,
  7988                                  const double* ab, lapack_int ldab,
  7989                                  const double* afb, lapack_int ldafb,
  7990                                  const double* b, lapack_int ldb, double* x,
  7991                                  lapack_int ldx, double* ferr, double* berr,
  7992                                  double* work, lapack_int* iwork );
  7993  lapack_int LAPACKE_cpbrfs_work( int matrix_layout, char uplo, lapack_int n,
  7994                                  lapack_int kd, lapack_int nrhs,
  7995                                  const lapack_complex_float* ab, lapack_int ldab,
  7996                                  const lapack_complex_float* afb,
  7997                                  lapack_int ldafb, const lapack_complex_float* b,
  7998                                  lapack_int ldb, lapack_complex_float* x,
  7999                                  lapack_int ldx, float* ferr, float* berr,
  8000                                  lapack_complex_float* work, float* rwork );
  8001  lapack_int LAPACKE_zpbrfs_work( int matrix_layout, char uplo, lapack_int n,
  8002                                  lapack_int kd, lapack_int nrhs,
  8003                                  const lapack_complex_double* ab,
  8004                                  lapack_int ldab,
  8005                                  const lapack_complex_double* afb,
  8006                                  lapack_int ldafb,
  8007                                  const lapack_complex_double* b, lapack_int ldb,
  8008                                  lapack_complex_double* x, lapack_int ldx,
  8009                                  double* ferr, double* berr,
  8010                                  lapack_complex_double* work, double* rwork );
  8011  
  8012  lapack_int LAPACKE_spbstf_work( int matrix_layout, char uplo, lapack_int n,
  8013                                  lapack_int kb, float* bb, lapack_int ldbb );
  8014  lapack_int LAPACKE_dpbstf_work( int matrix_layout, char uplo, lapack_int n,
  8015                                  lapack_int kb, double* bb, lapack_int ldbb );
  8016  lapack_int LAPACKE_cpbstf_work( int matrix_layout, char uplo, lapack_int n,
  8017                                  lapack_int kb, lapack_complex_float* bb,
  8018                                  lapack_int ldbb );
  8019  lapack_int LAPACKE_zpbstf_work( int matrix_layout, char uplo, lapack_int n,
  8020                                  lapack_int kb, lapack_complex_double* bb,
  8021                                  lapack_int ldbb );
  8022  
  8023  lapack_int LAPACKE_spbsv_work( int matrix_layout, char uplo, lapack_int n,
  8024                                 lapack_int kd, lapack_int nrhs, float* ab,
  8025                                 lapack_int ldab, float* b, lapack_int ldb );
  8026  lapack_int LAPACKE_dpbsv_work( int matrix_layout, char uplo, lapack_int n,
  8027                                 lapack_int kd, lapack_int nrhs, double* ab,
  8028                                 lapack_int ldab, double* b, lapack_int ldb );
  8029  lapack_int LAPACKE_cpbsv_work( int matrix_layout, char uplo, lapack_int n,
  8030                                 lapack_int kd, lapack_int nrhs,
  8031                                 lapack_complex_float* ab, lapack_int ldab,
  8032                                 lapack_complex_float* b, lapack_int ldb );
  8033  lapack_int LAPACKE_zpbsv_work( int matrix_layout, char uplo, lapack_int n,
  8034                                 lapack_int kd, lapack_int nrhs,
  8035                                 lapack_complex_double* ab, lapack_int ldab,
  8036                                 lapack_complex_double* b, lapack_int ldb );
  8037  
  8038  lapack_int LAPACKE_spbsvx_work( int matrix_layout, char fact, char uplo,
  8039                                  lapack_int n, lapack_int kd, lapack_int nrhs,
  8040                                  float* ab, lapack_int ldab, float* afb,
  8041                                  lapack_int ldafb, char* equed, float* s,
  8042                                  float* b, lapack_int ldb, float* x,
  8043                                  lapack_int ldx, float* rcond, float* ferr,
  8044                                  float* berr, float* work, lapack_int* iwork );
  8045  lapack_int LAPACKE_dpbsvx_work( int matrix_layout, char fact, char uplo,
  8046                                  lapack_int n, lapack_int kd, lapack_int nrhs,
  8047                                  double* ab, lapack_int ldab, double* afb,
  8048                                  lapack_int ldafb, char* equed, double* s,
  8049                                  double* b, lapack_int ldb, double* x,
  8050                                  lapack_int ldx, double* rcond, double* ferr,
  8051                                  double* berr, double* work, lapack_int* iwork );
  8052  lapack_int LAPACKE_cpbsvx_work( int matrix_layout, char fact, char uplo,
  8053                                  lapack_int n, lapack_int kd, lapack_int nrhs,
  8054                                  lapack_complex_float* ab, lapack_int ldab,
  8055                                  lapack_complex_float* afb, lapack_int ldafb,
  8056                                  char* equed, float* s, lapack_complex_float* b,
  8057                                  lapack_int ldb, lapack_complex_float* x,
  8058                                  lapack_int ldx, float* rcond, float* ferr,
  8059                                  float* berr, lapack_complex_float* work,
  8060                                  float* rwork );
  8061  lapack_int LAPACKE_zpbsvx_work( int matrix_layout, char fact, char uplo,
  8062                                  lapack_int n, lapack_int kd, lapack_int nrhs,
  8063                                  lapack_complex_double* ab, lapack_int ldab,
  8064                                  lapack_complex_double* afb, lapack_int ldafb,
  8065                                  char* equed, double* s,
  8066                                  lapack_complex_double* b, lapack_int ldb,
  8067                                  lapack_complex_double* x, lapack_int ldx,
  8068                                  double* rcond, double* ferr, double* berr,
  8069                                  lapack_complex_double* work, double* rwork );
  8070  
  8071  lapack_int LAPACKE_spbtrf_work( int matrix_layout, char uplo, lapack_int n,
  8072                                  lapack_int kd, float* ab, lapack_int ldab );
  8073  lapack_int LAPACKE_dpbtrf_work( int matrix_layout, char uplo, lapack_int n,
  8074                                  lapack_int kd, double* ab, lapack_int ldab );
  8075  lapack_int LAPACKE_cpbtrf_work( int matrix_layout, char uplo, lapack_int n,
  8076                                  lapack_int kd, lapack_complex_float* ab,
  8077                                  lapack_int ldab );
  8078  lapack_int LAPACKE_zpbtrf_work( int matrix_layout, char uplo, lapack_int n,
  8079                                  lapack_int kd, lapack_complex_double* ab,
  8080                                  lapack_int ldab );
  8081  
  8082  lapack_int LAPACKE_spbtrs_work( int matrix_layout, char uplo, lapack_int n,
  8083                                  lapack_int kd, lapack_int nrhs, const float* ab,
  8084                                  lapack_int ldab, float* b, lapack_int ldb );
  8085  lapack_int LAPACKE_dpbtrs_work( int matrix_layout, char uplo, lapack_int n,
  8086                                  lapack_int kd, lapack_int nrhs,
  8087                                  const double* ab, lapack_int ldab, double* b,
  8088                                  lapack_int ldb );
  8089  lapack_int LAPACKE_cpbtrs_work( int matrix_layout, char uplo, lapack_int n,
  8090                                  lapack_int kd, lapack_int nrhs,
  8091                                  const lapack_complex_float* ab, lapack_int ldab,
  8092                                  lapack_complex_float* b, lapack_int ldb );
  8093  lapack_int LAPACKE_zpbtrs_work( int matrix_layout, char uplo, lapack_int n,
  8094                                  lapack_int kd, lapack_int nrhs,
  8095                                  const lapack_complex_double* ab,
  8096                                  lapack_int ldab, lapack_complex_double* b,
  8097                                  lapack_int ldb );
  8098  
  8099  lapack_int LAPACKE_spftrf_work( int matrix_layout, char transr, char uplo,
  8100                                  lapack_int n, float* a );
  8101  lapack_int LAPACKE_dpftrf_work( int matrix_layout, char transr, char uplo,
  8102                                  lapack_int n, double* a );
  8103  lapack_int LAPACKE_cpftrf_work( int matrix_layout, char transr, char uplo,
  8104                                  lapack_int n, lapack_complex_float* a );
  8105  lapack_int LAPACKE_zpftrf_work( int matrix_layout, char transr, char uplo,
  8106                                  lapack_int n, lapack_complex_double* a );
  8107  
  8108  lapack_int LAPACKE_spftri_work( int matrix_layout, char transr, char uplo,
  8109                                  lapack_int n, float* a );
  8110  lapack_int LAPACKE_dpftri_work( int matrix_layout, char transr, char uplo,
  8111                                  lapack_int n, double* a );
  8112  lapack_int LAPACKE_cpftri_work( int matrix_layout, char transr, char uplo,
  8113                                  lapack_int n, lapack_complex_float* a );
  8114  lapack_int LAPACKE_zpftri_work( int matrix_layout, char transr, char uplo,
  8115                                  lapack_int n, lapack_complex_double* a );
  8116  
  8117  lapack_int LAPACKE_spftrs_work( int matrix_layout, char transr, char uplo,
  8118                                  lapack_int n, lapack_int nrhs, const float* a,
  8119                                  float* b, lapack_int ldb );
  8120  lapack_int LAPACKE_dpftrs_work( int matrix_layout, char transr, char uplo,
  8121                                  lapack_int n, lapack_int nrhs, const double* a,
  8122                                  double* b, lapack_int ldb );
  8123  lapack_int LAPACKE_cpftrs_work( int matrix_layout, char transr, char uplo,
  8124                                  lapack_int n, lapack_int nrhs,
  8125                                  const lapack_complex_float* a,
  8126                                  lapack_complex_float* b, lapack_int ldb );
  8127  lapack_int LAPACKE_zpftrs_work( int matrix_layout, char transr, char uplo,
  8128                                  lapack_int n, lapack_int nrhs,
  8129                                  const lapack_complex_double* a,
  8130                                  lapack_complex_double* b, lapack_int ldb );
  8131  
  8132  lapack_int LAPACKE_spocon_work( int matrix_layout, char uplo, lapack_int n,
  8133                                  const float* a, lapack_int lda, float anorm,
  8134                                  float* rcond, float* work, lapack_int* iwork );
  8135  lapack_int LAPACKE_dpocon_work( int matrix_layout, char uplo, lapack_int n,
  8136                                  const double* a, lapack_int lda, double anorm,
  8137                                  double* rcond, double* work,
  8138                                  lapack_int* iwork );
  8139  lapack_int LAPACKE_cpocon_work( int matrix_layout, char uplo, lapack_int n,
  8140                                  const lapack_complex_float* a, lapack_int lda,
  8141                                  float anorm, float* rcond,
  8142                                  lapack_complex_float* work, float* rwork );
  8143  lapack_int LAPACKE_zpocon_work( int matrix_layout, char uplo, lapack_int n,
  8144                                  const lapack_complex_double* a, lapack_int lda,
  8145                                  double anorm, double* rcond,
  8146                                  lapack_complex_double* work, double* rwork );
  8147  
  8148  lapack_int LAPACKE_spoequ_work( int matrix_layout, lapack_int n, const float* a,
  8149                                  lapack_int lda, float* s, float* scond,
  8150                                  float* amax );
  8151  lapack_int LAPACKE_dpoequ_work( int matrix_layout, lapack_int n, const double* a,
  8152                                  lapack_int lda, double* s, double* scond,
  8153                                  double* amax );
  8154  lapack_int LAPACKE_cpoequ_work( int matrix_layout, lapack_int n,
  8155                                  const lapack_complex_float* a, lapack_int lda,
  8156                                  float* s, float* scond, float* amax );
  8157  lapack_int LAPACKE_zpoequ_work( int matrix_layout, lapack_int n,
  8158                                  const lapack_complex_double* a, lapack_int lda,
  8159                                  double* s, double* scond, double* amax );
  8160  
  8161  lapack_int LAPACKE_spoequb_work( int matrix_layout, lapack_int n, const float* a,
  8162                                   lapack_int lda, float* s, float* scond,
  8163                                   float* amax );
  8164  lapack_int LAPACKE_dpoequb_work( int matrix_layout, lapack_int n,
  8165                                   const double* a, lapack_int lda, double* s,
  8166                                   double* scond, double* amax );
  8167  lapack_int LAPACKE_cpoequb_work( int matrix_layout, lapack_int n,
  8168                                   const lapack_complex_float* a, lapack_int lda,
  8169                                   float* s, float* scond, float* amax );
  8170  lapack_int LAPACKE_zpoequb_work( int matrix_layout, lapack_int n,
  8171                                   const lapack_complex_double* a, lapack_int lda,
  8172                                   double* s, double* scond, double* amax );
  8173  
  8174  lapack_int LAPACKE_sporfs_work( int matrix_layout, char uplo, lapack_int n,
  8175                                  lapack_int nrhs, const float* a, lapack_int lda,
  8176                                  const float* af, lapack_int ldaf,
  8177                                  const float* b, lapack_int ldb, float* x,
  8178                                  lapack_int ldx, float* ferr, float* berr,
  8179                                  float* work, lapack_int* iwork );
  8180  lapack_int LAPACKE_dporfs_work( int matrix_layout, char uplo, lapack_int n,
  8181                                  lapack_int nrhs, const double* a,
  8182                                  lapack_int lda, const double* af,
  8183                                  lapack_int ldaf, const double* b,
  8184                                  lapack_int ldb, double* x, lapack_int ldx,
  8185                                  double* ferr, double* berr, double* work,
  8186                                  lapack_int* iwork );
  8187  lapack_int LAPACKE_cporfs_work( int matrix_layout, char uplo, lapack_int n,
  8188                                  lapack_int nrhs, const lapack_complex_float* a,
  8189                                  lapack_int lda, const lapack_complex_float* af,
  8190                                  lapack_int ldaf, const lapack_complex_float* b,
  8191                                  lapack_int ldb, lapack_complex_float* x,
  8192                                  lapack_int ldx, float* ferr, float* berr,
  8193                                  lapack_complex_float* work, float* rwork );
  8194  lapack_int LAPACKE_zporfs_work( int matrix_layout, char uplo, lapack_int n,
  8195                                  lapack_int nrhs, const lapack_complex_double* a,
  8196                                  lapack_int lda, const lapack_complex_double* af,
  8197                                  lapack_int ldaf, const lapack_complex_double* b,
  8198                                  lapack_int ldb, lapack_complex_double* x,
  8199                                  lapack_int ldx, double* ferr, double* berr,
  8200                                  lapack_complex_double* work, double* rwork );
  8201  
  8202  lapack_int LAPACKE_sporfsx_work( int matrix_layout, char uplo, char equed,
  8203                                   lapack_int n, lapack_int nrhs, const float* a,
  8204                                   lapack_int lda, const float* af,
  8205                                   lapack_int ldaf, const float* s,
  8206                                   const float* b, lapack_int ldb, float* x,
  8207                                   lapack_int ldx, float* rcond, float* berr,
  8208                                   lapack_int n_err_bnds, float* err_bnds_norm,
  8209                                   float* err_bnds_comp, lapack_int nparams,
  8210                                   float* params, float* work,
  8211                                   lapack_int* iwork );
  8212  lapack_int LAPACKE_dporfsx_work( int matrix_layout, char uplo, char equed,
  8213                                   lapack_int n, lapack_int nrhs, const double* a,
  8214                                   lapack_int lda, const double* af,
  8215                                   lapack_int ldaf, const double* s,
  8216                                   const double* b, lapack_int ldb, double* x,
  8217                                   lapack_int ldx, double* rcond, double* berr,
  8218                                   lapack_int n_err_bnds, double* err_bnds_norm,
  8219                                   double* err_bnds_comp, lapack_int nparams,
  8220                                   double* params, double* work,
  8221                                   lapack_int* iwork );
  8222  lapack_int LAPACKE_cporfsx_work( int matrix_layout, char uplo, char equed,
  8223                                   lapack_int n, lapack_int nrhs,
  8224                                   const lapack_complex_float* a, lapack_int lda,
  8225                                   const lapack_complex_float* af,
  8226                                   lapack_int ldaf, const float* s,
  8227                                   const lapack_complex_float* b, lapack_int ldb,
  8228                                   lapack_complex_float* x, lapack_int ldx,
  8229                                   float* rcond, float* berr,
  8230                                   lapack_int n_err_bnds, float* err_bnds_norm,
  8231                                   float* err_bnds_comp, lapack_int nparams,
  8232                                   float* params, lapack_complex_float* work,
  8233                                   float* rwork );
  8234  lapack_int LAPACKE_zporfsx_work( int matrix_layout, char uplo, char equed,
  8235                                   lapack_int n, lapack_int nrhs,
  8236                                   const lapack_complex_double* a, lapack_int lda,
  8237                                   const lapack_complex_double* af,
  8238                                   lapack_int ldaf, const double* s,
  8239                                   const lapack_complex_double* b, lapack_int ldb,
  8240                                   lapack_complex_double* x, lapack_int ldx,
  8241                                   double* rcond, double* berr,
  8242                                   lapack_int n_err_bnds, double* err_bnds_norm,
  8243                                   double* err_bnds_comp, lapack_int nparams,
  8244                                   double* params, lapack_complex_double* work,
  8245                                   double* rwork );
  8246  
  8247  lapack_int LAPACKE_sposv_work( int matrix_layout, char uplo, lapack_int n,
  8248                                 lapack_int nrhs, float* a, lapack_int lda,
  8249                                 float* b, lapack_int ldb );
  8250  lapack_int LAPACKE_dposv_work( int matrix_layout, char uplo, lapack_int n,
  8251                                 lapack_int nrhs, double* a, lapack_int lda,
  8252                                 double* b, lapack_int ldb );
  8253  lapack_int LAPACKE_cposv_work( int matrix_layout, char uplo, lapack_int n,
  8254                                 lapack_int nrhs, lapack_complex_float* a,
  8255                                 lapack_int lda, lapack_complex_float* b,
  8256                                 lapack_int ldb );
  8257  lapack_int LAPACKE_zposv_work( int matrix_layout, char uplo, lapack_int n,
  8258                                 lapack_int nrhs, lapack_complex_double* a,
  8259                                 lapack_int lda, lapack_complex_double* b,
  8260                                 lapack_int ldb );
  8261  lapack_int LAPACKE_dsposv_work( int matrix_layout, char uplo, lapack_int n,
  8262                                  lapack_int nrhs, double* a, lapack_int lda,
  8263                                  double* b, lapack_int ldb, double* x,
  8264                                  lapack_int ldx, double* work, float* swork,
  8265                                  lapack_int* iter );
  8266  lapack_int LAPACKE_zcposv_work( int matrix_layout, char uplo, lapack_int n,
  8267                                  lapack_int nrhs, lapack_complex_double* a,
  8268                                  lapack_int lda, lapack_complex_double* b,
  8269                                  lapack_int ldb, lapack_complex_double* x,
  8270                                  lapack_int ldx, lapack_complex_double* work,
  8271                                  lapack_complex_float* swork, double* rwork,
  8272                                  lapack_int* iter );
  8273  
  8274  lapack_int LAPACKE_sposvx_work( int matrix_layout, char fact, char uplo,
  8275                                  lapack_int n, lapack_int nrhs, float* a,
  8276                                  lapack_int lda, float* af, lapack_int ldaf,
  8277                                  char* equed, float* s, float* b, lapack_int ldb,
  8278                                  float* x, lapack_int ldx, float* rcond,
  8279                                  float* ferr, float* berr, float* work,
  8280                                  lapack_int* iwork );
  8281  lapack_int LAPACKE_dposvx_work( int matrix_layout, char fact, char uplo,
  8282                                  lapack_int n, lapack_int nrhs, double* a,
  8283                                  lapack_int lda, double* af, lapack_int ldaf,
  8284                                  char* equed, double* s, double* b,
  8285                                  lapack_int ldb, double* x, lapack_int ldx,
  8286                                  double* rcond, double* ferr, double* berr,
  8287                                  double* work, lapack_int* iwork );
  8288  lapack_int LAPACKE_cposvx_work( int matrix_layout, char fact, char uplo,
  8289                                  lapack_int n, lapack_int nrhs,
  8290                                  lapack_complex_float* a, lapack_int lda,
  8291                                  lapack_complex_float* af, lapack_int ldaf,
  8292                                  char* equed, float* s, lapack_complex_float* b,
  8293                                  lapack_int ldb, lapack_complex_float* x,
  8294                                  lapack_int ldx, float* rcond, float* ferr,
  8295                                  float* berr, lapack_complex_float* work,
  8296                                  float* rwork );
  8297  lapack_int LAPACKE_zposvx_work( int matrix_layout, char fact, char uplo,
  8298                                  lapack_int n, lapack_int nrhs,
  8299                                  lapack_complex_double* a, lapack_int lda,
  8300                                  lapack_complex_double* af, lapack_int ldaf,
  8301                                  char* equed, double* s,
  8302                                  lapack_complex_double* b, lapack_int ldb,
  8303                                  lapack_complex_double* x, lapack_int ldx,
  8304                                  double* rcond, double* ferr, double* berr,
  8305                                  lapack_complex_double* work, double* rwork );
  8306  
  8307  lapack_int LAPACKE_sposvxx_work( int matrix_layout, char fact, char uplo,
  8308                                   lapack_int n, lapack_int nrhs, float* a,
  8309                                   lapack_int lda, float* af, lapack_int ldaf,
  8310                                   char* equed, float* s, float* b,
  8311                                   lapack_int ldb, float* x, lapack_int ldx,
  8312                                   float* rcond, float* rpvgrw, float* berr,
  8313                                   lapack_int n_err_bnds, float* err_bnds_norm,
  8314                                   float* err_bnds_comp, lapack_int nparams,
  8315                                   float* params, float* work,
  8316                                   lapack_int* iwork );
  8317  lapack_int LAPACKE_dposvxx_work( int matrix_layout, char fact, char uplo,
  8318                                   lapack_int n, lapack_int nrhs, double* a,
  8319                                   lapack_int lda, double* af, lapack_int ldaf,
  8320                                   char* equed, double* s, double* b,
  8321                                   lapack_int ldb, double* x, lapack_int ldx,
  8322                                   double* rcond, double* rpvgrw, double* berr,
  8323                                   lapack_int n_err_bnds, double* err_bnds_norm,
  8324                                   double* err_bnds_comp, lapack_int nparams,
  8325                                   double* params, double* work,
  8326                                   lapack_int* iwork );
  8327  lapack_int LAPACKE_cposvxx_work( int matrix_layout, char fact, char uplo,
  8328                                   lapack_int n, lapack_int nrhs,
  8329                                   lapack_complex_float* a, lapack_int lda,
  8330                                   lapack_complex_float* af, lapack_int ldaf,
  8331                                   char* equed, float* s, lapack_complex_float* b,
  8332                                   lapack_int ldb, lapack_complex_float* x,
  8333                                   lapack_int ldx, float* rcond, float* rpvgrw,
  8334                                   float* berr, lapack_int n_err_bnds,
  8335                                   float* err_bnds_norm, float* err_bnds_comp,
  8336                                   lapack_int nparams, float* params,
  8337                                   lapack_complex_float* work, float* rwork );
  8338  lapack_int LAPACKE_zposvxx_work( int matrix_layout, char fact, char uplo,
  8339                                   lapack_int n, lapack_int nrhs,
  8340                                   lapack_complex_double* a, lapack_int lda,
  8341                                   lapack_complex_double* af, lapack_int ldaf,
  8342                                   char* equed, double* s,
  8343                                   lapack_complex_double* b, lapack_int ldb,
  8344                                   lapack_complex_double* x, lapack_int ldx,
  8345                                   double* rcond, double* rpvgrw, double* berr,
  8346                                   lapack_int n_err_bnds, double* err_bnds_norm,
  8347                                   double* err_bnds_comp, lapack_int nparams,
  8348                                   double* params, lapack_complex_double* work,
  8349                                   double* rwork );
  8350  
  8351  lapack_int LAPACKE_spotrf2_work( int matrix_layout, char uplo, lapack_int n,
  8352                                  float* a, lapack_int lda );
  8353  lapack_int LAPACKE_dpotrf2_work( int matrix_layout, char uplo, lapack_int n,
  8354                                  double* a, lapack_int lda );
  8355  lapack_int LAPACKE_cpotrf2_work( int matrix_layout, char uplo, lapack_int n,
  8356                                  lapack_complex_float* a, lapack_int lda );
  8357  lapack_int LAPACKE_zpotrf2_work( int matrix_layout, char uplo, lapack_int n,
  8358                                  lapack_complex_double* a, lapack_int lda );
  8359  
  8360  lapack_int LAPACKE_spotrf_work( int matrix_layout, char uplo, lapack_int n,
  8361                                  float* a, lapack_int lda );
  8362  lapack_int LAPACKE_dpotrf_work( int matrix_layout, char uplo, lapack_int n,
  8363                                  double* a, lapack_int lda );
  8364  lapack_int LAPACKE_cpotrf_work( int matrix_layout, char uplo, lapack_int n,
  8365                                  lapack_complex_float* a, lapack_int lda );
  8366  lapack_int LAPACKE_zpotrf_work( int matrix_layout, char uplo, lapack_int n,
  8367                                  lapack_complex_double* a, lapack_int lda );
  8368  
  8369  lapack_int LAPACKE_spotri_work( int matrix_layout, char uplo, lapack_int n,
  8370                                  float* a, lapack_int lda );
  8371  lapack_int LAPACKE_dpotri_work( int matrix_layout, char uplo, lapack_int n,
  8372                                  double* a, lapack_int lda );
  8373  lapack_int LAPACKE_cpotri_work( int matrix_layout, char uplo, lapack_int n,
  8374                                  lapack_complex_float* a, lapack_int lda );
  8375  lapack_int LAPACKE_zpotri_work( int matrix_layout, char uplo, lapack_int n,
  8376                                  lapack_complex_double* a, lapack_int lda );
  8377  
  8378  lapack_int LAPACKE_spotrs_work( int matrix_layout, char uplo, lapack_int n,
  8379                                  lapack_int nrhs, const float* a, lapack_int lda,
  8380                                  float* b, lapack_int ldb );
  8381  lapack_int LAPACKE_dpotrs_work( int matrix_layout, char uplo, lapack_int n,
  8382                                  lapack_int nrhs, const double* a,
  8383                                  lapack_int lda, double* b, lapack_int ldb );
  8384  lapack_int LAPACKE_cpotrs_work( int matrix_layout, char uplo, lapack_int n,
  8385                                  lapack_int nrhs, const lapack_complex_float* a,
  8386                                  lapack_int lda, lapack_complex_float* b,
  8387                                  lapack_int ldb );
  8388  lapack_int LAPACKE_zpotrs_work( int matrix_layout, char uplo, lapack_int n,
  8389                                  lapack_int nrhs, const lapack_complex_double* a,
  8390                                  lapack_int lda, lapack_complex_double* b,
  8391                                  lapack_int ldb );
  8392  
  8393  lapack_int LAPACKE_sppcon_work( int matrix_layout, char uplo, lapack_int n,
  8394                                  const float* ap, float anorm, float* rcond,
  8395                                  float* work, lapack_int* iwork );
  8396  lapack_int LAPACKE_dppcon_work( int matrix_layout, char uplo, lapack_int n,
  8397                                  const double* ap, double anorm, double* rcond,
  8398                                  double* work, lapack_int* iwork );
  8399  lapack_int LAPACKE_cppcon_work( int matrix_layout, char uplo, lapack_int n,
  8400                                  const lapack_complex_float* ap, float anorm,
  8401                                  float* rcond, lapack_complex_float* work,
  8402                                  float* rwork );
  8403  lapack_int LAPACKE_zppcon_work( int matrix_layout, char uplo, lapack_int n,
  8404                                  const lapack_complex_double* ap, double anorm,
  8405                                  double* rcond, lapack_complex_double* work,
  8406                                  double* rwork );
  8407  
  8408  lapack_int LAPACKE_sppequ_work( int matrix_layout, char uplo, lapack_int n,
  8409                                  const float* ap, float* s, float* scond,
  8410                                  float* amax );
  8411  lapack_int LAPACKE_dppequ_work( int matrix_layout, char uplo, lapack_int n,
  8412                                  const double* ap, double* s, double* scond,
  8413                                  double* amax );
  8414  lapack_int LAPACKE_cppequ_work( int matrix_layout, char uplo, lapack_int n,
  8415                                  const lapack_complex_float* ap, float* s,
  8416                                  float* scond, float* amax );
  8417  lapack_int LAPACKE_zppequ_work( int matrix_layout, char uplo, lapack_int n,
  8418                                  const lapack_complex_double* ap, double* s,
  8419                                  double* scond, double* amax );
  8420  
  8421  lapack_int LAPACKE_spprfs_work( int matrix_layout, char uplo, lapack_int n,
  8422                                  lapack_int nrhs, const float* ap,
  8423                                  const float* afp, const float* b,
  8424                                  lapack_int ldb, float* x, lapack_int ldx,
  8425                                  float* ferr, float* berr, float* work,
  8426                                  lapack_int* iwork );
  8427  lapack_int LAPACKE_dpprfs_work( int matrix_layout, char uplo, lapack_int n,
  8428                                  lapack_int nrhs, const double* ap,
  8429                                  const double* afp, const double* b,
  8430                                  lapack_int ldb, double* x, lapack_int ldx,
  8431                                  double* ferr, double* berr, double* work,
  8432                                  lapack_int* iwork );
  8433  lapack_int LAPACKE_cpprfs_work( int matrix_layout, char uplo, lapack_int n,
  8434                                  lapack_int nrhs, const lapack_complex_float* ap,
  8435                                  const lapack_complex_float* afp,
  8436                                  const lapack_complex_float* b, lapack_int ldb,
  8437                                  lapack_complex_float* x, lapack_int ldx,
  8438                                  float* ferr, float* berr,
  8439                                  lapack_complex_float* work, float* rwork );
  8440  lapack_int LAPACKE_zpprfs_work( int matrix_layout, char uplo, lapack_int n,
  8441                                  lapack_int nrhs,
  8442                                  const lapack_complex_double* ap,
  8443                                  const lapack_complex_double* afp,
  8444                                  const lapack_complex_double* b, lapack_int ldb,
  8445                                  lapack_complex_double* x, lapack_int ldx,
  8446                                  double* ferr, double* berr,
  8447                                  lapack_complex_double* work, double* rwork );
  8448  
  8449  lapack_int LAPACKE_sppsv_work( int matrix_layout, char uplo, lapack_int n,
  8450                                 lapack_int nrhs, float* ap, float* b,
  8451                                 lapack_int ldb );
  8452  lapack_int LAPACKE_dppsv_work( int matrix_layout, char uplo, lapack_int n,
  8453                                 lapack_int nrhs, double* ap, double* b,
  8454                                 lapack_int ldb );
  8455  lapack_int LAPACKE_cppsv_work( int matrix_layout, char uplo, lapack_int n,
  8456                                 lapack_int nrhs, lapack_complex_float* ap,
  8457                                 lapack_complex_float* b, lapack_int ldb );
  8458  lapack_int LAPACKE_zppsv_work( int matrix_layout, char uplo, lapack_int n,
  8459                                 lapack_int nrhs, lapack_complex_double* ap,
  8460                                 lapack_complex_double* b, lapack_int ldb );
  8461  
  8462  lapack_int LAPACKE_sppsvx_work( int matrix_layout, char fact, char uplo,
  8463                                  lapack_int n, lapack_int nrhs, float* ap,
  8464                                  float* afp, char* equed, float* s, float* b,
  8465                                  lapack_int ldb, float* x, lapack_int ldx,
  8466                                  float* rcond, float* ferr, float* berr,
  8467                                  float* work, lapack_int* iwork );
  8468  lapack_int LAPACKE_dppsvx_work( int matrix_layout, char fact, char uplo,
  8469                                  lapack_int n, lapack_int nrhs, double* ap,
  8470                                  double* afp, char* equed, double* s, double* b,
  8471                                  lapack_int ldb, double* x, lapack_int ldx,
  8472                                  double* rcond, double* ferr, double* berr,
  8473                                  double* work, lapack_int* iwork );
  8474  lapack_int LAPACKE_cppsvx_work( int matrix_layout, char fact, char uplo,
  8475                                  lapack_int n, lapack_int nrhs,
  8476                                  lapack_complex_float* ap,
  8477                                  lapack_complex_float* afp, char* equed,
  8478                                  float* s, lapack_complex_float* b,
  8479                                  lapack_int ldb, lapack_complex_float* x,
  8480                                  lapack_int ldx, float* rcond, float* ferr,
  8481                                  float* berr, lapack_complex_float* work,
  8482                                  float* rwork );
  8483  lapack_int LAPACKE_zppsvx_work( int matrix_layout, char fact, char uplo,
  8484                                  lapack_int n, lapack_int nrhs,
  8485                                  lapack_complex_double* ap,
  8486                                  lapack_complex_double* afp, char* equed,
  8487                                  double* s, lapack_complex_double* b,
  8488                                  lapack_int ldb, lapack_complex_double* x,
  8489                                  lapack_int ldx, double* rcond, double* ferr,
  8490                                  double* berr, lapack_complex_double* work,
  8491                                  double* rwork );
  8492  
  8493  lapack_int LAPACKE_spptrf_work( int matrix_layout, char uplo, lapack_int n,
  8494                                  float* ap );
  8495  lapack_int LAPACKE_dpptrf_work( int matrix_layout, char uplo, lapack_int n,
  8496                                  double* ap );
  8497  lapack_int LAPACKE_cpptrf_work( int matrix_layout, char uplo, lapack_int n,
  8498                                  lapack_complex_float* ap );
  8499  lapack_int LAPACKE_zpptrf_work( int matrix_layout, char uplo, lapack_int n,
  8500                                  lapack_complex_double* ap );
  8501  
  8502  lapack_int LAPACKE_spptri_work( int matrix_layout, char uplo, lapack_int n,
  8503                                  float* ap );
  8504  lapack_int LAPACKE_dpptri_work( int matrix_layout, char uplo, lapack_int n,
  8505                                  double* ap );
  8506  lapack_int LAPACKE_cpptri_work( int matrix_layout, char uplo, lapack_int n,
  8507                                  lapack_complex_float* ap );
  8508  lapack_int LAPACKE_zpptri_work( int matrix_layout, char uplo, lapack_int n,
  8509                                  lapack_complex_double* ap );
  8510  
  8511  lapack_int LAPACKE_spptrs_work( int matrix_layout, char uplo, lapack_int n,
  8512                                  lapack_int nrhs, const float* ap, float* b,
  8513                                  lapack_int ldb );
  8514  lapack_int LAPACKE_dpptrs_work( int matrix_layout, char uplo, lapack_int n,
  8515                                  lapack_int nrhs, const double* ap, double* b,
  8516                                  lapack_int ldb );
  8517  lapack_int LAPACKE_cpptrs_work( int matrix_layout, char uplo, lapack_int n,
  8518                                  lapack_int nrhs, const lapack_complex_float* ap,
  8519                                  lapack_complex_float* b, lapack_int ldb );
  8520  lapack_int LAPACKE_zpptrs_work( int matrix_layout, char uplo, lapack_int n,
  8521                                  lapack_int nrhs,
  8522                                  const lapack_complex_double* ap,
  8523                                  lapack_complex_double* b, lapack_int ldb );
  8524  
  8525  lapack_int LAPACKE_spstrf_work( int matrix_layout, char uplo, lapack_int n,
  8526                                  float* a, lapack_int lda, lapack_int* piv,
  8527                                  lapack_int* rank, float tol, float* work );
  8528  lapack_int LAPACKE_dpstrf_work( int matrix_layout, char uplo, lapack_int n,
  8529                                  double* a, lapack_int lda, lapack_int* piv,
  8530                                  lapack_int* rank, double tol, double* work );
  8531  lapack_int LAPACKE_cpstrf_work( int matrix_layout, char uplo, lapack_int n,
  8532                                  lapack_complex_float* a, lapack_int lda,
  8533                                  lapack_int* piv, lapack_int* rank, float tol,
  8534                                  float* work );
  8535  lapack_int LAPACKE_zpstrf_work( int matrix_layout, char uplo, lapack_int n,
  8536                                  lapack_complex_double* a, lapack_int lda,
  8537                                  lapack_int* piv, lapack_int* rank, double tol,
  8538                                  double* work );
  8539  
  8540  lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
  8541                                  float anorm, float* rcond, float* work );
  8542  lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
  8543                                  double anorm, double* rcond, double* work );
  8544  lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
  8545                                  const lapack_complex_float* e, float anorm,
  8546                                  float* rcond, float* work );
  8547  lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
  8548                                  const lapack_complex_double* e, double anorm,
  8549                                  double* rcond, double* work );
  8550  
  8551  lapack_int LAPACKE_spteqr_work( int matrix_layout, char compz, lapack_int n,
  8552                                  float* d, float* e, float* z, lapack_int ldz,
  8553                                  float* work );
  8554  lapack_int LAPACKE_dpteqr_work( int matrix_layout, char compz, lapack_int n,
  8555                                  double* d, double* e, double* z, lapack_int ldz,
  8556                                  double* work );
  8557  lapack_int LAPACKE_cpteqr_work( int matrix_layout, char compz, lapack_int n,
  8558                                  float* d, float* e, lapack_complex_float* z,
  8559                                  lapack_int ldz, float* work );
  8560  lapack_int LAPACKE_zpteqr_work( int matrix_layout, char compz, lapack_int n,
  8561                                  double* d, double* e, lapack_complex_double* z,
  8562                                  lapack_int ldz, double* work );
  8563  
  8564  lapack_int LAPACKE_sptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8565                                  const float* d, const float* e, const float* df,
  8566                                  const float* ef, const float* b, lapack_int ldb,
  8567                                  float* x, lapack_int ldx, float* ferr,
  8568                                  float* berr, float* work );
  8569  lapack_int LAPACKE_dptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8570                                  const double* d, const double* e,
  8571                                  const double* df, const double* ef,
  8572                                  const double* b, lapack_int ldb, double* x,
  8573                                  lapack_int ldx, double* ferr, double* berr,
  8574                                  double* work );
  8575  lapack_int LAPACKE_cptrfs_work( int matrix_layout, char uplo, lapack_int n,
  8576                                  lapack_int nrhs, const float* d,
  8577                                  const lapack_complex_float* e, const float* df,
  8578                                  const lapack_complex_float* ef,
  8579                                  const lapack_complex_float* b, lapack_int ldb,
  8580                                  lapack_complex_float* x, lapack_int ldx,
  8581                                  float* ferr, float* berr,
  8582                                  lapack_complex_float* work, float* rwork );
  8583  lapack_int LAPACKE_zptrfs_work( int matrix_layout, char uplo, lapack_int n,
  8584                                  lapack_int nrhs, const double* d,
  8585                                  const lapack_complex_double* e,
  8586                                  const double* df,
  8587                                  const lapack_complex_double* ef,
  8588                                  const lapack_complex_double* b, lapack_int ldb,
  8589                                  lapack_complex_double* x, lapack_int ldx,
  8590                                  double* ferr, double* berr,
  8591                                  lapack_complex_double* work, double* rwork );
  8592  
  8593  lapack_int LAPACKE_sptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8594                                 float* d, float* e, float* b, lapack_int ldb );
  8595  lapack_int LAPACKE_dptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8596                                 double* d, double* e, double* b,
  8597                                 lapack_int ldb );
  8598  lapack_int LAPACKE_cptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8599                                 float* d, lapack_complex_float* e,
  8600                                 lapack_complex_float* b, lapack_int ldb );
  8601  lapack_int LAPACKE_zptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8602                                 double* d, lapack_complex_double* e,
  8603                                 lapack_complex_double* b, lapack_int ldb );
  8604  
  8605  lapack_int LAPACKE_sptsvx_work( int matrix_layout, char fact, lapack_int n,
  8606                                  lapack_int nrhs, const float* d, const float* e,
  8607                                  float* df, float* ef, const float* b,
  8608                                  lapack_int ldb, float* x, lapack_int ldx,
  8609                                  float* rcond, float* ferr, float* berr,
  8610                                  float* work );
  8611  lapack_int LAPACKE_dptsvx_work( int matrix_layout, char fact, lapack_int n,
  8612                                  lapack_int nrhs, const double* d,
  8613                                  const double* e, double* df, double* ef,
  8614                                  const double* b, lapack_int ldb, double* x,
  8615                                  lapack_int ldx, double* rcond, double* ferr,
  8616                                  double* berr, double* work );
  8617  lapack_int LAPACKE_cptsvx_work( int matrix_layout, char fact, lapack_int n,
  8618                                  lapack_int nrhs, const float* d,
  8619                                  const lapack_complex_float* e, float* df,
  8620                                  lapack_complex_float* ef,
  8621                                  const lapack_complex_float* b, lapack_int ldb,
  8622                                  lapack_complex_float* x, lapack_int ldx,
  8623                                  float* rcond, float* ferr, float* berr,
  8624                                  lapack_complex_float* work, float* rwork );
  8625  lapack_int LAPACKE_zptsvx_work( int matrix_layout, char fact, lapack_int n,
  8626                                  lapack_int nrhs, const double* d,
  8627                                  const lapack_complex_double* e, double* df,
  8628                                  lapack_complex_double* ef,
  8629                                  const lapack_complex_double* b, lapack_int ldb,
  8630                                  lapack_complex_double* x, lapack_int ldx,
  8631                                  double* rcond, double* ferr, double* berr,
  8632                                  lapack_complex_double* work, double* rwork );
  8633  
  8634  lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
  8635  lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
  8636  lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
  8637                                  lapack_complex_float* e );
  8638  lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
  8639                                  lapack_complex_double* e );
  8640  
  8641  lapack_int LAPACKE_spttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8642                                  const float* d, const float* e, float* b,
  8643                                  lapack_int ldb );
  8644  lapack_int LAPACKE_dpttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
  8645                                  const double* d, const double* e, double* b,
  8646                                  lapack_int ldb );
  8647  lapack_int LAPACKE_cpttrs_work( int matrix_layout, char uplo, lapack_int n,
  8648                                  lapack_int nrhs, const float* d,
  8649                                  const lapack_complex_float* e,
  8650                                  lapack_complex_float* b, lapack_int ldb );
  8651  lapack_int LAPACKE_zpttrs_work( int matrix_layout, char uplo, lapack_int n,
  8652                                  lapack_int nrhs, const double* d,
  8653                                  const lapack_complex_double* e,
  8654                                  lapack_complex_double* b, lapack_int ldb );
  8655  
  8656  lapack_int LAPACKE_ssbev_work( int matrix_layout, char jobz, char uplo,
  8657                                 lapack_int n, lapack_int kd, float* ab,
  8658                                 lapack_int ldab, float* w, float* z,
  8659                                 lapack_int ldz, float* work );
  8660  lapack_int LAPACKE_dsbev_work( int matrix_layout, char jobz, char uplo,
  8661                                 lapack_int n, lapack_int kd, double* ab,
  8662                                 lapack_int ldab, double* w, double* z,
  8663                                 lapack_int ldz, double* work );
  8664  
  8665  lapack_int LAPACKE_ssbevd_work( int matrix_layout, char jobz, char uplo,
  8666                                  lapack_int n, lapack_int kd, float* ab,
  8667                                  lapack_int ldab, float* w, float* z,
  8668                                  lapack_int ldz, float* work, lapack_int lwork,
  8669                                  lapack_int* iwork, lapack_int liwork );
  8670  lapack_int LAPACKE_dsbevd_work( int matrix_layout, char jobz, char uplo,
  8671                                  lapack_int n, lapack_int kd, double* ab,
  8672                                  lapack_int ldab, double* w, double* z,
  8673                                  lapack_int ldz, double* work, lapack_int lwork,
  8674                                  lapack_int* iwork, lapack_int liwork );
  8675  
  8676  lapack_int LAPACKE_ssbevx_work( int matrix_layout, char jobz, char range,
  8677                                  char uplo, lapack_int n, lapack_int kd,
  8678                                  float* ab, lapack_int ldab, float* q,
  8679                                  lapack_int ldq, float vl, float vu,
  8680                                  lapack_int il, lapack_int iu, float abstol,
  8681                                  lapack_int* m, float* w, float* z,
  8682                                  lapack_int ldz, float* work, lapack_int* iwork,
  8683                                  lapack_int* ifail );
  8684  lapack_int LAPACKE_dsbevx_work( int matrix_layout, char jobz, char range,
  8685                                  char uplo, lapack_int n, lapack_int kd,
  8686                                  double* ab, lapack_int ldab, double* q,
  8687                                  lapack_int ldq, double vl, double vu,
  8688                                  lapack_int il, lapack_int iu, double abstol,
  8689                                  lapack_int* m, double* w, double* z,
  8690                                  lapack_int ldz, double* work, lapack_int* iwork,
  8691                                  lapack_int* ifail );
  8692  
  8693  lapack_int LAPACKE_ssbgst_work( int matrix_layout, char vect, char uplo,
  8694                                  lapack_int n, lapack_int ka, lapack_int kb,
  8695                                  float* ab, lapack_int ldab, const float* bb,
  8696                                  lapack_int ldbb, float* x, lapack_int ldx,
  8697                                  float* work );
  8698  lapack_int LAPACKE_dsbgst_work( int matrix_layout, char vect, char uplo,
  8699                                  lapack_int n, lapack_int ka, lapack_int kb,
  8700                                  double* ab, lapack_int ldab, const double* bb,
  8701                                  lapack_int ldbb, double* x, lapack_int ldx,
  8702                                  double* work );
  8703  
  8704  lapack_int LAPACKE_ssbgv_work( int matrix_layout, char jobz, char uplo,
  8705                                 lapack_int n, lapack_int ka, lapack_int kb,
  8706                                 float* ab, lapack_int ldab, float* bb,
  8707                                 lapack_int ldbb, float* w, float* z,
  8708                                 lapack_int ldz, float* work );
  8709  lapack_int LAPACKE_dsbgv_work( int matrix_layout, char jobz, char uplo,
  8710                                 lapack_int n, lapack_int ka, lapack_int kb,
  8711                                 double* ab, lapack_int ldab, double* bb,
  8712                                 lapack_int ldbb, double* w, double* z,
  8713                                 lapack_int ldz, double* work );
  8714  
  8715  lapack_int LAPACKE_ssbgvd_work( int matrix_layout, char jobz, char uplo,
  8716                                  lapack_int n, lapack_int ka, lapack_int kb,
  8717                                  float* ab, lapack_int ldab, float* bb,
  8718                                  lapack_int ldbb, float* w, float* z,
  8719                                  lapack_int ldz, float* work, lapack_int lwork,
  8720                                  lapack_int* iwork, lapack_int liwork );
  8721  lapack_int LAPACKE_dsbgvd_work( int matrix_layout, char jobz, char uplo,
  8722                                  lapack_int n, lapack_int ka, lapack_int kb,
  8723                                  double* ab, lapack_int ldab, double* bb,
  8724                                  lapack_int ldbb, double* w, double* z,
  8725                                  lapack_int ldz, double* work, lapack_int lwork,
  8726                                  lapack_int* iwork, lapack_int liwork );
  8727  
  8728  lapack_int LAPACKE_ssbgvx_work( int matrix_layout, char jobz, char range,
  8729                                  char uplo, lapack_int n, lapack_int ka,
  8730                                  lapack_int kb, float* ab, lapack_int ldab,
  8731                                  float* bb, lapack_int ldbb, float* q,
  8732                                  lapack_int ldq, float vl, float vu,
  8733                                  lapack_int il, lapack_int iu, float abstol,
  8734                                  lapack_int* m, float* w, float* z,
  8735                                  lapack_int ldz, float* work, lapack_int* iwork,
  8736                                  lapack_int* ifail );
  8737  lapack_int LAPACKE_dsbgvx_work( int matrix_layout, char jobz, char range,
  8738                                  char uplo, lapack_int n, lapack_int ka,
  8739                                  lapack_int kb, double* ab, lapack_int ldab,
  8740                                  double* bb, lapack_int ldbb, double* q,
  8741                                  lapack_int ldq, double vl, double vu,
  8742                                  lapack_int il, lapack_int iu, double abstol,
  8743                                  lapack_int* m, double* w, double* z,
  8744                                  lapack_int ldz, double* work, lapack_int* iwork,
  8745                                  lapack_int* ifail );
  8746  
  8747  lapack_int LAPACKE_ssbtrd_work( int matrix_layout, char vect, char uplo,
  8748                                  lapack_int n, lapack_int kd, float* ab,
  8749                                  lapack_int ldab, float* d, float* e, float* q,
  8750                                  lapack_int ldq, float* work );
  8751  lapack_int LAPACKE_dsbtrd_work( int matrix_layout, char vect, char uplo,
  8752                                  lapack_int n, lapack_int kd, double* ab,
  8753                                  lapack_int ldab, double* d, double* e,
  8754                                  double* q, lapack_int ldq, double* work );
  8755  
  8756  lapack_int LAPACKE_ssfrk_work( int matrix_layout, char transr, char uplo,
  8757                                 char trans, lapack_int n, lapack_int k,
  8758                                 float alpha, const float* a, lapack_int lda,
  8759                                 float beta, float* c );
  8760  lapack_int LAPACKE_dsfrk_work( int matrix_layout, char transr, char uplo,
  8761                                 char trans, lapack_int n, lapack_int k,
  8762                                 double alpha, const double* a, lapack_int lda,
  8763                                 double beta, double* c );
  8764  
  8765  lapack_int LAPACKE_sspcon_work( int matrix_layout, char uplo, lapack_int n,
  8766                                  const float* ap, const lapack_int* ipiv,
  8767                                  float anorm, float* rcond, float* work,
  8768                                  lapack_int* iwork );
  8769  lapack_int LAPACKE_dspcon_work( int matrix_layout, char uplo, lapack_int n,
  8770                                  const double* ap, const lapack_int* ipiv,
  8771                                  double anorm, double* rcond, double* work,
  8772                                  lapack_int* iwork );
  8773  lapack_int LAPACKE_cspcon_work( int matrix_layout, char uplo, lapack_int n,
  8774                                  const lapack_complex_float* ap,
  8775                                  const lapack_int* ipiv, float anorm,
  8776                                  float* rcond, lapack_complex_float* work );
  8777  lapack_int LAPACKE_zspcon_work( int matrix_layout, char uplo, lapack_int n,
  8778                                  const lapack_complex_double* ap,
  8779                                  const lapack_int* ipiv, double anorm,
  8780                                  double* rcond, lapack_complex_double* work );
  8781  
  8782  lapack_int LAPACKE_sspev_work( int matrix_layout, char jobz, char uplo,
  8783                                 lapack_int n, float* ap, float* w, float* z,
  8784                                 lapack_int ldz, float* work );
  8785  lapack_int LAPACKE_dspev_work( int matrix_layout, char jobz, char uplo,
  8786                                 lapack_int n, double* ap, double* w, double* z,
  8787                                 lapack_int ldz, double* work );
  8788  
  8789  lapack_int LAPACKE_sspevd_work( int matrix_layout, char jobz, char uplo,
  8790                                  lapack_int n, float* ap, float* w, float* z,
  8791                                  lapack_int ldz, float* work, lapack_int lwork,
  8792                                  lapack_int* iwork, lapack_int liwork );
  8793  lapack_int LAPACKE_dspevd_work( int matrix_layout, char jobz, char uplo,
  8794                                  lapack_int n, double* ap, double* w, double* z,
  8795                                  lapack_int ldz, double* work, lapack_int lwork,
  8796                                  lapack_int* iwork, lapack_int liwork );
  8797  
  8798  lapack_int LAPACKE_sspevx_work( int matrix_layout, char jobz, char range,
  8799                                  char uplo, lapack_int n, float* ap, float vl,
  8800                                  float vu, lapack_int il, lapack_int iu,
  8801                                  float abstol, lapack_int* m, float* w, float* z,
  8802                                  lapack_int ldz, float* work, lapack_int* iwork,
  8803                                  lapack_int* ifail );
  8804  lapack_int LAPACKE_dspevx_work( int matrix_layout, char jobz, char range,
  8805                                  char uplo, lapack_int n, double* ap, double vl,
  8806                                  double vu, lapack_int il, lapack_int iu,
  8807                                  double abstol, lapack_int* m, double* w,
  8808                                  double* z, lapack_int ldz, double* work,
  8809                                  lapack_int* iwork, lapack_int* ifail );
  8810  
  8811  lapack_int LAPACKE_sspgst_work( int matrix_layout, lapack_int itype, char uplo,
  8812                                  lapack_int n, float* ap, const float* bp );
  8813  lapack_int LAPACKE_dspgst_work( int matrix_layout, lapack_int itype, char uplo,
  8814                                  lapack_int n, double* ap, const double* bp );
  8815  
  8816  lapack_int LAPACKE_sspgv_work( int matrix_layout, lapack_int itype, char jobz,
  8817                                 char uplo, lapack_int n, float* ap, float* bp,
  8818                                 float* w, float* z, lapack_int ldz,
  8819                                 float* work );
  8820  lapack_int LAPACKE_dspgv_work( int matrix_layout, lapack_int itype, char jobz,
  8821                                 char uplo, lapack_int n, double* ap, double* bp,
  8822                                 double* w, double* z, lapack_int ldz,
  8823                                 double* work );
  8824  
  8825  lapack_int LAPACKE_sspgvd_work( int matrix_layout, lapack_int itype, char jobz,
  8826                                  char uplo, lapack_int n, float* ap, float* bp,
  8827                                  float* w, float* z, lapack_int ldz, float* work,
  8828                                  lapack_int lwork, lapack_int* iwork,
  8829                                  lapack_int liwork );
  8830  lapack_int LAPACKE_dspgvd_work( int matrix_layout, lapack_int itype, char jobz,
  8831                                  char uplo, lapack_int n, double* ap, double* bp,
  8832                                  double* w, double* z, lapack_int ldz,
  8833                                  double* work, lapack_int lwork,
  8834                                  lapack_int* iwork, lapack_int liwork );
  8835  
  8836  lapack_int LAPACKE_sspgvx_work( int matrix_layout, lapack_int itype, char jobz,
  8837                                  char range, char uplo, lapack_int n, float* ap,
  8838                                  float* bp, float vl, float vu, lapack_int il,
  8839                                  lapack_int iu, float abstol, lapack_int* m,
  8840                                  float* w, float* z, lapack_int ldz, float* work,
  8841                                  lapack_int* iwork, lapack_int* ifail );
  8842  lapack_int LAPACKE_dspgvx_work( int matrix_layout, lapack_int itype, char jobz,
  8843                                  char range, char uplo, lapack_int n, double* ap,
  8844                                  double* bp, double vl, double vu, lapack_int il,
  8845                                  lapack_int iu, double abstol, lapack_int* m,
  8846                                  double* w, double* z, lapack_int ldz,
  8847                                  double* work, lapack_int* iwork,
  8848                                  lapack_int* ifail );
  8849  
  8850  lapack_int LAPACKE_ssprfs_work( int matrix_layout, char uplo, lapack_int n,
  8851                                  lapack_int nrhs, const float* ap,
  8852                                  const float* afp, const lapack_int* ipiv,
  8853                                  const float* b, lapack_int ldb, float* x,
  8854                                  lapack_int ldx, float* ferr, float* berr,
  8855                                  float* work, lapack_int* iwork );
  8856  lapack_int LAPACKE_dsprfs_work( int matrix_layout, char uplo, lapack_int n,
  8857                                  lapack_int nrhs, const double* ap,
  8858                                  const double* afp, const lapack_int* ipiv,
  8859                                  const double* b, lapack_int ldb, double* x,
  8860                                  lapack_int ldx, double* ferr, double* berr,
  8861                                  double* work, lapack_int* iwork );
  8862  lapack_int LAPACKE_csprfs_work( int matrix_layout, char uplo, lapack_int n,
  8863                                  lapack_int nrhs, const lapack_complex_float* ap,
  8864                                  const lapack_complex_float* afp,
  8865                                  const lapack_int* ipiv,
  8866                                  const lapack_complex_float* b, lapack_int ldb,
  8867                                  lapack_complex_float* x, lapack_int ldx,
  8868                                  float* ferr, float* berr,
  8869                                  lapack_complex_float* work, float* rwork );
  8870  lapack_int LAPACKE_zsprfs_work( int matrix_layout, char uplo, lapack_int n,
  8871                                  lapack_int nrhs,
  8872                                  const lapack_complex_double* ap,
  8873                                  const lapack_complex_double* afp,
  8874                                  const lapack_int* ipiv,
  8875                                  const lapack_complex_double* b, lapack_int ldb,
  8876                                  lapack_complex_double* x, lapack_int ldx,
  8877                                  double* ferr, double* berr,
  8878                                  lapack_complex_double* work, double* rwork );
  8879  
  8880  lapack_int LAPACKE_sspsv_work( int matrix_layout, char uplo, lapack_int n,
  8881                                 lapack_int nrhs, float* ap, lapack_int* ipiv,
  8882                                 float* b, lapack_int ldb );
  8883  lapack_int LAPACKE_dspsv_work( int matrix_layout, char uplo, lapack_int n,
  8884                                 lapack_int nrhs, double* ap, lapack_int* ipiv,
  8885                                 double* b, lapack_int ldb );
  8886  lapack_int LAPACKE_cspsv_work( int matrix_layout, char uplo, lapack_int n,
  8887                                 lapack_int nrhs, lapack_complex_float* ap,
  8888                                 lapack_int* ipiv, lapack_complex_float* b,
  8889                                 lapack_int ldb );
  8890  lapack_int LAPACKE_zspsv_work( int matrix_layout, char uplo, lapack_int n,
  8891                                 lapack_int nrhs, lapack_complex_double* ap,
  8892                                 lapack_int* ipiv, lapack_complex_double* b,
  8893                                 lapack_int ldb );
  8894  
  8895  lapack_int LAPACKE_sspsvx_work( int matrix_layout, char fact, char uplo,
  8896                                  lapack_int n, lapack_int nrhs, const float* ap,
  8897                                  float* afp, lapack_int* ipiv, const float* b,
  8898                                  lapack_int ldb, float* x, lapack_int ldx,
  8899                                  float* rcond, float* ferr, float* berr,
  8900                                  float* work, lapack_int* iwork );
  8901  lapack_int LAPACKE_dspsvx_work( int matrix_layout, char fact, char uplo,
  8902                                  lapack_int n, lapack_int nrhs, const double* ap,
  8903                                  double* afp, lapack_int* ipiv, const double* b,
  8904                                  lapack_int ldb, double* x, lapack_int ldx,
  8905                                  double* rcond, double* ferr, double* berr,
  8906                                  double* work, lapack_int* iwork );
  8907  lapack_int LAPACKE_cspsvx_work( int matrix_layout, char fact, char uplo,
  8908                                  lapack_int n, lapack_int nrhs,
  8909                                  const lapack_complex_float* ap,
  8910                                  lapack_complex_float* afp, lapack_int* ipiv,
  8911                                  const lapack_complex_float* b, lapack_int ldb,
  8912                                  lapack_complex_float* x, lapack_int ldx,
  8913                                  float* rcond, float* ferr, float* berr,
  8914                                  lapack_complex_float* work, float* rwork );
  8915  lapack_int LAPACKE_zspsvx_work( int matrix_layout, char fact, char uplo,
  8916                                  lapack_int n, lapack_int nrhs,
  8917                                  const lapack_complex_double* ap,
  8918                                  lapack_complex_double* afp, lapack_int* ipiv,
  8919                                  const lapack_complex_double* b, lapack_int ldb,
  8920                                  lapack_complex_double* x, lapack_int ldx,
  8921                                  double* rcond, double* ferr, double* berr,
  8922                                  lapack_complex_double* work, double* rwork );
  8923  
  8924  lapack_int LAPACKE_ssptrd_work( int matrix_layout, char uplo, lapack_int n,
  8925                                  float* ap, float* d, float* e, float* tau );
  8926  lapack_int LAPACKE_dsptrd_work( int matrix_layout, char uplo, lapack_int n,
  8927                                  double* ap, double* d, double* e, double* tau );
  8928  
  8929  lapack_int LAPACKE_ssptrf_work( int matrix_layout, char uplo, lapack_int n,
  8930                                  float* ap, lapack_int* ipiv );
  8931  lapack_int LAPACKE_dsptrf_work( int matrix_layout, char uplo, lapack_int n,
  8932                                  double* ap, lapack_int* ipiv );
  8933  lapack_int LAPACKE_csptrf_work( int matrix_layout, char uplo, lapack_int n,
  8934                                  lapack_complex_float* ap, lapack_int* ipiv );
  8935  lapack_int LAPACKE_zsptrf_work( int matrix_layout, char uplo, lapack_int n,
  8936                                  lapack_complex_double* ap, lapack_int* ipiv );
  8937  
  8938  lapack_int LAPACKE_ssptri_work( int matrix_layout, char uplo, lapack_int n,
  8939                                  float* ap, const lapack_int* ipiv,
  8940                                  float* work );
  8941  lapack_int LAPACKE_dsptri_work( int matrix_layout, char uplo, lapack_int n,
  8942                                  double* ap, const lapack_int* ipiv,
  8943                                  double* work );
  8944  lapack_int LAPACKE_csptri_work( int matrix_layout, char uplo, lapack_int n,
  8945                                  lapack_complex_float* ap,
  8946                                  const lapack_int* ipiv,
  8947                                  lapack_complex_float* work );
  8948  lapack_int LAPACKE_zsptri_work( int matrix_layout, char uplo, lapack_int n,
  8949                                  lapack_complex_double* ap,
  8950                                  const lapack_int* ipiv,
  8951                                  lapack_complex_double* work );
  8952  
  8953  lapack_int LAPACKE_ssptrs_work( int matrix_layout, char uplo, lapack_int n,
  8954                                  lapack_int nrhs, const float* ap,
  8955                                  const lapack_int* ipiv, float* b,
  8956                                  lapack_int ldb );
  8957  lapack_int LAPACKE_dsptrs_work( int matrix_layout, char uplo, lapack_int n,
  8958                                  lapack_int nrhs, const double* ap,
  8959                                  const lapack_int* ipiv, double* b,
  8960                                  lapack_int ldb );
  8961  lapack_int LAPACKE_csptrs_work( int matrix_layout, char uplo, lapack_int n,
  8962                                  lapack_int nrhs, const lapack_complex_float* ap,
  8963                                  const lapack_int* ipiv, lapack_complex_float* b,
  8964                                  lapack_int ldb );
  8965  lapack_int LAPACKE_zsptrs_work( int matrix_layout, char uplo, lapack_int n,
  8966                                  lapack_int nrhs,
  8967                                  const lapack_complex_double* ap,
  8968                                  const lapack_int* ipiv,
  8969                                  lapack_complex_double* b, lapack_int ldb );
  8970  
  8971  lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
  8972                                  float vu, lapack_int il, lapack_int iu,
  8973                                  float abstol, const float* d, const float* e,
  8974                                  lapack_int* m, lapack_int* nsplit, float* w,
  8975                                  lapack_int* iblock, lapack_int* isplit,
  8976                                  float* work, lapack_int* iwork );
  8977  lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
  8978                                  double vu, lapack_int il, lapack_int iu,
  8979                                  double abstol, const double* d, const double* e,
  8980                                  lapack_int* m, lapack_int* nsplit, double* w,
  8981                                  lapack_int* iblock, lapack_int* isplit,
  8982                                  double* work, lapack_int* iwork );
  8983  
  8984  lapack_int LAPACKE_sstedc_work( int matrix_layout, char compz, lapack_int n,
  8985                                  float* d, float* e, float* z, lapack_int ldz,
  8986                                  float* work, lapack_int lwork,
  8987                                  lapack_int* iwork, lapack_int liwork );
  8988  lapack_int LAPACKE_dstedc_work( int matrix_layout, char compz, lapack_int n,
  8989                                  double* d, double* e, double* z, lapack_int ldz,
  8990                                  double* work, lapack_int lwork,
  8991                                  lapack_int* iwork, lapack_int liwork );
  8992  lapack_int LAPACKE_cstedc_work( int matrix_layout, char compz, lapack_int n,
  8993                                  float* d, float* e, lapack_complex_float* z,
  8994                                  lapack_int ldz, lapack_complex_float* work,
  8995                                  lapack_int lwork, float* rwork,
  8996                                  lapack_int lrwork, lapack_int* iwork,
  8997                                  lapack_int liwork );
  8998  lapack_int LAPACKE_zstedc_work( int matrix_layout, char compz, lapack_int n,
  8999                                  double* d, double* e, lapack_complex_double* z,
  9000                                  lapack_int ldz, lapack_complex_double* work,
  9001                                  lapack_int lwork, double* rwork,
  9002                                  lapack_int lrwork, lapack_int* iwork,
  9003                                  lapack_int liwork );
  9004  
  9005  lapack_int LAPACKE_sstegr_work( int matrix_layout, char jobz, char range,
  9006                                  lapack_int n, float* d, float* e, float vl,
  9007                                  float vu, lapack_int il, lapack_int iu,
  9008                                  float abstol, lapack_int* m, float* w, float* z,
  9009                                  lapack_int ldz, lapack_int* isuppz, float* work,
  9010                                  lapack_int lwork, lapack_int* iwork,
  9011                                  lapack_int liwork );
  9012  lapack_int LAPACKE_dstegr_work( int matrix_layout, char jobz, char range,
  9013                                  lapack_int n, double* d, double* e, double vl,
  9014                                  double vu, lapack_int il, lapack_int iu,
  9015                                  double abstol, lapack_int* m, double* w,
  9016                                  double* z, lapack_int ldz, lapack_int* isuppz,
  9017                                  double* work, lapack_int lwork,
  9018                                  lapack_int* iwork, lapack_int liwork );
  9019  lapack_int LAPACKE_cstegr_work( int matrix_layout, char jobz, char range,
  9020                                  lapack_int n, float* d, float* e, float vl,
  9021                                  float vu, lapack_int il, lapack_int iu,
  9022                                  float abstol, lapack_int* m, float* w,
  9023                                  lapack_complex_float* z, lapack_int ldz,
  9024                                  lapack_int* isuppz, float* work,
  9025                                  lapack_int lwork, lapack_int* iwork,
  9026                                  lapack_int liwork );
  9027  lapack_int LAPACKE_zstegr_work( int matrix_layout, char jobz, char range,
  9028                                  lapack_int n, double* d, double* e, double vl,
  9029                                  double vu, lapack_int il, lapack_int iu,
  9030                                  double abstol, lapack_int* m, double* w,
  9031                                  lapack_complex_double* z, lapack_int ldz,
  9032                                  lapack_int* isuppz, double* work,
  9033                                  lapack_int lwork, lapack_int* iwork,
  9034                                  lapack_int liwork );
  9035  
  9036  lapack_int LAPACKE_sstein_work( int matrix_layout, lapack_int n, const float* d,
  9037                                  const float* e, lapack_int m, const float* w,
  9038                                  const lapack_int* iblock,
  9039                                  const lapack_int* isplit, float* z,
  9040                                  lapack_int ldz, float* work, lapack_int* iwork,
  9041                                  lapack_int* ifailv );
  9042  lapack_int LAPACKE_dstein_work( int matrix_layout, lapack_int n, const double* d,
  9043                                  const double* e, lapack_int m, const double* w,
  9044                                  const lapack_int* iblock,
  9045                                  const lapack_int* isplit, double* z,
  9046                                  lapack_int ldz, double* work, lapack_int* iwork,
  9047                                  lapack_int* ifailv );
  9048  lapack_int LAPACKE_cstein_work( int matrix_layout, lapack_int n, const float* d,
  9049                                  const float* e, lapack_int m, const float* w,
  9050                                  const lapack_int* iblock,
  9051                                  const lapack_int* isplit,
  9052                                  lapack_complex_float* z, lapack_int ldz,
  9053                                  float* work, lapack_int* iwork,
  9054                                  lapack_int* ifailv );
  9055  lapack_int LAPACKE_zstein_work( int matrix_layout, lapack_int n, const double* d,
  9056                                  const double* e, lapack_int m, const double* w,
  9057                                  const lapack_int* iblock,
  9058                                  const lapack_int* isplit,
  9059                                  lapack_complex_double* z, lapack_int ldz,
  9060                                  double* work, lapack_int* iwork,
  9061                                  lapack_int* ifailv );
  9062  
  9063  lapack_int LAPACKE_sstemr_work( int matrix_layout, char jobz, char range,
  9064                                  lapack_int n, float* d, float* e, float vl,
  9065                                  float vu, lapack_int il, lapack_int iu,
  9066                                  lapack_int* m, float* w, float* z,
  9067                                  lapack_int ldz, lapack_int nzc,
  9068                                  lapack_int* isuppz, lapack_logical* tryrac,
  9069                                  float* work, lapack_int lwork,
  9070                                  lapack_int* iwork, lapack_int liwork );
  9071  lapack_int LAPACKE_dstemr_work( int matrix_layout, char jobz, char range,
  9072                                  lapack_int n, double* d, double* e, double vl,
  9073                                  double vu, lapack_int il, lapack_int iu,
  9074                                  lapack_int* m, double* w, double* z,
  9075                                  lapack_int ldz, lapack_int nzc,
  9076                                  lapack_int* isuppz, lapack_logical* tryrac,
  9077                                  double* work, lapack_int lwork,
  9078                                  lapack_int* iwork, lapack_int liwork );
  9079  lapack_int LAPACKE_cstemr_work( int matrix_layout, char jobz, char range,
  9080                                  lapack_int n, float* d, float* e, float vl,
  9081                                  float vu, lapack_int il, lapack_int iu,
  9082                                  lapack_int* m, float* w,
  9083                                  lapack_complex_float* z, lapack_int ldz,
  9084                                  lapack_int nzc, lapack_int* isuppz,
  9085                                  lapack_logical* tryrac, float* work,
  9086                                  lapack_int lwork, lapack_int* iwork,
  9087                                  lapack_int liwork );
  9088  lapack_int LAPACKE_zstemr_work( int matrix_layout, char jobz, char range,
  9089                                  lapack_int n, double* d, double* e, double vl,
  9090                                  double vu, lapack_int il, lapack_int iu,
  9091                                  lapack_int* m, double* w,
  9092                                  lapack_complex_double* z, lapack_int ldz,
  9093                                  lapack_int nzc, lapack_int* isuppz,
  9094                                  lapack_logical* tryrac, double* work,
  9095                                  lapack_int lwork, lapack_int* iwork,
  9096                                  lapack_int liwork );
  9097  
  9098  lapack_int LAPACKE_ssteqr_work( int matrix_layout, char compz, lapack_int n,
  9099                                  float* d, float* e, float* z, lapack_int ldz,
  9100                                  float* work );
  9101  lapack_int LAPACKE_dsteqr_work( int matrix_layout, char compz, lapack_int n,
  9102                                  double* d, double* e, double* z, lapack_int ldz,
  9103                                  double* work );
  9104  lapack_int LAPACKE_csteqr_work( int matrix_layout, char compz, lapack_int n,
  9105                                  float* d, float* e, lapack_complex_float* z,
  9106                                  lapack_int ldz, float* work );
  9107  lapack_int LAPACKE_zsteqr_work( int matrix_layout, char compz, lapack_int n,
  9108                                  double* d, double* e, lapack_complex_double* z,
  9109                                  lapack_int ldz, double* work );
  9110  
  9111  lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
  9112  lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
  9113  
  9114  lapack_int LAPACKE_sstev_work( int matrix_layout, char jobz, lapack_int n,
  9115                                 float* d, float* e, float* z, lapack_int ldz,
  9116                                 float* work );
  9117  lapack_int LAPACKE_dstev_work( int matrix_layout, char jobz, lapack_int n,
  9118                                 double* d, double* e, double* z, lapack_int ldz,
  9119                                 double* work );
  9120  
  9121  lapack_int LAPACKE_sstevd_work( int matrix_layout, char jobz, lapack_int n,
  9122                                  float* d, float* e, float* z, lapack_int ldz,
  9123                                  float* work, lapack_int lwork,
  9124                                  lapack_int* iwork, lapack_int liwork );
  9125  lapack_int LAPACKE_dstevd_work( int matrix_layout, char jobz, lapack_int n,
  9126                                  double* d, double* e, double* z, lapack_int ldz,
  9127                                  double* work, lapack_int lwork,
  9128                                  lapack_int* iwork, lapack_int liwork );
  9129  
  9130  lapack_int LAPACKE_sstevr_work( int matrix_layout, char jobz, char range,
  9131                                  lapack_int n, float* d, float* e, float vl,
  9132                                  float vu, lapack_int il, lapack_int iu,
  9133                                  float abstol, lapack_int* m, float* w, float* z,
  9134                                  lapack_int ldz, lapack_int* isuppz, float* work,
  9135                                  lapack_int lwork, lapack_int* iwork,
  9136                                  lapack_int liwork );
  9137  lapack_int LAPACKE_dstevr_work( int matrix_layout, char jobz, char range,
  9138                                  lapack_int n, double* d, double* e, double vl,
  9139                                  double vu, lapack_int il, lapack_int iu,
  9140                                  double abstol, lapack_int* m, double* w,
  9141                                  double* z, lapack_int ldz, lapack_int* isuppz,
  9142                                  double* work, lapack_int lwork,
  9143                                  lapack_int* iwork, lapack_int liwork );
  9144  
  9145  lapack_int LAPACKE_sstevx_work( int matrix_layout, char jobz, char range,
  9146                                  lapack_int n, float* d, float* e, float vl,
  9147                                  float vu, lapack_int il, lapack_int iu,
  9148                                  float abstol, lapack_int* m, float* w, float* z,
  9149                                  lapack_int ldz, float* work, lapack_int* iwork,
  9150                                  lapack_int* ifail );
  9151  lapack_int LAPACKE_dstevx_work( int matrix_layout, char jobz, char range,
  9152                                  lapack_int n, double* d, double* e, double vl,
  9153                                  double vu, lapack_int il, lapack_int iu,
  9154                                  double abstol, lapack_int* m, double* w,
  9155                                  double* z, lapack_int ldz, double* work,
  9156                                  lapack_int* iwork, lapack_int* ifail );
  9157  
  9158  lapack_int LAPACKE_ssycon_work( int matrix_layout, char uplo, lapack_int n,
  9159                                  const float* a, lapack_int lda,
  9160                                  const lapack_int* ipiv, float anorm,
  9161                                  float* rcond, float* work, lapack_int* iwork );
  9162  lapack_int LAPACKE_dsycon_work( int matrix_layout, char uplo, lapack_int n,
  9163                                  const double* a, lapack_int lda,
  9164                                  const lapack_int* ipiv, double anorm,
  9165                                  double* rcond, double* work,
  9166                                  lapack_int* iwork );
  9167  lapack_int LAPACKE_csycon_work( int matrix_layout, char uplo, lapack_int n,
  9168                                  const lapack_complex_float* a, lapack_int lda,
  9169                                  const lapack_int* ipiv, float anorm,
  9170                                  float* rcond, lapack_complex_float* work );
  9171  lapack_int LAPACKE_zsycon_work( int matrix_layout, char uplo, lapack_int n,
  9172                                  const lapack_complex_double* a, lapack_int lda,
  9173                                  const lapack_int* ipiv, double anorm,
  9174                                  double* rcond, lapack_complex_double* work );
  9175  
  9176  lapack_int LAPACKE_ssyequb_work( int matrix_layout, char uplo, lapack_int n,
  9177                                   const float* a, lapack_int lda, float* s,
  9178                                   float* scond, float* amax, float* work );
  9179  lapack_int LAPACKE_dsyequb_work( int matrix_layout, char uplo, lapack_int n,
  9180                                   const double* a, lapack_int lda, double* s,
  9181                                   double* scond, double* amax, double* work );
  9182  lapack_int LAPACKE_csyequb_work( int matrix_layout, char uplo, lapack_int n,
  9183                                   const lapack_complex_float* a, lapack_int lda,
  9184                                   float* s, float* scond, float* amax,
  9185                                   lapack_complex_float* work );
  9186  lapack_int LAPACKE_zsyequb_work( int matrix_layout, char uplo, lapack_int n,
  9187                                   const lapack_complex_double* a, lapack_int lda,
  9188                                   double* s, double* scond, double* amax,
  9189                                   lapack_complex_double* work );
  9190  
  9191  lapack_int LAPACKE_ssyev_work( int matrix_layout, char jobz, char uplo,
  9192                                 lapack_int n, float* a, lapack_int lda, float* w,
  9193                                 float* work, lapack_int lwork );
  9194  lapack_int LAPACKE_dsyev_work( int matrix_layout, char jobz, char uplo,
  9195                                 lapack_int n, double* a, lapack_int lda,
  9196                                 double* w, double* work, lapack_int lwork );
  9197  
  9198  lapack_int LAPACKE_ssyevd_work( int matrix_layout, char jobz, char uplo,
  9199                                  lapack_int n, float* a, lapack_int lda,
  9200                                  float* w, float* work, lapack_int lwork,
  9201                                  lapack_int* iwork, lapack_int liwork );
  9202  lapack_int LAPACKE_dsyevd_work( int matrix_layout, char jobz, char uplo,
  9203                                  lapack_int n, double* a, lapack_int lda,
  9204                                  double* w, double* work, lapack_int lwork,
  9205                                  lapack_int* iwork, lapack_int liwork );
  9206  
  9207  lapack_int LAPACKE_ssyevr_work( int matrix_layout, char jobz, char range,
  9208                                  char uplo, lapack_int n, float* a,
  9209                                  lapack_int lda, float vl, float vu,
  9210                                  lapack_int il, lapack_int iu, float abstol,
  9211                                  lapack_int* m, float* w, float* z,
  9212                                  lapack_int ldz, lapack_int* isuppz, float* work,
  9213                                  lapack_int lwork, lapack_int* iwork,
  9214                                  lapack_int liwork );
  9215  lapack_int LAPACKE_dsyevr_work( int matrix_layout, char jobz, char range,
  9216                                  char uplo, lapack_int n, double* a,
  9217                                  lapack_int lda, double vl, double vu,
  9218                                  lapack_int il, lapack_int iu, double abstol,
  9219                                  lapack_int* m, double* w, double* z,
  9220                                  lapack_int ldz, lapack_int* isuppz,
  9221                                  double* work, lapack_int lwork,
  9222                                  lapack_int* iwork, lapack_int liwork );
  9223  
  9224  lapack_int LAPACKE_ssyevx_work( int matrix_layout, char jobz, char range,
  9225                                  char uplo, lapack_int n, float* a,
  9226                                  lapack_int lda, float vl, float vu,
  9227                                  lapack_int il, lapack_int iu, float abstol,
  9228                                  lapack_int* m, float* w, float* z,
  9229                                  lapack_int ldz, float* work, lapack_int lwork,
  9230                                  lapack_int* iwork, lapack_int* ifail );
  9231  lapack_int LAPACKE_dsyevx_work( int matrix_layout, char jobz, char range,
  9232                                  char uplo, lapack_int n, double* a,
  9233                                  lapack_int lda, double vl, double vu,
  9234                                  lapack_int il, lapack_int iu, double abstol,
  9235                                  lapack_int* m, double* w, double* z,
  9236                                  lapack_int ldz, double* work, lapack_int lwork,
  9237                                  lapack_int* iwork, lapack_int* ifail );
  9238  
  9239  lapack_int LAPACKE_ssygst_work( int matrix_layout, lapack_int itype, char uplo,
  9240                                  lapack_int n, float* a, lapack_int lda,
  9241                                  const float* b, lapack_int ldb );
  9242  lapack_int LAPACKE_dsygst_work( int matrix_layout, lapack_int itype, char uplo,
  9243                                  lapack_int n, double* a, lapack_int lda,
  9244                                  const double* b, lapack_int ldb );
  9245  
  9246  lapack_int LAPACKE_ssygv_work( int matrix_layout, lapack_int itype, char jobz,
  9247                                 char uplo, lapack_int n, float* a,
  9248                                 lapack_int lda, float* b, lapack_int ldb,
  9249                                 float* w, float* work, lapack_int lwork );
  9250  lapack_int LAPACKE_dsygv_work( int matrix_layout, lapack_int itype, char jobz,
  9251                                 char uplo, lapack_int n, double* a,
  9252                                 lapack_int lda, double* b, lapack_int ldb,
  9253                                 double* w, double* work, lapack_int lwork );
  9254  
  9255  lapack_int LAPACKE_ssygvd_work( int matrix_layout, lapack_int itype, char jobz,
  9256                                  char uplo, lapack_int n, float* a,
  9257                                  lapack_int lda, float* b, lapack_int ldb,
  9258                                  float* w, float* work, lapack_int lwork,
  9259                                  lapack_int* iwork, lapack_int liwork );
  9260  lapack_int LAPACKE_dsygvd_work( int matrix_layout, lapack_int itype, char jobz,
  9261                                  char uplo, lapack_int n, double* a,
  9262                                  lapack_int lda, double* b, lapack_int ldb,
  9263                                  double* w, double* work, lapack_int lwork,
  9264                                  lapack_int* iwork, lapack_int liwork );
  9265  
  9266  lapack_int LAPACKE_ssygvx_work( int matrix_layout, lapack_int itype, char jobz,
  9267                                  char range, char uplo, lapack_int n, float* a,
  9268                                  lapack_int lda, float* b, lapack_int ldb,
  9269                                  float vl, float vu, lapack_int il,
  9270                                  lapack_int iu, float abstol, lapack_int* m,
  9271                                  float* w, float* z, lapack_int ldz, float* work,
  9272                                  lapack_int lwork, lapack_int* iwork,
  9273                                  lapack_int* ifail );
  9274  lapack_int LAPACKE_dsygvx_work( int matrix_layout, lapack_int itype, char jobz,
  9275                                  char range, char uplo, lapack_int n, double* a,
  9276                                  lapack_int lda, double* b, lapack_int ldb,
  9277                                  double vl, double vu, lapack_int il,
  9278                                  lapack_int iu, double abstol, lapack_int* m,
  9279                                  double* w, double* z, lapack_int ldz,
  9280                                  double* work, lapack_int lwork,
  9281                                  lapack_int* iwork, lapack_int* ifail );
  9282  
  9283  lapack_int LAPACKE_ssyrfs_work( int matrix_layout, char uplo, lapack_int n,
  9284                                  lapack_int nrhs, const float* a, lapack_int lda,
  9285                                  const float* af, lapack_int ldaf,
  9286                                  const lapack_int* ipiv, const float* b,
  9287                                  lapack_int ldb, float* x, lapack_int ldx,
  9288                                  float* ferr, float* berr, float* work,
  9289                                  lapack_int* iwork );
  9290  lapack_int LAPACKE_dsyrfs_work( int matrix_layout, char uplo, lapack_int n,
  9291                                  lapack_int nrhs, const double* a,
  9292                                  lapack_int lda, const double* af,
  9293                                  lapack_int ldaf, const lapack_int* ipiv,
  9294                                  const double* b, lapack_int ldb, double* x,
  9295                                  lapack_int ldx, double* ferr, double* berr,
  9296                                  double* work, lapack_int* iwork );
  9297  lapack_int LAPACKE_csyrfs_work( int matrix_layout, char uplo, lapack_int n,
  9298                                  lapack_int nrhs, const lapack_complex_float* a,
  9299                                  lapack_int lda, const lapack_complex_float* af,
  9300                                  lapack_int ldaf, const lapack_int* ipiv,
  9301                                  const lapack_complex_float* b, lapack_int ldb,
  9302                                  lapack_complex_float* x, lapack_int ldx,
  9303                                  float* ferr, float* berr,
  9304                                  lapack_complex_float* work, float* rwork );
  9305  lapack_int LAPACKE_zsyrfs_work( int matrix_layout, char uplo, lapack_int n,
  9306                                  lapack_int nrhs, const lapack_complex_double* a,
  9307                                  lapack_int lda, const lapack_complex_double* af,
  9308                                  lapack_int ldaf, const lapack_int* ipiv,
  9309                                  const lapack_complex_double* b, lapack_int ldb,
  9310                                  lapack_complex_double* x, lapack_int ldx,
  9311                                  double* ferr, double* berr,
  9312                                  lapack_complex_double* work, double* rwork );
  9313  
  9314  lapack_int LAPACKE_ssyrfsx_work( int matrix_layout, char uplo, char equed,
  9315                                   lapack_int n, lapack_int nrhs, const float* a,
  9316                                   lapack_int lda, const float* af,
  9317                                   lapack_int ldaf, const lapack_int* ipiv,
  9318                                   const float* s, const float* b, lapack_int ldb,
  9319                                   float* x, lapack_int ldx, float* rcond,
  9320                                   float* berr, lapack_int n_err_bnds,
  9321                                   float* err_bnds_norm, float* err_bnds_comp,
  9322                                   lapack_int nparams, float* params, float* work,
  9323                                   lapack_int* iwork );
  9324  lapack_int LAPACKE_dsyrfsx_work( int matrix_layout, char uplo, char equed,
  9325                                   lapack_int n, lapack_int nrhs, const double* a,
  9326                                   lapack_int lda, const double* af,
  9327                                   lapack_int ldaf, const lapack_int* ipiv,
  9328                                   const double* s, const double* b,
  9329                                   lapack_int ldb, double* x, lapack_int ldx,
  9330                                   double* rcond, double* berr,
  9331                                   lapack_int n_err_bnds, double* err_bnds_norm,
  9332                                   double* err_bnds_comp, lapack_int nparams,
  9333                                   double* params, double* work,
  9334                                   lapack_int* iwork );
  9335  lapack_int LAPACKE_csyrfsx_work( int matrix_layout, char uplo, char equed,
  9336                                   lapack_int n, lapack_int nrhs,
  9337                                   const lapack_complex_float* a, lapack_int lda,
  9338                                   const lapack_complex_float* af,
  9339                                   lapack_int ldaf, const lapack_int* ipiv,
  9340                                   const float* s, const lapack_complex_float* b,
  9341                                   lapack_int ldb, lapack_complex_float* x,
  9342                                   lapack_int ldx, float* rcond, float* berr,
  9343                                   lapack_int n_err_bnds, float* err_bnds_norm,
  9344                                   float* err_bnds_comp, lapack_int nparams,
  9345                                   float* params, lapack_complex_float* work,
  9346                                   float* rwork );
  9347  lapack_int LAPACKE_zsyrfsx_work( int matrix_layout, char uplo, char equed,
  9348                                   lapack_int n, lapack_int nrhs,
  9349                                   const lapack_complex_double* a, lapack_int lda,
  9350                                   const lapack_complex_double* af,
  9351                                   lapack_int ldaf, const lapack_int* ipiv,
  9352                                   const double* s,
  9353                                   const lapack_complex_double* b, lapack_int ldb,
  9354                                   lapack_complex_double* x, lapack_int ldx,
  9355                                   double* rcond, double* berr,
  9356                                   lapack_int n_err_bnds, double* err_bnds_norm,
  9357                                   double* err_bnds_comp, lapack_int nparams,
  9358                                   double* params, lapack_complex_double* work,
  9359                                   double* rwork );
  9360  
  9361  lapack_int LAPACKE_ssysv_work( int matrix_layout, char uplo, lapack_int n,
  9362                                 lapack_int nrhs, float* a, lapack_int lda,
  9363                                 lapack_int* ipiv, float* b, lapack_int ldb,
  9364                                 float* work, lapack_int lwork );
  9365  lapack_int LAPACKE_dsysv_work( int matrix_layout, char uplo, lapack_int n,
  9366                                 lapack_int nrhs, double* a, lapack_int lda,
  9367                                 lapack_int* ipiv, double* b, lapack_int ldb,
  9368                                 double* work, lapack_int lwork );
  9369  lapack_int LAPACKE_csysv_work( int matrix_layout, char uplo, lapack_int n,
  9370                                 lapack_int nrhs, lapack_complex_float* a,
  9371                                 lapack_int lda, lapack_int* ipiv,
  9372                                 lapack_complex_float* b, lapack_int ldb,
  9373                                 lapack_complex_float* work, lapack_int lwork );
  9374  lapack_int LAPACKE_zsysv_work( int matrix_layout, char uplo, lapack_int n,
  9375                                 lapack_int nrhs, lapack_complex_double* a,
  9376                                 lapack_int lda, lapack_int* ipiv,
  9377                                 lapack_complex_double* b, lapack_int ldb,
  9378                                 lapack_complex_double* work, lapack_int lwork );
  9379  
  9380  lapack_int LAPACKE_ssysvx_work( int matrix_layout, char fact, char uplo,
  9381                                  lapack_int n, lapack_int nrhs, const float* a,
  9382                                  lapack_int lda, float* af, lapack_int ldaf,
  9383                                  lapack_int* ipiv, const float* b,
  9384                                  lapack_int ldb, float* x, lapack_int ldx,
  9385                                  float* rcond, float* ferr, float* berr,
  9386                                  float* work, lapack_int lwork,
  9387                                  lapack_int* iwork );
  9388  lapack_int LAPACKE_dsysvx_work( int matrix_layout, char fact, char uplo,
  9389                                  lapack_int n, lapack_int nrhs, const double* a,
  9390                                  lapack_int lda, double* af, lapack_int ldaf,
  9391                                  lapack_int* ipiv, const double* b,
  9392                                  lapack_int ldb, double* x, lapack_int ldx,
  9393                                  double* rcond, double* ferr, double* berr,
  9394                                  double* work, lapack_int lwork,
  9395                                  lapack_int* iwork );
  9396  lapack_int LAPACKE_csysvx_work( int matrix_layout, char fact, char uplo,
  9397                                  lapack_int n, lapack_int nrhs,
  9398                                  const lapack_complex_float* a, lapack_int lda,
  9399                                  lapack_complex_float* af, lapack_int ldaf,
  9400                                  lapack_int* ipiv, const lapack_complex_float* b,
  9401                                  lapack_int ldb, lapack_complex_float* x,
  9402                                  lapack_int ldx, float* rcond, float* ferr,
  9403                                  float* berr, lapack_complex_float* work,
  9404                                  lapack_int lwork, float* rwork );
  9405  lapack_int LAPACKE_zsysvx_work( int matrix_layout, char fact, char uplo,
  9406                                  lapack_int n, lapack_int nrhs,
  9407                                  const lapack_complex_double* a, lapack_int lda,
  9408                                  lapack_complex_double* af, lapack_int ldaf,
  9409                                  lapack_int* ipiv,
  9410                                  const lapack_complex_double* b, lapack_int ldb,
  9411                                  lapack_complex_double* x, lapack_int ldx,
  9412                                  double* rcond, double* ferr, double* berr,
  9413                                  lapack_complex_double* work, lapack_int lwork,
  9414                                  double* rwork );
  9415  
  9416  lapack_int LAPACKE_ssysvxx_work( int matrix_layout, char fact, char uplo,
  9417                                   lapack_int n, lapack_int nrhs, float* a,
  9418                                   lapack_int lda, float* af, lapack_int ldaf,
  9419                                   lapack_int* ipiv, char* equed, float* s,
  9420                                   float* b, lapack_int ldb, float* x,
  9421                                   lapack_int ldx, float* rcond, float* rpvgrw,
  9422                                   float* berr, lapack_int n_err_bnds,
  9423                                   float* err_bnds_norm, float* err_bnds_comp,
  9424                                   lapack_int nparams, float* params, float* work,
  9425                                   lapack_int* iwork );
  9426  lapack_int LAPACKE_dsysvxx_work( int matrix_layout, char fact, char uplo,
  9427                                   lapack_int n, lapack_int nrhs, double* a,
  9428                                   lapack_int lda, double* af, lapack_int ldaf,
  9429                                   lapack_int* ipiv, char* equed, double* s,
  9430                                   double* b, lapack_int ldb, double* x,
  9431                                   lapack_int ldx, double* rcond, double* rpvgrw,
  9432                                   double* berr, lapack_int n_err_bnds,
  9433                                   double* err_bnds_norm, double* err_bnds_comp,
  9434                                   lapack_int nparams, double* params,
  9435                                   double* work, lapack_int* iwork );
  9436  lapack_int LAPACKE_csysvxx_work( int matrix_layout, char fact, char uplo,
  9437                                   lapack_int n, lapack_int nrhs,
  9438                                   lapack_complex_float* a, lapack_int lda,
  9439                                   lapack_complex_float* af, lapack_int ldaf,
  9440                                   lapack_int* ipiv, char* equed, float* s,
  9441                                   lapack_complex_float* b, lapack_int ldb,
  9442                                   lapack_complex_float* x, lapack_int ldx,
  9443                                   float* rcond, float* rpvgrw, float* berr,
  9444                                   lapack_int n_err_bnds, float* err_bnds_norm,
  9445                                   float* err_bnds_comp, lapack_int nparams,
  9446                                   float* params, lapack_complex_float* work,
  9447                                   float* rwork );
  9448  lapack_int LAPACKE_zsysvxx_work( int matrix_layout, char fact, char uplo,
  9449                                   lapack_int n, lapack_int nrhs,
  9450                                   lapack_complex_double* a, lapack_int lda,
  9451                                   lapack_complex_double* af, lapack_int ldaf,
  9452                                   lapack_int* ipiv, char* equed, double* s,
  9453                                   lapack_complex_double* b, lapack_int ldb,
  9454                                   lapack_complex_double* x, lapack_int ldx,
  9455                                   double* rcond, double* rpvgrw, double* berr,
  9456                                   lapack_int n_err_bnds, double* err_bnds_norm,
  9457                                   double* err_bnds_comp, lapack_int nparams,
  9458                                   double* params, lapack_complex_double* work,
  9459                                   double* rwork );
  9460  
  9461  lapack_int LAPACKE_ssytrd_work( int matrix_layout, char uplo, lapack_int n,
  9462                                  float* a, lapack_int lda, float* d, float* e,
  9463                                  float* tau, float* work, lapack_int lwork );
  9464  lapack_int LAPACKE_dsytrd_work( int matrix_layout, char uplo, lapack_int n,
  9465                                  double* a, lapack_int lda, double* d, double* e,
  9466                                  double* tau, double* work, lapack_int lwork );
  9467  
  9468  lapack_int LAPACKE_ssytrf_work( int matrix_layout, char uplo, lapack_int n,
  9469                                  float* a, lapack_int lda, lapack_int* ipiv,
  9470                                  float* work, lapack_int lwork );
  9471  lapack_int LAPACKE_dsytrf_work( int matrix_layout, char uplo, lapack_int n,
  9472                                  double* a, lapack_int lda, lapack_int* ipiv,
  9473                                  double* work, lapack_int lwork );
  9474  lapack_int LAPACKE_csytrf_work( int matrix_layout, char uplo, lapack_int n,
  9475                                  lapack_complex_float* a, lapack_int lda,
  9476                                  lapack_int* ipiv, lapack_complex_float* work,
  9477                                  lapack_int lwork );
  9478  lapack_int LAPACKE_zsytrf_work( int matrix_layout, char uplo, lapack_int n,
  9479                                  lapack_complex_double* a, lapack_int lda,
  9480                                  lapack_int* ipiv, lapack_complex_double* work,
  9481                                  lapack_int lwork );
  9482  
  9483  lapack_int LAPACKE_ssytri_work( int matrix_layout, char uplo, lapack_int n,
  9484                                  float* a, lapack_int lda,
  9485                                  const lapack_int* ipiv, float* work );
  9486  lapack_int LAPACKE_dsytri_work( int matrix_layout, char uplo, lapack_int n,
  9487                                  double* a, lapack_int lda,
  9488                                  const lapack_int* ipiv, double* work );
  9489  lapack_int LAPACKE_csytri_work( int matrix_layout, char uplo, lapack_int n,
  9490                                  lapack_complex_float* a, lapack_int lda,
  9491                                  const lapack_int* ipiv,
  9492                                  lapack_complex_float* work );
  9493  lapack_int LAPACKE_zsytri_work( int matrix_layout, char uplo, lapack_int n,
  9494                                  lapack_complex_double* a, lapack_int lda,
  9495                                  const lapack_int* ipiv,
  9496                                  lapack_complex_double* work );
  9497  
  9498  lapack_int LAPACKE_ssytrs_work( int matrix_layout, char uplo, lapack_int n,
  9499                                  lapack_int nrhs, const float* a, lapack_int lda,
  9500                                  const lapack_int* ipiv, float* b,
  9501                                  lapack_int ldb );
  9502  lapack_int LAPACKE_dsytrs_work( int matrix_layout, char uplo, lapack_int n,
  9503                                  lapack_int nrhs, const double* a,
  9504                                  lapack_int lda, const lapack_int* ipiv,
  9505                                  double* b, lapack_int ldb );
  9506  lapack_int LAPACKE_csytrs_work( int matrix_layout, char uplo, lapack_int n,
  9507                                  lapack_int nrhs, const lapack_complex_float* a,
  9508                                  lapack_int lda, const lapack_int* ipiv,
  9509                                  lapack_complex_float* b, lapack_int ldb );
  9510  lapack_int LAPACKE_zsytrs_work( int matrix_layout, char uplo, lapack_int n,
  9511                                  lapack_int nrhs, const lapack_complex_double* a,
  9512                                  lapack_int lda, const lapack_int* ipiv,
  9513                                  lapack_complex_double* b, lapack_int ldb );
  9514  
  9515  lapack_int LAPACKE_stbcon_work( int matrix_layout, char norm, char uplo,
  9516                                  char diag, lapack_int n, lapack_int kd,
  9517                                  const float* ab, lapack_int ldab, float* rcond,
  9518                                  float* work, lapack_int* iwork );
  9519  lapack_int LAPACKE_dtbcon_work( int matrix_layout, char norm, char uplo,
  9520                                  char diag, lapack_int n, lapack_int kd,
  9521                                  const double* ab, lapack_int ldab,
  9522                                  double* rcond, double* work,
  9523                                  lapack_int* iwork );
  9524  lapack_int LAPACKE_ctbcon_work( int matrix_layout, char norm, char uplo,
  9525                                  char diag, lapack_int n, lapack_int kd,
  9526                                  const lapack_complex_float* ab, lapack_int ldab,
  9527                                  float* rcond, lapack_complex_float* work,
  9528                                  float* rwork );
  9529  lapack_int LAPACKE_ztbcon_work( int matrix_layout, char norm, char uplo,
  9530                                  char diag, lapack_int n, lapack_int kd,
  9531                                  const lapack_complex_double* ab,
  9532                                  lapack_int ldab, double* rcond,
  9533                                  lapack_complex_double* work, double* rwork );
  9534  
  9535  lapack_int LAPACKE_stbrfs_work( int matrix_layout, char uplo, char trans,
  9536                                  char diag, lapack_int n, lapack_int kd,
  9537                                  lapack_int nrhs, const float* ab,
  9538                                  lapack_int ldab, const float* b, lapack_int ldb,
  9539                                  const float* x, lapack_int ldx, float* ferr,
  9540                                  float* berr, float* work, lapack_int* iwork );
  9541  lapack_int LAPACKE_dtbrfs_work( int matrix_layout, char uplo, char trans,
  9542                                  char diag, lapack_int n, lapack_int kd,
  9543                                  lapack_int nrhs, const double* ab,
  9544                                  lapack_int ldab, const double* b,
  9545                                  lapack_int ldb, const double* x, lapack_int ldx,
  9546                                  double* ferr, double* berr, double* work,
  9547                                  lapack_int* iwork );
  9548  lapack_int LAPACKE_ctbrfs_work( int matrix_layout, char uplo, char trans,
  9549                                  char diag, lapack_int n, lapack_int kd,
  9550                                  lapack_int nrhs, const lapack_complex_float* ab,
  9551                                  lapack_int ldab, const lapack_complex_float* b,
  9552                                  lapack_int ldb, const lapack_complex_float* x,
  9553                                  lapack_int ldx, float* ferr, float* berr,
  9554                                  lapack_complex_float* work, float* rwork );
  9555  lapack_int LAPACKE_ztbrfs_work( int matrix_layout, char uplo, char trans,
  9556                                  char diag, lapack_int n, lapack_int kd,
  9557                                  lapack_int nrhs,
  9558                                  const lapack_complex_double* ab,
  9559                                  lapack_int ldab, const lapack_complex_double* b,
  9560                                  lapack_int ldb, const lapack_complex_double* x,
  9561                                  lapack_int ldx, double* ferr, double* berr,
  9562                                  lapack_complex_double* work, double* rwork );
  9563  
  9564  lapack_int LAPACKE_stbtrs_work( int matrix_layout, char uplo, char trans,
  9565                                  char diag, lapack_int n, lapack_int kd,
  9566                                  lapack_int nrhs, const float* ab,
  9567                                  lapack_int ldab, float* b, lapack_int ldb );
  9568  lapack_int LAPACKE_dtbtrs_work( int matrix_layout, char uplo, char trans,
  9569                                  char diag, lapack_int n, lapack_int kd,
  9570                                  lapack_int nrhs, const double* ab,
  9571                                  lapack_int ldab, double* b, lapack_int ldb );
  9572  lapack_int LAPACKE_ctbtrs_work( int matrix_layout, char uplo, char trans,
  9573                                  char diag, lapack_int n, lapack_int kd,
  9574                                  lapack_int nrhs, const lapack_complex_float* ab,
  9575                                  lapack_int ldab, lapack_complex_float* b,
  9576                                  lapack_int ldb );
  9577  lapack_int LAPACKE_ztbtrs_work( int matrix_layout, char uplo, char trans,
  9578                                  char diag, lapack_int n, lapack_int kd,
  9579                                  lapack_int nrhs,
  9580                                  const lapack_complex_double* ab,
  9581                                  lapack_int ldab, lapack_complex_double* b,
  9582                                  lapack_int ldb );
  9583  
  9584  lapack_int LAPACKE_stfsm_work( int matrix_layout, char transr, char side,
  9585                                 char uplo, char trans, char diag, lapack_int m,
  9586                                 lapack_int n, float alpha, const float* a,
  9587                                 float* b, lapack_int ldb );
  9588  lapack_int LAPACKE_dtfsm_work( int matrix_layout, char transr, char side,
  9589                                 char uplo, char trans, char diag, lapack_int m,
  9590                                 lapack_int n, double alpha, const double* a,
  9591                                 double* b, lapack_int ldb );
  9592  lapack_int LAPACKE_ctfsm_work( int matrix_layout, char transr, char side,
  9593                                 char uplo, char trans, char diag, lapack_int m,
  9594                                 lapack_int n, lapack_complex_float alpha,
  9595                                 const lapack_complex_float* a,
  9596                                 lapack_complex_float* b, lapack_int ldb );
  9597  lapack_int LAPACKE_ztfsm_work( int matrix_layout, char transr, char side,
  9598                                 char uplo, char trans, char diag, lapack_int m,
  9599                                 lapack_int n, lapack_complex_double alpha,
  9600                                 const lapack_complex_double* a,
  9601                                 lapack_complex_double* b, lapack_int ldb );
  9602  
  9603  lapack_int LAPACKE_stftri_work( int matrix_layout, char transr, char uplo,
  9604                                  char diag, lapack_int n, float* a );
  9605  lapack_int LAPACKE_dtftri_work( int matrix_layout, char transr, char uplo,
  9606                                  char diag, lapack_int n, double* a );
  9607  lapack_int LAPACKE_ctftri_work( int matrix_layout, char transr, char uplo,
  9608                                  char diag, lapack_int n,
  9609                                  lapack_complex_float* a );
  9610  lapack_int LAPACKE_ztftri_work( int matrix_layout, char transr, char uplo,
  9611                                  char diag, lapack_int n,
  9612                                  lapack_complex_double* a );
  9613  
  9614  lapack_int LAPACKE_stfttp_work( int matrix_layout, char transr, char uplo,
  9615                                  lapack_int n, const float* arf, float* ap );
  9616  lapack_int LAPACKE_dtfttp_work( int matrix_layout, char transr, char uplo,
  9617                                  lapack_int n, const double* arf, double* ap );
  9618  lapack_int LAPACKE_ctfttp_work( int matrix_layout, char transr, char uplo,
  9619                                  lapack_int n, const lapack_complex_float* arf,
  9620                                  lapack_complex_float* ap );
  9621  lapack_int LAPACKE_ztfttp_work( int matrix_layout, char transr, char uplo,
  9622                                  lapack_int n, const lapack_complex_double* arf,
  9623                                  lapack_complex_double* ap );
  9624  
  9625  lapack_int LAPACKE_stfttr_work( int matrix_layout, char transr, char uplo,
  9626                                  lapack_int n, const float* arf, float* a,
  9627                                  lapack_int lda );
  9628  lapack_int LAPACKE_dtfttr_work( int matrix_layout, char transr, char uplo,
  9629                                  lapack_int n, const double* arf, double* a,
  9630                                  lapack_int lda );
  9631  lapack_int LAPACKE_ctfttr_work( int matrix_layout, char transr, char uplo,
  9632                                  lapack_int n, const lapack_complex_float* arf,
  9633                                  lapack_complex_float* a, lapack_int lda );
  9634  lapack_int LAPACKE_ztfttr_work( int matrix_layout, char transr, char uplo,
  9635                                  lapack_int n, const lapack_complex_double* arf,
  9636                                  lapack_complex_double* a, lapack_int lda );
  9637  
  9638  lapack_int LAPACKE_stgevc_work( int matrix_layout, char side, char howmny,
  9639                                  const lapack_logical* select, lapack_int n,
  9640                                  const float* s, lapack_int lds, const float* p,
  9641                                  lapack_int ldp, float* vl, lapack_int ldvl,
  9642                                  float* vr, lapack_int ldvr, lapack_int mm,
  9643                                  lapack_int* m, float* work );
  9644  lapack_int LAPACKE_dtgevc_work( int matrix_layout, char side, char howmny,
  9645                                  const lapack_logical* select, lapack_int n,
  9646                                  const double* s, lapack_int lds,
  9647                                  const double* p, lapack_int ldp, double* vl,
  9648                                  lapack_int ldvl, double* vr, lapack_int ldvr,
  9649                                  lapack_int mm, lapack_int* m, double* work );
  9650  lapack_int LAPACKE_ctgevc_work( int matrix_layout, char side, char howmny,
  9651                                  const lapack_logical* select, lapack_int n,
  9652                                  const lapack_complex_float* s, lapack_int lds,
  9653                                  const lapack_complex_float* p, lapack_int ldp,
  9654                                  lapack_complex_float* vl, lapack_int ldvl,
  9655                                  lapack_complex_float* vr, lapack_int ldvr,
  9656                                  lapack_int mm, lapack_int* m,
  9657                                  lapack_complex_float* work, float* rwork );
  9658  lapack_int LAPACKE_ztgevc_work( int matrix_layout, char side, char howmny,
  9659                                  const lapack_logical* select, lapack_int n,
  9660                                  const lapack_complex_double* s, lapack_int lds,
  9661                                  const lapack_complex_double* p, lapack_int ldp,
  9662                                  lapack_complex_double* vl, lapack_int ldvl,
  9663                                  lapack_complex_double* vr, lapack_int ldvr,
  9664                                  lapack_int mm, lapack_int* m,
  9665                                  lapack_complex_double* work, double* rwork );
  9666  
  9667  lapack_int LAPACKE_stgexc_work( int matrix_layout, lapack_logical wantq,
  9668                                  lapack_logical wantz, lapack_int n, float* a,
  9669                                  lapack_int lda, float* b, lapack_int ldb,
  9670                                  float* q, lapack_int ldq, float* z,
  9671                                  lapack_int ldz, lapack_int* ifst,
  9672                                  lapack_int* ilst, float* work,
  9673                                  lapack_int lwork );
  9674  lapack_int LAPACKE_dtgexc_work( int matrix_layout, lapack_logical wantq,
  9675                                  lapack_logical wantz, lapack_int n, double* a,
  9676                                  lapack_int lda, double* b, lapack_int ldb,
  9677                                  double* q, lapack_int ldq, double* z,
  9678                                  lapack_int ldz, lapack_int* ifst,
  9679                                  lapack_int* ilst, double* work,
  9680                                  lapack_int lwork );
  9681  lapack_int LAPACKE_ctgexc_work( int matrix_layout, lapack_logical wantq,
  9682                                  lapack_logical wantz, lapack_int n,
  9683                                  lapack_complex_float* a, lapack_int lda,
  9684                                  lapack_complex_float* b, lapack_int ldb,
  9685                                  lapack_complex_float* q, lapack_int ldq,
  9686                                  lapack_complex_float* z, lapack_int ldz,
  9687                                  lapack_int ifst, lapack_int ilst );
  9688  lapack_int LAPACKE_ztgexc_work( int matrix_layout, lapack_logical wantq,
  9689                                  lapack_logical wantz, lapack_int n,
  9690                                  lapack_complex_double* a, lapack_int lda,
  9691                                  lapack_complex_double* b, lapack_int ldb,
  9692                                  lapack_complex_double* q, lapack_int ldq,
  9693                                  lapack_complex_double* z, lapack_int ldz,
  9694                                  lapack_int ifst, lapack_int ilst );
  9695  
  9696  lapack_int LAPACKE_stgsen_work( int matrix_layout, lapack_int ijob,
  9697                                  lapack_logical wantq, lapack_logical wantz,
  9698                                  const lapack_logical* select, lapack_int n,
  9699                                  float* a, lapack_int lda, float* b,
  9700                                  lapack_int ldb, float* alphar, float* alphai,
  9701                                  float* beta, float* q, lapack_int ldq, float* z,
  9702                                  lapack_int ldz, lapack_int* m, float* pl,
  9703                                  float* pr, float* dif, float* work,
  9704                                  lapack_int lwork, lapack_int* iwork,
  9705                                  lapack_int liwork );
  9706  lapack_int LAPACKE_dtgsen_work( int matrix_layout, lapack_int ijob,
  9707                                  lapack_logical wantq, lapack_logical wantz,
  9708                                  const lapack_logical* select, lapack_int n,
  9709                                  double* a, lapack_int lda, double* b,
  9710                                  lapack_int ldb, double* alphar, double* alphai,
  9711                                  double* beta, double* q, lapack_int ldq,
  9712                                  double* z, lapack_int ldz, lapack_int* m,
  9713                                  double* pl, double* pr, double* dif,
  9714                                  double* work, lapack_int lwork,
  9715                                  lapack_int* iwork, lapack_int liwork );
  9716  lapack_int LAPACKE_ctgsen_work( int matrix_layout, lapack_int ijob,
  9717                                  lapack_logical wantq, lapack_logical wantz,
  9718                                  const lapack_logical* select, lapack_int n,
  9719                                  lapack_complex_float* a, lapack_int lda,
  9720                                  lapack_complex_float* b, lapack_int ldb,
  9721                                  lapack_complex_float* alpha,
  9722                                  lapack_complex_float* beta,
  9723                                  lapack_complex_float* q, lapack_int ldq,
  9724                                  lapack_complex_float* z, lapack_int ldz,
  9725                                  lapack_int* m, float* pl, float* pr, float* dif,
  9726                                  lapack_complex_float* work, lapack_int lwork,
  9727                                  lapack_int* iwork, lapack_int liwork );
  9728  lapack_int LAPACKE_ztgsen_work( int matrix_layout, lapack_int ijob,
  9729                                  lapack_logical wantq, lapack_logical wantz,
  9730                                  const lapack_logical* select, lapack_int n,
  9731                                  lapack_complex_double* a, lapack_int lda,
  9732                                  lapack_complex_double* b, lapack_int ldb,
  9733                                  lapack_complex_double* alpha,
  9734                                  lapack_complex_double* beta,
  9735                                  lapack_complex_double* q, lapack_int ldq,
  9736                                  lapack_complex_double* z, lapack_int ldz,
  9737                                  lapack_int* m, double* pl, double* pr,
  9738                                  double* dif, lapack_complex_double* work,
  9739                                  lapack_int lwork, lapack_int* iwork,
  9740                                  lapack_int liwork );
  9741  
  9742  lapack_int LAPACKE_stgsja_work( int matrix_layout, char jobu, char jobv,
  9743                                  char jobq, lapack_int m, lapack_int p,
  9744                                  lapack_int n, lapack_int k, lapack_int l,
  9745                                  float* a, lapack_int lda, float* b,
  9746                                  lapack_int ldb, float tola, float tolb,
  9747                                  float* alpha, float* beta, float* u,
  9748                                  lapack_int ldu, float* v, lapack_int ldv,
  9749                                  float* q, lapack_int ldq, float* work,
  9750                                  lapack_int* ncycle );
  9751  lapack_int LAPACKE_dtgsja_work( int matrix_layout, char jobu, char jobv,
  9752                                  char jobq, lapack_int m, lapack_int p,
  9753                                  lapack_int n, lapack_int k, lapack_int l,
  9754                                  double* a, lapack_int lda, double* b,
  9755                                  lapack_int ldb, double tola, double tolb,
  9756                                  double* alpha, double* beta, double* u,
  9757                                  lapack_int ldu, double* v, lapack_int ldv,
  9758                                  double* q, lapack_int ldq, double* work,
  9759                                  lapack_int* ncycle );
  9760  lapack_int LAPACKE_ctgsja_work( int matrix_layout, char jobu, char jobv,
  9761                                  char jobq, lapack_int m, lapack_int p,
  9762                                  lapack_int n, lapack_int k, lapack_int l,
  9763                                  lapack_complex_float* a, lapack_int lda,
  9764                                  lapack_complex_float* b, lapack_int ldb,
  9765                                  float tola, float tolb, float* alpha,
  9766                                  float* beta, lapack_complex_float* u,
  9767                                  lapack_int ldu, lapack_complex_float* v,
  9768                                  lapack_int ldv, lapack_complex_float* q,
  9769                                  lapack_int ldq, lapack_complex_float* work,
  9770                                  lapack_int* ncycle );
  9771  lapack_int LAPACKE_ztgsja_work( int matrix_layout, char jobu, char jobv,
  9772                                  char jobq, lapack_int m, lapack_int p,
  9773                                  lapack_int n, lapack_int k, lapack_int l,
  9774                                  lapack_complex_double* a, lapack_int lda,
  9775                                  lapack_complex_double* b, lapack_int ldb,
  9776                                  double tola, double tolb, double* alpha,
  9777                                  double* beta, lapack_complex_double* u,
  9778                                  lapack_int ldu, lapack_complex_double* v,
  9779                                  lapack_int ldv, lapack_complex_double* q,
  9780                                  lapack_int ldq, lapack_complex_double* work,
  9781                                  lapack_int* ncycle );
  9782  
  9783  lapack_int LAPACKE_stgsna_work( int matrix_layout, char job, char howmny,
  9784                                  const lapack_logical* select, lapack_int n,
  9785                                  const float* a, lapack_int lda, const float* b,
  9786                                  lapack_int ldb, const float* vl,
  9787                                  lapack_int ldvl, const float* vr,
  9788                                  lapack_int ldvr, float* s, float* dif,
  9789                                  lapack_int mm, lapack_int* m, float* work,
  9790                                  lapack_int lwork, lapack_int* iwork );
  9791  lapack_int LAPACKE_dtgsna_work( int matrix_layout, char job, char howmny,
  9792                                  const lapack_logical* select, lapack_int n,
  9793                                  const double* a, lapack_int lda,
  9794                                  const double* b, lapack_int ldb,
  9795                                  const double* vl, lapack_int ldvl,
  9796                                  const double* vr, lapack_int ldvr, double* s,
  9797                                  double* dif, lapack_int mm, lapack_int* m,
  9798                                  double* work, lapack_int lwork,
  9799                                  lapack_int* iwork );
  9800  lapack_int LAPACKE_ctgsna_work( int matrix_layout, char job, char howmny,
  9801                                  const lapack_logical* select, lapack_int n,
  9802                                  const lapack_complex_float* a, lapack_int lda,
  9803                                  const lapack_complex_float* b, lapack_int ldb,
  9804                                  const lapack_complex_float* vl, lapack_int ldvl,
  9805                                  const lapack_complex_float* vr, lapack_int ldvr,
  9806                                  float* s, float* dif, lapack_int mm,
  9807                                  lapack_int* m, lapack_complex_float* work,
  9808                                  lapack_int lwork, lapack_int* iwork );
  9809  lapack_int LAPACKE_ztgsna_work( int matrix_layout, char job, char howmny,
  9810                                  const lapack_logical* select, lapack_int n,
  9811                                  const lapack_complex_double* a, lapack_int lda,
  9812                                  const lapack_complex_double* b, lapack_int ldb,
  9813                                  const lapack_complex_double* vl,
  9814                                  lapack_int ldvl,
  9815                                  const lapack_complex_double* vr,
  9816                                  lapack_int ldvr, double* s, double* dif,
  9817                                  lapack_int mm, lapack_int* m,
  9818                                  lapack_complex_double* work, lapack_int lwork,
  9819                                  lapack_int* iwork );
  9820  
  9821  lapack_int LAPACKE_stgsyl_work( int matrix_layout, char trans, lapack_int ijob,
  9822                                  lapack_int m, lapack_int n, const float* a,
  9823                                  lapack_int lda, const float* b, lapack_int ldb,
  9824                                  float* c, lapack_int ldc, const float* d,
  9825                                  lapack_int ldd, const float* e, lapack_int lde,
  9826                                  float* f, lapack_int ldf, float* scale,
  9827                                  float* dif, float* work, lapack_int lwork,
  9828                                  lapack_int* iwork );
  9829  lapack_int LAPACKE_dtgsyl_work( int matrix_layout, char trans, lapack_int ijob,
  9830                                  lapack_int m, lapack_int n, const double* a,
  9831                                  lapack_int lda, const double* b, lapack_int ldb,
  9832                                  double* c, lapack_int ldc, const double* d,
  9833                                  lapack_int ldd, const double* e, lapack_int lde,
  9834                                  double* f, lapack_int ldf, double* scale,
  9835                                  double* dif, double* work, lapack_int lwork,
  9836                                  lapack_int* iwork );
  9837  lapack_int LAPACKE_ctgsyl_work( int matrix_layout, char trans, lapack_int ijob,
  9838                                  lapack_int m, lapack_int n,
  9839                                  const lapack_complex_float* a, lapack_int lda,
  9840                                  const lapack_complex_float* b, lapack_int ldb,
  9841                                  lapack_complex_float* c, lapack_int ldc,
  9842                                  const lapack_complex_float* d, lapack_int ldd,
  9843                                  const lapack_complex_float* e, lapack_int lde,
  9844                                  lapack_complex_float* f, lapack_int ldf,
  9845                                  float* scale, float* dif,
  9846                                  lapack_complex_float* work, lapack_int lwork,
  9847                                  lapack_int* iwork );
  9848  lapack_int LAPACKE_ztgsyl_work( int matrix_layout, char trans, lapack_int ijob,
  9849                                  lapack_int m, lapack_int n,
  9850                                  const lapack_complex_double* a, lapack_int lda,
  9851                                  const lapack_complex_double* b, lapack_int ldb,
  9852                                  lapack_complex_double* c, lapack_int ldc,
  9853                                  const lapack_complex_double* d, lapack_int ldd,
  9854                                  const lapack_complex_double* e, lapack_int lde,
  9855                                  lapack_complex_double* f, lapack_int ldf,
  9856                                  double* scale, double* dif,
  9857                                  lapack_complex_double* work, lapack_int lwork,
  9858                                  lapack_int* iwork );
  9859  
  9860  lapack_int LAPACKE_stpcon_work( int matrix_layout, char norm, char uplo,
  9861                                  char diag, lapack_int n, const float* ap,
  9862                                  float* rcond, float* work, lapack_int* iwork );
  9863  lapack_int LAPACKE_dtpcon_work( int matrix_layout, char norm, char uplo,
  9864                                  char diag, lapack_int n, const double* ap,
  9865                                  double* rcond, double* work,
  9866                                  lapack_int* iwork );
  9867  lapack_int LAPACKE_ctpcon_work( int matrix_layout, char norm, char uplo,
  9868                                  char diag, lapack_int n,
  9869                                  const lapack_complex_float* ap, float* rcond,
  9870                                  lapack_complex_float* work, float* rwork );
  9871  lapack_int LAPACKE_ztpcon_work( int matrix_layout, char norm, char uplo,
  9872                                  char diag, lapack_int n,
  9873                                  const lapack_complex_double* ap, double* rcond,
  9874                                  lapack_complex_double* work, double* rwork );
  9875  
  9876  lapack_int LAPACKE_stprfs_work( int matrix_layout, char uplo, char trans,
  9877                                  char diag, lapack_int n, lapack_int nrhs,
  9878                                  const float* ap, const float* b, lapack_int ldb,
  9879                                  const float* x, lapack_int ldx, float* ferr,
  9880                                  float* berr, float* work, lapack_int* iwork );
  9881  lapack_int LAPACKE_dtprfs_work( int matrix_layout, char uplo, char trans,
  9882                                  char diag, lapack_int n, lapack_int nrhs,
  9883                                  const double* ap, const double* b,
  9884                                  lapack_int ldb, const double* x, lapack_int ldx,
  9885                                  double* ferr, double* berr, double* work,
  9886                                  lapack_int* iwork );
  9887  lapack_int LAPACKE_ctprfs_work( int matrix_layout, char uplo, char trans,
  9888                                  char diag, lapack_int n, lapack_int nrhs,
  9889                                  const lapack_complex_float* ap,
  9890                                  const lapack_complex_float* b, lapack_int ldb,
  9891                                  const lapack_complex_float* x, lapack_int ldx,
  9892                                  float* ferr, float* berr,
  9893                                  lapack_complex_float* work, float* rwork );
  9894  lapack_int LAPACKE_ztprfs_work( int matrix_layout, char uplo, char trans,
  9895                                  char diag, lapack_int n, lapack_int nrhs,
  9896                                  const lapack_complex_double* ap,
  9897                                  const lapack_complex_double* b, lapack_int ldb,
  9898                                  const lapack_complex_double* x, lapack_int ldx,
  9899                                  double* ferr, double* berr,
  9900                                  lapack_complex_double* work, double* rwork );
  9901  
  9902  lapack_int LAPACKE_stptri_work( int matrix_layout, char uplo, char diag,
  9903                                  lapack_int n, float* ap );
  9904  lapack_int LAPACKE_dtptri_work( int matrix_layout, char uplo, char diag,
  9905                                  lapack_int n, double* ap );
  9906  lapack_int LAPACKE_ctptri_work( int matrix_layout, char uplo, char diag,
  9907                                  lapack_int n, lapack_complex_float* ap );
  9908  lapack_int LAPACKE_ztptri_work( int matrix_layout, char uplo, char diag,
  9909                                  lapack_int n, lapack_complex_double* ap );
  9910  
  9911  lapack_int LAPACKE_stptrs_work( int matrix_layout, char uplo, char trans,
  9912                                  char diag, lapack_int n, lapack_int nrhs,
  9913                                  const float* ap, float* b, lapack_int ldb );
  9914  lapack_int LAPACKE_dtptrs_work( int matrix_layout, char uplo, char trans,
  9915                                  char diag, lapack_int n, lapack_int nrhs,
  9916                                  const double* ap, double* b, lapack_int ldb );
  9917  lapack_int LAPACKE_ctptrs_work( int matrix_layout, char uplo, char trans,
  9918                                  char diag, lapack_int n, lapack_int nrhs,
  9919                                  const lapack_complex_float* ap,
  9920                                  lapack_complex_float* b, lapack_int ldb );
  9921  lapack_int LAPACKE_ztptrs_work( int matrix_layout, char uplo, char trans,
  9922                                  char diag, lapack_int n, lapack_int nrhs,
  9923                                  const lapack_complex_double* ap,
  9924                                  lapack_complex_double* b, lapack_int ldb );
  9925  
  9926  lapack_int LAPACKE_stpttf_work( int matrix_layout, char transr, char uplo,
  9927                                  lapack_int n, const float* ap, float* arf );
  9928  lapack_int LAPACKE_dtpttf_work( int matrix_layout, char transr, char uplo,
  9929                                  lapack_int n, const double* ap, double* arf );
  9930  lapack_int LAPACKE_ctpttf_work( int matrix_layout, char transr, char uplo,
  9931                                  lapack_int n, const lapack_complex_float* ap,
  9932                                  lapack_complex_float* arf );
  9933  lapack_int LAPACKE_ztpttf_work( int matrix_layout, char transr, char uplo,
  9934                                  lapack_int n, const lapack_complex_double* ap,
  9935                                  lapack_complex_double* arf );
  9936  
  9937  lapack_int LAPACKE_stpttr_work( int matrix_layout, char uplo, lapack_int n,
  9938                                  const float* ap, float* a, lapack_int lda );
  9939  lapack_int LAPACKE_dtpttr_work( int matrix_layout, char uplo, lapack_int n,
  9940                                  const double* ap, double* a, lapack_int lda );
  9941  lapack_int LAPACKE_ctpttr_work( int matrix_layout, char uplo, lapack_int n,
  9942                                  const lapack_complex_float* ap,
  9943                                  lapack_complex_float* a, lapack_int lda );
  9944  lapack_int LAPACKE_ztpttr_work( int matrix_layout, char uplo, lapack_int n,
  9945                                  const lapack_complex_double* ap,
  9946                                  lapack_complex_double* a, lapack_int lda );
  9947  
  9948  lapack_int LAPACKE_strcon_work( int matrix_layout, char norm, char uplo,
  9949                                  char diag, lapack_int n, const float* a,
  9950                                  lapack_int lda, float* rcond, float* work,
  9951                                  lapack_int* iwork );
  9952  lapack_int LAPACKE_dtrcon_work( int matrix_layout, char norm, char uplo,
  9953                                  char diag, lapack_int n, const double* a,
  9954                                  lapack_int lda, double* rcond, double* work,
  9955                                  lapack_int* iwork );
  9956  lapack_int LAPACKE_ctrcon_work( int matrix_layout, char norm, char uplo,
  9957                                  char diag, lapack_int n,
  9958                                  const lapack_complex_float* a, lapack_int lda,
  9959                                  float* rcond, lapack_complex_float* work,
  9960                                  float* rwork );
  9961  lapack_int LAPACKE_ztrcon_work( int matrix_layout, char norm, char uplo,
  9962                                  char diag, lapack_int n,
  9963                                  const lapack_complex_double* a, lapack_int lda,
  9964                                  double* rcond, lapack_complex_double* work,
  9965                                  double* rwork );
  9966  
  9967  lapack_int LAPACKE_strevc_work( int matrix_layout, char side, char howmny,
  9968                                  lapack_logical* select, lapack_int n,
  9969                                  const float* t, lapack_int ldt, float* vl,
  9970                                  lapack_int ldvl, float* vr, lapack_int ldvr,
  9971                                  lapack_int mm, lapack_int* m, float* work );
  9972  lapack_int LAPACKE_dtrevc_work( int matrix_layout, char side, char howmny,
  9973                                  lapack_logical* select, lapack_int n,
  9974                                  const double* t, lapack_int ldt, double* vl,
  9975                                  lapack_int ldvl, double* vr, lapack_int ldvr,
  9976                                  lapack_int mm, lapack_int* m, double* work );
  9977  lapack_int LAPACKE_ctrevc_work( int matrix_layout, char side, char howmny,
  9978                                  const lapack_logical* select, lapack_int n,
  9979                                  lapack_complex_float* t, lapack_int ldt,
  9980                                  lapack_complex_float* vl, lapack_int ldvl,
  9981                                  lapack_complex_float* vr, lapack_int ldvr,
  9982                                  lapack_int mm, lapack_int* m,
  9983                                  lapack_complex_float* work, float* rwork );
  9984  lapack_int LAPACKE_ztrevc_work( int matrix_layout, char side, char howmny,
  9985                                  const lapack_logical* select, lapack_int n,
  9986                                  lapack_complex_double* t, lapack_int ldt,
  9987                                  lapack_complex_double* vl, lapack_int ldvl,
  9988                                  lapack_complex_double* vr, lapack_int ldvr,
  9989                                  lapack_int mm, lapack_int* m,
  9990                                  lapack_complex_double* work, double* rwork );
  9991  
  9992  lapack_int LAPACKE_strexc_work( int matrix_layout, char compq, lapack_int n,
  9993                                  float* t, lapack_int ldt, float* q,
  9994                                  lapack_int ldq, lapack_int* ifst,
  9995                                  lapack_int* ilst, float* work );
  9996  lapack_int LAPACKE_dtrexc_work( int matrix_layout, char compq, lapack_int n,
  9997                                  double* t, lapack_int ldt, double* q,
  9998                                  lapack_int ldq, lapack_int* ifst,
  9999                                  lapack_int* ilst, double* work );
 10000  lapack_int LAPACKE_ctrexc_work( int matrix_layout, char compq, lapack_int n,
 10001                                  lapack_complex_float* t, lapack_int ldt,
 10002                                  lapack_complex_float* q, lapack_int ldq,
 10003                                  lapack_int ifst, lapack_int ilst );
 10004  lapack_int LAPACKE_ztrexc_work( int matrix_layout, char compq, lapack_int n,
 10005                                  lapack_complex_double* t, lapack_int ldt,
 10006                                  lapack_complex_double* q, lapack_int ldq,
 10007                                  lapack_int ifst, lapack_int ilst );
 10008  
 10009  lapack_int LAPACKE_strrfs_work( int matrix_layout, char uplo, char trans,
 10010                                  char diag, lapack_int n, lapack_int nrhs,
 10011                                  const float* a, lapack_int lda, const float* b,
 10012                                  lapack_int ldb, const float* x, lapack_int ldx,
 10013                                  float* ferr, float* berr, float* work,
 10014                                  lapack_int* iwork );
 10015  lapack_int LAPACKE_dtrrfs_work( int matrix_layout, char uplo, char trans,
 10016                                  char diag, lapack_int n, lapack_int nrhs,
 10017                                  const double* a, lapack_int lda,
 10018                                  const double* b, lapack_int ldb,
 10019                                  const double* x, lapack_int ldx, double* ferr,
 10020                                  double* berr, double* work, lapack_int* iwork );
 10021  lapack_int LAPACKE_ctrrfs_work( int matrix_layout, char uplo, char trans,
 10022                                  char diag, lapack_int n, lapack_int nrhs,
 10023                                  const lapack_complex_float* a, lapack_int lda,
 10024                                  const lapack_complex_float* b, lapack_int ldb,
 10025                                  const lapack_complex_float* x, lapack_int ldx,
 10026                                  float* ferr, float* berr,
 10027                                  lapack_complex_float* work, float* rwork );
 10028  lapack_int LAPACKE_ztrrfs_work( int matrix_layout, char uplo, char trans,
 10029                                  char diag, lapack_int n, lapack_int nrhs,
 10030                                  const lapack_complex_double* a, lapack_int lda,
 10031                                  const lapack_complex_double* b, lapack_int ldb,
 10032                                  const lapack_complex_double* x, lapack_int ldx,
 10033                                  double* ferr, double* berr,
 10034                                  lapack_complex_double* work, double* rwork );
 10035  
 10036  lapack_int LAPACKE_strsen_work( int matrix_layout, char job, char compq,
 10037                                  const lapack_logical* select, lapack_int n,
 10038                                  float* t, lapack_int ldt, float* q,
 10039                                  lapack_int ldq, float* wr, float* wi,
 10040                                  lapack_int* m, float* s, float* sep,
 10041                                  float* work, lapack_int lwork,
 10042                                  lapack_int* iwork, lapack_int liwork );
 10043  lapack_int LAPACKE_dtrsen_work( int matrix_layout, char job, char compq,
 10044                                  const lapack_logical* select, lapack_int n,
 10045                                  double* t, lapack_int ldt, double* q,
 10046                                  lapack_int ldq, double* wr, double* wi,
 10047                                  lapack_int* m, double* s, double* sep,
 10048                                  double* work, lapack_int lwork,
 10049                                  lapack_int* iwork, lapack_int liwork );
 10050  lapack_int LAPACKE_ctrsen_work( int matrix_layout, char job, char compq,
 10051                                  const lapack_logical* select, lapack_int n,
 10052                                  lapack_complex_float* t, lapack_int ldt,
 10053                                  lapack_complex_float* q, lapack_int ldq,
 10054                                  lapack_complex_float* w, lapack_int* m,
 10055                                  float* s, float* sep,
 10056                                  lapack_complex_float* work, lapack_int lwork );
 10057  lapack_int LAPACKE_ztrsen_work( int matrix_layout, char job, char compq,
 10058                                  const lapack_logical* select, lapack_int n,
 10059                                  lapack_complex_double* t, lapack_int ldt,
 10060                                  lapack_complex_double* q, lapack_int ldq,
 10061                                  lapack_complex_double* w, lapack_int* m,
 10062                                  double* s, double* sep,
 10063                                  lapack_complex_double* work, lapack_int lwork );
 10064  
 10065  lapack_int LAPACKE_strsna_work( int matrix_layout, char job, char howmny,
 10066                                  const lapack_logical* select, lapack_int n,
 10067                                  const float* t, lapack_int ldt, const float* vl,
 10068                                  lapack_int ldvl, const float* vr,
 10069                                  lapack_int ldvr, float* s, float* sep,
 10070                                  lapack_int mm, lapack_int* m, float* work,
 10071                                  lapack_int ldwork, lapack_int* iwork );
 10072  lapack_int LAPACKE_dtrsna_work( int matrix_layout, char job, char howmny,
 10073                                  const lapack_logical* select, lapack_int n,
 10074                                  const double* t, lapack_int ldt,
 10075                                  const double* vl, lapack_int ldvl,
 10076                                  const double* vr, lapack_int ldvr, double* s,
 10077                                  double* sep, lapack_int mm, lapack_int* m,
 10078                                  double* work, lapack_int ldwork,
 10079                                  lapack_int* iwork );
 10080  lapack_int LAPACKE_ctrsna_work( int matrix_layout, char job, char howmny,
 10081                                  const lapack_logical* select, lapack_int n,
 10082                                  const lapack_complex_float* t, lapack_int ldt,
 10083                                  const lapack_complex_float* vl, lapack_int ldvl,
 10084                                  const lapack_complex_float* vr, lapack_int ldvr,
 10085                                  float* s, float* sep, lapack_int mm,
 10086                                  lapack_int* m, lapack_complex_float* work,
 10087                                  lapack_int ldwork, float* rwork );
 10088  lapack_int LAPACKE_ztrsna_work( int matrix_layout, char job, char howmny,
 10089                                  const lapack_logical* select, lapack_int n,
 10090                                  const lapack_complex_double* t, lapack_int ldt,
 10091                                  const lapack_complex_double* vl,
 10092                                  lapack_int ldvl,
 10093                                  const lapack_complex_double* vr,
 10094                                  lapack_int ldvr, double* s, double* sep,
 10095                                  lapack_int mm, lapack_int* m,
 10096                                  lapack_complex_double* work, lapack_int ldwork,
 10097                                  double* rwork );
 10098  
 10099  lapack_int LAPACKE_strsyl_work( int matrix_layout, char trana, char tranb,
 10100                                  lapack_int isgn, lapack_int m, lapack_int n,
 10101                                  const float* a, lapack_int lda, const float* b,
 10102                                  lapack_int ldb, float* c, lapack_int ldc,
 10103                                  float* scale );
 10104  lapack_int LAPACKE_dtrsyl_work( int matrix_layout, char trana, char tranb,
 10105                                  lapack_int isgn, lapack_int m, lapack_int n,
 10106                                  const double* a, lapack_int lda,
 10107                                  const double* b, lapack_int ldb, double* c,
 10108                                  lapack_int ldc, double* scale );
 10109  lapack_int LAPACKE_ctrsyl_work( int matrix_layout, char trana, char tranb,
 10110                                  lapack_int isgn, lapack_int m, lapack_int n,
 10111                                  const lapack_complex_float* a, lapack_int lda,
 10112                                  const lapack_complex_float* b, lapack_int ldb,
 10113                                  lapack_complex_float* c, lapack_int ldc,
 10114                                  float* scale );
 10115  lapack_int LAPACKE_ztrsyl_work( int matrix_layout, char trana, char tranb,
 10116                                  lapack_int isgn, lapack_int m, lapack_int n,
 10117                                  const lapack_complex_double* a, lapack_int lda,
 10118                                  const lapack_complex_double* b, lapack_int ldb,
 10119                                  lapack_complex_double* c, lapack_int ldc,
 10120                                  double* scale );
 10121  
 10122  lapack_int LAPACKE_strtri_work( int matrix_layout, char uplo, char diag,
 10123                                  lapack_int n, float* a, lapack_int lda );
 10124  lapack_int LAPACKE_dtrtri_work( int matrix_layout, char uplo, char diag,
 10125                                  lapack_int n, double* a, lapack_int lda );
 10126  lapack_int LAPACKE_ctrtri_work( int matrix_layout, char uplo, char diag,
 10127                                  lapack_int n, lapack_complex_float* a,
 10128                                  lapack_int lda );
 10129  lapack_int LAPACKE_ztrtri_work( int matrix_layout, char uplo, char diag,
 10130                                  lapack_int n, lapack_complex_double* a,
 10131                                  lapack_int lda );
 10132  
 10133  lapack_int LAPACKE_strtrs_work( int matrix_layout, char uplo, char trans,
 10134                                  char diag, lapack_int n, lapack_int nrhs,
 10135                                  const float* a, lapack_int lda, float* b,
 10136                                  lapack_int ldb );
 10137  lapack_int LAPACKE_dtrtrs_work( int matrix_layout, char uplo, char trans,
 10138                                  char diag, lapack_int n, lapack_int nrhs,
 10139                                  const double* a, lapack_int lda, double* b,
 10140                                  lapack_int ldb );
 10141  lapack_int LAPACKE_ctrtrs_work( int matrix_layout, char uplo, char trans,
 10142                                  char diag, lapack_int n, lapack_int nrhs,
 10143                                  const lapack_complex_float* a, lapack_int lda,
 10144                                  lapack_complex_float* b, lapack_int ldb );
 10145  lapack_int LAPACKE_ztrtrs_work( int matrix_layout, char uplo, char trans,
 10146                                  char diag, lapack_int n, lapack_int nrhs,
 10147                                  const lapack_complex_double* a, lapack_int lda,
 10148                                  lapack_complex_double* b, lapack_int ldb );
 10149  
 10150  lapack_int LAPACKE_strttf_work( int matrix_layout, char transr, char uplo,
 10151                                  lapack_int n, const float* a, lapack_int lda,
 10152                                  float* arf );
 10153  lapack_int LAPACKE_dtrttf_work( int matrix_layout, char transr, char uplo,
 10154                                  lapack_int n, const double* a, lapack_int lda,
 10155                                  double* arf );
 10156  lapack_int LAPACKE_ctrttf_work( int matrix_layout, char transr, char uplo,
 10157                                  lapack_int n, const lapack_complex_float* a,
 10158                                  lapack_int lda, lapack_complex_float* arf );
 10159  lapack_int LAPACKE_ztrttf_work( int matrix_layout, char transr, char uplo,
 10160                                  lapack_int n, const lapack_complex_double* a,
 10161                                  lapack_int lda, lapack_complex_double* arf );
 10162  
 10163  lapack_int LAPACKE_strttp_work( int matrix_layout, char uplo, lapack_int n,
 10164                                  const float* a, lapack_int lda, float* ap );
 10165  lapack_int LAPACKE_dtrttp_work( int matrix_layout, char uplo, lapack_int n,
 10166                                  const double* a, lapack_int lda, double* ap );
 10167  lapack_int LAPACKE_ctrttp_work( int matrix_layout, char uplo, lapack_int n,
 10168                                  const lapack_complex_float* a, lapack_int lda,
 10169                                  lapack_complex_float* ap );
 10170  lapack_int LAPACKE_ztrttp_work( int matrix_layout, char uplo, lapack_int n,
 10171                                  const lapack_complex_double* a, lapack_int lda,
 10172                                  lapack_complex_double* ap );
 10173  
 10174  lapack_int LAPACKE_stzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
 10175                                  float* a, lapack_int lda, float* tau,
 10176                                  float* work, lapack_int lwork );
 10177  lapack_int LAPACKE_dtzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
 10178                                  double* a, lapack_int lda, double* tau,
 10179                                  double* work, lapack_int lwork );
 10180  lapack_int LAPACKE_ctzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
 10181                                  lapack_complex_float* a, lapack_int lda,
 10182                                  lapack_complex_float* tau,
 10183                                  lapack_complex_float* work, lapack_int lwork );
 10184  lapack_int LAPACKE_ztzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
 10185                                  lapack_complex_double* a, lapack_int lda,
 10186                                  lapack_complex_double* tau,
 10187                                  lapack_complex_double* work, lapack_int lwork );
 10188  
 10189  lapack_int LAPACKE_cungbr_work( int matrix_layout, char vect, lapack_int m,
 10190                                  lapack_int n, lapack_int k,
 10191                                  lapack_complex_float* a, lapack_int lda,
 10192                                  const lapack_complex_float* tau,
 10193                                  lapack_complex_float* work, lapack_int lwork );
 10194  lapack_int LAPACKE_zungbr_work( int matrix_layout, char vect, lapack_int m,
 10195                                  lapack_int n, lapack_int k,
 10196                                  lapack_complex_double* a, lapack_int lda,
 10197                                  const lapack_complex_double* tau,
 10198                                  lapack_complex_double* work, lapack_int lwork );
 10199  
 10200  lapack_int LAPACKE_cunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
 10201                                  lapack_int ihi, lapack_complex_float* a,
 10202                                  lapack_int lda, const lapack_complex_float* tau,
 10203                                  lapack_complex_float* work, lapack_int lwork );
 10204  lapack_int LAPACKE_zunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
 10205                                  lapack_int ihi, lapack_complex_double* a,
 10206                                  lapack_int lda,
 10207                                  const lapack_complex_double* tau,
 10208                                  lapack_complex_double* work, lapack_int lwork );
 10209  
 10210  lapack_int LAPACKE_cunglq_work( int matrix_layout, lapack_int m, lapack_int n,
 10211                                  lapack_int k, lapack_complex_float* a,
 10212                                  lapack_int lda, const lapack_complex_float* tau,
 10213                                  lapack_complex_float* work, lapack_int lwork );
 10214  lapack_int LAPACKE_zunglq_work( int matrix_layout, lapack_int m, lapack_int n,
 10215                                  lapack_int k, lapack_complex_double* a,
 10216                                  lapack_int lda,
 10217                                  const lapack_complex_double* tau,
 10218                                  lapack_complex_double* work, lapack_int lwork );
 10219  
 10220  lapack_int LAPACKE_cungql_work( int matrix_layout, lapack_int m, lapack_int n,
 10221                                  lapack_int k, lapack_complex_float* a,
 10222                                  lapack_int lda, const lapack_complex_float* tau,
 10223                                  lapack_complex_float* work, lapack_int lwork );
 10224  lapack_int LAPACKE_zungql_work( int matrix_layout, lapack_int m, lapack_int n,
 10225                                  lapack_int k, lapack_complex_double* a,
 10226                                  lapack_int lda,
 10227                                  const lapack_complex_double* tau,
 10228                                  lapack_complex_double* work, lapack_int lwork );
 10229  
 10230  lapack_int LAPACKE_cungqr_work( int matrix_layout, lapack_int m, lapack_int n,
 10231                                  lapack_int k, lapack_complex_float* a,
 10232                                  lapack_int lda, const lapack_complex_float* tau,
 10233                                  lapack_complex_float* work, lapack_int lwork );
 10234  lapack_int LAPACKE_zungqr_work( int matrix_layout, lapack_int m, lapack_int n,
 10235                                  lapack_int k, lapack_complex_double* a,
 10236                                  lapack_int lda,
 10237                                  const lapack_complex_double* tau,
 10238                                  lapack_complex_double* work, lapack_int lwork );
 10239  
 10240  lapack_int LAPACKE_cungrq_work( int matrix_layout, lapack_int m, lapack_int n,
 10241                                  lapack_int k, lapack_complex_float* a,
 10242                                  lapack_int lda, const lapack_complex_float* tau,
 10243                                  lapack_complex_float* work, lapack_int lwork );
 10244  lapack_int LAPACKE_zungrq_work( int matrix_layout, lapack_int m, lapack_int n,
 10245                                  lapack_int k, lapack_complex_double* a,
 10246                                  lapack_int lda,
 10247                                  const lapack_complex_double* tau,
 10248                                  lapack_complex_double* work, lapack_int lwork );
 10249  
 10250  lapack_int LAPACKE_cungtr_work( int matrix_layout, char uplo, lapack_int n,
 10251                                  lapack_complex_float* a, lapack_int lda,
 10252                                  const lapack_complex_float* tau,
 10253                                  lapack_complex_float* work, lapack_int lwork );
 10254  lapack_int LAPACKE_zungtr_work( int matrix_layout, char uplo, lapack_int n,
 10255                                  lapack_complex_double* a, lapack_int lda,
 10256                                  const lapack_complex_double* tau,
 10257                                  lapack_complex_double* work, lapack_int lwork );
 10258  
 10259  lapack_int LAPACKE_cunmbr_work( int matrix_layout, char vect, char side,
 10260                                  char trans, lapack_int m, lapack_int n,
 10261                                  lapack_int k, const lapack_complex_float* a,
 10262                                  lapack_int lda, const lapack_complex_float* tau,
 10263                                  lapack_complex_float* c, lapack_int ldc,
 10264                                  lapack_complex_float* work, lapack_int lwork );
 10265  lapack_int LAPACKE_zunmbr_work( int matrix_layout, char vect, char side,
 10266                                  char trans, lapack_int m, lapack_int n,
 10267                                  lapack_int k, const lapack_complex_double* a,
 10268                                  lapack_int lda,
 10269                                  const lapack_complex_double* tau,
 10270                                  lapack_complex_double* c, lapack_int ldc,
 10271                                  lapack_complex_double* work, lapack_int lwork );
 10272  
 10273  lapack_int LAPACKE_cunmhr_work( int matrix_layout, char side, char trans,
 10274                                  lapack_int m, lapack_int n, lapack_int ilo,
 10275                                  lapack_int ihi, const lapack_complex_float* a,
 10276                                  lapack_int lda, const lapack_complex_float* tau,
 10277                                  lapack_complex_float* c, lapack_int ldc,
 10278                                  lapack_complex_float* work, lapack_int lwork );
 10279  lapack_int LAPACKE_zunmhr_work( int matrix_layout, char side, char trans,
 10280                                  lapack_int m, lapack_int n, lapack_int ilo,
 10281                                  lapack_int ihi, const lapack_complex_double* a,
 10282                                  lapack_int lda,
 10283                                  const lapack_complex_double* tau,
 10284                                  lapack_complex_double* c, lapack_int ldc,
 10285                                  lapack_complex_double* work, lapack_int lwork );
 10286  
 10287  lapack_int LAPACKE_cunmlq_work( int matrix_layout, char side, char trans,
 10288                                  lapack_int m, lapack_int n, lapack_int k,
 10289                                  const lapack_complex_float* a, lapack_int lda,
 10290                                  const lapack_complex_float* tau,
 10291                                  lapack_complex_float* c, lapack_int ldc,
 10292                                  lapack_complex_float* work, lapack_int lwork );
 10293  lapack_int LAPACKE_zunmlq_work( int matrix_layout, char side, char trans,
 10294                                  lapack_int m, lapack_int n, lapack_int k,
 10295                                  const lapack_complex_double* a, lapack_int lda,
 10296                                  const lapack_complex_double* tau,
 10297                                  lapack_complex_double* c, lapack_int ldc,
 10298                                  lapack_complex_double* work, lapack_int lwork );
 10299  
 10300  lapack_int LAPACKE_cunmql_work( int matrix_layout, char side, char trans,
 10301                                  lapack_int m, lapack_int n, lapack_int k,
 10302                                  const lapack_complex_float* a, lapack_int lda,
 10303                                  const lapack_complex_float* tau,
 10304                                  lapack_complex_float* c, lapack_int ldc,
 10305                                  lapack_complex_float* work, lapack_int lwork );
 10306  lapack_int LAPACKE_zunmql_work( int matrix_layout, char side, char trans,
 10307                                  lapack_int m, lapack_int n, lapack_int k,
 10308                                  const lapack_complex_double* a, lapack_int lda,
 10309                                  const lapack_complex_double* tau,
 10310                                  lapack_complex_double* c, lapack_int ldc,
 10311                                  lapack_complex_double* work, lapack_int lwork );
 10312  
 10313  lapack_int LAPACKE_cunmqr_work( int matrix_layout, char side, char trans,
 10314                                  lapack_int m, lapack_int n, lapack_int k,
 10315                                  const lapack_complex_float* a, lapack_int lda,
 10316                                  const lapack_complex_float* tau,
 10317                                  lapack_complex_float* c, lapack_int ldc,
 10318                                  lapack_complex_float* work, lapack_int lwork );
 10319  lapack_int LAPACKE_zunmqr_work( int matrix_layout, char side, char trans,
 10320                                  lapack_int m, lapack_int n, lapack_int k,
 10321                                  const lapack_complex_double* a, lapack_int lda,
 10322                                  const lapack_complex_double* tau,
 10323                                  lapack_complex_double* c, lapack_int ldc,
 10324                                  lapack_complex_double* work, lapack_int lwork );
 10325  
 10326  lapack_int LAPACKE_cunmrq_work( int matrix_layout, char side, char trans,
 10327                                  lapack_int m, lapack_int n, lapack_int k,
 10328                                  const lapack_complex_float* a, lapack_int lda,
 10329                                  const lapack_complex_float* tau,
 10330                                  lapack_complex_float* c, lapack_int ldc,
 10331                                  lapack_complex_float* work, lapack_int lwork );
 10332  lapack_int LAPACKE_zunmrq_work( int matrix_layout, char side, char trans,
 10333                                  lapack_int m, lapack_int n, lapack_int k,
 10334                                  const lapack_complex_double* a, lapack_int lda,
 10335                                  const lapack_complex_double* tau,
 10336                                  lapack_complex_double* c, lapack_int ldc,
 10337                                  lapack_complex_double* work, lapack_int lwork );
 10338  
 10339  lapack_int LAPACKE_cunmrz_work( int matrix_layout, char side, char trans,
 10340                                  lapack_int m, lapack_int n, lapack_int k,
 10341                                  lapack_int l, const lapack_complex_float* a,
 10342                                  lapack_int lda, const lapack_complex_float* tau,
 10343                                  lapack_complex_float* c, lapack_int ldc,
 10344                                  lapack_complex_float* work, lapack_int lwork );
 10345  lapack_int LAPACKE_zunmrz_work( int matrix_layout, char side, char trans,
 10346                                  lapack_int m, lapack_int n, lapack_int k,
 10347                                  lapack_int l, const lapack_complex_double* a,
 10348                                  lapack_int lda,
 10349                                  const lapack_complex_double* tau,
 10350                                  lapack_complex_double* c, lapack_int ldc,
 10351                                  lapack_complex_double* work, lapack_int lwork );
 10352  
 10353  lapack_int LAPACKE_cunmtr_work( int matrix_layout, char side, char uplo,
 10354                                  char trans, lapack_int m, lapack_int n,
 10355                                  const lapack_complex_float* a, lapack_int lda,
 10356                                  const lapack_complex_float* tau,
 10357                                  lapack_complex_float* c, lapack_int ldc,
 10358                                  lapack_complex_float* work, lapack_int lwork );
 10359  lapack_int LAPACKE_zunmtr_work( int matrix_layout, char side, char uplo,
 10360                                  char trans, lapack_int m, lapack_int n,
 10361                                  const lapack_complex_double* a, lapack_int lda,
 10362                                  const lapack_complex_double* tau,
 10363                                  lapack_complex_double* c, lapack_int ldc,
 10364                                  lapack_complex_double* work, lapack_int lwork );
 10365  
 10366  lapack_int LAPACKE_cupgtr_work( int matrix_layout, char uplo, lapack_int n,
 10367                                  const lapack_complex_float* ap,
 10368                                  const lapack_complex_float* tau,
 10369                                  lapack_complex_float* q, lapack_int ldq,
 10370                                  lapack_complex_float* work );
 10371  lapack_int LAPACKE_zupgtr_work( int matrix_layout, char uplo, lapack_int n,
 10372                                  const lapack_complex_double* ap,
 10373                                  const lapack_complex_double* tau,
 10374                                  lapack_complex_double* q, lapack_int ldq,
 10375                                  lapack_complex_double* work );
 10376  
 10377  lapack_int LAPACKE_cupmtr_work( int matrix_layout, char side, char uplo,
 10378                                  char trans, lapack_int m, lapack_int n,
 10379                                  const lapack_complex_float* ap,
 10380                                  const lapack_complex_float* tau,
 10381                                  lapack_complex_float* c, lapack_int ldc,
 10382                                  lapack_complex_float* work );
 10383  lapack_int LAPACKE_zupmtr_work( int matrix_layout, char side, char uplo,
 10384                                  char trans, lapack_int m, lapack_int n,
 10385                                  const lapack_complex_double* ap,
 10386                                  const lapack_complex_double* tau,
 10387                                  lapack_complex_double* c, lapack_int ldc,
 10388                                  lapack_complex_double* work );
 10389  
 10390  lapack_int LAPACKE_claghe( int matrix_layout, lapack_int n, lapack_int k,
 10391                             const float* d, lapack_complex_float* a,
 10392                             lapack_int lda, lapack_int* iseed );
 10393  lapack_int LAPACKE_zlaghe( int matrix_layout, lapack_int n, lapack_int k,
 10394                             const double* d, lapack_complex_double* a,
 10395                             lapack_int lda, lapack_int* iseed );
 10396  
 10397  lapack_int LAPACKE_slagsy( int matrix_layout, lapack_int n, lapack_int k,
 10398                             const float* d, float* a, lapack_int lda,
 10399                             lapack_int* iseed );
 10400  lapack_int LAPACKE_dlagsy( int matrix_layout, lapack_int n, lapack_int k,
 10401                             const double* d, double* a, lapack_int lda,
 10402                             lapack_int* iseed );
 10403  lapack_int LAPACKE_clagsy( int matrix_layout, lapack_int n, lapack_int k,
 10404                             const float* d, lapack_complex_float* a,
 10405                             lapack_int lda, lapack_int* iseed );
 10406  lapack_int LAPACKE_zlagsy( int matrix_layout, lapack_int n, lapack_int k,
 10407                             const double* d, lapack_complex_double* a,
 10408                             lapack_int lda, lapack_int* iseed );
 10409  
 10410  lapack_int LAPACKE_slapmr( int matrix_layout, lapack_logical forwrd,
 10411                             lapack_int m, lapack_int n, float* x, lapack_int ldx,
 10412                             lapack_int* k );
 10413  lapack_int LAPACKE_dlapmr( int matrix_layout, lapack_logical forwrd,
 10414                             lapack_int m, lapack_int n, double* x,
 10415                             lapack_int ldx, lapack_int* k );
 10416  lapack_int LAPACKE_clapmr( int matrix_layout, lapack_logical forwrd,
 10417                             lapack_int m, lapack_int n, lapack_complex_float* x,
 10418                             lapack_int ldx, lapack_int* k );
 10419  lapack_int LAPACKE_zlapmr( int matrix_layout, lapack_logical forwrd,
 10420                             lapack_int m, lapack_int n, lapack_complex_double* x,
 10421                             lapack_int ldx, lapack_int* k );
 10422  
 10423  lapack_int LAPACKE_slapmt( int matrix_layout, lapack_logical forwrd,
 10424                             lapack_int m, lapack_int n, float* x, lapack_int ldx,
 10425                             lapack_int* k );
 10426  lapack_int LAPACKE_dlapmt( int matrix_layout, lapack_logical forwrd,
 10427                             lapack_int m, lapack_int n, double* x,
 10428                             lapack_int ldx, lapack_int* k );
 10429  lapack_int LAPACKE_clapmt( int matrix_layout, lapack_logical forwrd,
 10430                             lapack_int m, lapack_int n, lapack_complex_float* x,
 10431                             lapack_int ldx, lapack_int* k );
 10432  lapack_int LAPACKE_zlapmt( int matrix_layout, lapack_logical forwrd,
 10433                             lapack_int m, lapack_int n, lapack_complex_double* x,
 10434                             lapack_int ldx, lapack_int* k );
 10435  
 10436  float LAPACKE_slapy2( float x, float y );
 10437  double LAPACKE_dlapy2( double x, double y );
 10438  
 10439  float LAPACKE_slapy3( float x, float y, float z );
 10440  double LAPACKE_dlapy3( double x, double y, double z );
 10441  
 10442  lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
 10443  lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
 10444                              double* r );
 10445  
 10446  lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
 10447                              float* sn );
 10448  lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
 10449                              double* sn );
 10450  
 10451  
 10452  //LAPACK 3.3.0
 10453  lapack_int LAPACKE_cbbcsd( int matrix_layout, char jobu1, char jobu2,
 10454                             char jobv1t, char jobv2t, char trans, lapack_int m,
 10455                             lapack_int p, lapack_int q, float* theta, float* phi,
 10456                             lapack_complex_float* u1, lapack_int ldu1,
 10457                             lapack_complex_float* u2, lapack_int ldu2,
 10458                             lapack_complex_float* v1t, lapack_int ldv1t,
 10459                             lapack_complex_float* v2t, lapack_int ldv2t,
 10460                             float* b11d, float* b11e, float* b12d, float* b12e,
 10461                             float* b21d, float* b21e, float* b22d, float* b22e );
 10462  lapack_int LAPACKE_cbbcsd_work( int matrix_layout, char jobu1, char jobu2,
 10463                                  char jobv1t, char jobv2t, char trans,
 10464                                  lapack_int m, lapack_int p, lapack_int q,
 10465                                  float* theta, float* phi,
 10466                                  lapack_complex_float* u1, lapack_int ldu1,
 10467                                  lapack_complex_float* u2, lapack_int ldu2,
 10468                                  lapack_complex_float* v1t, lapack_int ldv1t,
 10469                                  lapack_complex_float* v2t, lapack_int ldv2t,
 10470                                  float* b11d, float* b11e, float* b12d,
 10471                                  float* b12e, float* b21d, float* b21e,
 10472                                  float* b22d, float* b22e, float* rwork,
 10473                                  lapack_int lrwork );
 10474  lapack_int LAPACKE_cheswapr( int matrix_layout, char uplo, lapack_int n,
 10475                               lapack_complex_float* a, lapack_int i1,
 10476                               lapack_int i2 );
 10477  lapack_int LAPACKE_cheswapr_work( int matrix_layout, char uplo, lapack_int n,
 10478                                    lapack_complex_float* a, lapack_int i1,
 10479                                    lapack_int i2 );
 10480  lapack_int LAPACKE_chetri2( int matrix_layout, char uplo, lapack_int n,
 10481                              lapack_complex_float* a, lapack_int lda,
 10482                              const lapack_int* ipiv );
 10483  lapack_int LAPACKE_chetri2_work( int matrix_layout, char uplo, lapack_int n,
 10484                                   lapack_complex_float* a, lapack_int lda,
 10485                                   const lapack_int* ipiv,
 10486                                   lapack_complex_float* work, lapack_int lwork );
 10487  lapack_int LAPACKE_chetri2x( int matrix_layout, char uplo, lapack_int n,
 10488                               lapack_complex_float* a, lapack_int lda,
 10489                               const lapack_int* ipiv, lapack_int nb );
 10490  lapack_int LAPACKE_chetri2x_work( int matrix_layout, char uplo, lapack_int n,
 10491                                    lapack_complex_float* a, lapack_int lda,
 10492                                    const lapack_int* ipiv,
 10493                                    lapack_complex_float* work, lapack_int nb );
 10494  lapack_int LAPACKE_chetrs2( int matrix_layout, char uplo, lapack_int n,
 10495                              lapack_int nrhs, const lapack_complex_float* a,
 10496                              lapack_int lda, const lapack_int* ipiv,
 10497                              lapack_complex_float* b, lapack_int ldb );
 10498  lapack_int LAPACKE_chetrs2_work( int matrix_layout, char uplo, lapack_int n,
 10499                                   lapack_int nrhs, const lapack_complex_float* a,
 10500                                   lapack_int lda, const lapack_int* ipiv,
 10501                                   lapack_complex_float* b, lapack_int ldb,
 10502                                   lapack_complex_float* work );
 10503  lapack_int LAPACKE_csyconv( int matrix_layout, char uplo, char way, lapack_int n,
 10504                              lapack_complex_float* a, lapack_int lda,
 10505                              const lapack_int* ipiv, lapack_complex_float* work  );
 10506  lapack_int LAPACKE_csyconv_work( int matrix_layout, char uplo, char way,
 10507                                   lapack_int n, lapack_complex_float* a,
 10508                                   lapack_int lda, const lapack_int* ipiv,
 10509                                   lapack_complex_float* work );
 10510  lapack_int LAPACKE_csyswapr( int matrix_layout, char uplo, lapack_int n,
 10511                               lapack_complex_float* a, lapack_int i1,
 10512                               lapack_int i2 );
 10513  lapack_int LAPACKE_csyswapr_work( int matrix_layout, char uplo, lapack_int n,
 10514                                    lapack_complex_float* a, lapack_int i1,
 10515                                    lapack_int i2 );
 10516  lapack_int LAPACKE_csytri2( int matrix_layout, char uplo, lapack_int n,
 10517                              lapack_complex_float* a, lapack_int lda,
 10518                              const lapack_int* ipiv );
 10519  lapack_int LAPACKE_csytri2_work( int matrix_layout, char uplo, lapack_int n,
 10520                                   lapack_complex_float* a, lapack_int lda,
 10521                                   const lapack_int* ipiv,
 10522                                   lapack_complex_float* work, lapack_int lwork );
 10523  lapack_int LAPACKE_csytri2x( int matrix_layout, char uplo, lapack_int n,
 10524                               lapack_complex_float* a, lapack_int lda,
 10525                               const lapack_int* ipiv, lapack_int nb );
 10526  lapack_int LAPACKE_csytri2x_work( int matrix_layout, char uplo, lapack_int n,
 10527                                    lapack_complex_float* a, lapack_int lda,
 10528                                    const lapack_int* ipiv,
 10529                                    lapack_complex_float* work, lapack_int nb );
 10530  lapack_int LAPACKE_csytrs2( int matrix_layout, char uplo, lapack_int n,
 10531                              lapack_int nrhs, const lapack_complex_float* a,
 10532                              lapack_int lda, const lapack_int* ipiv,
 10533                              lapack_complex_float* b, lapack_int ldb );
 10534  lapack_int LAPACKE_csytrs2_work( int matrix_layout, char uplo, lapack_int n,
 10535                                   lapack_int nrhs, const lapack_complex_float* a,
 10536                                   lapack_int lda, const lapack_int* ipiv,
 10537                                   lapack_complex_float* b, lapack_int ldb,
 10538                                   lapack_complex_float* work );
 10539  lapack_int LAPACKE_cunbdb( int matrix_layout, char trans, char signs,
 10540                             lapack_int m, lapack_int p, lapack_int q,
 10541                             lapack_complex_float* x11, lapack_int ldx11,
 10542                             lapack_complex_float* x12, lapack_int ldx12,
 10543                             lapack_complex_float* x21, lapack_int ldx21,
 10544                             lapack_complex_float* x22, lapack_int ldx22,
 10545                             float* theta, float* phi,
 10546                             lapack_complex_float* taup1,
 10547                             lapack_complex_float* taup2,
 10548                             lapack_complex_float* tauq1,
 10549                             lapack_complex_float* tauq2 );
 10550  lapack_int LAPACKE_cunbdb_work( int matrix_layout, char trans, char signs,
 10551                                  lapack_int m, lapack_int p, lapack_int q,
 10552                                  lapack_complex_float* x11, lapack_int ldx11,
 10553                                  lapack_complex_float* x12, lapack_int ldx12,
 10554                                  lapack_complex_float* x21, lapack_int ldx21,
 10555                                  lapack_complex_float* x22, lapack_int ldx22,
 10556                                  float* theta, float* phi,
 10557                                  lapack_complex_float* taup1,
 10558                                  lapack_complex_float* taup2,
 10559                                  lapack_complex_float* tauq1,
 10560                                  lapack_complex_float* tauq2,
 10561                                  lapack_complex_float* work, lapack_int lwork );
 10562  lapack_int LAPACKE_cuncsd( int matrix_layout, char jobu1, char jobu2,
 10563                             char jobv1t, char jobv2t, char trans, char signs,
 10564                             lapack_int m, lapack_int p, lapack_int q,
 10565                             lapack_complex_float* x11, lapack_int ldx11,
 10566                             lapack_complex_float* x12, lapack_int ldx12,
 10567                             lapack_complex_float* x21, lapack_int ldx21,
 10568                             lapack_complex_float* x22, lapack_int ldx22,
 10569                             float* theta, lapack_complex_float* u1,
 10570                             lapack_int ldu1, lapack_complex_float* u2,
 10571                             lapack_int ldu2, lapack_complex_float* v1t,
 10572                             lapack_int ldv1t, lapack_complex_float* v2t,
 10573                             lapack_int ldv2t );
 10574  lapack_int LAPACKE_cuncsd_work( int matrix_layout, char jobu1, char jobu2,
 10575                                  char jobv1t, char jobv2t, char trans,
 10576                                  char signs, lapack_int m, lapack_int p,
 10577                                  lapack_int q, lapack_complex_float* x11,
 10578                                  lapack_int ldx11, lapack_complex_float* x12,
 10579                                  lapack_int ldx12, lapack_complex_float* x21,
 10580                                  lapack_int ldx21, lapack_complex_float* x22,
 10581                                  lapack_int ldx22, float* theta,
 10582                                  lapack_complex_float* u1, lapack_int ldu1,
 10583                                  lapack_complex_float* u2, lapack_int ldu2,
 10584                                  lapack_complex_float* v1t, lapack_int ldv1t,
 10585                                  lapack_complex_float* v2t, lapack_int ldv2t,
 10586                                  lapack_complex_float* work, lapack_int lwork,
 10587                                  float* rwork, lapack_int lrwork,
 10588                                  lapack_int* iwork );
 10589  lapack_int LAPACKE_cuncsd2by1( int matrix_layout, char jobu1, char jobu2,
 10590                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10591                             lapack_complex_float* x11, lapack_int ldx11,
 10592                             lapack_complex_float* x21, lapack_int ldx21,
 10593                             lapack_complex_float* theta, lapack_complex_float* u1,
 10594                             lapack_int ldu1, lapack_complex_float* u2,
 10595                             lapack_int ldu2, lapack_complex_float* v1t, lapack_int ldv1t );
 10596  lapack_int LAPACKE_cuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
 10597                                  char jobv1t, lapack_int m, lapack_int p,
 10598                                  lapack_int q, lapack_complex_float* x11, lapack_int ldx11,
 10599                                  lapack_complex_float* x21, lapack_int ldx21,
 10600                                  lapack_complex_float* theta, lapack_complex_float* u1,
 10601                                  lapack_int ldu1, lapack_complex_float* u2, 
 10602                                  lapack_int ldu2, lapack_complex_float* v1t,
 10603                                  lapack_int ldv1t, lapack_complex_float* work, 
 10604                                  lapack_int lwork, float* rwork, lapack_int lrwork,
 10605                                  lapack_int* iwork );
 10606  lapack_int LAPACKE_dbbcsd( int matrix_layout, char jobu1, char jobu2,
 10607                             char jobv1t, char jobv2t, char trans, lapack_int m,
 10608                             lapack_int p, lapack_int q, double* theta,
 10609                             double* phi, double* u1, lapack_int ldu1, double* u2,
 10610                             lapack_int ldu2, double* v1t, lapack_int ldv1t,
 10611                             double* v2t, lapack_int ldv2t, double* b11d,
 10612                             double* b11e, double* b12d, double* b12e,
 10613                             double* b21d, double* b21e, double* b22d,
 10614                             double* b22e );
 10615  lapack_int LAPACKE_dbbcsd_work( int matrix_layout, char jobu1, char jobu2,
 10616                                  char jobv1t, char jobv2t, char trans,
 10617                                  lapack_int m, lapack_int p, lapack_int q,
 10618                                  double* theta, double* phi, double* u1,
 10619                                  lapack_int ldu1, double* u2, lapack_int ldu2,
 10620                                  double* v1t, lapack_int ldv1t, double* v2t,
 10621                                  lapack_int ldv2t, double* b11d, double* b11e,
 10622                                  double* b12d, double* b12e, double* b21d,
 10623                                  double* b21e, double* b22d, double* b22e,
 10624                                  double* work, lapack_int lwork );
 10625  lapack_int LAPACKE_dorbdb( int matrix_layout, char trans, char signs,
 10626                             lapack_int m, lapack_int p, lapack_int q,
 10627                             double* x11, lapack_int ldx11, double* x12,
 10628                             lapack_int ldx12, double* x21, lapack_int ldx21,
 10629                             double* x22, lapack_int ldx22, double* theta,
 10630                             double* phi, double* taup1, double* taup2,
 10631                             double* tauq1, double* tauq2 );
 10632  lapack_int LAPACKE_dorbdb_work( int matrix_layout, char trans, char signs,
 10633                                  lapack_int m, lapack_int p, lapack_int q,
 10634                                  double* x11, lapack_int ldx11, double* x12,
 10635                                  lapack_int ldx12, double* x21, lapack_int ldx21,
 10636                                  double* x22, lapack_int ldx22, double* theta,
 10637                                  double* phi, double* taup1, double* taup2,
 10638                                  double* tauq1, double* tauq2, double* work,
 10639                                  lapack_int lwork );
 10640  lapack_int LAPACKE_dorcsd( int matrix_layout, char jobu1, char jobu2,
 10641                             char jobv1t, char jobv2t, char trans, char signs,
 10642                             lapack_int m, lapack_int p, lapack_int q,
 10643                             double* x11, lapack_int ldx11, double* x12,
 10644                             lapack_int ldx12, double* x21, lapack_int ldx21,
 10645                             double* x22, lapack_int ldx22, double* theta,
 10646                             double* u1, lapack_int ldu1, double* u2,
 10647                             lapack_int ldu2, double* v1t, lapack_int ldv1t,
 10648                             double* v2t, lapack_int ldv2t );
 10649  lapack_int LAPACKE_dorcsd_work( int matrix_layout, char jobu1, char jobu2,
 10650                                  char jobv1t, char jobv2t, char trans,
 10651                                  char signs, lapack_int m, lapack_int p,
 10652                                  lapack_int q, double* x11, lapack_int ldx11,
 10653                                  double* x12, lapack_int ldx12, double* x21,
 10654                                  lapack_int ldx21, double* x22, lapack_int ldx22,
 10655                                  double* theta, double* u1, lapack_int ldu1,
 10656                                  double* u2, lapack_int ldu2, double* v1t,
 10657                                  lapack_int ldv1t, double* v2t, lapack_int ldv2t,
 10658                                  double* work, lapack_int lwork,
 10659                                  lapack_int* iwork );
 10660  lapack_int LAPACKE_dorcsd2by1( int matrix_layout, char jobu1, char jobu2,
 10661                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10662                             double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
 10663                             double* theta, double* u1, lapack_int ldu1, double* u2,
 10664                             lapack_int ldu2, double* v1t, lapack_int ldv1t);
 10665  lapack_int LAPACKE_dorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
 10666                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10667                             double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
 10668                             double* theta, double* u1, lapack_int ldu1, double* u2,
 10669                             lapack_int ldu2, double* v1t, lapack_int ldv1t,
 10670                             double* work, lapack_int lwork, lapack_int* iwork );
 10671  lapack_int LAPACKE_dsyconv( int matrix_layout, char uplo, char way, lapack_int n,
 10672                              double* a, lapack_int lda, const lapack_int* ipiv, double* work);
 10673  lapack_int LAPACKE_dsyconv_work( int matrix_layout, char uplo, char way,
 10674                                   lapack_int n, double* a, lapack_int lda,
 10675                                   const lapack_int* ipiv, double* work );
 10676  lapack_int LAPACKE_dsyswapr( int matrix_layout, char uplo, lapack_int n,
 10677                               double* a, lapack_int i1, lapack_int i2 );
 10678  lapack_int LAPACKE_dsyswapr_work( int matrix_layout, char uplo, lapack_int n,
 10679                                    double* a, lapack_int i1, lapack_int i2 );
 10680  lapack_int LAPACKE_dsytri2( int matrix_layout, char uplo, lapack_int n,
 10681                              double* a, lapack_int lda, const lapack_int* ipiv );
 10682  lapack_int LAPACKE_dsytri2_work( int matrix_layout, char uplo, lapack_int n,
 10683                                   double* a, lapack_int lda,
 10684                                   const lapack_int* ipiv,
 10685                                   lapack_complex_double* work, lapack_int lwork );
 10686  lapack_int LAPACKE_dsytri2x( int matrix_layout, char uplo, lapack_int n,
 10687                               double* a, lapack_int lda, const lapack_int* ipiv,
 10688                               lapack_int nb );
 10689  lapack_int LAPACKE_dsytri2x_work( int matrix_layout, char uplo, lapack_int n,
 10690                                    double* a, lapack_int lda,
 10691                                    const lapack_int* ipiv, double* work,
 10692                                    lapack_int nb );
 10693  lapack_int LAPACKE_dsytrs2( int matrix_layout, char uplo, lapack_int n,
 10694                              lapack_int nrhs, const double* a, lapack_int lda,
 10695                              const lapack_int* ipiv, double* b, lapack_int ldb );
 10696  lapack_int LAPACKE_dsytrs2_work( int matrix_layout, char uplo, lapack_int n,
 10697                                   lapack_int nrhs, const double* a,
 10698                                   lapack_int lda, const lapack_int* ipiv,
 10699                                   double* b, lapack_int ldb, double* work );
 10700  lapack_int LAPACKE_sbbcsd( int matrix_layout, char jobu1, char jobu2,
 10701                             char jobv1t, char jobv2t, char trans, lapack_int m,
 10702                             lapack_int p, lapack_int q, float* theta, float* phi,
 10703                             float* u1, lapack_int ldu1, float* u2,
 10704                             lapack_int ldu2, float* v1t, lapack_int ldv1t,
 10705                             float* v2t, lapack_int ldv2t, float* b11d,
 10706                             float* b11e, float* b12d, float* b12e, float* b21d,
 10707                             float* b21e, float* b22d, float* b22e );
 10708  lapack_int LAPACKE_sbbcsd_work( int matrix_layout, char jobu1, char jobu2,
 10709                                  char jobv1t, char jobv2t, char trans,
 10710                                  lapack_int m, lapack_int p, lapack_int q,
 10711                                  float* theta, float* phi, float* u1,
 10712                                  lapack_int ldu1, float* u2, lapack_int ldu2,
 10713                                  float* v1t, lapack_int ldv1t, float* v2t,
 10714                                  lapack_int ldv2t, float* b11d, float* b11e,
 10715                                  float* b12d, float* b12e, float* b21d,
 10716                                  float* b21e, float* b22d, float* b22e,
 10717                                  float* work, lapack_int lwork );
 10718  lapack_int LAPACKE_sorbdb( int matrix_layout, char trans, char signs,
 10719                             lapack_int m, lapack_int p, lapack_int q, float* x11,
 10720                             lapack_int ldx11, float* x12, lapack_int ldx12,
 10721                             float* x21, lapack_int ldx21, float* x22,
 10722                             lapack_int ldx22, float* theta, float* phi,
 10723                             float* taup1, float* taup2, float* tauq1,
 10724                             float* tauq2 );
 10725  lapack_int LAPACKE_sorbdb_work( int matrix_layout, char trans, char signs,
 10726                                  lapack_int m, lapack_int p, lapack_int q,
 10727                                  float* x11, lapack_int ldx11, float* x12,
 10728                                  lapack_int ldx12, float* x21, lapack_int ldx21,
 10729                                  float* x22, lapack_int ldx22, float* theta,
 10730                                  float* phi, float* taup1, float* taup2,
 10731                                  float* tauq1, float* tauq2, float* work,
 10732                                  lapack_int lwork );
 10733  lapack_int LAPACKE_sorcsd( int matrix_layout, char jobu1, char jobu2,
 10734                             char jobv1t, char jobv2t, char trans, char signs,
 10735                             lapack_int m, lapack_int p, lapack_int q, float* x11,
 10736                             lapack_int ldx11, float* x12, lapack_int ldx12,
 10737                             float* x21, lapack_int ldx21, float* x22,
 10738                             lapack_int ldx22, float* theta, float* u1,
 10739                             lapack_int ldu1, float* u2, lapack_int ldu2,
 10740                             float* v1t, lapack_int ldv1t, float* v2t,
 10741                             lapack_int ldv2t );
 10742  lapack_int LAPACKE_sorcsd_work( int matrix_layout, char jobu1, char jobu2,
 10743                                  char jobv1t, char jobv2t, char trans,
 10744                                  char signs, lapack_int m, lapack_int p,
 10745                                  lapack_int q, float* x11, lapack_int ldx11,
 10746                                  float* x12, lapack_int ldx12, float* x21,
 10747                                  lapack_int ldx21, float* x22, lapack_int ldx22,
 10748                                  float* theta, float* u1, lapack_int ldu1,
 10749                                  float* u2, lapack_int ldu2, float* v1t,
 10750                                  lapack_int ldv1t, float* v2t, lapack_int ldv2t,
 10751                                  float* work, lapack_int lwork,
 10752                                  lapack_int* iwork );
 10753  lapack_int LAPACKE_sorcsd2by1( int matrix_layout, char jobu1, char jobu2,
 10754                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10755                             float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
 10756                             float* theta, float* u1, lapack_int ldu1, float* u2,
 10757                             lapack_int ldu2, float* v1t, lapack_int ldv1t);
 10758  lapack_int LAPACKE_sorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
 10759                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10760                             float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
 10761                             float* theta, float* u1, lapack_int ldu1, float* u2,
 10762                             lapack_int ldu2, float* v1t, lapack_int ldv1t,
 10763                             float* work, lapack_int lwork, lapack_int* iwork );
 10764  lapack_int LAPACKE_ssyconv( int matrix_layout, char uplo, char way, lapack_int n,
 10765                              float* a, lapack_int lda, const lapack_int* ipiv, float* work );
 10766  lapack_int LAPACKE_ssyconv_work( int matrix_layout, char uplo, char way,
 10767                                   lapack_int n, float* a, lapack_int lda,
 10768                                   const lapack_int* ipiv, float* work );
 10769  lapack_int LAPACKE_ssyswapr( int matrix_layout, char uplo, lapack_int n,
 10770                               float* a, lapack_int i1, lapack_int i2 );
 10771  lapack_int LAPACKE_ssyswapr_work( int matrix_layout, char uplo, lapack_int n,
 10772                                    float* a, lapack_int i1, lapack_int i2 );
 10773  lapack_int LAPACKE_ssytri2( int matrix_layout, char uplo, lapack_int n, float* a,
 10774                              lapack_int lda, const lapack_int* ipiv );
 10775  lapack_int LAPACKE_ssytri2_work( int matrix_layout, char uplo, lapack_int n,
 10776                                   float* a, lapack_int lda,
 10777                                   const lapack_int* ipiv,
 10778                                   lapack_complex_float* work, lapack_int lwork );
 10779  lapack_int LAPACKE_ssytri2x( int matrix_layout, char uplo, lapack_int n,
 10780                               float* a, lapack_int lda, const lapack_int* ipiv,
 10781                               lapack_int nb );
 10782  lapack_int LAPACKE_ssytri2x_work( int matrix_layout, char uplo, lapack_int n,
 10783                                    float* a, lapack_int lda,
 10784                                    const lapack_int* ipiv, float* work,
 10785                                    lapack_int nb );
 10786  lapack_int LAPACKE_ssytrs2( int matrix_layout, char uplo, lapack_int n,
 10787                              lapack_int nrhs, const float* a, lapack_int lda,
 10788                              const lapack_int* ipiv, float* b, lapack_int ldb );
 10789  lapack_int LAPACKE_ssytrs2_work( int matrix_layout, char uplo, lapack_int n,
 10790                                   lapack_int nrhs, const float* a,
 10791                                   lapack_int lda, const lapack_int* ipiv,
 10792                                   float* b, lapack_int ldb, float* work );
 10793  lapack_int LAPACKE_zbbcsd( int matrix_layout, char jobu1, char jobu2,
 10794                             char jobv1t, char jobv2t, char trans, lapack_int m,
 10795                             lapack_int p, lapack_int q, double* theta,
 10796                             double* phi, lapack_complex_double* u1,
 10797                             lapack_int ldu1, lapack_complex_double* u2,
 10798                             lapack_int ldu2, lapack_complex_double* v1t,
 10799                             lapack_int ldv1t, lapack_complex_double* v2t,
 10800                             lapack_int ldv2t, double* b11d, double* b11e,
 10801                             double* b12d, double* b12e, double* b21d,
 10802                             double* b21e, double* b22d, double* b22e );
 10803  lapack_int LAPACKE_zbbcsd_work( int matrix_layout, char jobu1, char jobu2,
 10804                                  char jobv1t, char jobv2t, char trans,
 10805                                  lapack_int m, lapack_int p, lapack_int q,
 10806                                  double* theta, double* phi,
 10807                                  lapack_complex_double* u1, lapack_int ldu1,
 10808                                  lapack_complex_double* u2, lapack_int ldu2,
 10809                                  lapack_complex_double* v1t, lapack_int ldv1t,
 10810                                  lapack_complex_double* v2t, lapack_int ldv2t,
 10811                                  double* b11d, double* b11e, double* b12d,
 10812                                  double* b12e, double* b21d, double* b21e,
 10813                                  double* b22d, double* b22e, double* rwork,
 10814                                  lapack_int lrwork );
 10815  lapack_int LAPACKE_zheswapr( int matrix_layout, char uplo, lapack_int n,
 10816                               lapack_complex_double* a, lapack_int i1,
 10817                               lapack_int i2 );
 10818  lapack_int LAPACKE_zheswapr_work( int matrix_layout, char uplo, lapack_int n,
 10819                                    lapack_complex_double* a, lapack_int i1,
 10820                                    lapack_int i2 );
 10821  lapack_int LAPACKE_zhetri2( int matrix_layout, char uplo, lapack_int n,
 10822                              lapack_complex_double* a, lapack_int lda,
 10823                              const lapack_int* ipiv );
 10824  lapack_int LAPACKE_zhetri2_work( int matrix_layout, char uplo, lapack_int n,
 10825                                   lapack_complex_double* a, lapack_int lda,
 10826                                   const lapack_int* ipiv,
 10827                                   lapack_complex_double* work, lapack_int lwork );
 10828  lapack_int LAPACKE_zhetri2x( int matrix_layout, char uplo, lapack_int n,
 10829                               lapack_complex_double* a, lapack_int lda,
 10830                               const lapack_int* ipiv, lapack_int nb );
 10831  lapack_int LAPACKE_zhetri2x_work( int matrix_layout, char uplo, lapack_int n,
 10832                                    lapack_complex_double* a, lapack_int lda,
 10833                                    const lapack_int* ipiv,
 10834                                    lapack_complex_double* work, lapack_int nb );
 10835  lapack_int LAPACKE_zhetrs2( int matrix_layout, char uplo, lapack_int n,
 10836                              lapack_int nrhs, const lapack_complex_double* a,
 10837                              lapack_int lda, const lapack_int* ipiv,
 10838                              lapack_complex_double* b, lapack_int ldb );
 10839  lapack_int LAPACKE_zhetrs2_work( int matrix_layout, char uplo, lapack_int n,
 10840                                   lapack_int nrhs, const lapack_complex_double* a,
 10841                                   lapack_int lda, const lapack_int* ipiv,
 10842                                   lapack_complex_double* b, lapack_int ldb,
 10843                                   lapack_complex_double* work );
 10844  lapack_int LAPACKE_zsyconv( int matrix_layout, char uplo, char way, lapack_int n,
 10845                              lapack_complex_double* a, lapack_int lda,
 10846                              const lapack_int* ipiv, lapack_complex_double* work );
 10847  lapack_int LAPACKE_zsyconv_work( int matrix_layout, char uplo, char way,
 10848                                   lapack_int n, lapack_complex_double* a,
 10849                                   lapack_int lda, const lapack_int* ipiv,
 10850                                   lapack_complex_double* work );
 10851  lapack_int LAPACKE_zsyswapr( int matrix_layout, char uplo, lapack_int n,
 10852                               lapack_complex_double* a, lapack_int i1,
 10853                               lapack_int i2 );
 10854  lapack_int LAPACKE_zsyswapr_work( int matrix_layout, char uplo, lapack_int n,
 10855                                    lapack_complex_double* a, lapack_int i1,
 10856                                    lapack_int i2 );
 10857  lapack_int LAPACKE_zsytri2( int matrix_layout, char uplo, lapack_int n,
 10858                              lapack_complex_double* a, lapack_int lda,
 10859                              const lapack_int* ipiv );
 10860  lapack_int LAPACKE_zsytri2_work( int matrix_layout, char uplo, lapack_int n,
 10861                                   lapack_complex_double* a, lapack_int lda,
 10862                                   const lapack_int* ipiv,
 10863                                   lapack_complex_double* work, lapack_int lwork );
 10864  lapack_int LAPACKE_zsytri2x( int matrix_layout, char uplo, lapack_int n,
 10865                               lapack_complex_double* a, lapack_int lda,
 10866                               const lapack_int* ipiv, lapack_int nb );
 10867  lapack_int LAPACKE_zsytri2x_work( int matrix_layout, char uplo, lapack_int n,
 10868                                    lapack_complex_double* a, lapack_int lda,
 10869                                    const lapack_int* ipiv,
 10870                                    lapack_complex_double* work, lapack_int nb );
 10871  lapack_int LAPACKE_zsytrs2( int matrix_layout, char uplo, lapack_int n,
 10872                              lapack_int nrhs, const lapack_complex_double* a,
 10873                              lapack_int lda, const lapack_int* ipiv,
 10874                              lapack_complex_double* b, lapack_int ldb );
 10875  lapack_int LAPACKE_zsytrs2_work( int matrix_layout, char uplo, lapack_int n,
 10876                                   lapack_int nrhs, const lapack_complex_double* a,
 10877                                   lapack_int lda, const lapack_int* ipiv,
 10878                                   lapack_complex_double* b, lapack_int ldb,
 10879                                   lapack_complex_double* work );
 10880  lapack_int LAPACKE_zunbdb( int matrix_layout, char trans, char signs,
 10881                             lapack_int m, lapack_int p, lapack_int q,
 10882                             lapack_complex_double* x11, lapack_int ldx11,
 10883                             lapack_complex_double* x12, lapack_int ldx12,
 10884                             lapack_complex_double* x21, lapack_int ldx21,
 10885                             lapack_complex_double* x22, lapack_int ldx22,
 10886                             double* theta, double* phi,
 10887                             lapack_complex_double* taup1,
 10888                             lapack_complex_double* taup2,
 10889                             lapack_complex_double* tauq1,
 10890                             lapack_complex_double* tauq2 );
 10891  lapack_int LAPACKE_zunbdb_work( int matrix_layout, char trans, char signs,
 10892                                  lapack_int m, lapack_int p, lapack_int q,
 10893                                  lapack_complex_double* x11, lapack_int ldx11,
 10894                                  lapack_complex_double* x12, lapack_int ldx12,
 10895                                  lapack_complex_double* x21, lapack_int ldx21,
 10896                                  lapack_complex_double* x22, lapack_int ldx22,
 10897                                  double* theta, double* phi,
 10898                                  lapack_complex_double* taup1,
 10899                                  lapack_complex_double* taup2,
 10900                                  lapack_complex_double* tauq1,
 10901                                  lapack_complex_double* tauq2,
 10902                                  lapack_complex_double* work, lapack_int lwork );
 10903  lapack_int LAPACKE_zuncsd( int matrix_layout, char jobu1, char jobu2,
 10904                             char jobv1t, char jobv2t, char trans, char signs,
 10905                             lapack_int m, lapack_int p, lapack_int q,
 10906                             lapack_complex_double* x11, lapack_int ldx11,
 10907                             lapack_complex_double* x12, lapack_int ldx12,
 10908                             lapack_complex_double* x21, lapack_int ldx21,
 10909                             lapack_complex_double* x22, lapack_int ldx22,
 10910                             double* theta, lapack_complex_double* u1,
 10911                             lapack_int ldu1, lapack_complex_double* u2,
 10912                             lapack_int ldu2, lapack_complex_double* v1t,
 10913                             lapack_int ldv1t, lapack_complex_double* v2t,
 10914                             lapack_int ldv2t );
 10915  lapack_int LAPACKE_zuncsd_work( int matrix_layout, char jobu1, char jobu2,
 10916                                  char jobv1t, char jobv2t, char trans,
 10917                                  char signs, lapack_int m, lapack_int p,
 10918                                  lapack_int q, lapack_complex_double* x11,
 10919                                  lapack_int ldx11, lapack_complex_double* x12,
 10920                                  lapack_int ldx12, lapack_complex_double* x21,
 10921                                  lapack_int ldx21, lapack_complex_double* x22,
 10922                                  lapack_int ldx22, double* theta,
 10923                                  lapack_complex_double* u1, lapack_int ldu1,
 10924                                  lapack_complex_double* u2, lapack_int ldu2,
 10925                                  lapack_complex_double* v1t, lapack_int ldv1t,
 10926                                  lapack_complex_double* v2t, lapack_int ldv2t,
 10927                                  lapack_complex_double* work, lapack_int lwork,
 10928                                  double* rwork, lapack_int lrwork,
 10929                                  lapack_int* iwork );
 10930  lapack_int LAPACKE_zuncsd2by1( int matrix_layout, char jobu1, char jobu2,
 10931                             char jobv1t, lapack_int m, lapack_int p, lapack_int q,
 10932                             lapack_complex_double* x11, lapack_int ldx11,
 10933                             lapack_complex_double* x21, lapack_int ldx21,
 10934                             lapack_complex_double* theta, lapack_complex_double* u1,
 10935                             lapack_int ldu1, lapack_complex_double* u2,
 10936                             lapack_int ldu2, lapack_complex_double* v1t, lapack_int ldv1t );
 10937  lapack_int LAPACKE_zuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
 10938                                  char jobv1t, lapack_int m, lapack_int p,
 10939                                  lapack_int q, lapack_complex_double* x11, lapack_int ldx11,
 10940                                  lapack_complex_double* x21, lapack_int ldx21,
 10941                                  lapack_complex_double* theta, lapack_complex_double* u1,
 10942                                  lapack_int ldu1, lapack_complex_double* u2, 
 10943                                  lapack_int ldu2, lapack_complex_double* v1t,
 10944                                  lapack_int ldv1t, lapack_complex_double* work, 
 10945                                  lapack_int lwork, double* rwork, lapack_int lrwork,
 10946                                  lapack_int* iwork );
 10947  
 10948  //LAPACK 3.4.0
 10949  lapack_int LAPACKE_sgemqrt( int matrix_layout, char side, char trans,
 10950                              lapack_int m, lapack_int n, lapack_int k,
 10951                              lapack_int nb, const float* v, lapack_int ldv,
 10952                              const float* t, lapack_int ldt, float* c,
 10953                              lapack_int ldc );
 10954  lapack_int LAPACKE_dgemqrt( int matrix_layout, char side, char trans,
 10955                              lapack_int m, lapack_int n, lapack_int k,
 10956                              lapack_int nb, const double* v, lapack_int ldv,
 10957                              const double* t, lapack_int ldt, double* c,
 10958                              lapack_int ldc );
 10959  lapack_int LAPACKE_cgemqrt( int matrix_layout, char side, char trans,
 10960                              lapack_int m, lapack_int n, lapack_int k,
 10961                              lapack_int nb, const lapack_complex_float* v,
 10962                              lapack_int ldv, const lapack_complex_float* t,
 10963                              lapack_int ldt, lapack_complex_float* c,
 10964                              lapack_int ldc );
 10965  lapack_int LAPACKE_zgemqrt( int matrix_layout, char side, char trans,
 10966                              lapack_int m, lapack_int n, lapack_int k,
 10967                              lapack_int nb, const lapack_complex_double* v,
 10968                              lapack_int ldv, const lapack_complex_double* t,
 10969                              lapack_int ldt, lapack_complex_double* c,
 10970                              lapack_int ldc );
 10971  
 10972  lapack_int LAPACKE_sgeqrt( int matrix_layout, lapack_int m, lapack_int n,
 10973                             lapack_int nb, float* a, lapack_int lda, float* t,
 10974                             lapack_int ldt );
 10975  lapack_int LAPACKE_dgeqrt( int matrix_layout, lapack_int m, lapack_int n,
 10976                             lapack_int nb, double* a, lapack_int lda, double* t,
 10977                             lapack_int ldt );
 10978  lapack_int LAPACKE_cgeqrt( int matrix_layout, lapack_int m, lapack_int n,
 10979                             lapack_int nb, lapack_complex_float* a,
 10980                             lapack_int lda, lapack_complex_float* t,
 10981                             lapack_int ldt );
 10982  lapack_int LAPACKE_zgeqrt( int matrix_layout, lapack_int m, lapack_int n,
 10983                             lapack_int nb, lapack_complex_double* a,
 10984                             lapack_int lda, lapack_complex_double* t,
 10985                             lapack_int ldt );
 10986  
 10987  lapack_int LAPACKE_sgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
 10988                              float* a, lapack_int lda, float* t,
 10989                              lapack_int ldt );
 10990  lapack_int LAPACKE_dgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
 10991                              double* a, lapack_int lda, double* t,
 10992                              lapack_int ldt );
 10993  lapack_int LAPACKE_cgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
 10994                              lapack_complex_float* a, lapack_int lda,
 10995                              lapack_complex_float* t, lapack_int ldt );
 10996  lapack_int LAPACKE_zgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
 10997                              lapack_complex_double* a, lapack_int lda,
 10998                              lapack_complex_double* t, lapack_int ldt );
 10999  
 11000  lapack_int LAPACKE_sgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
 11001                              float* a, lapack_int lda, float* t,
 11002                              lapack_int ldt );
 11003  lapack_int LAPACKE_dgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
 11004                              double* a, lapack_int lda, double* t,
 11005                              lapack_int ldt );
 11006  lapack_int LAPACKE_cgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
 11007                              lapack_complex_float* a, lapack_int lda,
 11008                              lapack_complex_float* t, lapack_int ldt );
 11009  lapack_int LAPACKE_zgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
 11010                              lapack_complex_double* a, lapack_int lda,
 11011                              lapack_complex_double* t, lapack_int ldt );
 11012  
 11013  lapack_int LAPACKE_stpmqrt( int matrix_layout, char side, char trans,
 11014                              lapack_int m, lapack_int n, lapack_int k,
 11015                              lapack_int l, lapack_int nb, const float* v,
 11016                              lapack_int ldv, const float* t, lapack_int ldt,
 11017                              float* a, lapack_int lda, float* b,
 11018                              lapack_int ldb );
 11019  lapack_int LAPACKE_dtpmqrt( int matrix_layout, char side, char trans,
 11020                              lapack_int m, lapack_int n, lapack_int k,
 11021                              lapack_int l, lapack_int nb, const double* v,
 11022                              lapack_int ldv, const double* t, lapack_int ldt,
 11023                              double* a, lapack_int lda, double* b,
 11024                              lapack_int ldb );
 11025  lapack_int LAPACKE_ctpmqrt( int matrix_layout, char side, char trans,
 11026                              lapack_int m, lapack_int n, lapack_int k,
 11027                              lapack_int l, lapack_int nb,
 11028                              const lapack_complex_float* v, lapack_int ldv,
 11029                              const lapack_complex_float* t, lapack_int ldt,
 11030                              lapack_complex_float* a, lapack_int lda,
 11031                              lapack_complex_float* b, lapack_int ldb );
 11032  lapack_int LAPACKE_ztpmqrt( int matrix_layout, char side, char trans,
 11033                              lapack_int m, lapack_int n, lapack_int k,
 11034                              lapack_int l, lapack_int nb,
 11035                              const lapack_complex_double* v, lapack_int ldv,
 11036                              const lapack_complex_double* t, lapack_int ldt,
 11037                              lapack_complex_double* a, lapack_int lda,
 11038                              lapack_complex_double* b, lapack_int ldb );
 11039  
 11040  lapack_int LAPACKE_stpqrt( int matrix_layout, lapack_int m, lapack_int n,
 11041                             lapack_int l, lapack_int nb, float* a,
 11042                             lapack_int lda, float* b, lapack_int ldb, float* t,
 11043                             lapack_int ldt );
 11044  
 11045  lapack_int LAPACKE_dtpqrt( int matrix_layout, lapack_int m, lapack_int n,
 11046                             lapack_int l, lapack_int nb, double* a,
 11047                             lapack_int lda, double* b, lapack_int ldb, double* t,
 11048                             lapack_int ldt );
 11049  lapack_int LAPACKE_ctpqrt( int matrix_layout, lapack_int m, lapack_int n,
 11050                             lapack_int l, lapack_int nb,
 11051                             lapack_complex_float* a, lapack_int lda,
 11052                             lapack_complex_float* b, lapack_int ldb,
 11053                             lapack_complex_float* t, lapack_int ldt );
 11054  lapack_int LAPACKE_ztpqrt( int matrix_layout, lapack_int m, lapack_int n,
 11055                             lapack_int l, lapack_int nb,
 11056                             lapack_complex_double* a, lapack_int lda,
 11057                             lapack_complex_double* b, lapack_int ldb,
 11058                             lapack_complex_double* t, lapack_int ldt );
 11059  
 11060  lapack_int LAPACKE_stpqrt2( int matrix_layout,
 11061                              lapack_int m, lapack_int n, lapack_int l,
 11062                              float* a, lapack_int lda,
 11063                              float* b, lapack_int ldb,
 11064                              float* t, lapack_int ldt );
 11065  lapack_int LAPACKE_dtpqrt2( int matrix_layout,
 11066                              lapack_int m, lapack_int n, lapack_int l,
 11067                              double* a, lapack_int lda,
 11068                              double* b, lapack_int ldb,
 11069                              double* t, lapack_int ldt );
 11070  lapack_int LAPACKE_ctpqrt2( int matrix_layout,
 11071                              lapack_int m, lapack_int n, lapack_int l,
 11072                              lapack_complex_float* a, lapack_int lda,
 11073                              lapack_complex_float* b, lapack_int ldb,
 11074                              lapack_complex_float* t, lapack_int ldt );
 11075  lapack_int LAPACKE_ztpqrt2( int matrix_layout,
 11076                              lapack_int m, lapack_int n, lapack_int l,
 11077                              lapack_complex_double* a, lapack_int lda,
 11078                              lapack_complex_double* b, lapack_int ldb,
 11079                              lapack_complex_double* t, lapack_int ldt );
 11080  
 11081  lapack_int LAPACKE_stprfb( int matrix_layout, char side, char trans, char direct,
 11082                             char storev, lapack_int m, lapack_int n,
 11083                             lapack_int k, lapack_int l, const float* v,
 11084                             lapack_int ldv, const float* t, lapack_int ldt,
 11085                             float* a, lapack_int lda, float* b, lapack_int ldb );
 11086  lapack_int LAPACKE_dtprfb( int matrix_layout, char side, char trans, char direct,
 11087                             char storev, lapack_int m, lapack_int n,
 11088                             lapack_int k, lapack_int l, const double* v,
 11089                             lapack_int ldv, const double* t, lapack_int ldt,
 11090                             double* a, lapack_int lda, double* b, lapack_int ldb );
 11091  lapack_int LAPACKE_ctprfb( int matrix_layout, char side, char trans, char direct,
 11092                             char storev, lapack_int m, lapack_int n,
 11093                             lapack_int k, lapack_int l,
 11094                             const lapack_complex_float* v, lapack_int ldv,
 11095                             const lapack_complex_float* t, lapack_int ldt,
 11096                             lapack_complex_float* a, lapack_int lda,
 11097                             lapack_complex_float* b, lapack_int ldb );
 11098  lapack_int LAPACKE_ztprfb( int matrix_layout, char side, char trans, char direct,
 11099                             char storev, lapack_int m, lapack_int n,
 11100                             lapack_int k, lapack_int l,
 11101                             const lapack_complex_double* v, lapack_int ldv,
 11102                             const lapack_complex_double* t, lapack_int ldt,
 11103                             lapack_complex_double* a, lapack_int lda,
 11104                             lapack_complex_double* b, lapack_int ldb );
 11105  
 11106  lapack_int LAPACKE_sgemqrt_work( int matrix_layout, char side, char trans,
 11107                                   lapack_int m, lapack_int n, lapack_int k,
 11108                                   lapack_int nb, const float* v, lapack_int ldv,
 11109                                   const float* t, lapack_int ldt, float* c,
 11110                                   lapack_int ldc, float* work );
 11111  lapack_int LAPACKE_dgemqrt_work( int matrix_layout, char side, char trans,
 11112                                   lapack_int m, lapack_int n, lapack_int k,
 11113                                   lapack_int nb, const double* v, lapack_int ldv,
 11114                                   const double* t, lapack_int ldt, double* c,
 11115                                   lapack_int ldc, double* work );
 11116  lapack_int LAPACKE_cgemqrt_work( int matrix_layout, char side, char trans,
 11117                                   lapack_int m, lapack_int n, lapack_int k,
 11118                                   lapack_int nb, const lapack_complex_float* v,
 11119                                   lapack_int ldv, const lapack_complex_float* t,
 11120                                   lapack_int ldt, lapack_complex_float* c,
 11121                                   lapack_int ldc, lapack_complex_float* work );
 11122  lapack_int LAPACKE_zgemqrt_work( int matrix_layout, char side, char trans,
 11123                                   lapack_int m, lapack_int n, lapack_int k,
 11124                                   lapack_int nb, const lapack_complex_double* v,
 11125                                   lapack_int ldv, const lapack_complex_double* t,
 11126                                   lapack_int ldt, lapack_complex_double* c,
 11127                                   lapack_int ldc, lapack_complex_double* work );
 11128  
 11129  lapack_int LAPACKE_sgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11130                                  lapack_int nb, float* a, lapack_int lda,
 11131                                  float* t, lapack_int ldt, float* work );
 11132  lapack_int LAPACKE_dgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11133                                  lapack_int nb, double* a, lapack_int lda,
 11134                                  double* t, lapack_int ldt, double* work );
 11135  lapack_int LAPACKE_cgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11136                                  lapack_int nb, lapack_complex_float* a,
 11137                                  lapack_int lda, lapack_complex_float* t,
 11138                                  lapack_int ldt, lapack_complex_float* work );
 11139  lapack_int LAPACKE_zgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11140                                  lapack_int nb, lapack_complex_double* a,
 11141                                  lapack_int lda, lapack_complex_double* t,
 11142                                  lapack_int ldt, lapack_complex_double* work );
 11143  
 11144  lapack_int LAPACKE_sgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
 11145                                   float* a, lapack_int lda, float* t,
 11146                                   lapack_int ldt );
 11147  lapack_int LAPACKE_dgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
 11148                                   double* a, lapack_int lda, double* t,
 11149                                   lapack_int ldt );
 11150  lapack_int LAPACKE_cgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
 11151                                   lapack_complex_float* a, lapack_int lda,
 11152                                   lapack_complex_float* t, lapack_int ldt );
 11153  lapack_int LAPACKE_zgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
 11154                                   lapack_complex_double* a, lapack_int lda,
 11155                                   lapack_complex_double* t, lapack_int ldt );
 11156  
 11157  lapack_int LAPACKE_sgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
 11158                                   float* a, lapack_int lda, float* t,
 11159                                   lapack_int ldt );
 11160  lapack_int LAPACKE_dgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
 11161                                   double* a, lapack_int lda, double* t,
 11162                                   lapack_int ldt );
 11163  lapack_int LAPACKE_cgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
 11164                                   lapack_complex_float* a, lapack_int lda,
 11165                                   lapack_complex_float* t, lapack_int ldt );
 11166  lapack_int LAPACKE_zgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
 11167                                   lapack_complex_double* a, lapack_int lda,
 11168                                   lapack_complex_double* t, lapack_int ldt );
 11169  
 11170  lapack_int LAPACKE_stpmqrt_work( int matrix_layout, char side, char trans,
 11171                                   lapack_int m, lapack_int n, lapack_int k,
 11172                                   lapack_int l, lapack_int nb, const float* v,
 11173                                   lapack_int ldv, const float* t, lapack_int ldt,
 11174                                   float* a, lapack_int lda, float* b,
 11175                                   lapack_int ldb, float* work );
 11176  lapack_int LAPACKE_dtpmqrt_work( int matrix_layout, char side, char trans,
 11177                                   lapack_int m, lapack_int n, lapack_int k,
 11178                                   lapack_int l, lapack_int nb, const double* v,
 11179                                   lapack_int ldv, const double* t,
 11180                                   lapack_int ldt, double* a, lapack_int lda,
 11181                                   double* b, lapack_int ldb, double* work );
 11182  lapack_int LAPACKE_ctpmqrt_work( int matrix_layout, char side, char trans,
 11183                                   lapack_int m, lapack_int n, lapack_int k,
 11184                                   lapack_int l, lapack_int nb,
 11185                                   const lapack_complex_float* v, lapack_int ldv,
 11186                                   const lapack_complex_float* t, lapack_int ldt,
 11187                                   lapack_complex_float* a, lapack_int lda,
 11188                                   lapack_complex_float* b, lapack_int ldb,
 11189                                   lapack_complex_float* work );
 11190  lapack_int LAPACKE_ztpmqrt_work( int matrix_layout, char side, char trans,
 11191                                   lapack_int m, lapack_int n, lapack_int k,
 11192                                   lapack_int l, lapack_int nb,
 11193                                   const lapack_complex_double* v, lapack_int ldv,
 11194                                   const lapack_complex_double* t, lapack_int ldt,
 11195                                   lapack_complex_double* a, lapack_int lda,
 11196                                   lapack_complex_double* b, lapack_int ldb,
 11197                                   lapack_complex_double* work );
 11198  
 11199  lapack_int LAPACKE_stpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11200                                  lapack_int l, lapack_int nb, float* a,
 11201                                  lapack_int lda, float* b, lapack_int ldb,
 11202                                  float* t, lapack_int ldt, float* work );
 11203  lapack_int LAPACKE_dtpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11204                                  lapack_int l, lapack_int nb, double* a,
 11205                                  lapack_int lda, double* b, lapack_int ldb,
 11206                                  double* t, lapack_int ldt, double* work );
 11207  lapack_int LAPACKE_ctpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11208                                  lapack_int l, lapack_int nb,
 11209                                  lapack_complex_float* a, lapack_int lda,
 11210                                  lapack_complex_float* b, lapack_int ldb,
 11211                                  lapack_complex_float* t, lapack_int ldt,
 11212                                  lapack_complex_float* work );
 11213  lapack_int LAPACKE_ztpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
 11214                                  lapack_int l, lapack_int nb,
 11215                                  lapack_complex_double* a, lapack_int lda,
 11216                                  lapack_complex_double* b, lapack_int ldb,
 11217                                  lapack_complex_double* t, lapack_int ldt,
 11218                                  lapack_complex_double* work );
 11219  
 11220  lapack_int LAPACKE_stpqrt2_work( int matrix_layout,
 11221                                   lapack_int m, lapack_int n, lapack_int l,
 11222                                   float* a, lapack_int lda,
 11223                                   float* b, lapack_int ldb,
 11224                                   float* t, lapack_int ldt );
 11225  lapack_int LAPACKE_dtpqrt2_work( int matrix_layout,
 11226                                   lapack_int m, lapack_int n, lapack_int l,
 11227                                   double* a, lapack_int lda,
 11228                                   double* b, lapack_int ldb,
 11229                                   double* t, lapack_int ldt );
 11230  lapack_int LAPACKE_ctpqrt2_work( int matrix_layout,
 11231                                   lapack_int m, lapack_int n, lapack_int l,
 11232                                   lapack_complex_float* a, lapack_int lda,
 11233                                   lapack_complex_float* b, lapack_int ldb,
 11234                                   lapack_complex_float* t, lapack_int ldt );
 11235  lapack_int LAPACKE_ztpqrt2_work( int matrix_layout,
 11236                                   lapack_int m, lapack_int n, lapack_int l,
 11237                                   lapack_complex_double* a, lapack_int lda,
 11238                                   lapack_complex_double* b, lapack_int ldb,
 11239                                   lapack_complex_double* t, lapack_int ldt );
 11240  
 11241  lapack_int LAPACKE_stprfb_work( int matrix_layout, char side, char trans,
 11242                                  char direct, char storev, lapack_int m,
 11243                                  lapack_int n, lapack_int k, lapack_int l,
 11244                                  const float* v, lapack_int ldv, const float* t,
 11245                                  lapack_int ldt, float* a, lapack_int lda,
 11246                                  float* b, lapack_int ldb, const float* work,
 11247                                  lapack_int ldwork );
 11248  lapack_int LAPACKE_dtprfb_work( int matrix_layout, char side, char trans,
 11249                                  char direct, char storev, lapack_int m,
 11250                                  lapack_int n, lapack_int k, lapack_int l,
 11251                                  const double* v, lapack_int ldv,
 11252                                  const double* t, lapack_int ldt, double* a,
 11253                                  lapack_int lda, double* b, lapack_int ldb,
 11254                                  const double* work, lapack_int ldwork );
 11255  lapack_int LAPACKE_ctprfb_work( int matrix_layout, char side, char trans,
 11256                                  char direct, char storev, lapack_int m,
 11257                                  lapack_int n, lapack_int k, lapack_int l,
 11258                                  const lapack_complex_float* v, lapack_int ldv,
 11259                                  const lapack_complex_float* t, lapack_int ldt,
 11260                                  lapack_complex_float* a, lapack_int lda,
 11261                                  lapack_complex_float* b, lapack_int ldb,
 11262                                  lapack_complex_float* work, lapack_int ldwork );
 11263  lapack_int LAPACKE_ztprfb_work( int matrix_layout, char side, char trans,
 11264                                  char direct, char storev, lapack_int m,
 11265                                  lapack_int n, lapack_int k, lapack_int l,
 11266                                  const lapack_complex_double* v, lapack_int ldv,
 11267                                  const lapack_complex_double* t, lapack_int ldt,
 11268                                  lapack_complex_double* a, lapack_int lda,
 11269                                  lapack_complex_double* b, lapack_int ldb,
 11270                                  lapack_complex_double* work, lapack_int ldwork );
 11271  //LAPACK 3.X.X
 11272  lapack_int LAPACKE_ssysv_rook( int matrix_layout, char uplo, lapack_int n,
 11273                                 lapack_int nrhs, float* a, lapack_int lda,
 11274                                 lapack_int* ipiv, float* b, lapack_int ldb );
 11275  lapack_int LAPACKE_dsysv_rook( int matrix_layout, char uplo, lapack_int n,
 11276                                 lapack_int nrhs, double* a, lapack_int lda,
 11277                                 lapack_int* ipiv, double* b, lapack_int ldb );
 11278  lapack_int LAPACKE_csysv_rook( int matrix_layout, char uplo, lapack_int n,
 11279                                 lapack_int nrhs, lapack_complex_float* a,
 11280                                 lapack_int lda, lapack_int* ipiv,
 11281                                 lapack_complex_float* b, lapack_int ldb );
 11282  lapack_int LAPACKE_zsysv_rook( int matrix_layout, char uplo, lapack_int n,
 11283                                 lapack_int nrhs, lapack_complex_double* a,
 11284                                 lapack_int lda, lapack_int* ipiv,
 11285                                 lapack_complex_double* b, lapack_int ldb );
 11286                                 
 11287  lapack_int LAPACKE_ssytrf_rook( int matrix_layout, char uplo, lapack_int n, float* a,
 11288                             lapack_int lda, lapack_int* ipiv );
 11289  lapack_int LAPACKE_dsytrf_rook( int matrix_layout, char uplo, lapack_int n, double* a,
 11290                             lapack_int lda, lapack_int* ipiv );
 11291  lapack_int LAPACKE_csytrf_rook( int matrix_layout, char uplo, lapack_int n,
 11292                             lapack_complex_float* a, lapack_int lda,
 11293                             lapack_int* ipiv );
 11294  lapack_int LAPACKE_zsytrf_rook( int matrix_layout, char uplo, lapack_int n,
 11295                             lapack_complex_double* a, lapack_int lda,
 11296                             lapack_int* ipiv );
 11297  
 11298  lapack_int LAPACKE_ssytrs_rook( int matrix_layout, char uplo, lapack_int n,
 11299                             lapack_int nrhs, const float* a, lapack_int lda,
 11300                             const lapack_int* ipiv, float* b, lapack_int ldb );
 11301  lapack_int LAPACKE_dsytrs_rook( int matrix_layout, char uplo, lapack_int n,
 11302                             lapack_int nrhs, const double* a, lapack_int lda,
 11303                             const lapack_int* ipiv, double* b, lapack_int ldb );
 11304  lapack_int LAPACKE_csytrs_rook( int matrix_layout, char uplo, lapack_int n,
 11305                             lapack_int nrhs, const lapack_complex_float* a,
 11306                             lapack_int lda, const lapack_int* ipiv,
 11307                             lapack_complex_float* b, lapack_int ldb );
 11308  lapack_int LAPACKE_zsytrs_rook( int matrix_layout, char uplo, lapack_int n,
 11309                             lapack_int nrhs, const lapack_complex_double* a,
 11310                             lapack_int lda, const lapack_int* ipiv,
 11311                             lapack_complex_double* b, lapack_int ldb );
 11312  
 11313  lapack_int LAPACKE_chetrf_rook( int matrix_layout, char uplo, lapack_int n,
 11314                             lapack_complex_float* a, lapack_int lda,
 11315                             lapack_int* ipiv );
 11316  lapack_int LAPACKE_zhetrf_rook( int matrix_layout, char uplo, lapack_int n,
 11317                             lapack_complex_double* a, lapack_int lda,
 11318                             lapack_int* ipiv );
 11319  
 11320  lapack_int LAPACKE_chetrs_rook( int matrix_layout, char uplo, lapack_int n,
 11321                             lapack_int nrhs, const lapack_complex_float* a,
 11322                             lapack_int lda, const lapack_int* ipiv,
 11323                             lapack_complex_float* b, lapack_int ldb );
 11324  lapack_int LAPACKE_zhetrs_rook( int matrix_layout, char uplo, lapack_int n,
 11325                             lapack_int nrhs, const lapack_complex_double* a,
 11326                             lapack_int lda, const lapack_int* ipiv,
 11327                             lapack_complex_double* b, lapack_int ldb );
 11328  
 11329  lapack_int LAPACKE_csyr( int matrix_layout, char uplo, lapack_int n,
 11330                               lapack_complex_float alpha,
 11331                               const lapack_complex_float* x, lapack_int incx,
 11332                               lapack_complex_float* a, lapack_int lda );
 11333  lapack_int LAPACKE_zsyr( int matrix_layout, char uplo, lapack_int n,
 11334                               lapack_complex_double alpha,
 11335                               const lapack_complex_double* x, lapack_int incx,
 11336                               lapack_complex_double* a, lapack_int lda );
 11337  
 11338  lapack_int LAPACKE_ssysv_rook_work( int matrix_layout, char uplo, lapack_int n,
 11339                                      lapack_int nrhs, float* a, lapack_int lda,
 11340                                      lapack_int* ipiv, float* b, lapack_int ldb,
 11341                                      float* work, lapack_int lwork );
 11342  lapack_int LAPACKE_dsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
 11343                                      lapack_int nrhs, double* a, lapack_int lda,
 11344                                      lapack_int* ipiv, double* b, lapack_int ldb,
 11345                                      double* work, lapack_int lwork );
 11346  lapack_int LAPACKE_csysv_rook_work( int matrix_layout, char uplo, lapack_int n,
 11347                                      lapack_int nrhs, lapack_complex_float* a,
 11348                                      lapack_int lda, lapack_int* ipiv,
 11349                                      lapack_complex_float* b, lapack_int ldb,
 11350                                      lapack_complex_float* work,
 11351                                      lapack_int lwork );
 11352  lapack_int LAPACKE_zsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
 11353                                      lapack_int nrhs, lapack_complex_double* a,
 11354                                      lapack_int lda, lapack_int* ipiv,
 11355                                      lapack_complex_double* b, lapack_int ldb,
 11356                                      lapack_complex_double* work,
 11357                                      lapack_int lwork );
 11358                                      
 11359  lapack_int LAPACKE_ssytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11360                                  float* a, lapack_int lda, lapack_int* ipiv,
 11361                                  float* work, lapack_int lwork );
 11362  lapack_int LAPACKE_dsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11363                                  double* a, lapack_int lda, lapack_int* ipiv,
 11364                                  double* work, lapack_int lwork );
 11365  lapack_int LAPACKE_csytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11366                                  lapack_complex_float* a, lapack_int lda,
 11367                                  lapack_int* ipiv, lapack_complex_float* work,
 11368                                  lapack_int lwork );
 11369  lapack_int LAPACKE_zsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11370                                  lapack_complex_double* a, lapack_int lda,
 11371                                  lapack_int* ipiv, lapack_complex_double* work,
 11372                                  lapack_int lwork );
 11373  
 11374  lapack_int LAPACKE_ssytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11375                                  lapack_int nrhs, const float* a, lapack_int lda,
 11376                                  const lapack_int* ipiv, float* b,
 11377                                  lapack_int ldb );
 11378  lapack_int LAPACKE_dsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11379                                  lapack_int nrhs, const double* a,
 11380                                  lapack_int lda, const lapack_int* ipiv,
 11381                                  double* b, lapack_int ldb );
 11382  lapack_int LAPACKE_csytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11383                                  lapack_int nrhs, const lapack_complex_float* a,
 11384                                  lapack_int lda, const lapack_int* ipiv,
 11385                                  lapack_complex_float* b, lapack_int ldb );
 11386  lapack_int LAPACKE_zsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11387                                  lapack_int nrhs, const lapack_complex_double* a,
 11388                                  lapack_int lda, const lapack_int* ipiv,
 11389                                  lapack_complex_double* b, lapack_int ldb );
 11390  
 11391  lapack_int LAPACKE_chetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11392                                  lapack_complex_float* a, lapack_int lda,
 11393                                  lapack_int* ipiv, lapack_complex_float* work,
 11394                                  lapack_int lwork );
 11395  lapack_int LAPACKE_zhetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
 11396                                  lapack_complex_double* a, lapack_int lda,
 11397                                  lapack_int* ipiv, lapack_complex_double* work,
 11398                                  lapack_int lwork );
 11399  
 11400  lapack_int LAPACKE_chetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11401                                  lapack_int nrhs, const lapack_complex_float* a,
 11402                                  lapack_int lda, const lapack_int* ipiv,
 11403                                  lapack_complex_float* b, lapack_int ldb );
 11404  lapack_int LAPACKE_zhetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
 11405                                  lapack_int nrhs, const lapack_complex_double* a,
 11406                                  lapack_int lda, const lapack_int* ipiv,
 11407                                  lapack_complex_double* b, lapack_int ldb );
 11408  
 11409  
 11410  lapack_int LAPACKE_csyr_work( int matrix_layout, char uplo, lapack_int n,
 11411                                    lapack_complex_float alpha,
 11412                                    const lapack_complex_float* x,
 11413                                    lapack_int incx, lapack_complex_float* a,
 11414                                    lapack_int lda );
 11415  lapack_int LAPACKE_zsyr_work( int matrix_layout, char uplo, lapack_int n,
 11416                                    lapack_complex_double alpha,
 11417                                    const lapack_complex_double* x,
 11418                                    lapack_int incx, lapack_complex_double* a,
 11419                                    lapack_int lda );
 11420  void LAPACKE_ilaver( const lapack_int* vers_major,
 11421                       const lapack_int* vers_minor,
 11422                       const lapack_int* vers_patch );
 11423  
 11424  
 11425  #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
 11426  #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
 11427  #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
 11428  #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
 11429  #define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2,SGETRF2)
 11430  #define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2,DGETRF2)
 11431  #define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2,CGETRF2)
 11432  #define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2,ZGETRF2)
 11433  #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
 11434  #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
 11435  #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
 11436  #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
 11437  #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
 11438  #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
 11439  #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
 11440  #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
 11441  #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
 11442  #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
 11443  #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
 11444  #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
 11445  #define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2,SPOTRF2)
 11446  #define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2,DPOTRF2)
 11447  #define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2,CPOTRF2)
 11448  #define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2,ZPOTRF2)
 11449  #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
 11450  #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
 11451  #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
 11452  #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
 11453  #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
 11454  #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
 11455  #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
 11456  #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
 11457  #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
 11458  #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
 11459  #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
 11460  #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
 11461  #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
 11462  #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
 11463  #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
 11464  #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
 11465  #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
 11466  #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
 11467  #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
 11468  #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
 11469  #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
 11470  #define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook,SSYTRF_ROOK)
 11471  #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
 11472  #define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook,DSYTRF_ROOK)
 11473  #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
 11474  #define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook,CSYTRF_ROOK)
 11475  #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
 11476  #define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook,ZSYTRF_ROOK)
 11477  #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
 11478  #define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook,CHETRF_ROOK)
 11479  #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
 11480  #define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook,ZHETRF_ROOK)
 11481  #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
 11482  #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
 11483  #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
 11484  #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
 11485  #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
 11486  #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
 11487  #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
 11488  #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
 11489  #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
 11490  #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
 11491  #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
 11492  #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
 11493  #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
 11494  #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
 11495  #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
 11496  #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
 11497  #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
 11498  #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
 11499  #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
 11500  #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
 11501  #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
 11502  #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
 11503  #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
 11504  #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
 11505  #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
 11506  #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
 11507  #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
 11508  #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
 11509  #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
 11510  #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
 11511  #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
 11512  #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
 11513  #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
 11514  #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
 11515  #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
 11516  #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
 11517  #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
 11518  #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
 11519  #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
 11520  #define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook,SSYTRS_ROOK)
 11521  #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
 11522  #define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook,DSYTRS_ROOK)
 11523  #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
 11524  #define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook,CSYTRS_ROOK)
 11525  #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
 11526  #define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook,ZSYTRS_ROOK)
 11527  #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
 11528  #define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook,CHETRS_ROOK)
 11529  #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
 11530  #define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook,ZHETRS_ROOK)
 11531  #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
 11532  #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
 11533  #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
 11534  #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
 11535  #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
 11536  #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
 11537  #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
 11538  #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
 11539  #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
 11540  #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
 11541  #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
 11542  #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
 11543  #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
 11544  #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
 11545  #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
 11546  #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
 11547  #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
 11548  #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
 11549  #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
 11550  #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
 11551  #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
 11552  #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
 11553  #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
 11554  #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
 11555  #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
 11556  #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
 11557  #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
 11558  #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
 11559  #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
 11560  #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
 11561  #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
 11562  #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
 11563  #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
 11564  #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
 11565  #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
 11566  #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
 11567  #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
 11568  #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
 11569  #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
 11570  #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
 11571  #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
 11572  #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
 11573  #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
 11574  #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
 11575  #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
 11576  #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
 11577  #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
 11578  #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
 11579  #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
 11580  #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
 11581  #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
 11582  #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
 11583  #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
 11584  #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
 11585  #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
 11586  #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
 11587  #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
 11588  #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
 11589  #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
 11590  #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
 11591  #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
 11592  #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
 11593  #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
 11594  #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
 11595  #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
 11596  #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
 11597  #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
 11598  #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
 11599  #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
 11600  #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
 11601  #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
 11602  #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
 11603  #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
 11604  #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
 11605  #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
 11606  #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
 11607  #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
 11608  #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
 11609  #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
 11610  #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
 11611  #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
 11612  #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
 11613  #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
 11614  #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
 11615  #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
 11616  #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
 11617  #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
 11618  #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
 11619  #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
 11620  #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
 11621  #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
 11622  #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
 11623  #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
 11624  #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
 11625  #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
 11626  #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
 11627  #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
 11628  #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
 11629  #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
 11630  #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
 11631  #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
 11632  #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
 11633  #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
 11634  #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
 11635  #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
 11636  #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
 11637  #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
 11638  #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
 11639  #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
 11640  #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
 11641  #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
 11642  #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
 11643  #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
 11644  #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
 11645  #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
 11646  #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
 11647  #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
 11648  #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
 11649  #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
 11650  #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
 11651  #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
 11652  #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
 11653  #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
 11654  #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
 11655  #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
 11656  #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
 11657  #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
 11658  #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
 11659  #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
 11660  #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
 11661  #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
 11662  #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
 11663  #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
 11664  #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
 11665  #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
 11666  #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
 11667  #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
 11668  #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
 11669  #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
 11670  #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
 11671  #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
 11672  #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
 11673  #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
 11674  #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
 11675  #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
 11676  #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
 11677  #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
 11678  #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
 11679  #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
 11680  #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
 11681  #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
 11682  #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
 11683  #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
 11684  #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
 11685  #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
 11686  #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
 11687  #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
 11688  #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
 11689  #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
 11690  #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
 11691  #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
 11692  #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
 11693  #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
 11694  #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
 11695  #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
 11696  #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
 11697  #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
 11698  #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
 11699  #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
 11700  #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
 11701  #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
 11702  #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
 11703  #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
 11704  #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
 11705  #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
 11706  #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
 11707  #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
 11708  #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
 11709  #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
 11710  #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
 11711  #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
 11712  #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
 11713  #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
 11714  #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
 11715  #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
 11716  #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
 11717  #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
 11718  #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
 11719  #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
 11720  #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
 11721  #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
 11722  #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
 11723  #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
 11724  #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
 11725  #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
 11726  #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
 11727  #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
 11728  #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
 11729  #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
 11730  #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
 11731  #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
 11732  #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
 11733  #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
 11734  #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
 11735  #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
 11736  #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
 11737  #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
 11738  #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
 11739  #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
 11740  #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
 11741  #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
 11742  #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
 11743  #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
 11744  #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
 11745  #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
 11746  #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
 11747  #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
 11748  #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
 11749  #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
 11750  #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
 11751  #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
 11752  #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
 11753  #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
 11754  #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
 11755  #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
 11756  #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
 11757  #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
 11758  #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
 11759  #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
 11760  #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
 11761  #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
 11762  #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
 11763  #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
 11764  #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
 11765  #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
 11766  #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
 11767  #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
 11768  #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
 11769  #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
 11770  #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
 11771  #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
 11772  #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
 11773  #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
 11774  #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
 11775  #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
 11776  #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
 11777  #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
 11778  #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
 11779  #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
 11780  #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
 11781  #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
 11782  #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
 11783  #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
 11784  #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
 11785  #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
 11786  #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
 11787  #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
 11788  #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
 11789  #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
 11790  #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
 11791  #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
 11792  #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
 11793  #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
 11794  #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
 11795  #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
 11796  #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
 11797  #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
 11798  #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
 11799  #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
 11800  #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
 11801  #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
 11802  #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
 11803  #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
 11804  #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
 11805  #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
 11806  #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
 11807  #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
 11808  #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
 11809  #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
 11810  #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
 11811  #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
 11812  #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
 11813  #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
 11814  #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
 11815  #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
 11816  #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
 11817  #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
 11818  #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
 11819  #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
 11820  #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
 11821  #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
 11822  #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
 11823  #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
 11824  #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
 11825  #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
 11826  #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
 11827  #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
 11828  #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
 11829  #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
 11830  #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
 11831  #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
 11832  #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
 11833  #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
 11834  #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
 11835  #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
 11836  #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
 11837  #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
 11838  #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
 11839  #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
 11840  #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
 11841  #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
 11842  #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
 11843  #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
 11844  #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
 11845  #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
 11846  #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
 11847  #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
 11848  #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
 11849  #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
 11850  #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
 11851  #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
 11852  #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
 11853  #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
 11854  #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
 11855  #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
 11856  #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
 11857  #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
 11858  #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
 11859  #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
 11860  #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
 11861  #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
 11862  #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
 11863  #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
 11864  #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
 11865  #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
 11866  #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
 11867  #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
 11868  #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
 11869  #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
 11870  #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
 11871  #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
 11872  #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
 11873  #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
 11874  #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
 11875  #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
 11876  #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
 11877  #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
 11878  #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
 11879  #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
 11880  #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
 11881  #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
 11882  #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
 11883  #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
 11884  #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
 11885  #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
 11886  #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
 11887  #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
 11888  #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
 11889  #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
 11890  #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
 11891  #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
 11892  #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
 11893  #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
 11894  #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
 11895  #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
 11896  #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
 11897  #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
 11898  #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
 11899  #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
 11900  #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
 11901  #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
 11902  #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
 11903  #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
 11904  #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
 11905  #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
 11906  #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
 11907  #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
 11908  #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
 11909  #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
 11910  #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
 11911  #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
 11912  #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
 11913  #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
 11914  #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
 11915  #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
 11916  #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
 11917  #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
 11918  #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
 11919  #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
 11920  #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
 11921  #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
 11922  #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
 11923  #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
 11924  #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
 11925  #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
 11926  #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
 11927  #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
 11928  #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
 11929  #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
 11930  #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
 11931  #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
 11932  #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
 11933  #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
 11934  #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
 11935  #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
 11936  #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
 11937  #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
 11938  #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
 11939  #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
 11940  #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
 11941  #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
 11942  #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
 11943  #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
 11944  #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
 11945  #define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx,SBDSVDX)
 11946  #define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx,DBDSVDX)
 11947  #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
 11948  #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
 11949  #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
 11950  #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
 11951  #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
 11952  #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
 11953  #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
 11954  #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
 11955  #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
 11956  #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
 11957  #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
 11958  #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
 11959  #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
 11960  #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
 11961  #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
 11962  #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
 11963  #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
 11964  #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
 11965  #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
 11966  #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
 11967  #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
 11968  #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
 11969  #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
 11970  #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
 11971  #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
 11972  #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
 11973  #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
 11974  #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
 11975  #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
 11976  #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
 11977  #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
 11978  #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
 11979  #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
 11980  #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
 11981  #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
 11982  #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
 11983  #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
 11984  #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
 11985  #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
 11986  #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
 11987  #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
 11988  #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
 11989  #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
 11990  #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
 11991  #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
 11992  #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
 11993  #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
 11994  #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
 11995  #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
 11996  #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
 11997  #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
 11998  #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
 11999  #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
 12000  #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
 12001  #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
 12002  #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
 12003  #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
 12004  #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
 12005  #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
 12006  #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
 12007  #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
 12008  #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
 12009  #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
 12010  #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
 12011  #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
 12012  #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
 12013  #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
 12014  #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
 12015  #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
 12016  #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
 12017  #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
 12018  #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
 12019  #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
 12020  #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
 12021  #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
 12022  #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
 12023  #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
 12024  #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
 12025  #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
 12026  #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
 12027  #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
 12028  #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
 12029  #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
 12030  #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
 12031  #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
 12032  #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
 12033  #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
 12034  #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
 12035  #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
 12036  #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
 12037  #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
 12038  #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
 12039  #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
 12040  #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
 12041  #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
 12042  #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
 12043  #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
 12044  #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
 12045  #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
 12046  #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
 12047  #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
 12048  #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
 12049  #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
 12050  #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
 12051  #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
 12052  #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
 12053  #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
 12054  #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
 12055  #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
 12056  #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
 12057  #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
 12058  #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
 12059  #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
 12060  #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
 12061  #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
 12062  #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
 12063  #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
 12064  #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
 12065  #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
 12066  #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
 12067  #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
 12068  #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
 12069  #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
 12070  #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
 12071  #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
 12072  #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
 12073  #define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3,SGGHD3)
 12074  #define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3,DGGHD3)
 12075  #define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3,CGGHD3)
 12076  #define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3,ZGGHD3)
 12077  #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
 12078  #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
 12079  #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
 12080  #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
 12081  #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
 12082  #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
 12083  #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
 12084  #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
 12085  #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
 12086  #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
 12087  #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
 12088  #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
 12089  #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
 12090  #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
 12091  #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
 12092  #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
 12093  #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
 12094  #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
 12095  #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
 12096  #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
 12097  #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
 12098  #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
 12099  #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
 12100  #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
 12101  #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
 12102  #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
 12103  #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
 12104  #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
 12105  #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
 12106  #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
 12107  #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
 12108  #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
 12109  #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
 12110  #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
 12111  #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
 12112  #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
 12113  #define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3,SGGSVP3)
 12114  #define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3,DGGSVP3)
 12115  #define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
 12116  #define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3,ZGGSVP3)
 12117  #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
 12118  #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
 12119  #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
 12120  #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
 12121  #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
 12122  #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
 12123  #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
 12124  #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
 12125  #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
 12126  #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
 12127  #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
 12128  #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
 12129  #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
 12130  #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
 12131  #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
 12132  #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
 12133  #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
 12134  #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
 12135  #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
 12136  #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
 12137  #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
 12138  #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
 12139  #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
 12140  #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
 12141  #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
 12142  #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
 12143  #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
 12144  #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
 12145  #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
 12146  #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
 12147  #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
 12148  #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
 12149  #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
 12150  #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
 12151  #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
 12152  #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
 12153  #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
 12154  #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
 12155  #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
 12156  #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
 12157  #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
 12158  #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
 12159  #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
 12160  #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
 12161  #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
 12162  #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
 12163  #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
 12164  #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
 12165  #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
 12166  #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
 12167  #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
 12168  #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
 12169  #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
 12170  #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
 12171  #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
 12172  #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
 12173  #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
 12174  #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
 12175  #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
 12176  #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
 12177  #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
 12178  #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
 12179  #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
 12180  #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
 12181  #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
 12182  #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
 12183  #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
 12184  #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
 12185  #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
 12186  #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
 12187  #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
 12188  #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
 12189  #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
 12190  #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
 12191  #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
 12192  #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
 12193  #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
 12194  #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
 12195  #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
 12196  #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
 12197  #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
 12198  #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
 12199  #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
 12200  #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
 12201  #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
 12202  #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
 12203  #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
 12204  #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
 12205  #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
 12206  #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
 12207  #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
 12208  #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
 12209  #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
 12210  #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
 12211  #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
 12212  #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
 12213  #define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx,SGESVDX)
 12214  #define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx,DGESVDX)
 12215  #define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx,CGESVDX)
 12216  #define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx,ZGESVDX)
 12217  #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
 12218  #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
 12219  #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
 12220  #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
 12221  #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
 12222  #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
 12223  #define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv,CGEJSV)
 12224  #define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv,ZGEJSV)
 12225  #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
 12226  #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
 12227  #define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj,CGESVJ)
 12228  #define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj,ZGESVJ)
 12229  #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
 12230  #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
 12231  #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
 12232  #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
 12233  #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
 12234  #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
 12235  #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
 12236  #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
 12237  #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
 12238  #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
 12239  #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
 12240  #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
 12241  #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
 12242  #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
 12243  #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
 12244  #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
 12245  #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
 12246  #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
 12247  #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
 12248  #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
 12249  #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
 12250  #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
 12251  #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
 12252  #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
 12253  #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
 12254  #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
 12255  #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
 12256  #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
 12257  #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
 12258  #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
 12259  #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
 12260  #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
 12261  #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
 12262  #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
 12263  #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
 12264  #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
 12265  #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
 12266  #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
 12267  #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
 12268  #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
 12269  #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
 12270  #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
 12271  #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
 12272  #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
 12273  #define LAPACK_sgges3 LAPACK_GLOBAL(sgges3,SGGES3)
 12274  #define LAPACK_dgges3 LAPACK_GLOBAL(dgges3,DGGES3)
 12275  #define LAPACK_cgges3 LAPACK_GLOBAL(cgges3,CGGES3)
 12276  #define LAPACK_zgges3 LAPACK_GLOBAL(zgges3,ZGGES3)
 12277  #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
 12278  #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
 12279  #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
 12280  #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
 12281  #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
 12282  #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
 12283  #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
 12284  #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
 12285  #define LAPACK_sggev3 LAPACK_GLOBAL(sggev3,SGGEV3)
 12286  #define LAPACK_dggev3 LAPACK_GLOBAL(dggev3,DGGEV3)
 12287  #define LAPACK_cggev3 LAPACK_GLOBAL(cggev3,CGGEV3)
 12288  #define LAPACK_zggev3 LAPACK_GLOBAL(zggev3,ZGGEV3)
 12289  #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
 12290  #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
 12291  #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
 12292  #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
 12293  #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
 12294  #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
 12295  #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
 12296  #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
 12297  #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
 12298  #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
 12299  #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
 12300  #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
 12301  #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
 12302  #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
 12303  #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
 12304  #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
 12305  #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
 12306  #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
 12307  #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
 12308  #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
 12309  #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
 12310  #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
 12311  #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
 12312  #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
 12313  #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
 12314  #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
 12315  #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
 12316  #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
 12317  #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
 12318  #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
 12319  #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
 12320  #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
 12321  #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
 12322  #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
 12323  #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
 12324  #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
 12325  #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
 12326  #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
 12327  #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
 12328  #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
 12329  #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
 12330  #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
 12331  #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
 12332  #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
 12333  #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
 12334  #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
 12335  #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
 12336  #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
 12337  #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
 12338  #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
 12339  #define LAPACK_slacn2 LAPACK_GLOBAL(slacn2,SLACN2)
 12340  #define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2,DLACN2)
 12341  #define LAPACK_clacn2 LAPACK_GLOBAL(clacn2,CLACN2)
 12342  #define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2,ZLACN2)
 12343  #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
 12344  #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
 12345  #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
 12346  #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
 12347  #define LAPACK_clacp2 LAPACK_GLOBAL(clacp2,CLACP2)
 12348  #define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2,ZLACP2)
 12349  #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
 12350  #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
 12351  #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
 12352  #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
 12353  #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
 12354  #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
 12355  #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
 12356  #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
 12357  #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
 12358  #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
 12359  #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
 12360  #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
 12361  #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
 12362  #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
 12363  #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
 12364  #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
 12365  #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
 12366  #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
 12367  #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
 12368  #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
 12369  #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
 12370  #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
 12371  #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
 12372  #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
 12373  #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
 12374  #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
 12375  #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
 12376  #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
 12377  #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
 12378  #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
 12379  #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
 12380  #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
 12381  #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
 12382  #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
 12383  #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
 12384  #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
 12385  #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
 12386  #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
 12387  #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
 12388  #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
 12389  #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
 12390  #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
 12391  #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
 12392  #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
 12393  #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
 12394  #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
 12395  #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
 12396  #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
 12397  #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
 12398  #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
 12399  #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
 12400  #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
 12401  #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
 12402  #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
 12403  #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
 12404  #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
 12405  #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
 12406  #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
 12407  #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
 12408  #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
 12409  #define LAPACK_slascl LAPACK_GLOBAL(slascl,SLASCL)
 12410  #define LAPACK_dlascl LAPACK_GLOBAL(dlascl,DLASCL)
 12411  #define LAPACK_clascl LAPACK_GLOBAL(clascl,CLASCL)
 12412  #define LAPACK_zlascl LAPACK_GLOBAL(zlascl,ZLASCL)
 12413  #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
 12414  #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
 12415  #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
 12416  #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
 12417  #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
 12418  #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
 12419  #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
 12420  #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
 12421  #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
 12422  #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
 12423  #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
 12424  #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
 12425  #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
 12426  #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
 12427  #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
 12428  #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
 12429  #define LAPACK_slapmt LAPACK_GLOBAL(slapmt,SLAPMT)
 12430  #define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt,DLAPMT)
 12431  #define LAPACK_clapmt LAPACK_GLOBAL(clapmt,CLAPMT)
 12432  #define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt,ZLAPMT)
 12433  #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
 12434  #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
 12435  #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
 12436  #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
 12437  #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
 12438  #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
 12439  #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
 12440  #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
 12441  // LAPACK 3.3.0
 12442  #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
 12443  #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
 12444  #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
 12445  #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
 12446  #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
 12447  #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
 12448  #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
 12449  #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
 12450  #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
 12451  #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
 12452  #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
 12453  #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
 12454  #define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1,CUNCSD2BY1)
 12455  #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
 12456  #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
 12457  #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
 12458  #define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1,DORCSD2BY1)
 12459  #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
 12460  #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
 12461  #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
 12462  #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
 12463  #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
 12464  #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
 12465  #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
 12466  #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
 12467  #define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1,SORCSD2BY1)
 12468  #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
 12469  #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
 12470  #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
 12471  #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
 12472  #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
 12473  #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
 12474  #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
 12475  #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
 12476  #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
 12477  #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
 12478  #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
 12479  #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
 12480  #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
 12481  #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
 12482  #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
 12483  #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
 12484  #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
 12485  #define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1,ZUNCSD2BY1)
 12486  // LAPACK 3.4.0
 12487  #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
 12488  #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
 12489  #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
 12490  #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
 12491  #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
 12492  #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
 12493  #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
 12494  #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
 12495  #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
 12496  #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
 12497  #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
 12498  #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
 12499  #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
 12500  #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
 12501  #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
 12502  #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
 12503  #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
 12504  #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
 12505  #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
 12506  #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
 12507  #define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt,STPQRT)
 12508  #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
 12509  #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
 12510  #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
 12511  #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
 12512  #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
 12513  #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
 12514  #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
 12515  #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
 12516  #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
 12517  #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
 12518  #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
 12519  // LAPACK 3.5.0
 12520  #define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook,SSYSV_ROOK)
 12521  #define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook,DSYSV_ROOK)
 12522  #define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook,CSYSV_ROOK)
 12523  #define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook,ZSYSV_ROOK)
 12524  #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
 12525  #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
 12526  #define LAPACK_ilaver LAPACK_GLOBAL(ilaver,ILAVER)
 12527  // LAPACK 3.6.0
 12528  #define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3,SGGSVD3)
 12529  #define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3,DGGSVD3)
 12530  #define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
 12531  #define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3,ZGGSVD3)
 12532  
 12533  
 12534  
 12535  void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 12536                      lapack_int* ipiv, lapack_int *info );
 12537  void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 12538                      lapack_int* ipiv, lapack_int *info );
 12539  void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 12540                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 12541  void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 12542                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 12543  void LAPACK_sgetrf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 12544                      lapack_int* ipiv, lapack_int *info );
 12545  void LAPACK_dgetrf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 12546                      lapack_int* ipiv, lapack_int *info );
 12547  void LAPACK_cgetrf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 12548                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 12549  void LAPACK_zgetrf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 12550                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 12551  void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
 12552                      lapack_int* ku, float* ab, lapack_int* ldab,
 12553                      lapack_int* ipiv, lapack_int *info );
 12554  void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
 12555                      lapack_int* ku, double* ab, lapack_int* ldab,
 12556                      lapack_int* ipiv, lapack_int *info );
 12557  void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
 12558                      lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
 12559                      lapack_int* ipiv, lapack_int *info );
 12560  void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
 12561                      lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
 12562                      lapack_int* ipiv, lapack_int *info );
 12563  void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
 12564                      lapack_int* ipiv, lapack_int *info );
 12565  void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
 12566                      double* du2, lapack_int* ipiv, lapack_int *info );
 12567  void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
 12568                      lapack_complex_float* d, lapack_complex_float* du,
 12569                      lapack_complex_float* du2, lapack_int* ipiv,
 12570                      lapack_int *info );
 12571  void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
 12572                      lapack_complex_double* d, lapack_complex_double* du,
 12573                      lapack_complex_double* du2, lapack_int* ipiv,
 12574                      lapack_int *info );
 12575  void LAPACK_spotrf2( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 12576                      lapack_int *info );
 12577  void LAPACK_dpotrf2( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 12578                      lapack_int *info );
 12579  void LAPACK_cpotrf2( char* uplo, lapack_int* n, lapack_complex_float* a,
 12580                      lapack_int* lda, lapack_int *info );
 12581  void LAPACK_zpotrf2( char* uplo, lapack_int* n, lapack_complex_double* a,
 12582                      lapack_int* lda, lapack_int *info );
 12583  void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 12584                      lapack_int *info );
 12585  void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 12586                      lapack_int *info );
 12587  void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
 12588                      lapack_int* lda, lapack_int *info );
 12589  void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
 12590                      lapack_int* lda, lapack_int *info );
 12591  void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 12592                      lapack_int* piv, lapack_int* rank, double* tol,
 12593                      double* work, lapack_int *info );
 12594  void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 12595                      lapack_int* piv, lapack_int* rank, float* tol, float* work,
 12596                      lapack_int *info );
 12597  void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
 12598                      lapack_int* lda, lapack_int* piv, lapack_int* rank,
 12599                      double* tol, double* work, lapack_int *info );
 12600  void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
 12601                      lapack_int* lda, lapack_int* piv, lapack_int* rank,
 12602                      float* tol, float* work, lapack_int *info );
 12603  void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
 12604                      lapack_int *info );
 12605  void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
 12606                      lapack_int *info );
 12607  void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
 12608                      lapack_complex_double* a, lapack_int *info );
 12609  void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
 12610                      lapack_complex_float* a, lapack_int *info );
 12611  void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
 12612  void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
 12613  void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
 12614                      lapack_int *info );
 12615  void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
 12616                      lapack_int *info );
 12617  void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
 12618                      lapack_int* ldab, lapack_int *info );
 12619  void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
 12620                      lapack_int* ldab, lapack_int *info );
 12621  void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
 12622                      lapack_complex_float* ab, lapack_int* ldab,
 12623                      lapack_int *info );
 12624  void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
 12625                      lapack_complex_double* ab, lapack_int* ldab,
 12626                      lapack_int *info );
 12627  void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
 12628  void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
 12629  void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
 12630                      lapack_int *info );
 12631  void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
 12632                      lapack_int *info );
 12633  void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 12634                      lapack_int* ipiv, float* work, lapack_int* lwork,
 12635                      lapack_int *info );
 12636  void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 12637                      lapack_int* ipiv, double* work, lapack_int* lwork,
 12638                      lapack_int *info );
 12639  void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
 12640                      lapack_int* lda, lapack_int* ipiv,
 12641                      lapack_complex_float* work, lapack_int* lwork,
 12642                      lapack_int *info );
 12643  void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
 12644                      lapack_int* lda, lapack_int* ipiv,
 12645                      lapack_complex_double* work, lapack_int* lwork,
 12646                      lapack_int *info );
 12647  void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
 12648                      lapack_int* lda, lapack_int* ipiv,
 12649                      lapack_complex_float* work, lapack_int* lwork,
 12650                      lapack_int *info );
 12651  void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
 12652                      lapack_int* lda, lapack_int* ipiv,
 12653                      lapack_complex_double* work, lapack_int* lwork,
 12654                      lapack_int *info );
 12655  void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
 12656                      lapack_int *info );
 12657  void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
 12658                      lapack_int *info );
 12659  void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
 12660                      lapack_int* ipiv, lapack_int *info );
 12661  void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
 12662                      lapack_int* ipiv, lapack_int *info );
 12663  void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
 12664                      lapack_int* ipiv, lapack_int *info );
 12665  void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
 12666                      lapack_int* ipiv, lapack_int *info );
 12667  void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12668                      const float* a, lapack_int* lda, const lapack_int* ipiv,
 12669                      float* b, lapack_int* ldb, lapack_int *info );
 12670  void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12671                      const double* a, lapack_int* lda, const lapack_int* ipiv,
 12672                      double* b, lapack_int* ldb, lapack_int *info );
 12673  void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12674                      const lapack_complex_float* a, lapack_int* lda,
 12675                      const lapack_int* ipiv, lapack_complex_float* b,
 12676                      lapack_int* ldb, lapack_int *info );
 12677  void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12678                      const lapack_complex_double* a, lapack_int* lda,
 12679                      const lapack_int* ipiv, lapack_complex_double* b,
 12680                      lapack_int* ldb, lapack_int *info );
 12681  void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12682                      lapack_int* nrhs, const float* ab, lapack_int* ldab,
 12683                      const lapack_int* ipiv, float* b, lapack_int* ldb,
 12684                      lapack_int *info );
 12685  void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12686                      lapack_int* nrhs, const double* ab, lapack_int* ldab,
 12687                      const lapack_int* ipiv, double* b, lapack_int* ldb,
 12688                      lapack_int *info );
 12689  void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12690                      lapack_int* nrhs, const lapack_complex_float* ab,
 12691                      lapack_int* ldab, const lapack_int* ipiv,
 12692                      lapack_complex_float* b, lapack_int* ldb,
 12693                      lapack_int *info );
 12694  void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12695                      lapack_int* nrhs, const lapack_complex_double* ab,
 12696                      lapack_int* ldab, const lapack_int* ipiv,
 12697                      lapack_complex_double* b, lapack_int* ldb,
 12698                      lapack_int *info );
 12699  void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12700                      const float* dl, const float* d, const float* du,
 12701                      const float* du2, const lapack_int* ipiv, float* b,
 12702                      lapack_int* ldb, lapack_int *info );
 12703  void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12704                      const double* dl, const double* d, const double* du,
 12705                      const double* du2, const lapack_int* ipiv, double* b,
 12706                      lapack_int* ldb, lapack_int *info );
 12707  void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12708                      const lapack_complex_float* dl,
 12709                      const lapack_complex_float* d,
 12710                      const lapack_complex_float* du,
 12711                      const lapack_complex_float* du2, const lapack_int* ipiv,
 12712                      lapack_complex_float* b, lapack_int* ldb,
 12713                      lapack_int *info );
 12714  void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
 12715                      const lapack_complex_double* dl,
 12716                      const lapack_complex_double* d,
 12717                      const lapack_complex_double* du,
 12718                      const lapack_complex_double* du2, const lapack_int* ipiv,
 12719                      lapack_complex_double* b, lapack_int* ldb,
 12720                      lapack_int *info );
 12721  void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
 12722                      lapack_int* lda, float* b, lapack_int* ldb,
 12723                      lapack_int *info );
 12724  void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12725                      const double* a, lapack_int* lda, double* b,
 12726                      lapack_int* ldb, lapack_int *info );
 12727  void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12728                      const lapack_complex_float* a, lapack_int* lda,
 12729                      lapack_complex_float* b, lapack_int* ldb,
 12730                      lapack_int *info );
 12731  void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12732                      const lapack_complex_double* a, lapack_int* lda,
 12733                      lapack_complex_double* b, lapack_int* ldb,
 12734                      lapack_int *info );
 12735  void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
 12736                      const double* a, double* b, lapack_int* ldb,
 12737                      lapack_int *info );
 12738  void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
 12739                      const float* a, float* b, lapack_int* ldb,
 12740                      lapack_int *info );
 12741  void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
 12742                      const lapack_complex_double* a, lapack_complex_double* b,
 12743                      lapack_int* ldb, lapack_int *info );
 12744  void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
 12745                      const lapack_complex_float* a, lapack_complex_float* b,
 12746                      lapack_int* ldb, lapack_int *info );
 12747  void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12748                      const float* ap, float* b, lapack_int* ldb,
 12749                      lapack_int *info );
 12750  void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12751                      const double* ap, double* b, lapack_int* ldb,
 12752                      lapack_int *info );
 12753  void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12754                      const lapack_complex_float* ap, lapack_complex_float* b,
 12755                      lapack_int* ldb, lapack_int *info );
 12756  void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12757                      const lapack_complex_double* ap, lapack_complex_double* b,
 12758                      lapack_int* ldb, lapack_int *info );
 12759  void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 12760                      const float* ab, lapack_int* ldab, float* b,
 12761                      lapack_int* ldb, lapack_int *info );
 12762  void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 12763                      const double* ab, lapack_int* ldab, double* b,
 12764                      lapack_int* ldb, lapack_int *info );
 12765  void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 12766                      const lapack_complex_float* ab, lapack_int* ldab,
 12767                      lapack_complex_float* b, lapack_int* ldb,
 12768                      lapack_int *info );
 12769  void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 12770                      const lapack_complex_double* ab, lapack_int* ldab,
 12771                      lapack_complex_double* b, lapack_int* ldb,
 12772                      lapack_int *info );
 12773  void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
 12774                      const float* e, float* b, lapack_int* ldb,
 12775                      lapack_int *info );
 12776  void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
 12777                      const double* e, double* b, lapack_int* ldb,
 12778                      lapack_int *info );
 12779  void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
 12780                      const lapack_complex_float* e, lapack_complex_float* b,
 12781                      lapack_int* ldb, lapack_int *info );
 12782  void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12783                      const double* d, const lapack_complex_double* e,
 12784                      lapack_complex_double* b, lapack_int* ldb,
 12785                      lapack_int *info );
 12786  void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
 12787                      lapack_int* lda, const lapack_int* ipiv, float* b,
 12788                      lapack_int* ldb, lapack_int *info );
 12789  void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12790                      const double* a, lapack_int* lda, const lapack_int* ipiv,
 12791                      double* b, lapack_int* ldb, lapack_int *info );
 12792  void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12793                      const lapack_complex_float* a, lapack_int* lda,
 12794                      const lapack_int* ipiv, lapack_complex_float* b,
 12795                      lapack_int* ldb, lapack_int *info );
 12796  void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12797                      const lapack_complex_double* a, lapack_int* lda,
 12798                      const lapack_int* ipiv, lapack_complex_double* b,
 12799                      lapack_int* ldb, lapack_int *info );
 12800  void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12801                      const lapack_complex_float* a, lapack_int* lda,
 12802                      const lapack_int* ipiv, lapack_complex_float* b,
 12803                      lapack_int* ldb, lapack_int *info );
 12804  void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12805                      const lapack_complex_double* a, lapack_int* lda,
 12806                      const lapack_int* ipiv, lapack_complex_double* b,
 12807                      lapack_int* ldb, lapack_int *info );
 12808  void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12809                      const float* ap, const lapack_int* ipiv, float* b,
 12810                      lapack_int* ldb, lapack_int *info );
 12811  void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12812                      const double* ap, const lapack_int* ipiv, double* b,
 12813                      lapack_int* ldb, lapack_int *info );
 12814  void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12815                      const lapack_complex_float* ap, const lapack_int* ipiv,
 12816                      lapack_complex_float* b, lapack_int* ldb,
 12817                      lapack_int *info );
 12818  void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12819                      const lapack_complex_double* ap, const lapack_int* ipiv,
 12820                      lapack_complex_double* b, lapack_int* ldb,
 12821                      lapack_int *info );
 12822  void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12823                      const lapack_complex_float* ap, const lapack_int* ipiv,
 12824                      lapack_complex_float* b, lapack_int* ldb,
 12825                      lapack_int *info );
 12826  void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
 12827                      const lapack_complex_double* ap, const lapack_int* ipiv,
 12828                      lapack_complex_double* b, lapack_int* ldb,
 12829                      lapack_int *info );
 12830  void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12831                      lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
 12832                      lapack_int* ldb, lapack_int *info );
 12833  void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12834                      lapack_int* nrhs, const double* a, lapack_int* lda,
 12835                      double* b, lapack_int* ldb, lapack_int *info );
 12836  void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12837                      lapack_int* nrhs, const lapack_complex_float* a,
 12838                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
 12839                      lapack_int *info );
 12840  void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12841                      lapack_int* nrhs, const lapack_complex_double* a,
 12842                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
 12843                      lapack_int *info );
 12844  void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12845                      lapack_int* nrhs, const float* ap, float* b,
 12846                      lapack_int* ldb, lapack_int *info );
 12847  void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12848                      lapack_int* nrhs, const double* ap, double* b,
 12849                      lapack_int* ldb, lapack_int *info );
 12850  void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12851                      lapack_int* nrhs, const lapack_complex_float* ap,
 12852                      lapack_complex_float* b, lapack_int* ldb,
 12853                      lapack_int *info );
 12854  void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12855                      lapack_int* nrhs, const lapack_complex_double* ap,
 12856                      lapack_complex_double* b, lapack_int* ldb,
 12857                      lapack_int *info );
 12858  void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12859                      lapack_int* kd, lapack_int* nrhs, const float* ab,
 12860                      lapack_int* ldab, float* b, lapack_int* ldb,
 12861                      lapack_int *info );
 12862  void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12863                      lapack_int* kd, lapack_int* nrhs, const double* ab,
 12864                      lapack_int* ldab, double* b, lapack_int* ldb,
 12865                      lapack_int *info );
 12866  void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12867                      lapack_int* kd, lapack_int* nrhs,
 12868                      const lapack_complex_float* ab, lapack_int* ldab,
 12869                      lapack_complex_float* b, lapack_int* ldb,
 12870                      lapack_int *info );
 12871  void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
 12872                      lapack_int* kd, lapack_int* nrhs,
 12873                      const lapack_complex_double* ab, lapack_int* ldab,
 12874                      lapack_complex_double* b, lapack_int* ldb,
 12875                      lapack_int *info );
 12876  void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
 12877                      float* anorm, float* rcond, float* work, lapack_int* iwork,
 12878                      lapack_int *info );
 12879  void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
 12880                      double* anorm, double* rcond, double* work,
 12881                      lapack_int* iwork, lapack_int *info );
 12882  void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
 12883                      lapack_int* lda, float* anorm, float* rcond,
 12884                      lapack_complex_float* work, float* rwork,
 12885                      lapack_int *info );
 12886  void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
 12887                      lapack_int* lda, double* anorm, double* rcond,
 12888                      lapack_complex_double* work, double* rwork,
 12889                      lapack_int *info );
 12890  void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12891                      const float* ab, lapack_int* ldab, const lapack_int* ipiv,
 12892                      float* anorm, float* rcond, float* work, lapack_int* iwork,
 12893                      lapack_int *info );
 12894  void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12895                      const double* ab, lapack_int* ldab, const lapack_int* ipiv,
 12896                      double* anorm, double* rcond, double* work,
 12897                      lapack_int* iwork, lapack_int *info );
 12898  void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12899                      const lapack_complex_float* ab, lapack_int* ldab,
 12900                      const lapack_int* ipiv, float* anorm, float* rcond,
 12901                      lapack_complex_float* work, float* rwork,
 12902                      lapack_int *info );
 12903  void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
 12904                      const lapack_complex_double* ab, lapack_int* ldab,
 12905                      const lapack_int* ipiv, double* anorm, double* rcond,
 12906                      lapack_complex_double* work, double* rwork,
 12907                      lapack_int *info );
 12908  void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
 12909                      const float* du, const float* du2, const lapack_int* ipiv,
 12910                      float* anorm, float* rcond, float* work, lapack_int* iwork,
 12911                      lapack_int *info );
 12912  void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
 12913                      const double* d, const double* du, const double* du2,
 12914                      const lapack_int* ipiv, double* anorm, double* rcond,
 12915                      double* work, lapack_int* iwork, lapack_int *info );
 12916  void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
 12917                      const lapack_complex_float* d,
 12918                      const lapack_complex_float* du,
 12919                      const lapack_complex_float* du2, const lapack_int* ipiv,
 12920                      float* anorm, float* rcond, lapack_complex_float* work,
 12921                      lapack_int *info );
 12922  void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
 12923                      const lapack_complex_double* d,
 12924                      const lapack_complex_double* du,
 12925                      const lapack_complex_double* du2, const lapack_int* ipiv,
 12926                      double* anorm, double* rcond, lapack_complex_double* work,
 12927                      lapack_int *info );
 12928  void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
 12929                      float* anorm, float* rcond, float* work, lapack_int* iwork,
 12930                      lapack_int *info );
 12931  void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
 12932                      double* anorm, double* rcond, double* work,
 12933                      lapack_int* iwork, lapack_int *info );
 12934  void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
 12935                      lapack_int* lda, float* anorm, float* rcond,
 12936                      lapack_complex_float* work, float* rwork,
 12937                      lapack_int *info );
 12938  void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
 12939                      lapack_int* lda, double* anorm, double* rcond,
 12940                      lapack_complex_double* work, double* rwork,
 12941                      lapack_int *info );
 12942  void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
 12943                      float* rcond, float* work, lapack_int* iwork,
 12944                      lapack_int *info );
 12945  void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
 12946                      double* rcond, double* work, lapack_int* iwork,
 12947                      lapack_int *info );
 12948  void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 12949                      float* anorm, float* rcond, lapack_complex_float* work,
 12950                      float* rwork, lapack_int *info );
 12951  void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 12952                      double* anorm, double* rcond, lapack_complex_double* work,
 12953                      double* rwork, lapack_int *info );
 12954  void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
 12955                      lapack_int* ldab, float* anorm, float* rcond, float* work,
 12956                      lapack_int* iwork, lapack_int *info );
 12957  void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
 12958                      lapack_int* ldab, double* anorm, double* rcond,
 12959                      double* work, lapack_int* iwork, lapack_int *info );
 12960  void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
 12961                      const lapack_complex_float* ab, lapack_int* ldab,
 12962                      float* anorm, float* rcond, lapack_complex_float* work,
 12963                      float* rwork, lapack_int *info );
 12964  void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
 12965                      const lapack_complex_double* ab, lapack_int* ldab,
 12966                      double* anorm, double* rcond, lapack_complex_double* work,
 12967                      double* rwork, lapack_int *info );
 12968  void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
 12969                      float* rcond, float* work, lapack_int *info );
 12970  void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
 12971                      double* anorm, double* rcond, double* work,
 12972                      lapack_int *info );
 12973  void LAPACK_cptcon( lapack_int* n, const float* d,
 12974                      const lapack_complex_float* e, float* anorm, float* rcond,
 12975                      float* work, lapack_int *info );
 12976  void LAPACK_zptcon( lapack_int* n, const double* d,
 12977                      const lapack_complex_double* e, double* anorm,
 12978                      double* rcond, double* work, lapack_int *info );
 12979  void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
 12980                      const lapack_int* ipiv, float* anorm, float* rcond,
 12981                      float* work, lapack_int* iwork, lapack_int *info );
 12982  void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
 12983                      const lapack_int* ipiv, double* anorm, double* rcond,
 12984                      double* work, lapack_int* iwork, lapack_int *info );
 12985  void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
 12986                      lapack_int* lda, const lapack_int* ipiv, float* anorm,
 12987                      float* rcond, lapack_complex_float* work,
 12988                      lapack_int *info );
 12989  void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
 12990                      lapack_int* lda, const lapack_int* ipiv, double* anorm,
 12991                      double* rcond, lapack_complex_double* work,
 12992                      lapack_int *info );
 12993  void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
 12994                      lapack_int* lda, const lapack_int* ipiv, float* anorm,
 12995                      float* rcond, lapack_complex_float* work,
 12996                      lapack_int *info );
 12997  void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
 12998                      lapack_int* lda, const lapack_int* ipiv, double* anorm,
 12999                      double* rcond, lapack_complex_double* work,
 13000                      lapack_int *info );
 13001  void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
 13002                      const lapack_int* ipiv, float* anorm, float* rcond,
 13003                      float* work, lapack_int* iwork, lapack_int *info );
 13004  void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
 13005                      const lapack_int* ipiv, double* anorm, double* rcond,
 13006                      double* work, lapack_int* iwork, lapack_int *info );
 13007  void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 13008                      const lapack_int* ipiv, float* anorm, float* rcond,
 13009                      lapack_complex_float* work, lapack_int *info );
 13010  void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 13011                      const lapack_int* ipiv, double* anorm, double* rcond,
 13012                      lapack_complex_double* work, lapack_int *info );
 13013  void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 13014                      const lapack_int* ipiv, float* anorm, float* rcond,
 13015                      lapack_complex_float* work, lapack_int *info );
 13016  void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 13017                      const lapack_int* ipiv, double* anorm, double* rcond,
 13018                      lapack_complex_double* work, lapack_int *info );
 13019  void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13020                      const float* a, lapack_int* lda, float* rcond, float* work,
 13021                      lapack_int* iwork, lapack_int *info );
 13022  void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13023                      const double* a, lapack_int* lda, double* rcond,
 13024                      double* work, lapack_int* iwork, lapack_int *info );
 13025  void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13026                      const lapack_complex_float* a, lapack_int* lda,
 13027                      float* rcond, lapack_complex_float* work, float* rwork,
 13028                      lapack_int *info );
 13029  void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13030                      const lapack_complex_double* a, lapack_int* lda,
 13031                      double* rcond, lapack_complex_double* work, double* rwork,
 13032                      lapack_int *info );
 13033  void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13034                      const float* ap, float* rcond, float* work,
 13035                      lapack_int* iwork, lapack_int *info );
 13036  void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13037                      const double* ap, double* rcond, double* work,
 13038                      lapack_int* iwork, lapack_int *info );
 13039  void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13040                      const lapack_complex_float* ap, float* rcond,
 13041                      lapack_complex_float* work, float* rwork,
 13042                      lapack_int *info );
 13043  void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13044                      const lapack_complex_double* ap, double* rcond,
 13045                      lapack_complex_double* work, double* rwork,
 13046                      lapack_int *info );
 13047  void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13048                      lapack_int* kd, const float* ab, lapack_int* ldab,
 13049                      float* rcond, float* work, lapack_int* iwork,
 13050                      lapack_int *info );
 13051  void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13052                      lapack_int* kd, const double* ab, lapack_int* ldab,
 13053                      double* rcond, double* work, lapack_int* iwork,
 13054                      lapack_int *info );
 13055  void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13056                      lapack_int* kd, const lapack_complex_float* ab,
 13057                      lapack_int* ldab, float* rcond, lapack_complex_float* work,
 13058                      float* rwork, lapack_int *info );
 13059  void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
 13060                      lapack_int* kd, const lapack_complex_double* ab,
 13061                      lapack_int* ldab, double* rcond,
 13062                      lapack_complex_double* work, double* rwork,
 13063                      lapack_int *info );
 13064  void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13065                      const float* a, lapack_int* lda, const float* af,
 13066                      lapack_int* ldaf, const lapack_int* ipiv, const float* b,
 13067                      lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
 13068                      float* berr, float* work, lapack_int* iwork,
 13069                      lapack_int *info );
 13070  void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13071                      const double* a, lapack_int* lda, const double* af,
 13072                      lapack_int* ldaf, const lapack_int* ipiv, const double* b,
 13073                      lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
 13074                      double* berr, double* work, lapack_int* iwork,
 13075                      lapack_int *info );
 13076  void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13077                      const lapack_complex_float* a, lapack_int* lda,
 13078                      const lapack_complex_float* af, lapack_int* ldaf,
 13079                      const lapack_int* ipiv, const lapack_complex_float* b,
 13080                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 13081                      float* ferr, float* berr, lapack_complex_float* work,
 13082                      float* rwork, lapack_int *info );
 13083  void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13084                      const lapack_complex_double* a, lapack_int* lda,
 13085                      const lapack_complex_double* af, lapack_int* ldaf,
 13086                      const lapack_int* ipiv, const lapack_complex_double* b,
 13087                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 13088                      double* ferr, double* berr, lapack_complex_double* work,
 13089                      double* rwork, lapack_int *info );
 13090  void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
 13091                       const double* a, lapack_int* lda, const double* af,
 13092                       lapack_int* ldaf, const lapack_int* ipiv, const double* r,
 13093                       const double* c, const double* b, lapack_int* ldb,
 13094                       double* x, lapack_int* ldx, double* rcond, double* berr,
 13095                       lapack_int* n_err_bnds, double* err_bnds_norm,
 13096                       double* err_bnds_comp, lapack_int* nparams, double* params,
 13097                       double* work, lapack_int* iwork, lapack_int *info );
 13098  void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
 13099                       const float* a, lapack_int* lda, const float* af,
 13100                       lapack_int* ldaf, const lapack_int* ipiv, const float* r,
 13101                       const float* c, const float* b, lapack_int* ldb, float* x,
 13102                       lapack_int* ldx, float* rcond, float* berr,
 13103                       lapack_int* n_err_bnds, float* err_bnds_norm,
 13104                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13105                       float* work, lapack_int* iwork, lapack_int *info );
 13106  void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
 13107                       const lapack_complex_double* a, lapack_int* lda,
 13108                       const lapack_complex_double* af, lapack_int* ldaf,
 13109                       const lapack_int* ipiv, const double* r, const double* c,
 13110                       const lapack_complex_double* b, lapack_int* ldb,
 13111                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13112                       double* berr, lapack_int* n_err_bnds,
 13113                       double* err_bnds_norm, double* err_bnds_comp,
 13114                       lapack_int* nparams, double* params,
 13115                       lapack_complex_double* work, double* rwork,
 13116                       lapack_int *info );
 13117  void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
 13118                       const lapack_complex_float* a, lapack_int* lda,
 13119                       const lapack_complex_float* af, lapack_int* ldaf,
 13120                       const lapack_int* ipiv, const float* r, const float* c,
 13121                       const lapack_complex_float* b, lapack_int* ldb,
 13122                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13123                       float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
 13124                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13125                       lapack_complex_float* work, float* rwork,
 13126                       lapack_int *info );
 13127  void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 13128                      lapack_int* nrhs, const float* ab, lapack_int* ldab,
 13129                      const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
 13130                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13131                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13132                      lapack_int *info );
 13133  void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 13134                      lapack_int* nrhs, const double* ab, lapack_int* ldab,
 13135                      const double* afb, lapack_int* ldafb,
 13136                      const lapack_int* ipiv, const double* b, lapack_int* ldb,
 13137                      double* x, lapack_int* ldx, double* ferr, double* berr,
 13138                      double* work, lapack_int* iwork, lapack_int *info );
 13139  void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 13140                      lapack_int* nrhs, const lapack_complex_float* ab,
 13141                      lapack_int* ldab, const lapack_complex_float* afb,
 13142                      lapack_int* ldafb, const lapack_int* ipiv,
 13143                      const lapack_complex_float* b, lapack_int* ldb,
 13144                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13145                      float* berr, lapack_complex_float* work, float* rwork,
 13146                      lapack_int *info );
 13147  void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
 13148                      lapack_int* nrhs, const lapack_complex_double* ab,
 13149                      lapack_int* ldab, const lapack_complex_double* afb,
 13150                      lapack_int* ldafb, const lapack_int* ipiv,
 13151                      const lapack_complex_double* b, lapack_int* ldb,
 13152                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13153                      double* berr, lapack_complex_double* work, double* rwork,
 13154                      lapack_int *info );
 13155  void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
 13156                       lapack_int* ku, lapack_int* nrhs, const double* ab,
 13157                       lapack_int* ldab, const double* afb, lapack_int* ldafb,
 13158                       const lapack_int* ipiv, const double* r, const double* c,
 13159                       const double* b, lapack_int* ldb, double* x,
 13160                       lapack_int* ldx, double* rcond, double* berr,
 13161                       lapack_int* n_err_bnds, double* err_bnds_norm,
 13162                       double* err_bnds_comp, lapack_int* nparams, double* params,
 13163                       double* work, lapack_int* iwork, lapack_int *info );
 13164  void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
 13165                       lapack_int* ku, lapack_int* nrhs, const float* ab,
 13166                       lapack_int* ldab, const float* afb, lapack_int* ldafb,
 13167                       const lapack_int* ipiv, const float* r, const float* c,
 13168                       const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13169                       float* rcond, float* berr, lapack_int* n_err_bnds,
 13170                       float* err_bnds_norm, float* err_bnds_comp,
 13171                       lapack_int* nparams, float* params, float* work,
 13172                       lapack_int* iwork, lapack_int *info );
 13173  void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
 13174                       lapack_int* ku, lapack_int* nrhs,
 13175                       const lapack_complex_double* ab, lapack_int* ldab,
 13176                       const lapack_complex_double* afb, lapack_int* ldafb,
 13177                       const lapack_int* ipiv, const double* r, const double* c,
 13178                       const lapack_complex_double* b, lapack_int* ldb,
 13179                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13180                       double* berr, lapack_int* n_err_bnds,
 13181                       double* err_bnds_norm, double* err_bnds_comp,
 13182                       lapack_int* nparams, double* params,
 13183                       lapack_complex_double* work, double* rwork,
 13184                       lapack_int *info );
 13185  void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
 13186                       lapack_int* ku, lapack_int* nrhs,
 13187                       const lapack_complex_float* ab, lapack_int* ldab,
 13188                       const lapack_complex_float* afb, lapack_int* ldafb,
 13189                       const lapack_int* ipiv, const float* r, const float* c,
 13190                       const lapack_complex_float* b, lapack_int* ldb,
 13191                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13192                       float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
 13193                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13194                       lapack_complex_float* work, float* rwork,
 13195                       lapack_int *info );
 13196  void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13197                      const float* dl, const float* d, const float* du,
 13198                      const float* dlf, const float* df, const float* duf,
 13199                      const float* du2, const lapack_int* ipiv, const float* b,
 13200                      lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
 13201                      float* berr, float* work, lapack_int* iwork,
 13202                      lapack_int *info );
 13203  void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13204                      const double* dl, const double* d, const double* du,
 13205                      const double* dlf, const double* df, const double* duf,
 13206                      const double* du2, const lapack_int* ipiv, const double* b,
 13207                      lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
 13208                      double* berr, double* work, lapack_int* iwork,
 13209                      lapack_int *info );
 13210  void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13211                      const lapack_complex_float* dl,
 13212                      const lapack_complex_float* d,
 13213                      const lapack_complex_float* du,
 13214                      const lapack_complex_float* dlf,
 13215                      const lapack_complex_float* df,
 13216                      const lapack_complex_float* duf,
 13217                      const lapack_complex_float* du2, const lapack_int* ipiv,
 13218                      const lapack_complex_float* b, lapack_int* ldb,
 13219                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13220                      float* berr, lapack_complex_float* work, float* rwork,
 13221                      lapack_int *info );
 13222  void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
 13223                      const lapack_complex_double* dl,
 13224                      const lapack_complex_double* d,
 13225                      const lapack_complex_double* du,
 13226                      const lapack_complex_double* dlf,
 13227                      const lapack_complex_double* df,
 13228                      const lapack_complex_double* duf,
 13229                      const lapack_complex_double* du2, const lapack_int* ipiv,
 13230                      const lapack_complex_double* b, lapack_int* ldb,
 13231                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13232                      double* berr, lapack_complex_double* work, double* rwork,
 13233                      lapack_int *info );
 13234  void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
 13235                      lapack_int* lda, const float* af, lapack_int* ldaf,
 13236                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13237                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13238                      lapack_int *info );
 13239  void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13240                      const double* a, lapack_int* lda, const double* af,
 13241                      lapack_int* ldaf, const double* b, lapack_int* ldb,
 13242                      double* x, lapack_int* ldx, double* ferr, double* berr,
 13243                      double* work, lapack_int* iwork, lapack_int *info );
 13244  void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13245                      const lapack_complex_float* a, lapack_int* lda,
 13246                      const lapack_complex_float* af, lapack_int* ldaf,
 13247                      const lapack_complex_float* b, lapack_int* ldb,
 13248                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13249                      float* berr, lapack_complex_float* work, float* rwork,
 13250                      lapack_int *info );
 13251  void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13252                      const lapack_complex_double* a, lapack_int* lda,
 13253                      const lapack_complex_double* af, lapack_int* ldaf,
 13254                      const lapack_complex_double* b, lapack_int* ldb,
 13255                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13256                      double* berr, lapack_complex_double* work, double* rwork,
 13257                      lapack_int *info );
 13258  void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13259                       const double* a, lapack_int* lda, const double* af,
 13260                       lapack_int* ldaf, const double* s, const double* b,
 13261                       lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
 13262                       double* berr, lapack_int* n_err_bnds,
 13263                       double* err_bnds_norm, double* err_bnds_comp,
 13264                       lapack_int* nparams, double* params, double* work,
 13265                       lapack_int* iwork, lapack_int *info );
 13266  void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13267                       const float* a, lapack_int* lda, const float* af,
 13268                       lapack_int* ldaf, const float* s, const float* b,
 13269                       lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 13270                       float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
 13271                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13272                       float* work, lapack_int* iwork, lapack_int *info );
 13273  void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13274                       const lapack_complex_double* a, lapack_int* lda,
 13275                       const lapack_complex_double* af, lapack_int* ldaf,
 13276                       const double* s, const lapack_complex_double* b,
 13277                       lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 13278                       double* rcond, double* berr, lapack_int* n_err_bnds,
 13279                       double* err_bnds_norm, double* err_bnds_comp,
 13280                       lapack_int* nparams, double* params,
 13281                       lapack_complex_double* work, double* rwork,
 13282                       lapack_int *info );
 13283  void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13284                       const lapack_complex_float* a, lapack_int* lda,
 13285                       const lapack_complex_float* af, lapack_int* ldaf,
 13286                       const float* s, const lapack_complex_float* b,
 13287                       lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 13288                       float* rcond, float* berr, lapack_int* n_err_bnds,
 13289                       float* err_bnds_norm, float* err_bnds_comp,
 13290                       lapack_int* nparams, float* params,
 13291                       lapack_complex_float* work, float* rwork,
 13292                       lapack_int *info );
 13293  void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13294                      const float* ap, const float* afp, const float* b,
 13295                      lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
 13296                      float* berr, float* work, lapack_int* iwork,
 13297                      lapack_int *info );
 13298  void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13299                      const double* ap, const double* afp, const double* b,
 13300                      lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
 13301                      double* berr, double* work, lapack_int* iwork,
 13302                      lapack_int *info );
 13303  void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13304                      const lapack_complex_float* ap,
 13305                      const lapack_complex_float* afp,
 13306                      const lapack_complex_float* b, lapack_int* ldb,
 13307                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13308                      float* berr, lapack_complex_float* work, float* rwork,
 13309                      lapack_int *info );
 13310  void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13311                      const lapack_complex_double* ap,
 13312                      const lapack_complex_double* afp,
 13313                      const lapack_complex_double* b, lapack_int* ldb,
 13314                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13315                      double* berr, lapack_complex_double* work, double* rwork,
 13316                      lapack_int *info );
 13317  void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 13318                      const float* ab, lapack_int* ldab, const float* afb,
 13319                      lapack_int* ldafb, const float* b, lapack_int* ldb,
 13320                      float* x, lapack_int* ldx, float* ferr, float* berr,
 13321                      float* work, lapack_int* iwork, lapack_int *info );
 13322  void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 13323                      const double* ab, lapack_int* ldab, const double* afb,
 13324                      lapack_int* ldafb, const double* b, lapack_int* ldb,
 13325                      double* x, lapack_int* ldx, double* ferr, double* berr,
 13326                      double* work, lapack_int* iwork, lapack_int *info );
 13327  void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 13328                      const lapack_complex_float* ab, lapack_int* ldab,
 13329                      const lapack_complex_float* afb, lapack_int* ldafb,
 13330                      const lapack_complex_float* b, lapack_int* ldb,
 13331                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13332                      float* berr, lapack_complex_float* work, float* rwork,
 13333                      lapack_int *info );
 13334  void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 13335                      const lapack_complex_double* ab, lapack_int* ldab,
 13336                      const lapack_complex_double* afb, lapack_int* ldafb,
 13337                      const lapack_complex_double* b, lapack_int* ldb,
 13338                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13339                      double* berr, lapack_complex_double* work, double* rwork,
 13340                      lapack_int *info );
 13341  void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
 13342                      const float* e, const float* df, const float* ef,
 13343                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13344                      float* ferr, float* berr, float* work, lapack_int *info );
 13345  void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
 13346                      const double* e, const double* df, const double* ef,
 13347                      const double* b, lapack_int* ldb, double* x,
 13348                      lapack_int* ldx, double* ferr, double* berr, double* work,
 13349                      lapack_int *info );
 13350  void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
 13351                      const lapack_complex_float* e, const float* df,
 13352                      const lapack_complex_float* ef,
 13353                      const lapack_complex_float* b, lapack_int* ldb,
 13354                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13355                      float* berr, lapack_complex_float* work, float* rwork,
 13356                      lapack_int *info );
 13357  void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13358                      const double* d, const lapack_complex_double* e,
 13359                      const double* df, const lapack_complex_double* ef,
 13360                      const lapack_complex_double* b, lapack_int* ldb,
 13361                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13362                      double* berr, lapack_complex_double* work, double* rwork,
 13363                      lapack_int *info );
 13364  void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
 13365                      lapack_int* lda, const float* af, lapack_int* ldaf,
 13366                      const lapack_int* ipiv, const float* b, lapack_int* ldb,
 13367                      float* x, lapack_int* ldx, float* ferr, float* berr,
 13368                      float* work, lapack_int* iwork, lapack_int *info );
 13369  void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13370                      const double* a, lapack_int* lda, const double* af,
 13371                      lapack_int* ldaf, const lapack_int* ipiv, const double* b,
 13372                      lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
 13373                      double* berr, double* work, lapack_int* iwork,
 13374                      lapack_int *info );
 13375  void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13376                      const lapack_complex_float* a, lapack_int* lda,
 13377                      const lapack_complex_float* af, lapack_int* ldaf,
 13378                      const lapack_int* ipiv, const lapack_complex_float* b,
 13379                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 13380                      float* ferr, float* berr, lapack_complex_float* work,
 13381                      float* rwork, lapack_int *info );
 13382  void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13383                      const lapack_complex_double* a, lapack_int* lda,
 13384                      const lapack_complex_double* af, lapack_int* ldaf,
 13385                      const lapack_int* ipiv, const lapack_complex_double* b,
 13386                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 13387                      double* ferr, double* berr, lapack_complex_double* work,
 13388                      double* rwork, lapack_int *info );
 13389  void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13390                       const double* a, lapack_int* lda, const double* af,
 13391                       lapack_int* ldaf, const lapack_int* ipiv, const double* s,
 13392                       const double* b, lapack_int* ldb, double* x,
 13393                       lapack_int* ldx, double* rcond, double* berr,
 13394                       lapack_int* n_err_bnds, double* err_bnds_norm,
 13395                       double* err_bnds_comp, lapack_int* nparams, double* params,
 13396                       double* work, lapack_int* iwork, lapack_int *info );
 13397  void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13398                       const float* a, lapack_int* lda, const float* af,
 13399                       lapack_int* ldaf, const lapack_int* ipiv, const float* s,
 13400                       const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13401                       float* rcond, float* berr, lapack_int* n_err_bnds,
 13402                       float* err_bnds_norm, float* err_bnds_comp,
 13403                       lapack_int* nparams, float* params, float* work,
 13404                       lapack_int* iwork, lapack_int *info );
 13405  void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13406                       const lapack_complex_double* a, lapack_int* lda,
 13407                       const lapack_complex_double* af, lapack_int* ldaf,
 13408                       const lapack_int* ipiv, const double* s,
 13409                       const lapack_complex_double* b, lapack_int* ldb,
 13410                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13411                       double* berr, lapack_int* n_err_bnds,
 13412                       double* err_bnds_norm, double* err_bnds_comp,
 13413                       lapack_int* nparams, double* params,
 13414                       lapack_complex_double* work, double* rwork,
 13415                       lapack_int *info );
 13416  void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13417                       const lapack_complex_float* a, lapack_int* lda,
 13418                       const lapack_complex_float* af, lapack_int* ldaf,
 13419                       const lapack_int* ipiv, const float* s,
 13420                       const lapack_complex_float* b, lapack_int* ldb,
 13421                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13422                       float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
 13423                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13424                       lapack_complex_float* work, float* rwork,
 13425                       lapack_int *info );
 13426  void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13427                      const lapack_complex_float* a, lapack_int* lda,
 13428                      const lapack_complex_float* af, lapack_int* ldaf,
 13429                      const lapack_int* ipiv, const lapack_complex_float* b,
 13430                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 13431                      float* ferr, float* berr, lapack_complex_float* work,
 13432                      float* rwork, lapack_int *info );
 13433  void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13434                      const lapack_complex_double* a, lapack_int* lda,
 13435                      const lapack_complex_double* af, lapack_int* ldaf,
 13436                      const lapack_int* ipiv, const lapack_complex_double* b,
 13437                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 13438                      double* ferr, double* berr, lapack_complex_double* work,
 13439                      double* rwork, lapack_int *info );
 13440  void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13441                       const lapack_complex_double* a, lapack_int* lda,
 13442                       const lapack_complex_double* af, lapack_int* ldaf,
 13443                       const lapack_int* ipiv, const double* s,
 13444                       const lapack_complex_double* b, lapack_int* ldb,
 13445                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13446                       double* berr, lapack_int* n_err_bnds,
 13447                       double* err_bnds_norm, double* err_bnds_comp,
 13448                       lapack_int* nparams, double* params,
 13449                       lapack_complex_double* work, double* rwork,
 13450                       lapack_int *info );
 13451  void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
 13452                       const lapack_complex_float* a, lapack_int* lda,
 13453                       const lapack_complex_float* af, lapack_int* ldaf,
 13454                       const lapack_int* ipiv, const float* s,
 13455                       const lapack_complex_float* b, lapack_int* ldb,
 13456                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13457                       float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
 13458                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13459                       lapack_complex_float* work, float* rwork,
 13460                       lapack_int *info );
 13461  void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13462                      const float* ap, const float* afp, const lapack_int* ipiv,
 13463                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13464                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13465                      lapack_int *info );
 13466  void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13467                      const double* ap, const double* afp, const lapack_int* ipiv,
 13468                      const double* b, lapack_int* ldb, double* x,
 13469                      lapack_int* ldx, double* ferr, double* berr, double* work,
 13470                      lapack_int* iwork, lapack_int *info );
 13471  void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13472                      const lapack_complex_float* ap,
 13473                      const lapack_complex_float* afp, const lapack_int* ipiv,
 13474                      const lapack_complex_float* b, lapack_int* ldb,
 13475                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13476                      float* berr, lapack_complex_float* work, float* rwork,
 13477                      lapack_int *info );
 13478  void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13479                      const lapack_complex_double* ap,
 13480                      const lapack_complex_double* afp, const lapack_int* ipiv,
 13481                      const lapack_complex_double* b, lapack_int* ldb,
 13482                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13483                      double* berr, lapack_complex_double* work, double* rwork,
 13484                      lapack_int *info );
 13485  void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13486                      const lapack_complex_float* ap,
 13487                      const lapack_complex_float* afp, const lapack_int* ipiv,
 13488                      const lapack_complex_float* b, lapack_int* ldb,
 13489                      lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13490                      float* berr, lapack_complex_float* work, float* rwork,
 13491                      lapack_int *info );
 13492  void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
 13493                      const lapack_complex_double* ap,
 13494                      const lapack_complex_double* afp, const lapack_int* ipiv,
 13495                      const lapack_complex_double* b, lapack_int* ldb,
 13496                      lapack_complex_double* x, lapack_int* ldx, double* ferr,
 13497                      double* berr, lapack_complex_double* work, double* rwork,
 13498                      lapack_int *info );
 13499  void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13500                      lapack_int* nrhs, const float* a, lapack_int* lda,
 13501                      const float* b, lapack_int* ldb, const float* x,
 13502                      lapack_int* ldx, float* ferr, float* berr, float* work,
 13503                      lapack_int* iwork, lapack_int *info );
 13504  void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13505                      lapack_int* nrhs, const double* a, lapack_int* lda,
 13506                      const double* b, lapack_int* ldb, const double* x,
 13507                      lapack_int* ldx, double* ferr, double* berr, double* work,
 13508                      lapack_int* iwork, lapack_int *info );
 13509  void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13510                      lapack_int* nrhs, const lapack_complex_float* a,
 13511                      lapack_int* lda, const lapack_complex_float* b,
 13512                      lapack_int* ldb, const lapack_complex_float* x,
 13513                      lapack_int* ldx, float* ferr, float* berr,
 13514                      lapack_complex_float* work, float* rwork,
 13515                      lapack_int *info );
 13516  void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13517                      lapack_int* nrhs, const lapack_complex_double* a,
 13518                      lapack_int* lda, const lapack_complex_double* b,
 13519                      lapack_int* ldb, const lapack_complex_double* x,
 13520                      lapack_int* ldx, double* ferr, double* berr,
 13521                      lapack_complex_double* work, double* rwork,
 13522                      lapack_int *info );
 13523  void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13524                      lapack_int* nrhs, const float* ap, const float* b,
 13525                      lapack_int* ldb, const float* x, lapack_int* ldx,
 13526                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13527                      lapack_int *info );
 13528  void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13529                      lapack_int* nrhs, const double* ap, const double* b,
 13530                      lapack_int* ldb, const double* x, lapack_int* ldx,
 13531                      double* ferr, double* berr, double* work, lapack_int* iwork,
 13532                      lapack_int *info );
 13533  void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13534                      lapack_int* nrhs, const lapack_complex_float* ap,
 13535                      const lapack_complex_float* b, lapack_int* ldb,
 13536                      const lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13537                      float* berr, lapack_complex_float* work, float* rwork,
 13538                      lapack_int *info );
 13539  void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13540                      lapack_int* nrhs, const lapack_complex_double* ap,
 13541                      const lapack_complex_double* b, lapack_int* ldb,
 13542                      const lapack_complex_double* x, lapack_int* ldx,
 13543                      double* ferr, double* berr, lapack_complex_double* work,
 13544                      double* rwork, lapack_int *info );
 13545  void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13546                      lapack_int* kd, lapack_int* nrhs, const float* ab,
 13547                      lapack_int* ldab, const float* b, lapack_int* ldb,
 13548                      const float* x, lapack_int* ldx, float* ferr, float* berr,
 13549                      float* work, lapack_int* iwork, lapack_int *info );
 13550  void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13551                      lapack_int* kd, lapack_int* nrhs, const double* ab,
 13552                      lapack_int* ldab, const double* b, lapack_int* ldb,
 13553                      const double* x, lapack_int* ldx, double* ferr,
 13554                      double* berr, double* work, lapack_int* iwork,
 13555                      lapack_int *info );
 13556  void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13557                      lapack_int* kd, lapack_int* nrhs,
 13558                      const lapack_complex_float* ab, lapack_int* ldab,
 13559                      const lapack_complex_float* b, lapack_int* ldb,
 13560                      const lapack_complex_float* x, lapack_int* ldx, float* ferr,
 13561                      float* berr, lapack_complex_float* work, float* rwork,
 13562                      lapack_int *info );
 13563  void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
 13564                      lapack_int* kd, lapack_int* nrhs,
 13565                      const lapack_complex_double* ab, lapack_int* ldab,
 13566                      const lapack_complex_double* b, lapack_int* ldb,
 13567                      const lapack_complex_double* x, lapack_int* ldx,
 13568                      double* ferr, double* berr, lapack_complex_double* work,
 13569                      double* rwork, lapack_int *info );
 13570  void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
 13571                      const lapack_int* ipiv, float* work, lapack_int* lwork,
 13572                      lapack_int *info );
 13573  void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
 13574                      const lapack_int* ipiv, double* work, lapack_int* lwork,
 13575                      lapack_int *info );
 13576  void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 13577                      const lapack_int* ipiv, lapack_complex_float* work,
 13578                      lapack_int* lwork, lapack_int *info );
 13579  void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 13580                      const lapack_int* ipiv, lapack_complex_double* work,
 13581                      lapack_int* lwork, lapack_int *info );
 13582  void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 13583                      lapack_int *info );
 13584  void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 13585                      lapack_int *info );
 13586  void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
 13587                      lapack_int* lda, lapack_int *info );
 13588  void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
 13589                      lapack_int* lda, lapack_int *info );
 13590  void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
 13591                      lapack_int *info );
 13592  void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
 13593                      lapack_int *info );
 13594  void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
 13595                      lapack_complex_double* a, lapack_int *info );
 13596  void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
 13597                      lapack_complex_float* a, lapack_int *info );
 13598  void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
 13599  void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
 13600  void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
 13601                      lapack_int *info );
 13602  void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
 13603                      lapack_int *info );
 13604  void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 13605                      const lapack_int* ipiv, float* work, lapack_int *info );
 13606  void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 13607                      const lapack_int* ipiv, double* work, lapack_int *info );
 13608  void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
 13609                      lapack_int* lda, const lapack_int* ipiv,
 13610                      lapack_complex_float* work, lapack_int *info );
 13611  void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
 13612                      lapack_int* lda, const lapack_int* ipiv,
 13613                      lapack_complex_double* work, lapack_int *info );
 13614  void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
 13615                      lapack_int* lda, const lapack_int* ipiv,
 13616                      lapack_complex_float* work, lapack_int *info );
 13617  void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
 13618                      lapack_int* lda, const lapack_int* ipiv,
 13619                      lapack_complex_double* work, lapack_int *info );
 13620  void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
 13621                      const lapack_int* ipiv, float* work, lapack_int *info );
 13622  void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
 13623                      const lapack_int* ipiv, double* work, lapack_int *info );
 13624  void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
 13625                      const lapack_int* ipiv, lapack_complex_float* work,
 13626                      lapack_int *info );
 13627  void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
 13628                      const lapack_int* ipiv, lapack_complex_double* work,
 13629                      lapack_int *info );
 13630  void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
 13631                      const lapack_int* ipiv, lapack_complex_float* work,
 13632                      lapack_int *info );
 13633  void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
 13634                      const lapack_int* ipiv, lapack_complex_double* work,
 13635                      lapack_int *info );
 13636  void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
 13637                      lapack_int* lda, lapack_int *info );
 13638  void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
 13639                      lapack_int* lda, lapack_int *info );
 13640  void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
 13641                      lapack_complex_float* a, lapack_int* lda,
 13642                      lapack_int *info );
 13643  void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
 13644                      lapack_complex_double* a, lapack_int* lda,
 13645                      lapack_int *info );
 13646  void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
 13647                      double* a, lapack_int *info );
 13648  void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
 13649                      float* a, lapack_int *info );
 13650  void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
 13651                      lapack_complex_double* a, lapack_int *info );
 13652  void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
 13653                      lapack_complex_float* a, lapack_int *info );
 13654  void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
 13655                      lapack_int *info );
 13656  void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
 13657                      lapack_int *info );
 13658  void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
 13659                      lapack_complex_float* ap, lapack_int *info );
 13660  void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
 13661                      lapack_complex_double* ap, lapack_int *info );
 13662  void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
 13663                      lapack_int* lda, float* r, float* c, float* rowcnd,
 13664                      float* colcnd, float* amax, lapack_int *info );
 13665  void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
 13666                      lapack_int* lda, double* r, double* c, double* rowcnd,
 13667                      double* colcnd, double* amax, lapack_int *info );
 13668  void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
 13669                      lapack_int* lda, float* r, float* c, float* rowcnd,
 13670                      float* colcnd, float* amax, lapack_int *info );
 13671  void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
 13672                      const lapack_complex_double* a, lapack_int* lda, double* r,
 13673                      double* c, double* rowcnd, double* colcnd, double* amax,
 13674                      lapack_int *info );
 13675  void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
 13676                       lapack_int* lda, double* r, double* c, double* rowcnd,
 13677                       double* colcnd, double* amax, lapack_int *info );
 13678  void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
 13679                       lapack_int* lda, float* r, float* c, float* rowcnd,
 13680                       float* colcnd, float* amax, lapack_int *info );
 13681  void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
 13682                       const lapack_complex_double* a, lapack_int* lda, double* r,
 13683                       double* c, double* rowcnd, double* colcnd, double* amax,
 13684                       lapack_int *info );
 13685  void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
 13686                       const lapack_complex_float* a, lapack_int* lda, float* r,
 13687                       float* c, float* rowcnd, float* colcnd, float* amax,
 13688                       lapack_int *info );
 13689  void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
 13690                      lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
 13691                      float* c, float* rowcnd, float* colcnd, float* amax,
 13692                      lapack_int *info );
 13693  void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
 13694                      lapack_int* ku, const double* ab, lapack_int* ldab,
 13695                      double* r, double* c, double* rowcnd, double* colcnd,
 13696                      double* amax, lapack_int *info );
 13697  void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
 13698                      lapack_int* ku, const lapack_complex_float* ab,
 13699                      lapack_int* ldab, float* r, float* c, float* rowcnd,
 13700                      float* colcnd, float* amax, lapack_int *info );
 13701  void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
 13702                      lapack_int* ku, const lapack_complex_double* ab,
 13703                      lapack_int* ldab, double* r, double* c, double* rowcnd,
 13704                      double* colcnd, double* amax, lapack_int *info );
 13705  void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
 13706                       lapack_int* ku, const double* ab, lapack_int* ldab,
 13707                       double* r, double* c, double* rowcnd, double* colcnd,
 13708                       double* amax, lapack_int *info );
 13709  void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
 13710                       lapack_int* ku, const float* ab, lapack_int* ldab,
 13711                       float* r, float* c, float* rowcnd, float* colcnd,
 13712                       float* amax, lapack_int *info );
 13713  void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
 13714                       lapack_int* ku, const lapack_complex_double* ab,
 13715                       lapack_int* ldab, double* r, double* c, double* rowcnd,
 13716                       double* colcnd, double* amax, lapack_int *info );
 13717  void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
 13718                       lapack_int* ku, const lapack_complex_float* ab,
 13719                       lapack_int* ldab, float* r, float* c, float* rowcnd,
 13720                       float* colcnd, float* amax, lapack_int *info );
 13721  void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
 13722                      float* scond, float* amax, lapack_int *info );
 13723  void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
 13724                      double* scond, double* amax, lapack_int *info );
 13725  void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
 13726                      lapack_int* lda, float* s, float* scond, float* amax,
 13727                      lapack_int *info );
 13728  void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
 13729                      lapack_int* lda, double* s, double* scond, double* amax,
 13730                      lapack_int *info );
 13731  void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
 13732                       double* scond, double* amax, lapack_int *info );
 13733  void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
 13734                       float* scond, float* amax, lapack_int *info );
 13735  void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
 13736                       lapack_int* lda, double* s, double* scond, double* amax,
 13737                       lapack_int *info );
 13738  void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
 13739                       lapack_int* lda, float* s, float* scond, float* amax,
 13740                       lapack_int *info );
 13741  void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
 13742                      float* scond, float* amax, lapack_int *info );
 13743  void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
 13744                      double* scond, double* amax, lapack_int *info );
 13745  void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 13746                      float* s, float* scond, float* amax, lapack_int *info );
 13747  void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 13748                      double* s, double* scond, double* amax, lapack_int *info );
 13749  void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
 13750                      lapack_int* ldab, float* s, float* scond, float* amax,
 13751                      lapack_int *info );
 13752  void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
 13753                      lapack_int* ldab, double* s, double* scond, double* amax,
 13754                      lapack_int *info );
 13755  void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
 13756                      const lapack_complex_float* ab, lapack_int* ldab, float* s,
 13757                      float* scond, float* amax, lapack_int *info );
 13758  void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
 13759                      const lapack_complex_double* ab, lapack_int* ldab,
 13760                      double* s, double* scond, double* amax, lapack_int *info );
 13761  void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
 13762                       lapack_int* lda, double* s, double* scond, double* amax,
 13763                       double* work, lapack_int *info );
 13764  void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
 13765                       float* s, float* scond, float* amax, float* work,
 13766                       lapack_int *info );
 13767  void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
 13768                       lapack_int* lda, double* s, double* scond, double* amax,
 13769                       lapack_complex_double* work, lapack_int *info );
 13770  void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
 13771                       lapack_int* lda, float* s, float* scond, float* amax,
 13772                       lapack_complex_float* work, lapack_int *info );
 13773  void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
 13774                       lapack_int* lda, double* s, double* scond, double* amax,
 13775                       lapack_complex_double* work, lapack_int *info );
 13776  void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
 13777                       lapack_int* lda, float* s, float* scond, float* amax,
 13778                       lapack_complex_float* work, lapack_int *info );
 13779  void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
 13780                     lapack_int* ipiv, float* b, lapack_int* ldb,
 13781                     lapack_int *info );
 13782  void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
 13783                     lapack_int* ipiv, double* b, lapack_int* ldb,
 13784                     lapack_int *info );
 13785  void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
 13786                     lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
 13787                     lapack_int* ldb, lapack_int *info );
 13788  void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
 13789                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
 13790                     lapack_int* ldb, lapack_int *info );
 13791  void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
 13792                      lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
 13793                      lapack_int* ldx, double* work, float* swork,
 13794                      lapack_int* iter, lapack_int *info );
 13795  void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
 13796                      lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
 13797                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 13798                      lapack_complex_double* work, lapack_complex_float* swork,
 13799                      double* rwork, lapack_int* iter, lapack_int *info );
 13800  void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13801                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
 13802                      lapack_int* ipiv, char* equed, float* r, float* c, float* b,
 13803                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 13804                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13805                      lapack_int *info );
 13806  void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13807                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
 13808                      lapack_int* ipiv, char* equed, double* r, double* c,
 13809                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
 13810                      double* rcond, double* ferr, double* berr, double* work,
 13811                      lapack_int* iwork, lapack_int *info );
 13812  void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13813                      lapack_complex_float* a, lapack_int* lda,
 13814                      lapack_complex_float* af, lapack_int* ldaf,
 13815                      lapack_int* ipiv, char* equed, float* r, float* c,
 13816                      lapack_complex_float* b, lapack_int* ldb,
 13817                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13818                      float* ferr, float* berr, lapack_complex_float* work,
 13819                      float* rwork, lapack_int *info );
 13820  void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13821                      lapack_complex_double* a, lapack_int* lda,
 13822                      lapack_complex_double* af, lapack_int* ldaf,
 13823                      lapack_int* ipiv, char* equed, double* r, double* c,
 13824                      lapack_complex_double* b, lapack_int* ldb,
 13825                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13826                      double* ferr, double* berr, lapack_complex_double* work,
 13827                      double* rwork, lapack_int *info );
 13828  void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13829                       double* a, lapack_int* lda, double* af, lapack_int* ldaf,
 13830                       lapack_int* ipiv, char* equed, double* r, double* c,
 13831                       double* b, lapack_int* ldb, double* x, lapack_int* ldx,
 13832                       double* rcond, double* rpvgrw, double* berr,
 13833                       lapack_int* n_err_bnds, double* err_bnds_norm,
 13834                       double* err_bnds_comp, lapack_int* nparams, double* params,
 13835                       double* work, lapack_int* iwork, lapack_int *info );
 13836  void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13837                       float* a, lapack_int* lda, float* af, lapack_int* ldaf,
 13838                       lapack_int* ipiv, char* equed, float* r, float* c,
 13839                       float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13840                       float* rcond, float* rpvgrw, float* berr,
 13841                       lapack_int* n_err_bnds, float* err_bnds_norm,
 13842                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13843                       float* work, lapack_int* iwork, lapack_int *info );
 13844  void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13845                       lapack_complex_double* a, lapack_int* lda,
 13846                       lapack_complex_double* af, lapack_int* ldaf,
 13847                       lapack_int* ipiv, char* equed, double* r, double* c,
 13848                       lapack_complex_double* b, lapack_int* ldb,
 13849                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13850                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 13851                       double* err_bnds_norm, double* err_bnds_comp,
 13852                       lapack_int* nparams, double* params,
 13853                       lapack_complex_double* work, double* rwork,
 13854                       lapack_int *info );
 13855  void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13856                       lapack_complex_float* a, lapack_int* lda,
 13857                       lapack_complex_float* af, lapack_int* ldaf,
 13858                       lapack_int* ipiv, char* equed, float* r, float* c,
 13859                       lapack_complex_float* b, lapack_int* ldb,
 13860                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13861                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 13862                       float* err_bnds_norm, float* err_bnds_comp,
 13863                       lapack_int* nparams, float* params,
 13864                       lapack_complex_float* work, float* rwork,
 13865                       lapack_int *info );
 13866  void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
 13867                     lapack_int* nrhs, float* ab, lapack_int* ldab,
 13868                     lapack_int* ipiv, float* b, lapack_int* ldb,
 13869                     lapack_int *info );
 13870  void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
 13871                     lapack_int* nrhs, double* ab, lapack_int* ldab,
 13872                     lapack_int* ipiv, double* b, lapack_int* ldb,
 13873                     lapack_int *info );
 13874  void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
 13875                     lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
 13876                     lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
 13877                     lapack_int *info );
 13878  void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
 13879                     lapack_int* nrhs, lapack_complex_double* ab,
 13880                     lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
 13881                     lapack_int* ldb, lapack_int *info );
 13882  void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13883                      lapack_int* ku, lapack_int* nrhs, float* ab,
 13884                      lapack_int* ldab, float* afb, lapack_int* ldafb,
 13885                      lapack_int* ipiv, char* equed, float* r, float* c, float* b,
 13886                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 13887                      float* ferr, float* berr, float* work, lapack_int* iwork,
 13888                      lapack_int *info );
 13889  void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13890                      lapack_int* ku, lapack_int* nrhs, double* ab,
 13891                      lapack_int* ldab, double* afb, lapack_int* ldafb,
 13892                      lapack_int* ipiv, char* equed, double* r, double* c,
 13893                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
 13894                      double* rcond, double* ferr, double* berr, double* work,
 13895                      lapack_int* iwork, lapack_int *info );
 13896  void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13897                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
 13898                      lapack_int* ldab, lapack_complex_float* afb,
 13899                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
 13900                      float* c, lapack_complex_float* b, lapack_int* ldb,
 13901                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13902                      float* ferr, float* berr, lapack_complex_float* work,
 13903                      float* rwork, lapack_int *info );
 13904  void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13905                      lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
 13906                      lapack_int* ldab, lapack_complex_double* afb,
 13907                      lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
 13908                      double* c, lapack_complex_double* b, lapack_int* ldb,
 13909                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13910                      double* ferr, double* berr, lapack_complex_double* work,
 13911                      double* rwork, lapack_int *info );
 13912  void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13913                       lapack_int* ku, lapack_int* nrhs, double* ab,
 13914                       lapack_int* ldab, double* afb, lapack_int* ldafb,
 13915                       lapack_int* ipiv, char* equed, double* r, double* c,
 13916                       double* b, lapack_int* ldb, double* x, lapack_int* ldx,
 13917                       double* rcond, double* rpvgrw, double* berr,
 13918                       lapack_int* n_err_bnds, double* err_bnds_norm,
 13919                       double* err_bnds_comp, lapack_int* nparams, double* params,
 13920                       double* work, lapack_int* iwork, lapack_int *info );
 13921  void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13922                       lapack_int* ku, lapack_int* nrhs, float* ab,
 13923                       lapack_int* ldab, float* afb, lapack_int* ldafb,
 13924                       lapack_int* ipiv, char* equed, float* r, float* c,
 13925                       float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 13926                       float* rcond, float* rpvgrw, float* berr,
 13927                       lapack_int* n_err_bnds, float* err_bnds_norm,
 13928                       float* err_bnds_comp, lapack_int* nparams, float* params,
 13929                       float* work, lapack_int* iwork, lapack_int *info );
 13930  void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13931                       lapack_int* ku, lapack_int* nrhs,
 13932                       lapack_complex_double* ab, lapack_int* ldab,
 13933                       lapack_complex_double* afb, lapack_int* ldafb,
 13934                       lapack_int* ipiv, char* equed, double* r, double* c,
 13935                       lapack_complex_double* b, lapack_int* ldb,
 13936                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13937                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 13938                       double* err_bnds_norm, double* err_bnds_comp,
 13939                       lapack_int* nparams, double* params,
 13940                       lapack_complex_double* work, double* rwork,
 13941                       lapack_int *info );
 13942  void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
 13943                       lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
 13944                       lapack_int* ldab, lapack_complex_float* afb,
 13945                       lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
 13946                       float* c, lapack_complex_float* b, lapack_int* ldb,
 13947                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13948                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 13949                       float* err_bnds_norm, float* err_bnds_comp,
 13950                       lapack_int* nparams, float* params,
 13951                       lapack_complex_float* work, float* rwork,
 13952                       lapack_int *info );
 13953  void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
 13954                     float* du, float* b, lapack_int* ldb, lapack_int *info );
 13955  void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
 13956                     double* du, double* b, lapack_int* ldb, lapack_int *info );
 13957  void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
 13958                     lapack_complex_float* d, lapack_complex_float* du,
 13959                     lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
 13960  void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
 13961                     lapack_complex_double* d, lapack_complex_double* du,
 13962                     lapack_complex_double* b, lapack_int* ldb,
 13963                     lapack_int *info );
 13964  void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13965                      const float* dl, const float* d, const float* du,
 13966                      float* dlf, float* df, float* duf, float* du2,
 13967                      lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
 13968                      lapack_int* ldx, float* rcond, float* ferr, float* berr,
 13969                      float* work, lapack_int* iwork, lapack_int *info );
 13970  void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13971                      const double* dl, const double* d, const double* du,
 13972                      double* dlf, double* df, double* duf, double* du2,
 13973                      lapack_int* ipiv, const double* b, lapack_int* ldb,
 13974                      double* x, lapack_int* ldx, double* rcond, double* ferr,
 13975                      double* berr, double* work, lapack_int* iwork,
 13976                      lapack_int *info );
 13977  void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13978                      const lapack_complex_float* dl,
 13979                      const lapack_complex_float* d,
 13980                      const lapack_complex_float* du, lapack_complex_float* dlf,
 13981                      lapack_complex_float* df, lapack_complex_float* duf,
 13982                      lapack_complex_float* du2, lapack_int* ipiv,
 13983                      const lapack_complex_float* b, lapack_int* ldb,
 13984                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
 13985                      float* ferr, float* berr, lapack_complex_float* work,
 13986                      float* rwork, lapack_int *info );
 13987  void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
 13988                      const lapack_complex_double* dl,
 13989                      const lapack_complex_double* d,
 13990                      const lapack_complex_double* du, lapack_complex_double* dlf,
 13991                      lapack_complex_double* df, lapack_complex_double* duf,
 13992                      lapack_complex_double* du2, lapack_int* ipiv,
 13993                      const lapack_complex_double* b, lapack_int* ldb,
 13994                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
 13995                      double* ferr, double* berr, lapack_complex_double* work,
 13996                      double* rwork, lapack_int *info );
 13997  void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
 13998                     lapack_int* lda, float* b, lapack_int* ldb,
 13999                     lapack_int *info );
 14000  void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
 14001                     lapack_int* lda, double* b, lapack_int* ldb,
 14002                     lapack_int *info );
 14003  void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14004                     lapack_complex_float* a, lapack_int* lda,
 14005                     lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
 14006  void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14007                     lapack_complex_double* a, lapack_int* lda,
 14008                     lapack_complex_double* b, lapack_int* ldb,
 14009                     lapack_int *info );
 14010  void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
 14011                      lapack_int* lda, double* b, lapack_int* ldb, double* x,
 14012                      lapack_int* ldx, double* work, float* swork,
 14013                      lapack_int* iter, lapack_int *info );
 14014  void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14015                      lapack_complex_double* a, lapack_int* lda,
 14016                      lapack_complex_double* b, lapack_int* ldb,
 14017                      lapack_complex_double* x, lapack_int* ldx,
 14018                      lapack_complex_double* work, lapack_complex_float* swork,
 14019                      double* rwork, lapack_int* iter, lapack_int *info );
 14020  void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14021                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
 14022                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
 14023                      lapack_int* ldx, float* rcond, float* ferr, float* berr,
 14024                      float* work, lapack_int* iwork, lapack_int *info );
 14025  void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14026                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
 14027                      char* equed, double* s, double* b, lapack_int* ldb,
 14028                      double* x, lapack_int* ldx, double* rcond, double* ferr,
 14029                      double* berr, double* work, lapack_int* iwork,
 14030                      lapack_int *info );
 14031  void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14032                      lapack_complex_float* a, lapack_int* lda,
 14033                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
 14034                      float* s, lapack_complex_float* b, lapack_int* ldb,
 14035                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
 14036                      float* ferr, float* berr, lapack_complex_float* work,
 14037                      float* rwork, lapack_int *info );
 14038  void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14039                      lapack_complex_double* a, lapack_int* lda,
 14040                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
 14041                      double* s, lapack_complex_double* b, lapack_int* ldb,
 14042                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
 14043                      double* ferr, double* berr, lapack_complex_double* work,
 14044                      double* rwork, lapack_int *info );
 14045  void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14046                       double* a, lapack_int* lda, double* af, lapack_int* ldaf,
 14047                       char* equed, double* s, double* b, lapack_int* ldb,
 14048                       double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
 14049                       double* berr, lapack_int* n_err_bnds,
 14050                       double* err_bnds_norm, double* err_bnds_comp,
 14051                       lapack_int* nparams, double* params, double* work,
 14052                       lapack_int* iwork, lapack_int *info );
 14053  void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14054                       float* a, lapack_int* lda, float* af, lapack_int* ldaf,
 14055                       char* equed, float* s, float* b, lapack_int* ldb, float* x,
 14056                       lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
 14057                       lapack_int* n_err_bnds, float* err_bnds_norm,
 14058                       float* err_bnds_comp, lapack_int* nparams, float* params,
 14059                       float* work, lapack_int* iwork, lapack_int *info );
 14060  void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14061                       lapack_complex_double* a, lapack_int* lda,
 14062                       lapack_complex_double* af, lapack_int* ldaf, char* equed,
 14063                       double* s, lapack_complex_double* b, lapack_int* ldb,
 14064                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 14065                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 14066                       double* err_bnds_norm, double* err_bnds_comp,
 14067                       lapack_int* nparams, double* params,
 14068                       lapack_complex_double* work, double* rwork,
 14069                       lapack_int *info );
 14070  void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14071                       lapack_complex_float* a, lapack_int* lda,
 14072                       lapack_complex_float* af, lapack_int* ldaf, char* equed,
 14073                       float* s, lapack_complex_float* b, lapack_int* ldb,
 14074                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 14075                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 14076                       float* err_bnds_norm, float* err_bnds_comp,
 14077                       lapack_int* nparams, float* params,
 14078                       lapack_complex_float* work, float* rwork,
 14079                       lapack_int *info );
 14080  void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
 14081                     float* b, lapack_int* ldb, lapack_int *info );
 14082  void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
 14083                     double* b, lapack_int* ldb, lapack_int *info );
 14084  void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14085                     lapack_complex_float* ap, lapack_complex_float* b,
 14086                     lapack_int* ldb, lapack_int *info );
 14087  void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14088                     lapack_complex_double* ap, lapack_complex_double* b,
 14089                     lapack_int* ldb, lapack_int *info );
 14090  void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14091                      float* ap, float* afp, char* equed, float* s, float* b,
 14092                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 14093                      float* ferr, float* berr, float* work, lapack_int* iwork,
 14094                      lapack_int *info );
 14095  void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14096                      double* ap, double* afp, char* equed, double* s, double* b,
 14097                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
 14098                      double* ferr, double* berr, double* work, lapack_int* iwork,
 14099                      lapack_int *info );
 14100  void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14101                      lapack_complex_float* ap, lapack_complex_float* afp,
 14102                      char* equed, float* s, lapack_complex_float* b,
 14103                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14104                      float* rcond, float* ferr, float* berr,
 14105                      lapack_complex_float* work, float* rwork,
 14106                      lapack_int *info );
 14107  void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14108                      lapack_complex_double* ap, lapack_complex_double* afp,
 14109                      char* equed, double* s, lapack_complex_double* b,
 14110                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14111                      double* rcond, double* ferr, double* berr,
 14112                      lapack_complex_double* work, double* rwork,
 14113                      lapack_int *info );
 14114  void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 14115                     float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
 14116                     lapack_int *info );
 14117  void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 14118                     double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
 14119                     lapack_int *info );
 14120  void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 14121                     lapack_complex_float* ab, lapack_int* ldab,
 14122                     lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
 14123  void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
 14124                     lapack_complex_double* ab, lapack_int* ldab,
 14125                     lapack_complex_double* b, lapack_int* ldb,
 14126                     lapack_int *info );
 14127  void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
 14128                      lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
 14129                      lapack_int* ldafb, char* equed, float* s, float* b,
 14130                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 14131                      float* ferr, float* berr, float* work, lapack_int* iwork,
 14132                      lapack_int *info );
 14133  void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
 14134                      lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
 14135                      lapack_int* ldafb, char* equed, double* s, double* b,
 14136                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
 14137                      double* ferr, double* berr, double* work, lapack_int* iwork,
 14138                      lapack_int *info );
 14139  void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
 14140                      lapack_int* nrhs, lapack_complex_float* ab,
 14141                      lapack_int* ldab, lapack_complex_float* afb,
 14142                      lapack_int* ldafb, char* equed, float* s,
 14143                      lapack_complex_float* b, lapack_int* ldb,
 14144                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
 14145                      float* ferr, float* berr, lapack_complex_float* work,
 14146                      float* rwork, lapack_int *info );
 14147  void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
 14148                      lapack_int* nrhs, lapack_complex_double* ab,
 14149                      lapack_int* ldab, lapack_complex_double* afb,
 14150                      lapack_int* ldafb, char* equed, double* s,
 14151                      lapack_complex_double* b, lapack_int* ldb,
 14152                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
 14153                      double* ferr, double* berr, lapack_complex_double* work,
 14154                      double* rwork, lapack_int *info );
 14155  void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
 14156                     float* b, lapack_int* ldb, lapack_int *info );
 14157  void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
 14158                     double* b, lapack_int* ldb, lapack_int *info );
 14159  void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
 14160                     lapack_complex_float* e, lapack_complex_float* b,
 14161                     lapack_int* ldb, lapack_int *info );
 14162  void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
 14163                     lapack_complex_double* e, lapack_complex_double* b,
 14164                     lapack_int* ldb, lapack_int *info );
 14165  void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
 14166                      const float* e, float* df, float* ef, const float* b,
 14167                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 14168                      float* ferr, float* berr, float* work, lapack_int *info );
 14169  void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
 14170                      const double* d, const double* e, double* df, double* ef,
 14171                      const double* b, lapack_int* ldb, double* x,
 14172                      lapack_int* ldx, double* rcond, double* ferr, double* berr,
 14173                      double* work, lapack_int *info );
 14174  void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
 14175                      const lapack_complex_float* e, float* df,
 14176                      lapack_complex_float* ef, const lapack_complex_float* b,
 14177                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14178                      float* rcond, float* ferr, float* berr,
 14179                      lapack_complex_float* work, float* rwork,
 14180                      lapack_int *info );
 14181  void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
 14182                      const double* d, const lapack_complex_double* e, double* df,
 14183                      lapack_complex_double* ef, const lapack_complex_double* b,
 14184                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14185                      double* rcond, double* ferr, double* berr,
 14186                      lapack_complex_double* work, double* rwork,
 14187                      lapack_int *info );
 14188  void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
 14189                     lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
 14190                     float* work, lapack_int* lwork, lapack_int *info );
 14191  void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
 14192                     lapack_int* lda, lapack_int* ipiv, double* b,
 14193                     lapack_int* ldb, double* work, lapack_int* lwork,
 14194                     lapack_int *info );
 14195  void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14196                     lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
 14197                     lapack_complex_float* b, lapack_int* ldb,
 14198                     lapack_complex_float* work, lapack_int* lwork,
 14199                     lapack_int *info );
 14200  void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14201                     lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
 14202                     lapack_complex_double* b, lapack_int* ldb,
 14203                     lapack_complex_double* work, lapack_int* lwork,
 14204                     lapack_int *info );
 14205  void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14206                      const float* a, lapack_int* lda, float* af,
 14207                      lapack_int* ldaf, lapack_int* ipiv, const float* b,
 14208                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 14209                      float* ferr, float* berr, float* work, lapack_int* lwork,
 14210                      lapack_int* iwork, lapack_int *info );
 14211  void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14212                      const double* a, lapack_int* lda, double* af,
 14213                      lapack_int* ldaf, lapack_int* ipiv, const double* b,
 14214                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
 14215                      double* ferr, double* berr, double* work, lapack_int* lwork,
 14216                      lapack_int* iwork, lapack_int *info );
 14217  void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14218                      const lapack_complex_float* a, lapack_int* lda,
 14219                      lapack_complex_float* af, lapack_int* ldaf,
 14220                      lapack_int* ipiv, const lapack_complex_float* b,
 14221                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14222                      float* rcond, float* ferr, float* berr,
 14223                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 14224                      lapack_int *info );
 14225  void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14226                      const lapack_complex_double* a, lapack_int* lda,
 14227                      lapack_complex_double* af, lapack_int* ldaf,
 14228                      lapack_int* ipiv, const lapack_complex_double* b,
 14229                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14230                      double* rcond, double* ferr, double* berr,
 14231                      lapack_complex_double* work, lapack_int* lwork,
 14232                      double* rwork, lapack_int *info );
 14233  void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14234                       double* a, lapack_int* lda, double* af, lapack_int* ldaf,
 14235                       lapack_int* ipiv, char* equed, double* s, double* b,
 14236                       lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
 14237                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 14238                       double* err_bnds_norm, double* err_bnds_comp,
 14239                       lapack_int* nparams, double* params, double* work,
 14240                       lapack_int* iwork, lapack_int *info );
 14241  void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14242                       float* a, lapack_int* lda, float* af, lapack_int* ldaf,
 14243                       lapack_int* ipiv, char* equed, float* s, float* b,
 14244                       lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
 14245                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 14246                       float* err_bnds_norm, float* err_bnds_comp,
 14247                       lapack_int* nparams, float* params, float* work,
 14248                       lapack_int* iwork, lapack_int *info );
 14249  void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14250                       lapack_complex_double* a, lapack_int* lda,
 14251                       lapack_complex_double* af, lapack_int* ldaf,
 14252                       lapack_int* ipiv, char* equed, double* s,
 14253                       lapack_complex_double* b, lapack_int* ldb,
 14254                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 14255                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 14256                       double* err_bnds_norm, double* err_bnds_comp,
 14257                       lapack_int* nparams, double* params,
 14258                       lapack_complex_double* work, double* rwork,
 14259                       lapack_int *info );
 14260  void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14261                       lapack_complex_float* a, lapack_int* lda,
 14262                       lapack_complex_float* af, lapack_int* ldaf,
 14263                       lapack_int* ipiv, char* equed, float* s,
 14264                       lapack_complex_float* b, lapack_int* ldb,
 14265                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 14266                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 14267                       float* err_bnds_norm, float* err_bnds_comp,
 14268                       lapack_int* nparams, float* params,
 14269                       lapack_complex_float* work, float* rwork,
 14270                       lapack_int *info );
 14271  void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14272                     lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
 14273                     lapack_complex_float* b, lapack_int* ldb,
 14274                     lapack_complex_float* work, lapack_int* lwork,
 14275                     lapack_int *info );
 14276  void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14277                     lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
 14278                     lapack_complex_double* b, lapack_int* ldb,
 14279                     lapack_complex_double* work, lapack_int* lwork,
 14280                     lapack_int *info );
 14281  void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14282                      const lapack_complex_float* a, lapack_int* lda,
 14283                      lapack_complex_float* af, lapack_int* ldaf,
 14284                      lapack_int* ipiv, const lapack_complex_float* b,
 14285                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14286                      float* rcond, float* ferr, float* berr,
 14287                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 14288                      lapack_int *info );
 14289  void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14290                      const lapack_complex_double* a, lapack_int* lda,
 14291                      lapack_complex_double* af, lapack_int* ldaf,
 14292                      lapack_int* ipiv, const lapack_complex_double* b,
 14293                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14294                      double* rcond, double* ferr, double* berr,
 14295                      lapack_complex_double* work, lapack_int* lwork,
 14296                      double* rwork, lapack_int *info );
 14297  void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14298                       lapack_complex_double* a, lapack_int* lda,
 14299                       lapack_complex_double* af, lapack_int* ldaf,
 14300                       lapack_int* ipiv, char* equed, double* s,
 14301                       lapack_complex_double* b, lapack_int* ldb,
 14302                       lapack_complex_double* x, lapack_int* ldx, double* rcond,
 14303                       double* rpvgrw, double* berr, lapack_int* n_err_bnds,
 14304                       double* err_bnds_norm, double* err_bnds_comp,
 14305                       lapack_int* nparams, double* params,
 14306                       lapack_complex_double* work, double* rwork,
 14307                       lapack_int *info );
 14308  void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14309                       lapack_complex_float* a, lapack_int* lda,
 14310                       lapack_complex_float* af, lapack_int* ldaf,
 14311                       lapack_int* ipiv, char* equed, float* s,
 14312                       lapack_complex_float* b, lapack_int* ldb,
 14313                       lapack_complex_float* x, lapack_int* ldx, float* rcond,
 14314                       float* rpvgrw, float* berr, lapack_int* n_err_bnds,
 14315                       float* err_bnds_norm, float* err_bnds_comp,
 14316                       lapack_int* nparams, float* params,
 14317                       lapack_complex_float* work, float* rwork,
 14318                       lapack_int *info );
 14319  void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
 14320                     lapack_int* ipiv, float* b, lapack_int* ldb,
 14321                     lapack_int *info );
 14322  void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
 14323                     lapack_int* ipiv, double* b, lapack_int* ldb,
 14324                     lapack_int *info );
 14325  void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14326                     lapack_complex_float* ap, lapack_int* ipiv,
 14327                     lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
 14328  void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14329                     lapack_complex_double* ap, lapack_int* ipiv,
 14330                     lapack_complex_double* b, lapack_int* ldb,
 14331                     lapack_int *info );
 14332  void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14333                      const float* ap, float* afp, lapack_int* ipiv,
 14334                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
 14335                      float* rcond, float* ferr, float* berr, float* work,
 14336                      lapack_int* iwork, lapack_int *info );
 14337  void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14338                      const double* ap, double* afp, lapack_int* ipiv,
 14339                      const double* b, lapack_int* ldb, double* x,
 14340                      lapack_int* ldx, double* rcond, double* ferr, double* berr,
 14341                      double* work, lapack_int* iwork, lapack_int *info );
 14342  void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14343                      const lapack_complex_float* ap, lapack_complex_float* afp,
 14344                      lapack_int* ipiv, const lapack_complex_float* b,
 14345                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14346                      float* rcond, float* ferr, float* berr,
 14347                      lapack_complex_float* work, float* rwork,
 14348                      lapack_int *info );
 14349  void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14350                      const lapack_complex_double* ap, lapack_complex_double* afp,
 14351                      lapack_int* ipiv, const lapack_complex_double* b,
 14352                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14353                      double* rcond, double* ferr, double* berr,
 14354                      lapack_complex_double* work, double* rwork,
 14355                      lapack_int *info );
 14356  void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14357                     lapack_complex_float* ap, lapack_int* ipiv,
 14358                     lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
 14359  void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
 14360                     lapack_complex_double* ap, lapack_int* ipiv,
 14361                     lapack_complex_double* b, lapack_int* ldb,
 14362                     lapack_int *info );
 14363  void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14364                      const lapack_complex_float* ap, lapack_complex_float* afp,
 14365                      lapack_int* ipiv, const lapack_complex_float* b,
 14366                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
 14367                      float* rcond, float* ferr, float* berr,
 14368                      lapack_complex_float* work, float* rwork,
 14369                      lapack_int *info );
 14370  void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
 14371                      const lapack_complex_double* ap, lapack_complex_double* afp,
 14372                      lapack_int* ipiv, const lapack_complex_double* b,
 14373                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
 14374                      double* rcond, double* ferr, double* berr,
 14375                      lapack_complex_double* work, double* rwork,
 14376                      lapack_int *info );
 14377  void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14378                      float* tau, float* work, lapack_int* lwork,
 14379                      lapack_int *info );
 14380  void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14381                      double* tau, double* work, lapack_int* lwork,
 14382                      lapack_int *info );
 14383  void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14384                      lapack_int* lda, lapack_complex_float* tau,
 14385                      lapack_complex_float* work, lapack_int* lwork,
 14386                      lapack_int *info );
 14387  void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14388                      lapack_int* lda, lapack_complex_double* tau,
 14389                      lapack_complex_double* work, lapack_int* lwork,
 14390                      lapack_int *info );
 14391  void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14392                      lapack_int* jpvt, float* tau, float* work,
 14393                      lapack_int *info );
 14394  void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14395                      lapack_int* jpvt, double* tau, double* work,
 14396                      lapack_int *info );
 14397  void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14398                      lapack_int* lda, lapack_int* jpvt,
 14399                      lapack_complex_float* tau, lapack_complex_float* work,
 14400                      float* rwork, lapack_int *info );
 14401  void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14402                      lapack_int* lda, lapack_int* jpvt,
 14403                      lapack_complex_double* tau, lapack_complex_double* work,
 14404                      double* rwork, lapack_int *info );
 14405  void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14406                      lapack_int* jpvt, float* tau, float* work,
 14407                      lapack_int* lwork, lapack_int *info );
 14408  void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14409                      lapack_int* jpvt, double* tau, double* work,
 14410                      lapack_int* lwork, lapack_int *info );
 14411  void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14412                      lapack_int* lda, lapack_int* jpvt,
 14413                      lapack_complex_float* tau, lapack_complex_float* work,
 14414                      lapack_int* lwork, float* rwork, lapack_int *info );
 14415  void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14416                      lapack_int* lda, lapack_int* jpvt,
 14417                      lapack_complex_double* tau, lapack_complex_double* work,
 14418                      lapack_int* lwork, double* rwork, lapack_int *info );
 14419  void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
 14420                      lapack_int* lda, const float* tau, float* work,
 14421                      lapack_int* lwork, lapack_int *info );
 14422  void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
 14423                      lapack_int* lda, const double* tau, double* work,
 14424                      lapack_int* lwork, lapack_int *info );
 14425  void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
 14426                      lapack_int* k, const float* a, lapack_int* lda,
 14427                      const float* tau, float* c, lapack_int* ldc, float* work,
 14428                      lapack_int* lwork, lapack_int *info );
 14429  void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
 14430                      lapack_int* k, const double* a, lapack_int* lda,
 14431                      const double* tau, double* c, lapack_int* ldc, double* work,
 14432                      lapack_int* lwork, lapack_int *info );
 14433  void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
 14434                      lapack_complex_float* a, lapack_int* lda,
 14435                      const lapack_complex_float* tau, lapack_complex_float* work,
 14436                      lapack_int* lwork, lapack_int *info );
 14437  void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
 14438                      lapack_complex_double* a, lapack_int* lda,
 14439                      const lapack_complex_double* tau,
 14440                      lapack_complex_double* work, lapack_int* lwork,
 14441                      lapack_int *info );
 14442  void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
 14443                      lapack_int* k, const lapack_complex_float* a,
 14444                      lapack_int* lda, const lapack_complex_float* tau,
 14445                      lapack_complex_float* c, lapack_int* ldc,
 14446                      lapack_complex_float* work, lapack_int* lwork,
 14447                      lapack_int *info );
 14448  void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
 14449                      lapack_int* k, const lapack_complex_double* a,
 14450                      lapack_int* lda, const lapack_complex_double* tau,
 14451                      lapack_complex_double* c, lapack_int* ldc,
 14452                      lapack_complex_double* work, lapack_int* lwork,
 14453                      lapack_int *info );
 14454  void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14455                      float* tau, float* work, lapack_int* lwork,
 14456                      lapack_int *info );
 14457  void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14458                      double* tau, double* work, lapack_int* lwork,
 14459                      lapack_int *info );
 14460  void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14461                      lapack_int* lda, lapack_complex_float* tau,
 14462                      lapack_complex_float* work, lapack_int* lwork,
 14463                      lapack_int *info );
 14464  void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14465                      lapack_int* lda, lapack_complex_double* tau,
 14466                      lapack_complex_double* work, lapack_int* lwork,
 14467                      lapack_int *info );
 14468  void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
 14469                      lapack_int* lda, const float* tau, float* work,
 14470                      lapack_int* lwork, lapack_int *info );
 14471  void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
 14472                      lapack_int* lda, const double* tau, double* work,
 14473                      lapack_int* lwork, lapack_int *info );
 14474  void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14475                      lapack_int* k, const float* a, lapack_int* lda,
 14476                      const float* tau, float* c, lapack_int* ldc, float* work,
 14477                      lapack_int* lwork, lapack_int *info );
 14478  void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14479                      lapack_int* k, const double* a, lapack_int* lda,
 14480                      const double* tau, double* c, lapack_int* ldc, double* work,
 14481                      lapack_int* lwork, lapack_int *info );
 14482  void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
 14483                      lapack_complex_float* a, lapack_int* lda,
 14484                      const lapack_complex_float* tau, lapack_complex_float* work,
 14485                      lapack_int* lwork, lapack_int *info );
 14486  void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
 14487                      lapack_complex_double* a, lapack_int* lda,
 14488                      const lapack_complex_double* tau,
 14489                      lapack_complex_double* work, lapack_int* lwork,
 14490                      lapack_int *info );
 14491  void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14492                      lapack_int* k, const lapack_complex_float* a,
 14493                      lapack_int* lda, const lapack_complex_float* tau,
 14494                      lapack_complex_float* c, lapack_int* ldc,
 14495                      lapack_complex_float* work, lapack_int* lwork,
 14496                      lapack_int *info );
 14497  void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14498                      lapack_int* k, const lapack_complex_double* a,
 14499                      lapack_int* lda, const lapack_complex_double* tau,
 14500                      lapack_complex_double* c, lapack_int* ldc,
 14501                      lapack_complex_double* work, lapack_int* lwork,
 14502                      lapack_int *info );
 14503  void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14504                      float* tau, float* work, lapack_int* lwork,
 14505                      lapack_int *info );
 14506  void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14507                      double* tau, double* work, lapack_int* lwork,
 14508                      lapack_int *info );
 14509  void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14510                      lapack_int* lda, lapack_complex_float* tau,
 14511                      lapack_complex_float* work, lapack_int* lwork,
 14512                      lapack_int *info );
 14513  void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14514                      lapack_int* lda, lapack_complex_double* tau,
 14515                      lapack_complex_double* work, lapack_int* lwork,
 14516                      lapack_int *info );
 14517  void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
 14518                      lapack_int* lda, const float* tau, float* work,
 14519                      lapack_int* lwork, lapack_int *info );
 14520  void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
 14521                      lapack_int* lda, const double* tau, double* work,
 14522                      lapack_int* lwork, lapack_int *info );
 14523  void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
 14524                      lapack_complex_float* a, lapack_int* lda,
 14525                      const lapack_complex_float* tau, lapack_complex_float* work,
 14526                      lapack_int* lwork, lapack_int *info );
 14527  void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
 14528                      lapack_complex_double* a, lapack_int* lda,
 14529                      const lapack_complex_double* tau,
 14530                      lapack_complex_double* work, lapack_int* lwork,
 14531                      lapack_int *info );
 14532  void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
 14533                      lapack_int* k, const float* a, lapack_int* lda,
 14534                      const float* tau, float* c, lapack_int* ldc, float* work,
 14535                      lapack_int* lwork, lapack_int *info );
 14536  void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
 14537                      lapack_int* k, const double* a, lapack_int* lda,
 14538                      const double* tau, double* c, lapack_int* ldc, double* work,
 14539                      lapack_int* lwork, lapack_int *info );
 14540  void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
 14541                      lapack_int* k, const lapack_complex_float* a,
 14542                      lapack_int* lda, const lapack_complex_float* tau,
 14543                      lapack_complex_float* c, lapack_int* ldc,
 14544                      lapack_complex_float* work, lapack_int* lwork,
 14545                      lapack_int *info );
 14546  void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
 14547                      lapack_int* k, const lapack_complex_double* a,
 14548                      lapack_int* lda, const lapack_complex_double* tau,
 14549                      lapack_complex_double* c, lapack_int* ldc,
 14550                      lapack_complex_double* work, lapack_int* lwork,
 14551                      lapack_int *info );
 14552  void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14553                      float* tau, float* work, lapack_int* lwork,
 14554                      lapack_int *info );
 14555  void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14556                      double* tau, double* work, lapack_int* lwork,
 14557                      lapack_int *info );
 14558  void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14559                      lapack_int* lda, lapack_complex_float* tau,
 14560                      lapack_complex_float* work, lapack_int* lwork,
 14561                      lapack_int *info );
 14562  void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14563                      lapack_int* lda, lapack_complex_double* tau,
 14564                      lapack_complex_double* work, lapack_int* lwork,
 14565                      lapack_int *info );
 14566  void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
 14567                      lapack_int* lda, const float* tau, float* work,
 14568                      lapack_int* lwork, lapack_int *info );
 14569  void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
 14570                      lapack_int* lda, const double* tau, double* work,
 14571                      lapack_int* lwork, lapack_int *info );
 14572  void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
 14573                      lapack_complex_float* a, lapack_int* lda,
 14574                      const lapack_complex_float* tau, lapack_complex_float* work,
 14575                      lapack_int* lwork, lapack_int *info );
 14576  void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
 14577                      lapack_complex_double* a, lapack_int* lda,
 14578                      const lapack_complex_double* tau,
 14579                      lapack_complex_double* work, lapack_int* lwork,
 14580                      lapack_int *info );
 14581  void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14582                      lapack_int* k, const float* a, lapack_int* lda,
 14583                      const float* tau, float* c, lapack_int* ldc, float* work,
 14584                      lapack_int* lwork, lapack_int *info );
 14585  void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14586                      lapack_int* k, const double* a, lapack_int* lda,
 14587                      const double* tau, double* c, lapack_int* ldc, double* work,
 14588                      lapack_int* lwork, lapack_int *info );
 14589  void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14590                      lapack_int* k, const lapack_complex_float* a,
 14591                      lapack_int* lda, const lapack_complex_float* tau,
 14592                      lapack_complex_float* c, lapack_int* ldc,
 14593                      lapack_complex_float* work, lapack_int* lwork,
 14594                      lapack_int *info );
 14595  void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
 14596                      lapack_int* k, const lapack_complex_double* a,
 14597                      lapack_int* lda, const lapack_complex_double* tau,
 14598                      lapack_complex_double* c, lapack_int* ldc,
 14599                      lapack_complex_double* work, lapack_int* lwork,
 14600                      lapack_int *info );
 14601  void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14602                      float* tau, float* work, lapack_int* lwork,
 14603                      lapack_int *info );
 14604  void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14605                      double* tau, double* work, lapack_int* lwork,
 14606                      lapack_int *info );
 14607  void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14608                      lapack_int* lda, lapack_complex_float* tau,
 14609                      lapack_complex_float* work, lapack_int* lwork,
 14610                      lapack_int *info );
 14611  void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14612                      lapack_int* lda, lapack_complex_double* tau,
 14613                      lapack_complex_double* work, lapack_int* lwork,
 14614                      lapack_int *info );
 14615  void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
 14616                      lapack_int* k, lapack_int* l, const float* a,
 14617                      lapack_int* lda, const float* tau, float* c,
 14618                      lapack_int* ldc, float* work, lapack_int* lwork,
 14619                      lapack_int *info );
 14620  void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
 14621                      lapack_int* k, lapack_int* l, const double* a,
 14622                      lapack_int* lda, const double* tau, double* c,
 14623                      lapack_int* ldc, double* work, lapack_int* lwork,
 14624                      lapack_int *info );
 14625  void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
 14626                      lapack_int* k, lapack_int* l, const lapack_complex_float* a,
 14627                      lapack_int* lda, const lapack_complex_float* tau,
 14628                      lapack_complex_float* c, lapack_int* ldc,
 14629                      lapack_complex_float* work, lapack_int* lwork,
 14630                      lapack_int *info );
 14631  void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
 14632                      lapack_int* k, lapack_int* l,
 14633                      const lapack_complex_double* a, lapack_int* lda,
 14634                      const lapack_complex_double* tau, lapack_complex_double* c,
 14635                      lapack_int* ldc, lapack_complex_double* work,
 14636                      lapack_int* lwork, lapack_int *info );
 14637  void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
 14638                      lapack_int* lda, float* taua, float* b, lapack_int* ldb,
 14639                      float* taub, float* work, lapack_int* lwork,
 14640                      lapack_int *info );
 14641  void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
 14642                      lapack_int* lda, double* taua, double* b, lapack_int* ldb,
 14643                      double* taub, double* work, lapack_int* lwork,
 14644                      lapack_int *info );
 14645  void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
 14646                      lapack_complex_float* a, lapack_int* lda,
 14647                      lapack_complex_float* taua, lapack_complex_float* b,
 14648                      lapack_int* ldb, lapack_complex_float* taub,
 14649                      lapack_complex_float* work, lapack_int* lwork,
 14650                      lapack_int *info );
 14651  void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
 14652                      lapack_complex_double* a, lapack_int* lda,
 14653                      lapack_complex_double* taua, lapack_complex_double* b,
 14654                      lapack_int* ldb, lapack_complex_double* taub,
 14655                      lapack_complex_double* work, lapack_int* lwork,
 14656                      lapack_int *info );
 14657  void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
 14658                      lapack_int* lda, float* taua, float* b, lapack_int* ldb,
 14659                      float* taub, float* work, lapack_int* lwork,
 14660                      lapack_int *info );
 14661  void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
 14662                      lapack_int* lda, double* taua, double* b, lapack_int* ldb,
 14663                      double* taub, double* work, lapack_int* lwork,
 14664                      lapack_int *info );
 14665  void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
 14666                      lapack_complex_float* a, lapack_int* lda,
 14667                      lapack_complex_float* taua, lapack_complex_float* b,
 14668                      lapack_int* ldb, lapack_complex_float* taub,
 14669                      lapack_complex_float* work, lapack_int* lwork,
 14670                      lapack_int *info );
 14671  void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
 14672                      lapack_complex_double* a, lapack_int* lda,
 14673                      lapack_complex_double* taua, lapack_complex_double* b,
 14674                      lapack_int* ldb, lapack_complex_double* taub,
 14675                      lapack_complex_double* work, lapack_int* lwork,
 14676                      lapack_int *info );
 14677  void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 14678                      float* d, float* e, float* tauq, float* taup, float* work,
 14679                      lapack_int* lwork, lapack_int *info );
 14680  void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 14681                      double* d, double* e, double* tauq, double* taup,
 14682                      double* work, lapack_int* lwork, lapack_int *info );
 14683  void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 14684                      lapack_int* lda, float* d, float* e,
 14685                      lapack_complex_float* tauq, lapack_complex_float* taup,
 14686                      lapack_complex_float* work, lapack_int* lwork,
 14687                      lapack_int *info );
 14688  void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 14689                      lapack_int* lda, double* d, double* e,
 14690                      lapack_complex_double* tauq, lapack_complex_double* taup,
 14691                      lapack_complex_double* work, lapack_int* lwork,
 14692                      lapack_int *info );
 14693  void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
 14694                      lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
 14695                      float* d, float* e, float* q, lapack_int* ldq, float* pt,
 14696                      lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
 14697                      lapack_int *info );
 14698  void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
 14699                      lapack_int* kl, lapack_int* ku, double* ab,
 14700                      lapack_int* ldab, double* d, double* e, double* q,
 14701                      lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
 14702                      lapack_int* ldc, double* work, lapack_int *info );
 14703  void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
 14704                      lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
 14705                      lapack_int* ldab, float* d, float* e,
 14706                      lapack_complex_float* q, lapack_int* ldq,
 14707                      lapack_complex_float* pt, lapack_int* ldpt,
 14708                      lapack_complex_float* c, lapack_int* ldc,
 14709                      lapack_complex_float* work, float* rwork,
 14710                      lapack_int *info );
 14711  void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
 14712                      lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
 14713                      lapack_int* ldab, double* d, double* e,
 14714                      lapack_complex_double* q, lapack_int* ldq,
 14715                      lapack_complex_double* pt, lapack_int* ldpt,
 14716                      lapack_complex_double* c, lapack_int* ldc,
 14717                      lapack_complex_double* work, double* rwork,
 14718                      lapack_int *info );
 14719  void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
 14720                      float* a, lapack_int* lda, const float* tau, float* work,
 14721                      lapack_int* lwork, lapack_int *info );
 14722  void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
 14723                      double* a, lapack_int* lda, const double* tau, double* work,
 14724                      lapack_int* lwork, lapack_int *info );
 14725  void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
 14726                      lapack_int* n, lapack_int* k, const float* a,
 14727                      lapack_int* lda, const float* tau, float* c,
 14728                      lapack_int* ldc, float* work, lapack_int* lwork,
 14729                      lapack_int *info );
 14730  void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
 14731                      lapack_int* n, lapack_int* k, const double* a,
 14732                      lapack_int* lda, const double* tau, double* c,
 14733                      lapack_int* ldc, double* work, lapack_int* lwork,
 14734                      lapack_int *info );
 14735  void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
 14736                      lapack_complex_float* a, lapack_int* lda,
 14737                      const lapack_complex_float* tau, lapack_complex_float* work,
 14738                      lapack_int* lwork, lapack_int *info );
 14739  void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
 14740                      lapack_complex_double* a, lapack_int* lda,
 14741                      const lapack_complex_double* tau,
 14742                      lapack_complex_double* work, lapack_int* lwork,
 14743                      lapack_int *info );
 14744  void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
 14745                      lapack_int* n, lapack_int* k, const lapack_complex_float* a,
 14746                      lapack_int* lda, const lapack_complex_float* tau,
 14747                      lapack_complex_float* c, lapack_int* ldc,
 14748                      lapack_complex_float* work, lapack_int* lwork,
 14749                      lapack_int *info );
 14750  void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
 14751                      lapack_int* n, lapack_int* k,
 14752                      const lapack_complex_double* a, lapack_int* lda,
 14753                      const lapack_complex_double* tau, lapack_complex_double* c,
 14754                      lapack_int* ldc, lapack_complex_double* work,
 14755                      lapack_int* lwork, lapack_int *info );
 14756  void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
 14757                      lapack_int* nru, lapack_int* ncc, float* d, float* e,
 14758                      float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
 14759                      float* c, lapack_int* ldc, float* work, lapack_int *info );
 14760  void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
 14761                      lapack_int* nru, lapack_int* ncc, double* d, double* e,
 14762                      double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
 14763                      double* c, lapack_int* ldc, double* work,
 14764                      lapack_int *info );
 14765  void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
 14766                      lapack_int* nru, lapack_int* ncc, float* d, float* e,
 14767                      lapack_complex_float* vt, lapack_int* ldvt,
 14768                      lapack_complex_float* u, lapack_int* ldu,
 14769                      lapack_complex_float* c, lapack_int* ldc, float* work,
 14770                      lapack_int *info );
 14771  void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
 14772                      lapack_int* nru, lapack_int* ncc, double* d, double* e,
 14773                      lapack_complex_double* vt, lapack_int* ldvt,
 14774                      lapack_complex_double* u, lapack_int* ldu,
 14775                      lapack_complex_double* c, lapack_int* ldc, double* work,
 14776                      lapack_int *info );
 14777  void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
 14778                      float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
 14779                      float* q, lapack_int* iq, float* work, lapack_int* iwork,
 14780                      lapack_int *info );
 14781  void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
 14782                      double* e, double* u, lapack_int* ldu, double* vt,
 14783                      lapack_int* ldvt, double* q, lapack_int* iq, double* work,
 14784                      lapack_int* iwork, lapack_int *info );
 14785  void LAPACK_sbdsvdx( char* uplo, char* jobz, char* range,
 14786                       lapack_int* n, float* d, float* e,
 14787                       lapack_int* vl, lapack_int* vu,
 14788                       lapack_int* il, lapack_int* iu, lapack_int* ns,
 14789                       float* s, float* z, lapack_int* ldz,
 14790                       float* work, lapack_int *iwork, lapack_int *info );
 14791  void LAPACK_dbdsvdx( char* uplo, char* jobz, char* range,
 14792                       lapack_int* n, double* d, double* e,
 14793                       lapack_int* vl, lapack_int* vu,
 14794                       lapack_int* il, lapack_int* iu, lapack_int* ns,
 14795                       double* s, double* z, lapack_int* ldz,
 14796                       double* work, lapack_int *iwork, lapack_int *info );
 14797  void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 14798                      float* d, float* e, float* tau, float* work,
 14799                      lapack_int* lwork, lapack_int *info );
 14800  void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 14801                      double* d, double* e, double* tau, double* work,
 14802                      lapack_int* lwork, lapack_int *info );
 14803  void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 14804                      const float* tau, float* work, lapack_int* lwork,
 14805                      lapack_int *info );
 14806  void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 14807                      const double* tau, double* work, lapack_int* lwork,
 14808                      lapack_int *info );
 14809  void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
 14810                      lapack_int* n, const float* a, lapack_int* lda,
 14811                      const float* tau, float* c, lapack_int* ldc, float* work,
 14812                      lapack_int* lwork, lapack_int *info );
 14813  void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
 14814                      lapack_int* n, const double* a, lapack_int* lda,
 14815                      const double* tau, double* c, lapack_int* ldc, double* work,
 14816                      lapack_int* lwork, lapack_int *info );
 14817  void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
 14818                      lapack_int* lda, float* d, float* e,
 14819                      lapack_complex_float* tau, lapack_complex_float* work,
 14820                      lapack_int* lwork, lapack_int *info );
 14821  void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
 14822                      lapack_int* lda, double* d, double* e,
 14823                      lapack_complex_double* tau, lapack_complex_double* work,
 14824                      lapack_int* lwork, lapack_int *info );
 14825  void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
 14826                      lapack_int* lda, const lapack_complex_float* tau,
 14827                      lapack_complex_float* work, lapack_int* lwork,
 14828                      lapack_int *info );
 14829  void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
 14830                      lapack_int* lda, const lapack_complex_double* tau,
 14831                      lapack_complex_double* work, lapack_int* lwork,
 14832                      lapack_int *info );
 14833  void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14834                      lapack_int* n, const lapack_complex_float* a,
 14835                      lapack_int* lda, const lapack_complex_float* tau,
 14836                      lapack_complex_float* c, lapack_int* ldc,
 14837                      lapack_complex_float* work, lapack_int* lwork,
 14838                      lapack_int *info );
 14839  void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14840                      lapack_int* n, const lapack_complex_double* a,
 14841                      lapack_int* lda, const lapack_complex_double* tau,
 14842                      lapack_complex_double* c, lapack_int* ldc,
 14843                      lapack_complex_double* work, lapack_int* lwork,
 14844                      lapack_int *info );
 14845  void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
 14846                      float* tau, lapack_int *info );
 14847  void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
 14848                      double* tau, lapack_int *info );
 14849  void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
 14850                      const float* tau, float* q, lapack_int* ldq, float* work,
 14851                      lapack_int *info );
 14852  void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
 14853                      const double* tau, double* q, lapack_int* ldq, double* work,
 14854                      lapack_int *info );
 14855  void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14856                      lapack_int* n, const float* ap, const float* tau, float* c,
 14857                      lapack_int* ldc, float* work, lapack_int *info );
 14858  void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14859                      lapack_int* n, const double* ap, const double* tau,
 14860                      double* c, lapack_int* ldc, double* work,
 14861                      lapack_int *info );
 14862  void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
 14863                      float* d, float* e, lapack_complex_float* tau,
 14864                      lapack_int *info );
 14865  void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
 14866                      double* d, double* e, lapack_complex_double* tau,
 14867                      lapack_int *info );
 14868  void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 14869                      const lapack_complex_float* tau, lapack_complex_float* q,
 14870                      lapack_int* ldq, lapack_complex_float* work,
 14871                      lapack_int *info );
 14872  void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 14873                      const lapack_complex_double* tau, lapack_complex_double* q,
 14874                      lapack_int* ldq, lapack_complex_double* work,
 14875                      lapack_int *info );
 14876  void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14877                      lapack_int* n, const lapack_complex_float* ap,
 14878                      const lapack_complex_float* tau, lapack_complex_float* c,
 14879                      lapack_int* ldc, lapack_complex_float* work,
 14880                      lapack_int *info );
 14881  void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
 14882                      lapack_int* n, const lapack_complex_double* ap,
 14883                      const lapack_complex_double* tau, lapack_complex_double* c,
 14884                      lapack_int* ldc, lapack_complex_double* work,
 14885                      lapack_int *info );
 14886  void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
 14887                      float* ab, lapack_int* ldab, float* d, float* e, float* q,
 14888                      lapack_int* ldq, float* work, lapack_int *info );
 14889  void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
 14890                      double* ab, lapack_int* ldab, double* d, double* e,
 14891                      double* q, lapack_int* ldq, double* work,
 14892                      lapack_int *info );
 14893  void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
 14894                      lapack_complex_float* ab, lapack_int* ldab, float* d,
 14895                      float* e, lapack_complex_float* q, lapack_int* ldq,
 14896                      lapack_complex_float* work, lapack_int *info );
 14897  void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
 14898                      lapack_complex_double* ab, lapack_int* ldab, double* d,
 14899                      double* e, lapack_complex_double* q, lapack_int* ldq,
 14900                      lapack_complex_double* work, lapack_int *info );
 14901  void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
 14902  void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
 14903  void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
 14904                      lapack_int* ldz, float* work, lapack_int *info );
 14905  void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
 14906                      lapack_int* ldz, double* work, lapack_int *info );
 14907  void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
 14908                      lapack_complex_float* z, lapack_int* ldz, float* work,
 14909                      lapack_int *info );
 14910  void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
 14911                      lapack_complex_double* z, lapack_int* ldz, double* work,
 14912                      lapack_int *info );
 14913  void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
 14914                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 14915                      lapack_int* m, float* w, float* z, lapack_int* ldz,
 14916                      lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
 14917                      float* work, lapack_int* lwork, lapack_int* iwork,
 14918                      lapack_int* liwork, lapack_int *info );
 14919  void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
 14920                      double* e, double* vl, double* vu, lapack_int* il,
 14921                      lapack_int* iu, lapack_int* m, double* w, double* z,
 14922                      lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
 14923                      lapack_logical* tryrac, double* work, lapack_int* lwork,
 14924                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14925  void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
 14926                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 14927                      lapack_int* m, float* w, lapack_complex_float* z,
 14928                      lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
 14929                      lapack_logical* tryrac, float* work, lapack_int* lwork,
 14930                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14931  void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
 14932                      double* e, double* vl, double* vu, lapack_int* il,
 14933                      lapack_int* iu, lapack_int* m, double* w,
 14934                      lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
 14935                      lapack_int* isuppz, lapack_logical* tryrac, double* work,
 14936                      lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
 14937                      lapack_int *info );
 14938  void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
 14939                      lapack_int* ldz, float* work, lapack_int* lwork,
 14940                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14941  void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
 14942                      lapack_int* ldz, double* work, lapack_int* lwork,
 14943                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14944  void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
 14945                      lapack_complex_float* z, lapack_int* ldz,
 14946                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 14947                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 14948                      lapack_int *info );
 14949  void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
 14950                      lapack_complex_double* z, lapack_int* ldz,
 14951                      lapack_complex_double* work, lapack_int* lwork,
 14952                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 14953                      lapack_int* liwork, lapack_int *info );
 14954  void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
 14955                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 14956                      float* abstol, lapack_int* m, float* w, float* z,
 14957                      lapack_int* ldz, lapack_int* isuppz, float* work,
 14958                      lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
 14959                      lapack_int *info );
 14960  void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
 14961                      double* e, double* vl, double* vu, lapack_int* il,
 14962                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 14963                      double* z, lapack_int* ldz, lapack_int* isuppz,
 14964                      double* work, lapack_int* lwork, lapack_int* iwork,
 14965                      lapack_int* liwork, lapack_int *info );
 14966  void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
 14967                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 14968                      float* abstol, lapack_int* m, float* w,
 14969                      lapack_complex_float* z, lapack_int* ldz,
 14970                      lapack_int* isuppz, float* work, lapack_int* lwork,
 14971                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14972  void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
 14973                      double* e, double* vl, double* vu, lapack_int* il,
 14974                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 14975                      lapack_complex_double* z, lapack_int* ldz,
 14976                      lapack_int* isuppz, double* work, lapack_int* lwork,
 14977                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 14978  void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
 14979                      lapack_int* ldz, float* work, lapack_int *info );
 14980  void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
 14981                      lapack_int* ldz, double* work, lapack_int *info );
 14982  void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
 14983                      lapack_complex_float* z, lapack_int* ldz, float* work,
 14984                      lapack_int *info );
 14985  void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
 14986                      lapack_complex_double* z, lapack_int* ldz, double* work,
 14987                      lapack_int *info );
 14988  void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
 14989                      float* vu, lapack_int* il, lapack_int* iu, float* abstol,
 14990                      const float* d, const float* e, lapack_int* m,
 14991                      lapack_int* nsplit, float* w, lapack_int* iblock,
 14992                      lapack_int* isplit, float* work, lapack_int* iwork,
 14993                      lapack_int *info );
 14994  void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
 14995                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 14996                      const double* d, const double* e, lapack_int* m,
 14997                      lapack_int* nsplit, double* w, lapack_int* iblock,
 14998                      lapack_int* isplit, double* work, lapack_int* iwork,
 14999                      lapack_int *info );
 15000  void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
 15001                      lapack_int* m, const float* w, const lapack_int* iblock,
 15002                      const lapack_int* isplit, float* z, lapack_int* ldz,
 15003                      float* work, lapack_int* iwork, lapack_int* ifailv,
 15004                      lapack_int *info );
 15005  void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
 15006                      lapack_int* m, const double* w, const lapack_int* iblock,
 15007                      const lapack_int* isplit, double* z, lapack_int* ldz,
 15008                      double* work, lapack_int* iwork, lapack_int* ifailv,
 15009                      lapack_int *info );
 15010  void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
 15011                      lapack_int* m, const float* w, const lapack_int* iblock,
 15012                      const lapack_int* isplit, lapack_complex_float* z,
 15013                      lapack_int* ldz, float* work, lapack_int* iwork,
 15014                      lapack_int* ifailv, lapack_int *info );
 15015  void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
 15016                      lapack_int* m, const double* w, const lapack_int* iblock,
 15017                      const lapack_int* isplit, lapack_complex_double* z,
 15018                      lapack_int* ldz, double* work, lapack_int* iwork,
 15019                      lapack_int* ifailv, lapack_int *info );
 15020  void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
 15021                      float* sep, lapack_int *info );
 15022  void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
 15023                      double* sep, lapack_int *info );
 15024  void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
 15025                      lapack_int* lda, const float* b, lapack_int* ldb,
 15026                      lapack_int *info );
 15027  void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
 15028                      lapack_int* lda, const double* b, lapack_int* ldb,
 15029                      lapack_int *info );
 15030  void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
 15031                      lapack_complex_float* a, lapack_int* lda,
 15032                      const lapack_complex_float* b, lapack_int* ldb,
 15033                      lapack_int *info );
 15034  void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
 15035                      lapack_complex_double* a, lapack_int* lda,
 15036                      const lapack_complex_double* b, lapack_int* ldb,
 15037                      lapack_int *info );
 15038  void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
 15039                      const float* bp, lapack_int *info );
 15040  void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
 15041                      const double* bp, lapack_int *info );
 15042  void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
 15043                      lapack_complex_float* ap, const lapack_complex_float* bp,
 15044                      lapack_int *info );
 15045  void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
 15046                      lapack_complex_double* ap, const lapack_complex_double* bp,
 15047                      lapack_int *info );
 15048  void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
 15049                      lapack_int* kb, float* ab, lapack_int* ldab,
 15050                      const float* bb, lapack_int* ldbb, float* x,
 15051                      lapack_int* ldx, float* work, lapack_int *info );
 15052  void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
 15053                      lapack_int* kb, double* ab, lapack_int* ldab,
 15054                      const double* bb, lapack_int* ldbb, double* x,
 15055                      lapack_int* ldx, double* work, lapack_int *info );
 15056  void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
 15057                      lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
 15058                      const lapack_complex_float* bb, lapack_int* ldbb,
 15059                      lapack_complex_float* x, lapack_int* ldx,
 15060                      lapack_complex_float* work, float* rwork,
 15061                      lapack_int *info );
 15062  void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
 15063                      lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
 15064                      const lapack_complex_double* bb, lapack_int* ldbb,
 15065                      lapack_complex_double* x, lapack_int* ldx,
 15066                      lapack_complex_double* work, double* rwork,
 15067                      lapack_int *info );
 15068  void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
 15069                      lapack_int* ldbb, lapack_int *info );
 15070  void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
 15071                      lapack_int* ldbb, lapack_int *info );
 15072  void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
 15073                      lapack_complex_float* bb, lapack_int* ldbb,
 15074                      lapack_int *info );
 15075  void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
 15076                      lapack_complex_double* bb, lapack_int* ldbb,
 15077                      lapack_int *info );
 15078  void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
 15079                      lapack_int* lda, float* tau, float* work, lapack_int* lwork,
 15080                      lapack_int *info );
 15081  void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
 15082                      lapack_int* lda, double* tau, double* work,
 15083                      lapack_int* lwork, lapack_int *info );
 15084  void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
 15085                      lapack_complex_float* a, lapack_int* lda,
 15086                      lapack_complex_float* tau, lapack_complex_float* work,
 15087                      lapack_int* lwork, lapack_int *info );
 15088  void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
 15089                      lapack_complex_double* a, lapack_int* lda,
 15090                      lapack_complex_double* tau, lapack_complex_double* work,
 15091                      lapack_int* lwork, lapack_int *info );
 15092  void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
 15093                      lapack_int* lda, const float* tau, float* work,
 15094                      lapack_int* lwork, lapack_int *info );
 15095  void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
 15096                      lapack_int* lda, const double* tau, double* work,
 15097                      lapack_int* lwork, lapack_int *info );
 15098  void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
 15099                      lapack_int* ilo, lapack_int* ihi, const float* a,
 15100                      lapack_int* lda, const float* tau, float* c,
 15101                      lapack_int* ldc, float* work, lapack_int* lwork,
 15102                      lapack_int *info );
 15103  void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
 15104                      lapack_int* ilo, lapack_int* ihi, const double* a,
 15105                      lapack_int* lda, const double* tau, double* c,
 15106                      lapack_int* ldc, double* work, lapack_int* lwork,
 15107                      lapack_int *info );
 15108  void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
 15109                      lapack_complex_float* a, lapack_int* lda,
 15110                      const lapack_complex_float* tau, lapack_complex_float* work,
 15111                      lapack_int* lwork, lapack_int *info );
 15112  void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
 15113                      lapack_complex_double* a, lapack_int* lda,
 15114                      const lapack_complex_double* tau,
 15115                      lapack_complex_double* work, lapack_int* lwork,
 15116                      lapack_int *info );
 15117  void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
 15118                      lapack_int* ilo, lapack_int* ihi,
 15119                      const lapack_complex_float* a, lapack_int* lda,
 15120                      const lapack_complex_float* tau, lapack_complex_float* c,
 15121                      lapack_int* ldc, lapack_complex_float* work,
 15122                      lapack_int* lwork, lapack_int *info );
 15123  void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
 15124                      lapack_int* ilo, lapack_int* ihi,
 15125                      const lapack_complex_double* a, lapack_int* lda,
 15126                      const lapack_complex_double* tau, lapack_complex_double* c,
 15127                      lapack_int* ldc, lapack_complex_double* work,
 15128                      lapack_int* lwork, lapack_int *info );
 15129  void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
 15130                      lapack_int* ilo, lapack_int* ihi, float* scale,
 15131                      lapack_int *info );
 15132  void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
 15133                      lapack_int* ilo, lapack_int* ihi, double* scale,
 15134                      lapack_int *info );
 15135  void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
 15136                      lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
 15137                      float* scale, lapack_int *info );
 15138  void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
 15139                      lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
 15140                      double* scale, lapack_int *info );
 15141  void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15142                      lapack_int* ihi, const float* scale, lapack_int* m,
 15143                      float* v, lapack_int* ldv, lapack_int *info );
 15144  void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15145                      lapack_int* ihi, const double* scale, lapack_int* m,
 15146                      double* v, lapack_int* ldv, lapack_int *info );
 15147  void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15148                      lapack_int* ihi, const float* scale, lapack_int* m,
 15149                      lapack_complex_float* v, lapack_int* ldv,
 15150                      lapack_int *info );
 15151  void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15152                      lapack_int* ihi, const double* scale, lapack_int* m,
 15153                      lapack_complex_double* v, lapack_int* ldv,
 15154                      lapack_int *info );
 15155  void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
 15156                      lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
 15157                      float* wi, float* z, lapack_int* ldz, float* work,
 15158                      lapack_int* lwork, lapack_int *info );
 15159  void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
 15160                      lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
 15161                      double* wi, double* z, lapack_int* ldz, double* work,
 15162                      lapack_int* lwork, lapack_int *info );
 15163  void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
 15164                      lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
 15165                      lapack_complex_float* w, lapack_complex_float* z,
 15166                      lapack_int* ldz, lapack_complex_float* work,
 15167                      lapack_int* lwork, lapack_int *info );
 15168  void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
 15169                      lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
 15170                      lapack_complex_double* w, lapack_complex_double* z,
 15171                      lapack_int* ldz, lapack_complex_double* work,
 15172                      lapack_int* lwork, lapack_int *info );
 15173  void LAPACK_shsein( char* job, char* eigsrc, char* initv,
 15174                      lapack_logical* select, lapack_int* n, const float* h,
 15175                      lapack_int* ldh, float* wr, const float* wi, float* vl,
 15176                      lapack_int* ldvl, float* vr, lapack_int* ldvr,
 15177                      lapack_int* mm, lapack_int* m, float* work,
 15178                      lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
 15179  void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
 15180                      lapack_logical* select, lapack_int* n, const double* h,
 15181                      lapack_int* ldh, double* wr, const double* wi, double* vl,
 15182                      lapack_int* ldvl, double* vr, lapack_int* ldvr,
 15183                      lapack_int* mm, lapack_int* m, double* work,
 15184                      lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
 15185  void LAPACK_chsein( char* job, char* eigsrc, char* initv,
 15186                      const lapack_logical* select, lapack_int* n,
 15187                      const lapack_complex_float* h, lapack_int* ldh,
 15188                      lapack_complex_float* w, lapack_complex_float* vl,
 15189                      lapack_int* ldvl, lapack_complex_float* vr,
 15190                      lapack_int* ldvr, lapack_int* mm, lapack_int* m,
 15191                      lapack_complex_float* work, float* rwork,
 15192                      lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
 15193  void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
 15194                      const lapack_logical* select, lapack_int* n,
 15195                      const lapack_complex_double* h, lapack_int* ldh,
 15196                      lapack_complex_double* w, lapack_complex_double* vl,
 15197                      lapack_int* ldvl, lapack_complex_double* vr,
 15198                      lapack_int* ldvr, lapack_int* mm, lapack_int* m,
 15199                      lapack_complex_double* work, double* rwork,
 15200                      lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
 15201  void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
 15202                      lapack_int* n, const float* t, lapack_int* ldt, float* vl,
 15203                      lapack_int* ldvl, float* vr, lapack_int* ldvr,
 15204                      lapack_int* mm, lapack_int* m, float* work,
 15205                      lapack_int *info );
 15206  void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
 15207                      lapack_int* n, const double* t, lapack_int* ldt, double* vl,
 15208                      lapack_int* ldvl, double* vr, lapack_int* ldvr,
 15209                      lapack_int* mm, lapack_int* m, double* work,
 15210                      lapack_int *info );
 15211  void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
 15212                      lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
 15213                      lapack_complex_float* vl, lapack_int* ldvl,
 15214                      lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
 15215                      lapack_int* m, lapack_complex_float* work, float* rwork,
 15216                      lapack_int *info );
 15217  void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
 15218                      lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
 15219                      lapack_complex_double* vl, lapack_int* ldvl,
 15220                      lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
 15221                      lapack_int* m, lapack_complex_double* work, double* rwork,
 15222                      lapack_int *info );
 15223  void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
 15224                      lapack_int* n, const float* t, lapack_int* ldt,
 15225                      const float* vl, lapack_int* ldvl, const float* vr,
 15226                      lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
 15227                      lapack_int* m, float* work, lapack_int* ldwork,
 15228                      lapack_int* iwork, lapack_int *info );
 15229  void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
 15230                      lapack_int* n, const double* t, lapack_int* ldt,
 15231                      const double* vl, lapack_int* ldvl, const double* vr,
 15232                      lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
 15233                      lapack_int* m, double* work, lapack_int* ldwork,
 15234                      lapack_int* iwork, lapack_int *info );
 15235  void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
 15236                      lapack_int* n, const lapack_complex_float* t,
 15237                      lapack_int* ldt, const lapack_complex_float* vl,
 15238                      lapack_int* ldvl, const lapack_complex_float* vr,
 15239                      lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
 15240                      lapack_int* m, lapack_complex_float* work,
 15241                      lapack_int* ldwork, float* rwork, lapack_int *info );
 15242  void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
 15243                      lapack_int* n, const lapack_complex_double* t,
 15244                      lapack_int* ldt, const lapack_complex_double* vl,
 15245                      lapack_int* ldvl, const lapack_complex_double* vr,
 15246                      lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
 15247                      lapack_int* m, lapack_complex_double* work,
 15248                      lapack_int* ldwork, double* rwork, lapack_int *info );
 15249  void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
 15250                      float* q, lapack_int* ldq, lapack_int* ifst,
 15251                      lapack_int* ilst, float* work, lapack_int *info );
 15252  void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
 15253                      double* q, lapack_int* ldq, lapack_int* ifst,
 15254                      lapack_int* ilst, double* work, lapack_int *info );
 15255  void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
 15256                      lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
 15257                      lapack_int* ifst, lapack_int* ilst, lapack_int *info );
 15258  void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
 15259                      lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
 15260                      lapack_int* ifst, lapack_int* ilst, lapack_int *info );
 15261  void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
 15262                      lapack_int* n, float* t, lapack_int* ldt, float* q,
 15263                      lapack_int* ldq, float* wr, float* wi, lapack_int* m,
 15264                      float* s, float* sep, float* work, lapack_int* lwork,
 15265                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15266  void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
 15267                      lapack_int* n, double* t, lapack_int* ldt, double* q,
 15268                      lapack_int* ldq, double* wr, double* wi, lapack_int* m,
 15269                      double* s, double* sep, double* work, lapack_int* lwork,
 15270                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15271  void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
 15272                      lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
 15273                      lapack_complex_float* q, lapack_int* ldq,
 15274                      lapack_complex_float* w, lapack_int* m, float* s,
 15275                      float* sep, lapack_complex_float* work, lapack_int* lwork,
 15276                      lapack_int *info );
 15277  void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
 15278                      lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
 15279                      lapack_complex_double* q, lapack_int* ldq,
 15280                      lapack_complex_double* w, lapack_int* m, double* s,
 15281                      double* sep, lapack_complex_double* work, lapack_int* lwork,
 15282                      lapack_int *info );
 15283  void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
 15284                      lapack_int* n, const float* a, lapack_int* lda,
 15285                      const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
 15286                      float* scale, lapack_int *info );
 15287  void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
 15288                      lapack_int* n, const double* a, lapack_int* lda,
 15289                      const double* b, lapack_int* ldb, double* c,
 15290                      lapack_int* ldc, double* scale, lapack_int *info );
 15291  void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
 15292                      lapack_int* n, const lapack_complex_float* a,
 15293                      lapack_int* lda, const lapack_complex_float* b,
 15294                      lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
 15295                      float* scale, lapack_int *info );
 15296  void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
 15297                      lapack_int* n, const lapack_complex_double* a,
 15298                      lapack_int* lda, const lapack_complex_double* b,
 15299                      lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
 15300                      double* scale, lapack_int *info );
 15301  void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15302                      lapack_int* ihi, float* a, lapack_int* lda, float* b,
 15303                      lapack_int* ldb, float* q, lapack_int* ldq, float* z,
 15304                      lapack_int* ldz, lapack_int *info );
 15305  void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15306                      lapack_int* ihi, double* a, lapack_int* lda, double* b,
 15307                      lapack_int* ldb, double* q, lapack_int* ldq, double* z,
 15308                      lapack_int* ldz, lapack_int *info );
 15309  void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15310                      lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
 15311                      lapack_complex_float* b, lapack_int* ldb,
 15312                      lapack_complex_float* q, lapack_int* ldq,
 15313                      lapack_complex_float* z, lapack_int* ldz,
 15314                      lapack_int *info );
 15315  void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15316                      lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
 15317                      lapack_complex_double* b, lapack_int* ldb,
 15318                      lapack_complex_double* q, lapack_int* ldq,
 15319                      lapack_complex_double* z, lapack_int* ldz,
 15320                      lapack_int *info );
 15321  void LAPACK_sgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15322                      lapack_int* ihi, float* a, lapack_int* lda, float* b,
 15323                      lapack_int* ldb, float* q, lapack_int* ldq, float* z,
 15324                      lapack_int* ldz, float* work, lapack_int* lwork,
 15325                      lapack_int *info );
 15326  void LAPACK_dgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
 15327                      lapack_int* ihi, double* a, lapack_int* lda, double* b,
 15328                      lapack_int* ldb, double* q, lapack_int* ldq, double* z,
 15329                      lapack_int* ldz, double* work, lapack_int* lwork,
 15330                      lapack_int *info );
 15331  void LAPACK_cgghd3( char* compq, char* compz, lapack_int* n,
 15332                      lapack_int* ilo, lapack_int* ihi,
 15333                      lapack_complex_float* a, lapack_int* lda,
 15334                      lapack_complex_float* b, lapack_int* ldb,
 15335                      lapack_complex_float* q, lapack_int* ldq,
 15336                      lapack_complex_float* z, lapack_int* ldz,
 15337                      lapack_complex_float* work, lapack_int* lwork,
 15338                      lapack_int *info );
 15339  void LAPACK_zgghd3( char* compq, char* compz, lapack_int* n,
 15340                      lapack_int* ilo, lapack_int* ihi,
 15341                      lapack_complex_double* a, lapack_int* lda,
 15342                      lapack_complex_double* b, lapack_int* ldb,
 15343                      lapack_complex_double* q, lapack_int* ldq,
 15344                      lapack_complex_double* z, lapack_int* ldz,
 15345                      lapack_complex_double* work, lapack_int* lwork,
 15346                      lapack_int *info );
 15347  void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
 15348                      float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
 15349                      float* lscale, float* rscale, float* work,
 15350                      lapack_int *info );
 15351  void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
 15352                      double* b, lapack_int* ldb, lapack_int* ilo,
 15353                      lapack_int* ihi, double* lscale, double* rscale,
 15354                      double* work, lapack_int *info );
 15355  void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
 15356                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
 15357                      lapack_int* ilo, lapack_int* ihi, float* lscale,
 15358                      float* rscale, float* work, lapack_int *info );
 15359  void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
 15360                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
 15361                      lapack_int* ilo, lapack_int* ihi, double* lscale,
 15362                      double* rscale, double* work, lapack_int *info );
 15363  void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15364                      lapack_int* ihi, const float* lscale, const float* rscale,
 15365                      lapack_int* m, float* v, lapack_int* ldv,
 15366                      lapack_int *info );
 15367  void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15368                      lapack_int* ihi, const double* lscale, const double* rscale,
 15369                      lapack_int* m, double* v, lapack_int* ldv,
 15370                      lapack_int *info );
 15371  void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15372                      lapack_int* ihi, const float* lscale, const float* rscale,
 15373                      lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
 15374                      lapack_int *info );
 15375  void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
 15376                      lapack_int* ihi, const double* lscale, const double* rscale,
 15377                      lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
 15378                      lapack_int *info );
 15379  void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
 15380                      lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
 15381                      float* t, lapack_int* ldt, float* alphar, float* alphai,
 15382                      float* beta, float* q, lapack_int* ldq, float* z,
 15383                      lapack_int* ldz, float* work, lapack_int* lwork,
 15384                      lapack_int *info );
 15385  void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
 15386                      lapack_int* ilo, lapack_int* ihi, double* h,
 15387                      lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
 15388                      double* alphai, double* beta, double* q, lapack_int* ldq,
 15389                      double* z, lapack_int* ldz, double* work, lapack_int* lwork,
 15390                      lapack_int *info );
 15391  void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
 15392                      lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
 15393                      lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
 15394                      lapack_complex_float* alpha, lapack_complex_float* beta,
 15395                      lapack_complex_float* q, lapack_int* ldq,
 15396                      lapack_complex_float* z, lapack_int* ldz,
 15397                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 15398                      lapack_int *info );
 15399  void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
 15400                      lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
 15401                      lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
 15402                      lapack_complex_double* alpha, lapack_complex_double* beta,
 15403                      lapack_complex_double* q, lapack_int* ldq,
 15404                      lapack_complex_double* z, lapack_int* ldz,
 15405                      lapack_complex_double* work, lapack_int* lwork,
 15406                      double* rwork, lapack_int *info );
 15407  void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
 15408                      lapack_int* n, const float* s, lapack_int* lds,
 15409                      const float* p, lapack_int* ldp, float* vl,
 15410                      lapack_int* ldvl, float* vr, lapack_int* ldvr,
 15411                      lapack_int* mm, lapack_int* m, float* work,
 15412                      lapack_int *info );
 15413  void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
 15414                      lapack_int* n, const double* s, lapack_int* lds,
 15415                      const double* p, lapack_int* ldp, double* vl,
 15416                      lapack_int* ldvl, double* vr, lapack_int* ldvr,
 15417                      lapack_int* mm, lapack_int* m, double* work,
 15418                      lapack_int *info );
 15419  void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
 15420                      lapack_int* n, const lapack_complex_float* s,
 15421                      lapack_int* lds, const lapack_complex_float* p,
 15422                      lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
 15423                      lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
 15424                      lapack_int* m, lapack_complex_float* work, float* rwork,
 15425                      lapack_int *info );
 15426  void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
 15427                      lapack_int* n, const lapack_complex_double* s,
 15428                      lapack_int* lds, const lapack_complex_double* p,
 15429                      lapack_int* ldp, lapack_complex_double* vl,
 15430                      lapack_int* ldvl, lapack_complex_double* vr,
 15431                      lapack_int* ldvr, lapack_int* mm, lapack_int* m,
 15432                      lapack_complex_double* work, double* rwork,
 15433                      lapack_int *info );
 15434  void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
 15435                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 15436                      float* q, lapack_int* ldq, float* z, lapack_int* ldz,
 15437                      lapack_int* ifst, lapack_int* ilst, float* work,
 15438                      lapack_int* lwork, lapack_int *info );
 15439  void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
 15440                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 15441                      double* q, lapack_int* ldq, double* z, lapack_int* ldz,
 15442                      lapack_int* ifst, lapack_int* ilst, double* work,
 15443                      lapack_int* lwork, lapack_int *info );
 15444  void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
 15445                      lapack_complex_float* a, lapack_int* lda,
 15446                      lapack_complex_float* b, lapack_int* ldb,
 15447                      lapack_complex_float* q, lapack_int* ldq,
 15448                      lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
 15449                      lapack_int* ilst, lapack_int *info );
 15450  void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
 15451                      lapack_complex_double* a, lapack_int* lda,
 15452                      lapack_complex_double* b, lapack_int* ldb,
 15453                      lapack_complex_double* q, lapack_int* ldq,
 15454                      lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
 15455                      lapack_int* ilst, lapack_int *info );
 15456  void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
 15457                      lapack_logical* wantz, const lapack_logical* select,
 15458                      lapack_int* n, float* a, lapack_int* lda, float* b,
 15459                      lapack_int* ldb, float* alphar, float* alphai, float* beta,
 15460                      float* q, lapack_int* ldq, float* z, lapack_int* ldz,
 15461                      lapack_int* m, float* pl, float* pr, float* dif,
 15462                      float* work, lapack_int* lwork, lapack_int* iwork,
 15463                      lapack_int* liwork, lapack_int *info );
 15464  void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
 15465                      lapack_logical* wantz, const lapack_logical* select,
 15466                      lapack_int* n, double* a, lapack_int* lda, double* b,
 15467                      lapack_int* ldb, double* alphar, double* alphai,
 15468                      double* beta, double* q, lapack_int* ldq, double* z,
 15469                      lapack_int* ldz, lapack_int* m, double* pl, double* pr,
 15470                      double* dif, double* work, lapack_int* lwork,
 15471                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15472  void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
 15473                      lapack_logical* wantz, const lapack_logical* select,
 15474                      lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 15475                      lapack_complex_float* b, lapack_int* ldb,
 15476                      lapack_complex_float* alpha, lapack_complex_float* beta,
 15477                      lapack_complex_float* q, lapack_int* ldq,
 15478                      lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
 15479                      float* pl, float* pr, float* dif,
 15480                      lapack_complex_float* work, lapack_int* lwork,
 15481                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15482  void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
 15483                      lapack_logical* wantz, const lapack_logical* select,
 15484                      lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 15485                      lapack_complex_double* b, lapack_int* ldb,
 15486                      lapack_complex_double* alpha, lapack_complex_double* beta,
 15487                      lapack_complex_double* q, lapack_int* ldq,
 15488                      lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
 15489                      double* pl, double* pr, double* dif,
 15490                      lapack_complex_double* work, lapack_int* lwork,
 15491                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15492  void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
 15493                      const float* a, lapack_int* lda, const float* b,
 15494                      lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
 15495                      lapack_int* ldd, const float* e, lapack_int* lde, float* f,
 15496                      lapack_int* ldf, float* scale, float* dif, float* work,
 15497                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 15498  void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
 15499                      const double* a, lapack_int* lda, const double* b,
 15500                      lapack_int* ldb, double* c, lapack_int* ldc,
 15501                      const double* d, lapack_int* ldd, const double* e,
 15502                      lapack_int* lde, double* f, lapack_int* ldf, double* scale,
 15503                      double* dif, double* work, lapack_int* lwork,
 15504                      lapack_int* iwork, lapack_int *info );
 15505  void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
 15506                      const lapack_complex_float* a, lapack_int* lda,
 15507                      const lapack_complex_float* b, lapack_int* ldb,
 15508                      lapack_complex_float* c, lapack_int* ldc,
 15509                      const lapack_complex_float* d, lapack_int* ldd,
 15510                      const lapack_complex_float* e, lapack_int* lde,
 15511                      lapack_complex_float* f, lapack_int* ldf, float* scale,
 15512                      float* dif, lapack_complex_float* work, lapack_int* lwork,
 15513                      lapack_int* iwork, lapack_int *info );
 15514  void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
 15515                      const lapack_complex_double* a, lapack_int* lda,
 15516                      const lapack_complex_double* b, lapack_int* ldb,
 15517                      lapack_complex_double* c, lapack_int* ldc,
 15518                      const lapack_complex_double* d, lapack_int* ldd,
 15519                      const lapack_complex_double* e, lapack_int* lde,
 15520                      lapack_complex_double* f, lapack_int* ldf, double* scale,
 15521                      double* dif, lapack_complex_double* work, lapack_int* lwork,
 15522                      lapack_int* iwork, lapack_int *info );
 15523  void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
 15524                      lapack_int* n, const float* a, lapack_int* lda,
 15525                      const float* b, lapack_int* ldb, const float* vl,
 15526                      lapack_int* ldvl, const float* vr, lapack_int* ldvr,
 15527                      float* s, float* dif, lapack_int* mm, lapack_int* m,
 15528                      float* work, lapack_int* lwork, lapack_int* iwork,
 15529                      lapack_int *info );
 15530  void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
 15531                      lapack_int* n, const double* a, lapack_int* lda,
 15532                      const double* b, lapack_int* ldb, const double* vl,
 15533                      lapack_int* ldvl, const double* vr, lapack_int* ldvr,
 15534                      double* s, double* dif, lapack_int* mm, lapack_int* m,
 15535                      double* work, lapack_int* lwork, lapack_int* iwork,
 15536                      lapack_int *info );
 15537  void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
 15538                      lapack_int* n, const lapack_complex_float* a,
 15539                      lapack_int* lda, const lapack_complex_float* b,
 15540                      lapack_int* ldb, const lapack_complex_float* vl,
 15541                      lapack_int* ldvl, const lapack_complex_float* vr,
 15542                      lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
 15543                      lapack_int* m, lapack_complex_float* work,
 15544                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 15545  void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
 15546                      lapack_int* n, const lapack_complex_double* a,
 15547                      lapack_int* lda, const lapack_complex_double* b,
 15548                      lapack_int* ldb, const lapack_complex_double* vl,
 15549                      lapack_int* ldvl, const lapack_complex_double* vr,
 15550                      lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
 15551                      lapack_int* m, lapack_complex_double* work,
 15552                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 15553  void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15554                      lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
 15555                      float* b, lapack_int* ldb, float* tola, float* tolb,
 15556                      lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
 15557                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
 15558                      lapack_int* iwork, float* tau, float* work,
 15559                      lapack_int *info );
 15560  void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15561                      lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
 15562                      double* b, lapack_int* ldb, double* tola, double* tolb,
 15563                      lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
 15564                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
 15565                      lapack_int* iwork, double* tau, double* work,
 15566                      lapack_int *info );
 15567  void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15568                      lapack_int* p, lapack_int* n, lapack_complex_float* a,
 15569                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
 15570                      float* tola, float* tolb, lapack_int* k, lapack_int* l,
 15571                      lapack_complex_float* u, lapack_int* ldu,
 15572                      lapack_complex_float* v, lapack_int* ldv,
 15573                      lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
 15574                      float* rwork, lapack_complex_float* tau,
 15575                      lapack_complex_float* work, lapack_int *info );
 15576  void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15577                      lapack_int* p, lapack_int* n, lapack_complex_double* a,
 15578                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
 15579                      double* tola, double* tolb, lapack_int* k, lapack_int* l,
 15580                      lapack_complex_double* u, lapack_int* ldu,
 15581                      lapack_complex_double* v, lapack_int* ldv,
 15582                      lapack_complex_double* q, lapack_int* ldq,
 15583                      lapack_int* iwork, double* rwork,
 15584                      lapack_complex_double* tau, lapack_complex_double* work,
 15585                      lapack_int *info );
 15586  void LAPACK_sggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15587                       lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
 15588                       float* b, lapack_int* ldb, float* tola, float* tolb,
 15589                       lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
 15590                       float* v, lapack_int* ldv, float* q, lapack_int* ldq,
 15591                       lapack_int* iwork, float* tau, float* work,
 15592                       lapack_int* lwork, lapack_int *info );
 15593  void LAPACK_dggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15594                       lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
 15595                       double* b, lapack_int* ldb, double* tola, double* tolb,
 15596                       lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
 15597                       double* v, lapack_int* ldv, double* q, lapack_int* ldq,
 15598                       lapack_int* iwork, double* tau, double* work,
 15599                       lapack_int* lwork, lapack_int *info );
 15600  void LAPACK_cggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15601                       lapack_int* p, lapack_int* n, lapack_complex_float* a,
 15602                       lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
 15603                       float* tola, float* tolb, lapack_int* k, lapack_int* l,
 15604                       lapack_complex_float* u, lapack_int* ldu,
 15605                       lapack_complex_float* v, lapack_int* ldv,
 15606                       lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
 15607                       float* rwork, lapack_complex_float* tau,
 15608                       lapack_complex_float* work, lapack_int* lwork,
 15609                       lapack_int *info );
 15610  void LAPACK_zggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15611                       lapack_int* p, lapack_int* n, lapack_complex_double* a,
 15612                       lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
 15613                       double* tola, double* tolb, lapack_int* k, lapack_int* l,
 15614                       lapack_complex_double* u, lapack_int* ldu,
 15615                       lapack_complex_double* v, lapack_int* ldv,
 15616                       lapack_complex_double* q, lapack_int* ldq,
 15617                       lapack_int* iwork, double* rwork,
 15618                       lapack_complex_double* tau, lapack_complex_double* work,
 15619                       lapack_int* lwork, lapack_int *info );
 15620  void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15621                      lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
 15622                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 15623                      float* tola, float* tolb, float* alpha, float* beta,
 15624                      float* u, lapack_int* ldu, float* v, lapack_int* ldv,
 15625                      float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
 15626                      lapack_int *info );
 15627  void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15628                      lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
 15629                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 15630                      double* tola, double* tolb, double* alpha, double* beta,
 15631                      double* u, lapack_int* ldu, double* v, lapack_int* ldv,
 15632                      double* q, lapack_int* ldq, double* work,
 15633                      lapack_int* ncycle, lapack_int *info );
 15634  void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15635                      lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
 15636                      lapack_complex_float* a, lapack_int* lda,
 15637                      lapack_complex_float* b, lapack_int* ldb, float* tola,
 15638                      float* tolb, float* alpha, float* beta,
 15639                      lapack_complex_float* u, lapack_int* ldu,
 15640                      lapack_complex_float* v, lapack_int* ldv,
 15641                      lapack_complex_float* q, lapack_int* ldq,
 15642                      lapack_complex_float* work, lapack_int* ncycle,
 15643                      lapack_int *info );
 15644  void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
 15645                      lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
 15646                      lapack_complex_double* a, lapack_int* lda,
 15647                      lapack_complex_double* b, lapack_int* ldb, double* tola,
 15648                      double* tolb, double* alpha, double* beta,
 15649                      lapack_complex_double* u, lapack_int* ldu,
 15650                      lapack_complex_double* v, lapack_int* ldv,
 15651                      lapack_complex_double* q, lapack_int* ldq,
 15652                      lapack_complex_double* work, lapack_int* ncycle,
 15653                      lapack_int *info );
 15654  void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15655                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
 15656                     float* work, lapack_int* lwork, lapack_int *info );
 15657  void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15658                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
 15659                     double* work, lapack_int* lwork, lapack_int *info );
 15660  void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15661                     lapack_complex_float* a, lapack_int* lda,
 15662                     lapack_complex_float* b, lapack_int* ldb,
 15663                     lapack_complex_float* work, lapack_int* lwork,
 15664                     lapack_int *info );
 15665  void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15666                     lapack_complex_double* a, lapack_int* lda,
 15667                     lapack_complex_double* b, lapack_int* ldb,
 15668                     lapack_complex_double* work, lapack_int* lwork,
 15669                     lapack_int *info );
 15670  void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
 15671                      lapack_int* lda, float* b, lapack_int* ldb,
 15672                      lapack_int* jpvt, float* rcond, lapack_int* rank,
 15673                      float* work, lapack_int* lwork, lapack_int *info );
 15674  void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
 15675                      lapack_int* lda, double* b, lapack_int* ldb,
 15676                      lapack_int* jpvt, double* rcond, lapack_int* rank,
 15677                      double* work, lapack_int* lwork, lapack_int *info );
 15678  void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15679                      lapack_complex_float* a, lapack_int* lda,
 15680                      lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
 15681                      float* rcond, lapack_int* rank, lapack_complex_float* work,
 15682                      lapack_int* lwork, float* rwork, lapack_int *info );
 15683  void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15684                      lapack_complex_double* a, lapack_int* lda,
 15685                      lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
 15686                      double* rcond, lapack_int* rank,
 15687                      lapack_complex_double* work, lapack_int* lwork,
 15688                      double* rwork, lapack_int *info );
 15689  void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
 15690                      lapack_int* lda, float* b, lapack_int* ldb, float* s,
 15691                      float* rcond, lapack_int* rank, float* work,
 15692                      lapack_int* lwork, lapack_int *info );
 15693  void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
 15694                      lapack_int* lda, double* b, lapack_int* ldb, double* s,
 15695                      double* rcond, lapack_int* rank, double* work,
 15696                      lapack_int* lwork, lapack_int *info );
 15697  void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15698                      lapack_complex_float* a, lapack_int* lda,
 15699                      lapack_complex_float* b, lapack_int* ldb, float* s,
 15700                      float* rcond, lapack_int* rank, lapack_complex_float* work,
 15701                      lapack_int* lwork, float* rwork, lapack_int *info );
 15702  void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15703                      lapack_complex_double* a, lapack_int* lda,
 15704                      lapack_complex_double* b, lapack_int* ldb, double* s,
 15705                      double* rcond, lapack_int* rank,
 15706                      lapack_complex_double* work, lapack_int* lwork,
 15707                      double* rwork, lapack_int *info );
 15708  void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
 15709                      lapack_int* lda, float* b, lapack_int* ldb, float* s,
 15710                      float* rcond, lapack_int* rank, float* work,
 15711                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 15712  void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
 15713                      lapack_int* lda, double* b, lapack_int* ldb, double* s,
 15714                      double* rcond, lapack_int* rank, double* work,
 15715                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 15716  void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15717                      lapack_complex_float* a, lapack_int* lda,
 15718                      lapack_complex_float* b, lapack_int* ldb, float* s,
 15719                      float* rcond, lapack_int* rank, lapack_complex_float* work,
 15720                      lapack_int* lwork, float* rwork, lapack_int* iwork,
 15721                      lapack_int *info );
 15722  void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
 15723                      lapack_complex_double* a, lapack_int* lda,
 15724                      lapack_complex_double* b, lapack_int* ldb, double* s,
 15725                      double* rcond, lapack_int* rank,
 15726                      lapack_complex_double* work, lapack_int* lwork,
 15727                      double* rwork, lapack_int* iwork, lapack_int *info );
 15728  void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
 15729                      lapack_int* lda, float* b, lapack_int* ldb, float* c,
 15730                      float* d, float* x, float* work, lapack_int* lwork,
 15731                      lapack_int *info );
 15732  void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
 15733                      lapack_int* lda, double* b, lapack_int* ldb, double* c,
 15734                      double* d, double* x, double* work, lapack_int* lwork,
 15735                      lapack_int *info );
 15736  void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
 15737                      lapack_complex_float* a, lapack_int* lda,
 15738                      lapack_complex_float* b, lapack_int* ldb,
 15739                      lapack_complex_float* c, lapack_complex_float* d,
 15740                      lapack_complex_float* x, lapack_complex_float* work,
 15741                      lapack_int* lwork, lapack_int *info );
 15742  void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
 15743                      lapack_complex_double* a, lapack_int* lda,
 15744                      lapack_complex_double* b, lapack_int* ldb,
 15745                      lapack_complex_double* c, lapack_complex_double* d,
 15746                      lapack_complex_double* x, lapack_complex_double* work,
 15747                      lapack_int* lwork, lapack_int *info );
 15748  void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
 15749                      lapack_int* lda, float* b, lapack_int* ldb, float* d,
 15750                      float* x, float* y, float* work, lapack_int* lwork,
 15751                      lapack_int *info );
 15752  void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
 15753                      lapack_int* lda, double* b, lapack_int* ldb, double* d,
 15754                      double* x, double* y, double* work, lapack_int* lwork,
 15755                      lapack_int *info );
 15756  void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
 15757                      lapack_complex_float* a, lapack_int* lda,
 15758                      lapack_complex_float* b, lapack_int* ldb,
 15759                      lapack_complex_float* d, lapack_complex_float* x,
 15760                      lapack_complex_float* y, lapack_complex_float* work,
 15761                      lapack_int* lwork, lapack_int *info );
 15762  void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
 15763                      lapack_complex_double* a, lapack_int* lda,
 15764                      lapack_complex_double* b, lapack_int* ldb,
 15765                      lapack_complex_double* d, lapack_complex_double* x,
 15766                      lapack_complex_double* y, lapack_complex_double* work,
 15767                      lapack_int* lwork, lapack_int *info );
 15768  void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
 15769                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
 15770                     lapack_int *info );
 15771  void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
 15772                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
 15773                     lapack_int *info );
 15774  void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
 15775                     lapack_complex_float* a, lapack_int* lda, float* w,
 15776                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 15777                     lapack_int *info );
 15778  void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
 15779                     lapack_complex_double* a, lapack_int* lda, double* w,
 15780                     lapack_complex_double* work, lapack_int* lwork,
 15781                     double* rwork, lapack_int *info );
 15782  void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
 15783                      lapack_int* lda, float* w, float* work, lapack_int* lwork,
 15784                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15785  void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
 15786                      lapack_int* lda, double* w, double* work, lapack_int* lwork,
 15787                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15788  void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
 15789                      lapack_complex_float* a, lapack_int* lda, float* w,
 15790                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 15791                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 15792                      lapack_int *info );
 15793  void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
 15794                      lapack_complex_double* a, lapack_int* lda, double* w,
 15795                      lapack_complex_double* work, lapack_int* lwork,
 15796                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 15797                      lapack_int* liwork, lapack_int *info );
 15798  void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15799                      float* a, lapack_int* lda, float* vl, float* vu,
 15800                      lapack_int* il, lapack_int* iu, float* abstol,
 15801                      lapack_int* m, float* w, float* z, lapack_int* ldz,
 15802                      float* work, lapack_int* lwork, lapack_int* iwork,
 15803                      lapack_int* ifail, lapack_int *info );
 15804  void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15805                      double* a, lapack_int* lda, double* vl, double* vu,
 15806                      lapack_int* il, lapack_int* iu, double* abstol,
 15807                      lapack_int* m, double* w, double* z, lapack_int* ldz,
 15808                      double* work, lapack_int* lwork, lapack_int* iwork,
 15809                      lapack_int* ifail, lapack_int *info );
 15810  void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15811                      lapack_complex_float* a, lapack_int* lda, float* vl,
 15812                      float* vu, lapack_int* il, lapack_int* iu, float* abstol,
 15813                      lapack_int* m, float* w, lapack_complex_float* z,
 15814                      lapack_int* ldz, lapack_complex_float* work,
 15815                      lapack_int* lwork, float* rwork, lapack_int* iwork,
 15816                      lapack_int* ifail, lapack_int *info );
 15817  void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15818                      lapack_complex_double* a, lapack_int* lda, double* vl,
 15819                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 15820                      lapack_int* m, double* w, lapack_complex_double* z,
 15821                      lapack_int* ldz, lapack_complex_double* work,
 15822                      lapack_int* lwork, double* rwork, lapack_int* iwork,
 15823                      lapack_int* ifail, lapack_int *info );
 15824  void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
 15825                      float* a, lapack_int* lda, float* vl, float* vu,
 15826                      lapack_int* il, lapack_int* iu, float* abstol,
 15827                      lapack_int* m, float* w, float* z, lapack_int* ldz,
 15828                      lapack_int* isuppz, float* work, lapack_int* lwork,
 15829                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15830  void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
 15831                      double* a, lapack_int* lda, double* vl, double* vu,
 15832                      lapack_int* il, lapack_int* iu, double* abstol,
 15833                      lapack_int* m, double* w, double* z, lapack_int* ldz,
 15834                      lapack_int* isuppz, double* work, lapack_int* lwork,
 15835                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15836  void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
 15837                      lapack_complex_float* a, lapack_int* lda, float* vl,
 15838                      float* vu, lapack_int* il, lapack_int* iu, float* abstol,
 15839                      lapack_int* m, float* w, lapack_complex_float* z,
 15840                      lapack_int* ldz, lapack_int* isuppz,
 15841                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 15842                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 15843                      lapack_int *info );
 15844  void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
 15845                      lapack_complex_double* a, lapack_int* lda, double* vl,
 15846                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 15847                      lapack_int* m, double* w, lapack_complex_double* z,
 15848                      lapack_int* ldz, lapack_int* isuppz,
 15849                      lapack_complex_double* work, lapack_int* lwork,
 15850                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 15851                      lapack_int* liwork, lapack_int *info );
 15852  void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
 15853                     float* z, lapack_int* ldz, float* work, lapack_int *info );
 15854  void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
 15855                     double* z, lapack_int* ldz, double* work, lapack_int *info );
 15856  void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
 15857                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
 15858                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
 15859                     lapack_int *info );
 15860  void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
 15861                     lapack_complex_double* ap, double* w,
 15862                     lapack_complex_double* z, lapack_int* ldz,
 15863                     lapack_complex_double* work, double* rwork,
 15864                     lapack_int *info );
 15865  void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
 15866                      float* z, lapack_int* ldz, float* work, lapack_int* lwork,
 15867                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15868  void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
 15869                      double* w, double* z, lapack_int* ldz, double* work,
 15870                      lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
 15871                      lapack_int *info );
 15872  void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
 15873                      lapack_complex_float* ap, float* w, lapack_complex_float* z,
 15874                      lapack_int* ldz, lapack_complex_float* work,
 15875                      lapack_int* lwork, float* rwork, lapack_int* lrwork,
 15876                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15877  void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
 15878                      lapack_complex_double* ap, double* w,
 15879                      lapack_complex_double* z, lapack_int* ldz,
 15880                      lapack_complex_double* work, lapack_int* lwork,
 15881                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 15882                      lapack_int* liwork, lapack_int *info );
 15883  void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15884                      float* ap, float* vl, float* vu, lapack_int* il,
 15885                      lapack_int* iu, float* abstol, lapack_int* m, float* w,
 15886                      float* z, lapack_int* ldz, float* work, lapack_int* iwork,
 15887                      lapack_int* ifail, lapack_int *info );
 15888  void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15889                      double* ap, double* vl, double* vu, lapack_int* il,
 15890                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 15891                      double* z, lapack_int* ldz, double* work, lapack_int* iwork,
 15892                      lapack_int* ifail, lapack_int *info );
 15893  void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15894                      lapack_complex_float* ap, float* vl, float* vu,
 15895                      lapack_int* il, lapack_int* iu, float* abstol,
 15896                      lapack_int* m, float* w, lapack_complex_float* z,
 15897                      lapack_int* ldz, lapack_complex_float* work, float* rwork,
 15898                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 15899  void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15900                      lapack_complex_double* ap, double* vl, double* vu,
 15901                      lapack_int* il, lapack_int* iu, double* abstol,
 15902                      lapack_int* m, double* w, lapack_complex_double* z,
 15903                      lapack_int* ldz, lapack_complex_double* work, double* rwork,
 15904                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 15905  void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15906                     float* ab, lapack_int* ldab, float* w, float* z,
 15907                     lapack_int* ldz, float* work, lapack_int *info );
 15908  void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15909                     double* ab, lapack_int* ldab, double* w, double* z,
 15910                     lapack_int* ldz, double* work, lapack_int *info );
 15911  void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15912                     lapack_complex_float* ab, lapack_int* ldab, float* w,
 15913                     lapack_complex_float* z, lapack_int* ldz,
 15914                     lapack_complex_float* work, float* rwork, lapack_int *info );
 15915  void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15916                     lapack_complex_double* ab, lapack_int* ldab, double* w,
 15917                     lapack_complex_double* z, lapack_int* ldz,
 15918                     lapack_complex_double* work, double* rwork,
 15919                     lapack_int *info );
 15920  void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15921                      float* ab, lapack_int* ldab, float* w, float* z,
 15922                      lapack_int* ldz, float* work, lapack_int* lwork,
 15923                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15924  void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15925                      double* ab, lapack_int* ldab, double* w, double* z,
 15926                      lapack_int* ldz, double* work, lapack_int* lwork,
 15927                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15928  void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15929                      lapack_complex_float* ab, lapack_int* ldab, float* w,
 15930                      lapack_complex_float* z, lapack_int* ldz,
 15931                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 15932                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 15933                      lapack_int *info );
 15934  void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
 15935                      lapack_complex_double* ab, lapack_int* ldab, double* w,
 15936                      lapack_complex_double* z, lapack_int* ldz,
 15937                      lapack_complex_double* work, lapack_int* lwork,
 15938                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 15939                      lapack_int* liwork, lapack_int *info );
 15940  void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15941                      lapack_int* kd, float* ab, lapack_int* ldab, float* q,
 15942                      lapack_int* ldq, float* vl, float* vu, lapack_int* il,
 15943                      lapack_int* iu, float* abstol, lapack_int* m, float* w,
 15944                      float* z, lapack_int* ldz, float* work, lapack_int* iwork,
 15945                      lapack_int* ifail, lapack_int *info );
 15946  void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15947                      lapack_int* kd, double* ab, lapack_int* ldab, double* q,
 15948                      lapack_int* ldq, double* vl, double* vu, lapack_int* il,
 15949                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 15950                      double* z, lapack_int* ldz, double* work, lapack_int* iwork,
 15951                      lapack_int* ifail, lapack_int *info );
 15952  void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15953                      lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
 15954                      lapack_complex_float* q, lapack_int* ldq, float* vl,
 15955                      float* vu, lapack_int* il, lapack_int* iu, float* abstol,
 15956                      lapack_int* m, float* w, lapack_complex_float* z,
 15957                      lapack_int* ldz, lapack_complex_float* work, float* rwork,
 15958                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 15959  void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
 15960                      lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
 15961                      lapack_complex_double* q, lapack_int* ldq, double* vl,
 15962                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 15963                      lapack_int* m, double* w, lapack_complex_double* z,
 15964                      lapack_int* ldz, lapack_complex_double* work, double* rwork,
 15965                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 15966  void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
 15967                     lapack_int* ldz, float* work, lapack_int *info );
 15968  void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
 15969                     lapack_int* ldz, double* work, lapack_int *info );
 15970  void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
 15971                      lapack_int* ldz, float* work, lapack_int* lwork,
 15972                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15973  void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
 15974                      lapack_int* ldz, double* work, lapack_int* lwork,
 15975                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 15976  void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
 15977                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 15978                      float* abstol, lapack_int* m, float* w, float* z,
 15979                      lapack_int* ldz, float* work, lapack_int* iwork,
 15980                      lapack_int* ifail, lapack_int *info );
 15981  void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
 15982                      double* e, double* vl, double* vu, lapack_int* il,
 15983                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 15984                      double* z, lapack_int* ldz, double* work, lapack_int* iwork,
 15985                      lapack_int* ifail, lapack_int *info );
 15986  void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
 15987                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 15988                      float* abstol, lapack_int* m, float* w, float* z,
 15989                      lapack_int* ldz, lapack_int* isuppz, float* work,
 15990                      lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
 15991                      lapack_int *info );
 15992  void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
 15993                      double* e, double* vl, double* vu, lapack_int* il,
 15994                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 15995                      double* z, lapack_int* ldz, lapack_int* isuppz,
 15996                      double* work, lapack_int* lwork, lapack_int* iwork,
 15997                      lapack_int* liwork, lapack_int *info );
 15998  void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
 15999                     lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
 16000                     float* wr, float* wi, float* vs, lapack_int* ldvs,
 16001                     float* work, lapack_int* lwork, lapack_logical* bwork,
 16002                     lapack_int *info );
 16003  void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
 16004                     lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
 16005                     double* wr, double* wi, double* vs, lapack_int* ldvs,
 16006                     double* work, lapack_int* lwork, lapack_logical* bwork,
 16007                     lapack_int *info );
 16008  void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
 16009                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 16010                     lapack_int* sdim, lapack_complex_float* w,
 16011                     lapack_complex_float* vs, lapack_int* ldvs,
 16012                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16013                     lapack_logical* bwork, lapack_int *info );
 16014  void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
 16015                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 16016                     lapack_int* sdim, lapack_complex_double* w,
 16017                     lapack_complex_double* vs, lapack_int* ldvs,
 16018                     lapack_complex_double* work, lapack_int* lwork,
 16019                     double* rwork, lapack_logical* bwork, lapack_int *info );
 16020  void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
 16021                      char* sense, lapack_int* n, float* a, lapack_int* lda,
 16022                      lapack_int* sdim, float* wr, float* wi, float* vs,
 16023                      lapack_int* ldvs, float* rconde, float* rcondv, float* work,
 16024                      lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
 16025                      lapack_logical* bwork, lapack_int *info );
 16026  void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
 16027                      char* sense, lapack_int* n, double* a, lapack_int* lda,
 16028                      lapack_int* sdim, double* wr, double* wi, double* vs,
 16029                      lapack_int* ldvs, double* rconde, double* rcondv,
 16030                      double* work, lapack_int* lwork, lapack_int* iwork,
 16031                      lapack_int* liwork, lapack_logical* bwork,
 16032                      lapack_int *info );
 16033  void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
 16034                      char* sense, lapack_int* n, lapack_complex_float* a,
 16035                      lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
 16036                      lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
 16037                      float* rcondv, lapack_complex_float* work,
 16038                      lapack_int* lwork, float* rwork, lapack_logical* bwork,
 16039                      lapack_int *info );
 16040  void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
 16041                      char* sense, lapack_int* n, lapack_complex_double* a,
 16042                      lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
 16043                      lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
 16044                      double* rcondv, lapack_complex_double* work,
 16045                      lapack_int* lwork, double* rwork, lapack_logical* bwork,
 16046                      lapack_int *info );
 16047  void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
 16048                     lapack_int* lda, float* wr, float* wi, float* vl,
 16049                     lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
 16050                     lapack_int* lwork, lapack_int *info );
 16051  void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
 16052                     lapack_int* lda, double* wr, double* wi, double* vl,
 16053                     lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
 16054                     lapack_int* lwork, lapack_int *info );
 16055  void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
 16056                     lapack_complex_float* a, lapack_int* lda,
 16057                     lapack_complex_float* w, lapack_complex_float* vl,
 16058                     lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
 16059                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16060                     lapack_int *info );
 16061  void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
 16062                     lapack_complex_double* a, lapack_int* lda,
 16063                     lapack_complex_double* w, lapack_complex_double* vl,
 16064                     lapack_int* ldvl, lapack_complex_double* vr,
 16065                     lapack_int* ldvr, lapack_complex_double* work,
 16066                     lapack_int* lwork, double* rwork, lapack_int *info );
 16067  void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16068                      lapack_int* n, float* a, lapack_int* lda, float* wr,
 16069                      float* wi, float* vl, lapack_int* ldvl, float* vr,
 16070                      lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
 16071                      float* scale, float* abnrm, float* rconde, float* rcondv,
 16072                      float* work, lapack_int* lwork, lapack_int* iwork,
 16073                      lapack_int *info );
 16074  void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16075                      lapack_int* n, double* a, lapack_int* lda, double* wr,
 16076                      double* wi, double* vl, lapack_int* ldvl, double* vr,
 16077                      lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
 16078                      double* scale, double* abnrm, double* rconde,
 16079                      double* rcondv, double* work, lapack_int* lwork,
 16080                      lapack_int* iwork, lapack_int *info );
 16081  void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16082                      lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 16083                      lapack_complex_float* w, lapack_complex_float* vl,
 16084                      lapack_int* ldvl, lapack_complex_float* vr,
 16085                      lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
 16086                      float* scale, float* abnrm, float* rconde, float* rcondv,
 16087                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16088                      lapack_int *info );
 16089  void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16090                      lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 16091                      lapack_complex_double* w, lapack_complex_double* vl,
 16092                      lapack_int* ldvl, lapack_complex_double* vr,
 16093                      lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
 16094                      double* scale, double* abnrm, double* rconde,
 16095                      double* rcondv, lapack_complex_double* work,
 16096                      lapack_int* lwork, double* rwork, lapack_int *info );
 16097  void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
 16098                      float* a, lapack_int* lda, float* s, float* u,
 16099                      lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
 16100                      lapack_int* lwork, lapack_int *info );
 16101  void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
 16102                      double* a, lapack_int* lda, double* s, double* u,
 16103                      lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
 16104                      lapack_int* lwork, lapack_int *info );
 16105  void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
 16106                      lapack_complex_float* a, lapack_int* lda, float* s,
 16107                      lapack_complex_float* u, lapack_int* ldu,
 16108                      lapack_complex_float* vt, lapack_int* ldvt,
 16109                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16110                      lapack_int *info );
 16111  void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
 16112                      lapack_complex_double* a, lapack_int* lda, double* s,
 16113                      lapack_complex_double* u, lapack_int* ldu,
 16114                      lapack_complex_double* vt, lapack_int* ldvt,
 16115                      lapack_complex_double* work, lapack_int* lwork,
 16116                      double* rwork, lapack_int *info );
 16117  void LAPACK_sgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
 16118                      float* a, lapack_int* lda, lapack_int* vl, lapack_int* vu,
 16119                      lapack_int* il, lapack_int* iu, lapack_int* ns, float* s, float* u,
 16120                      lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
 16121                      lapack_int* lwork, lapack_int *iwork, lapack_int *info );
 16122  void LAPACK_dgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
 16123                      double* a, lapack_int* lda, lapack_int* vl, lapack_int* vu,
 16124                      lapack_int* il, lapack_int* iu, lapack_int* ns, double* s, double* u,
 16125                      lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
 16126                      lapack_int* lwork, lapack_int *iwork, lapack_int *info );
 16127  void LAPACK_cgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
 16128                      lapack_complex_float* a, lapack_int* lda, lapack_int* vl, lapack_int* vu,
 16129                      lapack_int* il, lapack_int* iu, lapack_int* ns, float* s,
 16130                      lapack_complex_float* u, lapack_int* ldu,
 16131                      lapack_complex_float* vt, lapack_int* ldvt,
 16132                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16133                      lapack_int *iwork, lapack_int *info );
 16134  void LAPACK_zgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
 16135                      lapack_complex_double* a, lapack_int* lda, lapack_int* vl, lapack_int* vu,
 16136                      lapack_int* il, lapack_int* iu, lapack_int* ns, double* s,
 16137                      lapack_complex_double* u, lapack_int* ldu,
 16138                      lapack_complex_double* vt, lapack_int* ldvt,
 16139                      lapack_complex_double* work, lapack_int* lwork,
 16140                      double* rwork, lapack_int *iwork, lapack_int *info );               
 16141  void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
 16142                      lapack_int* lda, float* s, float* u, lapack_int* ldu,
 16143                      float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
 16144                      lapack_int* iwork, lapack_int *info );
 16145  void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
 16146                      lapack_int* lda, double* s, double* u, lapack_int* ldu,
 16147                      double* vt, lapack_int* ldvt, double* work,
 16148                      lapack_int* lwork, lapack_int* iwork, lapack_int *info );
 16149  void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
 16150                      lapack_complex_float* a, lapack_int* lda, float* s,
 16151                      lapack_complex_float* u, lapack_int* ldu,
 16152                      lapack_complex_float* vt, lapack_int* ldvt,
 16153                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16154                      lapack_int* iwork, lapack_int *info );
 16155  void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
 16156                      lapack_complex_double* a, lapack_int* lda, double* s,
 16157                      lapack_complex_double* u, lapack_int* ldu,
 16158                      lapack_complex_double* vt, lapack_int* ldvt,
 16159                      lapack_complex_double* work, lapack_int* lwork,
 16160                      double* rwork, lapack_int* iwork, lapack_int *info );
 16161  void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
 16162                      char* jobp, lapack_int* m, lapack_int* n, double* a,
 16163                      lapack_int* lda, double* sva, double* u, lapack_int* ldu,
 16164                      double* v, lapack_int* ldv, double* work, lapack_int* lwork,
 16165                      lapack_int* iwork, lapack_int *info );
 16166  void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
 16167                      char* jobp, lapack_int* m, lapack_int* n, float* a,
 16168                      lapack_int* lda, float* sva, float* u, lapack_int* ldu,
 16169                      float* v, lapack_int* ldv, float* work, lapack_int* lwork,
 16170                      lapack_int* iwork, lapack_int *info );
 16171  void LAPACK_cgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
 16172                      char* jobp, lapack_int* m, lapack_int* n, lapack_complex_float* a,
 16173                      lapack_int* lda, float* sva, lapack_complex_float* u, lapack_int* ldu,
 16174                      lapack_complex_float* v, lapack_int* ldv, lapack_complex_float* cwork, 
 16175                      lapack_int* lwork, float* work, lapack_int* lrwork,
 16176                      lapack_int* iwork, lapack_int *info );
 16177  void LAPACK_zgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
 16178                      char* jobp, lapack_int* m, lapack_int* n, lapack_complex_double* a,
 16179                      lapack_int* lda, double* sva, lapack_complex_double* u, lapack_int* ldu,
 16180                      lapack_complex_double* v, lapack_int* ldv, lapack_complex_double* cwork, 
 16181                      lapack_int* lwork, double* work, lapack_int* lrwork,
 16182                      lapack_int* iwork, lapack_int *info );
 16183  void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
 16184                      lapack_int* n, double* a, lapack_int* lda, double* sva,
 16185                      lapack_int* mv, double* v, lapack_int* ldv, double* work,
 16186                      lapack_int* lwork, lapack_int *info );
 16187  void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
 16188                      lapack_int* n, float* a, lapack_int* lda, float* sva,
 16189                      lapack_int* mv, float* v, lapack_int* ldv, float* work,
 16190                      lapack_int* lwork, lapack_int *info );
 16191  void LAPACK_cgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
 16192                      lapack_int* n, lapack_complex_float* a, lapack_int* lda, float* sva,
 16193                      lapack_int* mv, lapack_complex_float* v, lapack_int* ldv, 
 16194                      lapack_complex_float* cwork, lapack_int* lwork, float* rwork, 
 16195                      lapack_int* lrwork, lapack_int *info );
 16196  void LAPACK_zgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
 16197                      lapack_int* n, lapack_complex_double* a, lapack_int* lda, double* sva,
 16198                      lapack_int* mv, lapack_complex_double* v, lapack_int* ldv, 
 16199                      lapack_complex_double* cwork, lapack_int* lwork, double* rwork,
 16200                      lapack_int* lrwork, lapack_int *info );
 16201  void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16202                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16203                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16204                      float* alpha, float* beta, float* u, lapack_int* ldu,
 16205                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
 16206                      float* work, lapack_int* iwork, lapack_int *info );
 16207  void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16208                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16209                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 16210                      double* alpha, double* beta, double* u, lapack_int* ldu,
 16211                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
 16212                      double* work, lapack_int* iwork, lapack_int *info );
 16213  void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16214                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16215                      lapack_complex_float* a, lapack_int* lda,
 16216                      lapack_complex_float* b, lapack_int* ldb, float* alpha,
 16217                      float* beta, lapack_complex_float* u, lapack_int* ldu,
 16218                      lapack_complex_float* v, lapack_int* ldv,
 16219                      lapack_complex_float* q, lapack_int* ldq,
 16220                      lapack_complex_float* work, float* rwork, lapack_int* iwork,
 16221                      lapack_int *info );
 16222  void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16223                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16224                      lapack_complex_double* a, lapack_int* lda,
 16225                      lapack_complex_double* b, lapack_int* ldb, double* alpha,
 16226                      double* beta, lapack_complex_double* u, lapack_int* ldu,
 16227                      lapack_complex_double* v, lapack_int* ldv,
 16228                      lapack_complex_double* q, lapack_int* ldq,
 16229                      lapack_complex_double* work, double* rwork,
 16230                      lapack_int* iwork, lapack_int *info );
 16231  void LAPACK_sggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16232                       lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16233                       float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16234                       float* alpha, float* beta, float* u, lapack_int* ldu,
 16235                       float* v, lapack_int* ldv, float* q, lapack_int* ldq,
 16236                       float* work, lapack_int* lwork, lapack_int* iwork,
 16237                       lapack_int *info );
 16238  void LAPACK_dggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16239                       lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16240                       double* a, lapack_int* lda, double* b, lapack_int* ldb,
 16241                       double* alpha, double* beta, double* u, lapack_int* ldu,
 16242                       double* v, lapack_int* ldv, double* q, lapack_int* ldq,
 16243                       double* work, lapack_int* lwork, lapack_int* iwork,
 16244                       lapack_int *info );
 16245  void LAPACK_cggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16246                       lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16247                       lapack_complex_float* a, lapack_int* lda,
 16248                       lapack_complex_float* b, lapack_int* ldb, float* alpha,
 16249                       float* beta, lapack_complex_float* u, lapack_int* ldu,
 16250                       lapack_complex_float* v, lapack_int* ldv,
 16251                       lapack_complex_float* q, lapack_int* ldq,
 16252                       lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16253                       lapack_int* iwork, lapack_int *info );
 16254  void LAPACK_zggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
 16255                       lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
 16256                       lapack_complex_double* a, lapack_int* lda,
 16257                       lapack_complex_double* b, lapack_int* ldb, double* alpha,
 16258                       double* beta, lapack_complex_double* u, lapack_int* ldu,
 16259                       lapack_complex_double* v, lapack_int* ldv,
 16260                       lapack_complex_double* q, lapack_int* ldq,
 16261                       lapack_complex_double* work, lapack_int* lwork,
 16262                       double* rwork, lapack_int* iwork, lapack_int *info );
 16263  void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16264                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16265                     float* w, float* work, lapack_int* lwork, lapack_int *info );
 16266  void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16267                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
 16268                     double* w, double* work, lapack_int* lwork,
 16269                     lapack_int *info );
 16270  void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16271                     lapack_complex_float* a, lapack_int* lda,
 16272                     lapack_complex_float* b, lapack_int* ldb, float* w,
 16273                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16274                     lapack_int *info );
 16275  void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16276                     lapack_complex_double* a, lapack_int* lda,
 16277                     lapack_complex_double* b, lapack_int* ldb, double* w,
 16278                     lapack_complex_double* work, lapack_int* lwork,
 16279                     double* rwork, lapack_int *info );
 16280  void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16281                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16282                      float* w, float* work, lapack_int* lwork, lapack_int* iwork,
 16283                      lapack_int* liwork, lapack_int *info );
 16284  void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16285                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 16286                      double* w, double* work, lapack_int* lwork,
 16287                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 16288  void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16289                      lapack_complex_float* a, lapack_int* lda,
 16290                      lapack_complex_float* b, lapack_int* ldb, float* w,
 16291                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16292                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 16293                      lapack_int *info );
 16294  void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16295                      lapack_complex_double* a, lapack_int* lda,
 16296                      lapack_complex_double* b, lapack_int* ldb, double* w,
 16297                      lapack_complex_double* work, lapack_int* lwork,
 16298                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 16299                      lapack_int* liwork, lapack_int *info );
 16300  void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16301                      lapack_int* n, float* a, lapack_int* lda, float* b,
 16302                      lapack_int* ldb, float* vl, float* vu, lapack_int* il,
 16303                      lapack_int* iu, float* abstol, lapack_int* m, float* w,
 16304                      float* z, lapack_int* ldz, float* work, lapack_int* lwork,
 16305                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 16306  void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16307                      lapack_int* n, double* a, lapack_int* lda, double* b,
 16308                      lapack_int* ldb, double* vl, double* vu, lapack_int* il,
 16309                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 16310                      double* z, lapack_int* ldz, double* work, lapack_int* lwork,
 16311                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 16312  void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16313                      lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 16314                      lapack_complex_float* b, lapack_int* ldb, float* vl,
 16315                      float* vu, lapack_int* il, lapack_int* iu, float* abstol,
 16316                      lapack_int* m, float* w, lapack_complex_float* z,
 16317                      lapack_int* ldz, lapack_complex_float* work,
 16318                      lapack_int* lwork, float* rwork, lapack_int* iwork,
 16319                      lapack_int* ifail, lapack_int *info );
 16320  void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16321                      lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 16322                      lapack_complex_double* b, lapack_int* ldb, double* vl,
 16323                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 16324                      lapack_int* m, double* w, lapack_complex_double* z,
 16325                      lapack_int* ldz, lapack_complex_double* work,
 16326                      lapack_int* lwork, double* rwork, lapack_int* iwork,
 16327                      lapack_int* ifail, lapack_int *info );
 16328  void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16329                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
 16330                     float* work, lapack_int *info );
 16331  void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16332                     double* ap, double* bp, double* w, double* z,
 16333                     lapack_int* ldz, double* work, lapack_int *info );
 16334  void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16335                     lapack_complex_float* ap, lapack_complex_float* bp, float* w,
 16336                     lapack_complex_float* z, lapack_int* ldz,
 16337                     lapack_complex_float* work, float* rwork, lapack_int *info );
 16338  void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16339                     lapack_complex_double* ap, lapack_complex_double* bp,
 16340                     double* w, lapack_complex_double* z, lapack_int* ldz,
 16341                     lapack_complex_double* work, double* rwork,
 16342                     lapack_int *info );
 16343  void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16344                      float* ap, float* bp, float* w, float* z, lapack_int* ldz,
 16345                      float* work, lapack_int* lwork, lapack_int* iwork,
 16346                      lapack_int* liwork, lapack_int *info );
 16347  void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16348                      double* ap, double* bp, double* w, double* z,
 16349                      lapack_int* ldz, double* work, lapack_int* lwork,
 16350                      lapack_int* iwork, lapack_int* liwork, lapack_int *info );
 16351  void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16352                      lapack_complex_float* ap, lapack_complex_float* bp,
 16353                      float* w, lapack_complex_float* z, lapack_int* ldz,
 16354                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16355                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 16356                      lapack_int *info );
 16357  void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
 16358                      lapack_complex_double* ap, lapack_complex_double* bp,
 16359                      double* w, lapack_complex_double* z, lapack_int* ldz,
 16360                      lapack_complex_double* work, lapack_int* lwork,
 16361                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 16362                      lapack_int* liwork, lapack_int *info );
 16363  void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16364                      lapack_int* n, float* ap, float* bp, float* vl, float* vu,
 16365                      lapack_int* il, lapack_int* iu, float* abstol,
 16366                      lapack_int* m, float* w, float* z, lapack_int* ldz,
 16367                      float* work, lapack_int* iwork, lapack_int* ifail,
 16368                      lapack_int *info );
 16369  void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16370                      lapack_int* n, double* ap, double* bp, double* vl,
 16371                      double* vu, lapack_int* il, lapack_int* iu, double* abstol,
 16372                      lapack_int* m, double* w, double* z, lapack_int* ldz,
 16373                      double* work, lapack_int* iwork, lapack_int* ifail,
 16374                      lapack_int *info );
 16375  void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16376                      lapack_int* n, lapack_complex_float* ap,
 16377                      lapack_complex_float* bp, float* vl, float* vu,
 16378                      lapack_int* il, lapack_int* iu, float* abstol,
 16379                      lapack_int* m, float* w, lapack_complex_float* z,
 16380                      lapack_int* ldz, lapack_complex_float* work, float* rwork,
 16381                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 16382  void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
 16383                      lapack_int* n, lapack_complex_double* ap,
 16384                      lapack_complex_double* bp, double* vl, double* vu,
 16385                      lapack_int* il, lapack_int* iu, double* abstol,
 16386                      lapack_int* m, double* w, lapack_complex_double* z,
 16387                      lapack_int* ldz, lapack_complex_double* work, double* rwork,
 16388                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 16389  void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16390                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
 16391                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
 16392                     float* work, lapack_int *info );
 16393  void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16394                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
 16395                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
 16396                     double* work, lapack_int *info );
 16397  void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16398                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
 16399                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
 16400                     lapack_complex_float* z, lapack_int* ldz,
 16401                     lapack_complex_float* work, float* rwork, lapack_int *info );
 16402  void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16403                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
 16404                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
 16405                     lapack_complex_double* z, lapack_int* ldz,
 16406                     lapack_complex_double* work, double* rwork,
 16407                     lapack_int *info );
 16408  void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16409                      lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
 16410                      lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
 16411                      float* work, lapack_int* lwork, lapack_int* iwork,
 16412                      lapack_int* liwork, lapack_int *info );
 16413  void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16414                      lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
 16415                      lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
 16416                      double* work, lapack_int* lwork, lapack_int* iwork,
 16417                      lapack_int* liwork, lapack_int *info );
 16418  void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16419                      lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
 16420                      lapack_complex_float* bb, lapack_int* ldbb, float* w,
 16421                      lapack_complex_float* z, lapack_int* ldz,
 16422                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16423                      lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
 16424                      lapack_int *info );
 16425  void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
 16426                      lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
 16427                      lapack_complex_double* bb, lapack_int* ldbb, double* w,
 16428                      lapack_complex_double* z, lapack_int* ldz,
 16429                      lapack_complex_double* work, lapack_int* lwork,
 16430                      double* rwork, lapack_int* lrwork, lapack_int* iwork,
 16431                      lapack_int* liwork, lapack_int *info );
 16432  void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
 16433                      lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
 16434                      float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
 16435                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 16436                      float* abstol, lapack_int* m, float* w, float* z,
 16437                      lapack_int* ldz, float* work, lapack_int* iwork,
 16438                      lapack_int* ifail, lapack_int *info );
 16439  void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
 16440                      lapack_int* ka, lapack_int* kb, double* ab,
 16441                      lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
 16442                      lapack_int* ldq, double* vl, double* vu, lapack_int* il,
 16443                      lapack_int* iu, double* abstol, lapack_int* m, double* w,
 16444                      double* z, lapack_int* ldz, double* work, lapack_int* iwork,
 16445                      lapack_int* ifail, lapack_int *info );
 16446  void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
 16447                      lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
 16448                      lapack_int* ldab, lapack_complex_float* bb,
 16449                      lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
 16450                      float* vl, float* vu, lapack_int* il, lapack_int* iu,
 16451                      float* abstol, lapack_int* m, float* w,
 16452                      lapack_complex_float* z, lapack_int* ldz,
 16453                      lapack_complex_float* work, float* rwork, lapack_int* iwork,
 16454                      lapack_int* ifail, lapack_int *info );
 16455  void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
 16456                      lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
 16457                      lapack_int* ldab, lapack_complex_double* bb,
 16458                      lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
 16459                      double* vl, double* vu, lapack_int* il, lapack_int* iu,
 16460                      double* abstol, lapack_int* m, double* w,
 16461                      lapack_complex_double* z, lapack_int* ldz,
 16462                      lapack_complex_double* work, double* rwork,
 16463                      lapack_int* iwork, lapack_int* ifail, lapack_int *info );
 16464  void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
 16465                     LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
 16466                     lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
 16467                     float* alphar, float* alphai, float* beta, float* vsl,
 16468                     lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
 16469                     float* work, lapack_int* lwork, lapack_logical* bwork,
 16470                     lapack_int *info );
 16471  void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
 16472                     LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
 16473                     lapack_int* lda, double* b, lapack_int* ldb,
 16474                     lapack_int* sdim, double* alphar, double* alphai,
 16475                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
 16476                     lapack_int* ldvsr, double* work, lapack_int* lwork,
 16477                     lapack_logical* bwork, lapack_int *info );
 16478  void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
 16479                     LAPACK_C_SELECT2 selctg, lapack_int* n,
 16480                     lapack_complex_float* a, lapack_int* lda,
 16481                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
 16482                     lapack_complex_float* alpha, lapack_complex_float* beta,
 16483                     lapack_complex_float* vsl, lapack_int* ldvsl,
 16484                     lapack_complex_float* vsr, lapack_int* ldvsr,
 16485                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16486                     lapack_logical* bwork, lapack_int *info );
 16487  void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
 16488                     LAPACK_Z_SELECT2 selctg, lapack_int* n,
 16489                     lapack_complex_double* a, lapack_int* lda,
 16490                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
 16491                     lapack_complex_double* alpha, lapack_complex_double* beta,
 16492                     lapack_complex_double* vsl, lapack_int* ldvsl,
 16493                     lapack_complex_double* vsr, lapack_int* ldvsr,
 16494                     lapack_complex_double* work, lapack_int* lwork,
 16495                     double* rwork, lapack_logical* bwork, lapack_int *info );
 16496  void LAPACK_sgges3( char* jobvsl, char* jobvsr, char* sort,
 16497                      LAPACK_S_SELECT3 selctg, lapack_int* n,
 16498                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16499                      lapack_int* sdim, float* alphar, float* alphai,
 16500                      float* beta, float* vsl, lapack_int* ldvsl,
 16501                      float* vsr, lapack_int* ldvsr,
 16502                      float* work, lapack_int* lwork, lapack_logical* bwork,
 16503                      lapack_int *info );
 16504  void LAPACK_dgges3( char* jobvsl, char* jobvsr, char* sort,
 16505                      LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
 16506                      lapack_int* lda, double* b, lapack_int* ldb,
 16507                      lapack_int* sdim, double* alphar, double* alphai,
 16508                      double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
 16509                      lapack_int* ldvsr, double* work, lapack_int* lwork,
 16510                      lapack_logical* bwork, lapack_int *info );
 16511  void LAPACK_cgges3( char* jobvsl, char* jobvsr, char* sort,
 16512                      LAPACK_C_SELECT2 selctg, lapack_int* n,
 16513                      lapack_complex_float* a, lapack_int* lda,
 16514                      lapack_complex_float* b, lapack_int* ldb,
 16515                      lapack_int* sdim,
 16516                      lapack_complex_float* alpha, lapack_complex_float* beta,
 16517                      lapack_complex_float* vsl, lapack_int* ldvsl,
 16518                      lapack_complex_float* vsr, lapack_int* ldvsr,
 16519                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16520                      lapack_logical* bwork, lapack_int *info );
 16521  void LAPACK_zgges3( char* jobvsl, char* jobvsr, char* sort,
 16522                      LAPACK_Z_SELECT2 selctg, lapack_int* n,
 16523                      lapack_complex_double* a, lapack_int* lda,
 16524                      lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
 16525                      lapack_complex_double* alpha, lapack_complex_double* beta,
 16526                      lapack_complex_double* vsl, lapack_int* ldvsl,
 16527                      lapack_complex_double* vsr, lapack_int* ldvsr,
 16528                      lapack_complex_double* work, lapack_int* lwork,
 16529                      double* rwork, lapack_logical* bwork, lapack_int *info );
 16530  void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
 16531                      LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
 16532                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 16533                      lapack_int* sdim, float* alphar, float* alphai, float* beta,
 16534                      float* vsl, lapack_int* ldvsl, float* vsr,
 16535                      lapack_int* ldvsr, float* rconde, float* rcondv,
 16536                      float* work, lapack_int* lwork, lapack_int* iwork,
 16537                      lapack_int* liwork, lapack_logical* bwork,
 16538                      lapack_int *info );
 16539  void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
 16540                      LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
 16541                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 16542                      lapack_int* sdim, double* alphar, double* alphai,
 16543                      double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
 16544                      lapack_int* ldvsr, double* rconde, double* rcondv,
 16545                      double* work, lapack_int* lwork, lapack_int* iwork,
 16546                      lapack_int* liwork, lapack_logical* bwork,
 16547                      lapack_int *info );
 16548  void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
 16549                      LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
 16550                      lapack_complex_float* a, lapack_int* lda,
 16551                      lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
 16552                      lapack_complex_float* alpha, lapack_complex_float* beta,
 16553                      lapack_complex_float* vsl, lapack_int* ldvsl,
 16554                      lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
 16555                      float* rcondv, lapack_complex_float* work,
 16556                      lapack_int* lwork, float* rwork, lapack_int* iwork,
 16557                      lapack_int* liwork, lapack_logical* bwork,
 16558                      lapack_int *info );
 16559  void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
 16560                      LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
 16561                      lapack_complex_double* a, lapack_int* lda,
 16562                      lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
 16563                      lapack_complex_double* alpha, lapack_complex_double* beta,
 16564                      lapack_complex_double* vsl, lapack_int* ldvsl,
 16565                      lapack_complex_double* vsr, lapack_int* ldvsr,
 16566                      double* rconde, double* rcondv, lapack_complex_double* work,
 16567                      lapack_int* lwork, double* rwork, lapack_int* iwork,
 16568                      lapack_int* liwork, lapack_logical* bwork,
 16569                      lapack_int *info );
 16570  void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
 16571                     lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
 16572                     float* alphai, float* beta, float* vl, lapack_int* ldvl,
 16573                     float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
 16574                     lapack_int *info );
 16575  void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
 16576                     lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
 16577                     double* alphai, double* beta, double* vl, lapack_int* ldvl,
 16578                     double* vr, lapack_int* ldvr, double* work,
 16579                     lapack_int* lwork, lapack_int *info );
 16580  void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
 16581                     lapack_complex_float* a, lapack_int* lda,
 16582                     lapack_complex_float* b, lapack_int* ldb,
 16583                     lapack_complex_float* alpha, lapack_complex_float* beta,
 16584                     lapack_complex_float* vl, lapack_int* ldvl,
 16585                     lapack_complex_float* vr, lapack_int* ldvr,
 16586                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16587                     lapack_int *info );
 16588  void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
 16589                     lapack_complex_double* a, lapack_int* lda,
 16590                     lapack_complex_double* b, lapack_int* ldb,
 16591                     lapack_complex_double* alpha, lapack_complex_double* beta,
 16592                     lapack_complex_double* vl, lapack_int* ldvl,
 16593                     lapack_complex_double* vr, lapack_int* ldvr,
 16594                     lapack_complex_double* work, lapack_int* lwork,
 16595                     double* rwork, lapack_int *info );
 16596  void LAPACK_sggev3( char* jobvl, char* jobvr, lapack_int* n, float* a,
 16597                      lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
 16598                      float* alphai, float* beta, float* vl, lapack_int* ldvl,
 16599                      float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
 16600                      lapack_int *info );
 16601  void LAPACK_dggev3( char* jobvl, char* jobvr, lapack_int* n, double* a,
 16602                      lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
 16603                      double* alphai, double* beta, double* vl, lapack_int* ldvl,
 16604                      double* vr, lapack_int* ldvr, double* work,
 16605                      lapack_int* lwork, lapack_int *info );
 16606  void LAPACK_cggev3( char* jobvl, char* jobvr, lapack_int* n,
 16607                      lapack_complex_float* a, lapack_int* lda,
 16608                      lapack_complex_float* b, lapack_int* ldb,
 16609                      lapack_complex_float* alpha, lapack_complex_float* beta,
 16610                      lapack_complex_float* vl, lapack_int* ldvl,
 16611                      lapack_complex_float* vr, lapack_int* ldvr,
 16612                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16613                      lapack_int *info );
 16614  void LAPACK_zggev3( char* jobvl, char* jobvr, lapack_int* n,
 16615                      lapack_complex_double* a, lapack_int* lda,
 16616                      lapack_complex_double* b, lapack_int* ldb,
 16617                      lapack_complex_double* alpha, lapack_complex_double* beta,
 16618                      lapack_complex_double* vl, lapack_int* ldvl,
 16619                      lapack_complex_double* vr, lapack_int* ldvr,
 16620                      lapack_complex_double* work, lapack_int* lwork,
 16621                      double* rwork, lapack_int *info );
 16622  void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16623                      lapack_int* n, float* a, lapack_int* lda, float* b,
 16624                      lapack_int* ldb, float* alphar, float* alphai, float* beta,
 16625                      float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
 16626                      lapack_int* ilo, lapack_int* ihi, float* lscale,
 16627                      float* rscale, float* abnrm, float* bbnrm, float* rconde,
 16628                      float* rcondv, float* work, lapack_int* lwork,
 16629                      lapack_int* iwork, lapack_logical* bwork,
 16630                      lapack_int *info );
 16631  void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16632                      lapack_int* n, double* a, lapack_int* lda, double* b,
 16633                      lapack_int* ldb, double* alphar, double* alphai,
 16634                      double* beta, double* vl, lapack_int* ldvl, double* vr,
 16635                      lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
 16636                      double* lscale, double* rscale, double* abnrm,
 16637                      double* bbnrm, double* rconde, double* rcondv, double* work,
 16638                      lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
 16639                      lapack_int *info );
 16640  void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16641                      lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 16642                      lapack_complex_float* b, lapack_int* ldb,
 16643                      lapack_complex_float* alpha, lapack_complex_float* beta,
 16644                      lapack_complex_float* vl, lapack_int* ldvl,
 16645                      lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
 16646                      lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
 16647                      float* bbnrm, float* rconde, float* rcondv,
 16648                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
 16649                      lapack_int* iwork, lapack_logical* bwork,
 16650                      lapack_int *info );
 16651  void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
 16652                      lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 16653                      lapack_complex_double* b, lapack_int* ldb,
 16654                      lapack_complex_double* alpha, lapack_complex_double* beta,
 16655                      lapack_complex_double* vl, lapack_int* ldvl,
 16656                      lapack_complex_double* vr, lapack_int* ldvr,
 16657                      lapack_int* ilo, lapack_int* ihi, double* lscale,
 16658                      double* rscale, double* abnrm, double* bbnrm,
 16659                      double* rconde, double* rcondv, lapack_complex_double* work,
 16660                      lapack_int* lwork, double* rwork, lapack_int* iwork,
 16661                      lapack_logical* bwork, lapack_int *info );
 16662  void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
 16663                     lapack_int* k, double* alpha, const double* a,
 16664                     lapack_int* lda, double* beta, double* c );
 16665  void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
 16666                     lapack_int* k, float* alpha, const float* a, lapack_int* lda,
 16667                     float* beta, float* c );
 16668  void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
 16669                     lapack_int* k, double* alpha, const lapack_complex_double* a,
 16670                     lapack_int* lda, double* beta, lapack_complex_double* c );
 16671  void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
 16672                     lapack_int* k, float* alpha, const lapack_complex_float* a,
 16673                     lapack_int* lda, float* beta, lapack_complex_float* c );
 16674  void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
 16675                     char* diag, lapack_int* m, lapack_int* n, double* alpha,
 16676                     const double* a, double* b, lapack_int* ldb );
 16677  void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
 16678                     char* diag, lapack_int* m, lapack_int* n, float* alpha,
 16679                     const float* a, float* b, lapack_int* ldb );
 16680  void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
 16681                     char* diag, lapack_int* m, lapack_int* n,
 16682                     lapack_complex_double* alpha, const lapack_complex_double* a,
 16683                     lapack_complex_double* b, lapack_int* ldb );
 16684  void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
 16685                     char* diag, lapack_int* m, lapack_int* n,
 16686                     lapack_complex_float* alpha, const lapack_complex_float* a,
 16687                     lapack_complex_float* b, lapack_int* ldb );
 16688  void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
 16689                      double* ap, lapack_int *info );
 16690  void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
 16691                      float* ap, lapack_int *info );
 16692  void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
 16693                      const lapack_complex_double* arf, lapack_complex_double* ap,
 16694                      lapack_int *info );
 16695  void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
 16696                      const lapack_complex_float* arf, lapack_complex_float* ap,
 16697                      lapack_int *info );
 16698  void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
 16699                      double* a, lapack_int* lda, lapack_int *info );
 16700  void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
 16701                      float* a, lapack_int* lda, lapack_int *info );
 16702  void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
 16703                      const lapack_complex_double* arf, lapack_complex_double* a,
 16704                      lapack_int* lda, lapack_int *info );
 16705  void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
 16706                      const lapack_complex_float* arf, lapack_complex_float* a,
 16707                      lapack_int* lda, lapack_int *info );
 16708  void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
 16709                      double* arf, lapack_int *info );
 16710  void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
 16711                      float* arf, lapack_int *info );
 16712  void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
 16713                      const lapack_complex_double* ap, lapack_complex_double* arf,
 16714                      lapack_int *info );
 16715  void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
 16716                      const lapack_complex_float* ap, lapack_complex_float* arf,
 16717                      lapack_int *info );
 16718  void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
 16719                      lapack_int* lda, lapack_int *info );
 16720  void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
 16721                      lapack_int* lda, lapack_int *info );
 16722  void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
 16723                      lapack_complex_double* a, lapack_int* lda,
 16724                      lapack_int *info );
 16725  void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
 16726                      lapack_complex_float* a, lapack_int* lda,
 16727                      lapack_int *info );
 16728  void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
 16729                      lapack_int* lda, double* arf, lapack_int *info );
 16730  void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
 16731                      lapack_int* lda, float* arf, lapack_int *info );
 16732  void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
 16733                      const lapack_complex_double* a, lapack_int* lda,
 16734                      lapack_complex_double* arf, lapack_int *info );
 16735  void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
 16736                      const lapack_complex_float* a, lapack_int* lda,
 16737                      lapack_complex_float* arf, lapack_int *info );
 16738  void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
 16739                      double* ap, lapack_int *info );
 16740  void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
 16741                      float* ap, lapack_int *info );
 16742  void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
 16743                      lapack_int* lda, lapack_complex_double* ap,
 16744                      lapack_int *info );
 16745  void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
 16746                      lapack_int* lda, lapack_complex_float* ap,
 16747                      lapack_int *info );
 16748  void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 16749                       float* tau, float* work, lapack_int* lwork,
 16750                       lapack_int *info );
 16751  void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 16752                       double* tau, double* work, lapack_int* lwork,
 16753                       lapack_int *info );
 16754  void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 16755                       lapack_int* lda, lapack_complex_float* tau,
 16756                       lapack_complex_float* work, lapack_int* lwork,
 16757                       lapack_int *info );
 16758  void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 16759                       lapack_int* lda, lapack_complex_double* tau,
 16760                       lapack_complex_double* work, lapack_int* lwork,
 16761                       lapack_int *info );
 16762  void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
 16763  void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
 16764  void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
 16765                      float* x );
 16766  void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
 16767                      double* x );
 16768  void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
 16769                      lapack_complex_float* x );
 16770  void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
 16771                      lapack_complex_double* x );
 16772  void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 16773                      float* tau, float* work, lapack_int *info );
 16774  void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 16775                      double* tau, double* work, lapack_int *info );
 16776  void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 16777                      lapack_int* lda, lapack_complex_float* tau,
 16778                      lapack_complex_float* work, lapack_int *info );
 16779  void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 16780                      lapack_int* lda, lapack_complex_double* tau,
 16781                      lapack_complex_double* work, lapack_int *info );
 16782  void LAPACK_slacn2( lapack_int* n, float* v, float* x, lapack_int* isgn,
 16783                      float* est, lapack_int* kase, lapack_int* isave );
 16784  void LAPACK_dlacn2( lapack_int* n, double* v, double* x, lapack_int* isgn,
 16785                      double* est, lapack_int* kase, lapack_int* isave );
 16786  void LAPACK_clacn2( lapack_int* n, lapack_complex_float* v,
 16787                      lapack_complex_float* x, float* est,
 16788                      lapack_int* kase, lapack_int* isave );
 16789  void LAPACK_zlacn2( lapack_int* n, lapack_complex_double* v,
 16790                      lapack_complex_double* x, double* est,
 16791                      lapack_int* kase, lapack_int* isave );
 16792  void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
 16793                      lapack_int* lda, float* b, lapack_int* ldb );
 16794  void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
 16795                      lapack_int* lda, double* b, lapack_int* ldb );
 16796  void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
 16797                      const lapack_complex_float* a, lapack_int* lda,
 16798                      lapack_complex_float* b, lapack_int* ldb );
 16799  void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
 16800                      const lapack_complex_double* a, lapack_int* lda,
 16801                      lapack_complex_double* b, lapack_int* ldb );
 16802  
 16803  void LAPACK_clacp2( char* uplo, lapack_int* m, lapack_int* n, const float* a,
 16804                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb );
 16805  void LAPACK_zlacp2( char* uplo, lapack_int* m, lapack_int* n, const double* a,
 16806                      lapack_int* lda, lapack_complex_double* b,
 16807                      lapack_int* ldb );
 16808  
 16809  void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 16810                      lapack_int* ipiv, lapack_int *info );
 16811  void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 16812                      lapack_int* ipiv, lapack_int *info );
 16813  void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 16814                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 16815  void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 16816                      lapack_int* lda, lapack_int* ipiv, lapack_int *info );
 16817  void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
 16818                      lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
 16819  void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
 16820                      lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
 16821  void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
 16822                      lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
 16823                      lapack_int* incx );
 16824  void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
 16825                      lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
 16826                      lapack_int* incx );
 16827  float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
 16828                      lapack_int* lda, float* work );
 16829  double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
 16830                      lapack_int* lda, double* work );
 16831  float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
 16832                      const lapack_complex_float* a, lapack_int* lda, float* work );
 16833  double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
 16834                      const lapack_complex_double* a, lapack_int* lda, double* work );
 16835  float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
 16836                      const lapack_complex_float* a, lapack_int* lda, float* work );
 16837  double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
 16838                      const lapack_complex_double* a, lapack_int* lda, double* work );
 16839  float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
 16840                      lapack_int* lda, float* work );
 16841  double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
 16842                      lapack_int* lda, double* work );
 16843  float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
 16844                      const lapack_complex_float* a, lapack_int* lda, float* work );
 16845  double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
 16846                      const lapack_complex_double* a, lapack_int* lda, double* work );
 16847  float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
 16848                      lapack_int* n, const float* a, lapack_int* lda, float* work );
 16849  double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
 16850                      lapack_int* n, const double* a, lapack_int* lda, double* work );
 16851  float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
 16852                      lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
 16853                      float* work );
 16854  double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
 16855                      lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
 16856                      double* work );
 16857  float LAPACK_slamch( char* cmach );
 16858  double LAPACK_dlamch( char* cmach );
 16859  void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 16860                      float* tau, float* work, lapack_int *info );
 16861  void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 16862                      double* tau, double* work, lapack_int *info );
 16863  void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 16864                      lapack_int* lda, lapack_complex_float* tau,
 16865                      lapack_complex_float* work, lapack_int *info );
 16866  void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 16867                      lapack_int* lda, lapack_complex_double* tau,
 16868                      lapack_complex_double* work, lapack_int *info );
 16869  void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
 16870                      lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
 16871                      lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
 16872                      lapack_int* ldc, float* work, lapack_int* ldwork );
 16873  void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
 16874                      lapack_int* m, lapack_int* n, lapack_int* k,
 16875                      const double* v, lapack_int* ldv, const double* t,
 16876                      lapack_int* ldt, double* c, lapack_int* ldc, double* work,
 16877                      lapack_int* ldwork );
 16878  void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
 16879                      lapack_int* m, lapack_int* n, lapack_int* k,
 16880                      const lapack_complex_float* v, lapack_int* ldv,
 16881                      const lapack_complex_float* t, lapack_int* ldt,
 16882                      lapack_complex_float* c, lapack_int* ldc,
 16883                      lapack_complex_float* work, lapack_int* ldwork );
 16884  void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
 16885                      lapack_int* m, lapack_int* n, lapack_int* k,
 16886                      const lapack_complex_double* v, lapack_int* ldv,
 16887                      const lapack_complex_double* t, lapack_int* ldt,
 16888                      lapack_complex_double* c, lapack_int* ldc,
 16889                      lapack_complex_double* work, lapack_int* ldwork );
 16890  void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
 16891                      float* tau );
 16892  void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
 16893                      double* tau );
 16894  void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
 16895                      lapack_complex_float* x, lapack_int* incx,
 16896                      lapack_complex_float* tau );
 16897  void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
 16898                      lapack_complex_double* x, lapack_int* incx,
 16899                      lapack_complex_double* tau );
 16900  void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
 16901                      const float* v, lapack_int* ldv, const float* tau, float* t,
 16902                      lapack_int* ldt );
 16903  void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
 16904                      const double* v, lapack_int* ldv, const double* tau,
 16905                      double* t, lapack_int* ldt );
 16906  void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
 16907                      const lapack_complex_float* v, lapack_int* ldv,
 16908                      const lapack_complex_float* tau, lapack_complex_float* t,
 16909                      lapack_int* ldt );
 16910  void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
 16911                      const lapack_complex_double* v, lapack_int* ldv,
 16912                      const lapack_complex_double* tau, lapack_complex_double* t,
 16913                      lapack_int* ldt );
 16914  void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
 16915                      float* tau, float* c, lapack_int* ldc, float* work );
 16916  void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
 16917                      double* tau, double* c, lapack_int* ldc, double* work );
 16918  void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
 16919                      const lapack_complex_float* v, lapack_complex_float* tau,
 16920                      lapack_complex_float* c, lapack_int* ldc,
 16921                      lapack_complex_float* work );
 16922  void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
 16923                      const lapack_complex_double* v, lapack_complex_double* tau,
 16924                      lapack_complex_double* c, lapack_int* ldc,
 16925                      lapack_complex_double* work );
 16926  void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
 16927                      char* sym, float* d, lapack_int* mode, float* cond,
 16928                      float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
 16929                      float* a, lapack_int* lda, float* work, lapack_int *info );
 16930  void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
 16931                      char* sym, double* d, lapack_int* mode, double* cond,
 16932                      double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
 16933                      double* a, lapack_int* lda, double* work,
 16934                      lapack_int *info );
 16935  void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
 16936                      char* sym, float* d, lapack_int* mode, float* cond,
 16937                      float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
 16938                      lapack_complex_float* a, lapack_int* lda,
 16939                      lapack_complex_float* work, lapack_int *info );
 16940  void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
 16941                      char* sym, double* d, lapack_int* mode, double* cond,
 16942                      double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
 16943                      lapack_complex_double* a, lapack_int* lda,
 16944                      lapack_complex_double* work, lapack_int *info );
 16945  void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
 16946                      lapack_int* ldsa, double* a, lapack_int* lda,
 16947                      lapack_int *info );
 16948  void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
 16949                      lapack_int* lda, float* sa, lapack_int* ldsa,
 16950                      lapack_int *info );
 16951  void LAPACK_clag2z( lapack_int* m, lapack_int* n,
 16952                      const lapack_complex_float* sa, lapack_int* ldsa,
 16953                      lapack_complex_double* a, lapack_int* lda,
 16954                      lapack_int *info );
 16955  void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
 16956                      const lapack_complex_double* a, lapack_int* lda,
 16957                      lapack_complex_float* sa, lapack_int* ldsa,
 16958                      lapack_int *info );
 16959  void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 16960                      lapack_int *info );
 16961  void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 16962                      lapack_int *info );
 16963  void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
 16964                      lapack_int* lda, lapack_int *info );
 16965  void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
 16966                      lapack_int* lda, lapack_int *info );
 16967  void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
 16968                      lapack_int* ku, const float* d, float* a, lapack_int* lda,
 16969                      lapack_int* iseed, float* work, lapack_int *info );
 16970  void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
 16971                      lapack_int* ku, const double* d, double* a, lapack_int* lda,
 16972                      lapack_int* iseed, double* work, lapack_int *info );
 16973  void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
 16974                      lapack_int* ku, const float* d, lapack_complex_float* a,
 16975                      lapack_int* lda, lapack_int* iseed,
 16976                      lapack_complex_float* work, lapack_int *info );
 16977  void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
 16978                      lapack_int* ku, const double* d, lapack_complex_double* a,
 16979                      lapack_int* lda, lapack_int* iseed,
 16980                      lapack_complex_double* work, lapack_int *info );
 16981  void LAPACK_slascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
 16982                      float* cto, lapack_int* m, lapack_int* n, float* a, 
 16983                      lapack_int* lda, lapack_int *info );
 16984  void LAPACK_dlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
 16985                      double* cto, lapack_int* m, lapack_int* n, double* a, 
 16986                      lapack_int* lda, lapack_int *info );
 16987  void LAPACK_clascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
 16988                      float* cto, lapack_int* m, lapack_int* n, lapack_complex_float* a, 
 16989                      lapack_int* lda, lapack_int *info );
 16990  void LAPACK_zlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
 16991                      double* cto, lapack_int* m, lapack_int* n, lapack_complex_double* a, 
 16992                      lapack_int* lda, lapack_int *info );
 16993  void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
 16994                      float* beta, float* a, lapack_int* lda );
 16995  void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
 16996                      double* beta, double* a, lapack_int* lda );
 16997  void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
 16998                      lapack_complex_float* alpha, lapack_complex_float* beta,
 16999                      lapack_complex_float* a, lapack_int* lda );
 17000  void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
 17001                      lapack_complex_double* alpha, lapack_complex_double* beta,
 17002                      lapack_complex_double* a, lapack_int* lda );
 17003  void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
 17004  void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
 17005  void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
 17006                      lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
 17007                      lapack_complex_float* work, lapack_int *info );
 17008  void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
 17009                      lapack_complex_double* a, lapack_int* lda,
 17010                      lapack_int* iseed, lapack_complex_double* work,
 17011                      lapack_int *info );
 17012  void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
 17013                      lapack_int* lda, lapack_int* iseed, float* work,
 17014                      lapack_int *info );
 17015  void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
 17016                      lapack_int* lda, lapack_int* iseed, double* work,
 17017                      lapack_int *info );
 17018  void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
 17019                      lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
 17020                      lapack_complex_float* work, lapack_int *info );
 17021  void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
 17022                      lapack_complex_double* a, lapack_int* lda,
 17023                      lapack_int* iseed, lapack_complex_double* work,
 17024                      lapack_int *info );
 17025  void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17026                      float* x, lapack_int* ldx, lapack_int* k );
 17027  void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17028                      double* x, lapack_int* ldx, lapack_int* k );
 17029  void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17030                      lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
 17031  void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17032                      lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
 17033  void LAPACK_slapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17034                      float* x, lapack_int* ldx, lapack_int* k );
 17035  void LAPACK_dlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17036                      double* x, lapack_int* ldx, lapack_int* k );
 17037  void LAPACK_clapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17038                      lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
 17039  void LAPACK_zlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
 17040                      lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
 17041  float LAPACK_slapy2( float* x, float* y );
 17042  double LAPACK_dlapy2( double* x, double* y );
 17043  float LAPACK_slapy3( float* x, float* y, float* z );
 17044  double LAPACK_dlapy3( double* x, double* y, double* z );
 17045  void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
 17046  void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
 17047  void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
 17048  void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
 17049                       double* sn );
 17050  // LAPACK 3.3.0
 17051  void LAPACK_cbbcsd( char* jobu1, char* jobu2,
 17052                      char* jobv1t, char* jobv2t, char* trans,
 17053                      lapack_int* m, lapack_int* p, lapack_int* q,
 17054                      float* theta, float* phi,
 17055                      lapack_complex_float* u1, lapack_int* ldu1,
 17056                      lapack_complex_float* u2, lapack_int* ldu2,
 17057                      lapack_complex_float* v1t, lapack_int* ldv1t,
 17058                      lapack_complex_float* v2t, lapack_int* ldv2t,
 17059                      float* b11d, float* b11e, float* b12d,
 17060                      float* b12e, float* b21d, float* b21e,
 17061                      float* b22d, float* b22e, float* rwork,
 17062                      lapack_int* lrwork , lapack_int *info );
 17063  void LAPACK_cheswapr( char* uplo, lapack_int* n,
 17064                        lapack_complex_float* a, lapack_int* i1,
 17065                        lapack_int* i2 );
 17066  void LAPACK_chetri2( char* uplo, lapack_int* n,
 17067                       lapack_complex_float* a, lapack_int* lda,
 17068                       const lapack_int* ipiv,
 17069                       lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
 17070  void LAPACK_chetri2x( char* uplo, lapack_int* n,
 17071                        lapack_complex_float* a, lapack_int* lda,
 17072                        const lapack_int* ipiv,
 17073                        lapack_complex_float* work, lapack_int* nb , lapack_int *info );
 17074  void LAPACK_chetrs2( char* uplo, lapack_int* n,
 17075                       lapack_int* nrhs, const lapack_complex_float* a,
 17076                       lapack_int* lda, const lapack_int* ipiv,
 17077                       lapack_complex_float* b, lapack_int* ldb,
 17078                       lapack_complex_float* work , lapack_int *info );
 17079  void LAPACK_csyconv( char* uplo, char* way,
 17080                       lapack_int* n, lapack_complex_float* a,
 17081                       lapack_int* lda, const lapack_int* ipiv,
 17082                       lapack_complex_float* work , lapack_int *info );
 17083  void LAPACK_csyswapr( char* uplo, lapack_int* n,
 17084                        lapack_complex_float* a, lapack_int* i1,
 17085                        lapack_int* i2 );
 17086  void LAPACK_csytri2( char* uplo, lapack_int* n,
 17087                       lapack_complex_float* a, lapack_int* lda,
 17088                       const lapack_int* ipiv,
 17089                       lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
 17090  void LAPACK_csytri2x( char* uplo, lapack_int* n,
 17091                        lapack_complex_float* a, lapack_int* lda,
 17092                        const lapack_int* ipiv,
 17093                        lapack_complex_float* work, lapack_int* nb , lapack_int *info );
 17094  void LAPACK_csytrs2( char* uplo, lapack_int* n,
 17095                       lapack_int* nrhs, const lapack_complex_float* a,
 17096                       lapack_int* lda, const lapack_int* ipiv,
 17097                       lapack_complex_float* b, lapack_int* ldb,
 17098                       lapack_complex_float* work , lapack_int *info );
 17099  void LAPACK_cunbdb( char* trans, char* signs,
 17100                      lapack_int* m, lapack_int* p, lapack_int* q,
 17101                      lapack_complex_float* x11, lapack_int* ldx11,
 17102                      lapack_complex_float* x12, lapack_int* ldx12,
 17103                      lapack_complex_float* x21, lapack_int* ldx21,
 17104                      lapack_complex_float* x22, lapack_int* ldx22,
 17105                      float* theta, float* phi,
 17106                      lapack_complex_float* taup1,
 17107                      lapack_complex_float* taup2,
 17108                      lapack_complex_float* tauq1,
 17109                      lapack_complex_float* tauq2,
 17110                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
 17111  void LAPACK_cuncsd( char* jobu1, char* jobu2,
 17112                      char* jobv1t, char* jobv2t, char* trans,
 17113                      char* signs, lapack_int* m, lapack_int* p,
 17114                      lapack_int* q, lapack_complex_float* x11,
 17115                      lapack_int* ldx11, lapack_complex_float* x12,
 17116                      lapack_int* ldx12, lapack_complex_float* x21,
 17117                      lapack_int* ldx21, lapack_complex_float* x22,
 17118                      lapack_int* ldx22, float* theta,
 17119                      lapack_complex_float* u1, lapack_int* ldu1,
 17120                      lapack_complex_float* u2, lapack_int* ldu2,
 17121                      lapack_complex_float* v1t, lapack_int* ldv1t,
 17122                      lapack_complex_float* v2t, lapack_int* ldv2t,
 17123                      lapack_complex_float* work, lapack_int* lwork,
 17124                      float* rwork, lapack_int* lrwork,
 17125                      lapack_int* iwork , lapack_int *info );
 17126  void LAPACK_cuncsd2by1( char* jobu1, char* jobu2,
 17127                      char* jobv1t, lapack_int* m, lapack_int* p,
 17128                      lapack_int* q, lapack_complex_float* x11,
 17129                      lapack_int* ldx11, lapack_complex_float* x21,
 17130                      lapack_int* ldx21, lapack_complex_float* theta,
 17131                      lapack_complex_float* u1, lapack_int* ldu1,
 17132                      lapack_complex_float* u2, lapack_int* ldu2,
 17133                      lapack_complex_float* v1t, lapack_int* ldv1t,
 17134                      lapack_complex_float* work, lapack_int* lwork,
 17135                      float* rwork, lapack_int* lrwork,
 17136                      lapack_int* iwork , lapack_int *info );
 17137  void LAPACK_dbbcsd( char* jobu1, char* jobu2,
 17138                      char* jobv1t, char* jobv2t, char* trans,
 17139                      lapack_int* m, lapack_int* p, lapack_int* q,
 17140                      double* theta, double* phi, double* u1,
 17141                      lapack_int* ldu1, double* u2, lapack_int* ldu2,
 17142                      double* v1t, lapack_int* ldv1t, double* v2t,
 17143                      lapack_int* ldv2t, double* b11d, double* b11e,
 17144                      double* b12d, double* b12e, double* b21d,
 17145                      double* b21e, double* b22d, double* b22e,
 17146                      double* work, lapack_int* lwork , lapack_int *info );
 17147  void LAPACK_dorbdb( char* trans, char* signs,
 17148                      lapack_int* m, lapack_int* p, lapack_int* q,
 17149                      double* x11, lapack_int* ldx11, double* x12,
 17150                      lapack_int* ldx12, double* x21, lapack_int* ldx21,
 17151                      double* x22, lapack_int* ldx22, double* theta,
 17152                      double* phi, double* taup1, double* taup2,
 17153                      double* tauq1, double* tauq2, double* work,
 17154                      lapack_int* lwork , lapack_int *info );
 17155  void LAPACK_dorcsd( char* jobu1, char* jobu2,
 17156                      char* jobv1t, char* jobv2t, char* trans,
 17157                      char* signs, lapack_int* m, lapack_int* p,
 17158                      lapack_int* q, double* x11, lapack_int* ldx11,
 17159                      double* x12, lapack_int* ldx12, double* x21,
 17160                      lapack_int* ldx21, double* x22, lapack_int* ldx22,
 17161                      double* theta, double* u1, lapack_int* ldu1,
 17162                      double* u2, lapack_int* ldu2, double* v1t,
 17163                      lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
 17164                      double* work, lapack_int* lwork,
 17165                      lapack_int* iwork , lapack_int *info );
 17166  void LAPACK_dorcsd2by1( char* jobu1, char* jobu2,
 17167                      char* jobv1t, lapack_int* m, lapack_int* p,
 17168                      lapack_int* q, double* x11, lapack_int* ldx11,
 17169                      double* x21, lapack_int* ldx21,
 17170                      double* theta, double* u1, lapack_int* ldu1,
 17171                      double* u2, lapack_int* ldu2, double* v1t,
 17172                      lapack_int* ldv1t, double* work, lapack_int* lwork,
 17173                      lapack_int* iwork , lapack_int *info );
 17174  void LAPACK_dsyconv( char* uplo, char* way,
 17175                       lapack_int* n, double* a, lapack_int* lda,
 17176                       const lapack_int* ipiv, double* work , lapack_int *info );
 17177  void LAPACK_dsyswapr( char* uplo, lapack_int* n,
 17178                        double* a, lapack_int* i1, lapack_int* i2 );
 17179  void LAPACK_dsytri2( char* uplo, lapack_int* n,
 17180                       double* a, lapack_int* lda,
 17181                       const lapack_int* ipiv,
 17182                       lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
 17183  void LAPACK_dsytri2x( char* uplo, lapack_int* n,
 17184                        double* a, lapack_int* lda,
 17185                        const lapack_int* ipiv, double* work,
 17186                        lapack_int* nb , lapack_int *info );
 17187  void LAPACK_dsytrs2( char* uplo, lapack_int* n,
 17188                       lapack_int* nrhs, const double* a,
 17189                       lapack_int* lda, const lapack_int* ipiv,
 17190                       double* b, lapack_int* ldb, double* work , lapack_int *info );
 17191  void LAPACK_sbbcsd( char* jobu1, char* jobu2,
 17192                      char* jobv1t, char* jobv2t, char* trans,
 17193                      lapack_int* m, lapack_int* p, lapack_int* q,
 17194                      float* theta, float* phi, float* u1,
 17195                      lapack_int* ldu1, float* u2, lapack_int* ldu2,
 17196                      float* v1t, lapack_int* ldv1t, float* v2t,
 17197                      lapack_int* ldv2t, float* b11d, float* b11e,
 17198                      float* b12d, float* b12e, float* b21d,
 17199                      float* b21e, float* b22d, float* b22e,
 17200                      float* work, lapack_int* lwork , lapack_int *info );
 17201  void LAPACK_sorbdb( char* trans, char* signs,
 17202                      lapack_int* m, lapack_int* p, lapack_int* q,
 17203                      float* x11, lapack_int* ldx11, float* x12,
 17204                      lapack_int* ldx12, float* x21, lapack_int* ldx21,
 17205                      float* x22, lapack_int* ldx22, float* theta,
 17206                      float* phi, float* taup1, float* taup2,
 17207                      float* tauq1, float* tauq2, float* work,
 17208                      lapack_int* lwork , lapack_int *info );
 17209  void LAPACK_sorcsd( char* jobu1, char* jobu2,
 17210                      char* jobv1t, char* jobv2t, char* trans,
 17211                      char* signs, lapack_int* m, lapack_int* p,
 17212                      lapack_int* q, float* x11, lapack_int* ldx11,
 17213                      float* x12, lapack_int* ldx12, float* x21,
 17214                      lapack_int* ldx21, float* x22, lapack_int* ldx22,
 17215                      float* theta, float* u1, lapack_int* ldu1,
 17216                      float* u2, lapack_int* ldu2, float* v1t,
 17217                      lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
 17218                      float* work, lapack_int* lwork,
 17219                      lapack_int* iwork , lapack_int *info );
 17220  void LAPACK_sorcsd2by1( char* jobu1, char* jobu2,
 17221                      char* jobv1t, lapack_int* m, lapack_int* p,
 17222                      lapack_int* q, float* x11, lapack_int* ldx11,
 17223                      float* x21, lapack_int* ldx21,
 17224                      float* theta, float* u1, lapack_int* ldu1,
 17225                      float* u2, lapack_int* ldu2, float* v1t,
 17226                      lapack_int* ldv1t, float* work, lapack_int* lwork,
 17227                      lapack_int* iwork , lapack_int *info );
 17228  void LAPACK_ssyconv( char* uplo, char* way,
 17229                       lapack_int* n, float* a, lapack_int* lda,
 17230                       const lapack_int* ipiv, float* work , lapack_int *info );
 17231  void LAPACK_ssyswapr( char* uplo, lapack_int* n,
 17232                        float* a, lapack_int* i1, lapack_int* i2 );
 17233  void LAPACK_ssytri2( char* uplo, lapack_int* n,
 17234                       float* a, lapack_int* lda,
 17235                       const lapack_int* ipiv,
 17236                       lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
 17237  void LAPACK_ssytri2x( char* uplo, lapack_int* n,
 17238                        float* a, lapack_int* lda,
 17239                        const lapack_int* ipiv, float* work,
 17240                        lapack_int* nb , lapack_int *info );
 17241  void LAPACK_ssytrs2( char* uplo, lapack_int* n,
 17242                       lapack_int* nrhs, const float* a,
 17243                       lapack_int* lda, const lapack_int* ipiv,
 17244                       float* b, lapack_int* ldb, float* work , lapack_int *info );
 17245  void LAPACK_zbbcsd( char* jobu1, char* jobu2,
 17246                      char* jobv1t, char* jobv2t, char* trans,
 17247                      lapack_int* m, lapack_int* p, lapack_int* q,
 17248                      double* theta, double* phi,
 17249                      lapack_complex_double* u1, lapack_int* ldu1,
 17250                      lapack_complex_double* u2, lapack_int* ldu2,
 17251                      lapack_complex_double* v1t, lapack_int* ldv1t,
 17252                      lapack_complex_double* v2t, lapack_int* ldv2t,
 17253                      double* b11d, double* b11e, double* b12d,
 17254                      double* b12e, double* b21d, double* b21e,
 17255                      double* b22d, double* b22e, double* rwork,
 17256                      lapack_int* lrwork , lapack_int *info );
 17257  void LAPACK_zheswapr( char* uplo, lapack_int* n,
 17258                        lapack_complex_double* a, lapack_int* i1,
 17259                        lapack_int* i2 );
 17260  void LAPACK_zhetri2( char* uplo, lapack_int* n,
 17261                       lapack_complex_double* a, lapack_int* lda,
 17262                       const lapack_int* ipiv,
 17263                       lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
 17264  void LAPACK_zhetri2x( char* uplo, lapack_int* n,
 17265                        lapack_complex_double* a, lapack_int* lda,
 17266                        const lapack_int* ipiv,
 17267                        lapack_complex_double* work, lapack_int* nb , lapack_int *info );
 17268  void LAPACK_zhetrs2( char* uplo, lapack_int* n,
 17269                       lapack_int* nrhs,
 17270                       const lapack_complex_double* a, lapack_int* lda,
 17271                       const lapack_int* ipiv,
 17272                       lapack_complex_double* b, lapack_int* ldb,
 17273                       lapack_complex_double* work , lapack_int *info );
 17274  void LAPACK_zsyconv( char* uplo, char* way,
 17275                       lapack_int* n, lapack_complex_double* a,
 17276                       lapack_int* lda, const lapack_int* ipiv,
 17277                       lapack_complex_double* work , lapack_int *info );
 17278  void LAPACK_zsyswapr( char* uplo, lapack_int* n,
 17279                        lapack_complex_double* a, lapack_int* i1,
 17280                        lapack_int* i2 );
 17281  void LAPACK_zsytri2( char* uplo, lapack_int* n,
 17282                       lapack_complex_double* a, lapack_int* lda,
 17283                       const lapack_int* ipiv,
 17284                       lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
 17285  void LAPACK_zsytri2x( char* uplo, lapack_int* n,
 17286                        lapack_complex_double* a, lapack_int* lda,
 17287                        const lapack_int* ipiv,
 17288                        lapack_complex_double* work, lapack_int* nb , lapack_int *info );
 17289  void LAPACK_zsytrs2( char* uplo, lapack_int* n,
 17290                       lapack_int* nrhs,
 17291                       const lapack_complex_double* a, lapack_int* lda,
 17292                       const lapack_int* ipiv,
 17293                       lapack_complex_double* b, lapack_int* ldb,
 17294                       lapack_complex_double* work , lapack_int *info );
 17295  void LAPACK_zunbdb( char* trans, char* signs,
 17296                      lapack_int* m, lapack_int* p, lapack_int* q,
 17297                      lapack_complex_double* x11, lapack_int* ldx11,
 17298                      lapack_complex_double* x12, lapack_int* ldx12,
 17299                      lapack_complex_double* x21, lapack_int* ldx21,
 17300                      lapack_complex_double* x22, lapack_int* ldx22,
 17301                      double* theta, double* phi,
 17302                      lapack_complex_double* taup1,
 17303                      lapack_complex_double* taup2,
 17304                      lapack_complex_double* tauq1,
 17305                      lapack_complex_double* tauq2,
 17306                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
 17307  void LAPACK_zuncsd( char* jobu1, char* jobu2,
 17308                      char* jobv1t, char* jobv2t, char* trans,
 17309                      char* signs, lapack_int* m, lapack_int* p,
 17310                      lapack_int* q, lapack_complex_double* x11,
 17311                      lapack_int* ldx11, lapack_complex_double* x12,
 17312                      lapack_int* ldx12, lapack_complex_double* x21,
 17313                      lapack_int* ldx21, lapack_complex_double* x22,
 17314                      lapack_int* ldx22, double* theta,
 17315                      lapack_complex_double* u1, lapack_int* ldu1,
 17316                      lapack_complex_double* u2, lapack_int* ldu2,
 17317                      lapack_complex_double* v1t, lapack_int* ldv1t,
 17318                      lapack_complex_double* v2t, lapack_int* ldv2t,
 17319                      lapack_complex_double* work, lapack_int* lwork,
 17320                      double* rwork, lapack_int* lrwork,
 17321                      lapack_int* iwork , lapack_int *info );
 17322  void LAPACK_zuncsd2by1( char* jobu1, char* jobu2,
 17323                      char* jobv1t, lapack_int* m, lapack_int* p,
 17324                      lapack_int* q, lapack_complex_double* x11,
 17325                      lapack_int* ldx11, lapack_complex_double* x21,
 17326                      lapack_int* ldx21, lapack_complex_double* theta,
 17327                      lapack_complex_double* u1, lapack_int* ldu1,
 17328                      lapack_complex_double* u2, lapack_int* ldu2,
 17329                      lapack_complex_double* v1t, lapack_int* ldv1t,
 17330                      lapack_complex_double* work, lapack_int* lwork,
 17331                      double* rwork, lapack_int* lrwork,
 17332                      lapack_int* iwork , lapack_int *info );
 17333  // LAPACK 3.4.0
 17334  void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17335                       lapack_int* k, lapack_int* nb, const float* v,
 17336                       lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
 17337                       lapack_int* ldc, float* work, lapack_int *info );
 17338  void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17339                       lapack_int* k, lapack_int* nb, const double* v,
 17340                       lapack_int* ldv, const double* t, lapack_int* ldt,
 17341                       double* c, lapack_int* ldc, double* work,
 17342                       lapack_int *info );
 17343  void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17344                       lapack_int* k, lapack_int* nb,
 17345                       const lapack_complex_float* v, lapack_int* ldv,
 17346                       const lapack_complex_float* t, lapack_int* ldt,
 17347                       lapack_complex_float* c, lapack_int* ldc,
 17348                       lapack_complex_float* work, lapack_int *info );
 17349  void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17350                       lapack_int* k, lapack_int* nb,
 17351                       const lapack_complex_double* v, lapack_int* ldv,
 17352                       const lapack_complex_double* t, lapack_int* ldt,
 17353                       lapack_complex_double* c, lapack_int* ldc,
 17354                       lapack_complex_double* work, lapack_int *info );
 17355  void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
 17356                      lapack_int* lda, float* t, lapack_int* ldt, float* work,
 17357                      lapack_int *info );
 17358  void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
 17359                      lapack_int* lda, double* t, lapack_int* ldt, double* work,
 17360                      lapack_int *info );
 17361  void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
 17362                      lapack_complex_float* a, lapack_int* lda,
 17363                      lapack_complex_float* t, lapack_int* ldt,
 17364                      lapack_complex_float* work, lapack_int *info );
 17365  void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
 17366                      lapack_complex_double* a, lapack_int* lda,
 17367                      lapack_complex_double* t, lapack_int* ldt,
 17368                      lapack_complex_double* work, lapack_int *info );
 17369  void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 17370                       float* t, lapack_int* ldt, lapack_int *info );
 17371  void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 17372                       double* t, lapack_int* ldt, lapack_int *info );
 17373  void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 17374                       lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
 17375                       lapack_int *info );
 17376  void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 17377                       lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
 17378                       lapack_int *info );
 17379  void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
 17380                       float* t, lapack_int* ldt, lapack_int *info );
 17381  void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
 17382                       double* t, lapack_int* ldt, lapack_int *info );
 17383  void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
 17384                       lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
 17385                       lapack_int *info );
 17386  void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
 17387                       lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
 17388                       lapack_int *info );
 17389  void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17390                       lapack_int* k, lapack_int* l, lapack_int* nb,
 17391                       const float* v, lapack_int* ldv, const float* t,
 17392                       lapack_int* ldt, float* a, lapack_int* lda, float* b,
 17393                       lapack_int* ldb, float* work, lapack_int *info );
 17394  void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17395                       lapack_int* k, lapack_int* l, lapack_int* nb,
 17396                       const double* v, lapack_int* ldv, const double* t,
 17397                       lapack_int* ldt, double* a, lapack_int* lda, double* b,
 17398                       lapack_int* ldb, double* work, lapack_int *info );
 17399  void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17400                       lapack_int* k, lapack_int* l, lapack_int* nb,
 17401                       const lapack_complex_float* v, lapack_int* ldv,
 17402                       const lapack_complex_float* t, lapack_int* ldt,
 17403                       lapack_complex_float* a, lapack_int* lda,
 17404                       lapack_complex_float* b, lapack_int* ldb,
 17405                       lapack_complex_float* work, lapack_int *info );
 17406  void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
 17407                       lapack_int* k, lapack_int* l, lapack_int* nb,
 17408                       const lapack_complex_double* v, lapack_int* ldv,
 17409                       const lapack_complex_double* t, lapack_int* ldt,
 17410                       lapack_complex_double* a, lapack_int* lda,
 17411                       lapack_complex_double* b, lapack_int* ldb,
 17412                       lapack_complex_double* work, lapack_int *info );
 17413  void LAPACK_stpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
 17414                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
 17415                      float* t, lapack_int* ldt, float* work, lapack_int *info );
 17416  void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
 17417                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
 17418                      double* t, lapack_int* ldt, double* work,
 17419                      lapack_int *info );
 17420  void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
 17421                      lapack_complex_float* a, lapack_int* lda,
 17422                      lapack_complex_float* b, lapack_int* ldb,
 17423                      lapack_complex_float* t, lapack_int* ldt,
 17424                      lapack_complex_float* work, lapack_int *info );
 17425  void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
 17426                      lapack_complex_double* a, lapack_int* lda,
 17427                      lapack_complex_double* b, lapack_int* ldb,
 17428                      lapack_complex_double* t, lapack_int* ldt,
 17429                      lapack_complex_double* work, lapack_int *info );
 17430  void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
 17431                       float* a, lapack_int* lda,
 17432                       float* b, lapack_int* ldb,
 17433                       float* t, lapack_int* ldt,
 17434                       lapack_int *info );
 17435  void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
 17436                       double* a, lapack_int* lda,
 17437                       double* b, lapack_int* ldb,
 17438                       double* t, lapack_int* ldt,
 17439                       lapack_int *info );
 17440  void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
 17441                       lapack_complex_float* a, lapack_int* lda,
 17442                       lapack_complex_float* b, lapack_int* ldb,
 17443                       lapack_complex_float* t, lapack_int* ldt,
 17444                       lapack_int *info );
 17445  void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
 17446                       lapack_complex_double* a, lapack_int* lda,
 17447                       lapack_complex_double* b, lapack_int* ldb,
 17448                       lapack_complex_double* t, lapack_int* ldt,
 17449                       lapack_int *info );
 17450  void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
 17451                      lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
 17452                      const float* v, lapack_int* ldv, const float* t,
 17453                      lapack_int* ldt, float* a, lapack_int* lda, float* b,
 17454                      lapack_int* ldb, const float* work,
 17455                      lapack_int* ldwork );
 17456  void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
 17457                      lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
 17458                      const double* v, lapack_int* ldv, const double* t,
 17459                      lapack_int* ldt, double* a, lapack_int* lda, double* b,
 17460                      lapack_int* ldb, const double* work,
 17461                      lapack_int* ldwork );
 17462  void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
 17463                      lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
 17464                      const lapack_complex_float* v, lapack_int* ldv,
 17465                      const lapack_complex_float* t, lapack_int* ldt,
 17466                      lapack_complex_float* a, lapack_int* lda,
 17467                      lapack_complex_float* b, lapack_int* ldb,
 17468                      lapack_complex_float* work, lapack_int* ldwork );
 17469  void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
 17470                      lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
 17471                      const lapack_complex_double* v, lapack_int* ldv,
 17472                      const lapack_complex_double* t, lapack_int* ldt,
 17473                      lapack_complex_double* a, lapack_int* lda,
 17474                      lapack_complex_double* b, lapack_int* ldb,
 17475                      lapack_complex_double* work, lapack_int* ldwork );
 17476  // LAPACK 3.5.0
 17477  void LAPACK_ssysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
 17478                          lapack_int* lda, lapack_int* ipiv, float* b,
 17479                          lapack_int* ldb, float* work, lapack_int* lwork,
 17480                          lapack_int *info );
 17481  void LAPACK_ssytrf_rook( char* uplo, lapack_int* n, float* a, lapack_int* lda,
 17482                      lapack_int* ipiv, float* work, lapack_int* lwork,
 17483                      lapack_int *info );
 17484  void LAPACK_dsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
 17485                          lapack_int* lda, lapack_int* ipiv, double* b,
 17486                          lapack_int* ldb, double* work, lapack_int* lwork,
 17487                          lapack_int *info );
 17488  void LAPACK_dsytrf_rook( char* uplo, lapack_int* n, double* a, lapack_int* lda,
 17489                      lapack_int* ipiv, double* work, lapack_int* lwork,
 17490                      lapack_int *info );
 17491  void LAPACK_csysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17492                          lapack_complex_float* a, lapack_int* lda,
 17493                          lapack_int* ipiv, lapack_complex_float* b,
 17494                          lapack_int* ldb, lapack_complex_float* work,
 17495                          lapack_int* lwork, lapack_int *info );
 17496  void LAPACK_csytrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
 17497                      lapack_int* lda, lapack_int* ipiv,
 17498                      lapack_complex_float* work, lapack_int* lwork,
 17499                      lapack_int *info );
 17500  void LAPACK_zsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17501                          lapack_complex_double* a, lapack_int* lda,
 17502                          lapack_int* ipiv, lapack_complex_double* b,
 17503                          lapack_int* ldb, lapack_complex_double* work,
 17504                          lapack_int* lwork, lapack_int *info );
 17505  void LAPACK_zsytrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
 17506                      lapack_int* lda, lapack_int* ipiv,
 17507                      lapack_complex_double* work, lapack_int* lwork,
 17508                      lapack_int *info );
 17509  void LAPACK_ssytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
 17510                      lapack_int* lda, const lapack_int* ipiv, float* b,
 17511                      lapack_int* ldb, lapack_int *info );
 17512  void LAPACK_dsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17513                      const double* a, lapack_int* lda, const lapack_int* ipiv,
 17514                      double* b, lapack_int* ldb, lapack_int *info );
 17515  void LAPACK_csytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17516                      const lapack_complex_float* a, lapack_int* lda,
 17517                      const lapack_int* ipiv, lapack_complex_float* b,
 17518                      lapack_int* ldb, lapack_int *info );
 17519  void LAPACK_zsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17520                      const lapack_complex_double* a, lapack_int* lda,
 17521                      const lapack_int* ipiv, lapack_complex_double* b,
 17522                      lapack_int* ldb, lapack_int *info );
 17523  void LAPACK_chetrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
 17524                      lapack_int* lda, lapack_int* ipiv,
 17525                      lapack_complex_float* work, lapack_int* lwork,
 17526                      lapack_int *info );
 17527  void LAPACK_zhetrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
 17528                      lapack_int* lda, lapack_int* ipiv,
 17529                      lapack_complex_double* work, lapack_int* lwork,
 17530                      lapack_int *info );
 17531  void LAPACK_chetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17532                      const lapack_complex_float* a, lapack_int* lda,
 17533                      const lapack_int* ipiv, lapack_complex_float* b,
 17534                      lapack_int* ldb, lapack_int *info );
 17535  void LAPACK_zhetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
 17536                      const lapack_complex_double* a, lapack_int* lda,
 17537                      const lapack_int* ipiv, lapack_complex_double* b,
 17538                      lapack_int* ldb, lapack_int *info );
 17539  
 17540  void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
 17541                        const lapack_complex_float* x, lapack_int* incx,
 17542                        lapack_complex_float* a, lapack_int* lda );
 17543  void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
 17544                        const lapack_complex_double* x, lapack_int* incx,
 17545                        lapack_complex_double* a, lapack_int* lda );
 17546  void LAPACK_ilaver( const lapack_int* vers_major, const lapack_int* vers_minor,
 17547                       const lapack_int* vers_patch );
 17548  
 17549  #ifdef __cplusplus
 17550  }
 17551  #endif /* __cplusplus */
 17552  
 17553  #endif /* _LAPACKE_H_ */