LAPACKE/include/lapacke.h

   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                            float vl, float 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                            double vl, double 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, float vl, float 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, double vl, double 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, float vl, float 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, double vl, double 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                                  float vl, float 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                                  double vl, double 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, float vl, float 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, double vl, double 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, float vl, float 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, double vl, double 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 lda,
10476                              lapack_int i1, lapack_int i2 );
10477 lapack_int LAPACKE_cheswapr_work( int matrix_layout, char uplo, lapack_int n,
10478                                   lapack_complex_float* a, lapack_int lda,
10479                                   lapack_int i1, 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* e  );
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* e );
10510 lapack_int LAPACKE_csyswapr( int matrix_layout, char uplo, lapack_int n,
10511                              lapack_complex_float* a, lapack_int lda,
10512                              lapack_int i1, lapack_int i2 );
10513 lapack_int LAPACKE_csyswapr_work( int matrix_layout, char uplo, lapack_int n,
10514                                   lapack_complex_float* a, lapack_int lda,
10515                                   lapack_int i1, 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                            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                                 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* e);
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* e );
10676 lapack_int LAPACKE_dsyswapr( int matrix_layout, char uplo, lapack_int n,
10677                              double* a, lapack_int lda, lapack_int i1,
10678                              lapack_int i2 );
10679 lapack_int LAPACKE_dsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10680                                   double* a, lapack_int lda, lapack_int i1,
10681                                   lapack_int i2 );
10682 lapack_int LAPACKE_dsytri2( int matrix_layout, char uplo, lapack_int n,
10683                             double* a, lapack_int lda, const lapack_int* ipiv );
10684 lapack_int LAPACKE_dsytri2_work( int matrix_layout, char uplo, lapack_int n,
10685                                  double* a, lapack_int lda,
10686                                  const lapack_int* ipiv,
10687                                  double* work, lapack_int lwork );
10688 lapack_int LAPACKE_dsytri2x( int matrix_layout, char uplo, lapack_int n,
10689                              double* a, lapack_int lda, const lapack_int* ipiv,
10690                              lapack_int nb );
10691 lapack_int LAPACKE_dsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10692                                   double* a, lapack_int lda,
10693                                   const lapack_int* ipiv, double* work,
10694                                   lapack_int nb );
10695 lapack_int LAPACKE_dsytrs2( int matrix_layout, char uplo, lapack_int n,
10696                             lapack_int nrhs, const double* a, lapack_int lda,
10697                             const lapack_int* ipiv, double* b, lapack_int ldb );
10698 lapack_int LAPACKE_dsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10699                                  lapack_int nrhs, const double* a,
10700                                  lapack_int lda, const lapack_int* ipiv,
10701                                  double* b, lapack_int ldb, double* work );
10702 lapack_int LAPACKE_sbbcsd( int matrix_layout, char jobu1, char jobu2,
10703                            char jobv1t, char jobv2t, char trans, lapack_int m,
10704                            lapack_int p, lapack_int q, float* theta, float* phi,
10705                            float* u1, lapack_int ldu1, float* u2,
10706                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10707                            float* v2t, lapack_int ldv2t, float* b11d,
10708                            float* b11e, float* b12d, float* b12e, float* b21d,
10709                            float* b21e, float* b22d, float* b22e );
10710 lapack_int LAPACKE_sbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10711                                 char jobv1t, char jobv2t, char trans,
10712                                 lapack_int m, lapack_int p, lapack_int q,
10713                                 float* theta, float* phi, float* u1,
10714                                 lapack_int ldu1, float* u2, lapack_int ldu2,
10715                                 float* v1t, lapack_int ldv1t, float* v2t,
10716                                 lapack_int ldv2t, float* b11d, float* b11e,
10717                                 float* b12d, float* b12e, float* b21d,
10718                                 float* b21e, float* b22d, float* b22e,
10719                                 float* work, lapack_int lwork );
10720 lapack_int LAPACKE_sorbdb( int matrix_layout, char trans, char signs,
10721                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10722                            lapack_int ldx11, float* x12, lapack_int ldx12,
10723                            float* x21, lapack_int ldx21, float* x22,
10724                            lapack_int ldx22, float* theta, float* phi,
10725                            float* taup1, float* taup2, float* tauq1,
10726                            float* tauq2 );
10727 lapack_int LAPACKE_sorbdb_work( int matrix_layout, char trans, char signs,
10728                                 lapack_int m, lapack_int p, lapack_int q,
10729                                 float* x11, lapack_int ldx11, float* x12,
10730                                 lapack_int ldx12, float* x21, lapack_int ldx21,
10731                                 float* x22, lapack_int ldx22, float* theta,
10732                                 float* phi, float* taup1, float* taup2,
10733                                 float* tauq1, float* tauq2, float* work,
10734                                 lapack_int lwork );
10735 lapack_int LAPACKE_sorcsd( int matrix_layout, char jobu1, char jobu2,
10736                            char jobv1t, char jobv2t, char trans, char signs,
10737                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10738                            lapack_int ldx11, float* x12, lapack_int ldx12,
10739                            float* x21, lapack_int ldx21, float* x22,
10740                            lapack_int ldx22, float* theta, float* u1,
10741                            lapack_int ldu1, float* u2, lapack_int ldu2,
10742                            float* v1t, lapack_int ldv1t, float* v2t,
10743                            lapack_int ldv2t );
10744 lapack_int LAPACKE_sorcsd_work( int matrix_layout, char jobu1, char jobu2,
10745                                 char jobv1t, char jobv2t, char trans,
10746                                 char signs, lapack_int m, lapack_int p,
10747                                 lapack_int q, float* x11, lapack_int ldx11,
10748                                 float* x12, lapack_int ldx12, float* x21,
10749                                 lapack_int ldx21, float* x22, lapack_int ldx22,
10750                                 float* theta, float* u1, lapack_int ldu1,
10751                                 float* u2, lapack_int ldu2, float* v1t,
10752                                 lapack_int ldv1t, float* v2t, lapack_int ldv2t,
10753                                 float* work, lapack_int lwork,
10754                                 lapack_int* iwork );
10755 lapack_int LAPACKE_sorcsd2by1( int matrix_layout, char jobu1, char jobu2,
10756                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10757                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10758                            float* theta, float* u1, lapack_int ldu1, float* u2,
10759                            lapack_int ldu2, float* v1t, lapack_int ldv1t);
10760 lapack_int LAPACKE_sorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10761                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10762                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10763                            float* theta, float* u1, lapack_int ldu1, float* u2,
10764                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10765                            float* work, lapack_int lwork, lapack_int* iwork );
10766 lapack_int LAPACKE_ssyconv( int matrix_layout, char uplo, char way, lapack_int n,
10767                             float* a, lapack_int lda, const lapack_int* ipiv, float* e );
10768 lapack_int LAPACKE_ssyconv_work( int matrix_layout, char uplo, char way,
10769                                  lapack_int n, float* a, lapack_int lda,
10770                                  const lapack_int* ipiv, float* e );
10771 lapack_int LAPACKE_ssyswapr( int matrix_layout, char uplo, lapack_int n,
10772                              float* a, lapack_int lda, lapack_int i1,
10773                              lapack_int i2 );
10774 lapack_int LAPACKE_ssyswapr_work( int matrix_layout, char uplo, lapack_int n,
10775                                   float* a, lapack_int lda, lapack_int i1,
10776                                   lapack_int i2 );
10777 lapack_int LAPACKE_ssytri2( int matrix_layout, char uplo, lapack_int n, float* a,
10778                             lapack_int lda, const lapack_int* ipiv );
10779 lapack_int LAPACKE_ssytri2_work( int matrix_layout, char uplo, lapack_int n,
10780                                  float* a, lapack_int lda,
10781                                  const lapack_int* ipiv,
10782                                  float* work, lapack_int lwork );
10783 lapack_int LAPACKE_ssytri2x( int matrix_layout, char uplo, lapack_int n,
10784                              float* a, lapack_int lda, const lapack_int* ipiv,
10785                              lapack_int nb );
10786 lapack_int LAPACKE_ssytri2x_work( int matrix_layout, char uplo, lapack_int n,
10787                                   float* a, lapack_int lda,
10788                                   const lapack_int* ipiv, float* work,
10789                                   lapack_int nb );
10790 lapack_int LAPACKE_ssytrs2( int matrix_layout, char uplo, lapack_int n,
10791                             lapack_int nrhs, const float* a, lapack_int lda,
10792                             const lapack_int* ipiv, float* b, lapack_int ldb );
10793 lapack_int LAPACKE_ssytrs2_work( int matrix_layout, char uplo, lapack_int n,
10794                                  lapack_int nrhs, const float* a,
10795                                  lapack_int lda, const lapack_int* ipiv,
10796                                  float* b, lapack_int ldb, float* work );
10797 lapack_int LAPACKE_zbbcsd( int matrix_layout, char jobu1, char jobu2,
10798                            char jobv1t, char jobv2t, char trans, lapack_int m,
10799                            lapack_int p, lapack_int q, double* theta,
10800                            double* phi, lapack_complex_double* u1,
10801                            lapack_int ldu1, lapack_complex_double* u2,
10802                            lapack_int ldu2, lapack_complex_double* v1t,
10803                            lapack_int ldv1t, lapack_complex_double* v2t,
10804                            lapack_int ldv2t, double* b11d, double* b11e,
10805                            double* b12d, double* b12e, double* b21d,
10806                            double* b21e, double* b22d, double* b22e );
10807 lapack_int LAPACKE_zbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10808                                 char jobv1t, char jobv2t, char trans,
10809                                 lapack_int m, lapack_int p, lapack_int q,
10810                                 double* theta, double* phi,
10811                                 lapack_complex_double* u1, lapack_int ldu1,
10812                                 lapack_complex_double* u2, lapack_int ldu2,
10813                                 lapack_complex_double* v1t, lapack_int ldv1t,
10814                                 lapack_complex_double* v2t, lapack_int ldv2t,
10815                                 double* b11d, double* b11e, double* b12d,
10816                                 double* b12e, double* b21d, double* b21e,
10817                                 double* b22d, double* b22e, double* rwork,
10818                                 lapack_int lrwork );
10819 lapack_int LAPACKE_zheswapr( int matrix_layout, char uplo, lapack_int n,
10820                              lapack_complex_double* a, lapack_int lda,
10821                              lapack_int i1, lapack_int i2 );
10822 lapack_int LAPACKE_zheswapr_work( int matrix_layout, char uplo, lapack_int n,
10823                                   lapack_complex_double* a, lapack_int lda,
10824                                   lapack_int i1, lapack_int i2 );
10825 lapack_int LAPACKE_zhetri2( int matrix_layout, char uplo, lapack_int n,
10826                             lapack_complex_double* a, lapack_int lda,
10827                             const lapack_int* ipiv );
10828 lapack_int LAPACKE_zhetri2_work( int matrix_layout, char uplo, lapack_int n,
10829                                  lapack_complex_double* a, lapack_int lda,
10830                                  const lapack_int* ipiv,
10831                                  lapack_complex_double* work, lapack_int lwork );
10832 lapack_int LAPACKE_zhetri2x( int matrix_layout, char uplo, lapack_int n,
10833                              lapack_complex_double* a, lapack_int lda,
10834                              const lapack_int* ipiv, lapack_int nb );
10835 lapack_int LAPACKE_zhetri2x_work( int matrix_layout, char uplo, lapack_int n,
10836                                   lapack_complex_double* a, lapack_int lda,
10837                                   const lapack_int* ipiv,
10838                                   lapack_complex_double* work, lapack_int nb );
10839 lapack_int LAPACKE_zhetrs2( 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_int LAPACKE_zhetrs2_work( int matrix_layout, char uplo, lapack_int n,
10844                                  lapack_int nrhs, const lapack_complex_double* a,
10845                                  lapack_int lda, const lapack_int* ipiv,
10846                                  lapack_complex_double* b, lapack_int ldb,
10847                                  lapack_complex_double* work );
10848 lapack_int LAPACKE_zsyconv( int matrix_layout, char uplo, char way, lapack_int n,
10849                             lapack_complex_double* a, lapack_int lda,
10850                             const lapack_int* ipiv, lapack_complex_double* e );
10851 lapack_int LAPACKE_zsyconv_work( int matrix_layout, char uplo, char way,
10852                                  lapack_int n, lapack_complex_double* a,
10853                                  lapack_int lda, const lapack_int* ipiv,
10854                                  lapack_complex_double* e );
10855 lapack_int LAPACKE_zsyswapr( int matrix_layout, char uplo, lapack_int n,
10856                              lapack_complex_double* a, lapack_int lda,
10857                              lapack_int i1, lapack_int i2 );
10858 lapack_int LAPACKE_zsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10859                                   lapack_complex_double* a, lapack_int lda,
10860                                   lapack_int i1, lapack_int i2 );
10861 lapack_int LAPACKE_zsytri2( int matrix_layout, char uplo, lapack_int n,
10862                             lapack_complex_double* a, lapack_int lda,
10863                             const lapack_int* ipiv );
10864 lapack_int LAPACKE_zsytri2_work( int matrix_layout, char uplo, lapack_int n,
10865                                  lapack_complex_double* a, lapack_int lda,
10866                                  const lapack_int* ipiv,
10867                                  lapack_complex_double* work, lapack_int lwork );
10868 lapack_int LAPACKE_zsytri2x( int matrix_layout, char uplo, lapack_int n,
10869                              lapack_complex_double* a, lapack_int lda,
10870                              const lapack_int* ipiv, lapack_int nb );
10871 lapack_int LAPACKE_zsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10872                                   lapack_complex_double* a, lapack_int lda,
10873                                   const lapack_int* ipiv,
10874                                   lapack_complex_double* work, lapack_int nb );
10875 lapack_int LAPACKE_zsytrs2( 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_int LAPACKE_zsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10880                                  lapack_int nrhs, const lapack_complex_double* a,
10881                                  lapack_int lda, const lapack_int* ipiv,
10882                                  lapack_complex_double* b, lapack_int ldb,
10883                                  lapack_complex_double* work );
10884 lapack_int LAPACKE_zunbdb( int matrix_layout, char trans, char signs,
10885                            lapack_int m, lapack_int p, lapack_int q,
10886                            lapack_complex_double* x11, lapack_int ldx11,
10887                            lapack_complex_double* x12, lapack_int ldx12,
10888                            lapack_complex_double* x21, lapack_int ldx21,
10889                            lapack_complex_double* x22, lapack_int ldx22,
10890                            double* theta, double* phi,
10891                            lapack_complex_double* taup1,
10892                            lapack_complex_double* taup2,
10893                            lapack_complex_double* tauq1,
10894                            lapack_complex_double* tauq2 );
10895 lapack_int LAPACKE_zunbdb_work( int matrix_layout, char trans, char signs,
10896                                 lapack_int m, lapack_int p, lapack_int q,
10897                                 lapack_complex_double* x11, lapack_int ldx11,
10898                                 lapack_complex_double* x12, lapack_int ldx12,
10899                                 lapack_complex_double* x21, lapack_int ldx21,
10900                                 lapack_complex_double* x22, lapack_int ldx22,
10901                                 double* theta, double* phi,
10902                                 lapack_complex_double* taup1,
10903                                 lapack_complex_double* taup2,
10904                                 lapack_complex_double* tauq1,
10905                                 lapack_complex_double* tauq2,
10906                                 lapack_complex_double* work, lapack_int lwork );
10907 lapack_int LAPACKE_zuncsd( int matrix_layout, char jobu1, char jobu2,
10908                            char jobv1t, char jobv2t, char trans, char signs,
10909                            lapack_int m, lapack_int p, lapack_int q,
10910                            lapack_complex_double* x11, lapack_int ldx11,
10911                            lapack_complex_double* x12, lapack_int ldx12,
10912                            lapack_complex_double* x21, lapack_int ldx21,
10913                            lapack_complex_double* x22, lapack_int ldx22,
10914                            double* theta, lapack_complex_double* u1,
10915                            lapack_int ldu1, lapack_complex_double* u2,
10916                            lapack_int ldu2, lapack_complex_double* v1t,
10917                            lapack_int ldv1t, lapack_complex_double* v2t,
10918                            lapack_int ldv2t );
10919 lapack_int LAPACKE_zuncsd_work( int matrix_layout, char jobu1, char jobu2,
10920                                 char jobv1t, char jobv2t, char trans,
10921                                 char signs, lapack_int m, lapack_int p,
10922                                 lapack_int q, lapack_complex_double* x11,
10923                                 lapack_int ldx11, lapack_complex_double* x12,
10924                                 lapack_int ldx12, lapack_complex_double* x21,
10925                                 lapack_int ldx21, lapack_complex_double* x22,
10926                                 lapack_int ldx22, double* theta,
10927                                 lapack_complex_double* u1, lapack_int ldu1,
10928                                 lapack_complex_double* u2, lapack_int ldu2,
10929                                 lapack_complex_double* v1t, lapack_int ldv1t,
10930                                 lapack_complex_double* v2t, lapack_int ldv2t,
10931                                 lapack_complex_double* work, lapack_int lwork,
10932                                 double* rwork, lapack_int lrwork,
10933                                 lapack_int* iwork );
10934 lapack_int LAPACKE_zuncsd2by1( int matrix_layout, char jobu1, char jobu2,
10935                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10936                            lapack_complex_double* x11, lapack_int ldx11,
10937                            lapack_complex_double* x21, lapack_int ldx21,
10938                            double* theta, lapack_complex_double* u1,
10939                            lapack_int ldu1, lapack_complex_double* u2,
10940                            lapack_int ldu2, lapack_complex_double* v1t, lapack_int ldv1t );
10941 lapack_int LAPACKE_zuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10942                                 char jobv1t, lapack_int m, lapack_int p,
10943                                 lapack_int q, lapack_complex_double* x11, lapack_int ldx11,
10944                                 lapack_complex_double* x21, lapack_int ldx21,
10945                                 double* theta, lapack_complex_double* u1,
10946                                 lapack_int ldu1, lapack_complex_double* u2,
10947                                 lapack_int ldu2, lapack_complex_double* v1t,
10948                                 lapack_int ldv1t, lapack_complex_double* work,
10949                                 lapack_int lwork, double* rwork, lapack_int lrwork,
10950                                 lapack_int* iwork );
10951
10952 //LAPACK 3.4.0
10953 lapack_int LAPACKE_sgemqrt( int matrix_layout, char side, char trans,
10954                             lapack_int m, lapack_int n, lapack_int k,
10955                             lapack_int nb, const float* v, lapack_int ldv,
10956                             const float* t, lapack_int ldt, float* c,
10957                             lapack_int ldc );
10958 lapack_int LAPACKE_dgemqrt( int matrix_layout, char side, char trans,
10959                             lapack_int m, lapack_int n, lapack_int k,
10960                             lapack_int nb, const double* v, lapack_int ldv,
10961                             const double* t, lapack_int ldt, double* c,
10962                             lapack_int ldc );
10963 lapack_int LAPACKE_cgemqrt( int matrix_layout, char side, char trans,
10964                             lapack_int m, lapack_int n, lapack_int k,
10965                             lapack_int nb, const lapack_complex_float* v,
10966                             lapack_int ldv, const lapack_complex_float* t,
10967                             lapack_int ldt, lapack_complex_float* c,
10968                             lapack_int ldc );
10969 lapack_int LAPACKE_zgemqrt( int matrix_layout, char side, char trans,
10970                             lapack_int m, lapack_int n, lapack_int k,
10971                             lapack_int nb, const lapack_complex_double* v,
10972                             lapack_int ldv, const lapack_complex_double* t,
10973                             lapack_int ldt, lapack_complex_double* c,
10974                             lapack_int ldc );
10975
10976 lapack_int LAPACKE_sgeqrt( int matrix_layout, lapack_int m, lapack_int n,
10977                            lapack_int nb, float* a, lapack_int lda, float* t,
10978                            lapack_int ldt );
10979 lapack_int LAPACKE_dgeqrt( int matrix_layout, lapack_int m, lapack_int n,
10980                            lapack_int nb, double* a, lapack_int lda, double* t,
10981                            lapack_int ldt );
10982 lapack_int LAPACKE_cgeqrt( int matrix_layout, lapack_int m, lapack_int n,
10983                            lapack_int nb, lapack_complex_float* a,
10984                            lapack_int lda, lapack_complex_float* t,
10985                            lapack_int ldt );
10986 lapack_int LAPACKE_zgeqrt( int matrix_layout, lapack_int m, lapack_int n,
10987                            lapack_int nb, lapack_complex_double* a,
10988                            lapack_int lda, lapack_complex_double* t,
10989                            lapack_int ldt );
10990
10991 lapack_int LAPACKE_sgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
10992                             float* a, lapack_int lda, float* t,
10993                             lapack_int ldt );
10994 lapack_int LAPACKE_dgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
10995                             double* a, lapack_int lda, double* t,
10996                             lapack_int ldt );
10997 lapack_int LAPACKE_cgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
10998                             lapack_complex_float* a, lapack_int lda,
10999                             lapack_complex_float* t, lapack_int ldt );
11000 lapack_int LAPACKE_zgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11001                             lapack_complex_double* a, lapack_int lda,
11002                             lapack_complex_double* t, lapack_int ldt );
11003
11004 lapack_int LAPACKE_sgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11005                             float* a, lapack_int lda, float* t,
11006                             lapack_int ldt );
11007 lapack_int LAPACKE_dgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11008                             double* a, lapack_int lda, double* t,
11009                             lapack_int ldt );
11010 lapack_int LAPACKE_cgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11011                             lapack_complex_float* a, lapack_int lda,
11012                             lapack_complex_float* t, lapack_int ldt );
11013 lapack_int LAPACKE_zgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11014                             lapack_complex_double* a, lapack_int lda,
11015                             lapack_complex_double* t, lapack_int ldt );
11016
11017 lapack_int LAPACKE_stpmqrt( int matrix_layout, char side, char trans,
11018                             lapack_int m, lapack_int n, lapack_int k,
11019                             lapack_int l, lapack_int nb, const float* v,
11020                             lapack_int ldv, const float* t, lapack_int ldt,
11021                             float* a, lapack_int lda, float* b,
11022                             lapack_int ldb );
11023 lapack_int LAPACKE_dtpmqrt( int matrix_layout, char side, char trans,
11024                             lapack_int m, lapack_int n, lapack_int k,
11025                             lapack_int l, lapack_int nb, const double* v,
11026                             lapack_int ldv, const double* t, lapack_int ldt,
11027                             double* a, lapack_int lda, double* b,
11028                             lapack_int ldb );
11029 lapack_int LAPACKE_ctpmqrt( int matrix_layout, char side, char trans,
11030                             lapack_int m, lapack_int n, lapack_int k,
11031                             lapack_int l, lapack_int nb,
11032                             const lapack_complex_float* v, lapack_int ldv,
11033                             const lapack_complex_float* t, lapack_int ldt,
11034                             lapack_complex_float* a, lapack_int lda,
11035                             lapack_complex_float* b, lapack_int ldb );
11036 lapack_int LAPACKE_ztpmqrt( int matrix_layout, char side, char trans,
11037                             lapack_int m, lapack_int n, lapack_int k,
11038                             lapack_int l, lapack_int nb,
11039                             const lapack_complex_double* v, lapack_int ldv,
11040                             const lapack_complex_double* t, lapack_int ldt,
11041                             lapack_complex_double* a, lapack_int lda,
11042                             lapack_complex_double* b, lapack_int ldb );
11043
11044 lapack_int LAPACKE_stpqrt( int matrix_layout, lapack_int m, lapack_int n,
11045                            lapack_int l, lapack_int nb, float* a,
11046                            lapack_int lda, float* b, lapack_int ldb, float* t,
11047                            lapack_int ldt );
11048
11049 lapack_int LAPACKE_dtpqrt( int matrix_layout, lapack_int m, lapack_int n,
11050                            lapack_int l, lapack_int nb, double* a,
11051                            lapack_int lda, double* b, lapack_int ldb, double* t,
11052                            lapack_int ldt );
11053 lapack_int LAPACKE_ctpqrt( int matrix_layout, lapack_int m, lapack_int n,
11054                            lapack_int l, lapack_int nb,
11055                            lapack_complex_float* a, lapack_int lda,
11056                            lapack_complex_float* b, lapack_int ldb,
11057                            lapack_complex_float* t, lapack_int ldt );
11058 lapack_int LAPACKE_ztpqrt( int matrix_layout, lapack_int m, lapack_int n,
11059                            lapack_int l, lapack_int nb,
11060                            lapack_complex_double* a, lapack_int lda,
11061                            lapack_complex_double* b, lapack_int ldb,
11062                            lapack_complex_double* t, lapack_int ldt );
11063
11064 lapack_int LAPACKE_stpqrt2( int matrix_layout,
11065                             lapack_int m, lapack_int n, lapack_int l,
11066                             float* a, lapack_int lda,
11067                             float* b, lapack_int ldb,
11068                             float* t, lapack_int ldt );
11069 lapack_int LAPACKE_dtpqrt2( int matrix_layout,
11070                             lapack_int m, lapack_int n, lapack_int l,
11071                             double* a, lapack_int lda,
11072                             double* b, lapack_int ldb,
11073                             double* t, lapack_int ldt );
11074 lapack_int LAPACKE_ctpqrt2( int matrix_layout,
11075                             lapack_int m, lapack_int n, lapack_int l,
11076                             lapack_complex_float* a, lapack_int lda,
11077                             lapack_complex_float* b, lapack_int ldb,
11078                             lapack_complex_float* t, lapack_int ldt );
11079 lapack_int LAPACKE_ztpqrt2( int matrix_layout,
11080                             lapack_int m, lapack_int n, lapack_int l,
11081                             lapack_complex_double* a, lapack_int lda,
11082                             lapack_complex_double* b, lapack_int ldb,
11083                             lapack_complex_double* t, lapack_int ldt );
11084
11085 lapack_int LAPACKE_stprfb( int matrix_layout, char side, char trans, char direct,
11086                            char storev, lapack_int m, lapack_int n,
11087                            lapack_int k, lapack_int l, const float* v,
11088                            lapack_int ldv, const float* t, lapack_int ldt,
11089                            float* a, lapack_int lda, float* b, lapack_int ldb );
11090 lapack_int LAPACKE_dtprfb( int matrix_layout, char side, char trans, char direct,
11091                            char storev, lapack_int m, lapack_int n,
11092                            lapack_int k, lapack_int l, const double* v,
11093                            lapack_int ldv, const double* t, lapack_int ldt,
11094                            double* a, lapack_int lda, double* b, lapack_int ldb );
11095 lapack_int LAPACKE_ctprfb( int matrix_layout, char side, char trans, char direct,
11096                            char storev, lapack_int m, lapack_int n,
11097                            lapack_int k, lapack_int l,
11098                            const lapack_complex_float* v, lapack_int ldv,
11099                            const lapack_complex_float* t, lapack_int ldt,
11100                            lapack_complex_float* a, lapack_int lda,
11101                            lapack_complex_float* b, lapack_int ldb );
11102 lapack_int LAPACKE_ztprfb( int matrix_layout, char side, char trans, char direct,
11103                            char storev, lapack_int m, lapack_int n,
11104                            lapack_int k, lapack_int l,
11105                            const lapack_complex_double* v, lapack_int ldv,
11106                            const lapack_complex_double* t, lapack_int ldt,
11107                            lapack_complex_double* a, lapack_int lda,
11108                            lapack_complex_double* b, lapack_int ldb );
11109
11110 lapack_int LAPACKE_sgemqrt_work( int matrix_layout, char side, char trans,
11111                                  lapack_int m, lapack_int n, lapack_int k,
11112                                  lapack_int nb, const float* v, lapack_int ldv,
11113                                  const float* t, lapack_int ldt, float* c,
11114                                  lapack_int ldc, float* work );
11115 lapack_int LAPACKE_dgemqrt_work( int matrix_layout, char side, char trans,
11116                                  lapack_int m, lapack_int n, lapack_int k,
11117                                  lapack_int nb, const double* v, lapack_int ldv,
11118                                  const double* t, lapack_int ldt, double* c,
11119                                  lapack_int ldc, double* work );
11120 lapack_int LAPACKE_cgemqrt_work( int matrix_layout, char side, char trans,
11121                                  lapack_int m, lapack_int n, lapack_int k,
11122                                  lapack_int nb, const lapack_complex_float* v,
11123                                  lapack_int ldv, const lapack_complex_float* t,
11124                                  lapack_int ldt, lapack_complex_float* c,
11125                                  lapack_int ldc, lapack_complex_float* work );
11126 lapack_int LAPACKE_zgemqrt_work( int matrix_layout, char side, char trans,
11127                                  lapack_int m, lapack_int n, lapack_int k,
11128                                  lapack_int nb, const lapack_complex_double* v,
11129                                  lapack_int ldv, const lapack_complex_double* t,
11130                                  lapack_int ldt, lapack_complex_double* c,
11131                                  lapack_int ldc, lapack_complex_double* work );
11132
11133 lapack_int LAPACKE_sgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11134                                 lapack_int nb, float* a, lapack_int lda,
11135                                 float* t, lapack_int ldt, float* work );
11136 lapack_int LAPACKE_dgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11137                                 lapack_int nb, double* a, lapack_int lda,
11138                                 double* t, lapack_int ldt, double* work );
11139 lapack_int LAPACKE_cgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11140                                 lapack_int nb, lapack_complex_float* a,
11141                                 lapack_int lda, lapack_complex_float* t,
11142                                 lapack_int ldt, lapack_complex_float* work );
11143 lapack_int LAPACKE_zgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11144                                 lapack_int nb, lapack_complex_double* a,
11145                                 lapack_int lda, lapack_complex_double* t,
11146                                 lapack_int ldt, lapack_complex_double* work );
11147
11148 lapack_int LAPACKE_sgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11149                                  float* a, lapack_int lda, float* t,
11150                                  lapack_int ldt );
11151 lapack_int LAPACKE_dgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11152                                  double* a, lapack_int lda, double* t,
11153                                  lapack_int ldt );
11154 lapack_int LAPACKE_cgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11155                                  lapack_complex_float* a, lapack_int lda,
11156                                  lapack_complex_float* t, lapack_int ldt );
11157 lapack_int LAPACKE_zgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11158                                  lapack_complex_double* a, lapack_int lda,
11159                                  lapack_complex_double* t, lapack_int ldt );
11160
11161 lapack_int LAPACKE_sgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11162                                  float* a, lapack_int lda, float* t,
11163                                  lapack_int ldt );
11164 lapack_int LAPACKE_dgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11165                                  double* a, lapack_int lda, double* t,
11166                                  lapack_int ldt );
11167 lapack_int LAPACKE_cgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11168                                  lapack_complex_float* a, lapack_int lda,
11169                                  lapack_complex_float* t, lapack_int ldt );
11170 lapack_int LAPACKE_zgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11171                                  lapack_complex_double* a, lapack_int lda,
11172                                  lapack_complex_double* t, lapack_int ldt );
11173
11174 lapack_int LAPACKE_stpmqrt_work( int matrix_layout, char side, char trans,
11175                                  lapack_int m, lapack_int n, lapack_int k,
11176                                  lapack_int l, lapack_int nb, const float* v,
11177                                  lapack_int ldv, const float* t, lapack_int ldt,
11178                                  float* a, lapack_int lda, float* b,
11179                                  lapack_int ldb, float* work );
11180 lapack_int LAPACKE_dtpmqrt_work( int matrix_layout, char side, char trans,
11181                                  lapack_int m, lapack_int n, lapack_int k,
11182                                  lapack_int l, lapack_int nb, const double* v,
11183                                  lapack_int ldv, const double* t,
11184                                  lapack_int ldt, double* a, lapack_int lda,
11185                                  double* b, lapack_int ldb, double* work );
11186 lapack_int LAPACKE_ctpmqrt_work( int matrix_layout, char side, char trans,
11187                                  lapack_int m, lapack_int n, lapack_int k,
11188                                  lapack_int l, lapack_int nb,
11189                                  const lapack_complex_float* v, lapack_int ldv,
11190                                  const lapack_complex_float* t, lapack_int ldt,
11191                                  lapack_complex_float* a, lapack_int lda,
11192                                  lapack_complex_float* b, lapack_int ldb,
11193                                  lapack_complex_float* work );
11194 lapack_int LAPACKE_ztpmqrt_work( int matrix_layout, char side, char trans,
11195                                  lapack_int m, lapack_int n, lapack_int k,
11196                                  lapack_int l, lapack_int nb,
11197                                  const lapack_complex_double* v, lapack_int ldv,
11198                                  const lapack_complex_double* t, lapack_int ldt,
11199                                  lapack_complex_double* a, lapack_int lda,
11200                                  lapack_complex_double* b, lapack_int ldb,
11201                                  lapack_complex_double* work );
11202
11203 lapack_int LAPACKE_stpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11204                                 lapack_int l, lapack_int nb, float* a,
11205                                 lapack_int lda, float* b, lapack_int ldb,
11206                                 float* t, lapack_int ldt, float* work );
11207 lapack_int LAPACKE_dtpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11208                                 lapack_int l, lapack_int nb, double* a,
11209                                 lapack_int lda, double* b, lapack_int ldb,
11210                                 double* t, lapack_int ldt, double* work );
11211 lapack_int LAPACKE_ctpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11212                                 lapack_int l, lapack_int nb,
11213                                 lapack_complex_float* a, lapack_int lda,
11214                                 lapack_complex_float* b, lapack_int ldb,
11215                                 lapack_complex_float* t, lapack_int ldt,
11216                                 lapack_complex_float* work );
11217 lapack_int LAPACKE_ztpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11218                                 lapack_int l, lapack_int nb,
11219                                 lapack_complex_double* a, lapack_int lda,
11220                                 lapack_complex_double* b, lapack_int ldb,
11221                                 lapack_complex_double* t, lapack_int ldt,
11222                                 lapack_complex_double* work );
11223
11224 lapack_int LAPACKE_stpqrt2_work( int matrix_layout,
11225                                  lapack_int m, lapack_int n, lapack_int l,
11226                                  float* a, lapack_int lda,
11227                                  float* b, lapack_int ldb,
11228                                  float* t, lapack_int ldt );
11229 lapack_int LAPACKE_dtpqrt2_work( int matrix_layout,
11230                                  lapack_int m, lapack_int n, lapack_int l,
11231                                  double* a, lapack_int lda,
11232                                  double* b, lapack_int ldb,
11233                                  double* t, lapack_int ldt );
11234 lapack_int LAPACKE_ctpqrt2_work( int matrix_layout,
11235                                  lapack_int m, lapack_int n, lapack_int l,
11236                                  lapack_complex_float* a, lapack_int lda,
11237                                  lapack_complex_float* b, lapack_int ldb,
11238                                  lapack_complex_float* t, lapack_int ldt );
11239 lapack_int LAPACKE_ztpqrt2_work( int matrix_layout,
11240                                  lapack_int m, lapack_int n, lapack_int l,
11241                                  lapack_complex_double* a, lapack_int lda,
11242                                  lapack_complex_double* b, lapack_int ldb,
11243                                  lapack_complex_double* t, lapack_int ldt );
11244
11245 lapack_int LAPACKE_stprfb_work( int matrix_layout, char side, char trans,
11246                                 char direct, char storev, lapack_int m,
11247                                 lapack_int n, lapack_int k, lapack_int l,
11248                                 const float* v, lapack_int ldv, const float* t,
11249                                 lapack_int ldt, float* a, lapack_int lda,
11250                                 float* b, lapack_int ldb, float* work,
11251                                 lapack_int ldwork );
11252 lapack_int LAPACKE_dtprfb_work( int matrix_layout, char side, char trans,
11253                                 char direct, char storev, lapack_int m,
11254                                 lapack_int n, lapack_int k, lapack_int l,
11255                                 const double* v, lapack_int ldv,
11256                                 const double* t, lapack_int ldt, double* a,
11257                                 lapack_int lda, double* b, lapack_int ldb,
11258                                 double* work, lapack_int ldwork );
11259 lapack_int LAPACKE_ctprfb_work( int matrix_layout, char side, char trans,
11260                                 char direct, char storev, lapack_int m,
11261                                 lapack_int n, lapack_int k, lapack_int l,
11262                                 const lapack_complex_float* v, lapack_int ldv,
11263                                 const lapack_complex_float* t, lapack_int ldt,
11264                                 lapack_complex_float* a, lapack_int lda,
11265                                 lapack_complex_float* b, lapack_int ldb,
11266                                 lapack_complex_float* work, lapack_int ldwork );
11267 lapack_int LAPACKE_ztprfb_work( int matrix_layout, char side, char trans,
11268                                 char direct, char storev, lapack_int m,
11269                                 lapack_int n, lapack_int k, lapack_int l,
11270                                 const lapack_complex_double* v, lapack_int ldv,
11271                                 const lapack_complex_double* t, lapack_int ldt,
11272                                 lapack_complex_double* a, lapack_int lda,
11273                                 lapack_complex_double* b, lapack_int ldb,
11274                                 lapack_complex_double* work, lapack_int ldwork );
11275 //LAPACK 3.X.X
11276 lapack_int LAPACKE_ssysv_rook( int matrix_layout, char uplo, lapack_int n,
11277                                lapack_int nrhs, float* a, lapack_int lda,
11278                                lapack_int* ipiv, float* b, lapack_int ldb );
11279 lapack_int LAPACKE_dsysv_rook( int matrix_layout, char uplo, lapack_int n,
11280                                lapack_int nrhs, double* a, lapack_int lda,
11281                                lapack_int* ipiv, double* b, lapack_int ldb );
11282 lapack_int LAPACKE_csysv_rook( int matrix_layout, char uplo, lapack_int n,
11283                                lapack_int nrhs, lapack_complex_float* a,
11284                                lapack_int lda, lapack_int* ipiv,
11285                                lapack_complex_float* b, lapack_int ldb );
11286 lapack_int LAPACKE_zsysv_rook( int matrix_layout, char uplo, lapack_int n,
11287                                lapack_int nrhs, lapack_complex_double* a,
11288                                lapack_int lda, lapack_int* ipiv,
11289                                lapack_complex_double* b, lapack_int ldb );
11290
11291 lapack_int LAPACKE_ssytrf_rook( int matrix_layout, char uplo, lapack_int n, float* a,
11292                            lapack_int lda, lapack_int* ipiv );
11293 lapack_int LAPACKE_dsytrf_rook( int matrix_layout, char uplo, lapack_int n, double* a,
11294                            lapack_int lda, lapack_int* ipiv );
11295 lapack_int LAPACKE_csytrf_rook( int matrix_layout, char uplo, lapack_int n,
11296                            lapack_complex_float* a, lapack_int lda,
11297                            lapack_int* ipiv );
11298 lapack_int LAPACKE_zsytrf_rook( int matrix_layout, char uplo, lapack_int n,
11299                            lapack_complex_double* a, lapack_int lda,
11300                            lapack_int* ipiv );
11301
11302 lapack_int LAPACKE_ssytrs_rook( int matrix_layout, char uplo, lapack_int n,
11303                            lapack_int nrhs, const float* a, lapack_int lda,
11304                            const lapack_int* ipiv, float* b, lapack_int ldb );
11305 lapack_int LAPACKE_dsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11306                            lapack_int nrhs, const double* a, lapack_int lda,
11307                            const lapack_int* ipiv, double* b, lapack_int ldb );
11308 lapack_int LAPACKE_csytrs_rook( int matrix_layout, char uplo, lapack_int n,
11309                            lapack_int nrhs, const lapack_complex_float* a,
11310                            lapack_int lda, const lapack_int* ipiv,
11311                            lapack_complex_float* b, lapack_int ldb );
11312 lapack_int LAPACKE_zsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11313                            lapack_int nrhs, const lapack_complex_double* a,
11314                            lapack_int lda, const lapack_int* ipiv,
11315                            lapack_complex_double* b, lapack_int ldb );
11316
11317 lapack_int LAPACKE_chetrf_rook( int matrix_layout, char uplo, lapack_int n,
11318                            lapack_complex_float* a, lapack_int lda,
11319                            lapack_int* ipiv );
11320 lapack_int LAPACKE_zhetrf_rook( int matrix_layout, char uplo, lapack_int n,
11321                            lapack_complex_double* a, lapack_int lda,
11322                            lapack_int* ipiv );
11323
11324 lapack_int LAPACKE_chetrs_rook( int matrix_layout, char uplo, lapack_int n,
11325                            lapack_int nrhs, const lapack_complex_float* a,
11326                            lapack_int lda, const lapack_int* ipiv,
11327                            lapack_complex_float* b, lapack_int ldb );
11328 lapack_int LAPACKE_zhetrs_rook( int matrix_layout, char uplo, lapack_int n,
11329                            lapack_int nrhs, const lapack_complex_double* a,
11330                            lapack_int lda, const lapack_int* ipiv,
11331                            lapack_complex_double* b, lapack_int ldb );
11332
11333 lapack_int LAPACKE_csyr( int matrix_layout, char uplo, lapack_int n,
11334                              lapack_complex_float alpha,
11335                              const lapack_complex_float* x, lapack_int incx,
11336                              lapack_complex_float* a, lapack_int lda );
11337 lapack_int LAPACKE_zsyr( int matrix_layout, char uplo, lapack_int n,
11338                              lapack_complex_double alpha,
11339                              const lapack_complex_double* x, lapack_int incx,
11340                              lapack_complex_double* a, lapack_int lda );
11341
11342 lapack_int LAPACKE_ssysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11343                                     lapack_int nrhs, float* a, lapack_int lda,
11344                                     lapack_int* ipiv, float* b, lapack_int ldb,
11345                                     float* work, lapack_int lwork );
11346 lapack_int LAPACKE_dsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11347                                     lapack_int nrhs, double* a, lapack_int lda,
11348                                     lapack_int* ipiv, double* b, lapack_int ldb,
11349                                     double* work, lapack_int lwork );
11350 lapack_int LAPACKE_csysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11351                                     lapack_int nrhs, lapack_complex_float* a,
11352                                     lapack_int lda, lapack_int* ipiv,
11353                                     lapack_complex_float* b, lapack_int ldb,
11354                                     lapack_complex_float* work,
11355                                     lapack_int lwork );
11356 lapack_int LAPACKE_zsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11357                                     lapack_int nrhs, lapack_complex_double* a,
11358                                     lapack_int lda, lapack_int* ipiv,
11359                                     lapack_complex_double* b, lapack_int ldb,
11360                                     lapack_complex_double* work,
11361                                     lapack_int lwork );
11362
11363 lapack_int LAPACKE_ssytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11364                                 float* a, lapack_int lda, lapack_int* ipiv,
11365                                 float* work, lapack_int lwork );
11366 lapack_int LAPACKE_dsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11367                                 double* a, lapack_int lda, lapack_int* ipiv,
11368                                 double* work, lapack_int lwork );
11369 lapack_int LAPACKE_csytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11370                                 lapack_complex_float* a, lapack_int lda,
11371                                 lapack_int* ipiv, lapack_complex_float* work,
11372                                 lapack_int lwork );
11373 lapack_int LAPACKE_zsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11374                                 lapack_complex_double* a, lapack_int lda,
11375                                 lapack_int* ipiv, lapack_complex_double* work,
11376                                 lapack_int lwork );
11377
11378 lapack_int LAPACKE_ssytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11379                                 lapack_int nrhs, const float* a, lapack_int lda,
11380                                 const lapack_int* ipiv, float* b,
11381                                 lapack_int ldb );
11382 lapack_int LAPACKE_dsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11383                                 lapack_int nrhs, const double* a,
11384                                 lapack_int lda, const lapack_int* ipiv,
11385                                 double* b, lapack_int ldb );
11386 lapack_int LAPACKE_csytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11387                                 lapack_int nrhs, const lapack_complex_float* a,
11388                                 lapack_int lda, const lapack_int* ipiv,
11389                                 lapack_complex_float* b, lapack_int ldb );
11390 lapack_int LAPACKE_zsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11391                                 lapack_int nrhs, const lapack_complex_double* a,
11392                                 lapack_int lda, const lapack_int* ipiv,
11393                                 lapack_complex_double* b, lapack_int ldb );
11394
11395 lapack_int LAPACKE_chetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11396                                 lapack_complex_float* a, lapack_int lda,
11397                                 lapack_int* ipiv, lapack_complex_float* work,
11398                                 lapack_int lwork );
11399 lapack_int LAPACKE_zhetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11400                                 lapack_complex_double* a, lapack_int lda,
11401                                 lapack_int* ipiv, lapack_complex_double* work,
11402                                 lapack_int lwork );
11403
11404 lapack_int LAPACKE_chetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11405                                 lapack_int nrhs, const lapack_complex_float* a,
11406                                 lapack_int lda, const lapack_int* ipiv,
11407                                 lapack_complex_float* b, lapack_int ldb );
11408 lapack_int LAPACKE_zhetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11409                                 lapack_int nrhs, const lapack_complex_double* a,
11410                                 lapack_int lda, const lapack_int* ipiv,
11411                                 lapack_complex_double* b, lapack_int ldb );
11412
11413
11414 lapack_int LAPACKE_csyr_work( int matrix_layout, char uplo, lapack_int n,
11415                                   lapack_complex_float alpha,
11416                                   const lapack_complex_float* x,
11417                                   lapack_int incx, lapack_complex_float* a,
11418                                   lapack_int lda );
11419 lapack_int LAPACKE_zsyr_work( int matrix_layout, char uplo, lapack_int n,
11420                                   lapack_complex_double alpha,
11421                                   const lapack_complex_double* x,
11422                                   lapack_int incx, lapack_complex_double* a,
11423                                   lapack_int lda );
11424 void LAPACKE_ilaver( lapack_int* vers_major,
11425                      lapack_int* vers_minor,
11426                      lapack_int* vers_patch );
11427 // LAPACK 3.7.0
11428 lapack_int LAPACKE_ssysv_aa( int matrix_layout, char uplo, lapack_int n,
11429                           lapack_int nrhs, float* a, lapack_int lda,
11430                           lapack_int* ipiv, float* b, lapack_int ldb );
11431 lapack_int LAPACKE_ssysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11432                                lapack_int nrhs, float* a, lapack_int lda,
11433                                lapack_int* ipiv, float* b, lapack_int ldb,
11434                                float* work, lapack_int lwork );
11435 lapack_int LAPACKE_dsysv_aa( int matrix_layout, char uplo, lapack_int n,
11436                           lapack_int nrhs, double* a, lapack_int lda,
11437                           lapack_int* ipiv, double* b, lapack_int ldb );
11438 lapack_int LAPACKE_dsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11439                                lapack_int nrhs, double* a, lapack_int lda,
11440                                lapack_int* ipiv, double* b, lapack_int ldb,
11441                                double* work, lapack_int lwork );
11442 lapack_int LAPACKE_csysv_aa( int matrix_layout, char uplo, lapack_int n,
11443                           lapack_int nrhs, lapack_complex_float* a,
11444                           lapack_int lda, lapack_int* ipiv,
11445                           lapack_complex_float* b, lapack_int ldb );
11446 lapack_int LAPACKE_csysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11447                                lapack_int nrhs, lapack_complex_float* a,
11448                                lapack_int lda, lapack_int* ipiv,
11449                                lapack_complex_float* b, lapack_int ldb,
11450                                lapack_complex_float* work, lapack_int lwork );
11451 lapack_int LAPACKE_zsysv_aa( int matrix_layout, char uplo, lapack_int n,
11452                           lapack_int nrhs, lapack_complex_double* a,
11453                           lapack_int lda, lapack_int* ipiv,
11454                           lapack_complex_double* b, lapack_int ldb );
11455 lapack_int LAPACKE_zsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11456                                lapack_int nrhs, lapack_complex_double* a,
11457                                lapack_int lda, lapack_int* ipiv,
11458                                lapack_complex_double* b, lapack_int ldb,
11459                                lapack_complex_double* work, lapack_int lwork );
11460 lapack_int LAPACKE_chesv_aa( int matrix_layout, char uplo, lapack_int n,
11461                           lapack_int nrhs, lapack_complex_float* a,
11462                           lapack_int lda, lapack_int* ipiv,
11463                           lapack_complex_float* b, lapack_int ldb );
11464 lapack_int LAPACKE_chesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11465                                lapack_int nrhs, lapack_complex_float* a,
11466                                lapack_int lda, lapack_int* ipiv,
11467                                lapack_complex_float* b, lapack_int ldb,
11468                                lapack_complex_float* work, lapack_int lwork );
11469 lapack_int LAPACKE_zhesv_aa( int matrix_layout, char uplo, lapack_int n,
11470                           lapack_int nrhs, lapack_complex_double* a,
11471                           lapack_int lda, lapack_int* ipiv,
11472                           lapack_complex_double* b, lapack_int ldb );
11473 lapack_int LAPACKE_zhesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11474                                lapack_int nrhs, lapack_complex_double* a,
11475                                lapack_int lda, lapack_int* ipiv,
11476                                lapack_complex_double* b, lapack_int ldb,
11477                                lapack_complex_double* work, lapack_int lwork );
11478
11479 lapack_int LAPACKE_ssytrf_aa( int matrix_layout, char uplo, lapack_int n, float* a,
11480                            lapack_int lda, lapack_int* ipiv );
11481 lapack_int LAPACKE_dsytrf_aa( int matrix_layout, char uplo, lapack_int n, double* a,
11482                            lapack_int lda, lapack_int* ipiv );
11483 lapack_int LAPACKE_csytrf_aa( int matrix_layout, char uplo, lapack_int n,
11484                            lapack_complex_float* a, lapack_int lda,
11485                            lapack_int* ipiv );
11486 lapack_int LAPACKE_zsytrf_aa( int matrix_layout, char uplo, lapack_int n,
11487                            lapack_complex_double* a, lapack_int lda,
11488                            lapack_int* ipiv );
11489 lapack_int LAPACKE_chetrf_aa( int matrix_layout, char uplo, lapack_int n,
11490                            lapack_complex_float* a, lapack_int lda,
11491                            lapack_int* ipiv );
11492 lapack_int LAPACKE_zhetrf_aa( int matrix_layout, char uplo, lapack_int n,
11493                            lapack_complex_double* a, lapack_int lda,
11494                            lapack_int* ipiv );
11495
11496 lapack_int LAPACKE_ssytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11497                                 float* a, lapack_int lda, lapack_int* ipiv,
11498                                 float* work, lapack_int lwork );
11499 lapack_int LAPACKE_dsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11500                                 double* a, lapack_int lda, lapack_int* ipiv,
11501                                 double* work, lapack_int lwork );
11502 lapack_int LAPACKE_csytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11503                                 lapack_complex_float* a, lapack_int lda,
11504                                 lapack_int* ipiv, lapack_complex_float* work,
11505                                 lapack_int lwork );
11506 lapack_int LAPACKE_zsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11507                                 lapack_complex_double* a, lapack_int lda,
11508                                 lapack_int* ipiv, lapack_complex_double* work,
11509                                 lapack_int lwork );
11510 lapack_int LAPACKE_chetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11511                                 lapack_complex_float* a, lapack_int lda,
11512                                 lapack_int* ipiv, lapack_complex_float* work,
11513                                 lapack_int lwork );
11514 lapack_int LAPACKE_zhetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11515                                 lapack_complex_double* a, lapack_int lda,
11516                                 lapack_int* ipiv, lapack_complex_double* work,
11517                                 lapack_int lwork );
11518
11519
11520 lapack_int LAPACKE_csytrs_aa( int matrix_layout, char uplo, lapack_int n,
11521                             lapack_int nrhs, const lapack_complex_float* a,
11522                             lapack_int lda, const lapack_int* ipiv,
11523                             lapack_complex_float* b, lapack_int ldb );
11524 lapack_int LAPACKE_csytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11525                                  lapack_int nrhs, const lapack_complex_float* a,
11526                                  lapack_int lda, const lapack_int* ipiv,
11527                                  lapack_complex_float* b, lapack_int ldb,
11528                                  lapack_complex_float* work, lapack_int lwork );
11529 lapack_int LAPACKE_chetrs_aa( int matrix_layout, char uplo, lapack_int n,
11530                             lapack_int nrhs, const lapack_complex_float* a,
11531                             lapack_int lda, const lapack_int* ipiv,
11532                             lapack_complex_float* b, lapack_int ldb );
11533 lapack_int LAPACKE_chetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11534                                  lapack_int nrhs, const lapack_complex_float* a,
11535                                  lapack_int lda, const lapack_int* ipiv,
11536                                  lapack_complex_float* b, lapack_int ldb,
11537                                  lapack_complex_float* work, lapack_int lwork );
11538 lapack_int LAPACKE_dsytrs_aa( int matrix_layout, char uplo, lapack_int n,
11539                             lapack_int nrhs, const double* a, lapack_int lda,
11540                             const lapack_int* ipiv, double* b, lapack_int ldb );
11541 lapack_int LAPACKE_dsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11542                                  lapack_int nrhs, const double* a,
11543                                  lapack_int lda, const lapack_int* ipiv,
11544                                  double* b, lapack_int ldb, double* work, lapack_int lwork );
11545 lapack_int LAPACKE_ssytrs_aa( int matrix_layout, char uplo, lapack_int n,
11546                            lapack_int nrhs, const float* a, lapack_int lda,
11547                            const lapack_int* ipiv, float* b, lapack_int ldb );
11548 lapack_int LAPACKE_ssytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11549                                 lapack_int nrhs, const float* a, lapack_int lda,
11550                                 const lapack_int* ipiv, float* b,
11551                                 lapack_int ldb, float* work, lapack_int lwork );
11552 lapack_int LAPACKE_zsytrs_aa( int matrix_layout, char uplo, lapack_int n,
11553                             lapack_int nrhs, const lapack_complex_double* a,
11554                             lapack_int lda, const lapack_int* ipiv,
11555                             lapack_complex_double* b, lapack_int ldb );
11556 lapack_int LAPACKE_zsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11557                                  lapack_int nrhs, const lapack_complex_double* a,
11558                                  lapack_int lda, const lapack_int* ipiv,
11559                                  lapack_complex_double* b, lapack_int ldb,
11560                                  lapack_complex_double* work,  lapack_int lwork);
11561 lapack_int LAPACKE_zhetrs_aa( int matrix_layout, char uplo, lapack_int n,
11562                             lapack_int nrhs, const lapack_complex_double* a,
11563                             lapack_int lda, const lapack_int* ipiv,
11564                             lapack_complex_double* b, lapack_int ldb );
11565 lapack_int LAPACKE_zhetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11566                                  lapack_int nrhs, const lapack_complex_double* a,
11567                                  lapack_int lda, const lapack_int* ipiv,
11568                                  lapack_complex_double* b, lapack_int ldb,
11569                                  lapack_complex_double* work,  lapack_int lwork);
11570
11571
11572 lapack_int LAPACKE_ssysv_rk( int matrix_layout, char uplo, lapack_int n,
11573                           lapack_int nrhs, float* a, lapack_int lda,
11574                           float* e, lapack_int* ipiv, float* b, lapack_int ldb );
11575 lapack_int LAPACKE_ssysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11576                                lapack_int nrhs, float* a, lapack_int lda,
11577                                float* e, lapack_int* ipiv, float* b, lapack_int ldb,
11578                                float* work, lapack_int lwork );
11579 lapack_int LAPACKE_dsysv_rk( int matrix_layout, char uplo, lapack_int n,
11580                           lapack_int nrhs, double* a, lapack_int lda,
11581                           double* e, lapack_int* ipiv, double* b, lapack_int ldb );
11582 lapack_int LAPACKE_dsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11583                                lapack_int nrhs, double* a, lapack_int lda,
11584                                double* e, lapack_int* ipiv, double* b, lapack_int ldb,
11585                                double* work, lapack_int lwork );
11586 lapack_int LAPACKE_csysv_rk( int matrix_layout, char uplo, lapack_int n,
11587                           lapack_int nrhs, lapack_complex_float* a,
11588                           lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11589                           lapack_complex_float* b, lapack_int ldb );
11590 lapack_int LAPACKE_csysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11591                                lapack_int nrhs, lapack_complex_float* a,
11592                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11593                                lapack_complex_float* b, lapack_int ldb,
11594                                lapack_complex_float* work, lapack_int lwork );
11595 lapack_int LAPACKE_zsysv_rk( int matrix_layout, char uplo, lapack_int n,
11596                           lapack_int nrhs, lapack_complex_double* a,
11597                           lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11598                           lapack_complex_double* b, lapack_int ldb );
11599 lapack_int LAPACKE_zsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11600                                lapack_int nrhs, lapack_complex_double* a,
11601                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11602                                lapack_complex_double* b, lapack_int ldb,
11603                                lapack_complex_double* work, lapack_int lwork );
11604 lapack_int LAPACKE_chesv_rk( int matrix_layout, char uplo, lapack_int n,
11605                           lapack_int nrhs, lapack_complex_float* a,
11606                           lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11607                           lapack_complex_float* b, lapack_int ldb );
11608 lapack_int LAPACKE_chesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11609                                lapack_int nrhs, lapack_complex_float* a,
11610                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11611                                lapack_complex_float* b, lapack_int ldb,
11612                                lapack_complex_float* work, lapack_int lwork );
11613 lapack_int LAPACKE_zhesv_rk( int matrix_layout, char uplo, lapack_int n,
11614                           lapack_int nrhs, lapack_complex_double* a,
11615                           lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11616                           lapack_complex_double* b, lapack_int ldb );
11617 lapack_int LAPACKE_zhesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11618                                lapack_int nrhs, lapack_complex_double* a,
11619                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11620                                lapack_complex_double* b, lapack_int ldb,
11621                                lapack_complex_double* work, lapack_int lwork );
11622
11623 lapack_int LAPACKE_ssytrf_rk( int matrix_layout, char uplo, lapack_int n, float* a,
11624                            lapack_int lda, float* e, lapack_int* ipiv );
11625 lapack_int LAPACKE_dsytrf_rk( int matrix_layout, char uplo, lapack_int n, double* a,
11626                            lapack_int lda, double* e, lapack_int* ipiv );
11627 lapack_int LAPACKE_csytrf_rk( int matrix_layout, char uplo, lapack_int n,
11628                            lapack_complex_float* a, lapack_int lda,
11629                            lapack_complex_float* e, lapack_int* ipiv );
11630 lapack_int LAPACKE_zsytrf_rk( int matrix_layout, char uplo, lapack_int n,
11631                            lapack_complex_double* a, lapack_int lda,
11632                            lapack_complex_double* e, lapack_int* ipiv );
11633 lapack_int LAPACKE_chetrf_rk( int matrix_layout, char uplo, lapack_int n,
11634                            lapack_complex_float* a, lapack_int lda,
11635                            lapack_complex_float* e, lapack_int* ipiv );
11636 lapack_int LAPACKE_zhetrf_rk( int matrix_layout, char uplo, lapack_int n,
11637                            lapack_complex_double* a, lapack_int lda,
11638                            lapack_complex_double* e, lapack_int* ipiv );
11639 lapack_int LAPACKE_ssytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11640                                 float* a, lapack_int lda, float* e, lapack_int* ipiv,
11641                                 float* work, lapack_int lwork );
11642 lapack_int LAPACKE_dsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11643                                 double* a, lapack_int lda, double* e, lapack_int* ipiv,
11644                                 double* work, lapack_int lwork );
11645 lapack_int LAPACKE_csytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11646                                 lapack_complex_float* a, lapack_int lda,
11647                                 lapack_complex_float* e,
11648                                 lapack_int* ipiv, lapack_complex_float* work,
11649                                 lapack_int lwork );
11650 lapack_int LAPACKE_zsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11651                                 lapack_complex_double* a, lapack_int lda,
11652                                 lapack_complex_double* e,
11653                                 lapack_int* ipiv, lapack_complex_double* work,
11654                                 lapack_int lwork );
11655 lapack_int LAPACKE_chetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11656                                 lapack_complex_float* a, lapack_int lda,
11657                                 lapack_complex_float* e,
11658                                 lapack_int* ipiv, lapack_complex_float* work,
11659                                 lapack_int lwork );
11660 lapack_int LAPACKE_zhetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11661                                 lapack_complex_double* a, lapack_int lda,
11662                                 lapack_complex_double* e,
11663                                 lapack_int* ipiv, lapack_complex_double* work,
11664                                 lapack_int lwork );
11665
11666 lapack_int LAPACKE_csytrs_3( int matrix_layout, char uplo, lapack_int n,
11667                             lapack_int nrhs, const lapack_complex_float* a,
11668                             lapack_int lda, const lapack_complex_float* e,
11669                             const lapack_int* ipiv,
11670                             lapack_complex_float* b, lapack_int ldb );
11671 lapack_int LAPACKE_csytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11672                                  lapack_int nrhs, const lapack_complex_float* a,
11673                                  lapack_int lda, const lapack_complex_float* e,
11674                                  const lapack_int* ipiv,
11675                                  lapack_complex_float* b, lapack_int ldb);
11676 lapack_int LAPACKE_chetrs_3( int matrix_layout, char uplo, lapack_int n,
11677                             lapack_int nrhs, const lapack_complex_float* a,
11678                             lapack_int lda, const lapack_complex_float* e,
11679                             const lapack_int* ipiv,
11680                             lapack_complex_float* b, lapack_int ldb );
11681 lapack_int LAPACKE_chetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11682                                  lapack_int nrhs, const lapack_complex_float* a,
11683                                  lapack_int lda, const lapack_complex_float* e,
11684                                  const lapack_int* ipiv,
11685                                  lapack_complex_float* b, lapack_int ldb);
11686 lapack_int LAPACKE_dsytrs_3( int matrix_layout, char uplo, lapack_int n,
11687                             lapack_int nrhs, const double* a, lapack_int lda,
11688                             const double* e,
11689                             const lapack_int* ipiv, double* b, lapack_int ldb );
11690 lapack_int LAPACKE_dsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11691                                  lapack_int nrhs, const double* a,
11692                                  lapack_int lda, const double* e,
11693                                  const lapack_int* ipiv,
11694                                  double* b, lapack_int ldb);
11695 lapack_int LAPACKE_ssytrs_3( int matrix_layout, char uplo, lapack_int n,
11696                            lapack_int nrhs, const float* a, lapack_int lda,
11697                            const float* e,
11698                            const lapack_int* ipiv, float* b, lapack_int ldb );
11699 lapack_int LAPACKE_ssytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11700                                 lapack_int nrhs, const float* a, lapack_int lda,
11701                                 const float* e, const lapack_int* ipiv, float* b,
11702                                 lapack_int ldb);
11703 lapack_int LAPACKE_zsytrs_3( int matrix_layout, char uplo, lapack_int n,
11704                             lapack_int nrhs, const lapack_complex_double* a,
11705                             lapack_int lda, const lapack_complex_double* e,
11706                             const lapack_int* ipiv,
11707                             lapack_complex_double* b, lapack_int ldb );
11708 lapack_int LAPACKE_zsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11709                                  lapack_int nrhs, const lapack_complex_double* a,
11710                                  lapack_int lda, const lapack_complex_double* e,
11711                                  const lapack_int* ipiv,
11712                                  lapack_complex_double* b, lapack_int ldb);
11713 lapack_int LAPACKE_zhetrs_3( int matrix_layout, char uplo, lapack_int n,
11714                             lapack_int nrhs, const lapack_complex_double* a,
11715                             lapack_int lda, const lapack_complex_double* e,
11716                             const lapack_int* ipiv,
11717                             lapack_complex_double* b, lapack_int ldb );
11718 lapack_int LAPACKE_zhetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11719                                  lapack_int nrhs, const lapack_complex_double* a,
11720                                  lapack_int lda, const lapack_complex_double* e,
11721                                  const lapack_int* ipiv,
11722                                  lapack_complex_double* b, lapack_int ldb);
11723
11724 lapack_int LAPACKE_ssytri_3( int matrix_layout, char uplo, lapack_int n, float* a,
11725                            lapack_int lda, const float* e, const lapack_int* ipiv );
11726 lapack_int LAPACKE_dsytri_3( int matrix_layout, char uplo, lapack_int n, double* a,
11727                            lapack_int lda, const double* e, const lapack_int* ipiv );
11728 lapack_int LAPACKE_csytri_3( int matrix_layout, char uplo, lapack_int n,
11729                            lapack_complex_float* a, lapack_int lda,
11730                            const lapack_complex_float* e, const lapack_int* ipiv );
11731 lapack_int LAPACKE_zsytri_3( int matrix_layout, char uplo, lapack_int n,
11732                            lapack_complex_double* a, lapack_int lda,
11733                            const lapack_complex_double* e, const lapack_int* ipiv );
11734 lapack_int LAPACKE_chetri_3( int matrix_layout, char uplo, lapack_int n,
11735                            lapack_complex_float* a, lapack_int lda,
11736                            const lapack_complex_float* e, const lapack_int* ipiv );
11737 lapack_int LAPACKE_zhetri_3( int matrix_layout, char uplo, lapack_int n,
11738                            lapack_complex_double* a, lapack_int lda,
11739                            const lapack_complex_double* e, const lapack_int* ipiv );
11740 lapack_int LAPACKE_ssytri_3_work( int matrix_layout, char uplo, lapack_int n, float* a,
11741                            lapack_int lda, const float* e, const lapack_int* ipiv,
11742                            float* work, lapack_int lwork  );
11743 lapack_int LAPACKE_dsytri_3_work( int matrix_layout, char uplo, lapack_int n, double* a,
11744                            lapack_int lda, const double* e, const lapack_int* ipiv,
11745                            double* work, lapack_int lwork  );
11746 lapack_int LAPACKE_csytri_3_work( int matrix_layout, char uplo, lapack_int n,
11747                            lapack_complex_float* a, lapack_int lda,
11748                            const lapack_complex_float* e, const lapack_int* ipiv,
11749                            lapack_complex_float* work, lapack_int lwork  );
11750 lapack_int LAPACKE_zsytri_3_work( int matrix_layout, char uplo, lapack_int n,
11751                            lapack_complex_double* a, lapack_int lda,
11752                            const lapack_complex_double* e, const lapack_int* ipiv,
11753                            lapack_complex_double* work, lapack_int lwork  );
11754 lapack_int LAPACKE_chetri_3_work( int matrix_layout, char uplo, lapack_int n,
11755                            lapack_complex_float* a, lapack_int lda,
11756                            const lapack_complex_float* e, const lapack_int* ipiv,
11757                            lapack_complex_float* work, lapack_int lwork  );
11758 lapack_int LAPACKE_zhetri_3_work( int matrix_layout, char uplo, lapack_int n,
11759                            lapack_complex_double* a, lapack_int lda,
11760                            const lapack_complex_double* e, const lapack_int* ipiv,
11761                            lapack_complex_double* work, lapack_int lwork );
11762
11763
11764 #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
11765 #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
11766 #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
11767 #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
11768 #define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2,SGETRF2)
11769 #define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2,DGETRF2)
11770 #define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2,CGETRF2)
11771 #define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2,ZGETRF2)
11772 #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
11773 #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
11774 #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
11775 #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
11776 #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
11777 #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
11778 #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
11779 #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
11780 #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
11781 #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
11782 #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
11783 #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
11784 #define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2,SPOTRF2)
11785 #define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2,DPOTRF2)
11786 #define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2,CPOTRF2)
11787 #define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2,ZPOTRF2)
11788 #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
11789 #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
11790 #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
11791 #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
11792 #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
11793 #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
11794 #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
11795 #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
11796 #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
11797 #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
11798 #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
11799 #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
11800 #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
11801 #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
11802 #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
11803 #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
11804 #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
11805 #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
11806 #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
11807 #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
11808 #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
11809 #define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook,SSYTRF_ROOK)
11810 #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
11811 #define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook,DSYTRF_ROOK)
11812 #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
11813 #define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook,CSYTRF_ROOK)
11814 #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
11815 #define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook,ZSYTRF_ROOK)
11816 #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
11817 #define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook,CHETRF_ROOK)
11818 #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
11819 #define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook,ZHETRF_ROOK)
11820 #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
11821 #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
11822 #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
11823 #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
11824 #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
11825 #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
11826 #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
11827 #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
11828 #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
11829 #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
11830 #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
11831 #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
11832 #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
11833 #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
11834 #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
11835 #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
11836 #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
11837 #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
11838 #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
11839 #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
11840 #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
11841 #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
11842 #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
11843 #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
11844 #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
11845 #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
11846 #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
11847 #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
11848 #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
11849 #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
11850 #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
11851 #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
11852 #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
11853 #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
11854 #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
11855 #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
11856 #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
11857 #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
11858 #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
11859 #define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook,SSYTRS_ROOK)
11860 #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
11861 #define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook,DSYTRS_ROOK)
11862 #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
11863 #define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook,CSYTRS_ROOK)
11864 #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
11865 #define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook,ZSYTRS_ROOK)
11866 #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
11867 #define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook,CHETRS_ROOK)
11868 #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
11869 #define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook,ZHETRS_ROOK)
11870 #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
11871 #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
11872 #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
11873 #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
11874 #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
11875 #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
11876 #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
11877 #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
11878 #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
11879 #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
11880 #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
11881 #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
11882 #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
11883 #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
11884 #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
11885 #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
11886 #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
11887 #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
11888 #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
11889 #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
11890 #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
11891 #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
11892 #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
11893 #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
11894 #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
11895 #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
11896 #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
11897 #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
11898 #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
11899 #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
11900 #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
11901 #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
11902 #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
11903 #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
11904 #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
11905 #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
11906 #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
11907 #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
11908 #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
11909 #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
11910 #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
11911 #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
11912 #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
11913 #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
11914 #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
11915 #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
11916 #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
11917 #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
11918 #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
11919 #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
11920 #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
11921 #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
11922 #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
11923 #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
11924 #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
11925 #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
11926 #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
11927 #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
11928 #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
11929 #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
11930 #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
11931 #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
11932 #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
11933 #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
11934 #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
11935 #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
11936 #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
11937 #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
11938 #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
11939 #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
11940 #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
11941 #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
11942 #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
11943 #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
11944 #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
11945 #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
11946 #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
11947 #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
11948 #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
11949 #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
11950 #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
11951 #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
11952 #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
11953 #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
11954 #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
11955 #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
11956 #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
11957 #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
11958 #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
11959 #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
11960 #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
11961 #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
11962 #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
11963 #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
11964 #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
11965 #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
11966 #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
11967 #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
11968 #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
11969 #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
11970 #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
11971 #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
11972 #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
11973 #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
11974 #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
11975 #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
11976 #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
11977 #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
11978 #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
11979 #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
11980 #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
11981 #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
11982 #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
11983 #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
11984 #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
11985 #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
11986 #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
11987 #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
11988 #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
11989 #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
11990 #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
11991 #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
11992 #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
11993 #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
11994 #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
11995 #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
11996 #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
11997 #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
11998 #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
11999 #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
12000 #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
12001 #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
12002 #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
12003 #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
12004 #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
12005 #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
12006 #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
12007 #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
12008 #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
12009 #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
12010 #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
12011 #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
12012 #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
12013 #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
12014 #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
12015 #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
12016 #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
12017 #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
12018 #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
12019 #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
12020 #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
12021 #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
12022 #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
12023 #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
12024 #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
12025 #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
12026 #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
12027 #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
12028 #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
12029 #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
12030 #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
12031 #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
12032 #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
12033 #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
12034 #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
12035 #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
12036 #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
12037 #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
12038 #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
12039 #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
12040 #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
12041 #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
12042 #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
12043 #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
12044 #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
12045 #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
12046 #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
12047 #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
12048 #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
12049 #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
12050 #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
12051 #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
12052 #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
12053 #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
12054 #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
12055 #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
12056 #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
12057 #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
12058 #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
12059 #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
12060 #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
12061 #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
12062 #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
12063 #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
12064 #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
12065 #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
12066 #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
12067 #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
12068 #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
12069 #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
12070 #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
12071 #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
12072 #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
12073 #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
12074 #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
12075 #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
12076 #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
12077 #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
12078 #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
12079 #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
12080 #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
12081 #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
12082 #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
12083 #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
12084 #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
12085 #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
12086 #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
12087 #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
12088 #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
12089 #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
12090 #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
12091 #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
12092 #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
12093 #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
12094 #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
12095 #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
12096 #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
12097 #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
12098 #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
12099 #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
12100 #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
12101 #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
12102 #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
12103 #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
12104 #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
12105 #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
12106 #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
12107 #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
12108 #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
12109 #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
12110 #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
12111 #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
12112 #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
12113 #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
12114 #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
12115 #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
12116 #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
12117 #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
12118 #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
12119 #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
12120 #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
12121 #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
12122 #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
12123 #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
12124 #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
12125 #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
12126 #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
12127 #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
12128 #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
12129 #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
12130 #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
12131 #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
12132 #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
12133 #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
12134 #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
12135 #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
12136 #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
12137 #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
12138 #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
12139 #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
12140 #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
12141 #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
12142 #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
12143 #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
12144 #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
12145 #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
12146 #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
12147 #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
12148 #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
12149 #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
12150 #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
12151 #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
12152 #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
12153 #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
12154 #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
12155 #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
12156 #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
12157 #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
12158 #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
12159 #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
12160 #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
12161 #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
12162 #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
12163 #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
12164 #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
12165 #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
12166 #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
12167 #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
12168 #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
12169 #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
12170 #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
12171 #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
12172 #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
12173 #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
12174 #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
12175 #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
12176 #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
12177 #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
12178 #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
12179 #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
12180 #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
12181 #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
12182 #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
12183 #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
12184 #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
12185 #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
12186 #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
12187 #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
12188 #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
12189 #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
12190 #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
12191 #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
12192 #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
12193 #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
12194 #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
12195 #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
12196 #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
12197 #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
12198 #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
12199 #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
12200 #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
12201 #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
12202 #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
12203 #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
12204 #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
12205 #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
12206 #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
12207 #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
12208 #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
12209 #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
12210 #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
12211 #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
12212 #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
12213 #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
12214 #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
12215 #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
12216 #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
12217 #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
12218 #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
12219 #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
12220 #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
12221 #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
12222 #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
12223 #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
12224 #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
12225 #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
12226 #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
12227 #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
12228 #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
12229 #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
12230 #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
12231 #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
12232 #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
12233 #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
12234 #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
12235 #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
12236 #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
12237 #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
12238 #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
12239 #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
12240 #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
12241 #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
12242 #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
12243 #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
12244 #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
12245 #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
12246 #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
12247 #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
12248 #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
12249 #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
12250 #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
12251 #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
12252 #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
12253 #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
12254 #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
12255 #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
12256 #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
12257 #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
12258 #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
12259 #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
12260 #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
12261 #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
12262 #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
12263 #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
12264 #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
12265 #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
12266 #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
12267 #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
12268 #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
12269 #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
12270 #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
12271 #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
12272 #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
12273 #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
12274 #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
12275 #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
12276 #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
12277 #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
12278 #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
12279 #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
12280 #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
12281 #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
12282 #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
12283 #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
12284 #define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx,SBDSVDX)
12285 #define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx,DBDSVDX)
12286 #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
12287 #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
12288 #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
12289 #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
12290 #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
12291 #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
12292 #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
12293 #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
12294 #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
12295 #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
12296 #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
12297 #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
12298 #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
12299 #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
12300 #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
12301 #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
12302 #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
12303 #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
12304 #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
12305 #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
12306 #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
12307 #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
12308 #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
12309 #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
12310 #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
12311 #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
12312 #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
12313 #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
12314 #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
12315 #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
12316 #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
12317 #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
12318 #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
12319 #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
12320 #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
12321 #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
12322 #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
12323 #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
12324 #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
12325 #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
12326 #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
12327 #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
12328 #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
12329 #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
12330 #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
12331 #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
12332 #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
12333 #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
12334 #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
12335 #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
12336 #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
12337 #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
12338 #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
12339 #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
12340 #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
12341 #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
12342 #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
12343 #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
12344 #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
12345 #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
12346 #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
12347 #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
12348 #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
12349 #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
12350 #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
12351 #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
12352 #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
12353 #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
12354 #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
12355 #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
12356 #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
12357 #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
12358 #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
12359 #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
12360 #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
12361 #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
12362 #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
12363 #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
12364 #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
12365 #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
12366 #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
12367 #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
12368 #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
12369 #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
12370 #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
12371 #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
12372 #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
12373 #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
12374 #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
12375 #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
12376 #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
12377 #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
12378 #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
12379 #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
12380 #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
12381 #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
12382 #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
12383 #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
12384 #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
12385 #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
12386 #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
12387 #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
12388 #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
12389 #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
12390 #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
12391 #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
12392 #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
12393 #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
12394 #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
12395 #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
12396 #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
12397 #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
12398 #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
12399 #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
12400 #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
12401 #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
12402 #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
12403 #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
12404 #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
12405 #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
12406 #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
12407 #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
12408 #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
12409 #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
12410 #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
12411 #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
12412 #define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3,SGGHD3)
12413 #define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3,DGGHD3)
12414 #define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3,CGGHD3)
12415 #define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3,ZGGHD3)
12416 #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
12417 #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
12418 #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
12419 #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
12420 #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
12421 #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
12422 #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
12423 #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
12424 #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
12425 #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
12426 #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
12427 #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
12428 #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
12429 #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
12430 #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
12431 #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
12432 #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
12433 #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
12434 #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
12435 #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
12436 #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
12437 #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
12438 #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
12439 #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
12440 #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
12441 #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
12442 #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
12443 #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
12444 #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
12445 #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
12446 #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
12447 #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
12448 #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
12449 #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
12450 #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
12451 #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
12452 #define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3,SGGSVP3)
12453 #define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3,DGGSVP3)
12454 #define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
12455 #define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3,ZGGSVP3)
12456 #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
12457 #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
12458 #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
12459 #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
12460 #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
12461 #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
12462 #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
12463 #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
12464 #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
12465 #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
12466 #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
12467 #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
12468 #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
12469 #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
12470 #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
12471 #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
12472 #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
12473 #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
12474 #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
12475 #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
12476 #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
12477 #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
12478 #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
12479 #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
12480 #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
12481 #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
12482 #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
12483 #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
12484 #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
12485 #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
12486 #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
12487 #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
12488 #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
12489 #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
12490 #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
12491 #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
12492 #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
12493 #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
12494 #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
12495 #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
12496 #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
12497 #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
12498 #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
12499 #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
12500 #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
12501 #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
12502 #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
12503 #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
12504 #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
12505 #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
12506 #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
12507 #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
12508 #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
12509 #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
12510 #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
12511 #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
12512 #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
12513 #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
12514 #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
12515 #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
12516 #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
12517 #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
12518 #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
12519 #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
12520 #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
12521 #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
12522 #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
12523 #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
12524 #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
12525 #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
12526 #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
12527 #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
12528 #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
12529 #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
12530 #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
12531 #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
12532 #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
12533 #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
12534 #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
12535 #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
12536 #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
12537 #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
12538 #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
12539 #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
12540 #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
12541 #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
12542 #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
12543 #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
12544 #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
12545 #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
12546 #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
12547 #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
12548 #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
12549 #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
12550 #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
12551 #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
12552 #define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx,SGESVDX)
12553 #define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx,DGESVDX)
12554 #define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx,CGESVDX)
12555 #define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx,ZGESVDX)
12556 #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
12557 #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
12558 #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
12559 #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
12560 #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
12561 #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
12562 #define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv,CGEJSV)
12563 #define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv,ZGEJSV)
12564 #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
12565 #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
12566 #define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj,CGESVJ)
12567 #define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj,ZGESVJ)
12568 #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
12569 #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
12570 #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
12571 #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
12572 #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
12573 #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
12574 #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
12575 #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
12576 #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
12577 #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
12578 #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
12579 #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
12580 #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
12581 #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
12582 #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
12583 #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
12584 #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
12585 #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
12586 #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
12587 #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
12588 #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
12589 #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
12590 #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
12591 #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
12592 #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
12593 #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
12594 #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
12595 #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
12596 #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
12597 #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
12598 #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
12599 #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
12600 #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
12601 #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
12602 #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
12603 #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
12604 #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
12605 #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
12606 #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
12607 #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
12608 #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
12609 #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
12610 #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
12611 #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
12612 #define LAPACK_sgges3 LAPACK_GLOBAL(sgges3,SGGES3)
12613 #define LAPACK_dgges3 LAPACK_GLOBAL(dgges3,DGGES3)
12614 #define LAPACK_cgges3 LAPACK_GLOBAL(cgges3,CGGES3)
12615 #define LAPACK_zgges3 LAPACK_GLOBAL(zgges3,ZGGES3)
12616 #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
12617 #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
12618 #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
12619 #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
12620 #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
12621 #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
12622 #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
12623 #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
12624 #define LAPACK_sggev3 LAPACK_GLOBAL(sggev3,SGGEV3)
12625 #define LAPACK_dggev3 LAPACK_GLOBAL(dggev3,DGGEV3)
12626 #define LAPACK_cggev3 LAPACK_GLOBAL(cggev3,CGGEV3)
12627 #define LAPACK_zggev3 LAPACK_GLOBAL(zggev3,ZGGEV3)
12628 #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
12629 #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
12630 #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
12631 #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
12632 #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
12633 #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
12634 #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
12635 #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
12636 #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
12637 #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
12638 #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
12639 #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
12640 #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
12641 #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
12642 #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
12643 #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
12644 #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
12645 #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
12646 #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
12647 #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
12648 #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
12649 #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
12650 #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
12651 #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
12652 #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
12653 #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
12654 #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
12655 #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
12656 #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
12657 #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
12658 #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
12659 #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
12660 #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
12661 #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
12662 #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
12663 #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
12664 #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
12665 #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
12666 #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
12667 #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
12668 #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
12669 #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
12670 #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
12671 #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
12672 #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
12673 #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
12674 #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
12675 #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
12676 #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
12677 #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
12678 #define LAPACK_slacn2 LAPACK_GLOBAL(slacn2,SLACN2)
12679 #define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2,DLACN2)
12680 #define LAPACK_clacn2 LAPACK_GLOBAL(clacn2,CLACN2)
12681 #define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2,ZLACN2)
12682 #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
12683 #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
12684 #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
12685 #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
12686 #define LAPACK_clacp2 LAPACK_GLOBAL(clacp2,CLACP2)
12687 #define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2,ZLACP2)
12688 #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
12689 #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
12690 #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
12691 #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
12692 #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
12693 #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
12694 #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
12695 #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
12696 #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
12697 #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
12698 #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
12699 #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
12700 #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
12701 #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
12702 #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
12703 #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
12704 #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
12705 #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
12706 #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
12707 #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
12708 #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
12709 #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
12710 #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
12711 #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
12712 #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
12713 #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
12714 #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
12715 #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
12716 #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
12717 #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
12718 #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
12719 #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
12720 #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
12721 #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
12722 #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
12723 #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
12724 #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
12725 #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
12726 #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
12727 #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
12728 #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
12729 #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
12730 #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
12731 #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
12732 #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
12733 #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
12734 #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
12735 #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
12736 #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
12737 #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
12738 #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
12739 #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
12740 #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
12741 #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
12742 #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
12743 #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
12744 #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
12745 #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
12746 #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
12747 #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
12748 #define LAPACK_slascl LAPACK_GLOBAL(slascl,SLASCL)
12749 #define LAPACK_dlascl LAPACK_GLOBAL(dlascl,DLASCL)
12750 #define LAPACK_clascl LAPACK_GLOBAL(clascl,CLASCL)
12751 #define LAPACK_zlascl LAPACK_GLOBAL(zlascl,ZLASCL)
12752 #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
12753 #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
12754 #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
12755 #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
12756 #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
12757 #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
12758 #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
12759 #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
12760 #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
12761 #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
12762 #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
12763 #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
12764 #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
12765 #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
12766 #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
12767 #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
12768 #define LAPACK_slapmt LAPACK_GLOBAL(slapmt,SLAPMT)
12769 #define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt,DLAPMT)
12770 #define LAPACK_clapmt LAPACK_GLOBAL(clapmt,CLAPMT)
12771 #define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt,ZLAPMT)
12772 #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
12773 #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
12774 #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
12775 #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
12776 #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
12777 #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
12778 #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
12779 #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
12780 // LAPACK 3.3.0
12781 #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
12782 #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
12783 #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
12784 #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
12785 #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
12786 #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
12787 #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
12788 #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
12789 #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
12790 #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
12791 #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
12792 #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
12793 #define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1,CUNCSD2BY1)
12794 #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
12795 #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
12796 #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
12797 #define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1,DORCSD2BY1)
12798 #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
12799 #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
12800 #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
12801 #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
12802 #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
12803 #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
12804 #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
12805 #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
12806 #define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1,SORCSD2BY1)
12807 #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
12808 #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
12809 #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
12810 #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
12811 #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
12812 #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
12813 #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
12814 #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
12815 #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
12816 #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
12817 #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
12818 #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
12819 #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
12820 #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
12821 #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
12822 #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
12823 #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
12824 #define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1,ZUNCSD2BY1)
12825 // LAPACK 3.4.0
12826 #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
12827 #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
12828 #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
12829 #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
12830 #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
12831 #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
12832 #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
12833 #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
12834 #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
12835 #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
12836 #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
12837 #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
12838 #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
12839 #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
12840 #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
12841 #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
12842 #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
12843 #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
12844 #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
12845 #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
12846 #define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt,STPQRT)
12847 #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
12848 #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
12849 #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
12850 #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
12851 #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
12852 #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
12853 #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
12854 #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
12855 #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
12856 #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
12857 #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
12858 // LAPACK 3.5.0
12859 #define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook,SSYSV_ROOK)
12860 #define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook,DSYSV_ROOK)
12861 #define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook,CSYSV_ROOK)
12862 #define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook,ZSYSV_ROOK)
12863 #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
12864 #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
12865 #define LAPACK_ilaver LAPACK_GLOBAL(ilaver,ILAVER)
12866 // LAPACK 3.6.0
12867 #define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3,SGGSVD3)
12868 #define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3,DGGSVD3)
12869 #define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
12870 #define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3,ZGGSVD3)
12871 // LAPACK 3.7.0
12872 #define LAPACK_ssysv_aa LAPACK_GLOBAL(ssysv_aa,SSYSV_AA)
12873 #define LAPACK_dsysv_aa LAPACK_GLOBAL(dsysv_aa,DSYSV_AA)
12874 #define LAPACK_chesv_aa LAPACK_GLOBAL(chesv_aa,CHESV_AA)
12875 #define LAPACK_zsysv_aa LAPACK_GLOBAL(zsysv_aa,ZSYSV_AA)
12876 #define LAPACK_csysv_aa LAPACK_GLOBAL(csysv_aa,CSYSV_AA)
12877 #define LAPACK_zhesv_aa LAPACK_GLOBAL(zhesv_aa,ZHESV_AA)
12878 #define LAPACK_ssytrs_aa LAPACK_GLOBAL(ssytrs_aa,SSYTRS_AA)
12879 #define LAPACK_dsytrs_aa LAPACK_GLOBAL(dsytrs_aa,DSYTRS_AA)
12880 #define LAPACK_csytrs_aa LAPACK_GLOBAL(csytrs_aa,CSYTRS_AA)
12881 #define LAPACK_zsytrs_aa LAPACK_GLOBAL(zsytrs_aa,ZSYTRS_AA)
12882 #define LAPACK_chetrs_aa LAPACK_GLOBAL(chetrs_aa,CHETRS_AA)
12883 #define LAPACK_zhetrs_aa LAPACK_GLOBAL(zhetrs_aa,ZHETRS_AA)
12884 #define LAPACK_ssytrf_aa LAPACK_GLOBAL(ssytrf_aa,SSYTRF_AA)
12885 #define LAPACK_dsytrf_aa LAPACK_GLOBAL(dsytrf_aa,DSYTRF_AA)
12886 #define LAPACK_csytrf_aa LAPACK_GLOBAL(csytrf_aa,CSYTRF_AA)
12887 #define LAPACK_zsytrf_aa LAPACK_GLOBAL(zsytrf_aa,ZSYTRF_AA)
12888 #define LAPACK_chetrf_aa LAPACK_GLOBAL(chetrf_aa,CHETRF_AA)
12889 #define LAPACK_zhetrf_aa LAPACK_GLOBAL(zhetrf_aa,ZHETRF_AA)
12890
12891 #define LAPACK_ssysv_rk LAPACK_GLOBAL(ssysv_rk,SSYSV_RK)
12892 #define LAPACK_dsysv_rk LAPACK_GLOBAL(dsysv_rk,DSYSV_RK)
12893 #define LAPACK_chesv_rk LAPACK_GLOBAL(chesv_rk,CHESV_RK)
12894 #define LAPACK_zsysv_rk LAPACK_GLOBAL(zsysv_rk,ZSYSV_RK)
12895 #define LAPACK_csysv_rk LAPACK_GLOBAL(csysv_rk,CSYSV_RK)
12896 #define LAPACK_zhesv_rk LAPACK_GLOBAL(zhesv_rk,ZHESV_RK)
12897 #define LAPACK_ssytrf_rk LAPACK_GLOBAL(ssytrf_rk,SSYTRF_RK)
12898 #define LAPACK_dsytrf_rk LAPACK_GLOBAL(dsytrf_rk,DSYTRF_RK)
12899 #define LAPACK_csytrf_rk LAPACK_GLOBAL(csytrf_rk,CSYTRF_RK)
12900 #define LAPACK_zsytrf_rk LAPACK_GLOBAL(zsytrf_rk,ZSYTRF_RK)
12901 #define LAPACK_chetrf_rk LAPACK_GLOBAL(chetrf_rk,CHETRF_RK)
12902 #define LAPACK_zhetrf_rk LAPACK_GLOBAL(zhetrf_rk,ZHETRF_RK)
12903 #define LAPACK_ssytrs_3 LAPACK_GLOBAL(ssytrs_3,SSYTRS_3)
12904 #define LAPACK_dsytrs_3 LAPACK_GLOBAL(dsytrs_3,DSYTRS_3)
12905 #define LAPACK_csytrs_3 LAPACK_GLOBAL(csytrs_3,CSYTRS_3)
12906 #define LAPACK_zsytrs_3 LAPACK_GLOBAL(zsytrs_3,ZSYTRS_3)
12907 #define LAPACK_chetrs_3 LAPACK_GLOBAL(chetrs_3,CHETRS_3)
12908 #define LAPACK_zhetrs_3 LAPACK_GLOBAL(zhetrs_3,ZHETRS_3)
12909 #define LAPACK_ssytri_3 LAPACK_GLOBAL(ssytri_3,SSYTRI_3)
12910 #define LAPACK_dsytri_3 LAPACK_GLOBAL(dsytri_3,DSYTRI_3)
12911 #define LAPACK_csytri_3 LAPACK_GLOBAL(csytri_3,CSYTRI_3)
12912 #define LAPACK_zsytri_3 LAPACK_GLOBAL(zsytri_3,ZSYTRI_3)
12913 #define LAPACK_chetri_3 LAPACK_GLOBAL(chetri_3,CHETRI_3)
12914 #define LAPACK_zhetri_3 LAPACK_GLOBAL(zhetri_3,ZHETRI_3)
12915
12916
12917
12918 void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12919                     lapack_int* ipiv, lapack_int *info );
12920 void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12921                     lapack_int* ipiv, lapack_int *info );
12922 void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12923                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
12924 void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12925                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
12926 void LAPACK_sgetrf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
12927                     lapack_int* ipiv, lapack_int *info );
12928 void LAPACK_dgetrf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
12929                     lapack_int* ipiv, lapack_int *info );
12930 void LAPACK_cgetrf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
12931                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
12932 void LAPACK_zgetrf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
12933                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
12934 void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
12935                     lapack_int* ku, float* ab, lapack_int* ldab,
12936                     lapack_int* ipiv, lapack_int *info );
12937 void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
12938                     lapack_int* ku, double* ab, lapack_int* ldab,
12939                     lapack_int* ipiv, lapack_int *info );
12940 void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
12941                     lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
12942                     lapack_int* ipiv, lapack_int *info );
12943 void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
12944                     lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
12945                     lapack_int* ipiv, lapack_int *info );
12946 void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
12947                     lapack_int* ipiv, lapack_int *info );
12948 void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
12949                     double* du2, lapack_int* ipiv, lapack_int *info );
12950 void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
12951                     lapack_complex_float* d, lapack_complex_float* du,
12952                     lapack_complex_float* du2, lapack_int* ipiv,
12953                     lapack_int *info );
12954 void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
12955                     lapack_complex_double* d, lapack_complex_double* du,
12956                     lapack_complex_double* du2, lapack_int* ipiv,
12957                     lapack_int *info );
12958 void LAPACK_spotrf2( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12959                     lapack_int *info );
12960 void LAPACK_dpotrf2( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12961                     lapack_int *info );
12962 void LAPACK_cpotrf2( char* uplo, lapack_int* n, lapack_complex_float* a,
12963                     lapack_int* lda, lapack_int *info );
12964 void LAPACK_zpotrf2( char* uplo, lapack_int* n, lapack_complex_double* a,
12965                     lapack_int* lda, lapack_int *info );
12966 void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12967                     lapack_int *info );
12968 void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12969                     lapack_int *info );
12970 void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
12971                     lapack_int* lda, lapack_int *info );
12972 void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
12973                     lapack_int* lda, lapack_int *info );
12974 void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
12975                     lapack_int* piv, lapack_int* rank, double* tol,
12976                     double* work, lapack_int *info );
12977 void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
12978                     lapack_int* piv, lapack_int* rank, float* tol, float* work,
12979                     lapack_int *info );
12980 void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
12981                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
12982                     double* tol, double* work, lapack_int *info );
12983 void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
12984                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
12985                     float* tol, float* work, lapack_int *info );
12986 void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
12987                     lapack_int *info );
12988 void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
12989                     lapack_int *info );
12990 void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
12991                     lapack_complex_double* a, lapack_int *info );
12992 void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
12993                     lapack_complex_float* a, lapack_int *info );
12994 void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
12995 void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
12996 void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
12997                     lapack_int *info );
12998 void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
12999                     lapack_int *info );
13000 void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
13001                     lapack_int* ldab, lapack_int *info );
13002 void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
13003                     lapack_int* ldab, lapack_int *info );
13004 void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13005                     lapack_complex_float* ab, lapack_int* ldab,
13006                     lapack_int *info );
13007 void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13008                     lapack_complex_double* ab, lapack_int* ldab,
13009                     lapack_int *info );
13010 void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
13011 void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
13012 void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
13013                     lapack_int *info );
13014 void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
13015                     lapack_int *info );
13016 void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13017                     lapack_int* ipiv, float* work, lapack_int* lwork,
13018                     lapack_int *info );
13019 void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13020                     lapack_int* ipiv, double* work, lapack_int* lwork,
13021                     lapack_int *info );
13022 void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13023                     lapack_int* lda, lapack_int* ipiv,
13024                     lapack_complex_float* work, lapack_int* lwork,
13025                     lapack_int *info );
13026 void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13027                     lapack_int* lda, lapack_int* ipiv,
13028                     lapack_complex_double* work, lapack_int* lwork,
13029                     lapack_int *info );
13030 void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13031                     lapack_int* lda, lapack_int* ipiv,
13032                     lapack_complex_float* work, lapack_int* lwork,
13033                     lapack_int *info );
13034 void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13035                     lapack_int* lda, lapack_int* ipiv,
13036                     lapack_complex_double* work, lapack_int* lwork,
13037                     lapack_int *info );
13038 void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
13039                     lapack_int *info );
13040 void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
13041                     lapack_int *info );
13042 void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13043                     lapack_int* ipiv, lapack_int *info );
13044 void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13045                     lapack_int* ipiv, lapack_int *info );
13046 void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13047                     lapack_int* ipiv, lapack_int *info );
13048 void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13049                     lapack_int* ipiv, lapack_int *info );
13050 void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13051                     const float* a, lapack_int* lda, const lapack_int* ipiv,
13052                     float* b, lapack_int* ldb, lapack_int *info );
13053 void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13054                     const double* a, lapack_int* lda, const lapack_int* ipiv,
13055                     double* b, lapack_int* ldb, lapack_int *info );
13056 void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13057                     const lapack_complex_float* a, lapack_int* lda,
13058                     const lapack_int* ipiv, lapack_complex_float* b,
13059                     lapack_int* ldb, lapack_int *info );
13060 void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13061                     const lapack_complex_double* a, lapack_int* lda,
13062                     const lapack_int* ipiv, lapack_complex_double* b,
13063                     lapack_int* ldb, lapack_int *info );
13064 void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13065                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
13066                     const lapack_int* ipiv, float* b, lapack_int* ldb,
13067                     lapack_int *info );
13068 void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13069                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
13070                     const lapack_int* ipiv, double* b, lapack_int* ldb,
13071                     lapack_int *info );
13072 void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13073                     lapack_int* nrhs, const lapack_complex_float* ab,
13074                     lapack_int* ldab, const lapack_int* ipiv,
13075                     lapack_complex_float* b, lapack_int* ldb,
13076                     lapack_int *info );
13077 void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13078                     lapack_int* nrhs, const lapack_complex_double* ab,
13079                     lapack_int* ldab, const lapack_int* ipiv,
13080                     lapack_complex_double* b, lapack_int* ldb,
13081                     lapack_int *info );
13082 void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
13083                     const float* dl, const float* d, const float* du,
13084                     const float* du2, const lapack_int* ipiv, float* b,
13085                     lapack_int* ldb, lapack_int *info );
13086 void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
13087                     const double* dl, const double* d, const double* du,
13088                     const double* du2, const lapack_int* ipiv, double* b,
13089                     lapack_int* ldb, lapack_int *info );
13090 void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
13091                     const lapack_complex_float* dl,
13092                     const lapack_complex_float* d,
13093                     const lapack_complex_float* du,
13094                     const lapack_complex_float* du2, const lapack_int* ipiv,
13095                     lapack_complex_float* b, lapack_int* ldb,
13096                     lapack_int *info );
13097 void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
13098                     const lapack_complex_double* dl,
13099                     const lapack_complex_double* d,
13100                     const lapack_complex_double* du,
13101                     const lapack_complex_double* du2, const lapack_int* ipiv,
13102                     lapack_complex_double* b, lapack_int* ldb,
13103                     lapack_int *info );
13104 void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
13105                     lapack_int* lda, float* b, lapack_int* ldb,
13106                     lapack_int *info );
13107 void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13108                     const double* a, lapack_int* lda, double* b,
13109                     lapack_int* ldb, lapack_int *info );
13110 void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13111                     const lapack_complex_float* a, lapack_int* lda,
13112                     lapack_complex_float* b, lapack_int* ldb,
13113                     lapack_int *info );
13114 void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13115                     const lapack_complex_double* a, lapack_int* lda,
13116                     lapack_complex_double* b, lapack_int* ldb,
13117                     lapack_int *info );
13118 void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
13119                     const double* a, double* b, lapack_int* ldb,
13120                     lapack_int *info );
13121 void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
13122                     const float* a, float* b, lapack_int* ldb,
13123                     lapack_int *info );
13124 void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
13125                     const lapack_complex_double* a, lapack_complex_double* b,
13126                     lapack_int* ldb, lapack_int *info );
13127 void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
13128                     const lapack_complex_float* a, lapack_complex_float* b,
13129                     lapack_int* ldb, lapack_int *info );
13130 void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13131                     const float* ap, float* b, lapack_int* ldb,
13132                     lapack_int *info );
13133 void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13134                     const double* ap, double* b, lapack_int* ldb,
13135                     lapack_int *info );
13136 void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13137                     const lapack_complex_float* ap, lapack_complex_float* b,
13138                     lapack_int* ldb, lapack_int *info );
13139 void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13140                     const lapack_complex_double* ap, lapack_complex_double* b,
13141                     lapack_int* ldb, lapack_int *info );
13142 void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13143                     const float* ab, lapack_int* ldab, float* b,
13144                     lapack_int* ldb, lapack_int *info );
13145 void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13146                     const double* ab, lapack_int* ldab, double* b,
13147                     lapack_int* ldb, lapack_int *info );
13148 void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13149                     const lapack_complex_float* ab, lapack_int* ldab,
13150                     lapack_complex_float* b, lapack_int* ldb,
13151                     lapack_int *info );
13152 void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13153                     const lapack_complex_double* ab, lapack_int* ldab,
13154                     lapack_complex_double* b, lapack_int* ldb,
13155                     lapack_int *info );
13156 void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
13157                     const float* e, float* b, lapack_int* ldb,
13158                     lapack_int *info );
13159 void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
13160                     const double* e, double* b, lapack_int* ldb,
13161                     lapack_int *info );
13162 void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
13163                     const lapack_complex_float* e, lapack_complex_float* b,
13164                     lapack_int* ldb, lapack_int *info );
13165 void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13166                     const double* d, const lapack_complex_double* e,
13167                     lapack_complex_double* b, lapack_int* ldb,
13168                     lapack_int *info );
13169 void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
13170                     lapack_int* lda, const lapack_int* ipiv, float* b,
13171                     lapack_int* ldb, lapack_int *info );
13172 void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13173                     const double* a, lapack_int* lda, const lapack_int* ipiv,
13174                     double* b, lapack_int* ldb, lapack_int *info );
13175 void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13176                     const lapack_complex_float* a, lapack_int* lda,
13177                     const lapack_int* ipiv, lapack_complex_float* b,
13178                     lapack_int* ldb, lapack_int *info );
13179 void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13180                     const lapack_complex_double* a, lapack_int* lda,
13181                     const lapack_int* ipiv, lapack_complex_double* b,
13182                     lapack_int* ldb, lapack_int *info );
13183 void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13184                     const lapack_complex_float* a, lapack_int* lda,
13185                     const lapack_int* ipiv, lapack_complex_float* b,
13186                     lapack_int* ldb, lapack_int *info );
13187 void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13188                     const lapack_complex_double* a, lapack_int* lda,
13189                     const lapack_int* ipiv, lapack_complex_double* b,
13190                     lapack_int* ldb, lapack_int *info );
13191 void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13192                     const float* ap, const lapack_int* ipiv, float* b,
13193                     lapack_int* ldb, lapack_int *info );
13194 void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13195                     const double* ap, const lapack_int* ipiv, double* b,
13196                     lapack_int* ldb, lapack_int *info );
13197 void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13198                     const lapack_complex_float* ap, const lapack_int* ipiv,
13199                     lapack_complex_float* b, lapack_int* ldb,
13200                     lapack_int *info );
13201 void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13202                     const lapack_complex_double* ap, const lapack_int* ipiv,
13203                     lapack_complex_double* b, lapack_int* ldb,
13204                     lapack_int *info );
13205 void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13206                     const lapack_complex_float* ap, const lapack_int* ipiv,
13207                     lapack_complex_float* b, lapack_int* ldb,
13208                     lapack_int *info );
13209 void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
13210                     const lapack_complex_double* ap, const lapack_int* ipiv,
13211                     lapack_complex_double* b, lapack_int* ldb,
13212                     lapack_int *info );
13213 void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13214                     lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
13215                     lapack_int* ldb, lapack_int *info );
13216 void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13217                     lapack_int* nrhs, const double* a, lapack_int* lda,
13218                     double* b, lapack_int* ldb, lapack_int *info );
13219 void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13220                     lapack_int* nrhs, const lapack_complex_float* a,
13221                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
13222                     lapack_int *info );
13223 void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13224                     lapack_int* nrhs, const lapack_complex_double* a,
13225                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
13226                     lapack_int *info );
13227 void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
13228                     lapack_int* nrhs, const float* ap, float* b,
13229                     lapack_int* ldb, lapack_int *info );
13230 void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
13231                     lapack_int* nrhs, const double* ap, double* b,
13232                     lapack_int* ldb, lapack_int *info );
13233 void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
13234                     lapack_int* nrhs, const lapack_complex_float* ap,
13235                     lapack_complex_float* b, lapack_int* ldb,
13236                     lapack_int *info );
13237 void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
13238                     lapack_int* nrhs, const lapack_complex_double* ap,
13239                     lapack_complex_double* b, lapack_int* ldb,
13240                     lapack_int *info );
13241 void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13242                     lapack_int* kd, lapack_int* nrhs, const float* ab,
13243                     lapack_int* ldab, float* b, lapack_int* ldb,
13244                     lapack_int *info );
13245 void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13246                     lapack_int* kd, lapack_int* nrhs, const double* ab,
13247                     lapack_int* ldab, double* b, lapack_int* ldb,
13248                     lapack_int *info );
13249 void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13250                     lapack_int* kd, lapack_int* nrhs,
13251                     const lapack_complex_float* ab, lapack_int* ldab,
13252                     lapack_complex_float* b, lapack_int* ldb,
13253                     lapack_int *info );
13254 void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
13255                     lapack_int* kd, lapack_int* nrhs,
13256                     const lapack_complex_double* ab, lapack_int* ldab,
13257                     lapack_complex_double* b, lapack_int* ldb,
13258                     lapack_int *info );
13259 void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
13260                     float* anorm, float* rcond, float* work, lapack_int* iwork,
13261                     lapack_int *info );
13262 void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
13263                     double* anorm, double* rcond, double* work,
13264                     lapack_int* iwork, lapack_int *info );
13265 void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
13266                     lapack_int* lda, float* anorm, float* rcond,
13267                     lapack_complex_float* work, float* rwork,
13268                     lapack_int *info );
13269 void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
13270                     lapack_int* lda, double* anorm, double* rcond,
13271                     lapack_complex_double* work, double* rwork,
13272                     lapack_int *info );
13273 void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
13274                     const float* ab, lapack_int* ldab, const lapack_int* ipiv,
13275                     float* anorm, float* rcond, float* work, lapack_int* iwork,
13276                     lapack_int *info );
13277 void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
13278                     const double* ab, lapack_int* ldab, const lapack_int* ipiv,
13279                     double* anorm, double* rcond, double* work,
13280                     lapack_int* iwork, lapack_int *info );
13281 void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
13282                     const lapack_complex_float* ab, lapack_int* ldab,
13283                     const lapack_int* ipiv, float* anorm, float* rcond,
13284                     lapack_complex_float* work, float* rwork,
13285                     lapack_int *info );
13286 void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
13287                     const lapack_complex_double* ab, lapack_int* ldab,
13288                     const lapack_int* ipiv, double* anorm, double* rcond,
13289                     lapack_complex_double* work, double* rwork,
13290                     lapack_int *info );
13291 void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
13292                     const float* du, const float* du2, const lapack_int* ipiv,
13293                     float* anorm, float* rcond, float* work, lapack_int* iwork,
13294                     lapack_int *info );
13295 void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
13296                     const double* d, const double* du, const double* du2,
13297                     const lapack_int* ipiv, double* anorm, double* rcond,
13298                     double* work, lapack_int* iwork, lapack_int *info );
13299 void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
13300                     const lapack_complex_float* d,
13301                     const lapack_complex_float* du,
13302                     const lapack_complex_float* du2, const lapack_int* ipiv,
13303                     float* anorm, float* rcond, lapack_complex_float* work,
13304                     lapack_int *info );
13305 void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
13306                     const lapack_complex_double* d,
13307                     const lapack_complex_double* du,
13308                     const lapack_complex_double* du2, const lapack_int* ipiv,
13309                     double* anorm, double* rcond, lapack_complex_double* work,
13310                     lapack_int *info );
13311 void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
13312                     float* anorm, float* rcond, float* work, lapack_int* iwork,
13313                     lapack_int *info );
13314 void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
13315                     double* anorm, double* rcond, double* work,
13316                     lapack_int* iwork, lapack_int *info );
13317 void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
13318                     lapack_int* lda, float* anorm, float* rcond,
13319                     lapack_complex_float* work, float* rwork,
13320                     lapack_int *info );
13321 void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
13322                     lapack_int* lda, double* anorm, double* rcond,
13323                     lapack_complex_double* work, double* rwork,
13324                     lapack_int *info );
13325 void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
13326                     float* rcond, float* work, lapack_int* iwork,
13327                     lapack_int *info );
13328 void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
13329                     double* rcond, double* work, lapack_int* iwork,
13330                     lapack_int *info );
13331 void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
13332                     float* anorm, float* rcond, lapack_complex_float* work,
13333                     float* rwork, lapack_int *info );
13334 void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
13335                     double* anorm, double* rcond, lapack_complex_double* work,
13336                     double* rwork, lapack_int *info );
13337 void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
13338                     lapack_int* ldab, float* anorm, float* rcond, float* work,
13339                     lapack_int* iwork, lapack_int *info );
13340 void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
13341                     lapack_int* ldab, double* anorm, double* rcond,
13342                     double* work, lapack_int* iwork, lapack_int *info );
13343 void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
13344                     const lapack_complex_float* ab, lapack_int* ldab,
13345                     float* anorm, float* rcond, lapack_complex_float* work,
13346                     float* rwork, lapack_int *info );
13347 void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
13348                     const lapack_complex_double* ab, lapack_int* ldab,
13349                     double* anorm, double* rcond, lapack_complex_double* work,
13350                     double* rwork, lapack_int *info );
13351 void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
13352                     float* rcond, float* work, lapack_int *info );
13353 void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
13354                     double* anorm, double* rcond, double* work,
13355                     lapack_int *info );
13356 void LAPACK_cptcon( lapack_int* n, const float* d,
13357                     const lapack_complex_float* e, float* anorm, float* rcond,
13358                     float* work, lapack_int *info );
13359 void LAPACK_zptcon( lapack_int* n, const double* d,
13360                     const lapack_complex_double* e, double* anorm,
13361                     double* rcond, double* work, lapack_int *info );
13362 void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
13363                     const lapack_int* ipiv, float* anorm, float* rcond,
13364                     float* work, lapack_int* iwork, lapack_int *info );
13365 void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
13366                     const lapack_int* ipiv, double* anorm, double* rcond,
13367                     double* work, lapack_int* iwork, lapack_int *info );
13368 void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
13369                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
13370                     float* rcond, lapack_complex_float* work,
13371                     lapack_int *info );
13372 void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
13373                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
13374                     double* rcond, lapack_complex_double* work,
13375                     lapack_int *info );
13376 void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
13377                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
13378                     float* rcond, lapack_complex_float* work,
13379                     lapack_int *info );
13380 void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
13381                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
13382                     double* rcond, lapack_complex_double* work,
13383                     lapack_int *info );
13384 void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
13385                     const lapack_int* ipiv, float* anorm, float* rcond,
13386                     float* work, lapack_int* iwork, lapack_int *info );
13387 void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
13388                     const lapack_int* ipiv, double* anorm, double* rcond,
13389                     double* work, lapack_int* iwork, lapack_int *info );
13390 void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
13391                     const lapack_int* ipiv, float* anorm, float* rcond,
13392                     lapack_complex_float* work, lapack_int *info );
13393 void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
13394                     const lapack_int* ipiv, double* anorm, double* rcond,
13395                     lapack_complex_double* work, lapack_int *info );
13396 void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
13397                     const lapack_int* ipiv, float* anorm, float* rcond,
13398                     lapack_complex_float* work, lapack_int *info );
13399 void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
13400                     const lapack_int* ipiv, double* anorm, double* rcond,
13401                     lapack_complex_double* work, lapack_int *info );
13402 void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
13403                     const float* a, lapack_int* lda, float* rcond, float* work,
13404                     lapack_int* iwork, lapack_int *info );
13405 void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
13406                     const double* a, lapack_int* lda, double* rcond,
13407                     double* work, lapack_int* iwork, lapack_int *info );
13408 void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
13409                     const lapack_complex_float* a, lapack_int* lda,
13410                     float* rcond, lapack_complex_float* work, float* rwork,
13411                     lapack_int *info );
13412 void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
13413                     const lapack_complex_double* a, lapack_int* lda,
13414                     double* rcond, lapack_complex_double* work, double* rwork,
13415                     lapack_int *info );
13416 void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
13417                     const float* ap, float* rcond, float* work,
13418                     lapack_int* iwork, lapack_int *info );
13419 void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
13420                     const double* ap, double* rcond, double* work,
13421                     lapack_int* iwork, lapack_int *info );
13422 void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
13423                     const lapack_complex_float* ap, float* rcond,
13424                     lapack_complex_float* work, float* rwork,
13425                     lapack_int *info );
13426 void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
13427                     const lapack_complex_double* ap, double* rcond,
13428                     lapack_complex_double* work, double* rwork,
13429                     lapack_int *info );
13430 void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
13431                     lapack_int* kd, const float* ab, lapack_int* ldab,
13432                     float* rcond, float* work, lapack_int* iwork,
13433                     lapack_int *info );
13434 void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
13435                     lapack_int* kd, const double* ab, lapack_int* ldab,
13436                     double* rcond, double* work, lapack_int* iwork,
13437                     lapack_int *info );
13438 void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
13439                     lapack_int* kd, const lapack_complex_float* ab,
13440                     lapack_int* ldab, float* rcond, lapack_complex_float* work,
13441                     float* rwork, lapack_int *info );
13442 void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
13443                     lapack_int* kd, const lapack_complex_double* ab,
13444                     lapack_int* ldab, double* rcond,
13445                     lapack_complex_double* work, double* rwork,
13446                     lapack_int *info );
13447 void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
13448                     const float* a, lapack_int* lda, const float* af,
13449                     lapack_int* ldaf, const lapack_int* ipiv, const float* b,
13450                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
13451                     float* berr, float* work, lapack_int* iwork,
13452                     lapack_int *info );
13453 void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
13454                     const double* a, lapack_int* lda, const double* af,
13455                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
13456                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
13457                     double* berr, double* work, lapack_int* iwork,
13458                     lapack_int *info );
13459 void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
13460                     const lapack_complex_float* a, lapack_int* lda,
13461                     const lapack_complex_float* af, lapack_int* ldaf,
13462                     const lapack_int* ipiv, const lapack_complex_float* b,
13463                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13464                     float* ferr, float* berr, lapack_complex_float* work,
13465                     float* rwork, lapack_int *info );
13466 void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
13467                     const lapack_complex_double* a, lapack_int* lda,
13468                     const lapack_complex_double* af, lapack_int* ldaf,
13469                     const lapack_int* ipiv, const lapack_complex_double* b,
13470                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13471                     double* ferr, double* berr, lapack_complex_double* work,
13472                     double* rwork, lapack_int *info );
13473 void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
13474                      const double* a, lapack_int* lda, const double* af,
13475                      lapack_int* ldaf, const lapack_int* ipiv, const double* r,
13476                      const double* c, const double* b, lapack_int* ldb,
13477                      double* x, lapack_int* ldx, double* rcond, double* berr,
13478                      lapack_int* n_err_bnds, double* err_bnds_norm,
13479                      double* err_bnds_comp, lapack_int* nparams, double* params,
13480                      double* work, lapack_int* iwork, lapack_int *info );
13481 void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
13482                      const float* a, lapack_int* lda, const float* af,
13483                      lapack_int* ldaf, const lapack_int* ipiv, const float* r,
13484                      const float* c, const float* b, lapack_int* ldb, float* x,
13485                      lapack_int* ldx, float* rcond, float* berr,
13486                      lapack_int* n_err_bnds, float* err_bnds_norm,
13487                      float* err_bnds_comp, lapack_int* nparams, float* params,
13488                      float* work, lapack_int* iwork, lapack_int *info );
13489 void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
13490                      const lapack_complex_double* a, lapack_int* lda,
13491                      const lapack_complex_double* af, lapack_int* ldaf,
13492                      const lapack_int* ipiv, const double* r, const double* c,
13493                      const lapack_complex_double* b, lapack_int* ldb,
13494                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13495                      double* berr, lapack_int* n_err_bnds,
13496                      double* err_bnds_norm, double* err_bnds_comp,
13497                      lapack_int* nparams, double* params,
13498                      lapack_complex_double* work, double* rwork,
13499                      lapack_int *info );
13500 void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
13501                      const lapack_complex_float* a, lapack_int* lda,
13502                      const lapack_complex_float* af, lapack_int* ldaf,
13503                      const lapack_int* ipiv, const float* r, const float* c,
13504                      const lapack_complex_float* b, lapack_int* ldb,
13505                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13506                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
13507                      float* err_bnds_comp, lapack_int* nparams, float* params,
13508                      lapack_complex_float* work, float* rwork,
13509                      lapack_int *info );
13510 void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13511                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
13512                     const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
13513                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13514                     float* ferr, float* berr, float* work, lapack_int* iwork,
13515                     lapack_int *info );
13516 void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13517                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
13518                     const double* afb, lapack_int* ldafb,
13519                     const lapack_int* ipiv, const double* b, lapack_int* ldb,
13520                     double* x, lapack_int* ldx, double* ferr, double* berr,
13521                     double* work, lapack_int* iwork, lapack_int *info );
13522 void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13523                     lapack_int* nrhs, const lapack_complex_float* ab,
13524                     lapack_int* ldab, const lapack_complex_float* afb,
13525                     lapack_int* ldafb, const lapack_int* ipiv,
13526                     const lapack_complex_float* b, lapack_int* ldb,
13527                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13528                     float* berr, lapack_complex_float* work, float* rwork,
13529                     lapack_int *info );
13530 void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13531                     lapack_int* nrhs, const lapack_complex_double* ab,
13532                     lapack_int* ldab, const lapack_complex_double* afb,
13533                     lapack_int* ldafb, const lapack_int* ipiv,
13534                     const lapack_complex_double* b, lapack_int* ldb,
13535                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13536                     double* berr, lapack_complex_double* work, double* rwork,
13537                     lapack_int *info );
13538 void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
13539                      lapack_int* ku, lapack_int* nrhs, const double* ab,
13540                      lapack_int* ldab, const double* afb, lapack_int* ldafb,
13541                      const lapack_int* ipiv, const double* r, const double* c,
13542                      const double* b, lapack_int* ldb, double* x,
13543                      lapack_int* ldx, double* rcond, double* berr,
13544                      lapack_int* n_err_bnds, double* err_bnds_norm,
13545                      double* err_bnds_comp, lapack_int* nparams, double* params,
13546                      double* work, lapack_int* iwork, lapack_int *info );
13547 void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
13548                      lapack_int* ku, lapack_int* nrhs, const float* ab,
13549                      lapack_int* ldab, const float* afb, lapack_int* ldafb,
13550                      const lapack_int* ipiv, const float* r, const float* c,
13551                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13552                      float* rcond, float* berr, lapack_int* n_err_bnds,
13553                      float* err_bnds_norm, float* err_bnds_comp,
13554                      lapack_int* nparams, float* params, float* work,
13555                      lapack_int* iwork, lapack_int *info );
13556 void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
13557                      lapack_int* ku, lapack_int* nrhs,
13558                      const lapack_complex_double* ab, lapack_int* ldab,
13559                      const lapack_complex_double* afb, lapack_int* ldafb,
13560                      const lapack_int* ipiv, const double* r, const double* c,
13561                      const lapack_complex_double* b, lapack_int* ldb,
13562                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13563                      double* berr, lapack_int* n_err_bnds,
13564                      double* err_bnds_norm, double* err_bnds_comp,
13565                      lapack_int* nparams, double* params,
13566                      lapack_complex_double* work, double* rwork,
13567                      lapack_int *info );
13568 void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
13569                      lapack_int* ku, lapack_int* nrhs,
13570                      const lapack_complex_float* ab, lapack_int* ldab,
13571                      const lapack_complex_float* afb, lapack_int* ldafb,
13572                      const lapack_int* ipiv, const float* r, const float* c,
13573                      const lapack_complex_float* b, lapack_int* ldb,
13574                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13575                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
13576                      float* err_bnds_comp, lapack_int* nparams, float* params,
13577                      lapack_complex_float* work, float* rwork,
13578                      lapack_int *info );
13579 void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
13580                     const float* dl, const float* d, const float* du,
13581                     const float* dlf, const float* df, const float* duf,
13582                     const float* du2, const lapack_int* ipiv, const float* b,
13583                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
13584                     float* berr, float* work, lapack_int* iwork,
13585                     lapack_int *info );
13586 void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
13587                     const double* dl, const double* d, const double* du,
13588                     const double* dlf, const double* df, const double* duf,
13589                     const double* du2, const lapack_int* ipiv, const double* b,
13590                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
13591                     double* berr, double* work, lapack_int* iwork,
13592                     lapack_int *info );
13593 void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
13594                     const lapack_complex_float* dl,
13595                     const lapack_complex_float* d,
13596                     const lapack_complex_float* du,
13597                     const lapack_complex_float* dlf,
13598                     const lapack_complex_float* df,
13599                     const lapack_complex_float* duf,
13600                     const lapack_complex_float* du2, const lapack_int* ipiv,
13601                     const lapack_complex_float* b, lapack_int* ldb,
13602                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13603                     float* berr, lapack_complex_float* work, float* rwork,
13604                     lapack_int *info );
13605 void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
13606                     const lapack_complex_double* dl,
13607                     const lapack_complex_double* d,
13608                     const lapack_complex_double* du,
13609                     const lapack_complex_double* dlf,
13610                     const lapack_complex_double* df,
13611                     const lapack_complex_double* duf,
13612                     const lapack_complex_double* du2, const lapack_int* ipiv,
13613                     const lapack_complex_double* b, lapack_int* ldb,
13614                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13615                     double* berr, lapack_complex_double* work, double* rwork,
13616                     lapack_int *info );
13617 void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
13618                     lapack_int* lda, const float* af, lapack_int* ldaf,
13619                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13620                     float* ferr, float* berr, float* work, lapack_int* iwork,
13621                     lapack_int *info );
13622 void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13623                     const double* a, lapack_int* lda, const double* af,
13624                     lapack_int* ldaf, const double* b, lapack_int* ldb,
13625                     double* x, lapack_int* ldx, double* ferr, double* berr,
13626                     double* work, lapack_int* iwork, lapack_int *info );
13627 void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13628                     const lapack_complex_float* a, lapack_int* lda,
13629                     const lapack_complex_float* af, lapack_int* ldaf,
13630                     const lapack_complex_float* b, lapack_int* ldb,
13631                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13632                     float* berr, lapack_complex_float* work, float* rwork,
13633                     lapack_int *info );
13634 void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13635                     const lapack_complex_double* a, lapack_int* lda,
13636                     const lapack_complex_double* af, lapack_int* ldaf,
13637                     const lapack_complex_double* b, lapack_int* ldb,
13638                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13639                     double* berr, lapack_complex_double* work, double* rwork,
13640                     lapack_int *info );
13641 void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13642                      const double* a, lapack_int* lda, const double* af,
13643                      lapack_int* ldaf, const double* s, const double* b,
13644                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
13645                      double* berr, lapack_int* n_err_bnds,
13646                      double* err_bnds_norm, double* err_bnds_comp,
13647                      lapack_int* nparams, double* params, double* work,
13648                      lapack_int* iwork, lapack_int *info );
13649 void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13650                      const float* a, lapack_int* lda, const float* af,
13651                      lapack_int* ldaf, const float* s, const float* b,
13652                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
13653                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
13654                      float* err_bnds_comp, lapack_int* nparams, float* params,
13655                      float* work, lapack_int* iwork, lapack_int *info );
13656 void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13657                      const lapack_complex_double* a, lapack_int* lda,
13658                      const lapack_complex_double* af, lapack_int* ldaf,
13659                      const double* s, const lapack_complex_double* b,
13660                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13661                      double* rcond, double* berr, lapack_int* n_err_bnds,
13662                      double* err_bnds_norm, double* err_bnds_comp,
13663                      lapack_int* nparams, double* params,
13664                      lapack_complex_double* work, double* rwork,
13665                      lapack_int *info );
13666 void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13667                      const lapack_complex_float* a, lapack_int* lda,
13668                      const lapack_complex_float* af, lapack_int* ldaf,
13669                      const float* s, const lapack_complex_float* b,
13670                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13671                      float* rcond, float* berr, lapack_int* n_err_bnds,
13672                      float* err_bnds_norm, float* err_bnds_comp,
13673                      lapack_int* nparams, float* params,
13674                      lapack_complex_float* work, float* rwork,
13675                      lapack_int *info );
13676 void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13677                     const float* ap, const float* afp, const float* b,
13678                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
13679                     float* berr, float* work, lapack_int* iwork,
13680                     lapack_int *info );
13681 void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13682                     const double* ap, const double* afp, const double* b,
13683                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
13684                     double* berr, double* work, lapack_int* iwork,
13685                     lapack_int *info );
13686 void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13687                     const lapack_complex_float* ap,
13688                     const lapack_complex_float* afp,
13689                     const lapack_complex_float* b, lapack_int* ldb,
13690                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13691                     float* berr, lapack_complex_float* work, float* rwork,
13692                     lapack_int *info );
13693 void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13694                     const lapack_complex_double* ap,
13695                     const lapack_complex_double* afp,
13696                     const lapack_complex_double* b, lapack_int* ldb,
13697                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13698                     double* berr, lapack_complex_double* work, double* rwork,
13699                     lapack_int *info );
13700 void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13701                     const float* ab, lapack_int* ldab, const float* afb,
13702                     lapack_int* ldafb, const float* b, lapack_int* ldb,
13703                     float* x, lapack_int* ldx, float* ferr, float* berr,
13704                     float* work, lapack_int* iwork, lapack_int *info );
13705 void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13706                     const double* ab, lapack_int* ldab, const double* afb,
13707                     lapack_int* ldafb, const double* b, lapack_int* ldb,
13708                     double* x, lapack_int* ldx, double* ferr, double* berr,
13709                     double* work, lapack_int* iwork, lapack_int *info );
13710 void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13711                     const lapack_complex_float* ab, lapack_int* ldab,
13712                     const lapack_complex_float* afb, lapack_int* ldafb,
13713                     const lapack_complex_float* b, lapack_int* ldb,
13714                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13715                     float* berr, lapack_complex_float* work, float* rwork,
13716                     lapack_int *info );
13717 void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
13718                     const lapack_complex_double* ab, lapack_int* ldab,
13719                     const lapack_complex_double* afb, lapack_int* ldafb,
13720                     const lapack_complex_double* b, lapack_int* ldb,
13721                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13722                     double* berr, lapack_complex_double* work, double* rwork,
13723                     lapack_int *info );
13724 void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
13725                     const float* e, const float* df, const float* ef,
13726                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13727                     float* ferr, float* berr, float* work, lapack_int *info );
13728 void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
13729                     const double* e, const double* df, const double* ef,
13730                     const double* b, lapack_int* ldb, double* x,
13731                     lapack_int* ldx, double* ferr, double* berr, double* work,
13732                     lapack_int *info );
13733 void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
13734                     const lapack_complex_float* e, const float* df,
13735                     const lapack_complex_float* ef,
13736                     const lapack_complex_float* b, lapack_int* ldb,
13737                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13738                     float* berr, lapack_complex_float* work, float* rwork,
13739                     lapack_int *info );
13740 void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13741                     const double* d, const lapack_complex_double* e,
13742                     const double* df, const lapack_complex_double* ef,
13743                     const lapack_complex_double* b, lapack_int* ldb,
13744                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13745                     double* berr, lapack_complex_double* work, double* rwork,
13746                     lapack_int *info );
13747 void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
13748                     lapack_int* lda, const float* af, lapack_int* ldaf,
13749                     const lapack_int* ipiv, const float* b, lapack_int* ldb,
13750                     float* x, lapack_int* ldx, float* ferr, float* berr,
13751                     float* work, lapack_int* iwork, lapack_int *info );
13752 void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13753                     const double* a, lapack_int* lda, const double* af,
13754                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
13755                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
13756                     double* berr, double* work, lapack_int* iwork,
13757                     lapack_int *info );
13758 void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13759                     const lapack_complex_float* a, lapack_int* lda,
13760                     const lapack_complex_float* af, lapack_int* ldaf,
13761                     const lapack_int* ipiv, const lapack_complex_float* b,
13762                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13763                     float* ferr, float* berr, lapack_complex_float* work,
13764                     float* rwork, lapack_int *info );
13765 void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13766                     const lapack_complex_double* a, lapack_int* lda,
13767                     const lapack_complex_double* af, lapack_int* ldaf,
13768                     const lapack_int* ipiv, const lapack_complex_double* b,
13769                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13770                     double* ferr, double* berr, lapack_complex_double* work,
13771                     double* rwork, lapack_int *info );
13772 void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13773                      const double* a, lapack_int* lda, const double* af,
13774                      lapack_int* ldaf, const lapack_int* ipiv, const double* s,
13775                      const double* b, lapack_int* ldb, double* x,
13776                      lapack_int* ldx, double* rcond, double* berr,
13777                      lapack_int* n_err_bnds, double* err_bnds_norm,
13778                      double* err_bnds_comp, lapack_int* nparams, double* params,
13779                      double* work, lapack_int* iwork, lapack_int *info );
13780 void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13781                      const float* a, lapack_int* lda, const float* af,
13782                      lapack_int* ldaf, const lapack_int* ipiv, const float* s,
13783                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13784                      float* rcond, float* berr, lapack_int* n_err_bnds,
13785                      float* err_bnds_norm, float* err_bnds_comp,
13786                      lapack_int* nparams, float* params, float* work,
13787                      lapack_int* iwork, lapack_int *info );
13788 void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13789                      const lapack_complex_double* a, lapack_int* lda,
13790                      const lapack_complex_double* af, lapack_int* ldaf,
13791                      const lapack_int* ipiv, const double* s,
13792                      const lapack_complex_double* b, lapack_int* ldb,
13793                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13794                      double* berr, lapack_int* n_err_bnds,
13795                      double* err_bnds_norm, double* err_bnds_comp,
13796                      lapack_int* nparams, double* params,
13797                      lapack_complex_double* work, double* rwork,
13798                      lapack_int *info );
13799 void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13800                      const lapack_complex_float* a, lapack_int* lda,
13801                      const lapack_complex_float* af, lapack_int* ldaf,
13802                      const lapack_int* ipiv, const float* s,
13803                      const lapack_complex_float* b, lapack_int* ldb,
13804                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13805                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
13806                      float* err_bnds_comp, lapack_int* nparams, float* params,
13807                      lapack_complex_float* work, float* rwork,
13808                      lapack_int *info );
13809 void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13810                     const lapack_complex_float* a, lapack_int* lda,
13811                     const lapack_complex_float* af, lapack_int* ldaf,
13812                     const lapack_int* ipiv, const lapack_complex_float* b,
13813                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
13814                     float* ferr, float* berr, lapack_complex_float* work,
13815                     float* rwork, lapack_int *info );
13816 void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13817                     const lapack_complex_double* a, lapack_int* lda,
13818                     const lapack_complex_double* af, lapack_int* ldaf,
13819                     const lapack_int* ipiv, const lapack_complex_double* b,
13820                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
13821                     double* ferr, double* berr, lapack_complex_double* work,
13822                     double* rwork, lapack_int *info );
13823 void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13824                      const lapack_complex_double* a, lapack_int* lda,
13825                      const lapack_complex_double* af, lapack_int* ldaf,
13826                      const lapack_int* ipiv, const double* s,
13827                      const lapack_complex_double* b, lapack_int* ldb,
13828                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
13829                      double* berr, lapack_int* n_err_bnds,
13830                      double* err_bnds_norm, double* err_bnds_comp,
13831                      lapack_int* nparams, double* params,
13832                      lapack_complex_double* work, double* rwork,
13833                      lapack_int *info );
13834 void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
13835                      const lapack_complex_float* a, lapack_int* lda,
13836                      const lapack_complex_float* af, lapack_int* ldaf,
13837                      const lapack_int* ipiv, const float* s,
13838                      const lapack_complex_float* b, lapack_int* ldb,
13839                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
13840                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
13841                      float* err_bnds_comp, lapack_int* nparams, float* params,
13842                      lapack_complex_float* work, float* rwork,
13843                      lapack_int *info );
13844 void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13845                     const float* ap, const float* afp, const lapack_int* ipiv,
13846                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
13847                     float* ferr, float* berr, float* work, lapack_int* iwork,
13848                     lapack_int *info );
13849 void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13850                     const double* ap, const double* afp, const lapack_int* ipiv,
13851                     const double* b, lapack_int* ldb, double* x,
13852                     lapack_int* ldx, double* ferr, double* berr, double* work,
13853                     lapack_int* iwork, lapack_int *info );
13854 void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13855                     const lapack_complex_float* ap,
13856                     const lapack_complex_float* afp, const lapack_int* ipiv,
13857                     const lapack_complex_float* b, lapack_int* ldb,
13858                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13859                     float* berr, lapack_complex_float* work, float* rwork,
13860                     lapack_int *info );
13861 void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13862                     const lapack_complex_double* ap,
13863                     const lapack_complex_double* afp, const lapack_int* ipiv,
13864                     const lapack_complex_double* b, lapack_int* ldb,
13865                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13866                     double* berr, lapack_complex_double* work, double* rwork,
13867                     lapack_int *info );
13868 void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13869                     const lapack_complex_float* ap,
13870                     const lapack_complex_float* afp, const lapack_int* ipiv,
13871                     const lapack_complex_float* b, lapack_int* ldb,
13872                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
13873                     float* berr, lapack_complex_float* work, float* rwork,
13874                     lapack_int *info );
13875 void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
13876                     const lapack_complex_double* ap,
13877                     const lapack_complex_double* afp, const lapack_int* ipiv,
13878                     const lapack_complex_double* b, lapack_int* ldb,
13879                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
13880                     double* berr, lapack_complex_double* work, double* rwork,
13881                     lapack_int *info );
13882 void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13883                     lapack_int* nrhs, const float* a, lapack_int* lda,
13884                     const float* b, lapack_int* ldb, const float* x,
13885                     lapack_int* ldx, float* ferr, float* berr, float* work,
13886                     lapack_int* iwork, lapack_int *info );
13887 void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13888                     lapack_int* nrhs, const double* a, lapack_int* lda,
13889                     const double* b, lapack_int* ldb, const double* x,
13890                     lapack_int* ldx, double* ferr, double* berr, double* work,
13891                     lapack_int* iwork, lapack_int *info );
13892 void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13893                     lapack_int* nrhs, const lapack_complex_float* a,
13894                     lapack_int* lda, const lapack_complex_float* b,
13895                     lapack_int* ldb, const lapack_complex_float* x,
13896                     lapack_int* ldx, float* ferr, float* berr,
13897                     lapack_complex_float* work, float* rwork,
13898                     lapack_int *info );
13899 void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13900                     lapack_int* nrhs, const lapack_complex_double* a,
13901                     lapack_int* lda, const lapack_complex_double* b,
13902                     lapack_int* ldb, const lapack_complex_double* x,
13903                     lapack_int* ldx, double* ferr, double* berr,
13904                     lapack_complex_double* work, double* rwork,
13905                     lapack_int *info );
13906 void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
13907                     lapack_int* nrhs, const float* ap, const float* b,
13908                     lapack_int* ldb, const float* x, lapack_int* ldx,
13909                     float* ferr, float* berr, float* work, lapack_int* iwork,
13910                     lapack_int *info );
13911 void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
13912                     lapack_int* nrhs, const double* ap, const double* b,
13913                     lapack_int* ldb, const double* x, lapack_int* ldx,
13914                     double* ferr, double* berr, double* work, lapack_int* iwork,
13915                     lapack_int *info );
13916 void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
13917                     lapack_int* nrhs, const lapack_complex_float* ap,
13918                     const lapack_complex_float* b, lapack_int* ldb,
13919                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
13920                     float* berr, lapack_complex_float* work, float* rwork,
13921                     lapack_int *info );
13922 void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
13923                     lapack_int* nrhs, const lapack_complex_double* ap,
13924                     const lapack_complex_double* b, lapack_int* ldb,
13925                     const lapack_complex_double* x, lapack_int* ldx,
13926                     double* ferr, double* berr, lapack_complex_double* work,
13927                     double* rwork, lapack_int *info );
13928 void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13929                     lapack_int* kd, lapack_int* nrhs, const float* ab,
13930                     lapack_int* ldab, const float* b, lapack_int* ldb,
13931                     const float* x, lapack_int* ldx, float* ferr, float* berr,
13932                     float* work, lapack_int* iwork, lapack_int *info );
13933 void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13934                     lapack_int* kd, lapack_int* nrhs, const double* ab,
13935                     lapack_int* ldab, const double* b, lapack_int* ldb,
13936                     const double* x, lapack_int* ldx, double* ferr,
13937                     double* berr, double* work, lapack_int* iwork,
13938                     lapack_int *info );
13939 void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13940                     lapack_int* kd, lapack_int* nrhs,
13941                     const lapack_complex_float* ab, lapack_int* ldab,
13942                     const lapack_complex_float* b, lapack_int* ldb,
13943                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
13944                     float* berr, lapack_complex_float* work, float* rwork,
13945                     lapack_int *info );
13946 void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
13947                     lapack_int* kd, lapack_int* nrhs,
13948                     const lapack_complex_double* ab, lapack_int* ldab,
13949                     const lapack_complex_double* b, lapack_int* ldb,
13950                     const lapack_complex_double* x, lapack_int* ldx,
13951                     double* ferr, double* berr, lapack_complex_double* work,
13952                     double* rwork, lapack_int *info );
13953 void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
13954                     const lapack_int* ipiv, float* work, lapack_int* lwork,
13955                     lapack_int *info );
13956 void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
13957                     const lapack_int* ipiv, double* work, lapack_int* lwork,
13958                     lapack_int *info );
13959 void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
13960                     const lapack_int* ipiv, lapack_complex_float* work,
13961                     lapack_int* lwork, lapack_int *info );
13962 void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
13963                     const lapack_int* ipiv, lapack_complex_double* work,
13964                     lapack_int* lwork, lapack_int *info );
13965 void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13966                     lapack_int *info );
13967 void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13968                     lapack_int *info );
13969 void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
13970                     lapack_int* lda, lapack_int *info );
13971 void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
13972                     lapack_int* lda, lapack_int *info );
13973 void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
13974                     lapack_int *info );
13975 void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
13976                     lapack_int *info );
13977 void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
13978                     lapack_complex_double* a, lapack_int *info );
13979 void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
13980                     lapack_complex_float* a, lapack_int *info );
13981 void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
13982 void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
13983 void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
13984                     lapack_int *info );
13985 void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
13986                     lapack_int *info );
13987 void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13988                     const lapack_int* ipiv, float* work, lapack_int *info );
13989 void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13990                     const lapack_int* ipiv, double* work, lapack_int *info );
13991 void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
13992                     lapack_int* lda, const lapack_int* ipiv,
13993                     lapack_complex_float* work, lapack_int *info );
13994 void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
13995                     lapack_int* lda, const lapack_int* ipiv,
13996                     lapack_complex_double* work, lapack_int *info );
13997 void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
13998                     lapack_int* lda, const lapack_int* ipiv,
13999                     lapack_complex_float* work, lapack_int *info );
14000 void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
14001                     lapack_int* lda, const lapack_int* ipiv,
14002                     lapack_complex_double* work, lapack_int *info );
14003 void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
14004                     const lapack_int* ipiv, float* work, lapack_int *info );
14005 void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
14006                     const lapack_int* ipiv, double* work, lapack_int *info );
14007 void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14008                     const lapack_int* ipiv, lapack_complex_float* work,
14009                     lapack_int *info );
14010 void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14011                     const lapack_int* ipiv, lapack_complex_double* work,
14012                     lapack_int *info );
14013 void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14014                     const lapack_int* ipiv, lapack_complex_float* work,
14015                     lapack_int *info );
14016 void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14017                     const lapack_int* ipiv, lapack_complex_double* work,
14018                     lapack_int *info );
14019 void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
14020                     lapack_int* lda, lapack_int *info );
14021 void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
14022                     lapack_int* lda, lapack_int *info );
14023 void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
14024                     lapack_complex_float* a, lapack_int* lda,
14025                     lapack_int *info );
14026 void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
14027                     lapack_complex_double* a, lapack_int* lda,
14028                     lapack_int *info );
14029 void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
14030                     double* a, lapack_int *info );
14031 void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
14032                     float* a, lapack_int *info );
14033 void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
14034                     lapack_complex_double* a, lapack_int *info );
14035 void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
14036                     lapack_complex_float* a, lapack_int *info );
14037 void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
14038                     lapack_int *info );
14039 void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
14040                     lapack_int *info );
14041 void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
14042                     lapack_complex_float* ap, lapack_int *info );
14043 void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
14044                     lapack_complex_double* ap, lapack_int *info );
14045 void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
14046                     lapack_int* lda, float* r, float* c, float* rowcnd,
14047                     float* colcnd, float* amax, lapack_int *info );
14048 void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
14049                     lapack_int* lda, double* r, double* c, double* rowcnd,
14050                     double* colcnd, double* amax, lapack_int *info );
14051 void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
14052                     lapack_int* lda, float* r, float* c, float* rowcnd,
14053                     float* colcnd, float* amax, lapack_int *info );
14054 void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
14055                     const lapack_complex_double* a, lapack_int* lda, double* r,
14056                     double* c, double* rowcnd, double* colcnd, double* amax,
14057                     lapack_int *info );
14058 void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
14059                      lapack_int* lda, double* r, double* c, double* rowcnd,
14060                      double* colcnd, double* amax, lapack_int *info );
14061 void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
14062                      lapack_int* lda, float* r, float* c, float* rowcnd,
14063                      float* colcnd, float* amax, lapack_int *info );
14064 void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
14065                      const lapack_complex_double* a, lapack_int* lda, double* r,
14066                      double* c, double* rowcnd, double* colcnd, double* amax,
14067                      lapack_int *info );
14068 void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
14069                      const lapack_complex_float* a, lapack_int* lda, float* r,
14070                      float* c, float* rowcnd, float* colcnd, float* amax,
14071                      lapack_int *info );
14072 void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
14073                     lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
14074                     float* c, float* rowcnd, float* colcnd, float* amax,
14075                     lapack_int *info );
14076 void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
14077                     lapack_int* ku, const double* ab, lapack_int* ldab,
14078                     double* r, double* c, double* rowcnd, double* colcnd,
14079                     double* amax, lapack_int *info );
14080 void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
14081                     lapack_int* ku, const lapack_complex_float* ab,
14082                     lapack_int* ldab, float* r, float* c, float* rowcnd,
14083                     float* colcnd, float* amax, lapack_int *info );
14084 void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
14085                     lapack_int* ku, const lapack_complex_double* ab,
14086                     lapack_int* ldab, double* r, double* c, double* rowcnd,
14087                     double* colcnd, double* amax, lapack_int *info );
14088 void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
14089                      lapack_int* ku, const double* ab, lapack_int* ldab,
14090                      double* r, double* c, double* rowcnd, double* colcnd,
14091                      double* amax, lapack_int *info );
14092 void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
14093                      lapack_int* ku, const float* ab, lapack_int* ldab,
14094                      float* r, float* c, float* rowcnd, float* colcnd,
14095                      float* amax, lapack_int *info );
14096 void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
14097                      lapack_int* ku, const lapack_complex_double* ab,
14098                      lapack_int* ldab, double* r, double* c, double* rowcnd,
14099                      double* colcnd, double* amax, lapack_int *info );
14100 void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
14101                      lapack_int* ku, const lapack_complex_float* ab,
14102                      lapack_int* ldab, float* r, float* c, float* rowcnd,
14103                      float* colcnd, float* amax, lapack_int *info );
14104 void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
14105                     float* scond, float* amax, lapack_int *info );
14106 void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
14107                     double* scond, double* amax, lapack_int *info );
14108 void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
14109                     lapack_int* lda, float* s, float* scond, float* amax,
14110                     lapack_int *info );
14111 void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
14112                     lapack_int* lda, double* s, double* scond, double* amax,
14113                     lapack_int *info );
14114 void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
14115                      double* scond, double* amax, lapack_int *info );
14116 void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
14117                      float* scond, float* amax, lapack_int *info );
14118 void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
14119                      lapack_int* lda, double* s, double* scond, double* amax,
14120                      lapack_int *info );
14121 void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
14122                      lapack_int* lda, float* s, float* scond, float* amax,
14123                      lapack_int *info );
14124 void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
14125                     float* scond, float* amax, lapack_int *info );
14126 void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
14127                     double* scond, double* amax, lapack_int *info );
14128 void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14129                     float* s, float* scond, float* amax, lapack_int *info );
14130 void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14131                     double* s, double* scond, double* amax, lapack_int *info );
14132 void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
14133                     lapack_int* ldab, float* s, float* scond, float* amax,
14134                     lapack_int *info );
14135 void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
14136                     lapack_int* ldab, double* s, double* scond, double* amax,
14137                     lapack_int *info );
14138 void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
14139                     const lapack_complex_float* ab, lapack_int* ldab, float* s,
14140                     float* scond, float* amax, lapack_int *info );
14141 void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
14142                     const lapack_complex_double* ab, lapack_int* ldab,
14143                     double* s, double* scond, double* amax, lapack_int *info );
14144 void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
14145                      lapack_int* lda, double* s, double* scond, double* amax,
14146                      double* work, lapack_int *info );
14147 void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14148                      float* s, float* scond, float* amax, float* work,
14149                      lapack_int *info );
14150 void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
14151                      lapack_int* lda, double* s, double* scond, double* amax,
14152                      lapack_complex_double* work, lapack_int *info );
14153 void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
14154                      lapack_int* lda, float* s, float* scond, float* amax,
14155                      lapack_complex_float* work, lapack_int *info );
14156 void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
14157                      lapack_int* lda, double* s, double* scond, double* amax,
14158                      lapack_complex_double* work, lapack_int *info );
14159 void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
14160                      lapack_int* lda, float* s, float* scond, float* amax,
14161                      lapack_complex_float* work, lapack_int *info );
14162 void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
14163                    lapack_int* ipiv, float* b, lapack_int* ldb,
14164                    lapack_int *info );
14165 void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
14166                    lapack_int* ipiv, double* b, lapack_int* ldb,
14167                    lapack_int *info );
14168 void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
14169                    lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
14170                    lapack_int* ldb, lapack_int *info );
14171 void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
14172                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
14173                    lapack_int* ldb, lapack_int *info );
14174 void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
14175                     lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
14176                     lapack_int* ldx, double* work, float* swork,
14177                     lapack_int* iter, lapack_int *info );
14178 void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
14179                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
14180                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14181                     lapack_complex_double* work, lapack_complex_float* swork,
14182                     double* rwork, lapack_int* iter, lapack_int *info );
14183 void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14184                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
14185                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
14186                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14187                     float* ferr, float* berr, float* work, lapack_int* iwork,
14188                     lapack_int *info );
14189 void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14190                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
14191                     lapack_int* ipiv, char* equed, double* r, double* c,
14192                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
14193                     double* rcond, double* ferr, double* berr, double* work,
14194                     lapack_int* iwork, lapack_int *info );
14195 void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14196                     lapack_complex_float* a, lapack_int* lda,
14197                     lapack_complex_float* af, lapack_int* ldaf,
14198                     lapack_int* ipiv, char* equed, float* r, float* c,
14199                     lapack_complex_float* b, lapack_int* ldb,
14200                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
14201                     float* ferr, float* berr, lapack_complex_float* work,
14202                     float* rwork, lapack_int *info );
14203 void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14204                     lapack_complex_double* a, lapack_int* lda,
14205                     lapack_complex_double* af, lapack_int* ldaf,
14206                     lapack_int* ipiv, char* equed, double* r, double* c,
14207                     lapack_complex_double* b, lapack_int* ldb,
14208                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
14209                     double* ferr, double* berr, lapack_complex_double* work,
14210                     double* rwork, lapack_int *info );
14211 void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14212                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
14213                      lapack_int* ipiv, char* equed, double* r, double* c,
14214                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
14215                      double* rcond, double* rpvgrw, double* berr,
14216                      lapack_int* n_err_bnds, double* err_bnds_norm,
14217                      double* err_bnds_comp, lapack_int* nparams, double* params,
14218                      double* work, lapack_int* iwork, lapack_int *info );
14219 void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14220                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
14221                      lapack_int* ipiv, char* equed, float* r, float* c,
14222                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14223                      float* rcond, float* rpvgrw, float* berr,
14224                      lapack_int* n_err_bnds, float* err_bnds_norm,
14225                      float* err_bnds_comp, lapack_int* nparams, float* params,
14226                      float* work, lapack_int* iwork, lapack_int *info );
14227 void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14228                      lapack_complex_double* a, lapack_int* lda,
14229                      lapack_complex_double* af, lapack_int* ldaf,
14230                      lapack_int* ipiv, char* equed, double* r, double* c,
14231                      lapack_complex_double* b, lapack_int* ldb,
14232                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14233                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14234                      double* err_bnds_norm, double* err_bnds_comp,
14235                      lapack_int* nparams, double* params,
14236                      lapack_complex_double* work, double* rwork,
14237                      lapack_int *info );
14238 void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14239                      lapack_complex_float* a, lapack_int* lda,
14240                      lapack_complex_float* af, lapack_int* ldaf,
14241                      lapack_int* ipiv, char* equed, float* r, float* c,
14242                      lapack_complex_float* b, lapack_int* ldb,
14243                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14244                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14245                      float* err_bnds_norm, float* err_bnds_comp,
14246                      lapack_int* nparams, float* params,
14247                      lapack_complex_float* work, float* rwork,
14248                      lapack_int *info );
14249 void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
14250                    lapack_int* nrhs, float* ab, lapack_int* ldab,
14251                    lapack_int* ipiv, float* b, lapack_int* ldb,
14252                    lapack_int *info );
14253 void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
14254                    lapack_int* nrhs, double* ab, lapack_int* ldab,
14255                    lapack_int* ipiv, double* b, lapack_int* ldb,
14256                    lapack_int *info );
14257 void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
14258                    lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
14259                    lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
14260                    lapack_int *info );
14261 void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
14262                    lapack_int* nrhs, lapack_complex_double* ab,
14263                    lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
14264                    lapack_int* ldb, lapack_int *info );
14265 void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14266                     lapack_int* ku, lapack_int* nrhs, float* ab,
14267                     lapack_int* ldab, float* afb, lapack_int* ldafb,
14268                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
14269                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14270                     float* ferr, float* berr, float* work, lapack_int* iwork,
14271                     lapack_int *info );
14272 void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14273                     lapack_int* ku, lapack_int* nrhs, double* ab,
14274                     lapack_int* ldab, double* afb, lapack_int* ldafb,
14275                     lapack_int* ipiv, char* equed, double* r, double* c,
14276                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
14277                     double* rcond, double* ferr, double* berr, double* work,
14278                     lapack_int* iwork, lapack_int *info );
14279 void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14280                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
14281                     lapack_int* ldab, lapack_complex_float* afb,
14282                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
14283                     float* c, lapack_complex_float* b, lapack_int* ldb,
14284                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
14285                     float* ferr, float* berr, lapack_complex_float* work,
14286                     float* rwork, lapack_int *info );
14287 void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14288                     lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
14289                     lapack_int* ldab, lapack_complex_double* afb,
14290                     lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
14291                     double* c, lapack_complex_double* b, lapack_int* ldb,
14292                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
14293                     double* ferr, double* berr, lapack_complex_double* work,
14294                     double* rwork, lapack_int *info );
14295 void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14296                      lapack_int* ku, lapack_int* nrhs, double* ab,
14297                      lapack_int* ldab, double* afb, lapack_int* ldafb,
14298                      lapack_int* ipiv, char* equed, double* r, double* c,
14299                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
14300                      double* rcond, double* rpvgrw, double* berr,
14301                      lapack_int* n_err_bnds, double* err_bnds_norm,
14302                      double* err_bnds_comp, lapack_int* nparams, double* params,
14303                      double* work, lapack_int* iwork, lapack_int *info );
14304 void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14305                      lapack_int* ku, lapack_int* nrhs, float* ab,
14306                      lapack_int* ldab, float* afb, lapack_int* ldafb,
14307                      lapack_int* ipiv, char* equed, float* r, float* c,
14308                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14309                      float* rcond, float* rpvgrw, float* berr,
14310                      lapack_int* n_err_bnds, float* err_bnds_norm,
14311                      float* err_bnds_comp, lapack_int* nparams, float* params,
14312                      float* work, lapack_int* iwork, lapack_int *info );
14313 void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14314                      lapack_int* ku, lapack_int* nrhs,
14315                      lapack_complex_double* ab, lapack_int* ldab,
14316                      lapack_complex_double* afb, lapack_int* ldafb,
14317                      lapack_int* ipiv, char* equed, double* r, double* c,
14318                      lapack_complex_double* b, lapack_int* ldb,
14319                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14320                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14321                      double* err_bnds_norm, double* err_bnds_comp,
14322                      lapack_int* nparams, double* params,
14323                      lapack_complex_double* work, double* rwork,
14324                      lapack_int *info );
14325 void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
14326                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
14327                      lapack_int* ldab, lapack_complex_float* afb,
14328                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
14329                      float* c, lapack_complex_float* b, lapack_int* ldb,
14330                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14331                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14332                      float* err_bnds_norm, float* err_bnds_comp,
14333                      lapack_int* nparams, float* params,
14334                      lapack_complex_float* work, float* rwork,
14335                      lapack_int *info );
14336 void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
14337                    float* du, float* b, lapack_int* ldb, lapack_int *info );
14338 void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
14339                    double* du, double* b, lapack_int* ldb, lapack_int *info );
14340 void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
14341                    lapack_complex_float* d, lapack_complex_float* du,
14342                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
14343 void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
14344                    lapack_complex_double* d, lapack_complex_double* du,
14345                    lapack_complex_double* b, lapack_int* ldb,
14346                    lapack_int *info );
14347 void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14348                     const float* dl, const float* d, const float* du,
14349                     float* dlf, float* df, float* duf, float* du2,
14350                     lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
14351                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
14352                     float* work, lapack_int* iwork, lapack_int *info );
14353 void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14354                     const double* dl, const double* d, const double* du,
14355                     double* dlf, double* df, double* duf, double* du2,
14356                     lapack_int* ipiv, const double* b, lapack_int* ldb,
14357                     double* x, lapack_int* ldx, double* rcond, double* ferr,
14358                     double* berr, double* work, lapack_int* iwork,
14359                     lapack_int *info );
14360 void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14361                     const lapack_complex_float* dl,
14362                     const lapack_complex_float* d,
14363                     const lapack_complex_float* du, lapack_complex_float* dlf,
14364                     lapack_complex_float* df, lapack_complex_float* duf,
14365                     lapack_complex_float* du2, lapack_int* ipiv,
14366                     const lapack_complex_float* b, lapack_int* ldb,
14367                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
14368                     float* ferr, float* berr, lapack_complex_float* work,
14369                     float* rwork, lapack_int *info );
14370 void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
14371                     const lapack_complex_double* dl,
14372                     const lapack_complex_double* d,
14373                     const lapack_complex_double* du, lapack_complex_double* dlf,
14374                     lapack_complex_double* df, lapack_complex_double* duf,
14375                     lapack_complex_double* du2, lapack_int* ipiv,
14376                     const lapack_complex_double* b, lapack_int* ldb,
14377                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
14378                     double* ferr, double* berr, lapack_complex_double* work,
14379                     double* rwork, lapack_int *info );
14380 void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
14381                    lapack_int* lda, float* b, lapack_int* ldb,
14382                    lapack_int *info );
14383 void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
14384                    lapack_int* lda, double* b, lapack_int* ldb,
14385                    lapack_int *info );
14386 void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
14387                    lapack_complex_float* a, lapack_int* lda,
14388                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
14389 void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
14390                    lapack_complex_double* a, lapack_int* lda,
14391                    lapack_complex_double* b, lapack_int* ldb,
14392                    lapack_int *info );
14393 void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
14394                     lapack_int* lda, double* b, lapack_int* ldb, double* x,
14395                     lapack_int* ldx, double* work, float* swork,
14396                     lapack_int* iter, lapack_int *info );
14397 void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
14398                     lapack_complex_double* a, lapack_int* lda,
14399                     lapack_complex_double* b, lapack_int* ldb,
14400                     lapack_complex_double* x, lapack_int* ldx,
14401                     lapack_complex_double* work, lapack_complex_float* swork,
14402                     double* rwork, lapack_int* iter, lapack_int *info );
14403 void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14404                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
14405                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
14406                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
14407                     float* work, lapack_int* iwork, lapack_int *info );
14408 void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14409                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
14410                     char* equed, double* s, double* b, lapack_int* ldb,
14411                     double* x, lapack_int* ldx, double* rcond, double* ferr,
14412                     double* berr, double* work, lapack_int* iwork,
14413                     lapack_int *info );
14414 void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14415                     lapack_complex_float* a, lapack_int* lda,
14416                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
14417                     float* s, lapack_complex_float* b, lapack_int* ldb,
14418                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
14419                     float* ferr, float* berr, lapack_complex_float* work,
14420                     float* rwork, lapack_int *info );
14421 void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14422                     lapack_complex_double* a, lapack_int* lda,
14423                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
14424                     double* s, lapack_complex_double* b, lapack_int* ldb,
14425                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
14426                     double* ferr, double* berr, lapack_complex_double* work,
14427                     double* rwork, lapack_int *info );
14428 void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14429                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
14430                      char* equed, double* s, double* b, lapack_int* ldb,
14431                      double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
14432                      double* berr, lapack_int* n_err_bnds,
14433                      double* err_bnds_norm, double* err_bnds_comp,
14434                      lapack_int* nparams, double* params, double* work,
14435                      lapack_int* iwork, lapack_int *info );
14436 void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14437                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
14438                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
14439                      lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
14440                      lapack_int* n_err_bnds, float* err_bnds_norm,
14441                      float* err_bnds_comp, lapack_int* nparams, float* params,
14442                      float* work, lapack_int* iwork, lapack_int *info );
14443 void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14444                      lapack_complex_double* a, lapack_int* lda,
14445                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
14446                      double* s, lapack_complex_double* b, lapack_int* ldb,
14447                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14448                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14449                      double* err_bnds_norm, double* err_bnds_comp,
14450                      lapack_int* nparams, double* params,
14451                      lapack_complex_double* work, double* rwork,
14452                      lapack_int *info );
14453 void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14454                      lapack_complex_float* a, lapack_int* lda,
14455                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
14456                      float* s, lapack_complex_float* b, lapack_int* ldb,
14457                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14458                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14459                      float* err_bnds_norm, float* err_bnds_comp,
14460                      lapack_int* nparams, float* params,
14461                      lapack_complex_float* work, float* rwork,
14462                      lapack_int *info );
14463 void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
14464                    float* b, lapack_int* ldb, lapack_int *info );
14465 void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
14466                    double* b, lapack_int* ldb, lapack_int *info );
14467 void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14468                    lapack_complex_float* ap, lapack_complex_float* b,
14469                    lapack_int* ldb, lapack_int *info );
14470 void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14471                    lapack_complex_double* ap, lapack_complex_double* b,
14472                    lapack_int* ldb, lapack_int *info );
14473 void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14474                     float* ap, float* afp, char* equed, float* s, float* b,
14475                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14476                     float* ferr, float* berr, float* work, lapack_int* iwork,
14477                     lapack_int *info );
14478 void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14479                     double* ap, double* afp, char* equed, double* s, double* b,
14480                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14481                     double* ferr, double* berr, double* work, lapack_int* iwork,
14482                     lapack_int *info );
14483 void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14484                     lapack_complex_float* ap, lapack_complex_float* afp,
14485                     char* equed, float* s, lapack_complex_float* b,
14486                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14487                     float* rcond, float* ferr, float* berr,
14488                     lapack_complex_float* work, float* rwork,
14489                     lapack_int *info );
14490 void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14491                     lapack_complex_double* ap, lapack_complex_double* afp,
14492                     char* equed, double* s, lapack_complex_double* b,
14493                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14494                     double* rcond, double* ferr, double* berr,
14495                     lapack_complex_double* work, double* rwork,
14496                     lapack_int *info );
14497 void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14498                    float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
14499                    lapack_int *info );
14500 void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14501                    double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
14502                    lapack_int *info );
14503 void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14504                    lapack_complex_float* ab, lapack_int* ldab,
14505                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
14506 void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14507                    lapack_complex_double* ab, lapack_int* ldab,
14508                    lapack_complex_double* b, lapack_int* ldb,
14509                    lapack_int *info );
14510 void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
14511                     lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
14512                     lapack_int* ldafb, char* equed, float* s, float* b,
14513                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14514                     float* ferr, float* berr, float* work, lapack_int* iwork,
14515                     lapack_int *info );
14516 void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
14517                     lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
14518                     lapack_int* ldafb, char* equed, double* s, double* b,
14519                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14520                     double* ferr, double* berr, double* work, lapack_int* iwork,
14521                     lapack_int *info );
14522 void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
14523                     lapack_int* nrhs, lapack_complex_float* ab,
14524                     lapack_int* ldab, lapack_complex_float* afb,
14525                     lapack_int* ldafb, char* equed, float* s,
14526                     lapack_complex_float* b, lapack_int* ldb,
14527                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
14528                     float* ferr, float* berr, lapack_complex_float* work,
14529                     float* rwork, lapack_int *info );
14530 void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
14531                     lapack_int* nrhs, lapack_complex_double* ab,
14532                     lapack_int* ldab, lapack_complex_double* afb,
14533                     lapack_int* ldafb, char* equed, double* s,
14534                     lapack_complex_double* b, lapack_int* ldb,
14535                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
14536                     double* ferr, double* berr, lapack_complex_double* work,
14537                     double* rwork, lapack_int *info );
14538 void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
14539                    float* b, lapack_int* ldb, lapack_int *info );
14540 void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
14541                    double* b, lapack_int* ldb, lapack_int *info );
14542 void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
14543                    lapack_complex_float* e, lapack_complex_float* b,
14544                    lapack_int* ldb, lapack_int *info );
14545 void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
14546                    lapack_complex_double* e, lapack_complex_double* b,
14547                    lapack_int* ldb, lapack_int *info );
14548 void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
14549                     const float* e, float* df, float* ef, const float* b,
14550                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14551                     float* ferr, float* berr, float* work, lapack_int *info );
14552 void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
14553                     const double* d, const double* e, double* df, double* ef,
14554                     const double* b, lapack_int* ldb, double* x,
14555                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
14556                     double* work, lapack_int *info );
14557 void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
14558                     const lapack_complex_float* e, float* df,
14559                     lapack_complex_float* ef, const lapack_complex_float* b,
14560                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14561                     float* rcond, float* ferr, float* berr,
14562                     lapack_complex_float* work, float* rwork,
14563                     lapack_int *info );
14564 void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
14565                     const double* d, const lapack_complex_double* e, double* df,
14566                     lapack_complex_double* ef, const lapack_complex_double* b,
14567                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14568                     double* rcond, double* ferr, double* berr,
14569                     lapack_complex_double* work, double* rwork,
14570                     lapack_int *info );
14571 void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
14572                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
14573                    float* work, lapack_int* lwork, lapack_int *info );
14574 void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
14575                    lapack_int* lda, lapack_int* ipiv, double* b,
14576                    lapack_int* ldb, double* work, lapack_int* lwork,
14577                    lapack_int *info );
14578 void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
14579                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
14580                    lapack_complex_float* b, lapack_int* ldb,
14581                    lapack_complex_float* work, lapack_int* lwork,
14582                    lapack_int *info );
14583 void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
14584                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
14585                    lapack_complex_double* b, lapack_int* ldb,
14586                    lapack_complex_double* work, lapack_int* lwork,
14587                    lapack_int *info );
14588 void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14589                     const float* a, lapack_int* lda, float* af,
14590                     lapack_int* ldaf, lapack_int* ipiv, const float* b,
14591                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14592                     float* ferr, float* berr, float* work, lapack_int* lwork,
14593                     lapack_int* iwork, lapack_int *info );
14594 void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14595                     const double* a, lapack_int* lda, double* af,
14596                     lapack_int* ldaf, lapack_int* ipiv, const double* b,
14597                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14598                     double* ferr, double* berr, double* work, lapack_int* lwork,
14599                     lapack_int* iwork, lapack_int *info );
14600 void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14601                     const lapack_complex_float* a, lapack_int* lda,
14602                     lapack_complex_float* af, lapack_int* ldaf,
14603                     lapack_int* ipiv, const lapack_complex_float* b,
14604                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14605                     float* rcond, float* ferr, float* berr,
14606                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14607                     lapack_int *info );
14608 void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14609                     const lapack_complex_double* a, lapack_int* lda,
14610                     lapack_complex_double* af, lapack_int* ldaf,
14611                     lapack_int* ipiv, const lapack_complex_double* b,
14612                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14613                     double* rcond, double* ferr, double* berr,
14614                     lapack_complex_double* work, lapack_int* lwork,
14615                     double* rwork, lapack_int *info );
14616 void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14617                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
14618                      lapack_int* ipiv, char* equed, double* s, double* b,
14619                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14620                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14621                      double* err_bnds_norm, double* err_bnds_comp,
14622                      lapack_int* nparams, double* params, double* work,
14623                      lapack_int* iwork, lapack_int *info );
14624 void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14625                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
14626                      lapack_int* ipiv, char* equed, float* s, float* b,
14627                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14628                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14629                      float* err_bnds_norm, float* err_bnds_comp,
14630                      lapack_int* nparams, float* params, float* work,
14631                      lapack_int* iwork, lapack_int *info );
14632 void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14633                      lapack_complex_double* a, lapack_int* lda,
14634                      lapack_complex_double* af, lapack_int* ldaf,
14635                      lapack_int* ipiv, char* equed, double* s,
14636                      lapack_complex_double* b, lapack_int* ldb,
14637                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14638                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14639                      double* err_bnds_norm, double* err_bnds_comp,
14640                      lapack_int* nparams, double* params,
14641                      lapack_complex_double* work, double* rwork,
14642                      lapack_int *info );
14643 void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14644                      lapack_complex_float* a, lapack_int* lda,
14645                      lapack_complex_float* af, lapack_int* ldaf,
14646                      lapack_int* ipiv, char* equed, float* s,
14647                      lapack_complex_float* b, lapack_int* ldb,
14648                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14649                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14650                      float* err_bnds_norm, float* err_bnds_comp,
14651                      lapack_int* nparams, float* params,
14652                      lapack_complex_float* work, float* rwork,
14653                      lapack_int *info );
14654 void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
14655                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
14656                    lapack_complex_float* b, lapack_int* ldb,
14657                    lapack_complex_float* work, lapack_int* lwork,
14658                    lapack_int *info );
14659 void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
14660                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
14661                    lapack_complex_double* b, lapack_int* ldb,
14662                    lapack_complex_double* work, lapack_int* lwork,
14663                    lapack_int *info );
14664 void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14665                     const lapack_complex_float* a, lapack_int* lda,
14666                     lapack_complex_float* af, lapack_int* ldaf,
14667                     lapack_int* ipiv, const lapack_complex_float* b,
14668                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14669                     float* rcond, float* ferr, float* berr,
14670                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
14671                     lapack_int *info );
14672 void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14673                     const lapack_complex_double* a, lapack_int* lda,
14674                     lapack_complex_double* af, lapack_int* ldaf,
14675                     lapack_int* ipiv, const lapack_complex_double* b,
14676                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14677                     double* rcond, double* ferr, double* berr,
14678                     lapack_complex_double* work, lapack_int* lwork,
14679                     double* rwork, lapack_int *info );
14680 void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14681                      lapack_complex_double* a, lapack_int* lda,
14682                      lapack_complex_double* af, lapack_int* ldaf,
14683                      lapack_int* ipiv, char* equed, double* s,
14684                      lapack_complex_double* b, lapack_int* ldb,
14685                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14686                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
14687                      double* err_bnds_norm, double* err_bnds_comp,
14688                      lapack_int* nparams, double* params,
14689                      lapack_complex_double* work, double* rwork,
14690                      lapack_int *info );
14691 void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14692                      lapack_complex_float* a, lapack_int* lda,
14693                      lapack_complex_float* af, lapack_int* ldaf,
14694                      lapack_int* ipiv, char* equed, float* s,
14695                      lapack_complex_float* b, lapack_int* ldb,
14696                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14697                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
14698                      float* err_bnds_norm, float* err_bnds_comp,
14699                      lapack_int* nparams, float* params,
14700                      lapack_complex_float* work, float* rwork,
14701                      lapack_int *info );
14702 void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
14703                    lapack_int* ipiv, float* b, lapack_int* ldb,
14704                    lapack_int *info );
14705 void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
14706                    lapack_int* ipiv, double* b, lapack_int* ldb,
14707                    lapack_int *info );
14708 void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14709                    lapack_complex_float* ap, lapack_int* ipiv,
14710                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
14711 void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14712                    lapack_complex_double* ap, lapack_int* ipiv,
14713                    lapack_complex_double* b, lapack_int* ldb,
14714                    lapack_int *info );
14715 void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14716                     const float* ap, float* afp, lapack_int* ipiv,
14717                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14718                     float* rcond, float* ferr, float* berr, float* work,
14719                     lapack_int* iwork, lapack_int *info );
14720 void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14721                     const double* ap, double* afp, lapack_int* ipiv,
14722                     const double* b, lapack_int* ldb, double* x,
14723                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
14724                     double* work, lapack_int* iwork, lapack_int *info );
14725 void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14726                     const lapack_complex_float* ap, lapack_complex_float* afp,
14727                     lapack_int* ipiv, const lapack_complex_float* b,
14728                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14729                     float* rcond, float* ferr, float* berr,
14730                     lapack_complex_float* work, float* rwork,
14731                     lapack_int *info );
14732 void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14733                     const lapack_complex_double* ap, lapack_complex_double* afp,
14734                     lapack_int* ipiv, const lapack_complex_double* b,
14735                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14736                     double* rcond, double* ferr, double* berr,
14737                     lapack_complex_double* work, double* rwork,
14738                     lapack_int *info );
14739 void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14740                    lapack_complex_float* ap, lapack_int* ipiv,
14741                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
14742 void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
14743                    lapack_complex_double* ap, lapack_int* ipiv,
14744                    lapack_complex_double* b, lapack_int* ldb,
14745                    lapack_int *info );
14746 void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14747                     const lapack_complex_float* ap, lapack_complex_float* afp,
14748                     lapack_int* ipiv, const lapack_complex_float* b,
14749                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14750                     float* rcond, float* ferr, float* berr,
14751                     lapack_complex_float* work, float* rwork,
14752                     lapack_int *info );
14753 void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
14754                     const lapack_complex_double* ap, lapack_complex_double* afp,
14755                     lapack_int* ipiv, const lapack_complex_double* b,
14756                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14757                     double* rcond, double* ferr, double* berr,
14758                     lapack_complex_double* work, double* rwork,
14759                     lapack_int *info );
14760 void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14761                     float* tau, float* work, lapack_int* lwork,
14762                     lapack_int *info );
14763 void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14764                     double* tau, double* work, lapack_int* lwork,
14765                     lapack_int *info );
14766 void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14767                     lapack_int* lda, lapack_complex_float* tau,
14768                     lapack_complex_float* work, lapack_int* lwork,
14769                     lapack_int *info );
14770 void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14771                     lapack_int* lda, lapack_complex_double* tau,
14772                     lapack_complex_double* work, lapack_int* lwork,
14773                     lapack_int *info );
14774 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14775                     lapack_int* jpvt, float* tau, float* work,
14776                     lapack_int *info );
14777 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14778                     lapack_int* jpvt, double* tau, double* work,
14779                     lapack_int *info );
14780 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14781                     lapack_int* lda, lapack_int* jpvt,
14782                     lapack_complex_float* tau, lapack_complex_float* work,
14783                     float* rwork, lapack_int *info );
14784 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14785                     lapack_int* lda, lapack_int* jpvt,
14786                     lapack_complex_double* tau, lapack_complex_double* work,
14787                     double* rwork, lapack_int *info );
14788 void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14789                     lapack_int* jpvt, float* tau, float* work,
14790                     lapack_int* lwork, lapack_int *info );
14791 void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14792                     lapack_int* jpvt, double* tau, double* work,
14793                     lapack_int* lwork, lapack_int *info );
14794 void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14795                     lapack_int* lda, lapack_int* jpvt,
14796                     lapack_complex_float* tau, lapack_complex_float* work,
14797                     lapack_int* lwork, float* rwork, lapack_int *info );
14798 void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14799                     lapack_int* lda, lapack_int* jpvt,
14800                     lapack_complex_double* tau, lapack_complex_double* work,
14801                     lapack_int* lwork, double* rwork, lapack_int *info );
14802 void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
14803                     lapack_int* lda, const float* tau, float* work,
14804                     lapack_int* lwork, lapack_int *info );
14805 void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
14806                     lapack_int* lda, const double* tau, double* work,
14807                     lapack_int* lwork, lapack_int *info );
14808 void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
14809                     lapack_int* k, const float* a, lapack_int* lda,
14810                     const float* tau, float* c, lapack_int* ldc, float* work,
14811                     lapack_int* lwork, lapack_int *info );
14812 void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
14813                     lapack_int* k, const double* a, lapack_int* lda,
14814                     const double* tau, double* c, lapack_int* ldc, double* work,
14815                     lapack_int* lwork, lapack_int *info );
14816 void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
14817                     lapack_complex_float* a, lapack_int* lda,
14818                     const lapack_complex_float* tau, lapack_complex_float* work,
14819                     lapack_int* lwork, lapack_int *info );
14820 void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
14821                     lapack_complex_double* a, lapack_int* lda,
14822                     const lapack_complex_double* tau,
14823                     lapack_complex_double* work, lapack_int* lwork,
14824                     lapack_int *info );
14825 void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
14826                     lapack_int* k, const lapack_complex_float* a,
14827                     lapack_int* lda, const lapack_complex_float* tau,
14828                     lapack_complex_float* c, lapack_int* ldc,
14829                     lapack_complex_float* work, lapack_int* lwork,
14830                     lapack_int *info );
14831 void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
14832                     lapack_int* k, const lapack_complex_double* a,
14833                     lapack_int* lda, const lapack_complex_double* tau,
14834                     lapack_complex_double* c, lapack_int* ldc,
14835                     lapack_complex_double* work, lapack_int* lwork,
14836                     lapack_int *info );
14837 void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14838                     float* tau, float* work, lapack_int* lwork,
14839                     lapack_int *info );
14840 void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14841                     double* tau, double* work, lapack_int* lwork,
14842                     lapack_int *info );
14843 void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14844                     lapack_int* lda, lapack_complex_float* tau,
14845                     lapack_complex_float* work, lapack_int* lwork,
14846                     lapack_int *info );
14847 void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14848                     lapack_int* lda, lapack_complex_double* tau,
14849                     lapack_complex_double* work, lapack_int* lwork,
14850                     lapack_int *info );
14851 void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
14852                     lapack_int* lda, const float* tau, float* work,
14853                     lapack_int* lwork, lapack_int *info );
14854 void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
14855                     lapack_int* lda, const double* tau, double* work,
14856                     lapack_int* lwork, lapack_int *info );
14857 void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
14858                     lapack_int* k, const float* a, lapack_int* lda,
14859                     const float* tau, float* c, lapack_int* ldc, float* work,
14860                     lapack_int* lwork, lapack_int *info );
14861 void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
14862                     lapack_int* k, const double* a, lapack_int* lda,
14863                     const double* tau, double* c, lapack_int* ldc, double* work,
14864                     lapack_int* lwork, lapack_int *info );
14865 void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
14866                     lapack_complex_float* a, lapack_int* lda,
14867                     const lapack_complex_float* tau, lapack_complex_float* work,
14868                     lapack_int* lwork, lapack_int *info );
14869 void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
14870                     lapack_complex_double* a, lapack_int* lda,
14871                     const lapack_complex_double* tau,
14872                     lapack_complex_double* work, lapack_int* lwork,
14873                     lapack_int *info );
14874 void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
14875                     lapack_int* k, const lapack_complex_float* a,
14876                     lapack_int* lda, const lapack_complex_float* tau,
14877                     lapack_complex_float* c, lapack_int* ldc,
14878                     lapack_complex_float* work, lapack_int* lwork,
14879                     lapack_int *info );
14880 void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
14881                     lapack_int* k, const lapack_complex_double* a,
14882                     lapack_int* lda, const lapack_complex_double* tau,
14883                     lapack_complex_double* c, lapack_int* ldc,
14884                     lapack_complex_double* work, lapack_int* lwork,
14885                     lapack_int *info );
14886 void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14887                     float* tau, float* work, lapack_int* lwork,
14888                     lapack_int *info );
14889 void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14890                     double* tau, double* work, lapack_int* lwork,
14891                     lapack_int *info );
14892 void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14893                     lapack_int* lda, lapack_complex_float* tau,
14894                     lapack_complex_float* work, lapack_int* lwork,
14895                     lapack_int *info );
14896 void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14897                     lapack_int* lda, lapack_complex_double* tau,
14898                     lapack_complex_double* work, lapack_int* lwork,
14899                     lapack_int *info );
14900 void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
14901                     lapack_int* lda, const float* tau, float* work,
14902                     lapack_int* lwork, lapack_int *info );
14903 void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
14904                     lapack_int* lda, const double* tau, double* work,
14905                     lapack_int* lwork, lapack_int *info );
14906 void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
14907                     lapack_complex_float* a, lapack_int* lda,
14908                     const lapack_complex_float* tau, lapack_complex_float* work,
14909                     lapack_int* lwork, lapack_int *info );
14910 void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
14911                     lapack_complex_double* a, lapack_int* lda,
14912                     const lapack_complex_double* tau,
14913                     lapack_complex_double* work, lapack_int* lwork,
14914                     lapack_int *info );
14915 void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
14916                     lapack_int* k, const float* a, lapack_int* lda,
14917                     const float* tau, float* c, lapack_int* ldc, float* work,
14918                     lapack_int* lwork, lapack_int *info );
14919 void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
14920                     lapack_int* k, const double* a, lapack_int* lda,
14921                     const double* tau, double* c, lapack_int* ldc, double* work,
14922                     lapack_int* lwork, lapack_int *info );
14923 void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
14924                     lapack_int* k, const lapack_complex_float* a,
14925                     lapack_int* lda, const lapack_complex_float* tau,
14926                     lapack_complex_float* c, lapack_int* ldc,
14927                     lapack_complex_float* work, lapack_int* lwork,
14928                     lapack_int *info );
14929 void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
14930                     lapack_int* k, const lapack_complex_double* a,
14931                     lapack_int* lda, const lapack_complex_double* tau,
14932                     lapack_complex_double* c, lapack_int* ldc,
14933                     lapack_complex_double* work, lapack_int* lwork,
14934                     lapack_int *info );
14935 void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14936                     float* tau, float* work, lapack_int* lwork,
14937                     lapack_int *info );
14938 void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14939                     double* tau, double* work, lapack_int* lwork,
14940                     lapack_int *info );
14941 void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14942                     lapack_int* lda, lapack_complex_float* tau,
14943                     lapack_complex_float* work, lapack_int* lwork,
14944                     lapack_int *info );
14945 void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14946                     lapack_int* lda, lapack_complex_double* tau,
14947                     lapack_complex_double* work, lapack_int* lwork,
14948                     lapack_int *info );
14949 void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
14950                     lapack_int* lda, const float* tau, float* work,
14951                     lapack_int* lwork, lapack_int *info );
14952 void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
14953                     lapack_int* lda, const double* tau, double* work,
14954                     lapack_int* lwork, lapack_int *info );
14955 void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
14956                     lapack_complex_float* a, lapack_int* lda,
14957                     const lapack_complex_float* tau, lapack_complex_float* work,
14958                     lapack_int* lwork, lapack_int *info );
14959 void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
14960                     lapack_complex_double* a, lapack_int* lda,
14961                     const lapack_complex_double* tau,
14962                     lapack_complex_double* work, lapack_int* lwork,
14963                     lapack_int *info );
14964 void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
14965                     lapack_int* k, const float* a, lapack_int* lda,
14966                     const float* tau, float* c, lapack_int* ldc, float* work,
14967                     lapack_int* lwork, lapack_int *info );
14968 void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
14969                     lapack_int* k, const double* a, lapack_int* lda,
14970                     const double* tau, double* c, lapack_int* ldc, double* work,
14971                     lapack_int* lwork, lapack_int *info );
14972 void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
14973                     lapack_int* k, const lapack_complex_float* a,
14974                     lapack_int* lda, const lapack_complex_float* tau,
14975                     lapack_complex_float* c, lapack_int* ldc,
14976                     lapack_complex_float* work, lapack_int* lwork,
14977                     lapack_int *info );
14978 void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
14979                     lapack_int* k, const lapack_complex_double* a,
14980                     lapack_int* lda, const lapack_complex_double* tau,
14981                     lapack_complex_double* c, lapack_int* ldc,
14982                     lapack_complex_double* work, lapack_int* lwork,
14983                     lapack_int *info );
14984 void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
14985                     float* tau, float* work, lapack_int* lwork,
14986                     lapack_int *info );
14987 void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
14988                     double* tau, double* work, lapack_int* lwork,
14989                     lapack_int *info );
14990 void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
14991                     lapack_int* lda, lapack_complex_float* tau,
14992                     lapack_complex_float* work, lapack_int* lwork,
14993                     lapack_int *info );
14994 void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
14995                     lapack_int* lda, lapack_complex_double* tau,
14996                     lapack_complex_double* work, lapack_int* lwork,
14997                     lapack_int *info );
14998 void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
14999                     lapack_int* k, lapack_int* l, const float* a,
15000                     lapack_int* lda, const float* tau, float* c,
15001                     lapack_int* ldc, float* work, lapack_int* lwork,
15002                     lapack_int *info );
15003 void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15004                     lapack_int* k, lapack_int* l, const double* a,
15005                     lapack_int* lda, const double* tau, double* c,
15006                     lapack_int* ldc, double* work, lapack_int* lwork,
15007                     lapack_int *info );
15008 void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15009                     lapack_int* k, lapack_int* l, const lapack_complex_float* a,
15010                     lapack_int* lda, const lapack_complex_float* tau,
15011                     lapack_complex_float* c, lapack_int* ldc,
15012                     lapack_complex_float* work, lapack_int* lwork,
15013                     lapack_int *info );
15014 void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15015                     lapack_int* k, lapack_int* l,
15016                     const lapack_complex_double* a, lapack_int* lda,
15017                     const lapack_complex_double* tau, lapack_complex_double* c,
15018                     lapack_int* ldc, lapack_complex_double* work,
15019                     lapack_int* lwork, lapack_int *info );
15020 void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
15021                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15022                     float* taub, float* work, lapack_int* lwork,
15023                     lapack_int *info );
15024 void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
15025                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15026                     double* taub, double* work, lapack_int* lwork,
15027                     lapack_int *info );
15028 void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15029                     lapack_complex_float* a, lapack_int* lda,
15030                     lapack_complex_float* taua, lapack_complex_float* b,
15031                     lapack_int* ldb, lapack_complex_float* taub,
15032                     lapack_complex_float* work, lapack_int* lwork,
15033                     lapack_int *info );
15034 void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15035                     lapack_complex_double* a, lapack_int* lda,
15036                     lapack_complex_double* taua, lapack_complex_double* b,
15037                     lapack_int* ldb, lapack_complex_double* taub,
15038                     lapack_complex_double* work, lapack_int* lwork,
15039                     lapack_int *info );
15040 void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
15041                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15042                     float* taub, float* work, lapack_int* lwork,
15043                     lapack_int *info );
15044 void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
15045                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15046                     double* taub, double* work, lapack_int* lwork,
15047                     lapack_int *info );
15048 void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15049                     lapack_complex_float* a, lapack_int* lda,
15050                     lapack_complex_float* taua, lapack_complex_float* b,
15051                     lapack_int* ldb, lapack_complex_float* taub,
15052                     lapack_complex_float* work, lapack_int* lwork,
15053                     lapack_int *info );
15054 void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15055                     lapack_complex_double* a, lapack_int* lda,
15056                     lapack_complex_double* taua, lapack_complex_double* b,
15057                     lapack_int* ldb, lapack_complex_double* taub,
15058                     lapack_complex_double* work, lapack_int* lwork,
15059                     lapack_int *info );
15060 void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15061                     float* d, float* e, float* tauq, float* taup, float* work,
15062                     lapack_int* lwork, lapack_int *info );
15063 void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15064                     double* d, double* e, double* tauq, double* taup,
15065                     double* work, lapack_int* lwork, lapack_int *info );
15066 void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15067                     lapack_int* lda, float* d, float* e,
15068                     lapack_complex_float* tauq, lapack_complex_float* taup,
15069                     lapack_complex_float* work, lapack_int* lwork,
15070                     lapack_int *info );
15071 void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15072                     lapack_int* lda, double* d, double* e,
15073                     lapack_complex_double* tauq, lapack_complex_double* taup,
15074                     lapack_complex_double* work, lapack_int* lwork,
15075                     lapack_int *info );
15076 void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
15077                     lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
15078                     float* d, float* e, float* q, lapack_int* ldq, float* pt,
15079                     lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
15080                     lapack_int *info );
15081 void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
15082                     lapack_int* kl, lapack_int* ku, double* ab,
15083                     lapack_int* ldab, double* d, double* e, double* q,
15084                     lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
15085                     lapack_int* ldc, double* work, lapack_int *info );
15086 void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
15087                     lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
15088                     lapack_int* ldab, float* d, float* e,
15089                     lapack_complex_float* q, lapack_int* ldq,
15090                     lapack_complex_float* pt, lapack_int* ldpt,
15091                     lapack_complex_float* c, lapack_int* ldc,
15092                     lapack_complex_float* work, float* rwork,
15093                     lapack_int *info );
15094 void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
15095                     lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
15096                     lapack_int* ldab, double* d, double* e,
15097                     lapack_complex_double* q, lapack_int* ldq,
15098                     lapack_complex_double* pt, lapack_int* ldpt,
15099                     lapack_complex_double* c, lapack_int* ldc,
15100                     lapack_complex_double* work, double* rwork,
15101                     lapack_int *info );
15102 void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
15103                     float* a, lapack_int* lda, const float* tau, float* work,
15104                     lapack_int* lwork, lapack_int *info );
15105 void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
15106                     double* a, lapack_int* lda, const double* tau, double* work,
15107                     lapack_int* lwork, lapack_int *info );
15108 void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
15109                     lapack_int* n, lapack_int* k, const float* a,
15110                     lapack_int* lda, const float* tau, float* c,
15111                     lapack_int* ldc, float* work, lapack_int* lwork,
15112                     lapack_int *info );
15113 void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
15114                     lapack_int* n, lapack_int* k, const double* a,
15115                     lapack_int* lda, const double* tau, double* c,
15116                     lapack_int* ldc, double* work, lapack_int* lwork,
15117                     lapack_int *info );
15118 void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
15119                     lapack_complex_float* a, lapack_int* lda,
15120                     const lapack_complex_float* tau, lapack_complex_float* work,
15121                     lapack_int* lwork, lapack_int *info );
15122 void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
15123                     lapack_complex_double* a, lapack_int* lda,
15124                     const lapack_complex_double* tau,
15125                     lapack_complex_double* work, lapack_int* lwork,
15126                     lapack_int *info );
15127 void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
15128                     lapack_int* n, lapack_int* k, const lapack_complex_float* a,
15129                     lapack_int* lda, const lapack_complex_float* tau,
15130                     lapack_complex_float* c, lapack_int* ldc,
15131                     lapack_complex_float* work, lapack_int* lwork,
15132                     lapack_int *info );
15133 void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
15134                     lapack_int* n, lapack_int* k,
15135                     const lapack_complex_double* a, lapack_int* lda,
15136                     const lapack_complex_double* tau, lapack_complex_double* c,
15137                     lapack_int* ldc, lapack_complex_double* work,
15138                     lapack_int* lwork, lapack_int *info );
15139 void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
15140                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
15141                     float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
15142                     float* c, lapack_int* ldc, float* work, lapack_int *info );
15143 void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
15144                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
15145                     double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
15146                     double* c, lapack_int* ldc, double* work,
15147                     lapack_int *info );
15148 void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
15149                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
15150                     lapack_complex_float* vt, lapack_int* ldvt,
15151                     lapack_complex_float* u, lapack_int* ldu,
15152                     lapack_complex_float* c, lapack_int* ldc, float* work,
15153                     lapack_int *info );
15154 void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
15155                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
15156                     lapack_complex_double* vt, lapack_int* ldvt,
15157                     lapack_complex_double* u, lapack_int* ldu,
15158                     lapack_complex_double* c, lapack_int* ldc, double* work,
15159                     lapack_int *info );
15160 void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
15161                     float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
15162                     float* q, lapack_int* iq, float* work, lapack_int* iwork,
15163                     lapack_int *info );
15164 void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
15165                     double* e, double* u, lapack_int* ldu, double* vt,
15166                     lapack_int* ldvt, double* q, lapack_int* iq, double* work,
15167                     lapack_int* iwork, lapack_int *info );
15168 void LAPACK_sbdsvdx( char* uplo, char* jobz, char* range,
15169                      lapack_int* n, float* d, float* e,
15170                      float* vl, float* vu,
15171                      lapack_int* il, lapack_int* iu, lapack_int* ns,
15172                      float* s, float* z, lapack_int* ldz,
15173                      float* work, lapack_int *iwork, lapack_int *info );
15174 void LAPACK_dbdsvdx( char* uplo, char* jobz, char* range,
15175                      lapack_int* n, double* d, double* e,
15176                      double* vl, double* vu,
15177                      lapack_int* il, lapack_int* iu, lapack_int* ns,
15178                      double* s, double* z, lapack_int* ldz,
15179                      double* work, lapack_int *iwork, lapack_int *info );
15180 void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
15181                     float* d, float* e, float* tau, float* work,
15182                     lapack_int* lwork, lapack_int *info );
15183 void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
15184                     double* d, double* e, double* tau, double* work,
15185                     lapack_int* lwork, lapack_int *info );
15186 void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
15187                     const float* tau, float* work, lapack_int* lwork,
15188                     lapack_int *info );
15189 void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
15190                     const double* tau, double* work, lapack_int* lwork,
15191                     lapack_int *info );
15192 void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
15193                     lapack_int* n, const float* a, lapack_int* lda,
15194                     const float* tau, float* c, lapack_int* ldc, float* work,
15195                     lapack_int* lwork, lapack_int *info );
15196 void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
15197                     lapack_int* n, const double* a, lapack_int* lda,
15198                     const double* tau, double* c, lapack_int* ldc, double* work,
15199                     lapack_int* lwork, lapack_int *info );
15200 void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
15201                     lapack_int* lda, float* d, float* e,
15202                     lapack_complex_float* tau, lapack_complex_float* work,
15203                     lapack_int* lwork, lapack_int *info );
15204 void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
15205                     lapack_int* lda, double* d, double* e,
15206                     lapack_complex_double* tau, lapack_complex_double* work,
15207                     lapack_int* lwork, lapack_int *info );
15208 void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
15209                     lapack_int* lda, const lapack_complex_float* tau,
15210                     lapack_complex_float* work, lapack_int* lwork,
15211                     lapack_int *info );
15212 void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
15213                     lapack_int* lda, const lapack_complex_double* tau,
15214                     lapack_complex_double* work, lapack_int* lwork,
15215                     lapack_int *info );
15216 void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
15217                     lapack_int* n, const lapack_complex_float* a,
15218                     lapack_int* lda, const lapack_complex_float* tau,
15219                     lapack_complex_float* c, lapack_int* ldc,
15220                     lapack_complex_float* work, lapack_int* lwork,
15221                     lapack_int *info );
15222 void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
15223                     lapack_int* n, const lapack_complex_double* a,
15224                     lapack_int* lda, const lapack_complex_double* tau,
15225                     lapack_complex_double* c, lapack_int* ldc,
15226                     lapack_complex_double* work, lapack_int* lwork,
15227                     lapack_int *info );
15228 void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
15229                     float* tau, lapack_int *info );
15230 void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
15231                     double* tau, lapack_int *info );
15232 void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
15233                     const float* tau, float* q, lapack_int* ldq, float* work,
15234                     lapack_int *info );
15235 void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
15236                     const double* tau, double* q, lapack_int* ldq, double* work,
15237                     lapack_int *info );
15238 void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
15239                     lapack_int* n, const float* ap, const float* tau, float* c,
15240                     lapack_int* ldc, float* work, lapack_int *info );
15241 void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
15242                     lapack_int* n, const double* ap, const double* tau,
15243                     double* c, lapack_int* ldc, double* work,
15244                     lapack_int *info );
15245 void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
15246                     float* d, float* e, lapack_complex_float* tau,
15247                     lapack_int *info );
15248 void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
15249                     double* d, double* e, lapack_complex_double* tau,
15250                     lapack_int *info );
15251 void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
15252                     const lapack_complex_float* tau, lapack_complex_float* q,
15253                     lapack_int* ldq, lapack_complex_float* work,
15254                     lapack_int *info );
15255 void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
15256                     const lapack_complex_double* tau, lapack_complex_double* q,
15257                     lapack_int* ldq, lapack_complex_double* work,
15258                     lapack_int *info );
15259 void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
15260                     lapack_int* n, const lapack_complex_float* ap,
15261                     const lapack_complex_float* tau, lapack_complex_float* c,
15262                     lapack_int* ldc, lapack_complex_float* work,
15263                     lapack_int *info );
15264 void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
15265                     lapack_int* n, const lapack_complex_double* ap,
15266                     const lapack_complex_double* tau, lapack_complex_double* c,
15267                     lapack_int* ldc, lapack_complex_double* work,
15268                     lapack_int *info );
15269 void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
15270                     float* ab, lapack_int* ldab, float* d, float* e, float* q,
15271                     lapack_int* ldq, float* work, lapack_int *info );
15272 void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
15273                     double* ab, lapack_int* ldab, double* d, double* e,
15274                     double* q, lapack_int* ldq, double* work,
15275                     lapack_int *info );
15276 void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
15277                     lapack_complex_float* ab, lapack_int* ldab, float* d,
15278                     float* e, lapack_complex_float* q, lapack_int* ldq,
15279                     lapack_complex_float* work, lapack_int *info );
15280 void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
15281                     lapack_complex_double* ab, lapack_int* ldab, double* d,
15282                     double* e, lapack_complex_double* q, lapack_int* ldq,
15283                     lapack_complex_double* work, lapack_int *info );
15284 void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
15285 void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
15286 void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
15287                     lapack_int* ldz, float* work, lapack_int *info );
15288 void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
15289                     lapack_int* ldz, double* work, lapack_int *info );
15290 void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
15291                     lapack_complex_float* z, lapack_int* ldz, float* work,
15292                     lapack_int *info );
15293 void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
15294                     lapack_complex_double* z, lapack_int* ldz, double* work,
15295                     lapack_int *info );
15296 void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15297                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15298                     lapack_int* m, float* w, float* z, lapack_int* ldz,
15299                     lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
15300                     float* work, lapack_int* lwork, lapack_int* iwork,
15301                     lapack_int* liwork, lapack_int *info );
15302 void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
15303                     double* e, double* vl, double* vu, lapack_int* il,
15304                     lapack_int* iu, lapack_int* m, double* w, double* z,
15305                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
15306                     lapack_logical* tryrac, double* work, lapack_int* lwork,
15307                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15308 void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15309                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15310                     lapack_int* m, float* w, lapack_complex_float* z,
15311                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
15312                     lapack_logical* tryrac, float* work, lapack_int* lwork,
15313                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15314 void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
15315                     double* e, double* vl, double* vu, lapack_int* il,
15316                     lapack_int* iu, lapack_int* m, double* w,
15317                     lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
15318                     lapack_int* isuppz, lapack_logical* tryrac, double* work,
15319                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15320                     lapack_int *info );
15321 void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
15322                     lapack_int* ldz, float* work, lapack_int* lwork,
15323                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15324 void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
15325                     lapack_int* ldz, double* work, lapack_int* lwork,
15326                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15327 void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
15328                     lapack_complex_float* z, lapack_int* ldz,
15329                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15330                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
15331                     lapack_int *info );
15332 void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
15333                     lapack_complex_double* z, lapack_int* ldz,
15334                     lapack_complex_double* work, lapack_int* lwork,
15335                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
15336                     lapack_int* liwork, lapack_int *info );
15337 void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15338                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15339                     float* abstol, lapack_int* m, float* w, float* z,
15340                     lapack_int* ldz, lapack_int* isuppz, float* work,
15341                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
15342                     lapack_int *info );
15343 void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
15344                     double* e, double* vl, double* vu, lapack_int* il,
15345                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15346                     double* z, lapack_int* ldz, lapack_int* isuppz,
15347                     double* work, lapack_int* lwork, lapack_int* iwork,
15348                     lapack_int* liwork, lapack_int *info );
15349 void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
15350                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
15351                     float* abstol, lapack_int* m, float* w,
15352                     lapack_complex_float* z, lapack_int* ldz,
15353                     lapack_int* isuppz, float* work, lapack_int* lwork,
15354                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15355 void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
15356                     double* e, double* vl, double* vu, lapack_int* il,
15357                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
15358                     lapack_complex_double* z, lapack_int* ldz,
15359                     lapack_int* isuppz, double* work, lapack_int* lwork,
15360                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15361 void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
15362                     lapack_int* ldz, float* work, lapack_int *info );
15363 void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
15364                     lapack_int* ldz, double* work, lapack_int *info );
15365 void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
15366                     lapack_complex_float* z, lapack_int* ldz, float* work,
15367                     lapack_int *info );
15368 void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
15369                     lapack_complex_double* z, lapack_int* ldz, double* work,
15370                     lapack_int *info );
15371 void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
15372                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
15373                     const float* d, const float* e, lapack_int* m,
15374                     lapack_int* nsplit, float* w, lapack_int* iblock,
15375                     lapack_int* isplit, float* work, lapack_int* iwork,
15376                     lapack_int *info );
15377 void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
15378                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
15379                     const double* d, const double* e, lapack_int* m,
15380                     lapack_int* nsplit, double* w, lapack_int* iblock,
15381                     lapack_int* isplit, double* work, lapack_int* iwork,
15382                     lapack_int *info );
15383 void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
15384                     lapack_int* m, const float* w, const lapack_int* iblock,
15385                     const lapack_int* isplit, float* z, lapack_int* ldz,
15386                     float* work, lapack_int* iwork, lapack_int* ifailv,
15387                     lapack_int *info );
15388 void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
15389                     lapack_int* m, const double* w, const lapack_int* iblock,
15390                     const lapack_int* isplit, double* z, lapack_int* ldz,
15391                     double* work, lapack_int* iwork, lapack_int* ifailv,
15392                     lapack_int *info );
15393 void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
15394                     lapack_int* m, const float* w, const lapack_int* iblock,
15395                     const lapack_int* isplit, lapack_complex_float* z,
15396                     lapack_int* ldz, float* work, lapack_int* iwork,
15397                     lapack_int* ifailv, lapack_int *info );
15398 void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
15399                     lapack_int* m, const double* w, const lapack_int* iblock,
15400                     const lapack_int* isplit, lapack_complex_double* z,
15401                     lapack_int* ldz, double* work, lapack_int* iwork,
15402                     lapack_int* ifailv, lapack_int *info );
15403 void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
15404                     float* sep, lapack_int *info );
15405 void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
15406                     double* sep, lapack_int *info );
15407 void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
15408                     lapack_int* lda, const float* b, lapack_int* ldb,
15409                     lapack_int *info );
15410 void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
15411                     lapack_int* lda, const double* b, lapack_int* ldb,
15412                     lapack_int *info );
15413 void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
15414                     lapack_complex_float* a, lapack_int* lda,
15415                     const lapack_complex_float* b, lapack_int* ldb,
15416                     lapack_int *info );
15417 void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
15418                     lapack_complex_double* a, lapack_int* lda,
15419                     const lapack_complex_double* b, lapack_int* ldb,
15420                     lapack_int *info );
15421 void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
15422                     const float* bp, lapack_int *info );
15423 void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
15424                     const double* bp, lapack_int *info );
15425 void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
15426                     lapack_complex_float* ap, const lapack_complex_float* bp,
15427                     lapack_int *info );
15428 void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
15429                     lapack_complex_double* ap, const lapack_complex_double* bp,
15430                     lapack_int *info );
15431 void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
15432                     lapack_int* kb, float* ab, lapack_int* ldab,
15433                     const float* bb, lapack_int* ldbb, float* x,
15434                     lapack_int* ldx, float* work, lapack_int *info );
15435 void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
15436                     lapack_int* kb, double* ab, lapack_int* ldab,
15437                     const double* bb, lapack_int* ldbb, double* x,
15438                     lapack_int* ldx, double* work, lapack_int *info );
15439 void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
15440                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
15441                     const lapack_complex_float* bb, lapack_int* ldbb,
15442                     lapack_complex_float* x, lapack_int* ldx,
15443                     lapack_complex_float* work, float* rwork,
15444                     lapack_int *info );
15445 void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
15446                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
15447                     const lapack_complex_double* bb, lapack_int* ldbb,
15448                     lapack_complex_double* x, lapack_int* ldx,
15449                     lapack_complex_double* work, double* rwork,
15450                     lapack_int *info );
15451 void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
15452                     lapack_int* ldbb, lapack_int *info );
15453 void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
15454                     lapack_int* ldbb, lapack_int *info );
15455 void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
15456                     lapack_complex_float* bb, lapack_int* ldbb,
15457                     lapack_int *info );
15458 void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
15459                     lapack_complex_double* bb, lapack_int* ldbb,
15460                     lapack_int *info );
15461 void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
15462                     lapack_int* lda, float* tau, float* work, lapack_int* lwork,
15463                     lapack_int *info );
15464 void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
15465                     lapack_int* lda, double* tau, double* work,
15466                     lapack_int* lwork, lapack_int *info );
15467 void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
15468                     lapack_complex_float* a, lapack_int* lda,
15469                     lapack_complex_float* tau, lapack_complex_float* work,
15470                     lapack_int* lwork, lapack_int *info );
15471 void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
15472                     lapack_complex_double* a, lapack_int* lda,
15473                     lapack_complex_double* tau, lapack_complex_double* work,
15474                     lapack_int* lwork, lapack_int *info );
15475 void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
15476                     lapack_int* lda, const float* tau, float* work,
15477                     lapack_int* lwork, lapack_int *info );
15478 void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
15479                     lapack_int* lda, const double* tau, double* work,
15480                     lapack_int* lwork, lapack_int *info );
15481 void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
15482                     lapack_int* ilo, lapack_int* ihi, const float* a,
15483                     lapack_int* lda, const float* tau, float* c,
15484                     lapack_int* ldc, float* work, lapack_int* lwork,
15485                     lapack_int *info );
15486 void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
15487                     lapack_int* ilo, lapack_int* ihi, const double* a,
15488                     lapack_int* lda, const double* tau, double* c,
15489                     lapack_int* ldc, double* work, lapack_int* lwork,
15490                     lapack_int *info );
15491 void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
15492                     lapack_complex_float* a, lapack_int* lda,
15493                     const lapack_complex_float* tau, lapack_complex_float* work,
15494                     lapack_int* lwork, lapack_int *info );
15495 void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
15496                     lapack_complex_double* a, lapack_int* lda,
15497                     const lapack_complex_double* tau,
15498                     lapack_complex_double* work, lapack_int* lwork,
15499                     lapack_int *info );
15500 void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
15501                     lapack_int* ilo, lapack_int* ihi,
15502                     const lapack_complex_float* a, lapack_int* lda,
15503                     const lapack_complex_float* tau, lapack_complex_float* c,
15504                     lapack_int* ldc, lapack_complex_float* work,
15505                     lapack_int* lwork, lapack_int *info );
15506 void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
15507                     lapack_int* ilo, lapack_int* ihi,
15508                     const lapack_complex_double* a, lapack_int* lda,
15509                     const lapack_complex_double* tau, lapack_complex_double* c,
15510                     lapack_int* ldc, lapack_complex_double* work,
15511                     lapack_int* lwork, lapack_int *info );
15512 void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
15513                     lapack_int* ilo, lapack_int* ihi, float* scale,
15514                     lapack_int *info );
15515 void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
15516                     lapack_int* ilo, lapack_int* ihi, double* scale,
15517                     lapack_int *info );
15518 void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
15519                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
15520                     float* scale, lapack_int *info );
15521 void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
15522                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
15523                     double* scale, lapack_int *info );
15524 void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15525                     lapack_int* ihi, const float* scale, lapack_int* m,
15526                     float* v, lapack_int* ldv, lapack_int *info );
15527 void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15528                     lapack_int* ihi, const double* scale, lapack_int* m,
15529                     double* v, lapack_int* ldv, lapack_int *info );
15530 void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15531                     lapack_int* ihi, const float* scale, lapack_int* m,
15532                     lapack_complex_float* v, lapack_int* ldv,
15533                     lapack_int *info );
15534 void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15535                     lapack_int* ihi, const double* scale, lapack_int* m,
15536                     lapack_complex_double* v, lapack_int* ldv,
15537                     lapack_int *info );
15538 void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
15539                     lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
15540                     float* wi, float* z, lapack_int* ldz, float* work,
15541                     lapack_int* lwork, lapack_int *info );
15542 void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
15543                     lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
15544                     double* wi, double* z, lapack_int* ldz, double* work,
15545                     lapack_int* lwork, lapack_int *info );
15546 void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
15547                     lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
15548                     lapack_complex_float* w, lapack_complex_float* z,
15549                     lapack_int* ldz, lapack_complex_float* work,
15550                     lapack_int* lwork, lapack_int *info );
15551 void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
15552                     lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
15553                     lapack_complex_double* w, lapack_complex_double* z,
15554                     lapack_int* ldz, lapack_complex_double* work,
15555                     lapack_int* lwork, lapack_int *info );
15556 void LAPACK_shsein( char* job, char* eigsrc, char* initv,
15557                     lapack_logical* select, lapack_int* n, const float* h,
15558                     lapack_int* ldh, float* wr, const float* wi, float* vl,
15559                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
15560                     lapack_int* mm, lapack_int* m, float* work,
15561                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
15562 void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
15563                     lapack_logical* select, lapack_int* n, const double* h,
15564                     lapack_int* ldh, double* wr, const double* wi, double* vl,
15565                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
15566                     lapack_int* mm, lapack_int* m, double* work,
15567                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
15568 void LAPACK_chsein( char* job, char* eigsrc, char* initv,
15569                     const lapack_logical* select, lapack_int* n,
15570                     const lapack_complex_float* h, lapack_int* ldh,
15571                     lapack_complex_float* w, lapack_complex_float* vl,
15572                     lapack_int* ldvl, lapack_complex_float* vr,
15573                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
15574                     lapack_complex_float* work, float* rwork,
15575                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
15576 void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
15577                     const lapack_logical* select, lapack_int* n,
15578                     const lapack_complex_double* h, lapack_int* ldh,
15579                     lapack_complex_double* w, lapack_complex_double* vl,
15580                     lapack_int* ldvl, lapack_complex_double* vr,
15581                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
15582                     lapack_complex_double* work, double* rwork,
15583                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
15584 void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
15585                     lapack_int* n, const float* t, lapack_int* ldt, float* vl,
15586                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
15587                     lapack_int* mm, lapack_int* m, float* work,
15588                     lapack_int *info );
15589 void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
15590                     lapack_int* n, const double* t, lapack_int* ldt, double* vl,
15591                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
15592                     lapack_int* mm, lapack_int* m, double* work,
15593                     lapack_int *info );
15594 void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
15595                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
15596                     lapack_complex_float* vl, lapack_int* ldvl,
15597                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
15598                     lapack_int* m, lapack_complex_float* work, float* rwork,
15599                     lapack_int *info );
15600 void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
15601                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
15602                     lapack_complex_double* vl, lapack_int* ldvl,
15603                     lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
15604                     lapack_int* m, lapack_complex_double* work, double* rwork,
15605                     lapack_int *info );
15606 void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
15607                     lapack_int* n, const float* t, lapack_int* ldt,
15608                     const float* vl, lapack_int* ldvl, const float* vr,
15609                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
15610                     lapack_int* m, float* work, lapack_int* ldwork,
15611                     lapack_int* iwork, lapack_int *info );
15612 void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
15613                     lapack_int* n, const double* t, lapack_int* ldt,
15614                     const double* vl, lapack_int* ldvl, const double* vr,
15615                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
15616                     lapack_int* m, double* work, lapack_int* ldwork,
15617                     lapack_int* iwork, lapack_int *info );
15618 void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
15619                     lapack_int* n, const lapack_complex_float* t,
15620                     lapack_int* ldt, const lapack_complex_float* vl,
15621                     lapack_int* ldvl, const lapack_complex_float* vr,
15622                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
15623                     lapack_int* m, lapack_complex_float* work,
15624                     lapack_int* ldwork, float* rwork, lapack_int *info );
15625 void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
15626                     lapack_int* n, const lapack_complex_double* t,
15627                     lapack_int* ldt, const lapack_complex_double* vl,
15628                     lapack_int* ldvl, const lapack_complex_double* vr,
15629                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
15630                     lapack_int* m, lapack_complex_double* work,
15631                     lapack_int* ldwork, double* rwork, lapack_int *info );
15632 void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
15633                     float* q, lapack_int* ldq, lapack_int* ifst,
15634                     lapack_int* ilst, float* work, lapack_int *info );
15635 void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
15636                     double* q, lapack_int* ldq, lapack_int* ifst,
15637                     lapack_int* ilst, double* work, lapack_int *info );
15638 void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
15639                     lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
15640                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
15641 void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
15642                     lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
15643                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
15644 void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
15645                     lapack_int* n, float* t, lapack_int* ldt, float* q,
15646                     lapack_int* ldq, float* wr, float* wi, lapack_int* m,
15647                     float* s, float* sep, float* work, lapack_int* lwork,
15648                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15649 void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
15650                     lapack_int* n, double* t, lapack_int* ldt, double* q,
15651                     lapack_int* ldq, double* wr, double* wi, lapack_int* m,
15652                     double* s, double* sep, double* work, lapack_int* lwork,
15653                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15654 void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
15655                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
15656                     lapack_complex_float* q, lapack_int* ldq,
15657                     lapack_complex_float* w, lapack_int* m, float* s,
15658                     float* sep, lapack_complex_float* work, lapack_int* lwork,
15659                     lapack_int *info );
15660 void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
15661                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
15662                     lapack_complex_double* q, lapack_int* ldq,
15663                     lapack_complex_double* w, lapack_int* m, double* s,
15664                     double* sep, lapack_complex_double* work, lapack_int* lwork,
15665                     lapack_int *info );
15666 void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
15667                     lapack_int* n, const float* a, lapack_int* lda,
15668                     const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
15669                     float* scale, lapack_int *info );
15670 void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
15671                     lapack_int* n, const double* a, lapack_int* lda,
15672                     const double* b, lapack_int* ldb, double* c,
15673                     lapack_int* ldc, double* scale, lapack_int *info );
15674 void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
15675                     lapack_int* n, const lapack_complex_float* a,
15676                     lapack_int* lda, const lapack_complex_float* b,
15677                     lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
15678                     float* scale, lapack_int *info );
15679 void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
15680                     lapack_int* n, const lapack_complex_double* a,
15681                     lapack_int* lda, const lapack_complex_double* b,
15682                     lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
15683                     double* scale, lapack_int *info );
15684 void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15685                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
15686                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
15687                     lapack_int* ldz, lapack_int *info );
15688 void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15689                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
15690                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
15691                     lapack_int* ldz, lapack_int *info );
15692 void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15693                     lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
15694                     lapack_complex_float* b, lapack_int* ldb,
15695                     lapack_complex_float* q, lapack_int* ldq,
15696                     lapack_complex_float* z, lapack_int* ldz,
15697                     lapack_int *info );
15698 void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15699                     lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
15700                     lapack_complex_double* b, lapack_int* ldb,
15701                     lapack_complex_double* q, lapack_int* ldq,
15702                     lapack_complex_double* z, lapack_int* ldz,
15703                     lapack_int *info );
15704 void LAPACK_sgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15705                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
15706                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
15707                     lapack_int* ldz, float* work, lapack_int* lwork,
15708                     lapack_int *info );
15709 void LAPACK_dgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
15710                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
15711                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
15712                     lapack_int* ldz, double* work, lapack_int* lwork,
15713                     lapack_int *info );
15714 void LAPACK_cgghd3( char* compq, char* compz, lapack_int* n,
15715                     lapack_int* ilo, lapack_int* ihi,
15716                     lapack_complex_float* a, lapack_int* lda,
15717                     lapack_complex_float* b, lapack_int* ldb,
15718                     lapack_complex_float* q, lapack_int* ldq,
15719                     lapack_complex_float* z, lapack_int* ldz,
15720                     lapack_complex_float* work, lapack_int* lwork,
15721                     lapack_int *info );
15722 void LAPACK_zgghd3( char* compq, char* compz, lapack_int* n,
15723                     lapack_int* ilo, lapack_int* ihi,
15724                     lapack_complex_double* a, lapack_int* lda,
15725                     lapack_complex_double* b, lapack_int* ldb,
15726                     lapack_complex_double* q, lapack_int* ldq,
15727                     lapack_complex_double* z, lapack_int* ldz,
15728                     lapack_complex_double* work, lapack_int* lwork,
15729                     lapack_int *info );
15730 void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
15731                     float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
15732                     float* lscale, float* rscale, float* work,
15733                     lapack_int *info );
15734 void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
15735                     double* b, lapack_int* ldb, lapack_int* ilo,
15736                     lapack_int* ihi, double* lscale, double* rscale,
15737                     double* work, lapack_int *info );
15738 void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
15739                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
15740                     lapack_int* ilo, lapack_int* ihi, float* lscale,
15741                     float* rscale, float* work, lapack_int *info );
15742 void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
15743                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
15744                     lapack_int* ilo, lapack_int* ihi, double* lscale,
15745                     double* rscale, double* work, lapack_int *info );
15746 void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15747                     lapack_int* ihi, const float* lscale, const float* rscale,
15748                     lapack_int* m, float* v, lapack_int* ldv,
15749                     lapack_int *info );
15750 void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15751                     lapack_int* ihi, const double* lscale, const double* rscale,
15752                     lapack_int* m, double* v, lapack_int* ldv,
15753                     lapack_int *info );
15754 void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15755                     lapack_int* ihi, const float* lscale, const float* rscale,
15756                     lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
15757                     lapack_int *info );
15758 void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
15759                     lapack_int* ihi, const double* lscale, const double* rscale,
15760                     lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
15761                     lapack_int *info );
15762 void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
15763                     lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
15764                     float* t, lapack_int* ldt, float* alphar, float* alphai,
15765                     float* beta, float* q, lapack_int* ldq, float* z,
15766                     lapack_int* ldz, float* work, lapack_int* lwork,
15767                     lapack_int *info );
15768 void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
15769                     lapack_int* ilo, lapack_int* ihi, double* h,
15770                     lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
15771                     double* alphai, double* beta, double* q, lapack_int* ldq,
15772                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
15773                     lapack_int *info );
15774 void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
15775                     lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
15776                     lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
15777                     lapack_complex_float* alpha, lapack_complex_float* beta,
15778                     lapack_complex_float* q, lapack_int* ldq,
15779                     lapack_complex_float* z, lapack_int* ldz,
15780                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15781                     lapack_int *info );
15782 void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
15783                     lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
15784                     lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
15785                     lapack_complex_double* alpha, lapack_complex_double* beta,
15786                     lapack_complex_double* q, lapack_int* ldq,
15787                     lapack_complex_double* z, lapack_int* ldz,
15788                     lapack_complex_double* work, lapack_int* lwork,
15789                     double* rwork, lapack_int *info );
15790 void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
15791                     lapack_int* n, const float* s, lapack_int* lds,
15792                     const float* p, lapack_int* ldp, float* vl,
15793                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
15794                     lapack_int* mm, lapack_int* m, float* work,
15795                     lapack_int *info );
15796 void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
15797                     lapack_int* n, const double* s, lapack_int* lds,
15798                     const double* p, lapack_int* ldp, double* vl,
15799                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
15800                     lapack_int* mm, lapack_int* m, double* work,
15801                     lapack_int *info );
15802 void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
15803                     lapack_int* n, const lapack_complex_float* s,
15804                     lapack_int* lds, const lapack_complex_float* p,
15805                     lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
15806                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
15807                     lapack_int* m, lapack_complex_float* work, float* rwork,
15808                     lapack_int *info );
15809 void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
15810                     lapack_int* n, const lapack_complex_double* s,
15811                     lapack_int* lds, const lapack_complex_double* p,
15812                     lapack_int* ldp, lapack_complex_double* vl,
15813                     lapack_int* ldvl, lapack_complex_double* vr,
15814                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
15815                     lapack_complex_double* work, double* rwork,
15816                     lapack_int *info );
15817 void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
15818                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
15819                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
15820                     lapack_int* ifst, lapack_int* ilst, float* work,
15821                     lapack_int* lwork, lapack_int *info );
15822 void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
15823                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
15824                     double* q, lapack_int* ldq, double* z, lapack_int* ldz,
15825                     lapack_int* ifst, lapack_int* ilst, double* work,
15826                     lapack_int* lwork, lapack_int *info );
15827 void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
15828                     lapack_complex_float* a, lapack_int* lda,
15829                     lapack_complex_float* b, lapack_int* ldb,
15830                     lapack_complex_float* q, lapack_int* ldq,
15831                     lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
15832                     lapack_int* ilst, lapack_int *info );
15833 void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
15834                     lapack_complex_double* a, lapack_int* lda,
15835                     lapack_complex_double* b, lapack_int* ldb,
15836                     lapack_complex_double* q, lapack_int* ldq,
15837                     lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
15838                     lapack_int* ilst, lapack_int *info );
15839 void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
15840                     lapack_logical* wantz, const lapack_logical* select,
15841                     lapack_int* n, float* a, lapack_int* lda, float* b,
15842                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
15843                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
15844                     lapack_int* m, float* pl, float* pr, float* dif,
15845                     float* work, lapack_int* lwork, lapack_int* iwork,
15846                     lapack_int* liwork, lapack_int *info );
15847 void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
15848                     lapack_logical* wantz, const lapack_logical* select,
15849                     lapack_int* n, double* a, lapack_int* lda, double* b,
15850                     lapack_int* ldb, double* alphar, double* alphai,
15851                     double* beta, double* q, lapack_int* ldq, double* z,
15852                     lapack_int* ldz, lapack_int* m, double* pl, double* pr,
15853                     double* dif, double* work, lapack_int* lwork,
15854                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15855 void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
15856                     lapack_logical* wantz, const lapack_logical* select,
15857                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
15858                     lapack_complex_float* b, lapack_int* ldb,
15859                     lapack_complex_float* alpha, lapack_complex_float* beta,
15860                     lapack_complex_float* q, lapack_int* ldq,
15861                     lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
15862                     float* pl, float* pr, float* dif,
15863                     lapack_complex_float* work, lapack_int* lwork,
15864                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15865 void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
15866                     lapack_logical* wantz, const lapack_logical* select,
15867                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
15868                     lapack_complex_double* b, lapack_int* ldb,
15869                     lapack_complex_double* alpha, lapack_complex_double* beta,
15870                     lapack_complex_double* q, lapack_int* ldq,
15871                     lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
15872                     double* pl, double* pr, double* dif,
15873                     lapack_complex_double* work, lapack_int* lwork,
15874                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
15875 void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
15876                     const float* a, lapack_int* lda, const float* b,
15877                     lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
15878                     lapack_int* ldd, const float* e, lapack_int* lde, float* f,
15879                     lapack_int* ldf, float* scale, float* dif, float* work,
15880                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
15881 void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
15882                     const double* a, lapack_int* lda, const double* b,
15883                     lapack_int* ldb, double* c, lapack_int* ldc,
15884                     const double* d, lapack_int* ldd, const double* e,
15885                     lapack_int* lde, double* f, lapack_int* ldf, double* scale,
15886                     double* dif, double* work, lapack_int* lwork,
15887                     lapack_int* iwork, lapack_int *info );
15888 void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
15889                     const lapack_complex_float* a, lapack_int* lda,
15890                     const lapack_complex_float* b, lapack_int* ldb,
15891                     lapack_complex_float* c, lapack_int* ldc,
15892                     const lapack_complex_float* d, lapack_int* ldd,
15893                     const lapack_complex_float* e, lapack_int* lde,
15894                     lapack_complex_float* f, lapack_int* ldf, float* scale,
15895                     float* dif, lapack_complex_float* work, lapack_int* lwork,
15896                     lapack_int* iwork, lapack_int *info );
15897 void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
15898                     const lapack_complex_double* a, lapack_int* lda,
15899                     const lapack_complex_double* b, lapack_int* ldb,
15900                     lapack_complex_double* c, lapack_int* ldc,
15901                     const lapack_complex_double* d, lapack_int* ldd,
15902                     const lapack_complex_double* e, lapack_int* lde,
15903                     lapack_complex_double* f, lapack_int* ldf, double* scale,
15904                     double* dif, lapack_complex_double* work, lapack_int* lwork,
15905                     lapack_int* iwork, lapack_int *info );
15906 void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
15907                     lapack_int* n, const float* a, lapack_int* lda,
15908                     const float* b, lapack_int* ldb, const float* vl,
15909                     lapack_int* ldvl, const float* vr, lapack_int* ldvr,
15910                     float* s, float* dif, lapack_int* mm, lapack_int* m,
15911                     float* work, lapack_int* lwork, lapack_int* iwork,
15912                     lapack_int *info );
15913 void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
15914                     lapack_int* n, const double* a, lapack_int* lda,
15915                     const double* b, lapack_int* ldb, const double* vl,
15916                     lapack_int* ldvl, const double* vr, lapack_int* ldvr,
15917                     double* s, double* dif, lapack_int* mm, lapack_int* m,
15918                     double* work, lapack_int* lwork, lapack_int* iwork,
15919                     lapack_int *info );
15920 void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
15921                     lapack_int* n, const lapack_complex_float* a,
15922                     lapack_int* lda, const lapack_complex_float* b,
15923                     lapack_int* ldb, const lapack_complex_float* vl,
15924                     lapack_int* ldvl, const lapack_complex_float* vr,
15925                     lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
15926                     lapack_int* m, lapack_complex_float* work,
15927                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
15928 void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
15929                     lapack_int* n, const lapack_complex_double* a,
15930                     lapack_int* lda, const lapack_complex_double* b,
15931                     lapack_int* ldb, const lapack_complex_double* vl,
15932                     lapack_int* ldvl, const lapack_complex_double* vr,
15933                     lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
15934                     lapack_int* m, lapack_complex_double* work,
15935                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
15936 void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
15937                     lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
15938                     float* b, lapack_int* ldb, float* tola, float* tolb,
15939                     lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
15940                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
15941                     lapack_int* iwork, float* tau, float* work,
15942                     lapack_int *info );
15943 void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
15944                     lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
15945                     double* b, lapack_int* ldb, double* tola, double* tolb,
15946                     lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
15947                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
15948                     lapack_int* iwork, double* tau, double* work,
15949                     lapack_int *info );
15950 void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
15951                     lapack_int* p, lapack_int* n, lapack_complex_float* a,
15952                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
15953                     float* tola, float* tolb, lapack_int* k, lapack_int* l,
15954                     lapack_complex_float* u, lapack_int* ldu,
15955                     lapack_complex_float* v, lapack_int* ldv,
15956                     lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
15957                     float* rwork, lapack_complex_float* tau,
15958                     lapack_complex_float* work, lapack_int *info );
15959 void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
15960                     lapack_int* p, lapack_int* n, lapack_complex_double* a,
15961                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
15962                     double* tola, double* tolb, lapack_int* k, lapack_int* l,
15963                     lapack_complex_double* u, lapack_int* ldu,
15964                     lapack_complex_double* v, lapack_int* ldv,
15965                     lapack_complex_double* q, lapack_int* ldq,
15966                     lapack_int* iwork, double* rwork,
15967                     lapack_complex_double* tau, lapack_complex_double* work,
15968                     lapack_int *info );
15969 void LAPACK_sggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
15970                      lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
15971                      float* b, lapack_int* ldb, float* tola, float* tolb,
15972                      lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
15973                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
15974                      lapack_int* iwork, float* tau, float* work,
15975                      lapack_int* lwork, lapack_int *info );
15976 void LAPACK_dggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
15977                      lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
15978                      double* b, lapack_int* ldb, double* tola, double* tolb,
15979                      lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
15980                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
15981                      lapack_int* iwork, double* tau, double* work,
15982                      lapack_int* lwork, lapack_int *info );
15983 void LAPACK_cggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
15984                      lapack_int* p, lapack_int* n, lapack_complex_float* a,
15985                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
15986                      float* tola, float* tolb, lapack_int* k, lapack_int* l,
15987                      lapack_complex_float* u, lapack_int* ldu,
15988                      lapack_complex_float* v, lapack_int* ldv,
15989                      lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
15990                      float* rwork, lapack_complex_float* tau,
15991                      lapack_complex_float* work, lapack_int* lwork,
15992                      lapack_int *info );
15993 void LAPACK_zggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
15994                      lapack_int* p, lapack_int* n, lapack_complex_double* a,
15995                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
15996                      double* tola, double* tolb, lapack_int* k, lapack_int* l,
15997                      lapack_complex_double* u, lapack_int* ldu,
15998                      lapack_complex_double* v, lapack_int* ldv,
15999                      lapack_complex_double* q, lapack_int* ldq,
16000                      lapack_int* iwork, double* rwork,
16001                      lapack_complex_double* tau, lapack_complex_double* work,
16002                      lapack_int* lwork, lapack_int *info );
16003 void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16004                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16005                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16006                     float* tola, float* tolb, float* alpha, float* beta,
16007                     float* u, lapack_int* ldu, float* v, lapack_int* ldv,
16008                     float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
16009                     lapack_int *info );
16010 void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16011                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16012                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16013                     double* tola, double* tolb, double* alpha, double* beta,
16014                     double* u, lapack_int* ldu, double* v, lapack_int* ldv,
16015                     double* q, lapack_int* ldq, double* work,
16016                     lapack_int* ncycle, lapack_int *info );
16017 void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16018                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16019                     lapack_complex_float* a, lapack_int* lda,
16020                     lapack_complex_float* b, lapack_int* ldb, float* tola,
16021                     float* tolb, float* alpha, float* beta,
16022                     lapack_complex_float* u, lapack_int* ldu,
16023                     lapack_complex_float* v, lapack_int* ldv,
16024                     lapack_complex_float* q, lapack_int* ldq,
16025                     lapack_complex_float* work, lapack_int* ncycle,
16026                     lapack_int *info );
16027 void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16028                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16029                     lapack_complex_double* a, lapack_int* lda,
16030                     lapack_complex_double* b, lapack_int* ldb, double* tola,
16031                     double* tolb, double* alpha, double* beta,
16032                     lapack_complex_double* u, lapack_int* ldu,
16033                     lapack_complex_double* v, lapack_int* ldv,
16034                     lapack_complex_double* q, lapack_int* ldq,
16035                     lapack_complex_double* work, lapack_int* ncycle,
16036                     lapack_int *info );
16037 void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16038                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
16039                    float* work, lapack_int* lwork, lapack_int *info );
16040 void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16041                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
16042                    double* work, lapack_int* lwork, lapack_int *info );
16043 void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16044                    lapack_complex_float* a, lapack_int* lda,
16045                    lapack_complex_float* b, lapack_int* ldb,
16046                    lapack_complex_float* work, lapack_int* lwork,
16047                    lapack_int *info );
16048 void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16049                    lapack_complex_double* a, lapack_int* lda,
16050                    lapack_complex_double* b, lapack_int* ldb,
16051                    lapack_complex_double* work, lapack_int* lwork,
16052                    lapack_int *info );
16053 void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16054                     lapack_int* lda, float* b, lapack_int* ldb,
16055                     lapack_int* jpvt, float* rcond, lapack_int* rank,
16056                     float* work, lapack_int* lwork, lapack_int *info );
16057 void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
16058                     lapack_int* lda, double* b, lapack_int* ldb,
16059                     lapack_int* jpvt, double* rcond, lapack_int* rank,
16060                     double* work, lapack_int* lwork, lapack_int *info );
16061 void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16062                     lapack_complex_float* a, lapack_int* lda,
16063                     lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
16064                     float* rcond, lapack_int* rank, lapack_complex_float* work,
16065                     lapack_int* lwork, float* rwork, lapack_int *info );
16066 void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16067                     lapack_complex_double* a, lapack_int* lda,
16068                     lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
16069                     double* rcond, lapack_int* rank,
16070                     lapack_complex_double* work, lapack_int* lwork,
16071                     double* rwork, lapack_int *info );
16072 void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16073                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
16074                     float* rcond, lapack_int* rank, float* work,
16075                     lapack_int* lwork, lapack_int *info );
16076 void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
16077                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
16078                     double* rcond, lapack_int* rank, double* work,
16079                     lapack_int* lwork, lapack_int *info );
16080 void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16081                     lapack_complex_float* a, lapack_int* lda,
16082                     lapack_complex_float* b, lapack_int* ldb, float* s,
16083                     float* rcond, lapack_int* rank, lapack_complex_float* work,
16084                     lapack_int* lwork, float* rwork, lapack_int *info );
16085 void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16086                     lapack_complex_double* a, lapack_int* lda,
16087                     lapack_complex_double* b, lapack_int* ldb, double* s,
16088                     double* rcond, lapack_int* rank,
16089                     lapack_complex_double* work, lapack_int* lwork,
16090                     double* rwork, lapack_int *info );
16091 void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16092                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
16093                     float* rcond, lapack_int* rank, float* work,
16094                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16095 void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
16096                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
16097                     double* rcond, lapack_int* rank, double* work,
16098                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16099 void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16100                     lapack_complex_float* a, lapack_int* lda,
16101                     lapack_complex_float* b, lapack_int* ldb, float* s,
16102                     float* rcond, lapack_int* rank, lapack_complex_float* work,
16103                     lapack_int* lwork, float* rwork, lapack_int* iwork,
16104                     lapack_int *info );
16105 void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16106                     lapack_complex_double* a, lapack_int* lda,
16107                     lapack_complex_double* b, lapack_int* ldb, double* s,
16108                     double* rcond, lapack_int* rank,
16109                     lapack_complex_double* work, lapack_int* lwork,
16110                     double* rwork, lapack_int* iwork, lapack_int *info );
16111 void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
16112                     lapack_int* lda, float* b, lapack_int* ldb, float* c,
16113                     float* d, float* x, float* work, lapack_int* lwork,
16114                     lapack_int *info );
16115 void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
16116                     lapack_int* lda, double* b, lapack_int* ldb, double* c,
16117                     double* d, double* x, double* work, lapack_int* lwork,
16118                     lapack_int *info );
16119 void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
16120                     lapack_complex_float* a, lapack_int* lda,
16121                     lapack_complex_float* b, lapack_int* ldb,
16122                     lapack_complex_float* c, lapack_complex_float* d,
16123                     lapack_complex_float* x, lapack_complex_float* work,
16124                     lapack_int* lwork, lapack_int *info );
16125 void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
16126                     lapack_complex_double* a, lapack_int* lda,
16127                     lapack_complex_double* b, lapack_int* ldb,
16128                     lapack_complex_double* c, lapack_complex_double* d,
16129                     lapack_complex_double* x, lapack_complex_double* work,
16130                     lapack_int* lwork, lapack_int *info );
16131 void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
16132                     lapack_int* lda, float* b, lapack_int* ldb, float* d,
16133                     float* x, float* y, float* work, lapack_int* lwork,
16134                     lapack_int *info );
16135 void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
16136                     lapack_int* lda, double* b, lapack_int* ldb, double* d,
16137                     double* x, double* y, double* work, lapack_int* lwork,
16138                     lapack_int *info );
16139 void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
16140                     lapack_complex_float* a, lapack_int* lda,
16141                     lapack_complex_float* b, lapack_int* ldb,
16142                     lapack_complex_float* d, lapack_complex_float* x,
16143                     lapack_complex_float* y, lapack_complex_float* work,
16144                     lapack_int* lwork, lapack_int *info );
16145 void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
16146                     lapack_complex_double* a, lapack_int* lda,
16147                     lapack_complex_double* b, lapack_int* ldb,
16148                     lapack_complex_double* d, lapack_complex_double* x,
16149                     lapack_complex_double* y, lapack_complex_double* work,
16150                     lapack_int* lwork, lapack_int *info );
16151 void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
16152                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
16153                    lapack_int *info );
16154 void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
16155                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
16156                    lapack_int *info );
16157 void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
16158                    lapack_complex_float* a, lapack_int* lda, float* w,
16159                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16160                    lapack_int *info );
16161 void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
16162                    lapack_complex_double* a, lapack_int* lda, double* w,
16163                    lapack_complex_double* work, lapack_int* lwork,
16164                    double* rwork, lapack_int *info );
16165 void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
16166                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
16167                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16168 void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
16169                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
16170                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16171 void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
16172                     lapack_complex_float* a, lapack_int* lda, float* w,
16173                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16174                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16175                     lapack_int *info );
16176 void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
16177                     lapack_complex_double* a, lapack_int* lda, double* w,
16178                     lapack_complex_double* work, lapack_int* lwork,
16179                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16180                     lapack_int* liwork, lapack_int *info );
16181 void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
16182                     float* a, lapack_int* lda, float* vl, float* vu,
16183                     lapack_int* il, lapack_int* iu, float* abstol,
16184                     lapack_int* m, float* w, float* z, lapack_int* ldz,
16185                     float* work, lapack_int* lwork, lapack_int* iwork,
16186                     lapack_int* ifail, lapack_int *info );
16187 void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
16188                     double* a, lapack_int* lda, double* vl, double* vu,
16189                     lapack_int* il, lapack_int* iu, double* abstol,
16190                     lapack_int* m, double* w, double* z, lapack_int* ldz,
16191                     double* work, lapack_int* lwork, lapack_int* iwork,
16192                     lapack_int* ifail, lapack_int *info );
16193 void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
16194                     lapack_complex_float* a, lapack_int* lda, float* vl,
16195                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16196                     lapack_int* m, float* w, lapack_complex_float* z,
16197                     lapack_int* ldz, lapack_complex_float* work,
16198                     lapack_int* lwork, float* rwork, lapack_int* iwork,
16199                     lapack_int* ifail, lapack_int *info );
16200 void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
16201                     lapack_complex_double* a, lapack_int* lda, double* vl,
16202                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16203                     lapack_int* m, double* w, lapack_complex_double* z,
16204                     lapack_int* ldz, lapack_complex_double* work,
16205                     lapack_int* lwork, double* rwork, lapack_int* iwork,
16206                     lapack_int* ifail, lapack_int *info );
16207 void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
16208                     float* a, lapack_int* lda, float* vl, float* vu,
16209                     lapack_int* il, lapack_int* iu, float* abstol,
16210                     lapack_int* m, float* w, float* z, lapack_int* ldz,
16211                     lapack_int* isuppz, float* work, lapack_int* lwork,
16212                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16213 void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
16214                     double* a, lapack_int* lda, double* vl, double* vu,
16215                     lapack_int* il, lapack_int* iu, double* abstol,
16216                     lapack_int* m, double* w, double* z, lapack_int* ldz,
16217                     lapack_int* isuppz, double* work, lapack_int* lwork,
16218                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16219 void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
16220                     lapack_complex_float* a, lapack_int* lda, float* vl,
16221                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16222                     lapack_int* m, float* w, lapack_complex_float* z,
16223                     lapack_int* ldz, lapack_int* isuppz,
16224                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16225                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16226                     lapack_int *info );
16227 void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
16228                     lapack_complex_double* a, lapack_int* lda, double* vl,
16229                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16230                     lapack_int* m, double* w, lapack_complex_double* z,
16231                     lapack_int* ldz, lapack_int* isuppz,
16232                     lapack_complex_double* work, lapack_int* lwork,
16233                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16234                     lapack_int* liwork, lapack_int *info );
16235 void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
16236                    float* z, lapack_int* ldz, float* work, lapack_int *info );
16237 void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
16238                    double* z, lapack_int* ldz, double* work, lapack_int *info );
16239 void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
16240                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
16241                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
16242                    lapack_int *info );
16243 void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
16244                    lapack_complex_double* ap, double* w,
16245                    lapack_complex_double* z, lapack_int* ldz,
16246                    lapack_complex_double* work, double* rwork,
16247                    lapack_int *info );
16248 void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
16249                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
16250                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16251 void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
16252                     double* w, double* z, lapack_int* ldz, double* work,
16253                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16254                     lapack_int *info );
16255 void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
16256                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
16257                     lapack_int* ldz, lapack_complex_float* work,
16258                     lapack_int* lwork, float* rwork, lapack_int* lrwork,
16259                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16260 void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
16261                     lapack_complex_double* ap, double* w,
16262                     lapack_complex_double* z, lapack_int* ldz,
16263                     lapack_complex_double* work, lapack_int* lwork,
16264                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16265                     lapack_int* liwork, lapack_int *info );
16266 void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
16267                     float* ap, float* vl, float* vu, lapack_int* il,
16268                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
16269                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
16270                     lapack_int* ifail, lapack_int *info );
16271 void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
16272                     double* ap, double* vl, double* vu, lapack_int* il,
16273                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16274                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
16275                     lapack_int* ifail, lapack_int *info );
16276 void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
16277                     lapack_complex_float* ap, float* vl, float* vu,
16278                     lapack_int* il, lapack_int* iu, float* abstol,
16279                     lapack_int* m, float* w, lapack_complex_float* z,
16280                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
16281                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16282 void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
16283                     lapack_complex_double* ap, double* vl, double* vu,
16284                     lapack_int* il, lapack_int* iu, double* abstol,
16285                     lapack_int* m, double* w, lapack_complex_double* z,
16286                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
16287                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16288 void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16289                    float* ab, lapack_int* ldab, float* w, float* z,
16290                    lapack_int* ldz, float* work, lapack_int *info );
16291 void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16292                    double* ab, lapack_int* ldab, double* w, double* z,
16293                    lapack_int* ldz, double* work, lapack_int *info );
16294 void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16295                    lapack_complex_float* ab, lapack_int* ldab, float* w,
16296                    lapack_complex_float* z, lapack_int* ldz,
16297                    lapack_complex_float* work, float* rwork, lapack_int *info );
16298 void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16299                    lapack_complex_double* ab, lapack_int* ldab, double* w,
16300                    lapack_complex_double* z, lapack_int* ldz,
16301                    lapack_complex_double* work, double* rwork,
16302                    lapack_int *info );
16303 void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16304                     float* ab, lapack_int* ldab, float* w, float* z,
16305                     lapack_int* ldz, float* work, lapack_int* lwork,
16306                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16307 void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16308                     double* ab, lapack_int* ldab, double* w, double* z,
16309                     lapack_int* ldz, double* work, lapack_int* lwork,
16310                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16311 void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16312                     lapack_complex_float* ab, lapack_int* ldab, float* w,
16313                     lapack_complex_float* z, lapack_int* ldz,
16314                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16315                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16316                     lapack_int *info );
16317 void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
16318                     lapack_complex_double* ab, lapack_int* ldab, double* w,
16319                     lapack_complex_double* z, lapack_int* ldz,
16320                     lapack_complex_double* work, lapack_int* lwork,
16321                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16322                     lapack_int* liwork, lapack_int *info );
16323 void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
16324                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
16325                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
16326                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
16327                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
16328                     lapack_int* ifail, lapack_int *info );
16329 void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
16330                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
16331                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
16332                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16333                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
16334                     lapack_int* ifail, lapack_int *info );
16335 void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
16336                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
16337                     lapack_complex_float* q, lapack_int* ldq, float* vl,
16338                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16339                     lapack_int* m, float* w, lapack_complex_float* z,
16340                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
16341                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16342 void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
16343                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
16344                     lapack_complex_double* q, lapack_int* ldq, double* vl,
16345                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16346                     lapack_int* m, double* w, lapack_complex_double* z,
16347                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
16348                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16349 void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
16350                    lapack_int* ldz, float* work, lapack_int *info );
16351 void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
16352                    lapack_int* ldz, double* work, lapack_int *info );
16353 void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
16354                     lapack_int* ldz, float* work, lapack_int* lwork,
16355                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16356 void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
16357                     lapack_int* ldz, double* work, lapack_int* lwork,
16358                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16359 void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
16360                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16361                     float* abstol, lapack_int* m, float* w, float* z,
16362                     lapack_int* ldz, float* work, lapack_int* iwork,
16363                     lapack_int* ifail, lapack_int *info );
16364 void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
16365                     double* e, double* vl, double* vu, lapack_int* il,
16366                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16367                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
16368                     lapack_int* ifail, lapack_int *info );
16369 void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16370                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16371                     float* abstol, lapack_int* m, float* w, float* z,
16372                     lapack_int* ldz, lapack_int* isuppz, float* work,
16373                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16374                     lapack_int *info );
16375 void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
16376                     double* e, double* vl, double* vu, lapack_int* il,
16377                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16378                     double* z, lapack_int* ldz, lapack_int* isuppz,
16379                     double* work, lapack_int* lwork, lapack_int* iwork,
16380                     lapack_int* liwork, lapack_int *info );
16381 void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
16382                    lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
16383                    float* wr, float* wi, float* vs, lapack_int* ldvs,
16384                    float* work, lapack_int* lwork, lapack_logical* bwork,
16385                    lapack_int *info );
16386 void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
16387                    lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
16388                    double* wr, double* wi, double* vs, lapack_int* ldvs,
16389                    double* work, lapack_int* lwork, lapack_logical* bwork,
16390                    lapack_int *info );
16391 void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
16392                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
16393                    lapack_int* sdim, lapack_complex_float* w,
16394                    lapack_complex_float* vs, lapack_int* ldvs,
16395                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16396                    lapack_logical* bwork, lapack_int *info );
16397 void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
16398                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
16399                    lapack_int* sdim, lapack_complex_double* w,
16400                    lapack_complex_double* vs, lapack_int* ldvs,
16401                    lapack_complex_double* work, lapack_int* lwork,
16402                    double* rwork, lapack_logical* bwork, lapack_int *info );
16403 void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
16404                     char* sense, lapack_int* n, float* a, lapack_int* lda,
16405                     lapack_int* sdim, float* wr, float* wi, float* vs,
16406                     lapack_int* ldvs, float* rconde, float* rcondv, float* work,
16407                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16408                     lapack_logical* bwork, lapack_int *info );
16409 void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
16410                     char* sense, lapack_int* n, double* a, lapack_int* lda,
16411                     lapack_int* sdim, double* wr, double* wi, double* vs,
16412                     lapack_int* ldvs, double* rconde, double* rcondv,
16413                     double* work, lapack_int* lwork, lapack_int* iwork,
16414                     lapack_int* liwork, lapack_logical* bwork,
16415                     lapack_int *info );
16416 void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
16417                     char* sense, lapack_int* n, lapack_complex_float* a,
16418                     lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
16419                     lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
16420                     float* rcondv, lapack_complex_float* work,
16421                     lapack_int* lwork, float* rwork, lapack_logical* bwork,
16422                     lapack_int *info );
16423 void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
16424                     char* sense, lapack_int* n, lapack_complex_double* a,
16425                     lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
16426                     lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
16427                     double* rcondv, lapack_complex_double* work,
16428                     lapack_int* lwork, double* rwork, lapack_logical* bwork,
16429                     lapack_int *info );
16430 void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
16431                    lapack_int* lda, float* wr, float* wi, float* vl,
16432                    lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
16433                    lapack_int* lwork, lapack_int *info );
16434 void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
16435                    lapack_int* lda, double* wr, double* wi, double* vl,
16436                    lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
16437                    lapack_int* lwork, lapack_int *info );
16438 void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
16439                    lapack_complex_float* a, lapack_int* lda,
16440                    lapack_complex_float* w, lapack_complex_float* vl,
16441                    lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
16442                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16443                    lapack_int *info );
16444 void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
16445                    lapack_complex_double* a, lapack_int* lda,
16446                    lapack_complex_double* w, lapack_complex_double* vl,
16447                    lapack_int* ldvl, lapack_complex_double* vr,
16448                    lapack_int* ldvr, lapack_complex_double* work,
16449                    lapack_int* lwork, double* rwork, lapack_int *info );
16450 void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
16451                     lapack_int* n, float* a, lapack_int* lda, float* wr,
16452                     float* wi, float* vl, lapack_int* ldvl, float* vr,
16453                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
16454                     float* scale, float* abnrm, float* rconde, float* rcondv,
16455                     float* work, lapack_int* lwork, lapack_int* iwork,
16456                     lapack_int *info );
16457 void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
16458                     lapack_int* n, double* a, lapack_int* lda, double* wr,
16459                     double* wi, double* vl, lapack_int* ldvl, double* vr,
16460                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
16461                     double* scale, double* abnrm, double* rconde,
16462                     double* rcondv, double* work, lapack_int* lwork,
16463                     lapack_int* iwork, lapack_int *info );
16464 void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
16465                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
16466                     lapack_complex_float* w, lapack_complex_float* vl,
16467                     lapack_int* ldvl, lapack_complex_float* vr,
16468                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
16469                     float* scale, float* abnrm, float* rconde, float* rcondv,
16470                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16471                     lapack_int *info );
16472 void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
16473                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
16474                     lapack_complex_double* w, lapack_complex_double* vl,
16475                     lapack_int* ldvl, lapack_complex_double* vr,
16476                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
16477                     double* scale, double* abnrm, double* rconde,
16478                     double* rcondv, lapack_complex_double* work,
16479                     lapack_int* lwork, double* rwork, lapack_int *info );
16480 void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
16481                     float* a, lapack_int* lda, float* s, float* u,
16482                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
16483                     lapack_int* lwork, lapack_int *info );
16484 void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
16485                     double* a, lapack_int* lda, double* s, double* u,
16486                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
16487                     lapack_int* lwork, lapack_int *info );
16488 void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
16489                     lapack_complex_float* a, lapack_int* lda, float* s,
16490                     lapack_complex_float* u, lapack_int* ldu,
16491                     lapack_complex_float* vt, lapack_int* ldvt,
16492                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16493                     lapack_int *info );
16494 void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
16495                     lapack_complex_double* a, lapack_int* lda, double* s,
16496                     lapack_complex_double* u, lapack_int* ldu,
16497                     lapack_complex_double* vt, lapack_int* ldvt,
16498                     lapack_complex_double* work, lapack_int* lwork,
16499                     double* rwork, lapack_int *info );
16500 void LAPACK_sgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
16501                     float* a, lapack_int* lda, float* vl, float* vu,
16502                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s, float* u,
16503                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
16504                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
16505 void LAPACK_dgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
16506                     double* a, lapack_int* lda, double* vl, double* vu,
16507                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s, double* u,
16508                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
16509                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
16510 void LAPACK_cgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
16511                     lapack_complex_float* a, lapack_int* lda, float* vl, float* vu,
16512                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s,
16513                     lapack_complex_float* u, lapack_int* ldu,
16514                     lapack_complex_float* vt, lapack_int* ldvt,
16515                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16516                     lapack_int *iwork, lapack_int *info );
16517 void LAPACK_zgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
16518                     lapack_complex_double* a, lapack_int* lda, double* vl, double* vu,
16519                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s,
16520                     lapack_complex_double* u, lapack_int* ldu,
16521                     lapack_complex_double* vt, lapack_int* ldvt,
16522                     lapack_complex_double* work, lapack_int* lwork,
16523                     double* rwork, lapack_int *iwork, lapack_int *info );
16524 void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
16525                     lapack_int* lda, float* s, float* u, lapack_int* ldu,
16526                     float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
16527                     lapack_int* iwork, lapack_int *info );
16528 void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
16529                     lapack_int* lda, double* s, double* u, lapack_int* ldu,
16530                     double* vt, lapack_int* ldvt, double* work,
16531                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16532 void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
16533                     lapack_complex_float* a, lapack_int* lda, float* s,
16534                     lapack_complex_float* u, lapack_int* ldu,
16535                     lapack_complex_float* vt, lapack_int* ldvt,
16536                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16537                     lapack_int* iwork, lapack_int *info );
16538 void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
16539                     lapack_complex_double* a, lapack_int* lda, double* s,
16540                     lapack_complex_double* u, lapack_int* ldu,
16541                     lapack_complex_double* vt, lapack_int* ldvt,
16542                     lapack_complex_double* work, lapack_int* lwork,
16543                     double* rwork, lapack_int* iwork, lapack_int *info );
16544 void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
16545                     char* jobp, lapack_int* m, lapack_int* n, double* a,
16546                     lapack_int* lda, double* sva, double* u, lapack_int* ldu,
16547                     double* v, lapack_int* ldv, double* work, lapack_int* lwork,
16548                     lapack_int* iwork, lapack_int *info );
16549 void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
16550                     char* jobp, lapack_int* m, lapack_int* n, float* a,
16551                     lapack_int* lda, float* sva, float* u, lapack_int* ldu,
16552                     float* v, lapack_int* ldv, float* work, lapack_int* lwork,
16553                     lapack_int* iwork, lapack_int *info );
16554 void LAPACK_cgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
16555                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_float* a,
16556                     lapack_int* lda, float* sva, lapack_complex_float* u, lapack_int* ldu,
16557                     lapack_complex_float* v, lapack_int* ldv, lapack_complex_float* cwork,
16558                     lapack_int* lwork, float* work, lapack_int* lrwork,
16559                     lapack_int* iwork, lapack_int *info );
16560 void LAPACK_zgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
16561                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_double* a,
16562                     lapack_int* lda, double* sva, lapack_complex_double* u, lapack_int* ldu,
16563                     lapack_complex_double* v, lapack_int* ldv, lapack_complex_double* cwork,
16564                     lapack_int* lwork, double* work, lapack_int* lrwork,
16565                     lapack_int* iwork, lapack_int *info );
16566 void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
16567                     lapack_int* n, double* a, lapack_int* lda, double* sva,
16568                     lapack_int* mv, double* v, lapack_int* ldv, double* work,
16569                     lapack_int* lwork, lapack_int *info );
16570 void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
16571                     lapack_int* n, float* a, lapack_int* lda, float* sva,
16572                     lapack_int* mv, float* v, lapack_int* ldv, float* work,
16573                     lapack_int* lwork, lapack_int *info );
16574 void LAPACK_cgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
16575                     lapack_int* n, lapack_complex_float* a, lapack_int* lda, float* sva,
16576                     lapack_int* mv, lapack_complex_float* v, lapack_int* ldv,
16577                     lapack_complex_float* cwork, lapack_int* lwork, float* rwork,
16578                     lapack_int* lrwork, lapack_int *info );
16579 void LAPACK_zgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
16580                     lapack_int* n, lapack_complex_double* a, lapack_int* lda, double* sva,
16581                     lapack_int* mv, lapack_complex_double* v, lapack_int* ldv,
16582                     lapack_complex_double* cwork, lapack_int* lwork, double* rwork,
16583                     lapack_int* lrwork, lapack_int *info );
16584 void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
16585                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16586                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16587                     float* alpha, float* beta, float* u, lapack_int* ldu,
16588                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16589                     float* work, lapack_int* iwork, lapack_int *info );
16590 void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
16591                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16592                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16593                     double* alpha, double* beta, double* u, lapack_int* ldu,
16594                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16595                     double* work, lapack_int* iwork, lapack_int *info );
16596 void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
16597                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16598                     lapack_complex_float* a, lapack_int* lda,
16599                     lapack_complex_float* b, lapack_int* ldb, float* alpha,
16600                     float* beta, lapack_complex_float* u, lapack_int* ldu,
16601                     lapack_complex_float* v, lapack_int* ldv,
16602                     lapack_complex_float* q, lapack_int* ldq,
16603                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
16604                     lapack_int *info );
16605 void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
16606                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16607                     lapack_complex_double* a, lapack_int* lda,
16608                     lapack_complex_double* b, lapack_int* ldb, double* alpha,
16609                     double* beta, lapack_complex_double* u, lapack_int* ldu,
16610                     lapack_complex_double* v, lapack_int* ldv,
16611                     lapack_complex_double* q, lapack_int* ldq,
16612                     lapack_complex_double* work, double* rwork,
16613                     lapack_int* iwork, lapack_int *info );
16614 void LAPACK_sggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16615                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16616                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
16617                      float* alpha, float* beta, float* u, lapack_int* ldu,
16618                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16619                      float* work, lapack_int* lwork, lapack_int* iwork,
16620                      lapack_int *info );
16621 void LAPACK_dggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16622                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16623                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
16624                      double* alpha, double* beta, double* u, lapack_int* ldu,
16625                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16626                      double* work, lapack_int* lwork, lapack_int* iwork,
16627                      lapack_int *info );
16628 void LAPACK_cggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16629                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16630                      lapack_complex_float* a, lapack_int* lda,
16631                      lapack_complex_float* b, lapack_int* ldb, float* alpha,
16632                      float* beta, lapack_complex_float* u, lapack_int* ldu,
16633                      lapack_complex_float* v, lapack_int* ldv,
16634                      lapack_complex_float* q, lapack_int* ldq,
16635                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
16636                      lapack_int* iwork, lapack_int *info );
16637 void LAPACK_zggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16638                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
16639                      lapack_complex_double* a, lapack_int* lda,
16640                      lapack_complex_double* b, lapack_int* ldb, double* alpha,
16641                      double* beta, lapack_complex_double* u, lapack_int* ldu,
16642                      lapack_complex_double* v, lapack_int* ldv,
16643                      lapack_complex_double* q, lapack_int* ldq,
16644                      lapack_complex_double* work, lapack_int* lwork,
16645                      double* rwork, lapack_int* iwork, lapack_int *info );
16646 void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16647                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
16648                    float* w, float* work, lapack_int* lwork, lapack_int *info );
16649 void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16650                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
16651                    double* w, double* work, lapack_int* lwork,
16652                    lapack_int *info );
16653 void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16654                    lapack_complex_float* a, lapack_int* lda,
16655                    lapack_complex_float* b, lapack_int* ldb, float* w,
16656                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16657                    lapack_int *info );
16658 void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16659                    lapack_complex_double* a, lapack_int* lda,
16660                    lapack_complex_double* b, lapack_int* ldb, double* w,
16661                    lapack_complex_double* work, lapack_int* lwork,
16662                    double* rwork, lapack_int *info );
16663 void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16664                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16665                     float* w, float* work, lapack_int* lwork, lapack_int* iwork,
16666                     lapack_int* liwork, lapack_int *info );
16667 void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16668                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16669                     double* w, double* work, lapack_int* lwork,
16670                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16671 void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16672                     lapack_complex_float* a, lapack_int* lda,
16673                     lapack_complex_float* b, lapack_int* ldb, float* w,
16674                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16675                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16676                     lapack_int *info );
16677 void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16678                     lapack_complex_double* a, lapack_int* lda,
16679                     lapack_complex_double* b, lapack_int* ldb, double* w,
16680                     lapack_complex_double* work, lapack_int* lwork,
16681                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16682                     lapack_int* liwork, lapack_int *info );
16683 void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16684                     lapack_int* n, float* a, lapack_int* lda, float* b,
16685                     lapack_int* ldb, float* vl, float* vu, lapack_int* il,
16686                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
16687                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
16688                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16689 void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16690                     lapack_int* n, double* a, lapack_int* lda, double* b,
16691                     lapack_int* ldb, double* vl, double* vu, lapack_int* il,
16692                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16693                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
16694                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16695 void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16696                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
16697                     lapack_complex_float* b, lapack_int* ldb, float* vl,
16698                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16699                     lapack_int* m, float* w, lapack_complex_float* z,
16700                     lapack_int* ldz, lapack_complex_float* work,
16701                     lapack_int* lwork, float* rwork, lapack_int* iwork,
16702                     lapack_int* ifail, lapack_int *info );
16703 void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16704                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
16705                     lapack_complex_double* b, lapack_int* ldb, double* vl,
16706                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16707                     lapack_int* m, double* w, lapack_complex_double* z,
16708                     lapack_int* ldz, lapack_complex_double* work,
16709                     lapack_int* lwork, double* rwork, lapack_int* iwork,
16710                     lapack_int* ifail, lapack_int *info );
16711 void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16712                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
16713                    float* work, lapack_int *info );
16714 void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16715                    double* ap, double* bp, double* w, double* z,
16716                    lapack_int* ldz, double* work, lapack_int *info );
16717 void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16718                    lapack_complex_float* ap, lapack_complex_float* bp, float* w,
16719                    lapack_complex_float* z, lapack_int* ldz,
16720                    lapack_complex_float* work, float* rwork, lapack_int *info );
16721 void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16722                    lapack_complex_double* ap, lapack_complex_double* bp,
16723                    double* w, lapack_complex_double* z, lapack_int* ldz,
16724                    lapack_complex_double* work, double* rwork,
16725                    lapack_int *info );
16726 void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16727                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
16728                     float* work, lapack_int* lwork, lapack_int* iwork,
16729                     lapack_int* liwork, lapack_int *info );
16730 void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16731                     double* ap, double* bp, double* w, double* z,
16732                     lapack_int* ldz, double* work, lapack_int* lwork,
16733                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16734 void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16735                     lapack_complex_float* ap, lapack_complex_float* bp,
16736                     float* w, lapack_complex_float* z, lapack_int* ldz,
16737                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16738                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16739                     lapack_int *info );
16740 void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
16741                     lapack_complex_double* ap, lapack_complex_double* bp,
16742                     double* w, lapack_complex_double* z, lapack_int* ldz,
16743                     lapack_complex_double* work, lapack_int* lwork,
16744                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16745                     lapack_int* liwork, lapack_int *info );
16746 void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16747                     lapack_int* n, float* ap, float* bp, float* vl, float* vu,
16748                     lapack_int* il, lapack_int* iu, float* abstol,
16749                     lapack_int* m, float* w, float* z, lapack_int* ldz,
16750                     float* work, lapack_int* iwork, lapack_int* ifail,
16751                     lapack_int *info );
16752 void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16753                     lapack_int* n, double* ap, double* bp, double* vl,
16754                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16755                     lapack_int* m, double* w, double* z, lapack_int* ldz,
16756                     double* work, lapack_int* iwork, lapack_int* ifail,
16757                     lapack_int *info );
16758 void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16759                     lapack_int* n, lapack_complex_float* ap,
16760                     lapack_complex_float* bp, float* vl, float* vu,
16761                     lapack_int* il, lapack_int* iu, float* abstol,
16762                     lapack_int* m, float* w, lapack_complex_float* z,
16763                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
16764                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16765 void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
16766                     lapack_int* n, lapack_complex_double* ap,
16767                     lapack_complex_double* bp, double* vl, double* vu,
16768                     lapack_int* il, lapack_int* iu, double* abstol,
16769                     lapack_int* m, double* w, lapack_complex_double* z,
16770                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
16771                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16772 void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16773                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
16774                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
16775                    float* work, lapack_int *info );
16776 void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16777                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
16778                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
16779                    double* work, lapack_int *info );
16780 void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16781                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
16782                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
16783                    lapack_complex_float* z, lapack_int* ldz,
16784                    lapack_complex_float* work, float* rwork, lapack_int *info );
16785 void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16786                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
16787                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
16788                    lapack_complex_double* z, lapack_int* ldz,
16789                    lapack_complex_double* work, double* rwork,
16790                    lapack_int *info );
16791 void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16792                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
16793                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
16794                     float* work, lapack_int* lwork, lapack_int* iwork,
16795                     lapack_int* liwork, lapack_int *info );
16796 void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16797                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
16798                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
16799                     double* work, lapack_int* lwork, lapack_int* iwork,
16800                     lapack_int* liwork, lapack_int *info );
16801 void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16802                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
16803                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
16804                     lapack_complex_float* z, lapack_int* ldz,
16805                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16806                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16807                     lapack_int *info );
16808 void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
16809                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
16810                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
16811                     lapack_complex_double* z, lapack_int* ldz,
16812                     lapack_complex_double* work, lapack_int* lwork,
16813                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16814                     lapack_int* liwork, lapack_int *info );
16815 void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
16816                     lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
16817                     float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
16818                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16819                     float* abstol, lapack_int* m, float* w, float* z,
16820                     lapack_int* ldz, float* work, lapack_int* iwork,
16821                     lapack_int* ifail, lapack_int *info );
16822 void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
16823                     lapack_int* ka, lapack_int* kb, double* ab,
16824                     lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
16825                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
16826                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16827                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
16828                     lapack_int* ifail, lapack_int *info );
16829 void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
16830                     lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
16831                     lapack_int* ldab, lapack_complex_float* bb,
16832                     lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
16833                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16834                     float* abstol, lapack_int* m, float* w,
16835                     lapack_complex_float* z, lapack_int* ldz,
16836                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
16837                     lapack_int* ifail, lapack_int *info );
16838 void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
16839                     lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
16840                     lapack_int* ldab, lapack_complex_double* bb,
16841                     lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
16842                     double* vl, double* vu, lapack_int* il, lapack_int* iu,
16843                     double* abstol, lapack_int* m, double* w,
16844                     lapack_complex_double* z, lapack_int* ldz,
16845                     lapack_complex_double* work, double* rwork,
16846                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
16847 void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
16848                    LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
16849                    lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
16850                    float* alphar, float* alphai, float* beta, float* vsl,
16851                    lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
16852                    float* work, lapack_int* lwork, lapack_logical* bwork,
16853                    lapack_int *info );
16854 void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
16855                    LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
16856                    lapack_int* lda, double* b, lapack_int* ldb,
16857                    lapack_int* sdim, double* alphar, double* alphai,
16858                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
16859                    lapack_int* ldvsr, double* work, lapack_int* lwork,
16860                    lapack_logical* bwork, lapack_int *info );
16861 void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
16862                    LAPACK_C_SELECT2 selctg, lapack_int* n,
16863                    lapack_complex_float* a, lapack_int* lda,
16864                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
16865                    lapack_complex_float* alpha, lapack_complex_float* beta,
16866                    lapack_complex_float* vsl, lapack_int* ldvsl,
16867                    lapack_complex_float* vsr, lapack_int* ldvsr,
16868                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16869                    lapack_logical* bwork, lapack_int *info );
16870 void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
16871                    LAPACK_Z_SELECT2 selctg, lapack_int* n,
16872                    lapack_complex_double* a, lapack_int* lda,
16873                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
16874                    lapack_complex_double* alpha, lapack_complex_double* beta,
16875                    lapack_complex_double* vsl, lapack_int* ldvsl,
16876                    lapack_complex_double* vsr, lapack_int* ldvsr,
16877                    lapack_complex_double* work, lapack_int* lwork,
16878                    double* rwork, lapack_logical* bwork, lapack_int *info );
16879 void LAPACK_sgges3( char* jobvsl, char* jobvsr, char* sort,
16880                     LAPACK_S_SELECT3 selctg, lapack_int* n,
16881                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16882                     lapack_int* sdim, float* alphar, float* alphai,
16883                     float* beta, float* vsl, lapack_int* ldvsl,
16884                     float* vsr, lapack_int* ldvsr,
16885                     float* work, lapack_int* lwork, lapack_logical* bwork,
16886                     lapack_int *info );
16887 void LAPACK_dgges3( char* jobvsl, char* jobvsr, char* sort,
16888                     LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
16889                     lapack_int* lda, double* b, lapack_int* ldb,
16890                     lapack_int* sdim, double* alphar, double* alphai,
16891                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
16892                     lapack_int* ldvsr, double* work, lapack_int* lwork,
16893                     lapack_logical* bwork, lapack_int *info );
16894 void LAPACK_cgges3( char* jobvsl, char* jobvsr, char* sort,
16895                     LAPACK_C_SELECT2 selctg, lapack_int* n,
16896                     lapack_complex_float* a, lapack_int* lda,
16897                     lapack_complex_float* b, lapack_int* ldb,
16898                     lapack_int* sdim,
16899                     lapack_complex_float* alpha, lapack_complex_float* beta,
16900                     lapack_complex_float* vsl, lapack_int* ldvsl,
16901                     lapack_complex_float* vsr, lapack_int* ldvsr,
16902                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16903                     lapack_logical* bwork, lapack_int *info );
16904 void LAPACK_zgges3( char* jobvsl, char* jobvsr, char* sort,
16905                     LAPACK_Z_SELECT2 selctg, lapack_int* n,
16906                     lapack_complex_double* a, lapack_int* lda,
16907                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
16908                     lapack_complex_double* alpha, lapack_complex_double* beta,
16909                     lapack_complex_double* vsl, lapack_int* ldvsl,
16910                     lapack_complex_double* vsr, lapack_int* ldvsr,
16911                     lapack_complex_double* work, lapack_int* lwork,
16912                     double* rwork, lapack_logical* bwork, lapack_int *info );
16913 void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
16914                     LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
16915                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16916                     lapack_int* sdim, float* alphar, float* alphai, float* beta,
16917                     float* vsl, lapack_int* ldvsl, float* vsr,
16918                     lapack_int* ldvsr, float* rconde, float* rcondv,
16919                     float* work, lapack_int* lwork, lapack_int* iwork,
16920                     lapack_int* liwork, lapack_logical* bwork,
16921                     lapack_int *info );
16922 void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
16923                     LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
16924                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16925                     lapack_int* sdim, double* alphar, double* alphai,
16926                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
16927                     lapack_int* ldvsr, double* rconde, double* rcondv,
16928                     double* work, lapack_int* lwork, lapack_int* iwork,
16929                     lapack_int* liwork, lapack_logical* bwork,
16930                     lapack_int *info );
16931 void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
16932                     LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
16933                     lapack_complex_float* a, lapack_int* lda,
16934                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
16935                     lapack_complex_float* alpha, lapack_complex_float* beta,
16936                     lapack_complex_float* vsl, lapack_int* ldvsl,
16937                     lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
16938                     float* rcondv, lapack_complex_float* work,
16939                     lapack_int* lwork, float* rwork, lapack_int* iwork,
16940                     lapack_int* liwork, lapack_logical* bwork,
16941                     lapack_int *info );
16942 void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
16943                     LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
16944                     lapack_complex_double* a, lapack_int* lda,
16945                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
16946                     lapack_complex_double* alpha, lapack_complex_double* beta,
16947                     lapack_complex_double* vsl, lapack_int* ldvsl,
16948                     lapack_complex_double* vsr, lapack_int* ldvsr,
16949                     double* rconde, double* rcondv, lapack_complex_double* work,
16950                     lapack_int* lwork, double* rwork, lapack_int* iwork,
16951                     lapack_int* liwork, lapack_logical* bwork,
16952                     lapack_int *info );
16953 void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
16954                    lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
16955                    float* alphai, float* beta, float* vl, lapack_int* ldvl,
16956                    float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
16957                    lapack_int *info );
16958 void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
16959                    lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
16960                    double* alphai, double* beta, double* vl, lapack_int* ldvl,
16961                    double* vr, lapack_int* ldvr, double* work,
16962                    lapack_int* lwork, lapack_int *info );
16963 void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
16964                    lapack_complex_float* a, lapack_int* lda,
16965                    lapack_complex_float* b, lapack_int* ldb,
16966                    lapack_complex_float* alpha, lapack_complex_float* beta,
16967                    lapack_complex_float* vl, lapack_int* ldvl,
16968                    lapack_complex_float* vr, lapack_int* ldvr,
16969                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
16970                    lapack_int *info );
16971 void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
16972                    lapack_complex_double* a, lapack_int* lda,
16973                    lapack_complex_double* b, lapack_int* ldb,
16974                    lapack_complex_double* alpha, lapack_complex_double* beta,
16975                    lapack_complex_double* vl, lapack_int* ldvl,
16976                    lapack_complex_double* vr, lapack_int* ldvr,
16977                    lapack_complex_double* work, lapack_int* lwork,
16978                    double* rwork, lapack_int *info );
16979 void LAPACK_sggev3( char* jobvl, char* jobvr, lapack_int* n, float* a,
16980                     lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
16981                     float* alphai, float* beta, float* vl, lapack_int* ldvl,
16982                     float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
16983                     lapack_int *info );
16984 void LAPACK_dggev3( char* jobvl, char* jobvr, lapack_int* n, double* a,
16985                     lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
16986                     double* alphai, double* beta, double* vl, lapack_int* ldvl,
16987                     double* vr, lapack_int* ldvr, double* work,
16988                     lapack_int* lwork, lapack_int *info );
16989 void LAPACK_cggev3( char* jobvl, char* jobvr, lapack_int* n,
16990                     lapack_complex_float* a, lapack_int* lda,
16991                     lapack_complex_float* b, lapack_int* ldb,
16992                     lapack_complex_float* alpha, lapack_complex_float* beta,
16993                     lapack_complex_float* vl, lapack_int* ldvl,
16994                     lapack_complex_float* vr, lapack_int* ldvr,
16995                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16996                     lapack_int *info );
16997 void LAPACK_zggev3( char* jobvl, char* jobvr, lapack_int* n,
16998                     lapack_complex_double* a, lapack_int* lda,
16999                     lapack_complex_double* b, lapack_int* ldb,
17000                     lapack_complex_double* alpha, lapack_complex_double* beta,
17001                     lapack_complex_double* vl, lapack_int* ldvl,
17002                     lapack_complex_double* vr, lapack_int* ldvr,
17003                     lapack_complex_double* work, lapack_int* lwork,
17004                     double* rwork, lapack_int *info );
17005 void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17006                     lapack_int* n, float* a, lapack_int* lda, float* b,
17007                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
17008                     float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
17009                     lapack_int* ilo, lapack_int* ihi, float* lscale,
17010                     float* rscale, float* abnrm, float* bbnrm, float* rconde,
17011                     float* rcondv, float* work, lapack_int* lwork,
17012                     lapack_int* iwork, lapack_logical* bwork,
17013                     lapack_int *info );
17014 void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17015                     lapack_int* n, double* a, lapack_int* lda, double* b,
17016                     lapack_int* ldb, double* alphar, double* alphai,
17017                     double* beta, double* vl, lapack_int* ldvl, double* vr,
17018                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17019                     double* lscale, double* rscale, double* abnrm,
17020                     double* bbnrm, double* rconde, double* rcondv, double* work,
17021                     lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
17022                     lapack_int *info );
17023 void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17024                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17025                     lapack_complex_float* b, lapack_int* ldb,
17026                     lapack_complex_float* alpha, lapack_complex_float* beta,
17027                     lapack_complex_float* vl, lapack_int* ldvl,
17028                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
17029                     lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
17030                     float* bbnrm, float* rconde, float* rcondv,
17031                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17032                     lapack_int* iwork, lapack_logical* bwork,
17033                     lapack_int *info );
17034 void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17035                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17036                     lapack_complex_double* b, lapack_int* ldb,
17037                     lapack_complex_double* alpha, lapack_complex_double* beta,
17038                     lapack_complex_double* vl, lapack_int* ldvl,
17039                     lapack_complex_double* vr, lapack_int* ldvr,
17040                     lapack_int* ilo, lapack_int* ihi, double* lscale,
17041                     double* rscale, double* abnrm, double* bbnrm,
17042                     double* rconde, double* rcondv, lapack_complex_double* work,
17043                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17044                     lapack_logical* bwork, lapack_int *info );
17045 void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17046                    lapack_int* k, double* alpha, const double* a,
17047                    lapack_int* lda, double* beta, double* c );
17048 void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17049                    lapack_int* k, float* alpha, const float* a, lapack_int* lda,
17050                    float* beta, float* c );
17051 void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17052                    lapack_int* k, double* alpha, const lapack_complex_double* a,
17053                    lapack_int* lda, double* beta, lapack_complex_double* c );
17054 void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17055                    lapack_int* k, float* alpha, const lapack_complex_float* a,
17056                    lapack_int* lda, float* beta, lapack_complex_float* c );
17057 void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
17058                    char* diag, lapack_int* m, lapack_int* n, double* alpha,
17059                    const double* a, double* b, lapack_int* ldb );
17060 void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
17061                    char* diag, lapack_int* m, lapack_int* n, float* alpha,
17062                    const float* a, float* b, lapack_int* ldb );
17063 void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
17064                    char* diag, lapack_int* m, lapack_int* n,
17065                    lapack_complex_double* alpha, const lapack_complex_double* a,
17066                    lapack_complex_double* b, lapack_int* ldb );
17067 void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
17068                    char* diag, lapack_int* m, lapack_int* n,
17069                    lapack_complex_float* alpha, const lapack_complex_float* a,
17070                    lapack_complex_float* b, lapack_int* ldb );
17071 void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
17072                     double* ap, lapack_int *info );
17073 void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
17074                     float* ap, lapack_int *info );
17075 void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
17076                     const lapack_complex_double* arf, lapack_complex_double* ap,
17077                     lapack_int *info );
17078 void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
17079                     const lapack_complex_float* arf, lapack_complex_float* ap,
17080                     lapack_int *info );
17081 void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
17082                     double* a, lapack_int* lda, lapack_int *info );
17083 void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
17084                     float* a, lapack_int* lda, lapack_int *info );
17085 void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
17086                     const lapack_complex_double* arf, lapack_complex_double* a,
17087                     lapack_int* lda, lapack_int *info );
17088 void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
17089                     const lapack_complex_float* arf, lapack_complex_float* a,
17090                     lapack_int* lda, lapack_int *info );
17091 void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
17092                     double* arf, lapack_int *info );
17093 void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
17094                     float* arf, lapack_int *info );
17095 void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
17096                     const lapack_complex_double* ap, lapack_complex_double* arf,
17097                     lapack_int *info );
17098 void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
17099                     const lapack_complex_float* ap, lapack_complex_float* arf,
17100                     lapack_int *info );
17101 void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
17102                     lapack_int* lda, lapack_int *info );
17103 void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
17104                     lapack_int* lda, lapack_int *info );
17105 void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
17106                     lapack_complex_double* a, lapack_int* lda,
17107                     lapack_int *info );
17108 void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
17109                     lapack_complex_float* a, lapack_int* lda,
17110                     lapack_int *info );
17111 void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
17112                     lapack_int* lda, double* arf, lapack_int *info );
17113 void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
17114                     lapack_int* lda, float* arf, lapack_int *info );
17115 void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
17116                     const lapack_complex_double* a, lapack_int* lda,
17117                     lapack_complex_double* arf, lapack_int *info );
17118 void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
17119                     const lapack_complex_float* a, lapack_int* lda,
17120                     lapack_complex_float* arf, lapack_int *info );
17121 void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
17122                     double* ap, lapack_int *info );
17123 void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
17124                     float* ap, lapack_int *info );
17125 void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
17126                     lapack_int* lda, lapack_complex_double* ap,
17127                     lapack_int *info );
17128 void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
17129                     lapack_int* lda, lapack_complex_float* ap,
17130                     lapack_int *info );
17131 void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17132                      float* tau, float* work, lapack_int* lwork,
17133                      lapack_int *info );
17134 void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17135                      double* tau, double* work, lapack_int* lwork,
17136                      lapack_int *info );
17137 void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17138                      lapack_int* lda, lapack_complex_float* tau,
17139                      lapack_complex_float* work, lapack_int* lwork,
17140                      lapack_int *info );
17141 void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17142                      lapack_int* lda, lapack_complex_double* tau,
17143                      lapack_complex_double* work, lapack_int* lwork,
17144                      lapack_int *info );
17145 void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
17146 void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
17147 void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
17148                     float* x );
17149 void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
17150                     double* x );
17151 void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
17152                     lapack_complex_float* x );
17153 void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
17154                     lapack_complex_double* x );
17155 void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17156                     float* tau, float* work, lapack_int *info );
17157 void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17158                     double* tau, double* work, lapack_int *info );
17159 void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17160                     lapack_int* lda, lapack_complex_float* tau,
17161                     lapack_complex_float* work, lapack_int *info );
17162 void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17163                     lapack_int* lda, lapack_complex_double* tau,
17164                     lapack_complex_double* work, lapack_int *info );
17165 void LAPACK_slacn2( lapack_int* n, float* v, float* x, lapack_int* isgn,
17166                     float* est, lapack_int* kase, lapack_int* isave );
17167 void LAPACK_dlacn2( lapack_int* n, double* v, double* x, lapack_int* isgn,
17168                     double* est, lapack_int* kase, lapack_int* isave );
17169 void LAPACK_clacn2( lapack_int* n, lapack_complex_float* v,
17170                     lapack_complex_float* x, float* est,
17171                     lapack_int* kase, lapack_int* isave );
17172 void LAPACK_zlacn2( lapack_int* n, lapack_complex_double* v,
17173                     lapack_complex_double* x, double* est,
17174                     lapack_int* kase, lapack_int* isave );
17175 void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
17176                     lapack_int* lda, float* b, lapack_int* ldb );
17177 void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
17178                     lapack_int* lda, double* b, lapack_int* ldb );
17179 void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
17180                     const lapack_complex_float* a, lapack_int* lda,
17181                     lapack_complex_float* b, lapack_int* ldb );
17182 void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
17183                     const lapack_complex_double* a, lapack_int* lda,
17184                     lapack_complex_double* b, lapack_int* ldb );
17185
17186 void LAPACK_clacp2( char* uplo, lapack_int* m, lapack_int* n, const float* a,
17187                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb );
17188 void LAPACK_zlacp2( char* uplo, lapack_int* m, lapack_int* n, const double* a,
17189                     lapack_int* lda, lapack_complex_double* b,
17190                     lapack_int* ldb );
17191
17192 void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17193                     lapack_int* ipiv, lapack_int *info );
17194 void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17195                     lapack_int* ipiv, lapack_int *info );
17196 void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17197                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
17198 void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17199                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
17200 void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
17201                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
17202 void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
17203                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
17204 void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17205                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
17206                     lapack_int* incx );
17207 void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17208                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
17209                     lapack_int* incx );
17210 float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
17211                     lapack_int* lda, float* work );
17212 double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
17213                     lapack_int* lda, double* work );
17214 float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
17215                     const lapack_complex_float* a, lapack_int* lda, float* work );
17216 double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
17217                     const lapack_complex_double* a, lapack_int* lda, double* work );
17218 float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
17219                     const lapack_complex_float* a, lapack_int* lda, float* work );
17220 double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
17221                     const lapack_complex_double* a, lapack_int* lda, double* work );
17222 float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
17223                     lapack_int* lda, float* work );
17224 double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
17225                     lapack_int* lda, double* work );
17226 float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
17227                     const lapack_complex_float* a, lapack_int* lda, float* work );
17228 double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
17229                     const lapack_complex_double* a, lapack_int* lda, double* work );
17230 float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
17231                     lapack_int* n, const float* a, lapack_int* lda, float* work );
17232 double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
17233                     lapack_int* n, const double* a, lapack_int* lda, double* work );
17234 float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
17235                     lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
17236                     float* work );
17237 double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
17238                     lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
17239                     double* work );
17240 float LAPACK_slamch( char* cmach );
17241 double LAPACK_dlamch( char* cmach );
17242 void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17243                     float* tau, float* work, lapack_int *info );
17244 void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17245                     double* tau, double* work, lapack_int *info );
17246 void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17247                     lapack_int* lda, lapack_complex_float* tau,
17248                     lapack_complex_float* work, lapack_int *info );
17249 void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17250                     lapack_int* lda, lapack_complex_double* tau,
17251                     lapack_complex_double* work, lapack_int *info );
17252 void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
17253                     lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
17254                     lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
17255                     lapack_int* ldc, float* work, lapack_int* ldwork );
17256 void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
17257                     lapack_int* m, lapack_int* n, lapack_int* k,
17258                     const double* v, lapack_int* ldv, const double* t,
17259                     lapack_int* ldt, double* c, lapack_int* ldc, double* work,
17260                     lapack_int* ldwork );
17261 void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
17262                     lapack_int* m, lapack_int* n, lapack_int* k,
17263                     const lapack_complex_float* v, lapack_int* ldv,
17264                     const lapack_complex_float* t, lapack_int* ldt,
17265                     lapack_complex_float* c, lapack_int* ldc,
17266                     lapack_complex_float* work, lapack_int* ldwork );
17267 void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
17268                     lapack_int* m, lapack_int* n, lapack_int* k,
17269                     const lapack_complex_double* v, lapack_int* ldv,
17270                     const lapack_complex_double* t, lapack_int* ldt,
17271                     lapack_complex_double* c, lapack_int* ldc,
17272                     lapack_complex_double* work, lapack_int* ldwork );
17273 void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
17274                     float* tau );
17275 void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
17276                     double* tau );
17277 void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
17278                     lapack_complex_float* x, lapack_int* incx,
17279                     lapack_complex_float* tau );
17280 void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
17281                     lapack_complex_double* x, lapack_int* incx,
17282                     lapack_complex_double* tau );
17283 void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
17284                     const float* v, lapack_int* ldv, const float* tau, float* t,
17285                     lapack_int* ldt );
17286 void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
17287                     const double* v, lapack_int* ldv, const double* tau,
17288                     double* t, lapack_int* ldt );
17289 void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
17290                     const lapack_complex_float* v, lapack_int* ldv,
17291                     const lapack_complex_float* tau, lapack_complex_float* t,
17292                     lapack_int* ldt );
17293 void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
17294                     const lapack_complex_double* v, lapack_int* ldv,
17295                     const lapack_complex_double* tau, lapack_complex_double* t,
17296                     lapack_int* ldt );
17297 void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
17298                     float* tau, float* c, lapack_int* ldc, float* work );
17299 void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
17300                     double* tau, double* c, lapack_int* ldc, double* work );
17301 void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
17302                     const lapack_complex_float* v, lapack_complex_float* tau,
17303                     lapack_complex_float* c, lapack_int* ldc,
17304                     lapack_complex_float* work );
17305 void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
17306                     const lapack_complex_double* v, lapack_complex_double* tau,
17307                     lapack_complex_double* c, lapack_int* ldc,
17308                     lapack_complex_double* work );
17309 void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
17310                     char* sym, float* d, lapack_int* mode, float* cond,
17311                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
17312                     float* a, lapack_int* lda, float* work, lapack_int *info );
17313 void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
17314                     char* sym, double* d, lapack_int* mode, double* cond,
17315                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
17316                     double* a, lapack_int* lda, double* work,
17317                     lapack_int *info );
17318 void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
17319                     char* sym, float* d, lapack_int* mode, float* cond,
17320                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
17321                     lapack_complex_float* a, lapack_int* lda,
17322                     lapack_complex_float* work, lapack_int *info );
17323 void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
17324                     char* sym, double* d, lapack_int* mode, double* cond,
17325                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
17326                     lapack_complex_double* a, lapack_int* lda,
17327                     lapack_complex_double* work, lapack_int *info );
17328 void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
17329                     lapack_int* ldsa, double* a, lapack_int* lda,
17330                     lapack_int *info );
17331 void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
17332                     lapack_int* lda, float* sa, lapack_int* ldsa,
17333                     lapack_int *info );
17334 void LAPACK_clag2z( lapack_int* m, lapack_int* n,
17335                     const lapack_complex_float* sa, lapack_int* ldsa,
17336                     lapack_complex_double* a, lapack_int* lda,
17337                     lapack_int *info );
17338 void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
17339                     const lapack_complex_double* a, lapack_int* lda,
17340                     lapack_complex_float* sa, lapack_int* ldsa,
17341                     lapack_int *info );
17342 void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
17343                     lapack_int *info );
17344 void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
17345                     lapack_int *info );
17346 void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
17347                     lapack_int* lda, lapack_int *info );
17348 void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
17349                     lapack_int* lda, lapack_int *info );
17350 void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
17351                     lapack_int* ku, const float* d, float* a, lapack_int* lda,
17352                     lapack_int* iseed, float* work, lapack_int *info );
17353 void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
17354                     lapack_int* ku, const double* d, double* a, lapack_int* lda,
17355                     lapack_int* iseed, double* work, lapack_int *info );
17356 void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
17357                     lapack_int* ku, const float* d, lapack_complex_float* a,
17358                     lapack_int* lda, lapack_int* iseed,
17359                     lapack_complex_float* work, lapack_int *info );
17360 void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
17361                     lapack_int* ku, const double* d, lapack_complex_double* a,
17362                     lapack_int* lda, lapack_int* iseed,
17363                     lapack_complex_double* work, lapack_int *info );
17364 void LAPACK_slascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
17365                     float* cto, lapack_int* m, lapack_int* n, float* a,
17366                     lapack_int* lda, lapack_int *info );
17367 void LAPACK_dlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
17368                     double* cto, lapack_int* m, lapack_int* n, double* a,
17369                     lapack_int* lda, lapack_int *info );
17370 void LAPACK_clascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
17371                     float* cto, lapack_int* m, lapack_int* n, lapack_complex_float* a,
17372                     lapack_int* lda, lapack_int *info );
17373 void LAPACK_zlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
17374                     double* cto, lapack_int* m, lapack_int* n, lapack_complex_double* a,
17375                     lapack_int* lda, lapack_int *info );
17376 void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
17377                     float* beta, float* a, lapack_int* lda );
17378 void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
17379                     double* beta, double* a, lapack_int* lda );
17380 void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
17381                     lapack_complex_float* alpha, lapack_complex_float* beta,
17382                     lapack_complex_float* a, lapack_int* lda );
17383 void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
17384                     lapack_complex_double* alpha, lapack_complex_double* beta,
17385                     lapack_complex_double* a, lapack_int* lda );
17386 void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
17387 void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
17388 void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
17389                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
17390                     lapack_complex_float* work, lapack_int *info );
17391 void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
17392                     lapack_complex_double* a, lapack_int* lda,
17393                     lapack_int* iseed, lapack_complex_double* work,
17394                     lapack_int *info );
17395 void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
17396                     lapack_int* lda, lapack_int* iseed, float* work,
17397                     lapack_int *info );
17398 void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
17399                     lapack_int* lda, lapack_int* iseed, double* work,
17400                     lapack_int *info );
17401 void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
17402                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
17403                     lapack_complex_float* work, lapack_int *info );
17404 void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
17405                     lapack_complex_double* a, lapack_int* lda,
17406                     lapack_int* iseed, lapack_complex_double* work,
17407                     lapack_int *info );
17408 void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17409                     float* x, lapack_int* ldx, lapack_int* k );
17410 void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17411                     double* x, lapack_int* ldx, lapack_int* k );
17412 void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17413                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
17414 void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17415                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
17416 void LAPACK_slapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17417                     float* x, lapack_int* ldx, lapack_int* k );
17418 void LAPACK_dlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17419                     double* x, lapack_int* ldx, lapack_int* k );
17420 void LAPACK_clapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17421                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
17422 void LAPACK_zlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
17423                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
17424 float LAPACK_slapy2( float* x, float* y );
17425 double LAPACK_dlapy2( double* x, double* y );
17426 float LAPACK_slapy3( float* x, float* y, float* z );
17427 double LAPACK_dlapy3( double* x, double* y, double* z );
17428 void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
17429 void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
17430 void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
17431 void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
17432                      double* sn );
17433 // LAPACK 3.3.0
17434 void LAPACK_cbbcsd( char* jobu1, char* jobu2,
17435                     char* jobv1t, char* jobv2t, char* trans,
17436                     lapack_int* m, lapack_int* p, lapack_int* q,
17437                     float* theta, float* phi,
17438                     lapack_complex_float* u1, lapack_int* ldu1,
17439                     lapack_complex_float* u2, lapack_int* ldu2,
17440                     lapack_complex_float* v1t, lapack_int* ldv1t,
17441                     lapack_complex_float* v2t, lapack_int* ldv2t,
17442                     float* b11d, float* b11e, float* b12d,
17443                     float* b12e, float* b21d, float* b21e,
17444                     float* b22d, float* b22e, float* rwork,
17445                     lapack_int* lrwork , lapack_int *info );
17446 void LAPACK_cheswapr( char* uplo, lapack_int* n, lapack_complex_float* a,
17447                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
17448 void LAPACK_chetri2( char* uplo, lapack_int* n,
17449                      lapack_complex_float* a, lapack_int* lda,
17450                      const lapack_int* ipiv,
17451                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
17452 void LAPACK_chetri2x( char* uplo, lapack_int* n,
17453                       lapack_complex_float* a, lapack_int* lda,
17454                       const lapack_int* ipiv,
17455                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
17456 void LAPACK_chetrs2( char* uplo, lapack_int* n,
17457                      lapack_int* nrhs, const lapack_complex_float* a,
17458                      lapack_int* lda, const lapack_int* ipiv,
17459                      lapack_complex_float* b, lapack_int* ldb,
17460                      lapack_complex_float* work , lapack_int *info );
17461 void LAPACK_csyconv( char* uplo, char* way,
17462                      lapack_int* n, lapack_complex_float* a,
17463                      lapack_int* lda, const lapack_int* ipiv,
17464                      lapack_complex_float* e , lapack_int *info );
17465 void LAPACK_csyswapr( char* uplo, lapack_int* n,
17466                       lapack_complex_float* a, lapack_int* lda,
17467                       lapack_int* i1, lapack_int* i2 );
17468 void LAPACK_csytri2( char* uplo, lapack_int* n,
17469                      lapack_complex_float* a, lapack_int* lda,
17470                      const lapack_int* ipiv,
17471                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
17472 void LAPACK_csytri2x( char* uplo, lapack_int* n,
17473                       lapack_complex_float* a, lapack_int* lda,
17474                       const lapack_int* ipiv,
17475                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
17476 void LAPACK_csytrs2( char* uplo, lapack_int* n,
17477                      lapack_int* nrhs, const lapack_complex_float* a,
17478                      lapack_int* lda, const lapack_int* ipiv,
17479                      lapack_complex_float* b, lapack_int* ldb,
17480                      lapack_complex_float* work , lapack_int *info );
17481 void LAPACK_cunbdb( char* trans, char* signs,
17482                     lapack_int* m, lapack_int* p, lapack_int* q,
17483                     lapack_complex_float* x11, lapack_int* ldx11,
17484                     lapack_complex_float* x12, lapack_int* ldx12,
17485                     lapack_complex_float* x21, lapack_int* ldx21,
17486                     lapack_complex_float* x22, lapack_int* ldx22,
17487                     float* theta, float* phi,
17488                     lapack_complex_float* taup1,
17489                     lapack_complex_float* taup2,
17490                     lapack_complex_float* tauq1,
17491                     lapack_complex_float* tauq2,
17492                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
17493 void LAPACK_cuncsd( char* jobu1, char* jobu2,
17494                     char* jobv1t, char* jobv2t, char* trans,
17495                     char* signs, lapack_int* m, lapack_int* p,
17496                     lapack_int* q, lapack_complex_float* x11,
17497                     lapack_int* ldx11, lapack_complex_float* x12,
17498                     lapack_int* ldx12, lapack_complex_float* x21,
17499                     lapack_int* ldx21, lapack_complex_float* x22,
17500                     lapack_int* ldx22, float* theta,
17501                     lapack_complex_float* u1, lapack_int* ldu1,
17502                     lapack_complex_float* u2, lapack_int* ldu2,
17503                     lapack_complex_float* v1t, lapack_int* ldv1t,
17504                     lapack_complex_float* v2t, lapack_int* ldv2t,
17505                     lapack_complex_float* work, lapack_int* lwork,
17506                     float* rwork, lapack_int* lrwork,
17507                     lapack_int* iwork , lapack_int *info );
17508 void LAPACK_cuncsd2by1( char* jobu1, char* jobu2,
17509                     char* jobv1t, lapack_int* m, lapack_int* p,
17510                     lapack_int* q, lapack_complex_float* x11,
17511                     lapack_int* ldx11, lapack_complex_float* x21,
17512                     lapack_int* ldx21, float* theta,
17513                     lapack_complex_float* u1, lapack_int* ldu1,
17514                     lapack_complex_float* u2, lapack_int* ldu2,
17515                     lapack_complex_float* v1t, lapack_int* ldv1t,
17516                     lapack_complex_float* work, lapack_int* lwork,
17517                     float* rwork, lapack_int* lrwork,
17518                     lapack_int* iwork , lapack_int *info );
17519 void LAPACK_dbbcsd( char* jobu1, char* jobu2,
17520                     char* jobv1t, char* jobv2t, char* trans,
17521                     lapack_int* m, lapack_int* p, lapack_int* q,
17522                     double* theta, double* phi, double* u1,
17523                     lapack_int* ldu1, double* u2, lapack_int* ldu2,
17524                     double* v1t, lapack_int* ldv1t, double* v2t,
17525                     lapack_int* ldv2t, double* b11d, double* b11e,
17526                     double* b12d, double* b12e, double* b21d,
17527                     double* b21e, double* b22d, double* b22e,
17528                     double* work, lapack_int* lwork , lapack_int *info );
17529 void LAPACK_dorbdb( char* trans, char* signs,
17530                     lapack_int* m, lapack_int* p, lapack_int* q,
17531                     double* x11, lapack_int* ldx11, double* x12,
17532                     lapack_int* ldx12, double* x21, lapack_int* ldx21,
17533                     double* x22, lapack_int* ldx22, double* theta,
17534                     double* phi, double* taup1, double* taup2,
17535                     double* tauq1, double* tauq2, double* work,
17536                     lapack_int* lwork , lapack_int *info );
17537 void LAPACK_dorcsd( char* jobu1, char* jobu2,
17538                     char* jobv1t, char* jobv2t, char* trans,
17539                     char* signs, lapack_int* m, lapack_int* p,
17540                     lapack_int* q, double* x11, lapack_int* ldx11,
17541                     double* x12, lapack_int* ldx12, double* x21,
17542                     lapack_int* ldx21, double* x22, lapack_int* ldx22,
17543                     double* theta, double* u1, lapack_int* ldu1,
17544                     double* u2, lapack_int* ldu2, double* v1t,
17545                     lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
17546                     double* work, lapack_int* lwork,
17547                     lapack_int* iwork , lapack_int *info );
17548 void LAPACK_dorcsd2by1( char* jobu1, char* jobu2,
17549                     char* jobv1t, lapack_int* m, lapack_int* p,
17550                     lapack_int* q, double* x11, lapack_int* ldx11,
17551                     double* x21, lapack_int* ldx21,
17552                     double* theta, double* u1, lapack_int* ldu1,
17553                     double* u2, lapack_int* ldu2, double* v1t,
17554                     lapack_int* ldv1t, double* work, lapack_int* lwork,
17555                     lapack_int* iwork , lapack_int *info );
17556 void LAPACK_dsyconv( char* uplo, char* way,
17557                      lapack_int* n, double* a, lapack_int* lda,
17558                      const lapack_int* ipiv, double* e , lapack_int *info );
17559 void LAPACK_dsyswapr( char* uplo, lapack_int* n, double* a,
17560                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
17561 void LAPACK_dsytri2( char* uplo, lapack_int* n,
17562                      double* a, lapack_int* lda,
17563                      const lapack_int* ipiv,
17564                      double* work, lapack_int* lwork , lapack_int *info );
17565 void LAPACK_dsytri2x( char* uplo, lapack_int* n,
17566                       double* a, lapack_int* lda,
17567                       const lapack_int* ipiv, double* work,
17568                       lapack_int* nb , lapack_int *info );
17569 void LAPACK_dsytrs2( char* uplo, lapack_int* n,
17570                      lapack_int* nrhs, const double* a,
17571                      lapack_int* lda, const lapack_int* ipiv,
17572                      double* b, lapack_int* ldb, double* work , lapack_int *info );
17573 void LAPACK_sbbcsd( char* jobu1, char* jobu2,
17574                     char* jobv1t, char* jobv2t, char* trans,
17575                     lapack_int* m, lapack_int* p, lapack_int* q,
17576                     float* theta, float* phi, float* u1,
17577                     lapack_int* ldu1, float* u2, lapack_int* ldu2,
17578                     float* v1t, lapack_int* ldv1t, float* v2t,
17579                     lapack_int* ldv2t, float* b11d, float* b11e,
17580                     float* b12d, float* b12e, float* b21d,
17581                     float* b21e, float* b22d, float* b22e,
17582                     float* work, lapack_int* lwork , lapack_int *info );
17583 void LAPACK_sorbdb( char* trans, char* signs,
17584                     lapack_int* m, lapack_int* p, lapack_int* q,
17585                     float* x11, lapack_int* ldx11, float* x12,
17586                     lapack_int* ldx12, float* x21, lapack_int* ldx21,
17587                     float* x22, lapack_int* ldx22, float* theta,
17588                     float* phi, float* taup1, float* taup2,
17589                     float* tauq1, float* tauq2, float* work,
17590                     lapack_int* lwork , lapack_int *info );
17591 void LAPACK_sorcsd( char* jobu1, char* jobu2,
17592                     char* jobv1t, char* jobv2t, char* trans,
17593                     char* signs, lapack_int* m, lapack_int* p,
17594                     lapack_int* q, float* x11, lapack_int* ldx11,
17595                     float* x12, lapack_int* ldx12, float* x21,
17596                     lapack_int* ldx21, float* x22, lapack_int* ldx22,
17597                     float* theta, float* u1, lapack_int* ldu1,
17598                     float* u2, lapack_int* ldu2, float* v1t,
17599                     lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
17600                     float* work, lapack_int* lwork,
17601                     lapack_int* iwork , lapack_int *info );
17602 void LAPACK_sorcsd2by1( char* jobu1, char* jobu2,
17603                     char* jobv1t, lapack_int* m, lapack_int* p,
17604                     lapack_int* q, float* x11, lapack_int* ldx11,
17605                     float* x21, lapack_int* ldx21,
17606                     float* theta, float* u1, lapack_int* ldu1,
17607                     float* u2, lapack_int* ldu2, float* v1t,
17608                     lapack_int* ldv1t, float* work, lapack_int* lwork,
17609                     lapack_int* iwork , lapack_int *info );
17610 void LAPACK_ssyconv( char* uplo, char* way,
17611                      lapack_int* n, float* a, lapack_int* lda,
17612                      const lapack_int* ipiv, float* e , lapack_int *info );
17613 void LAPACK_ssyswapr( char* uplo, lapack_int* n, float* a,
17614                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
17615 void LAPACK_ssytri2( char* uplo, lapack_int* n,
17616                      float* a, lapack_int* lda,
17617                      const lapack_int* ipiv,
17618                      float* work, lapack_int* lwork , lapack_int *info );
17619 void LAPACK_ssytri2x( char* uplo, lapack_int* n,
17620                       float* a, lapack_int* lda,
17621                       const lapack_int* ipiv, float* work,
17622                       lapack_int* nb , lapack_int *info );
17623 void LAPACK_ssytrs2( char* uplo, lapack_int* n,
17624                      lapack_int* nrhs, const float* a,
17625                      lapack_int* lda, const lapack_int* ipiv,
17626                      float* b, lapack_int* ldb, float* work , lapack_int *info );
17627 void LAPACK_zbbcsd( char* jobu1, char* jobu2,
17628                     char* jobv1t, char* jobv2t, char* trans,
17629                     lapack_int* m, lapack_int* p, lapack_int* q,
17630                     double* theta, double* phi,
17631                     lapack_complex_double* u1, lapack_int* ldu1,
17632                     lapack_complex_double* u2, lapack_int* ldu2,
17633                     lapack_complex_double* v1t, lapack_int* ldv1t,
17634                     lapack_complex_double* v2t, lapack_int* ldv2t,
17635                     double* b11d, double* b11e, double* b12d,
17636                     double* b12e, double* b21d, double* b21e,
17637                     double* b22d, double* b22e, double* rwork,
17638                     lapack_int* lrwork , lapack_int *info );
17639 void LAPACK_zheswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
17640                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
17641 void LAPACK_zhetri2( char* uplo, lapack_int* n,
17642                      lapack_complex_double* a, lapack_int* lda,
17643                      const lapack_int* ipiv,
17644                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
17645 void LAPACK_zhetri2x( char* uplo, lapack_int* n,
17646                       lapack_complex_double* a, lapack_int* lda,
17647                       const lapack_int* ipiv,
17648                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
17649 void LAPACK_zhetrs2( char* uplo, lapack_int* n,
17650                      lapack_int* nrhs,
17651                      const lapack_complex_double* a, lapack_int* lda,
17652                      const lapack_int* ipiv,
17653                      lapack_complex_double* b, lapack_int* ldb,
17654                      lapack_complex_double* work , lapack_int *info );
17655 void LAPACK_zsyconv( char* uplo, char* way,
17656                      lapack_int* n, lapack_complex_double* a,
17657                      lapack_int* lda, const lapack_int* ipiv,
17658                      lapack_complex_double* e , lapack_int *info );
17659 void LAPACK_zsyswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
17660                       lapack_int* lda, lapack_int* i1,
17661                       lapack_int* i2 );
17662 void LAPACK_zsytri2( char* uplo, lapack_int* n,
17663                      lapack_complex_double* a, lapack_int* lda,
17664                      const lapack_int* ipiv,
17665                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
17666 void LAPACK_zsytri2x( char* uplo, lapack_int* n,
17667                       lapack_complex_double* a, lapack_int* lda,
17668                       const lapack_int* ipiv,
17669                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
17670 void LAPACK_zsytrs2( char* uplo, lapack_int* n,
17671                      lapack_int* nrhs,
17672                      const lapack_complex_double* a, lapack_int* lda,
17673                      const lapack_int* ipiv,
17674                      lapack_complex_double* b, lapack_int* ldb,
17675                      lapack_complex_double* work , lapack_int *info );
17676 void LAPACK_zunbdb( char* trans, char* signs,
17677                     lapack_int* m, lapack_int* p, lapack_int* q,
17678                     lapack_complex_double* x11, lapack_int* ldx11,
17679                     lapack_complex_double* x12, lapack_int* ldx12,
17680                     lapack_complex_double* x21, lapack_int* ldx21,
17681                     lapack_complex_double* x22, lapack_int* ldx22,
17682                     double* theta, double* phi,
17683                     lapack_complex_double* taup1,
17684                     lapack_complex_double* taup2,
17685                     lapack_complex_double* tauq1,
17686                     lapack_complex_double* tauq2,
17687                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
17688 void LAPACK_zuncsd( char* jobu1, char* jobu2,
17689                     char* jobv1t, char* jobv2t, char* trans,
17690                     char* signs, lapack_int* m, lapack_int* p,
17691                     lapack_int* q, lapack_complex_double* x11,
17692                     lapack_int* ldx11, lapack_complex_double* x12,
17693                     lapack_int* ldx12, lapack_complex_double* x21,
17694                     lapack_int* ldx21, lapack_complex_double* x22,
17695                     lapack_int* ldx22, double* theta,
17696                     lapack_complex_double* u1, lapack_int* ldu1,
17697                     lapack_complex_double* u2, lapack_int* ldu2,
17698                     lapack_complex_double* v1t, lapack_int* ldv1t,
17699                     lapack_complex_double* v2t, lapack_int* ldv2t,
17700                     lapack_complex_double* work, lapack_int* lwork,
17701                     double* rwork, lapack_int* lrwork,
17702                     lapack_int* iwork , lapack_int *info );
17703 void LAPACK_zuncsd2by1( char* jobu1, char* jobu2,
17704                     char* jobv1t, lapack_int* m, lapack_int* p,
17705                     lapack_int* q, lapack_complex_double* x11,
17706                     lapack_int* ldx11, lapack_complex_double* x21,
17707                     lapack_int* ldx21, double* theta,
17708                     lapack_complex_double* u1, lapack_int* ldu1,
17709                     lapack_complex_double* u2, lapack_int* ldu2,
17710                     lapack_complex_double* v1t, lapack_int* ldv1t,
17711                     lapack_complex_double* work, lapack_int* lwork,
17712                     double* rwork, lapack_int* lrwork,
17713                     lapack_int* iwork , lapack_int *info );
17714 // LAPACK 3.4.0
17715 void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17716                      lapack_int* k, lapack_int* nb, const float* v,
17717                      lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
17718                      lapack_int* ldc, float* work, lapack_int *info );
17719 void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17720                      lapack_int* k, lapack_int* nb, const double* v,
17721                      lapack_int* ldv, const double* t, lapack_int* ldt,
17722                      double* c, lapack_int* ldc, double* work,
17723                      lapack_int *info );
17724 void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17725                      lapack_int* k, lapack_int* nb,
17726                      const lapack_complex_float* v, lapack_int* ldv,
17727                      const lapack_complex_float* t, lapack_int* ldt,
17728                      lapack_complex_float* c, lapack_int* ldc,
17729                      lapack_complex_float* work, lapack_int *info );
17730 void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17731                      lapack_int* k, lapack_int* nb,
17732                      const lapack_complex_double* v, lapack_int* ldv,
17733                      const lapack_complex_double* t, lapack_int* ldt,
17734                      lapack_complex_double* c, lapack_int* ldc,
17735                      lapack_complex_double* work, lapack_int *info );
17736 void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
17737                     lapack_int* lda, float* t, lapack_int* ldt, float* work,
17738                     lapack_int *info );
17739 void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
17740                     lapack_int* lda, double* t, lapack_int* ldt, double* work,
17741                     lapack_int *info );
17742 void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
17743                     lapack_complex_float* a, lapack_int* lda,
17744                     lapack_complex_float* t, lapack_int* ldt,
17745                     lapack_complex_float* work, lapack_int *info );
17746 void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
17747                     lapack_complex_double* a, lapack_int* lda,
17748                     lapack_complex_double* t, lapack_int* ldt,
17749                     lapack_complex_double* work, lapack_int *info );
17750 void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17751                      float* t, lapack_int* ldt, lapack_int *info );
17752 void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17753                      double* t, lapack_int* ldt, lapack_int *info );
17754 void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17755                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
17756                      lapack_int *info );
17757 void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17758                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
17759                      lapack_int *info );
17760 void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
17761                      float* t, lapack_int* ldt, lapack_int *info );
17762 void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
17763                      double* t, lapack_int* ldt, lapack_int *info );
17764 void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
17765                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
17766                      lapack_int *info );
17767 void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
17768                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
17769                      lapack_int *info );
17770 void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17771                      lapack_int* k, lapack_int* l, lapack_int* nb,
17772                      const float* v, lapack_int* ldv, const float* t,
17773                      lapack_int* ldt, float* a, lapack_int* lda, float* b,
17774                      lapack_int* ldb, float* work, lapack_int *info );
17775 void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17776                      lapack_int* k, lapack_int* l, lapack_int* nb,
17777                      const double* v, lapack_int* ldv, const double* t,
17778                      lapack_int* ldt, double* a, lapack_int* lda, double* b,
17779                      lapack_int* ldb, double* work, lapack_int *info );
17780 void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17781                      lapack_int* k, lapack_int* l, lapack_int* nb,
17782                      const lapack_complex_float* v, lapack_int* ldv,
17783                      const lapack_complex_float* t, lapack_int* ldt,
17784                      lapack_complex_float* a, lapack_int* lda,
17785                      lapack_complex_float* b, lapack_int* ldb,
17786                      lapack_complex_float* work, lapack_int *info );
17787 void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
17788                      lapack_int* k, lapack_int* l, lapack_int* nb,
17789                      const lapack_complex_double* v, lapack_int* ldv,
17790                      const lapack_complex_double* t, lapack_int* ldt,
17791                      lapack_complex_double* a, lapack_int* lda,
17792                      lapack_complex_double* b, lapack_int* ldb,
17793                      lapack_complex_double* work, lapack_int *info );
17794 void LAPACK_stpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
17795                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17796                     float* t, lapack_int* ldt, float* work, lapack_int *info );
17797 void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
17798                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17799                     double* t, lapack_int* ldt, double* work,
17800                     lapack_int *info );
17801 void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
17802                     lapack_complex_float* a, lapack_int* lda,
17803                     lapack_complex_float* b, lapack_int* ldb,
17804                     lapack_complex_float* t, lapack_int* ldt,
17805                     lapack_complex_float* work, lapack_int *info );
17806 void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
17807                     lapack_complex_double* a, lapack_int* lda,
17808                     lapack_complex_double* b, lapack_int* ldb,
17809                     lapack_complex_double* t, lapack_int* ldt,
17810                     lapack_complex_double* work, lapack_int *info );
17811 void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
17812                      float* a, lapack_int* lda,
17813                      float* b, lapack_int* ldb,
17814                      float* t, lapack_int* ldt,
17815                      lapack_int *info );
17816 void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
17817                      double* a, lapack_int* lda,
17818                      double* b, lapack_int* ldb,
17819                      double* t, lapack_int* ldt,
17820                      lapack_int *info );
17821 void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
17822                      lapack_complex_float* a, lapack_int* lda,
17823                      lapack_complex_float* b, lapack_int* ldb,
17824                      lapack_complex_float* t, lapack_int* ldt,
17825                      lapack_int *info );
17826 void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
17827                      lapack_complex_double* a, lapack_int* lda,
17828                      lapack_complex_double* b, lapack_int* ldb,
17829                      lapack_complex_double* t, lapack_int* ldt,
17830                      lapack_int *info );
17831 void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
17832                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
17833                     const float* v, lapack_int* ldv, const float* t,
17834                     lapack_int* ldt, float* a, lapack_int* lda, float* b,
17835                     lapack_int* ldb, const float* work,
17836                     lapack_int* ldwork );
17837 void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
17838                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
17839                     const double* v, lapack_int* ldv, const double* t,
17840                     lapack_int* ldt, double* a, lapack_int* lda, double* b,
17841                     lapack_int* ldb, const double* work,
17842                     lapack_int* ldwork );
17843 void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
17844                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
17845                     const lapack_complex_float* v, lapack_int* ldv,
17846                     const lapack_complex_float* t, lapack_int* ldt,
17847                     lapack_complex_float* a, lapack_int* lda,
17848                     lapack_complex_float* b, lapack_int* ldb,
17849                     lapack_complex_float* work, lapack_int* ldwork );
17850 void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
17851                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
17852                     const lapack_complex_double* v, lapack_int* ldv,
17853                     const lapack_complex_double* t, lapack_int* ldt,
17854                     lapack_complex_double* a, lapack_int* lda,
17855                     lapack_complex_double* b, lapack_int* ldb,
17856                     lapack_complex_double* work, lapack_int* ldwork );
17857 // LAPACK 3.5.0
17858 void LAPACK_ssysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
17859                         lapack_int* lda, lapack_int* ipiv, float* b,
17860                         lapack_int* ldb, float* work, lapack_int* lwork,
17861                         lapack_int *info );
17862 void LAPACK_ssytrf_rook( char* uplo, lapack_int* n, float* a, lapack_int* lda,
17863                     lapack_int* ipiv, float* work, lapack_int* lwork,
17864                     lapack_int *info );
17865 void LAPACK_dsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
17866                         lapack_int* lda, lapack_int* ipiv, double* b,
17867                         lapack_int* ldb, double* work, lapack_int* lwork,
17868                         lapack_int *info );
17869 void LAPACK_dsytrf_rook( char* uplo, lapack_int* n, double* a, lapack_int* lda,
17870                     lapack_int* ipiv, double* work, lapack_int* lwork,
17871                     lapack_int *info );
17872 void LAPACK_csysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17873                         lapack_complex_float* a, lapack_int* lda,
17874                         lapack_int* ipiv, lapack_complex_float* b,
17875                         lapack_int* ldb, lapack_complex_float* work,
17876                         lapack_int* lwork, lapack_int *info );
17877 void LAPACK_csytrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
17878                     lapack_int* lda, lapack_int* ipiv,
17879                     lapack_complex_float* work, lapack_int* lwork,
17880                     lapack_int *info );
17881 void LAPACK_zsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17882                         lapack_complex_double* a, lapack_int* lda,
17883                         lapack_int* ipiv, lapack_complex_double* b,
17884                         lapack_int* ldb, lapack_complex_double* work,
17885                         lapack_int* lwork, lapack_int *info );
17886 void LAPACK_zsytrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
17887                     lapack_int* lda, lapack_int* ipiv,
17888                     lapack_complex_double* work, lapack_int* lwork,
17889                     lapack_int *info );
17890 void LAPACK_ssytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
17891                     lapack_int* lda, const lapack_int* ipiv, float* b,
17892                     lapack_int* ldb, lapack_int *info );
17893 void LAPACK_dsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17894                     const double* a, lapack_int* lda, const lapack_int* ipiv,
17895                     double* b, lapack_int* ldb, lapack_int *info );
17896 void LAPACK_csytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17897                     const lapack_complex_float* a, lapack_int* lda,
17898                     const lapack_int* ipiv, lapack_complex_float* b,
17899                     lapack_int* ldb, lapack_int *info );
17900 void LAPACK_zsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17901                     const lapack_complex_double* a, lapack_int* lda,
17902                     const lapack_int* ipiv, lapack_complex_double* b,
17903                     lapack_int* ldb, lapack_int *info );
17904 void LAPACK_chetrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
17905                     lapack_int* lda, lapack_int* ipiv,
17906                     lapack_complex_float* work, lapack_int* lwork,
17907                     lapack_int *info );
17908 void LAPACK_zhetrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
17909                     lapack_int* lda, lapack_int* ipiv,
17910                     lapack_complex_double* work, lapack_int* lwork,
17911                     lapack_int *info );
17912 void LAPACK_chetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17913                     const lapack_complex_float* a, lapack_int* lda,
17914                     const lapack_int* ipiv, lapack_complex_float* b,
17915                     lapack_int* ldb, lapack_int *info );
17916 void LAPACK_zhetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
17917                     const lapack_complex_double* a, lapack_int* lda,
17918                     const lapack_int* ipiv, lapack_complex_double* b,
17919                     lapack_int* ldb, lapack_int *info );
17920
17921 void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
17922                       const lapack_complex_float* x, lapack_int* incx,
17923                       lapack_complex_float* a, lapack_int* lda );
17924 void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
17925                       const lapack_complex_double* x, lapack_int* incx,
17926                       lapack_complex_double* a, lapack_int* lda );
17927 void LAPACK_ilaver( const lapack_int* vers_major, const lapack_int* vers_minor,
17928                      const lapack_int* vers_patch );
17929
17930 // LAPACK 3.7.0
17931 void LAPACK_ssysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
17932                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
17933                    float* work, lapack_int* lwork, lapack_int *info );
17934 void LAPACK_dsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
17935                    lapack_int* lda, lapack_int* ipiv, double* b,
17936                    lapack_int* ldb, double* work, lapack_int* lwork,
17937                    lapack_int *info );
17938 void LAPACK_csysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
17939                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
17940                    lapack_complex_float* b, lapack_int* ldb,
17941                    lapack_complex_float* work, lapack_int* lwork,
17942                    lapack_int *info );
17943 void LAPACK_zsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
17944                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
17945                    lapack_complex_double* b, lapack_int* ldb,
17946                    lapack_complex_double* work, lapack_int* lwork,
17947                    lapack_int *info );
17948 void LAPACK_chesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
17949                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
17950                    lapack_complex_float* b, lapack_int* ldb,
17951                    lapack_complex_float* work, lapack_int* lwork,
17952                    lapack_int *info );
17953 void LAPACK_zhesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
17954                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
17955                    lapack_complex_double* b, lapack_int* ldb,
17956                    lapack_complex_double* work, lapack_int* lwork,
17957                    lapack_int *info );
17958
17959 void LAPACK_ssytrf_aa( char* uplo, lapack_int* n, float* a, lapack_int* lda,
17960                     lapack_int* ipiv, float* work, lapack_int* lwork,
17961                     lapack_int *info );
17962 void LAPACK_dsytrf_aa( char* uplo, lapack_int* n, double* a, lapack_int* lda,
17963                     lapack_int* ipiv, double* work, lapack_int* lwork,
17964                     lapack_int *info );
17965 void LAPACK_csytrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
17966                     lapack_int* lda, lapack_int* ipiv,
17967                     lapack_complex_float* work, lapack_int* lwork,
17968                     lapack_int *info );
17969 void LAPACK_zsytrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
17970                     lapack_int* lda, lapack_int* ipiv,
17971                     lapack_complex_double* work, lapack_int* lwork,
17972                     lapack_int *info );
17973 void LAPACK_chetrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
17974                     lapack_int* lda, lapack_int* ipiv,
17975                     lapack_complex_float* work, lapack_int* lwork,
17976                     lapack_int *info );
17977 void LAPACK_zhetrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
17978                     lapack_int* lda, lapack_int* ipiv,
17979                     lapack_complex_double* work, lapack_int* lwork,
17980                     lapack_int *info );
17981
17982 void LAPACK_ssytrs_aa( char* uplo, lapack_int* n,
17983                      lapack_int* nrhs, const float* a,
17984                      lapack_int* lda, const lapack_int* ipiv,
17985                      float* b, lapack_int* ldb, float* work, lapack_int* lwork, lapack_int *info );
17986 void LAPACK_dsytrs_aa( char* uplo, lapack_int* n,
17987                      lapack_int* nrhs, const double* a,
17988                      lapack_int* lda, const lapack_int* ipiv,
17989                      double* b, lapack_int* ldb, double* work, lapack_int* lwork,  lapack_int *info );
17990 void LAPACK_csytrs_aa( char* uplo, lapack_int* n,
17991                      lapack_int* nrhs, const lapack_complex_float* a,
17992                      lapack_int* lda, const lapack_int* ipiv,
17993                      lapack_complex_float* b, lapack_int* ldb,
17994                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
17995 void LAPACK_zsytrs_aa( char* uplo, lapack_int* n,
17996                      lapack_int* nrhs,
17997                      const lapack_complex_double* a, lapack_int* lda,
17998                      const lapack_int* ipiv,
17999                      lapack_complex_double* b, lapack_int* ldb,
18000                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18001 void LAPACK_chetrs_aa( char* uplo, lapack_int* n,
18002                      lapack_int* nrhs, const lapack_complex_float* a,
18003                      lapack_int* lda, const lapack_int* ipiv,
18004                      lapack_complex_float* b, lapack_int* ldb,
18005                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
18006 void LAPACK_zhetrs_aa( char* uplo, lapack_int* n,
18007                      lapack_int* nrhs,
18008                      const lapack_complex_double* a, lapack_int* lda,
18009                      const lapack_int* ipiv,
18010                      lapack_complex_double* b, lapack_int* ldb,
18011                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18012
18013 void LAPACK_ssysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18014                    lapack_int* lda, float* e, lapack_int* ipiv, float* b, lapack_int* ldb,
18015                    float* work, lapack_int* lwork, lapack_int *info );
18016 void LAPACK_dsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18017                    lapack_int* lda, double* e, lapack_int* ipiv, double* b,
18018                    lapack_int* ldb, double* work, lapack_int* lwork,
18019                    lapack_int *info );
18020 void LAPACK_csysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18021                    lapack_complex_float* a, lapack_int* lda,
18022                    lapack_complex_float* e, lapack_int* ipiv,
18023                    lapack_complex_float* b, lapack_int* ldb,
18024                    lapack_complex_float* work, lapack_int* lwork,
18025                    lapack_int *info );
18026 void LAPACK_zsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18027                    lapack_complex_double* a, lapack_int* lda,
18028                    lapack_complex_double* e, lapack_int* ipiv,
18029                    lapack_complex_double* b, lapack_int* ldb,
18030                    lapack_complex_double* work, lapack_int* lwork,
18031                    lapack_int *info );
18032 void LAPACK_chesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18033                    lapack_complex_float* a, lapack_int* lda,
18034                    lapack_complex_float* e, lapack_int* ipiv,
18035                    lapack_complex_float* b, lapack_int* ldb,
18036                    lapack_complex_float* work, lapack_int* lwork,
18037                    lapack_int *info );
18038 void LAPACK_zhesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18039                    lapack_complex_double* a, lapack_int* lda,
18040                    lapack_complex_double* e, lapack_int* ipiv,
18041                    lapack_complex_double* b, lapack_int* ldb,
18042                    lapack_complex_double* work, lapack_int* lwork,
18043                    lapack_int *info );
18044
18045 void LAPACK_ssytrf_rk( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18046                     float* e, lapack_int* ipiv, float* work, lapack_int* lwork,
18047                     lapack_int *info );
18048 void LAPACK_dsytrf_rk( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18049                     double* e, lapack_int* ipiv, double* work, lapack_int* lwork,
18050                     lapack_int *info );
18051 void LAPACK_csytrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
18052                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
18053                     lapack_complex_float* work, lapack_int* lwork,
18054                     lapack_int *info );
18055 void LAPACK_zsytrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
18056                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
18057                     lapack_complex_double* work, lapack_int* lwork,
18058                     lapack_int *info );
18059 void LAPACK_chetrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
18060                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
18061                     lapack_complex_float* work, lapack_int* lwork,
18062                     lapack_int *info );
18063 void LAPACK_zhetrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
18064                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
18065                     lapack_complex_double* work, lapack_int* lwork,
18066                     lapack_int *info );
18067
18068 void LAPACK_ssytrs_3( char* uplo, lapack_int* n,
18069                      lapack_int* nrhs, const float* a,
18070                      lapack_int* lda, const float* e, const lapack_int* ipiv,
18071                      float* b, lapack_int* ldb, lapack_int *info );
18072 void LAPACK_dsytrs_3( char* uplo, lapack_int* n,
18073                      lapack_int* nrhs, const double* a,
18074                      lapack_int* lda, const double* e, const lapack_int* ipiv,
18075                      double* b, lapack_int* ldb, lapack_int *info );
18076 void LAPACK_csytrs_3( char* uplo, lapack_int* n,
18077                      lapack_int* nrhs, const lapack_complex_float* a,
18078                      lapack_int* lda, const lapack_complex_float* e,
18079                      const lapack_int* ipiv,
18080                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
18081 void LAPACK_zsytrs_3( char* uplo, lapack_int* n,
18082                      lapack_int* nrhs,
18083                      const lapack_complex_double* a, lapack_int* lda,
18084                      const lapack_complex_double* e, const lapack_int* ipiv,
18085                      lapack_complex_double* b, lapack_int* ldb, lapack_int *info );
18086 void LAPACK_chetrs_3( char* uplo, lapack_int* n,
18087                      lapack_int* nrhs, const lapack_complex_float* a,
18088                      lapack_int* lda, const lapack_complex_float* e,
18089                      const lapack_int* ipiv,
18090                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
18091 void LAPACK_zhetrs_3( char* uplo, lapack_int* n,
18092                      lapack_int* nrhs,
18093                      const lapack_complex_double* a, lapack_int* lda,
18094                      const lapack_complex_double* e,
18095                      const lapack_int* ipiv,
18096                      lapack_complex_double* b, lapack_int* ldb,  lapack_int *info );
18097
18098 void LAPACK_ssytri_3( char* uplo, lapack_int* n, float* a, lapack_int* lda, const float* e,
18099                     const lapack_int* ipiv, float* work, lapack_int* lwork, lapack_int *info );
18100 void LAPACK_dsytri_3( char* uplo, lapack_int* n, double* a, lapack_int* lda, const double* e,
18101                     const lapack_int* ipiv, double* work, lapack_int* lwork, lapack_int *info );
18102 void LAPACK_csytri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
18103                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
18104                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
18105 void LAPACK_zsytri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
18106                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
18107                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18108 void LAPACK_chetri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
18109                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
18110                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
18111 void LAPACK_zhetri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
18112                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
18113                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18114
18115 #ifdef __cplusplus
18116 }
18117 #endif /* __cplusplus */
18118
18119 #endif /* _LAPACKE_H_ */