lapack-netlib/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 lapack_int LAPACKE_clacrm( int matrix_layout, lapack_int m, lapack_int n,
2402                           const lapack_complex_float* a,
2403                           lapack_int lda, const float* b,
2404                           lapack_int ldb, lapack_complex_float* c,
2405                           lapack_int ldc );
2406 lapack_int LAPACKE_zlacrm( int matrix_layout, lapack_int m, lapack_int n,
2407                            const lapack_complex_double* a,
2408                            lapack_int lda, const double* b,
2409                            lapack_int ldb, lapack_complex_double* c,
2410                            lapack_int ldc );
2411
2412 lapack_int LAPACKE_clarcm( int matrix_layout, lapack_int m, lapack_int n,
2413                           const float* a, lapack_int lda,
2414                           const lapack_complex_float* b,
2415                           lapack_int ldb, lapack_complex_float* c,
2416                           lapack_int ldc );
2417 lapack_int LAPACKE_zlarcm( int matrix_layout, lapack_int m, lapack_int n,
2418                            const double* a, lapack_int lda,
2419                            const lapack_complex_double* b,
2420                            lapack_int ldb, lapack_complex_double* c,
2421                            lapack_int ldc );
2422
2423 float LAPACKE_slansy( int matrix_layout, char norm, char uplo, lapack_int n,
2424                            const float* a, lapack_int lda );
2425 double LAPACKE_dlansy( int matrix_layout, char norm, char uplo, lapack_int n,
2426                            const double* a, lapack_int lda );
2427 float LAPACKE_clansy( int matrix_layout, char norm, char uplo, lapack_int n,
2428                            const lapack_complex_float* a, lapack_int lda );
2429 double LAPACKE_zlansy( int matrix_layout, char norm, char uplo, lapack_int n,
2430                            const lapack_complex_double* a, lapack_int lda );
2431
2432 float LAPACKE_slantr( int matrix_layout, char norm, char uplo, char diag,
2433                            lapack_int m, lapack_int n, const float* a,
2434                            lapack_int lda );
2435 double LAPACKE_dlantr( int matrix_layout, char norm, char uplo, char diag,
2436                            lapack_int m, lapack_int n, const double* a,
2437                            lapack_int lda );
2438 float LAPACKE_clantr( int matrix_layout, char norm, char uplo, char diag,
2439                            lapack_int m, lapack_int n, const lapack_complex_float* a,
2440                            lapack_int lda );
2441 double LAPACKE_zlantr( int matrix_layout, char norm, char uplo, char diag,
2442                            lapack_int m, lapack_int n, const lapack_complex_double* a,
2443                            lapack_int lda );
2444
2445
2446 lapack_int LAPACKE_slarfb( int matrix_layout, char side, char trans, char direct,
2447                            char storev, lapack_int m, lapack_int n,
2448                            lapack_int k, const float* v, lapack_int ldv,
2449                            const float* t, lapack_int ldt, float* c,
2450                            lapack_int ldc );
2451 lapack_int LAPACKE_dlarfb( int matrix_layout, char side, char trans, char direct,
2452                            char storev, lapack_int m, lapack_int n,
2453                            lapack_int k, const double* v, lapack_int ldv,
2454                            const double* t, lapack_int ldt, double* c,
2455                            lapack_int ldc );
2456 lapack_int LAPACKE_clarfb( int matrix_layout, char side, char trans, char direct,
2457                            char storev, lapack_int m, lapack_int n,
2458                            lapack_int k, const lapack_complex_float* v,
2459                            lapack_int ldv, const lapack_complex_float* t,
2460                            lapack_int ldt, lapack_complex_float* c,
2461                            lapack_int ldc );
2462 lapack_int LAPACKE_zlarfb( int matrix_layout, char side, char trans, char direct,
2463                            char storev, lapack_int m, lapack_int n,
2464                            lapack_int k, const lapack_complex_double* v,
2465                            lapack_int ldv, const lapack_complex_double* t,
2466                            lapack_int ldt, lapack_complex_double* c,
2467                            lapack_int ldc );
2468
2469 lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
2470                            lapack_int incx, float* tau );
2471 lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
2472                            lapack_int incx, double* tau );
2473 lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
2474                            lapack_complex_float* x, lapack_int incx,
2475                            lapack_complex_float* tau );
2476 lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
2477                            lapack_complex_double* x, lapack_int incx,
2478                            lapack_complex_double* tau );
2479
2480 lapack_int LAPACKE_slarft( int matrix_layout, char direct, char storev,
2481                            lapack_int n, lapack_int k, const float* v,
2482                            lapack_int ldv, const float* tau, float* t,
2483                            lapack_int ldt );
2484 lapack_int LAPACKE_dlarft( int matrix_layout, char direct, char storev,
2485                            lapack_int n, lapack_int k, const double* v,
2486                            lapack_int ldv, const double* tau, double* t,
2487                            lapack_int ldt );
2488 lapack_int LAPACKE_clarft( int matrix_layout, char direct, char storev,
2489                            lapack_int n, lapack_int k,
2490                            const lapack_complex_float* v, lapack_int ldv,
2491                            const lapack_complex_float* tau,
2492                            lapack_complex_float* t, lapack_int ldt );
2493 lapack_int LAPACKE_zlarft( int matrix_layout, char direct, char storev,
2494                            lapack_int n, lapack_int k,
2495                            const lapack_complex_double* v, lapack_int ldv,
2496                            const lapack_complex_double* tau,
2497                            lapack_complex_double* t, lapack_int ldt );
2498
2499 lapack_int LAPACKE_slarfx( int matrix_layout, char side, lapack_int m,
2500                            lapack_int n, const float* v, float tau, float* c,
2501                            lapack_int ldc, float* work );
2502 lapack_int LAPACKE_dlarfx( int matrix_layout, char side, lapack_int m,
2503                            lapack_int n, const double* v, double tau, double* c,
2504                            lapack_int ldc, double* work );
2505 lapack_int LAPACKE_clarfx( int matrix_layout, char side, lapack_int m,
2506                            lapack_int n, const lapack_complex_float* v,
2507                            lapack_complex_float tau, lapack_complex_float* c,
2508                            lapack_int ldc, lapack_complex_float* work );
2509 lapack_int LAPACKE_zlarfx( int matrix_layout, char side, lapack_int m,
2510                            lapack_int n, const lapack_complex_double* v,
2511                            lapack_complex_double tau, lapack_complex_double* c,
2512                            lapack_int ldc, lapack_complex_double* work );
2513
2514 lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2515                            float* x );
2516 lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2517                            double* x );
2518 lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2519                            lapack_complex_float* x );
2520 lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2521                            lapack_complex_double* x );
2522
2523 lapack_int LAPACKE_slascl( int matrix_layout, char type, lapack_int kl,
2524                            lapack_int ku, float cfrom, float cto,
2525                            lapack_int m, lapack_int n, float* a,
2526                            lapack_int lda );
2527 lapack_int LAPACKE_dlascl( int matrix_layout, char type, lapack_int kl,
2528                            lapack_int ku, double cfrom, double cto,
2529                            lapack_int m, lapack_int n, double* a,
2530                            lapack_int lda );
2531 lapack_int LAPACKE_clascl( int matrix_layout, char type, lapack_int kl,
2532                            lapack_int ku, float cfrom, float cto,
2533                            lapack_int m, lapack_int n, lapack_complex_float* a,
2534                            lapack_int lda );
2535 lapack_int LAPACKE_zlascl( int matrix_layout, char type, lapack_int kl,
2536                            lapack_int ku, double cfrom, double cto,
2537                            lapack_int m, lapack_int n, lapack_complex_double* a,
2538                            lapack_int lda );
2539
2540 lapack_int LAPACKE_slaset( int matrix_layout, char uplo, lapack_int m,
2541                            lapack_int n, float alpha, float beta, float* a,
2542                            lapack_int lda );
2543 lapack_int LAPACKE_dlaset( int matrix_layout, char uplo, lapack_int m,
2544                            lapack_int n, double alpha, double beta, double* a,
2545                            lapack_int lda );
2546 lapack_int LAPACKE_claset( int matrix_layout, char uplo, lapack_int m,
2547                            lapack_int n, lapack_complex_float alpha,
2548                            lapack_complex_float beta, lapack_complex_float* a,
2549                            lapack_int lda );
2550 lapack_int LAPACKE_zlaset( int matrix_layout, char uplo, lapack_int m,
2551                            lapack_int n, lapack_complex_double alpha,
2552                            lapack_complex_double beta, lapack_complex_double* a,
2553                            lapack_int lda );
2554
2555 lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
2556 lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
2557
2558 lapack_int LAPACKE_slassq( lapack_int n,                 float* x, lapack_int incx,  float* scale,  float* sumsq );
2559 lapack_int LAPACKE_dlassq( lapack_int n,                double* x, lapack_int incx, double* scale, double* sumsq );
2560 lapack_int LAPACKE_classq( lapack_int n,  lapack_complex_float* x, lapack_int incx,  float* scale,  float* sumsq );
2561 lapack_int LAPACKE_zlassq( lapack_int n, lapack_complex_double* x, lapack_int incx, double* scale, double* sumsq );
2562
2563 lapack_int LAPACKE_slaswp( int matrix_layout, lapack_int n, float* a,
2564                            lapack_int lda, lapack_int k1, lapack_int k2,
2565                            const lapack_int* ipiv, lapack_int incx );
2566 lapack_int LAPACKE_dlaswp( int matrix_layout, lapack_int n, double* a,
2567                            lapack_int lda, lapack_int k1, lapack_int k2,
2568                            const lapack_int* ipiv, lapack_int incx );
2569 lapack_int LAPACKE_claswp( int matrix_layout, lapack_int n,
2570                            lapack_complex_float* a, lapack_int lda,
2571                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2572                            lapack_int incx );
2573 lapack_int LAPACKE_zlaswp( int matrix_layout, lapack_int n,
2574                            lapack_complex_double* a, lapack_int lda,
2575                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2576                            lapack_int incx );
2577
2578 lapack_int LAPACKE_slatms( int matrix_layout, lapack_int m, lapack_int n,
2579                            char dist, lapack_int* iseed, char sym, float* d,
2580                            lapack_int mode, float cond, float dmax,
2581                            lapack_int kl, lapack_int ku, char pack, float* a,
2582                            lapack_int lda );
2583 lapack_int LAPACKE_dlatms( int matrix_layout, lapack_int m, lapack_int n,
2584                            char dist, lapack_int* iseed, char sym, double* d,
2585                            lapack_int mode, double cond, double dmax,
2586                            lapack_int kl, lapack_int ku, char pack, double* a,
2587                            lapack_int lda );
2588 lapack_int LAPACKE_clatms( int matrix_layout, lapack_int m, lapack_int n,
2589                            char dist, lapack_int* iseed, char sym, float* d,
2590                            lapack_int mode, float cond, float dmax,
2591                            lapack_int kl, lapack_int ku, char pack,
2592                            lapack_complex_float* a, lapack_int lda );
2593 lapack_int LAPACKE_zlatms( int matrix_layout, lapack_int m, lapack_int n,
2594                            char dist, lapack_int* iseed, char sym, double* d,
2595                            lapack_int mode, double cond, double dmax,
2596                            lapack_int kl, lapack_int ku, char pack,
2597                            lapack_complex_double* a, lapack_int lda );
2598
2599 lapack_int LAPACKE_slauum( int matrix_layout, char uplo, lapack_int n, float* a,
2600                            lapack_int lda );
2601 lapack_int LAPACKE_dlauum( int matrix_layout, char uplo, lapack_int n, double* a,
2602                            lapack_int lda );
2603 lapack_int LAPACKE_clauum( int matrix_layout, char uplo, lapack_int n,
2604                            lapack_complex_float* a, lapack_int lda );
2605 lapack_int LAPACKE_zlauum( int matrix_layout, char uplo, lapack_int n,
2606                            lapack_complex_double* a, lapack_int lda );
2607
2608 lapack_int LAPACKE_sopgtr( int matrix_layout, char uplo, lapack_int n,
2609                            const float* ap, const float* tau, float* q,
2610                            lapack_int ldq );
2611 lapack_int LAPACKE_dopgtr( int matrix_layout, char uplo, lapack_int n,
2612                            const double* ap, const double* tau, double* q,
2613                            lapack_int ldq );
2614
2615 lapack_int LAPACKE_sopmtr( int matrix_layout, char side, char uplo, char trans,
2616                            lapack_int m, lapack_int n, const float* ap,
2617                            const float* tau, float* c, lapack_int ldc );
2618 lapack_int LAPACKE_dopmtr( int matrix_layout, char side, char uplo, char trans,
2619                            lapack_int m, lapack_int n, const double* ap,
2620                            const double* tau, double* c, lapack_int ldc );
2621
2622 lapack_int LAPACKE_sorgbr( int matrix_layout, char vect, lapack_int m,
2623                            lapack_int n, lapack_int k, float* a, lapack_int lda,
2624                            const float* tau );
2625 lapack_int LAPACKE_dorgbr( int matrix_layout, char vect, lapack_int m,
2626                            lapack_int n, lapack_int k, double* a,
2627                            lapack_int lda, const double* tau );
2628
2629 lapack_int LAPACKE_sorghr( int matrix_layout, lapack_int n, lapack_int ilo,
2630                            lapack_int ihi, float* a, lapack_int lda,
2631                            const float* tau );
2632 lapack_int LAPACKE_dorghr( int matrix_layout, lapack_int n, lapack_int ilo,
2633                            lapack_int ihi, double* a, lapack_int lda,
2634                            const double* tau );
2635
2636 lapack_int LAPACKE_sorglq( int matrix_layout, lapack_int m, lapack_int n,
2637                            lapack_int k, float* a, lapack_int lda,
2638                            const float* tau );
2639 lapack_int LAPACKE_dorglq( int matrix_layout, lapack_int m, lapack_int n,
2640                            lapack_int k, double* a, lapack_int lda,
2641                            const double* tau );
2642
2643 lapack_int LAPACKE_sorgql( int matrix_layout, lapack_int m, lapack_int n,
2644                            lapack_int k, float* a, lapack_int lda,
2645                            const float* tau );
2646 lapack_int LAPACKE_dorgql( int matrix_layout, lapack_int m, lapack_int n,
2647                            lapack_int k, double* a, lapack_int lda,
2648                            const double* tau );
2649
2650 lapack_int LAPACKE_sorgqr( int matrix_layout, lapack_int m, lapack_int n,
2651                            lapack_int k, float* a, lapack_int lda,
2652                            const float* tau );
2653 lapack_int LAPACKE_dorgqr( int matrix_layout, lapack_int m, lapack_int n,
2654                            lapack_int k, double* a, lapack_int lda,
2655                            const double* tau );
2656
2657 lapack_int LAPACKE_sorgrq( int matrix_layout, lapack_int m, lapack_int n,
2658                            lapack_int k, float* a, lapack_int lda,
2659                            const float* tau );
2660 lapack_int LAPACKE_dorgrq( int matrix_layout, lapack_int m, lapack_int n,
2661                            lapack_int k, double* a, lapack_int lda,
2662                            const double* tau );
2663
2664 lapack_int LAPACKE_sorgtr( int matrix_layout, char uplo, lapack_int n, float* a,
2665                            lapack_int lda, const float* tau );
2666 lapack_int LAPACKE_dorgtr( int matrix_layout, char uplo, lapack_int n, double* a,
2667                            lapack_int lda, const double* tau );
2668
2669 lapack_int LAPACKE_sormbr( int matrix_layout, char vect, 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_dormbr( int matrix_layout, char vect, 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_sormhr( int matrix_layout, char side, char trans,
2679                            lapack_int m, lapack_int n, lapack_int ilo,
2680                            lapack_int ihi, const float* a, lapack_int lda,
2681                            const float* tau, float* c, lapack_int ldc );
2682 lapack_int LAPACKE_dormhr( int matrix_layout, char side, char trans,
2683                            lapack_int m, lapack_int n, lapack_int ilo,
2684                            lapack_int ihi, const double* a, lapack_int lda,
2685                            const double* tau, double* c, lapack_int ldc );
2686
2687 lapack_int LAPACKE_sormlq( 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_dormlq( 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_sormql( int matrix_layout, char side, char trans,
2697                            lapack_int m, lapack_int n, lapack_int k,
2698                            const float* a, lapack_int lda, const float* tau,
2699                            float* c, lapack_int ldc );
2700 lapack_int LAPACKE_dormql( int matrix_layout, char side, char trans,
2701                            lapack_int m, lapack_int n, lapack_int k,
2702                            const double* a, lapack_int lda, const double* tau,
2703                            double* c, lapack_int ldc );
2704
2705 lapack_int LAPACKE_sormqr( int matrix_layout, char side, char trans,
2706                            lapack_int m, lapack_int n, lapack_int k,
2707                            const float* a, lapack_int lda, const float* tau,
2708                            float* c, lapack_int ldc );
2709 lapack_int LAPACKE_dormqr( int matrix_layout, char side, char trans,
2710                            lapack_int m, lapack_int n, lapack_int k,
2711                            const double* a, lapack_int lda, const double* tau,
2712                            double* c, lapack_int ldc );
2713
2714 lapack_int LAPACKE_sormrq( int matrix_layout, char side, char trans,
2715                            lapack_int m, lapack_int n, lapack_int k,
2716                            const float* a, lapack_int lda, const float* tau,
2717                            float* c, lapack_int ldc );
2718 lapack_int LAPACKE_dormrq( int matrix_layout, char side, char trans,
2719                            lapack_int m, lapack_int n, lapack_int k,
2720                            const double* a, lapack_int lda, const double* tau,
2721                            double* c, lapack_int ldc );
2722
2723 lapack_int LAPACKE_sormrz( int matrix_layout, char side, char trans,
2724                            lapack_int m, lapack_int n, lapack_int k,
2725                            lapack_int l, const float* a, lapack_int lda,
2726                            const float* tau, float* c, lapack_int ldc );
2727 lapack_int LAPACKE_dormrz( int matrix_layout, char side, char trans,
2728                            lapack_int m, lapack_int n, lapack_int k,
2729                            lapack_int l, const double* a, lapack_int lda,
2730                            const double* tau, double* c, lapack_int ldc );
2731
2732 lapack_int LAPACKE_sormtr( int matrix_layout, char side, char uplo, char trans,
2733                            lapack_int m, lapack_int n, const float* a,
2734                            lapack_int lda, const float* tau, float* c,
2735                            lapack_int ldc );
2736 lapack_int LAPACKE_dormtr( int matrix_layout, char side, char uplo, char trans,
2737                            lapack_int m, lapack_int n, const double* a,
2738                            lapack_int lda, const double* tau, double* c,
2739                            lapack_int ldc );
2740
2741 lapack_int LAPACKE_spbcon( int matrix_layout, char uplo, lapack_int n,
2742                            lapack_int kd, const float* ab, lapack_int ldab,
2743                            float anorm, float* rcond );
2744 lapack_int LAPACKE_dpbcon( int matrix_layout, char uplo, lapack_int n,
2745                            lapack_int kd, const double* ab, lapack_int ldab,
2746                            double anorm, double* rcond );
2747 lapack_int LAPACKE_cpbcon( int matrix_layout, char uplo, lapack_int n,
2748                            lapack_int kd, const lapack_complex_float* ab,
2749                            lapack_int ldab, float anorm, float* rcond );
2750 lapack_int LAPACKE_zpbcon( int matrix_layout, char uplo, lapack_int n,
2751                            lapack_int kd, const lapack_complex_double* ab,
2752                            lapack_int ldab, double anorm, double* rcond );
2753
2754 lapack_int LAPACKE_spbequ( int matrix_layout, char uplo, lapack_int n,
2755                            lapack_int kd, const float* ab, lapack_int ldab,
2756                            float* s, float* scond, float* amax );
2757 lapack_int LAPACKE_dpbequ( int matrix_layout, char uplo, lapack_int n,
2758                            lapack_int kd, const double* ab, lapack_int ldab,
2759                            double* s, double* scond, double* amax );
2760 lapack_int LAPACKE_cpbequ( int matrix_layout, char uplo, lapack_int n,
2761                            lapack_int kd, const lapack_complex_float* ab,
2762                            lapack_int ldab, float* s, float* scond,
2763                            float* amax );
2764 lapack_int LAPACKE_zpbequ( int matrix_layout, char uplo, lapack_int n,
2765                            lapack_int kd, const lapack_complex_double* ab,
2766                            lapack_int ldab, double* s, double* scond,
2767                            double* amax );
2768
2769 lapack_int LAPACKE_spbrfs( int matrix_layout, char uplo, lapack_int n,
2770                            lapack_int kd, lapack_int nrhs, const float* ab,
2771                            lapack_int ldab, const float* afb, lapack_int ldafb,
2772                            const float* b, lapack_int ldb, float* x,
2773                            lapack_int ldx, float* ferr, float* berr );
2774 lapack_int LAPACKE_dpbrfs( int matrix_layout, char uplo, lapack_int n,
2775                            lapack_int kd, lapack_int nrhs, const double* ab,
2776                            lapack_int ldab, const double* afb, lapack_int ldafb,
2777                            const double* b, lapack_int ldb, double* x,
2778                            lapack_int ldx, double* ferr, double* berr );
2779 lapack_int LAPACKE_cpbrfs( int matrix_layout, char uplo, lapack_int n,
2780                            lapack_int kd, lapack_int nrhs,
2781                            const lapack_complex_float* ab, lapack_int ldab,
2782                            const lapack_complex_float* afb, lapack_int ldafb,
2783                            const lapack_complex_float* b, lapack_int ldb,
2784                            lapack_complex_float* x, lapack_int ldx, float* ferr,
2785                            float* berr );
2786 lapack_int LAPACKE_zpbrfs( int matrix_layout, char uplo, lapack_int n,
2787                            lapack_int kd, lapack_int nrhs,
2788                            const lapack_complex_double* ab, lapack_int ldab,
2789                            const lapack_complex_double* afb, lapack_int ldafb,
2790                            const lapack_complex_double* b, lapack_int ldb,
2791                            lapack_complex_double* x, lapack_int ldx,
2792                            double* ferr, double* berr );
2793
2794 lapack_int LAPACKE_spbstf( int matrix_layout, char uplo, lapack_int n,
2795                            lapack_int kb, float* bb, lapack_int ldbb );
2796 lapack_int LAPACKE_dpbstf( int matrix_layout, char uplo, lapack_int n,
2797                            lapack_int kb, double* bb, lapack_int ldbb );
2798 lapack_int LAPACKE_cpbstf( int matrix_layout, char uplo, lapack_int n,
2799                            lapack_int kb, lapack_complex_float* bb,
2800                            lapack_int ldbb );
2801 lapack_int LAPACKE_zpbstf( int matrix_layout, char uplo, lapack_int n,
2802                            lapack_int kb, lapack_complex_double* bb,
2803                            lapack_int ldbb );
2804
2805 lapack_int LAPACKE_spbsv( int matrix_layout, char uplo, lapack_int n,
2806                           lapack_int kd, lapack_int nrhs, float* ab,
2807                           lapack_int ldab, float* b, lapack_int ldb );
2808 lapack_int LAPACKE_dpbsv( int matrix_layout, char uplo, lapack_int n,
2809                           lapack_int kd, lapack_int nrhs, double* ab,
2810                           lapack_int ldab, double* b, lapack_int ldb );
2811 lapack_int LAPACKE_cpbsv( int matrix_layout, char uplo, lapack_int n,
2812                           lapack_int kd, lapack_int nrhs,
2813                           lapack_complex_float* ab, lapack_int ldab,
2814                           lapack_complex_float* b, lapack_int ldb );
2815 lapack_int LAPACKE_zpbsv( int matrix_layout, char uplo, lapack_int n,
2816                           lapack_int kd, lapack_int nrhs,
2817                           lapack_complex_double* ab, lapack_int ldab,
2818                           lapack_complex_double* b, lapack_int ldb );
2819
2820 lapack_int LAPACKE_spbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2821                            lapack_int kd, lapack_int nrhs, float* ab,
2822                            lapack_int ldab, float* afb, lapack_int ldafb,
2823                            char* equed, float* s, float* b, lapack_int ldb,
2824                            float* x, lapack_int ldx, float* rcond, float* ferr,
2825                            float* berr );
2826 lapack_int LAPACKE_dpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2827                            lapack_int kd, lapack_int nrhs, double* ab,
2828                            lapack_int ldab, double* afb, lapack_int ldafb,
2829                            char* equed, double* s, double* b, lapack_int ldb,
2830                            double* x, lapack_int ldx, double* rcond,
2831                            double* ferr, double* berr );
2832 lapack_int LAPACKE_cpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2833                            lapack_int kd, lapack_int nrhs,
2834                            lapack_complex_float* ab, lapack_int ldab,
2835                            lapack_complex_float* afb, lapack_int ldafb,
2836                            char* equed, float* s, lapack_complex_float* b,
2837                            lapack_int ldb, lapack_complex_float* x,
2838                            lapack_int ldx, float* rcond, float* ferr,
2839                            float* berr );
2840 lapack_int LAPACKE_zpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2841                            lapack_int kd, lapack_int nrhs,
2842                            lapack_complex_double* ab, lapack_int ldab,
2843                            lapack_complex_double* afb, lapack_int ldafb,
2844                            char* equed, double* s, lapack_complex_double* b,
2845                            lapack_int ldb, lapack_complex_double* x,
2846                            lapack_int ldx, double* rcond, double* ferr,
2847                            double* berr );
2848
2849 lapack_int LAPACKE_spbtrf( int matrix_layout, char uplo, lapack_int n,
2850                            lapack_int kd, float* ab, lapack_int ldab );
2851 lapack_int LAPACKE_dpbtrf( int matrix_layout, char uplo, lapack_int n,
2852                            lapack_int kd, double* ab, lapack_int ldab );
2853 lapack_int LAPACKE_cpbtrf( int matrix_layout, char uplo, lapack_int n,
2854                            lapack_int kd, lapack_complex_float* ab,
2855                            lapack_int ldab );
2856 lapack_int LAPACKE_zpbtrf( int matrix_layout, char uplo, lapack_int n,
2857                            lapack_int kd, lapack_complex_double* ab,
2858                            lapack_int ldab );
2859
2860 lapack_int LAPACKE_spbtrs( int matrix_layout, char uplo, lapack_int n,
2861                            lapack_int kd, lapack_int nrhs, const float* ab,
2862                            lapack_int ldab, float* b, lapack_int ldb );
2863 lapack_int LAPACKE_dpbtrs( int matrix_layout, char uplo, lapack_int n,
2864                            lapack_int kd, lapack_int nrhs, const double* ab,
2865                            lapack_int ldab, double* b, lapack_int ldb );
2866 lapack_int LAPACKE_cpbtrs( int matrix_layout, char uplo, lapack_int n,
2867                            lapack_int kd, lapack_int nrhs,
2868                            const lapack_complex_float* ab, lapack_int ldab,
2869                            lapack_complex_float* b, lapack_int ldb );
2870 lapack_int LAPACKE_zpbtrs( int matrix_layout, char uplo, lapack_int n,
2871                            lapack_int kd, lapack_int nrhs,
2872                            const lapack_complex_double* ab, lapack_int ldab,
2873                            lapack_complex_double* b, lapack_int ldb );
2874
2875 lapack_int LAPACKE_spftrf( int matrix_layout, char transr, char uplo,
2876                            lapack_int n, float* a );
2877 lapack_int LAPACKE_dpftrf( int matrix_layout, char transr, char uplo,
2878                            lapack_int n, double* a );
2879 lapack_int LAPACKE_cpftrf( int matrix_layout, char transr, char uplo,
2880                            lapack_int n, lapack_complex_float* a );
2881 lapack_int LAPACKE_zpftrf( int matrix_layout, char transr, char uplo,
2882                            lapack_int n, lapack_complex_double* a );
2883
2884 lapack_int LAPACKE_spftri( int matrix_layout, char transr, char uplo,
2885                            lapack_int n, float* a );
2886 lapack_int LAPACKE_dpftri( int matrix_layout, char transr, char uplo,
2887                            lapack_int n, double* a );
2888 lapack_int LAPACKE_cpftri( int matrix_layout, char transr, char uplo,
2889                            lapack_int n, lapack_complex_float* a );
2890 lapack_int LAPACKE_zpftri( int matrix_layout, char transr, char uplo,
2891                            lapack_int n, lapack_complex_double* a );
2892
2893 lapack_int LAPACKE_spftrs( int matrix_layout, char transr, char uplo,
2894                            lapack_int n, lapack_int nrhs, const float* a,
2895                            float* b, lapack_int ldb );
2896 lapack_int LAPACKE_dpftrs( int matrix_layout, char transr, char uplo,
2897                            lapack_int n, lapack_int nrhs, const double* a,
2898                            double* b, lapack_int ldb );
2899 lapack_int LAPACKE_cpftrs( int matrix_layout, char transr, char uplo,
2900                            lapack_int n, lapack_int nrhs,
2901                            const lapack_complex_float* a,
2902                            lapack_complex_float* b, lapack_int ldb );
2903 lapack_int LAPACKE_zpftrs( int matrix_layout, char transr, char uplo,
2904                            lapack_int n, lapack_int nrhs,
2905                            const lapack_complex_double* a,
2906                            lapack_complex_double* b, lapack_int ldb );
2907
2908 lapack_int LAPACKE_spocon( int matrix_layout, char uplo, lapack_int n,
2909                            const float* a, lapack_int lda, float anorm,
2910                            float* rcond );
2911 lapack_int LAPACKE_dpocon( int matrix_layout, char uplo, lapack_int n,
2912                            const double* a, lapack_int lda, double anorm,
2913                            double* rcond );
2914 lapack_int LAPACKE_cpocon( int matrix_layout, char uplo, lapack_int n,
2915                            const lapack_complex_float* a, lapack_int lda,
2916                            float anorm, float* rcond );
2917 lapack_int LAPACKE_zpocon( int matrix_layout, char uplo, lapack_int n,
2918                            const lapack_complex_double* a, lapack_int lda,
2919                            double anorm, double* rcond );
2920
2921 lapack_int LAPACKE_spoequ( int matrix_layout, lapack_int n, const float* a,
2922                            lapack_int lda, float* s, float* scond,
2923                            float* amax );
2924 lapack_int LAPACKE_dpoequ( int matrix_layout, lapack_int n, const double* a,
2925                            lapack_int lda, double* s, double* scond,
2926                            double* amax );
2927 lapack_int LAPACKE_cpoequ( int matrix_layout, lapack_int n,
2928                            const lapack_complex_float* a, lapack_int lda,
2929                            float* s, float* scond, float* amax );
2930 lapack_int LAPACKE_zpoequ( int matrix_layout, lapack_int n,
2931                            const lapack_complex_double* a, lapack_int lda,
2932                            double* s, double* scond, double* amax );
2933
2934 lapack_int LAPACKE_spoequb( int matrix_layout, lapack_int n, const float* a,
2935                             lapack_int lda, float* s, float* scond,
2936                             float* amax );
2937 lapack_int LAPACKE_dpoequb( int matrix_layout, lapack_int n, const double* a,
2938                             lapack_int lda, double* s, double* scond,
2939                             double* amax );
2940 lapack_int LAPACKE_cpoequb( int matrix_layout, lapack_int n,
2941                             const lapack_complex_float* a, lapack_int lda,
2942                             float* s, float* scond, float* amax );
2943 lapack_int LAPACKE_zpoequb( int matrix_layout, lapack_int n,
2944                             const lapack_complex_double* a, lapack_int lda,
2945                             double* s, double* scond, double* amax );
2946
2947 lapack_int LAPACKE_sporfs( int matrix_layout, char uplo, lapack_int n,
2948                            lapack_int nrhs, const float* a, lapack_int lda,
2949                            const float* af, lapack_int ldaf, const float* b,
2950                            lapack_int ldb, float* x, lapack_int ldx,
2951                            float* ferr, float* berr );
2952 lapack_int LAPACKE_dporfs( int matrix_layout, char uplo, lapack_int n,
2953                            lapack_int nrhs, const double* a, lapack_int lda,
2954                            const double* af, lapack_int ldaf, const double* b,
2955                            lapack_int ldb, double* x, lapack_int ldx,
2956                            double* ferr, double* berr );
2957 lapack_int LAPACKE_cporfs( int matrix_layout, char uplo, lapack_int n,
2958                            lapack_int nrhs, const lapack_complex_float* a,
2959                            lapack_int lda, const lapack_complex_float* af,
2960                            lapack_int ldaf, const lapack_complex_float* b,
2961                            lapack_int ldb, lapack_complex_float* x,
2962                            lapack_int ldx, float* ferr, float* berr );
2963 lapack_int LAPACKE_zporfs( int matrix_layout, char uplo, lapack_int n,
2964                            lapack_int nrhs, const lapack_complex_double* a,
2965                            lapack_int lda, const lapack_complex_double* af,
2966                            lapack_int ldaf, const lapack_complex_double* b,
2967                            lapack_int ldb, lapack_complex_double* x,
2968                            lapack_int ldx, double* ferr, double* berr );
2969
2970 lapack_int LAPACKE_sporfsx( int matrix_layout, char uplo, char equed,
2971                             lapack_int n, lapack_int nrhs, const float* a,
2972                             lapack_int lda, const float* af, lapack_int ldaf,
2973                             const float* s, const float* b, lapack_int ldb,
2974                             float* x, lapack_int ldx, float* rcond, float* berr,
2975                             lapack_int n_err_bnds, float* err_bnds_norm,
2976                             float* err_bnds_comp, lapack_int nparams,
2977                             float* params );
2978 lapack_int LAPACKE_dporfsx( int matrix_layout, char uplo, char equed,
2979                             lapack_int n, lapack_int nrhs, const double* a,
2980                             lapack_int lda, const double* af, lapack_int ldaf,
2981                             const double* s, const double* b, lapack_int ldb,
2982                             double* x, lapack_int ldx, double* rcond,
2983                             double* berr, lapack_int n_err_bnds,
2984                             double* err_bnds_norm, double* err_bnds_comp,
2985                             lapack_int nparams, double* params );
2986 lapack_int LAPACKE_cporfsx( int matrix_layout, char uplo, char equed,
2987                             lapack_int n, lapack_int nrhs,
2988                             const lapack_complex_float* a, lapack_int lda,
2989                             const lapack_complex_float* af, lapack_int ldaf,
2990                             const float* s, const lapack_complex_float* b,
2991                             lapack_int ldb, lapack_complex_float* x,
2992                             lapack_int ldx, float* rcond, float* berr,
2993                             lapack_int n_err_bnds, float* err_bnds_norm,
2994                             float* err_bnds_comp, lapack_int nparams,
2995                             float* params );
2996 lapack_int LAPACKE_zporfsx( int matrix_layout, char uplo, char equed,
2997                             lapack_int n, lapack_int nrhs,
2998                             const lapack_complex_double* a, lapack_int lda,
2999                             const lapack_complex_double* af, lapack_int ldaf,
3000                             const double* s, const lapack_complex_double* b,
3001                             lapack_int ldb, lapack_complex_double* x,
3002                             lapack_int ldx, double* rcond, double* berr,
3003                             lapack_int n_err_bnds, double* err_bnds_norm,
3004                             double* err_bnds_comp, lapack_int nparams,
3005                             double* params );
3006
3007 lapack_int LAPACKE_sposv( int matrix_layout, char uplo, lapack_int n,
3008                           lapack_int nrhs, float* a, lapack_int lda, float* b,
3009                           lapack_int ldb );
3010 lapack_int LAPACKE_dposv( int matrix_layout, char uplo, lapack_int n,
3011                           lapack_int nrhs, double* a, lapack_int lda, double* b,
3012                           lapack_int ldb );
3013 lapack_int LAPACKE_cposv( int matrix_layout, char uplo, lapack_int n,
3014                           lapack_int nrhs, lapack_complex_float* a,
3015                           lapack_int lda, lapack_complex_float* b,
3016                           lapack_int ldb );
3017 lapack_int LAPACKE_zposv( int matrix_layout, char uplo, lapack_int n,
3018                           lapack_int nrhs, lapack_complex_double* a,
3019                           lapack_int lda, lapack_complex_double* b,
3020                           lapack_int ldb );
3021 lapack_int LAPACKE_dsposv( int matrix_layout, char uplo, lapack_int n,
3022                            lapack_int nrhs, double* a, lapack_int lda,
3023                            double* b, lapack_int ldb, double* x, lapack_int ldx,
3024                            lapack_int* iter );
3025 lapack_int LAPACKE_zcposv( int matrix_layout, char uplo, lapack_int n,
3026                            lapack_int nrhs, lapack_complex_double* a,
3027                            lapack_int lda, lapack_complex_double* b,
3028                            lapack_int ldb, lapack_complex_double* x,
3029                            lapack_int ldx, lapack_int* iter );
3030
3031 lapack_int LAPACKE_sposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3032                            lapack_int nrhs, float* a, lapack_int lda, float* af,
3033                            lapack_int ldaf, char* equed, float* s, float* b,
3034                            lapack_int ldb, float* x, lapack_int ldx,
3035                            float* rcond, float* ferr, float* berr );
3036 lapack_int LAPACKE_dposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3037                            lapack_int nrhs, double* a, lapack_int lda,
3038                            double* af, lapack_int ldaf, char* equed, double* s,
3039                            double* b, lapack_int ldb, double* x, lapack_int ldx,
3040                            double* rcond, double* ferr, double* berr );
3041 lapack_int LAPACKE_cposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3042                            lapack_int nrhs, lapack_complex_float* a,
3043                            lapack_int lda, lapack_complex_float* af,
3044                            lapack_int ldaf, char* equed, float* s,
3045                            lapack_complex_float* b, lapack_int ldb,
3046                            lapack_complex_float* x, lapack_int ldx,
3047                            float* rcond, float* ferr, float* berr );
3048 lapack_int LAPACKE_zposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3049                            lapack_int nrhs, lapack_complex_double* a,
3050                            lapack_int lda, lapack_complex_double* af,
3051                            lapack_int ldaf, char* equed, double* s,
3052                            lapack_complex_double* b, lapack_int ldb,
3053                            lapack_complex_double* x, lapack_int ldx,
3054                            double* rcond, double* ferr, double* berr );
3055
3056 lapack_int LAPACKE_sposvxx( int matrix_layout, char fact, char uplo,
3057                             lapack_int n, lapack_int nrhs, float* a,
3058                             lapack_int lda, float* af, lapack_int ldaf,
3059                             char* equed, float* s, float* b, lapack_int ldb,
3060                             float* x, lapack_int ldx, float* rcond,
3061                             float* rpvgrw, float* berr, lapack_int n_err_bnds,
3062                             float* err_bnds_norm, float* err_bnds_comp,
3063                             lapack_int nparams, float* params );
3064 lapack_int LAPACKE_dposvxx( int matrix_layout, char fact, char uplo,
3065                             lapack_int n, lapack_int nrhs, double* a,
3066                             lapack_int lda, double* af, lapack_int ldaf,
3067                             char* equed, double* s, double* b, lapack_int ldb,
3068                             double* x, lapack_int ldx, double* rcond,
3069                             double* rpvgrw, double* berr, lapack_int n_err_bnds,
3070                             double* err_bnds_norm, double* err_bnds_comp,
3071                             lapack_int nparams, double* params );
3072 lapack_int LAPACKE_cposvxx( int matrix_layout, char fact, char uplo,
3073                             lapack_int n, lapack_int nrhs,
3074                             lapack_complex_float* a, lapack_int lda,
3075                             lapack_complex_float* af, lapack_int ldaf,
3076                             char* equed, float* s, lapack_complex_float* b,
3077                             lapack_int ldb, lapack_complex_float* x,
3078                             lapack_int ldx, float* rcond, float* rpvgrw,
3079                             float* berr, lapack_int n_err_bnds,
3080                             float* err_bnds_norm, float* err_bnds_comp,
3081                             lapack_int nparams, float* params );
3082 lapack_int LAPACKE_zposvxx( int matrix_layout, char fact, char uplo,
3083                             lapack_int n, lapack_int nrhs,
3084                             lapack_complex_double* a, lapack_int lda,
3085                             lapack_complex_double* af, lapack_int ldaf,
3086                             char* equed, double* s, lapack_complex_double* b,
3087                             lapack_int ldb, lapack_complex_double* x,
3088                             lapack_int ldx, double* rcond, double* rpvgrw,
3089                             double* berr, lapack_int n_err_bnds,
3090                             double* err_bnds_norm, double* err_bnds_comp,
3091                             lapack_int nparams, double* params );
3092
3093 lapack_int LAPACKE_spotrf2( int matrix_layout, char uplo, lapack_int n, float* a,
3094                            lapack_int lda );
3095 lapack_int LAPACKE_dpotrf2( int matrix_layout, char uplo, lapack_int n, double* a,
3096                            lapack_int lda );
3097 lapack_int LAPACKE_cpotrf2( int matrix_layout, char uplo, lapack_int n,
3098                            lapack_complex_float* a, lapack_int lda );
3099 lapack_int LAPACKE_zpotrf2( int matrix_layout, char uplo, lapack_int n,
3100                            lapack_complex_double* a, lapack_int lda );
3101
3102 lapack_int LAPACKE_spotrf( int matrix_layout, char uplo, lapack_int n, float* a,
3103                            lapack_int lda );
3104 lapack_int LAPACKE_dpotrf( int matrix_layout, char uplo, lapack_int n, double* a,
3105                            lapack_int lda );
3106 lapack_int LAPACKE_cpotrf( int matrix_layout, char uplo, lapack_int n,
3107                            lapack_complex_float* a, lapack_int lda );
3108 lapack_int LAPACKE_zpotrf( int matrix_layout, char uplo, lapack_int n,
3109                            lapack_complex_double* a, lapack_int lda );
3110
3111 lapack_int LAPACKE_spotri( int matrix_layout, char uplo, lapack_int n, float* a,
3112                            lapack_int lda );
3113 lapack_int LAPACKE_dpotri( int matrix_layout, char uplo, lapack_int n, double* a,
3114                            lapack_int lda );
3115 lapack_int LAPACKE_cpotri( int matrix_layout, char uplo, lapack_int n,
3116                            lapack_complex_float* a, lapack_int lda );
3117 lapack_int LAPACKE_zpotri( int matrix_layout, char uplo, lapack_int n,
3118                            lapack_complex_double* a, lapack_int lda );
3119
3120 lapack_int LAPACKE_spotrs( int matrix_layout, char uplo, lapack_int n,
3121                            lapack_int nrhs, const float* a, lapack_int lda,
3122                            float* b, lapack_int ldb );
3123 lapack_int LAPACKE_dpotrs( int matrix_layout, char uplo, lapack_int n,
3124                            lapack_int nrhs, const double* a, lapack_int lda,
3125                            double* b, lapack_int ldb );
3126 lapack_int LAPACKE_cpotrs( int matrix_layout, char uplo, lapack_int n,
3127                            lapack_int nrhs, const lapack_complex_float* a,
3128                            lapack_int lda, lapack_complex_float* b,
3129                            lapack_int ldb );
3130 lapack_int LAPACKE_zpotrs( int matrix_layout, char uplo, lapack_int n,
3131                            lapack_int nrhs, const lapack_complex_double* a,
3132                            lapack_int lda, lapack_complex_double* b,
3133                            lapack_int ldb );
3134
3135 lapack_int LAPACKE_sppcon( int matrix_layout, char uplo, lapack_int n,
3136                            const float* ap, float anorm, float* rcond );
3137 lapack_int LAPACKE_dppcon( int matrix_layout, char uplo, lapack_int n,
3138                            const double* ap, double anorm, double* rcond );
3139 lapack_int LAPACKE_cppcon( int matrix_layout, char uplo, lapack_int n,
3140                            const lapack_complex_float* ap, float anorm,
3141                            float* rcond );
3142 lapack_int LAPACKE_zppcon( int matrix_layout, char uplo, lapack_int n,
3143                            const lapack_complex_double* ap, double anorm,
3144                            double* rcond );
3145
3146 lapack_int LAPACKE_sppequ( int matrix_layout, char uplo, lapack_int n,
3147                            const float* ap, float* s, float* scond,
3148                            float* amax );
3149 lapack_int LAPACKE_dppequ( int matrix_layout, char uplo, lapack_int n,
3150                            const double* ap, double* s, double* scond,
3151                            double* amax );
3152 lapack_int LAPACKE_cppequ( int matrix_layout, char uplo, lapack_int n,
3153                            const lapack_complex_float* ap, float* s,
3154                            float* scond, float* amax );
3155 lapack_int LAPACKE_zppequ( int matrix_layout, char uplo, lapack_int n,
3156                            const lapack_complex_double* ap, double* s,
3157                            double* scond, double* amax );
3158
3159 lapack_int LAPACKE_spprfs( int matrix_layout, char uplo, lapack_int n,
3160                            lapack_int nrhs, const float* ap, const float* afp,
3161                            const float* b, lapack_int ldb, float* x,
3162                            lapack_int ldx, float* ferr, float* berr );
3163 lapack_int LAPACKE_dpprfs( int matrix_layout, char uplo, lapack_int n,
3164                            lapack_int nrhs, const double* ap, const double* afp,
3165                            const double* b, lapack_int ldb, double* x,
3166                            lapack_int ldx, double* ferr, double* berr );
3167 lapack_int LAPACKE_cpprfs( int matrix_layout, char uplo, lapack_int n,
3168                            lapack_int nrhs, const lapack_complex_float* ap,
3169                            const lapack_complex_float* afp,
3170                            const lapack_complex_float* b, lapack_int ldb,
3171                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3172                            float* berr );
3173 lapack_int LAPACKE_zpprfs( int matrix_layout, char uplo, lapack_int n,
3174                            lapack_int nrhs, const lapack_complex_double* ap,
3175                            const lapack_complex_double* afp,
3176                            const lapack_complex_double* b, lapack_int ldb,
3177                            lapack_complex_double* x, lapack_int ldx,
3178                            double* ferr, double* berr );
3179
3180 lapack_int LAPACKE_sppsv( int matrix_layout, char uplo, lapack_int n,
3181                           lapack_int nrhs, float* ap, float* b,
3182                           lapack_int ldb );
3183 lapack_int LAPACKE_dppsv( int matrix_layout, char uplo, lapack_int n,
3184                           lapack_int nrhs, double* ap, double* b,
3185                           lapack_int ldb );
3186 lapack_int LAPACKE_cppsv( int matrix_layout, char uplo, lapack_int n,
3187                           lapack_int nrhs, lapack_complex_float* ap,
3188                           lapack_complex_float* b, lapack_int ldb );
3189 lapack_int LAPACKE_zppsv( int matrix_layout, char uplo, lapack_int n,
3190                           lapack_int nrhs, lapack_complex_double* ap,
3191                           lapack_complex_double* b, lapack_int ldb );
3192
3193 lapack_int LAPACKE_sppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3194                            lapack_int nrhs, float* ap, float* afp, char* equed,
3195                            float* s, float* b, lapack_int ldb, float* x,
3196                            lapack_int ldx, float* rcond, float* ferr,
3197                            float* berr );
3198 lapack_int LAPACKE_dppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3199                            lapack_int nrhs, double* ap, double* afp,
3200                            char* equed, double* s, double* b, lapack_int ldb,
3201                            double* x, lapack_int ldx, double* rcond,
3202                            double* ferr, double* berr );
3203 lapack_int LAPACKE_cppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3204                            lapack_int nrhs, lapack_complex_float* ap,
3205                            lapack_complex_float* afp, char* equed, float* s,
3206                            lapack_complex_float* b, lapack_int ldb,
3207                            lapack_complex_float* x, lapack_int ldx,
3208                            float* rcond, float* ferr, float* berr );
3209 lapack_int LAPACKE_zppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3210                            lapack_int nrhs, lapack_complex_double* ap,
3211                            lapack_complex_double* afp, char* equed, double* s,
3212                            lapack_complex_double* b, lapack_int ldb,
3213                            lapack_complex_double* x, lapack_int ldx,
3214                            double* rcond, double* ferr, double* berr );
3215
3216 lapack_int LAPACKE_spptrf( int matrix_layout, char uplo, lapack_int n,
3217                            float* ap );
3218 lapack_int LAPACKE_dpptrf( int matrix_layout, char uplo, lapack_int n,
3219                            double* ap );
3220 lapack_int LAPACKE_cpptrf( int matrix_layout, char uplo, lapack_int n,
3221                            lapack_complex_float* ap );
3222 lapack_int LAPACKE_zpptrf( int matrix_layout, char uplo, lapack_int n,
3223                            lapack_complex_double* ap );
3224
3225 lapack_int LAPACKE_spptri( int matrix_layout, char uplo, lapack_int n,
3226                            float* ap );
3227 lapack_int LAPACKE_dpptri( int matrix_layout, char uplo, lapack_int n,
3228                            double* ap );
3229 lapack_int LAPACKE_cpptri( int matrix_layout, char uplo, lapack_int n,
3230                            lapack_complex_float* ap );
3231 lapack_int LAPACKE_zpptri( int matrix_layout, char uplo, lapack_int n,
3232                            lapack_complex_double* ap );
3233
3234 lapack_int LAPACKE_spptrs( int matrix_layout, char uplo, lapack_int n,
3235                            lapack_int nrhs, const float* ap, float* b,
3236                            lapack_int ldb );
3237 lapack_int LAPACKE_dpptrs( int matrix_layout, char uplo, lapack_int n,
3238                            lapack_int nrhs, const double* ap, double* b,
3239                            lapack_int ldb );
3240 lapack_int LAPACKE_cpptrs( int matrix_layout, char uplo, lapack_int n,
3241                            lapack_int nrhs, const lapack_complex_float* ap,
3242                            lapack_complex_float* b, lapack_int ldb );
3243 lapack_int LAPACKE_zpptrs( int matrix_layout, char uplo, lapack_int n,
3244                            lapack_int nrhs, const lapack_complex_double* ap,
3245                            lapack_complex_double* b, lapack_int ldb );
3246
3247 lapack_int LAPACKE_spstrf( int matrix_layout, char uplo, lapack_int n, float* a,
3248                            lapack_int lda, lapack_int* piv, lapack_int* rank,
3249                            float tol );
3250 lapack_int LAPACKE_dpstrf( int matrix_layout, char uplo, lapack_int n, double* a,
3251                            lapack_int lda, lapack_int* piv, lapack_int* rank,
3252                            double tol );
3253 lapack_int LAPACKE_cpstrf( int matrix_layout, char uplo, lapack_int n,
3254                            lapack_complex_float* a, lapack_int lda,
3255                            lapack_int* piv, lapack_int* rank, float tol );
3256 lapack_int LAPACKE_zpstrf( int matrix_layout, char uplo, lapack_int n,
3257                            lapack_complex_double* a, lapack_int lda,
3258                            lapack_int* piv, lapack_int* rank, double tol );
3259
3260 lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
3261                            float anorm, float* rcond );
3262 lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
3263                            double anorm, double* rcond );
3264 lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
3265                            const lapack_complex_float* e, float anorm,
3266                            float* rcond );
3267 lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
3268                            const lapack_complex_double* e, double anorm,
3269                            double* rcond );
3270
3271 lapack_int LAPACKE_spteqr( int matrix_layout, char compz, lapack_int n, float* d,
3272                            float* e, float* z, lapack_int ldz );
3273 lapack_int LAPACKE_dpteqr( int matrix_layout, char compz, lapack_int n,
3274                            double* d, double* e, double* z, lapack_int ldz );
3275 lapack_int LAPACKE_cpteqr( int matrix_layout, char compz, lapack_int n, float* d,
3276                            float* e, lapack_complex_float* z, lapack_int ldz );
3277 lapack_int LAPACKE_zpteqr( int matrix_layout, char compz, lapack_int n,
3278                            double* d, double* e, lapack_complex_double* z,
3279                            lapack_int ldz );
3280
3281 lapack_int LAPACKE_sptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
3282                            const float* d, const float* e, const float* df,
3283                            const float* ef, const float* b, lapack_int ldb,
3284                            float* x, lapack_int ldx, float* ferr, float* berr );
3285 lapack_int LAPACKE_dptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
3286                            const double* d, const double* e, const double* df,
3287                            const double* ef, const double* b, lapack_int ldb,
3288                            double* x, lapack_int ldx, double* ferr,
3289                            double* berr );
3290 lapack_int LAPACKE_cptrfs( int matrix_layout, char uplo, lapack_int n,
3291                            lapack_int nrhs, const float* d,
3292                            const lapack_complex_float* e, const float* df,
3293                            const lapack_complex_float* ef,
3294                            const lapack_complex_float* b, lapack_int ldb,
3295                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3296                            float* berr );
3297 lapack_int LAPACKE_zptrfs( int matrix_layout, char uplo, lapack_int n,
3298                            lapack_int nrhs, const double* d,
3299                            const lapack_complex_double* e, const double* df,
3300                            const lapack_complex_double* ef,
3301                            const lapack_complex_double* b, lapack_int ldb,
3302                            lapack_complex_double* x, lapack_int ldx,
3303                            double* ferr, double* berr );
3304
3305 lapack_int LAPACKE_sptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3306                           float* d, float* e, float* b, lapack_int ldb );
3307 lapack_int LAPACKE_dptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3308                           double* d, double* e, double* b, lapack_int ldb );
3309 lapack_int LAPACKE_cptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3310                           float* d, lapack_complex_float* e,
3311                           lapack_complex_float* b, lapack_int ldb );
3312 lapack_int LAPACKE_zptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3313                           double* d, lapack_complex_double* e,
3314                           lapack_complex_double* b, lapack_int ldb );
3315
3316 lapack_int LAPACKE_sptsvx( int matrix_layout, char fact, lapack_int n,
3317                            lapack_int nrhs, const float* d, const float* e,
3318                            float* df, float* ef, const float* b, lapack_int ldb,
3319                            float* x, lapack_int ldx, float* rcond, float* ferr,
3320                            float* berr );
3321 lapack_int LAPACKE_dptsvx( int matrix_layout, char fact, lapack_int n,
3322                            lapack_int nrhs, const double* d, const double* e,
3323                            double* df, double* ef, const double* b,
3324                            lapack_int ldb, double* x, lapack_int ldx,
3325                            double* rcond, double* ferr, double* berr );
3326 lapack_int LAPACKE_cptsvx( int matrix_layout, char fact, lapack_int n,
3327                            lapack_int nrhs, const float* d,
3328                            const lapack_complex_float* e, float* df,
3329                            lapack_complex_float* ef,
3330                            const lapack_complex_float* b, lapack_int ldb,
3331                            lapack_complex_float* x, lapack_int ldx,
3332                            float* rcond, float* ferr, float* berr );
3333 lapack_int LAPACKE_zptsvx( int matrix_layout, char fact, lapack_int n,
3334                            lapack_int nrhs, const double* d,
3335                            const lapack_complex_double* e, double* df,
3336                            lapack_complex_double* ef,
3337                            const lapack_complex_double* b, lapack_int ldb,
3338                            lapack_complex_double* x, lapack_int ldx,
3339                            double* rcond, double* ferr, double* berr );
3340
3341 lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
3342 lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
3343 lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
3344 lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
3345
3346 lapack_int LAPACKE_spttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
3347                            const float* d, const float* e, float* b,
3348                            lapack_int ldb );
3349 lapack_int LAPACKE_dpttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
3350                            const double* d, const double* e, double* b,
3351                            lapack_int ldb );
3352 lapack_int LAPACKE_cpttrs( int matrix_layout, char uplo, lapack_int n,
3353                            lapack_int nrhs, const float* d,
3354                            const lapack_complex_float* e,
3355                            lapack_complex_float* b, lapack_int ldb );
3356 lapack_int LAPACKE_zpttrs( int matrix_layout, char uplo, lapack_int n,
3357                            lapack_int nrhs, const double* d,
3358                            const lapack_complex_double* e,
3359                            lapack_complex_double* b, lapack_int ldb );
3360
3361 lapack_int LAPACKE_ssbev( int matrix_layout, char jobz, char uplo, lapack_int n,
3362                           lapack_int kd, float* ab, lapack_int ldab, float* w,
3363                           float* z, lapack_int ldz );
3364 lapack_int LAPACKE_dsbev( int matrix_layout, char jobz, char uplo, lapack_int n,
3365                           lapack_int kd, double* ab, lapack_int ldab, double* w,
3366                           double* z, lapack_int ldz );
3367
3368 lapack_int LAPACKE_ssbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3369                            lapack_int kd, float* ab, lapack_int ldab, float* w,
3370                            float* z, lapack_int ldz );
3371 lapack_int LAPACKE_dsbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3372                            lapack_int kd, double* ab, lapack_int ldab,
3373                            double* w, double* z, lapack_int ldz );
3374
3375 lapack_int LAPACKE_ssbevx( int matrix_layout, char jobz, char range, char uplo,
3376                            lapack_int n, lapack_int kd, float* ab,
3377                            lapack_int ldab, float* q, lapack_int ldq, float vl,
3378                            float vu, lapack_int il, lapack_int iu, float abstol,
3379                            lapack_int* m, float* w, float* z, lapack_int ldz,
3380                            lapack_int* ifail );
3381 lapack_int LAPACKE_dsbevx( int matrix_layout, char jobz, char range, char uplo,
3382                            lapack_int n, lapack_int kd, double* ab,
3383                            lapack_int ldab, double* q, lapack_int ldq,
3384                            double vl, double vu, lapack_int il, lapack_int iu,
3385                            double abstol, lapack_int* m, double* w, double* z,
3386                            lapack_int ldz, lapack_int* ifail );
3387
3388 lapack_int LAPACKE_ssbgst( int matrix_layout, char vect, char uplo, lapack_int n,
3389                            lapack_int ka, lapack_int kb, float* ab,
3390                            lapack_int ldab, const float* bb, lapack_int ldbb,
3391                            float* x, lapack_int ldx );
3392 lapack_int LAPACKE_dsbgst( int matrix_layout, char vect, char uplo, lapack_int n,
3393                            lapack_int ka, lapack_int kb, double* ab,
3394                            lapack_int ldab, const double* bb, lapack_int ldbb,
3395                            double* x, lapack_int ldx );
3396
3397 lapack_int LAPACKE_ssbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
3398                           lapack_int ka, lapack_int kb, float* ab,
3399                           lapack_int ldab, float* bb, lapack_int ldbb, float* w,
3400                           float* z, lapack_int ldz );
3401 lapack_int LAPACKE_dsbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
3402                           lapack_int ka, lapack_int kb, double* ab,
3403                           lapack_int ldab, double* bb, lapack_int ldbb,
3404                           double* w, double* z, lapack_int ldz );
3405
3406 lapack_int LAPACKE_ssbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
3407                            lapack_int ka, lapack_int kb, float* ab,
3408                            lapack_int ldab, float* bb, lapack_int ldbb,
3409                            float* w, float* z, lapack_int ldz );
3410 lapack_int LAPACKE_dsbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
3411                            lapack_int ka, lapack_int kb, double* ab,
3412                            lapack_int ldab, double* bb, lapack_int ldbb,
3413                            double* w, double* z, lapack_int ldz );
3414
3415 lapack_int LAPACKE_ssbgvx( int matrix_layout, char jobz, char range, char uplo,
3416                            lapack_int n, lapack_int ka, lapack_int kb,
3417                            float* ab, lapack_int ldab, float* bb,
3418                            lapack_int ldbb, float* q, lapack_int ldq, float vl,
3419                            float vu, lapack_int il, lapack_int iu, float abstol,
3420                            lapack_int* m, float* w, float* z, lapack_int ldz,
3421                            lapack_int* ifail );
3422 lapack_int LAPACKE_dsbgvx( int matrix_layout, char jobz, char range, char uplo,
3423                            lapack_int n, lapack_int ka, lapack_int kb,
3424                            double* ab, lapack_int ldab, double* bb,
3425                            lapack_int ldbb, double* q, lapack_int ldq,
3426                            double vl, double vu, lapack_int il, lapack_int iu,
3427                            double abstol, lapack_int* m, double* w, double* z,
3428                            lapack_int ldz, lapack_int* ifail );
3429
3430 lapack_int LAPACKE_ssbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
3431                            lapack_int kd, float* ab, lapack_int ldab, float* d,
3432                            float* e, float* q, lapack_int ldq );
3433 lapack_int LAPACKE_dsbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
3434                            lapack_int kd, double* ab, lapack_int ldab,
3435                            double* d, double* e, double* q, lapack_int ldq );
3436
3437 lapack_int LAPACKE_ssfrk( int matrix_layout, char transr, char uplo, char trans,
3438                           lapack_int n, lapack_int k, float alpha,
3439                           const float* a, lapack_int lda, float beta,
3440                           float* c );
3441 lapack_int LAPACKE_dsfrk( int matrix_layout, char transr, char uplo, char trans,
3442                           lapack_int n, lapack_int k, double alpha,
3443                           const double* a, lapack_int lda, double beta,
3444                           double* c );
3445
3446 lapack_int LAPACKE_sspcon( int matrix_layout, char uplo, lapack_int n,
3447                            const float* ap, const lapack_int* ipiv, float anorm,
3448                            float* rcond );
3449 lapack_int LAPACKE_dspcon( int matrix_layout, char uplo, lapack_int n,
3450                            const double* ap, const lapack_int* ipiv,
3451                            double anorm, double* rcond );
3452 lapack_int LAPACKE_cspcon( int matrix_layout, char uplo, lapack_int n,
3453                            const lapack_complex_float* ap,
3454                            const lapack_int* ipiv, float anorm, float* rcond );
3455 lapack_int LAPACKE_zspcon( int matrix_layout, char uplo, lapack_int n,
3456                            const lapack_complex_double* ap,
3457                            const lapack_int* ipiv, double anorm,
3458                            double* rcond );
3459
3460 lapack_int LAPACKE_sspev( int matrix_layout, char jobz, char uplo, lapack_int n,
3461                           float* ap, float* w, float* z, lapack_int ldz );
3462 lapack_int LAPACKE_dspev( int matrix_layout, char jobz, char uplo, lapack_int n,
3463                           double* ap, double* w, double* z, lapack_int ldz );
3464
3465 lapack_int LAPACKE_sspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3466                            float* ap, float* w, float* z, lapack_int ldz );
3467 lapack_int LAPACKE_dspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3468                            double* ap, double* w, double* z, lapack_int ldz );
3469
3470 lapack_int LAPACKE_sspevx( int matrix_layout, char jobz, char range, char uplo,
3471                            lapack_int n, float* ap, float vl, float vu,
3472                            lapack_int il, lapack_int iu, float abstol,
3473                            lapack_int* m, float* w, float* z, lapack_int ldz,
3474                            lapack_int* ifail );
3475 lapack_int LAPACKE_dspevx( int matrix_layout, char jobz, char range, char uplo,
3476                            lapack_int n, double* ap, double vl, double vu,
3477                            lapack_int il, lapack_int iu, double abstol,
3478                            lapack_int* m, double* w, double* z, lapack_int ldz,
3479                            lapack_int* ifail );
3480
3481 lapack_int LAPACKE_sspgst( int matrix_layout, lapack_int itype, char uplo,
3482                            lapack_int n, float* ap, const float* bp );
3483 lapack_int LAPACKE_dspgst( int matrix_layout, lapack_int itype, char uplo,
3484                            lapack_int n, double* ap, const double* bp );
3485
3486 lapack_int LAPACKE_sspgv( int matrix_layout, lapack_int itype, char jobz,
3487                           char uplo, lapack_int n, float* ap, float* bp,
3488                           float* w, float* z, lapack_int ldz );
3489 lapack_int LAPACKE_dspgv( int matrix_layout, lapack_int itype, char jobz,
3490                           char uplo, lapack_int n, double* ap, double* bp,
3491                           double* w, double* z, lapack_int ldz );
3492
3493 lapack_int LAPACKE_sspgvd( int matrix_layout, lapack_int itype, char jobz,
3494                            char uplo, lapack_int n, float* ap, float* bp,
3495                            float* w, float* z, lapack_int ldz );
3496 lapack_int LAPACKE_dspgvd( int matrix_layout, lapack_int itype, char jobz,
3497                            char uplo, lapack_int n, double* ap, double* bp,
3498                            double* w, double* z, lapack_int ldz );
3499
3500 lapack_int LAPACKE_sspgvx( int matrix_layout, lapack_int itype, char jobz,
3501                            char range, char uplo, lapack_int n, float* ap,
3502                            float* bp, float vl, float vu, lapack_int il,
3503                            lapack_int iu, float abstol, lapack_int* m, float* w,
3504                            float* z, lapack_int ldz, lapack_int* ifail );
3505 lapack_int LAPACKE_dspgvx( int matrix_layout, lapack_int itype, char jobz,
3506                            char range, char uplo, lapack_int n, double* ap,
3507                            double* bp, double vl, double vu, lapack_int il,
3508                            lapack_int iu, double abstol, lapack_int* m,
3509                            double* w, double* z, lapack_int ldz,
3510                            lapack_int* ifail );
3511
3512 lapack_int LAPACKE_ssprfs( int matrix_layout, char uplo, lapack_int n,
3513                            lapack_int nrhs, const float* ap, const float* afp,
3514                            const lapack_int* ipiv, const float* b,
3515                            lapack_int ldb, float* x, lapack_int ldx,
3516                            float* ferr, float* berr );
3517 lapack_int LAPACKE_dsprfs( int matrix_layout, char uplo, lapack_int n,
3518                            lapack_int nrhs, const double* ap, const double* afp,
3519                            const lapack_int* ipiv, const double* b,
3520                            lapack_int ldb, double* x, lapack_int ldx,
3521                            double* ferr, double* berr );
3522 lapack_int LAPACKE_csprfs( int matrix_layout, char uplo, lapack_int n,
3523                            lapack_int nrhs, const lapack_complex_float* ap,
3524                            const lapack_complex_float* afp,
3525                            const lapack_int* ipiv,
3526                            const lapack_complex_float* b, lapack_int ldb,
3527                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3528                            float* berr );
3529 lapack_int LAPACKE_zsprfs( int matrix_layout, char uplo, lapack_int n,
3530                            lapack_int nrhs, const lapack_complex_double* ap,
3531                            const lapack_complex_double* afp,
3532                            const lapack_int* ipiv,
3533                            const lapack_complex_double* b, lapack_int ldb,
3534                            lapack_complex_double* x, lapack_int ldx,
3535                            double* ferr, double* berr );
3536
3537 lapack_int LAPACKE_sspsv( int matrix_layout, char uplo, lapack_int n,
3538                           lapack_int nrhs, float* ap, lapack_int* ipiv,
3539                           float* b, lapack_int ldb );
3540 lapack_int LAPACKE_dspsv( int matrix_layout, char uplo, lapack_int n,
3541                           lapack_int nrhs, double* ap, lapack_int* ipiv,
3542                           double* b, lapack_int ldb );
3543 lapack_int LAPACKE_cspsv( int matrix_layout, char uplo, lapack_int n,
3544                           lapack_int nrhs, lapack_complex_float* ap,
3545                           lapack_int* ipiv, lapack_complex_float* b,
3546                           lapack_int ldb );
3547 lapack_int LAPACKE_zspsv( int matrix_layout, char uplo, lapack_int n,
3548                           lapack_int nrhs, lapack_complex_double* ap,
3549                           lapack_int* ipiv, lapack_complex_double* b,
3550                           lapack_int ldb );
3551
3552 lapack_int LAPACKE_sspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3553                            lapack_int nrhs, const float* ap, float* afp,
3554                            lapack_int* ipiv, const float* b, lapack_int ldb,
3555                            float* x, lapack_int ldx, float* rcond, float* ferr,
3556                            float* berr );
3557 lapack_int LAPACKE_dspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3558                            lapack_int nrhs, const double* ap, double* afp,
3559                            lapack_int* ipiv, const double* b, lapack_int ldb,
3560                            double* x, lapack_int ldx, double* rcond,
3561                            double* ferr, double* berr );
3562 lapack_int LAPACKE_cspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3563                            lapack_int nrhs, const lapack_complex_float* ap,
3564                            lapack_complex_float* afp, lapack_int* ipiv,
3565                            const lapack_complex_float* b, lapack_int ldb,
3566                            lapack_complex_float* x, lapack_int ldx,
3567                            float* rcond, float* ferr, float* berr );
3568 lapack_int LAPACKE_zspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3569                            lapack_int nrhs, const lapack_complex_double* ap,
3570                            lapack_complex_double* afp, lapack_int* ipiv,
3571                            const lapack_complex_double* b, lapack_int ldb,
3572                            lapack_complex_double* x, lapack_int ldx,
3573                            double* rcond, double* ferr, double* berr );
3574
3575 lapack_int LAPACKE_ssptrd( int matrix_layout, char uplo, lapack_int n, float* ap,
3576                            float* d, float* e, float* tau );
3577 lapack_int LAPACKE_dsptrd( int matrix_layout, char uplo, lapack_int n,
3578                            double* ap, double* d, double* e, double* tau );
3579
3580 lapack_int LAPACKE_ssptrf( int matrix_layout, char uplo, lapack_int n, float* ap,
3581                            lapack_int* ipiv );
3582 lapack_int LAPACKE_dsptrf( int matrix_layout, char uplo, lapack_int n,
3583                            double* ap, lapack_int* ipiv );
3584 lapack_int LAPACKE_csptrf( int matrix_layout, char uplo, lapack_int n,
3585                            lapack_complex_float* ap, lapack_int* ipiv );
3586 lapack_int LAPACKE_zsptrf( int matrix_layout, char uplo, lapack_int n,
3587                            lapack_complex_double* ap, lapack_int* ipiv );
3588
3589 lapack_int LAPACKE_ssptri( int matrix_layout, char uplo, lapack_int n, float* ap,
3590                            const lapack_int* ipiv );
3591 lapack_int LAPACKE_dsptri( int matrix_layout, char uplo, lapack_int n,
3592                            double* ap, const lapack_int* ipiv );
3593 lapack_int LAPACKE_csptri( int matrix_layout, char uplo, lapack_int n,
3594                            lapack_complex_float* ap, const lapack_int* ipiv );
3595 lapack_int LAPACKE_zsptri( int matrix_layout, char uplo, lapack_int n,
3596                            lapack_complex_double* ap, const lapack_int* ipiv );
3597
3598 lapack_int LAPACKE_ssptrs( int matrix_layout, char uplo, lapack_int n,
3599                            lapack_int nrhs, const float* ap,
3600                            const lapack_int* ipiv, float* b, lapack_int ldb );
3601 lapack_int LAPACKE_dsptrs( int matrix_layout, char uplo, lapack_int n,
3602                            lapack_int nrhs, const double* ap,
3603                            const lapack_int* ipiv, double* b, lapack_int ldb );
3604 lapack_int LAPACKE_csptrs( int matrix_layout, char uplo, lapack_int n,
3605                            lapack_int nrhs, const lapack_complex_float* ap,
3606                            const lapack_int* ipiv, lapack_complex_float* b,
3607                            lapack_int ldb );
3608 lapack_int LAPACKE_zsptrs( int matrix_layout, char uplo, lapack_int n,
3609                            lapack_int nrhs, const lapack_complex_double* ap,
3610                            const lapack_int* ipiv, lapack_complex_double* b,
3611                            lapack_int ldb );
3612
3613 lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
3614                            float vu, lapack_int il, lapack_int iu, float abstol,
3615                            const float* d, const float* e, lapack_int* m,
3616                            lapack_int* nsplit, float* w, lapack_int* iblock,
3617                            lapack_int* isplit );
3618 lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
3619                            double vu, lapack_int il, lapack_int iu,
3620                            double abstol, const double* d, const double* e,
3621                            lapack_int* m, lapack_int* nsplit, double* w,
3622                            lapack_int* iblock, lapack_int* isplit );
3623
3624 lapack_int LAPACKE_sstedc( int matrix_layout, char compz, lapack_int n, float* d,
3625                            float* e, float* z, lapack_int ldz );
3626 lapack_int LAPACKE_dstedc( int matrix_layout, char compz, lapack_int n,
3627                            double* d, double* e, double* z, lapack_int ldz );
3628 lapack_int LAPACKE_cstedc( int matrix_layout, char compz, lapack_int n, float* d,
3629                            float* e, lapack_complex_float* z, lapack_int ldz );
3630 lapack_int LAPACKE_zstedc( int matrix_layout, char compz, lapack_int n,
3631                            double* d, double* e, lapack_complex_double* z,
3632                            lapack_int ldz );
3633
3634 lapack_int LAPACKE_sstegr( int matrix_layout, char jobz, char range,
3635                            lapack_int n, float* d, float* e, float vl, float vu,
3636                            lapack_int il, lapack_int iu, float abstol,
3637                            lapack_int* m, float* w, float* z, lapack_int ldz,
3638                            lapack_int* isuppz );
3639 lapack_int LAPACKE_dstegr( int matrix_layout, char jobz, char range,
3640                            lapack_int n, double* d, double* e, double vl,
3641                            double vu, lapack_int il, lapack_int iu,
3642                            double abstol, lapack_int* m, double* w, double* z,
3643                            lapack_int ldz, lapack_int* isuppz );
3644 lapack_int LAPACKE_cstegr( int matrix_layout, char jobz, char range,
3645                            lapack_int n, float* d, float* e, float vl, float vu,
3646                            lapack_int il, lapack_int iu, float abstol,
3647                            lapack_int* m, float* w, lapack_complex_float* z,
3648                            lapack_int ldz, lapack_int* isuppz );
3649 lapack_int LAPACKE_zstegr( int matrix_layout, char jobz, char range,
3650                            lapack_int n, double* d, double* e, double vl,
3651                            double vu, lapack_int il, lapack_int iu,
3652                            double abstol, lapack_int* m, double* w,
3653                            lapack_complex_double* z, lapack_int ldz,
3654                            lapack_int* isuppz );
3655
3656 lapack_int LAPACKE_sstein( int matrix_layout, lapack_int n, const float* d,
3657                            const float* e, lapack_int m, const float* w,
3658                            const lapack_int* iblock, const lapack_int* isplit,
3659                            float* z, lapack_int ldz, lapack_int* ifailv );
3660 lapack_int LAPACKE_dstein( int matrix_layout, lapack_int n, const double* d,
3661                            const double* e, lapack_int m, const double* w,
3662                            const lapack_int* iblock, const lapack_int* isplit,
3663                            double* z, lapack_int ldz, lapack_int* ifailv );
3664 lapack_int LAPACKE_cstein( int matrix_layout, lapack_int n, const float* d,
3665                            const float* e, lapack_int m, const float* w,
3666                            const lapack_int* iblock, const lapack_int* isplit,
3667                            lapack_complex_float* z, lapack_int ldz,
3668                            lapack_int* ifailv );
3669 lapack_int LAPACKE_zstein( int matrix_layout, lapack_int n, const double* d,
3670                            const double* e, lapack_int m, const double* w,
3671                            const lapack_int* iblock, const lapack_int* isplit,
3672                            lapack_complex_double* z, lapack_int ldz,
3673                            lapack_int* ifailv );
3674
3675 lapack_int LAPACKE_sstemr( int matrix_layout, char jobz, char range,
3676                            lapack_int n, float* d, float* e, float vl, float vu,
3677                            lapack_int il, lapack_int iu, lapack_int* m,
3678                            float* w, float* z, lapack_int ldz, lapack_int nzc,
3679                            lapack_int* isuppz, lapack_logical* tryrac );
3680 lapack_int LAPACKE_dstemr( int matrix_layout, char jobz, char range,
3681                            lapack_int n, double* d, double* e, double vl,
3682                            double vu, lapack_int il, lapack_int iu,
3683                            lapack_int* m, double* w, double* z, lapack_int ldz,
3684                            lapack_int nzc, lapack_int* isuppz,
3685                            lapack_logical* tryrac );
3686 lapack_int LAPACKE_cstemr( int matrix_layout, char jobz, char range,
3687                            lapack_int n, float* d, float* e, float vl, float vu,
3688                            lapack_int il, lapack_int iu, lapack_int* m,
3689                            float* w, lapack_complex_float* z, lapack_int ldz,
3690                            lapack_int nzc, lapack_int* isuppz,
3691                            lapack_logical* tryrac );
3692 lapack_int LAPACKE_zstemr( int matrix_layout, char jobz, char range,
3693                            lapack_int n, double* d, double* e, double vl,
3694                            double vu, lapack_int il, lapack_int iu,
3695                            lapack_int* m, double* w, lapack_complex_double* z,
3696                            lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
3697                            lapack_logical* tryrac );
3698
3699 lapack_int LAPACKE_ssteqr( int matrix_layout, char compz, lapack_int n, float* d,
3700                            float* e, float* z, lapack_int ldz );
3701 lapack_int LAPACKE_dsteqr( int matrix_layout, char compz, lapack_int n,
3702                            double* d, double* e, double* z, lapack_int ldz );
3703 lapack_int LAPACKE_csteqr( int matrix_layout, char compz, lapack_int n, float* d,
3704                            float* e, lapack_complex_float* z, lapack_int ldz );
3705 lapack_int LAPACKE_zsteqr( int matrix_layout, char compz, lapack_int n,
3706                            double* d, double* e, lapack_complex_double* z,
3707                            lapack_int ldz );
3708
3709 lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
3710 lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
3711
3712 lapack_int LAPACKE_sstev( int matrix_layout, char jobz, lapack_int n, float* d,
3713                           float* e, float* z, lapack_int ldz );
3714 lapack_int LAPACKE_dstev( int matrix_layout, char jobz, lapack_int n, double* d,
3715                           double* e, double* z, lapack_int ldz );
3716
3717 lapack_int LAPACKE_sstevd( int matrix_layout, char jobz, lapack_int n, float* d,
3718                            float* e, float* z, lapack_int ldz );
3719 lapack_int LAPACKE_dstevd( int matrix_layout, char jobz, lapack_int n, double* d,
3720                            double* e, double* z, lapack_int ldz );
3721
3722 lapack_int LAPACKE_sstevr( int matrix_layout, char jobz, char range,
3723                            lapack_int n, float* d, float* e, float vl, float vu,
3724                            lapack_int il, lapack_int iu, float abstol,
3725                            lapack_int* m, float* w, float* z, lapack_int ldz,
3726                            lapack_int* isuppz );
3727 lapack_int LAPACKE_dstevr( int matrix_layout, char jobz, char range,
3728                            lapack_int n, double* d, double* e, double vl,
3729                            double vu, lapack_int il, lapack_int iu,
3730                            double abstol, lapack_int* m, double* w, double* z,
3731                            lapack_int ldz, lapack_int* isuppz );
3732
3733 lapack_int LAPACKE_sstevx( int matrix_layout, char jobz, char range,
3734                            lapack_int n, float* d, float* e, float vl, float vu,
3735                            lapack_int il, lapack_int iu, float abstol,
3736                            lapack_int* m, float* w, float* z, lapack_int ldz,
3737                            lapack_int* ifail );
3738 lapack_int LAPACKE_dstevx( int matrix_layout, char jobz, char range,
3739                            lapack_int n, double* d, double* e, double vl,
3740                            double vu, lapack_int il, lapack_int iu,
3741                            double abstol, lapack_int* m, double* w, double* z,
3742                            lapack_int ldz, lapack_int* ifail );
3743
3744 lapack_int LAPACKE_ssycon( int matrix_layout, char uplo, lapack_int n,
3745                            const float* a, lapack_int lda,
3746                            const lapack_int* ipiv, float anorm, float* rcond );
3747 lapack_int LAPACKE_dsycon( int matrix_layout, char uplo, lapack_int n,
3748                            const double* a, lapack_int lda,
3749                            const lapack_int* ipiv, double anorm,
3750                            double* rcond );
3751 lapack_int LAPACKE_csycon( int matrix_layout, char uplo, lapack_int n,
3752                            const lapack_complex_float* a, lapack_int lda,
3753                            const lapack_int* ipiv, float anorm, float* rcond );
3754 lapack_int LAPACKE_zsycon( int matrix_layout, char uplo, lapack_int n,
3755                            const lapack_complex_double* a, lapack_int lda,
3756                            const lapack_int* ipiv, double anorm,
3757                            double* rcond );
3758
3759 lapack_int LAPACKE_ssyequb( int matrix_layout, char uplo, lapack_int n,
3760                             const float* a, lapack_int lda, float* s,
3761                             float* scond, float* amax );
3762 lapack_int LAPACKE_dsyequb( int matrix_layout, char uplo, lapack_int n,
3763                             const double* a, lapack_int lda, double* s,
3764                             double* scond, double* amax );
3765 lapack_int LAPACKE_csyequb( int matrix_layout, char uplo, lapack_int n,
3766                             const lapack_complex_float* a, lapack_int lda,
3767                             float* s, float* scond, float* amax );
3768 lapack_int LAPACKE_zsyequb( int matrix_layout, char uplo, lapack_int n,
3769                             const lapack_complex_double* a, lapack_int lda,
3770                             double* s, double* scond, double* amax );
3771
3772 lapack_int LAPACKE_ssyev( int matrix_layout, char jobz, char uplo, lapack_int n,
3773                           float* a, lapack_int lda, float* w );
3774 lapack_int LAPACKE_dsyev( int matrix_layout, char jobz, char uplo, lapack_int n,
3775                           double* a, lapack_int lda, double* w );
3776
3777 lapack_int LAPACKE_ssyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3778                            float* a, lapack_int lda, float* w );
3779 lapack_int LAPACKE_dsyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3780                            double* a, lapack_int lda, double* w );
3781
3782 lapack_int LAPACKE_ssyevr( int matrix_layout, char jobz, char range, char uplo,
3783                            lapack_int n, float* a, lapack_int lda, float vl,
3784                            float vu, lapack_int il, lapack_int iu, float abstol,
3785                            lapack_int* m, float* w, float* z, lapack_int ldz,
3786                            lapack_int* isuppz );
3787 lapack_int LAPACKE_dsyevr( int matrix_layout, char jobz, char range, char uplo,
3788                            lapack_int n, double* a, lapack_int lda, double vl,
3789                            double vu, lapack_int il, lapack_int iu,
3790                            double abstol, lapack_int* m, double* w, double* z,
3791                            lapack_int ldz, lapack_int* isuppz );
3792
3793 lapack_int LAPACKE_ssyevx( int matrix_layout, char jobz, char range, char uplo,
3794                            lapack_int n, float* a, lapack_int lda, float vl,
3795                            float vu, lapack_int il, lapack_int iu, float abstol,
3796                            lapack_int* m, float* w, float* z, lapack_int ldz,
3797                            lapack_int* ifail );
3798 lapack_int LAPACKE_dsyevx( int matrix_layout, char jobz, char range, char uplo,
3799                            lapack_int n, double* a, lapack_int lda, double vl,
3800                            double vu, lapack_int il, lapack_int iu,
3801                            double abstol, lapack_int* m, double* w, double* z,
3802                            lapack_int ldz, lapack_int* ifail );
3803
3804 lapack_int LAPACKE_ssygst( int matrix_layout, lapack_int itype, char uplo,
3805                            lapack_int n, float* a, lapack_int lda,
3806                            const float* b, lapack_int ldb );
3807 lapack_int LAPACKE_dsygst( int matrix_layout, lapack_int itype, char uplo,
3808                            lapack_int n, double* a, lapack_int lda,
3809                            const double* b, lapack_int ldb );
3810
3811 lapack_int LAPACKE_ssygv( int matrix_layout, lapack_int itype, char jobz,
3812                           char uplo, lapack_int n, float* a, lapack_int lda,
3813                           float* b, lapack_int ldb, float* w );
3814 lapack_int LAPACKE_dsygv( int matrix_layout, lapack_int itype, char jobz,
3815                           char uplo, lapack_int n, double* a, lapack_int lda,
3816                           double* b, lapack_int ldb, double* w );
3817
3818 lapack_int LAPACKE_ssygvd( int matrix_layout, lapack_int itype, char jobz,
3819                            char uplo, lapack_int n, float* a, lapack_int lda,
3820                            float* b, lapack_int ldb, float* w );
3821 lapack_int LAPACKE_dsygvd( int matrix_layout, lapack_int itype, char jobz,
3822                            char uplo, lapack_int n, double* a, lapack_int lda,
3823                            double* b, lapack_int ldb, double* w );
3824
3825 lapack_int LAPACKE_ssygvx( int matrix_layout, lapack_int itype, char jobz,
3826                            char range, char uplo, lapack_int n, float* a,
3827                            lapack_int lda, float* b, lapack_int ldb, float vl,
3828                            float vu, lapack_int il, lapack_int iu, float abstol,
3829                            lapack_int* m, float* w, float* z, lapack_int ldz,
3830                            lapack_int* ifail );
3831 lapack_int LAPACKE_dsygvx( int matrix_layout, lapack_int itype, char jobz,
3832                            char range, char uplo, lapack_int n, double* a,
3833                            lapack_int lda, double* b, lapack_int ldb, double vl,
3834                            double vu, lapack_int il, lapack_int iu,
3835                            double abstol, lapack_int* m, double* w, double* z,
3836                            lapack_int ldz, lapack_int* ifail );
3837
3838 lapack_int LAPACKE_ssyrfs( int matrix_layout, char uplo, lapack_int n,
3839                            lapack_int nrhs, const float* a, lapack_int lda,
3840                            const float* af, lapack_int ldaf,
3841                            const lapack_int* ipiv, const float* b,
3842                            lapack_int ldb, float* x, lapack_int ldx,
3843                            float* ferr, float* berr );
3844 lapack_int LAPACKE_dsyrfs( int matrix_layout, char uplo, lapack_int n,
3845                            lapack_int nrhs, const double* a, lapack_int lda,
3846                            const double* af, lapack_int ldaf,
3847                            const lapack_int* ipiv, const double* b,
3848                            lapack_int ldb, double* x, lapack_int ldx,
3849                            double* ferr, double* berr );
3850 lapack_int LAPACKE_csyrfs( int matrix_layout, char uplo, lapack_int n,
3851                            lapack_int nrhs, const lapack_complex_float* a,
3852                            lapack_int lda, const lapack_complex_float* af,
3853                            lapack_int ldaf, const lapack_int* ipiv,
3854                            const lapack_complex_float* b, lapack_int ldb,
3855                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3856                            float* berr );
3857 lapack_int LAPACKE_zsyrfs( int matrix_layout, char uplo, lapack_int n,
3858                            lapack_int nrhs, const lapack_complex_double* a,
3859                            lapack_int lda, const lapack_complex_double* af,
3860                            lapack_int ldaf, const lapack_int* ipiv,
3861                            const lapack_complex_double* b, lapack_int ldb,
3862                            lapack_complex_double* x, lapack_int ldx,
3863                            double* ferr, double* berr );
3864
3865 lapack_int LAPACKE_ssyrfsx( int matrix_layout, char uplo, char equed,
3866                             lapack_int n, lapack_int nrhs, const float* a,
3867                             lapack_int lda, const float* af, lapack_int ldaf,
3868                             const lapack_int* ipiv, const float* s,
3869                             const float* b, lapack_int ldb, float* x,
3870                             lapack_int ldx, float* rcond, float* berr,
3871                             lapack_int n_err_bnds, float* err_bnds_norm,
3872                             float* err_bnds_comp, lapack_int nparams,
3873                             float* params );
3874 lapack_int LAPACKE_dsyrfsx( int matrix_layout, char uplo, char equed,
3875                             lapack_int n, lapack_int nrhs, const double* a,
3876                             lapack_int lda, const double* af, lapack_int ldaf,
3877                             const lapack_int* ipiv, const double* s,
3878                             const double* b, lapack_int ldb, double* x,
3879                             lapack_int ldx, double* rcond, double* berr,
3880                             lapack_int n_err_bnds, double* err_bnds_norm,
3881                             double* err_bnds_comp, lapack_int nparams,
3882                             double* params );
3883 lapack_int LAPACKE_csyrfsx( int matrix_layout, char uplo, char equed,
3884                             lapack_int n, lapack_int nrhs,
3885                             const lapack_complex_float* a, lapack_int lda,
3886                             const lapack_complex_float* af, lapack_int ldaf,
3887                             const lapack_int* ipiv, const float* s,
3888                             const lapack_complex_float* b, lapack_int ldb,
3889                             lapack_complex_float* x, lapack_int ldx,
3890                             float* rcond, float* berr, lapack_int n_err_bnds,
3891                             float* err_bnds_norm, float* err_bnds_comp,
3892                             lapack_int nparams, float* params );
3893 lapack_int LAPACKE_zsyrfsx( int matrix_layout, char uplo, char equed,
3894                             lapack_int n, lapack_int nrhs,
3895                             const lapack_complex_double* a, lapack_int lda,
3896                             const lapack_complex_double* af, lapack_int ldaf,
3897                             const lapack_int* ipiv, const double* s,
3898                             const lapack_complex_double* b, lapack_int ldb,
3899                             lapack_complex_double* x, lapack_int ldx,
3900                             double* rcond, double* berr, lapack_int n_err_bnds,
3901                             double* err_bnds_norm, double* err_bnds_comp,
3902                             lapack_int nparams, double* params );
3903
3904 lapack_int LAPACKE_ssysv( int matrix_layout, char uplo, lapack_int n,
3905                           lapack_int nrhs, float* a, lapack_int lda,
3906                           lapack_int* ipiv, float* b, lapack_int ldb );
3907 lapack_int LAPACKE_dsysv( int matrix_layout, char uplo, lapack_int n,
3908                           lapack_int nrhs, double* a, lapack_int lda,
3909                           lapack_int* ipiv, double* b, lapack_int ldb );
3910 lapack_int LAPACKE_csysv( int matrix_layout, char uplo, lapack_int n,
3911                           lapack_int nrhs, lapack_complex_float* a,
3912                           lapack_int lda, lapack_int* ipiv,
3913                           lapack_complex_float* b, lapack_int ldb );
3914 lapack_int LAPACKE_zsysv( int matrix_layout, char uplo, lapack_int n,
3915                           lapack_int nrhs, lapack_complex_double* a,
3916                           lapack_int lda, lapack_int* ipiv,
3917                           lapack_complex_double* b, lapack_int ldb );
3918
3919 lapack_int LAPACKE_ssysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3920                            lapack_int nrhs, const float* a, lapack_int lda,
3921                            float* af, lapack_int ldaf, lapack_int* ipiv,
3922                            const float* b, lapack_int ldb, float* x,
3923                            lapack_int ldx, float* rcond, float* ferr,
3924                            float* berr );
3925 lapack_int LAPACKE_dsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3926                            lapack_int nrhs, const double* a, lapack_int lda,
3927                            double* af, lapack_int ldaf, lapack_int* ipiv,
3928                            const double* b, lapack_int ldb, double* x,
3929                            lapack_int ldx, double* rcond, double* ferr,
3930                            double* berr );
3931 lapack_int LAPACKE_csysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3932                            lapack_int nrhs, const lapack_complex_float* a,
3933                            lapack_int lda, lapack_complex_float* af,
3934                            lapack_int ldaf, lapack_int* ipiv,
3935                            const lapack_complex_float* b, lapack_int ldb,
3936                            lapack_complex_float* x, lapack_int ldx,
3937                            float* rcond, float* ferr, float* berr );
3938 lapack_int LAPACKE_zsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3939                            lapack_int nrhs, const lapack_complex_double* a,
3940                            lapack_int lda, lapack_complex_double* af,
3941                            lapack_int ldaf, lapack_int* ipiv,
3942                            const lapack_complex_double* b, lapack_int ldb,
3943                            lapack_complex_double* x, lapack_int ldx,
3944                            double* rcond, double* ferr, double* berr );
3945
3946 lapack_int LAPACKE_ssysvxx( int matrix_layout, char fact, char uplo,
3947                             lapack_int n, lapack_int nrhs, float* a,
3948                             lapack_int lda, float* af, lapack_int ldaf,
3949                             lapack_int* ipiv, char* equed, float* s, float* b,
3950                             lapack_int ldb, float* x, lapack_int ldx,
3951                             float* rcond, float* rpvgrw, float* berr,
3952                             lapack_int n_err_bnds, float* err_bnds_norm,
3953                             float* err_bnds_comp, lapack_int nparams,
3954                             float* params );
3955 lapack_int LAPACKE_dsysvxx( int matrix_layout, char fact, char uplo,
3956                             lapack_int n, lapack_int nrhs, double* a,
3957                             lapack_int lda, double* af, lapack_int ldaf,
3958                             lapack_int* ipiv, char* equed, double* s, double* b,
3959                             lapack_int ldb, double* x, lapack_int ldx,
3960                             double* rcond, double* rpvgrw, double* berr,
3961                             lapack_int n_err_bnds, double* err_bnds_norm,
3962                             double* err_bnds_comp, lapack_int nparams,
3963                             double* params );
3964 lapack_int LAPACKE_csysvxx( int matrix_layout, char fact, char uplo,
3965                             lapack_int n, lapack_int nrhs,
3966                             lapack_complex_float* a, lapack_int lda,
3967                             lapack_complex_float* af, lapack_int ldaf,
3968                             lapack_int* ipiv, char* equed, float* s,
3969                             lapack_complex_float* b, lapack_int ldb,
3970                             lapack_complex_float* x, lapack_int ldx,
3971                             float* rcond, float* rpvgrw, float* berr,
3972                             lapack_int n_err_bnds, float* err_bnds_norm,
3973                             float* err_bnds_comp, lapack_int nparams,
3974                             float* params );
3975 lapack_int LAPACKE_zsysvxx( int matrix_layout, char fact, char uplo,
3976                             lapack_int n, lapack_int nrhs,
3977                             lapack_complex_double* a, lapack_int lda,
3978                             lapack_complex_double* af, lapack_int ldaf,
3979                             lapack_int* ipiv, char* equed, double* s,
3980                             lapack_complex_double* b, lapack_int ldb,
3981                             lapack_complex_double* x, lapack_int ldx,
3982                             double* rcond, double* rpvgrw, double* berr,
3983                             lapack_int n_err_bnds, double* err_bnds_norm,
3984                             double* err_bnds_comp, lapack_int nparams,
3985                             double* params );
3986
3987 lapack_int LAPACKE_ssytrd( int matrix_layout, char uplo, lapack_int n, float* a,
3988                            lapack_int lda, float* d, float* e, float* tau );
3989 lapack_int LAPACKE_dsytrd( int matrix_layout, char uplo, lapack_int n, double* a,
3990                            lapack_int lda, double* d, double* e, double* tau );
3991
3992 lapack_int LAPACKE_ssytrf( int matrix_layout, char uplo, lapack_int n, float* a,
3993                            lapack_int lda, lapack_int* ipiv );
3994 lapack_int LAPACKE_dsytrf( int matrix_layout, char uplo, lapack_int n, double* a,
3995                            lapack_int lda, lapack_int* ipiv );
3996 lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n,
3997                            lapack_complex_float* a, lapack_int lda,
3998                            lapack_int* ipiv );
3999 lapack_int LAPACKE_zsytrf( int matrix_layout, char uplo, lapack_int n,
4000                            lapack_complex_double* a, lapack_int lda,
4001                            lapack_int* ipiv );
4002
4003 lapack_int LAPACKE_ssytri( int matrix_layout, char uplo, lapack_int n, float* a,
4004                            lapack_int lda, const lapack_int* ipiv );
4005 lapack_int LAPACKE_dsytri( int matrix_layout, char uplo, lapack_int n, double* a,
4006                            lapack_int lda, const lapack_int* ipiv );
4007 lapack_int LAPACKE_csytri( int matrix_layout, char uplo, lapack_int n,
4008                            lapack_complex_float* a, lapack_int lda,
4009                            const lapack_int* ipiv );
4010 lapack_int LAPACKE_zsytri( int matrix_layout, char uplo, lapack_int n,
4011                            lapack_complex_double* a, lapack_int lda,
4012                            const lapack_int* ipiv );
4013
4014 lapack_int LAPACKE_ssytrs( int matrix_layout, char uplo, lapack_int n,
4015                            lapack_int nrhs, const float* a, lapack_int lda,
4016                            const lapack_int* ipiv, float* b, lapack_int ldb );
4017 lapack_int LAPACKE_dsytrs( int matrix_layout, char uplo, lapack_int n,
4018                            lapack_int nrhs, const double* a, lapack_int lda,
4019                            const lapack_int* ipiv, double* b, lapack_int ldb );
4020 lapack_int LAPACKE_csytrs( int matrix_layout, char uplo, lapack_int n,
4021                            lapack_int nrhs, const lapack_complex_float* a,
4022                            lapack_int lda, const lapack_int* ipiv,
4023                            lapack_complex_float* b, lapack_int ldb );
4024 lapack_int LAPACKE_zsytrs( int matrix_layout, char uplo, lapack_int n,
4025                            lapack_int nrhs, const lapack_complex_double* a,
4026                            lapack_int lda, const lapack_int* ipiv,
4027                            lapack_complex_double* b, lapack_int ldb );
4028
4029 lapack_int LAPACKE_stbcon( int matrix_layout, char norm, char uplo, char diag,
4030                            lapack_int n, lapack_int kd, const float* ab,
4031                            lapack_int ldab, float* rcond );
4032 lapack_int LAPACKE_dtbcon( int matrix_layout, char norm, char uplo, char diag,
4033                            lapack_int n, lapack_int kd, const double* ab,
4034                            lapack_int ldab, double* rcond );
4035 lapack_int LAPACKE_ctbcon( int matrix_layout, char norm, char uplo, char diag,
4036                            lapack_int n, lapack_int kd,
4037                            const lapack_complex_float* ab, lapack_int ldab,
4038                            float* rcond );
4039 lapack_int LAPACKE_ztbcon( int matrix_layout, char norm, char uplo, char diag,
4040                            lapack_int n, lapack_int kd,
4041                            const lapack_complex_double* ab, lapack_int ldab,
4042                            double* rcond );
4043
4044 lapack_int LAPACKE_stbrfs( int matrix_layout, char uplo, char trans, char diag,
4045                            lapack_int n, lapack_int kd, lapack_int nrhs,
4046                            const float* ab, lapack_int ldab, const float* b,
4047                            lapack_int ldb, const float* x, lapack_int ldx,
4048                            float* ferr, float* berr );
4049 lapack_int LAPACKE_dtbrfs( int matrix_layout, char uplo, char trans, char diag,
4050                            lapack_int n, lapack_int kd, lapack_int nrhs,
4051                            const double* ab, lapack_int ldab, const double* b,
4052                            lapack_int ldb, const double* x, lapack_int ldx,
4053                            double* ferr, double* berr );
4054 lapack_int LAPACKE_ctbrfs( int matrix_layout, char uplo, char trans, char diag,
4055                            lapack_int n, lapack_int kd, lapack_int nrhs,
4056                            const lapack_complex_float* ab, lapack_int ldab,
4057                            const lapack_complex_float* b, lapack_int ldb,
4058                            const lapack_complex_float* x, lapack_int ldx,
4059                            float* ferr, float* berr );
4060 lapack_int LAPACKE_ztbrfs( int matrix_layout, char uplo, char trans, char diag,
4061                            lapack_int n, lapack_int kd, lapack_int nrhs,
4062                            const lapack_complex_double* ab, lapack_int ldab,
4063                            const lapack_complex_double* b, lapack_int ldb,
4064                            const lapack_complex_double* x, lapack_int ldx,
4065                            double* ferr, double* berr );
4066
4067 lapack_int LAPACKE_stbtrs( int matrix_layout, char uplo, char trans, char diag,
4068                            lapack_int n, lapack_int kd, lapack_int nrhs,
4069                            const float* ab, lapack_int ldab, float* b,
4070                            lapack_int ldb );
4071 lapack_int LAPACKE_dtbtrs( int matrix_layout, char uplo, char trans, char diag,
4072                            lapack_int n, lapack_int kd, lapack_int nrhs,
4073                            const double* ab, lapack_int ldab, double* b,
4074                            lapack_int ldb );
4075 lapack_int LAPACKE_ctbtrs( int matrix_layout, char uplo, char trans, char diag,
4076                            lapack_int n, lapack_int kd, lapack_int nrhs,
4077                            const lapack_complex_float* ab, lapack_int ldab,
4078                            lapack_complex_float* b, lapack_int ldb );
4079 lapack_int LAPACKE_ztbtrs( int matrix_layout, char uplo, char trans, char diag,
4080                            lapack_int n, lapack_int kd, lapack_int nrhs,
4081                            const lapack_complex_double* ab, lapack_int ldab,
4082                            lapack_complex_double* b, lapack_int ldb );
4083
4084 lapack_int LAPACKE_stfsm( int matrix_layout, char transr, char side, char uplo,
4085                           char trans, char diag, lapack_int m, lapack_int n,
4086                           float alpha, const float* a, float* b,
4087                           lapack_int ldb );
4088 lapack_int LAPACKE_dtfsm( int matrix_layout, char transr, char side, char uplo,
4089                           char trans, char diag, lapack_int m, lapack_int n,
4090                           double alpha, const double* a, double* b,
4091                           lapack_int ldb );
4092 lapack_int LAPACKE_ctfsm( int matrix_layout, char transr, char side, char uplo,
4093                           char trans, char diag, lapack_int m, lapack_int n,
4094                           lapack_complex_float alpha,
4095                           const lapack_complex_float* a,
4096                           lapack_complex_float* b, lapack_int ldb );
4097 lapack_int LAPACKE_ztfsm( int matrix_layout, char transr, char side, char uplo,
4098                           char trans, char diag, lapack_int m, lapack_int n,
4099                           lapack_complex_double alpha,
4100                           const lapack_complex_double* a,
4101                           lapack_complex_double* b, lapack_int ldb );
4102
4103 lapack_int LAPACKE_stftri( int matrix_layout, char transr, char uplo, char diag,
4104                            lapack_int n, float* a );
4105 lapack_int LAPACKE_dtftri( int matrix_layout, char transr, char uplo, char diag,
4106                            lapack_int n, double* a );
4107 lapack_int LAPACKE_ctftri( int matrix_layout, char transr, char uplo, char diag,
4108                            lapack_int n, lapack_complex_float* a );
4109 lapack_int LAPACKE_ztftri( int matrix_layout, char transr, char uplo, char diag,
4110                            lapack_int n, lapack_complex_double* a );
4111
4112 lapack_int LAPACKE_stfttp( int matrix_layout, char transr, char uplo,
4113                            lapack_int n, const float* arf, float* ap );
4114 lapack_int LAPACKE_dtfttp( int matrix_layout, char transr, char uplo,
4115                            lapack_int n, const double* arf, double* ap );
4116 lapack_int LAPACKE_ctfttp( int matrix_layout, char transr, char uplo,
4117                            lapack_int n, const lapack_complex_float* arf,
4118                            lapack_complex_float* ap );
4119 lapack_int LAPACKE_ztfttp( int matrix_layout, char transr, char uplo,
4120                            lapack_int n, const lapack_complex_double* arf,
4121                            lapack_complex_double* ap );
4122
4123 lapack_int LAPACKE_stfttr( int matrix_layout, char transr, char uplo,
4124                            lapack_int n, const float* arf, float* a,
4125                            lapack_int lda );
4126 lapack_int LAPACKE_dtfttr( int matrix_layout, char transr, char uplo,
4127                            lapack_int n, const double* arf, double* a,
4128                            lapack_int lda );
4129 lapack_int LAPACKE_ctfttr( int matrix_layout, char transr, char uplo,
4130                            lapack_int n, const lapack_complex_float* arf,
4131                            lapack_complex_float* a, lapack_int lda );
4132 lapack_int LAPACKE_ztfttr( int matrix_layout, char transr, char uplo,
4133                            lapack_int n, const lapack_complex_double* arf,
4134                            lapack_complex_double* a, lapack_int lda );
4135
4136 lapack_int LAPACKE_stgevc( int matrix_layout, char side, char howmny,
4137                            const lapack_logical* select, lapack_int n,
4138                            const float* s, lapack_int lds, const float* p,
4139                            lapack_int ldp, float* vl, lapack_int ldvl,
4140                            float* vr, lapack_int ldvr, lapack_int mm,
4141                            lapack_int* m );
4142 lapack_int LAPACKE_dtgevc( int matrix_layout, char side, char howmny,
4143                            const lapack_logical* select, lapack_int n,
4144                            const double* s, lapack_int lds, const double* p,
4145                            lapack_int ldp, double* vl, lapack_int ldvl,
4146                            double* vr, lapack_int ldvr, lapack_int mm,
4147                            lapack_int* m );
4148 lapack_int LAPACKE_ctgevc( int matrix_layout, char side, char howmny,
4149                            const lapack_logical* select, lapack_int n,
4150                            const lapack_complex_float* s, lapack_int lds,
4151                            const lapack_complex_float* p, lapack_int ldp,
4152                            lapack_complex_float* vl, lapack_int ldvl,
4153                            lapack_complex_float* vr, lapack_int ldvr,
4154                            lapack_int mm, lapack_int* m );
4155 lapack_int LAPACKE_ztgevc( int matrix_layout, char side, char howmny,
4156                            const lapack_logical* select, lapack_int n,
4157                            const lapack_complex_double* s, lapack_int lds,
4158                            const lapack_complex_double* p, lapack_int ldp,
4159                            lapack_complex_double* vl, lapack_int ldvl,
4160                            lapack_complex_double* vr, lapack_int ldvr,
4161                            lapack_int mm, lapack_int* m );
4162
4163 lapack_int LAPACKE_stgexc( int matrix_layout, lapack_logical wantq,
4164                            lapack_logical wantz, lapack_int n, float* a,
4165                            lapack_int lda, float* b, lapack_int ldb, float* q,
4166                            lapack_int ldq, float* z, lapack_int ldz,
4167                            lapack_int* ifst, lapack_int* ilst );
4168 lapack_int LAPACKE_dtgexc( int matrix_layout, lapack_logical wantq,
4169                            lapack_logical wantz, lapack_int n, double* a,
4170                            lapack_int lda, double* b, lapack_int ldb, double* q,
4171                            lapack_int ldq, double* z, lapack_int ldz,
4172                            lapack_int* ifst, lapack_int* ilst );
4173 lapack_int LAPACKE_ctgexc( int matrix_layout, lapack_logical wantq,
4174                            lapack_logical wantz, lapack_int n,
4175                            lapack_complex_float* a, lapack_int lda,
4176                            lapack_complex_float* b, lapack_int ldb,
4177                            lapack_complex_float* q, lapack_int ldq,
4178                            lapack_complex_float* z, lapack_int ldz,
4179                            lapack_int ifst, lapack_int ilst );
4180 lapack_int LAPACKE_ztgexc( int matrix_layout, lapack_logical wantq,
4181                            lapack_logical wantz, lapack_int n,
4182                            lapack_complex_double* a, lapack_int lda,
4183                            lapack_complex_double* b, lapack_int ldb,
4184                            lapack_complex_double* q, lapack_int ldq,
4185                            lapack_complex_double* z, lapack_int ldz,
4186                            lapack_int ifst, lapack_int ilst );
4187
4188 lapack_int LAPACKE_stgsen( int matrix_layout, lapack_int ijob,
4189                            lapack_logical wantq, lapack_logical wantz,
4190                            const lapack_logical* select, lapack_int n, float* a,
4191                            lapack_int lda, float* b, lapack_int ldb,
4192                            float* alphar, float* alphai, float* beta, float* q,
4193                            lapack_int ldq, float* z, lapack_int ldz,
4194                            lapack_int* m, float* pl, float* pr, float* dif );
4195 lapack_int LAPACKE_dtgsen( int matrix_layout, lapack_int ijob,
4196                            lapack_logical wantq, lapack_logical wantz,
4197                            const lapack_logical* select, lapack_int n,
4198                            double* a, lapack_int lda, double* b, lapack_int ldb,
4199                            double* alphar, double* alphai, double* beta,
4200                            double* q, lapack_int ldq, double* z, lapack_int ldz,
4201                            lapack_int* m, double* pl, double* pr, double* dif );
4202 lapack_int LAPACKE_ctgsen( int matrix_layout, lapack_int ijob,
4203                            lapack_logical wantq, lapack_logical wantz,
4204                            const lapack_logical* select, lapack_int n,
4205                            lapack_complex_float* a, lapack_int lda,
4206                            lapack_complex_float* b, lapack_int ldb,
4207                            lapack_complex_float* alpha,
4208                            lapack_complex_float* beta, lapack_complex_float* q,
4209                            lapack_int ldq, lapack_complex_float* z,
4210                            lapack_int ldz, lapack_int* m, float* pl, float* pr,
4211                            float* dif );
4212 lapack_int LAPACKE_ztgsen( int matrix_layout, lapack_int ijob,
4213                            lapack_logical wantq, lapack_logical wantz,
4214                            const lapack_logical* select, lapack_int n,
4215                            lapack_complex_double* a, lapack_int lda,
4216                            lapack_complex_double* b, lapack_int ldb,
4217                            lapack_complex_double* alpha,
4218                            lapack_complex_double* beta,
4219                            lapack_complex_double* q, lapack_int ldq,
4220                            lapack_complex_double* z, lapack_int ldz,
4221                            lapack_int* m, double* pl, double* pr, double* dif );
4222
4223 lapack_int LAPACKE_stgsja( int matrix_layout, char jobu, char jobv, char jobq,
4224                            lapack_int m, lapack_int p, lapack_int n,
4225                            lapack_int k, lapack_int l, float* a, lapack_int lda,
4226                            float* b, lapack_int ldb, float tola, float tolb,
4227                            float* alpha, float* beta, float* u, lapack_int ldu,
4228                            float* v, lapack_int ldv, float* q, lapack_int ldq,
4229                            lapack_int* ncycle );
4230 lapack_int LAPACKE_dtgsja( int matrix_layout, char jobu, char jobv, char jobq,
4231                            lapack_int m, lapack_int p, lapack_int n,
4232                            lapack_int k, lapack_int l, double* a,
4233                            lapack_int lda, double* b, lapack_int ldb,
4234                            double tola, double tolb, double* alpha,
4235                            double* beta, double* u, lapack_int ldu, double* v,
4236                            lapack_int ldv, double* q, lapack_int ldq,
4237                            lapack_int* ncycle );
4238 lapack_int LAPACKE_ctgsja( int matrix_layout, char jobu, char jobv, char jobq,
4239                            lapack_int m, lapack_int p, lapack_int n,
4240                            lapack_int k, lapack_int l, lapack_complex_float* a,
4241                            lapack_int lda, lapack_complex_float* b,
4242                            lapack_int ldb, float tola, float tolb, float* alpha,
4243                            float* beta, lapack_complex_float* u, lapack_int ldu,
4244                            lapack_complex_float* v, lapack_int ldv,
4245                            lapack_complex_float* q, lapack_int ldq,
4246                            lapack_int* ncycle );
4247 lapack_int LAPACKE_ztgsja( int matrix_layout, char jobu, char jobv, char jobq,
4248                            lapack_int m, lapack_int p, lapack_int n,
4249                            lapack_int k, lapack_int l, lapack_complex_double* a,
4250                            lapack_int lda, lapack_complex_double* b,
4251                            lapack_int ldb, double tola, double tolb,
4252                            double* alpha, double* beta,
4253                            lapack_complex_double* u, lapack_int ldu,
4254                            lapack_complex_double* v, lapack_int ldv,
4255                            lapack_complex_double* q, lapack_int ldq,
4256                            lapack_int* ncycle );
4257
4258 lapack_int LAPACKE_stgsna( int matrix_layout, char job, char howmny,
4259                            const lapack_logical* select, lapack_int n,
4260                            const float* a, lapack_int lda, const float* b,
4261                            lapack_int ldb, const float* vl, lapack_int ldvl,
4262                            const float* vr, lapack_int ldvr, float* s,
4263                            float* dif, lapack_int mm, lapack_int* m );
4264 lapack_int LAPACKE_dtgsna( int matrix_layout, char job, char howmny,
4265                            const lapack_logical* select, lapack_int n,
4266                            const double* a, lapack_int lda, const double* b,
4267                            lapack_int ldb, const double* vl, lapack_int ldvl,
4268                            const double* vr, lapack_int ldvr, double* s,
4269                            double* dif, lapack_int mm, lapack_int* m );
4270 lapack_int LAPACKE_ctgsna( int matrix_layout, char job, char howmny,
4271                            const lapack_logical* select, lapack_int n,
4272                            const lapack_complex_float* a, lapack_int lda,
4273                            const lapack_complex_float* b, lapack_int ldb,
4274                            const lapack_complex_float* vl, lapack_int ldvl,
4275                            const lapack_complex_float* vr, lapack_int ldvr,
4276                            float* s, float* dif, lapack_int mm, lapack_int* m );
4277 lapack_int LAPACKE_ztgsna( int matrix_layout, char job, char howmny,
4278                            const lapack_logical* select, lapack_int n,
4279                            const lapack_complex_double* a, lapack_int lda,
4280                            const lapack_complex_double* b, lapack_int ldb,
4281                            const lapack_complex_double* vl, lapack_int ldvl,
4282                            const lapack_complex_double* vr, lapack_int ldvr,
4283                            double* s, double* dif, lapack_int mm,
4284                            lapack_int* m );
4285
4286 lapack_int LAPACKE_stgsyl( int matrix_layout, char trans, lapack_int ijob,
4287                            lapack_int m, lapack_int n, const float* a,
4288                            lapack_int lda, const float* b, lapack_int ldb,
4289                            float* c, lapack_int ldc, const float* d,
4290                            lapack_int ldd, const float* e, lapack_int lde,
4291                            float* f, lapack_int ldf, float* scale, float* dif );
4292 lapack_int LAPACKE_dtgsyl( int matrix_layout, char trans, lapack_int ijob,
4293                            lapack_int m, lapack_int n, const double* a,
4294                            lapack_int lda, const double* b, lapack_int ldb,
4295                            double* c, lapack_int ldc, const double* d,
4296                            lapack_int ldd, const double* e, lapack_int lde,
4297                            double* f, lapack_int ldf, double* scale,
4298                            double* dif );
4299 lapack_int LAPACKE_ctgsyl( int matrix_layout, char trans, lapack_int ijob,
4300                            lapack_int m, lapack_int n,
4301                            const lapack_complex_float* a, lapack_int lda,
4302                            const lapack_complex_float* b, lapack_int ldb,
4303                            lapack_complex_float* c, lapack_int ldc,
4304                            const lapack_complex_float* d, lapack_int ldd,
4305                            const lapack_complex_float* e, lapack_int lde,
4306                            lapack_complex_float* f, lapack_int ldf,
4307                            float* scale, float* dif );
4308 lapack_int LAPACKE_ztgsyl( int matrix_layout, char trans, lapack_int ijob,
4309                            lapack_int m, lapack_int n,
4310                            const lapack_complex_double* a, lapack_int lda,
4311                            const lapack_complex_double* b, lapack_int ldb,
4312                            lapack_complex_double* c, lapack_int ldc,
4313                            const lapack_complex_double* d, lapack_int ldd,
4314                            const lapack_complex_double* e, lapack_int lde,
4315                            lapack_complex_double* f, lapack_int ldf,
4316                            double* scale, double* dif );
4317
4318 lapack_int LAPACKE_stpcon( int matrix_layout, char norm, char uplo, char diag,
4319                            lapack_int n, const float* ap, float* rcond );
4320 lapack_int LAPACKE_dtpcon( int matrix_layout, char norm, char uplo, char diag,
4321                            lapack_int n, const double* ap, double* rcond );
4322 lapack_int LAPACKE_ctpcon( int matrix_layout, char norm, char uplo, char diag,
4323                            lapack_int n, const lapack_complex_float* ap,
4324                            float* rcond );
4325 lapack_int LAPACKE_ztpcon( int matrix_layout, char norm, char uplo, char diag,
4326                            lapack_int n, const lapack_complex_double* ap,
4327                            double* rcond );
4328
4329 lapack_int LAPACKE_stprfs( int matrix_layout, char uplo, char trans, char diag,
4330                            lapack_int n, lapack_int nrhs, const float* ap,
4331                            const float* b, lapack_int ldb, const float* x,
4332                            lapack_int ldx, float* ferr, float* berr );
4333 lapack_int LAPACKE_dtprfs( int matrix_layout, char uplo, char trans, char diag,
4334                            lapack_int n, lapack_int nrhs, const double* ap,
4335                            const double* b, lapack_int ldb, const double* x,
4336                            lapack_int ldx, double* ferr, double* berr );
4337 lapack_int LAPACKE_ctprfs( int matrix_layout, char uplo, char trans, char diag,
4338                            lapack_int n, lapack_int nrhs,
4339                            const lapack_complex_float* ap,
4340                            const lapack_complex_float* b, lapack_int ldb,
4341                            const lapack_complex_float* x, lapack_int ldx,
4342                            float* ferr, float* berr );
4343 lapack_int LAPACKE_ztprfs( int matrix_layout, char uplo, char trans, char diag,
4344                            lapack_int n, lapack_int nrhs,
4345                            const lapack_complex_double* ap,
4346                            const lapack_complex_double* b, lapack_int ldb,
4347                            const lapack_complex_double* x, lapack_int ldx,
4348                            double* ferr, double* berr );
4349
4350 lapack_int LAPACKE_stptri( int matrix_layout, char uplo, char diag, lapack_int n,
4351                            float* ap );
4352 lapack_int LAPACKE_dtptri( int matrix_layout, char uplo, char diag, lapack_int n,
4353                            double* ap );
4354 lapack_int LAPACKE_ctptri( int matrix_layout, char uplo, char diag, lapack_int n,
4355                            lapack_complex_float* ap );
4356 lapack_int LAPACKE_ztptri( int matrix_layout, char uplo, char diag, lapack_int n,
4357                            lapack_complex_double* ap );
4358
4359 lapack_int LAPACKE_stptrs( int matrix_layout, char uplo, char trans, char diag,
4360                            lapack_int n, lapack_int nrhs, const float* ap,
4361                            float* b, lapack_int ldb );
4362 lapack_int LAPACKE_dtptrs( int matrix_layout, char uplo, char trans, char diag,
4363                            lapack_int n, lapack_int nrhs, const double* ap,
4364                            double* b, lapack_int ldb );
4365 lapack_int LAPACKE_ctptrs( int matrix_layout, char uplo, char trans, char diag,
4366                            lapack_int n, lapack_int nrhs,
4367                            const lapack_complex_float* ap,
4368                            lapack_complex_float* b, lapack_int ldb );
4369 lapack_int LAPACKE_ztptrs( int matrix_layout, char uplo, char trans, char diag,
4370                            lapack_int n, lapack_int nrhs,
4371                            const lapack_complex_double* ap,
4372                            lapack_complex_double* b, lapack_int ldb );
4373
4374 lapack_int LAPACKE_stpttf( int matrix_layout, char transr, char uplo,
4375                            lapack_int n, const float* ap, float* arf );
4376 lapack_int LAPACKE_dtpttf( int matrix_layout, char transr, char uplo,
4377                            lapack_int n, const double* ap, double* arf );
4378 lapack_int LAPACKE_ctpttf( int matrix_layout, char transr, char uplo,
4379                            lapack_int n, const lapack_complex_float* ap,
4380                            lapack_complex_float* arf );
4381 lapack_int LAPACKE_ztpttf( int matrix_layout, char transr, char uplo,
4382                            lapack_int n, const lapack_complex_double* ap,
4383                            lapack_complex_double* arf );
4384
4385 lapack_int LAPACKE_stpttr( int matrix_layout, char uplo, lapack_int n,
4386                            const float* ap, float* a, lapack_int lda );
4387 lapack_int LAPACKE_dtpttr( int matrix_layout, char uplo, lapack_int n,
4388                            const double* ap, double* a, lapack_int lda );
4389 lapack_int LAPACKE_ctpttr( int matrix_layout, char uplo, lapack_int n,
4390                            const lapack_complex_float* ap,
4391                            lapack_complex_float* a, lapack_int lda );
4392 lapack_int LAPACKE_ztpttr( int matrix_layout, char uplo, lapack_int n,
4393                            const lapack_complex_double* ap,
4394                            lapack_complex_double* a, lapack_int lda );
4395
4396 lapack_int LAPACKE_strcon( int matrix_layout, char norm, char uplo, char diag,
4397                            lapack_int n, const float* a, lapack_int lda,
4398                            float* rcond );
4399 lapack_int LAPACKE_dtrcon( int matrix_layout, char norm, char uplo, char diag,
4400                            lapack_int n, const double* a, lapack_int lda,
4401                            double* rcond );
4402 lapack_int LAPACKE_ctrcon( int matrix_layout, char norm, char uplo, char diag,
4403                            lapack_int n, const lapack_complex_float* a,
4404                            lapack_int lda, float* rcond );
4405 lapack_int LAPACKE_ztrcon( int matrix_layout, char norm, char uplo, char diag,
4406                            lapack_int n, const lapack_complex_double* a,
4407                            lapack_int lda, double* rcond );
4408
4409 lapack_int LAPACKE_strevc( int matrix_layout, char side, char howmny,
4410                            lapack_logical* select, lapack_int n, const float* t,
4411                            lapack_int ldt, float* vl, lapack_int ldvl,
4412                            float* vr, lapack_int ldvr, lapack_int mm,
4413                            lapack_int* m );
4414 lapack_int LAPACKE_dtrevc( int matrix_layout, char side, char howmny,
4415                            lapack_logical* select, lapack_int n,
4416                            const double* t, lapack_int ldt, double* vl,
4417                            lapack_int ldvl, double* vr, lapack_int ldvr,
4418                            lapack_int mm, lapack_int* m );
4419 lapack_int LAPACKE_ctrevc( int matrix_layout, char side, char howmny,
4420                            const lapack_logical* select, lapack_int n,
4421                            lapack_complex_float* t, lapack_int ldt,
4422                            lapack_complex_float* vl, lapack_int ldvl,
4423                            lapack_complex_float* vr, lapack_int ldvr,
4424                            lapack_int mm, lapack_int* m );
4425 lapack_int LAPACKE_ztrevc( int matrix_layout, char side, char howmny,
4426                            const lapack_logical* select, lapack_int n,
4427                            lapack_complex_double* t, lapack_int ldt,
4428                            lapack_complex_double* vl, lapack_int ldvl,
4429                            lapack_complex_double* vr, lapack_int ldvr,
4430                            lapack_int mm, lapack_int* m );
4431
4432 lapack_int LAPACKE_strexc( int matrix_layout, char compq, lapack_int n, float* t,
4433                            lapack_int ldt, float* q, lapack_int ldq,
4434                            lapack_int* ifst, lapack_int* ilst );
4435 lapack_int LAPACKE_dtrexc( int matrix_layout, char compq, lapack_int n,
4436                            double* t, lapack_int ldt, double* q, lapack_int ldq,
4437                            lapack_int* ifst, lapack_int* ilst );
4438 lapack_int LAPACKE_ctrexc( int matrix_layout, char compq, lapack_int n,
4439                            lapack_complex_float* t, lapack_int ldt,
4440                            lapack_complex_float* q, lapack_int ldq,
4441                            lapack_int ifst, lapack_int ilst );
4442 lapack_int LAPACKE_ztrexc( int matrix_layout, char compq, lapack_int n,
4443                            lapack_complex_double* t, lapack_int ldt,
4444                            lapack_complex_double* q, lapack_int ldq,
4445                            lapack_int ifst, lapack_int ilst );
4446
4447 lapack_int LAPACKE_strrfs( int matrix_layout, char uplo, char trans, char diag,
4448                            lapack_int n, lapack_int nrhs, const float* a,
4449                            lapack_int lda, const float* b, lapack_int ldb,
4450                            const float* x, lapack_int ldx, float* ferr,
4451                            float* berr );
4452 lapack_int LAPACKE_dtrrfs( int matrix_layout, char uplo, char trans, char diag,
4453                            lapack_int n, lapack_int nrhs, const double* a,
4454                            lapack_int lda, const double* b, lapack_int ldb,
4455                            const double* x, lapack_int ldx, double* ferr,
4456                            double* berr );
4457 lapack_int LAPACKE_ctrrfs( int matrix_layout, char uplo, char trans, char diag,
4458                            lapack_int n, lapack_int nrhs,
4459                            const lapack_complex_float* a, lapack_int lda,
4460                            const lapack_complex_float* b, lapack_int ldb,
4461                            const lapack_complex_float* x, lapack_int ldx,
4462                            float* ferr, float* berr );
4463 lapack_int LAPACKE_ztrrfs( int matrix_layout, char uplo, char trans, char diag,
4464                            lapack_int n, lapack_int nrhs,
4465                            const lapack_complex_double* a, lapack_int lda,
4466                            const lapack_complex_double* b, lapack_int ldb,
4467                            const lapack_complex_double* x, lapack_int ldx,
4468                            double* ferr, double* berr );
4469
4470 lapack_int LAPACKE_strsen( int matrix_layout, char job, char compq,
4471                            const lapack_logical* select, lapack_int n, float* t,
4472                            lapack_int ldt, float* q, lapack_int ldq, float* wr,
4473                            float* wi, lapack_int* m, float* s, float* sep );
4474 lapack_int LAPACKE_dtrsen( int matrix_layout, char job, char compq,
4475                            const lapack_logical* select, lapack_int n,
4476                            double* t, lapack_int ldt, double* q, lapack_int ldq,
4477                            double* wr, double* wi, lapack_int* m, double* s,
4478                            double* sep );
4479 lapack_int LAPACKE_ctrsen( int matrix_layout, char job, char compq,
4480                            const lapack_logical* select, lapack_int n,
4481                            lapack_complex_float* t, lapack_int ldt,
4482                            lapack_complex_float* q, lapack_int ldq,
4483                            lapack_complex_float* w, lapack_int* m, float* s,
4484                            float* sep );
4485 lapack_int LAPACKE_ztrsen( int matrix_layout, char job, char compq,
4486                            const lapack_logical* select, lapack_int n,
4487                            lapack_complex_double* t, lapack_int ldt,
4488                            lapack_complex_double* q, lapack_int ldq,
4489                            lapack_complex_double* w, lapack_int* m, double* s,
4490                            double* sep );
4491
4492 lapack_int LAPACKE_strsna( int matrix_layout, char job, char howmny,
4493                            const lapack_logical* select, lapack_int n,
4494                            const float* t, lapack_int ldt, const float* vl,
4495                            lapack_int ldvl, const float* vr, lapack_int ldvr,
4496                            float* s, float* sep, lapack_int mm, lapack_int* m );
4497 lapack_int LAPACKE_dtrsna( int matrix_layout, char job, char howmny,
4498                            const lapack_logical* select, lapack_int n,
4499                            const double* t, lapack_int ldt, const double* vl,
4500                            lapack_int ldvl, const double* vr, lapack_int ldvr,
4501                            double* s, double* sep, lapack_int mm,
4502                            lapack_int* m );
4503 lapack_int LAPACKE_ctrsna( int matrix_layout, char job, char howmny,
4504                            const lapack_logical* select, lapack_int n,
4505                            const lapack_complex_float* t, lapack_int ldt,
4506                            const lapack_complex_float* vl, lapack_int ldvl,
4507                            const lapack_complex_float* vr, lapack_int ldvr,
4508                            float* s, float* sep, lapack_int mm, lapack_int* m );
4509 lapack_int LAPACKE_ztrsna( int matrix_layout, char job, char howmny,
4510                            const lapack_logical* select, lapack_int n,
4511                            const lapack_complex_double* t, lapack_int ldt,
4512                            const lapack_complex_double* vl, lapack_int ldvl,
4513                            const lapack_complex_double* vr, lapack_int ldvr,
4514                            double* s, double* sep, lapack_int mm,
4515                            lapack_int* m );
4516
4517 lapack_int LAPACKE_strsyl( int matrix_layout, char trana, char tranb,
4518                            lapack_int isgn, lapack_int m, lapack_int n,
4519                            const float* a, lapack_int lda, const float* b,
4520                            lapack_int ldb, float* c, lapack_int ldc,
4521                            float* scale );
4522 lapack_int LAPACKE_dtrsyl( int matrix_layout, char trana, char tranb,
4523                            lapack_int isgn, lapack_int m, lapack_int n,
4524                            const double* a, lapack_int lda, const double* b,
4525                            lapack_int ldb, double* c, lapack_int ldc,
4526                            double* scale );
4527 lapack_int LAPACKE_ctrsyl( int matrix_layout, char trana, char tranb,
4528                            lapack_int isgn, lapack_int m, lapack_int n,
4529                            const lapack_complex_float* a, lapack_int lda,
4530                            const lapack_complex_float* b, lapack_int ldb,
4531                            lapack_complex_float* c, lapack_int ldc,
4532                            float* scale );
4533 lapack_int LAPACKE_ztrsyl( int matrix_layout, char trana, char tranb,
4534                            lapack_int isgn, lapack_int m, lapack_int n,
4535                            const lapack_complex_double* a, lapack_int lda,
4536                            const lapack_complex_double* b, lapack_int ldb,
4537                            lapack_complex_double* c, lapack_int ldc,
4538                            double* scale );
4539
4540 lapack_int LAPACKE_strtri( int matrix_layout, char uplo, char diag, lapack_int n,
4541                            float* a, lapack_int lda );
4542 lapack_int LAPACKE_dtrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4543                            double* a, lapack_int lda );
4544 lapack_int LAPACKE_ctrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4545                            lapack_complex_float* a, lapack_int lda );
4546 lapack_int LAPACKE_ztrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4547                            lapack_complex_double* a, lapack_int lda );
4548
4549 lapack_int LAPACKE_strtrs( int matrix_layout, char uplo, char trans, char diag,
4550                            lapack_int n, lapack_int nrhs, const float* a,
4551                            lapack_int lda, float* b, lapack_int ldb );
4552 lapack_int LAPACKE_dtrtrs( int matrix_layout, char uplo, char trans, char diag,
4553                            lapack_int n, lapack_int nrhs, const double* a,
4554                            lapack_int lda, double* b, lapack_int ldb );
4555 lapack_int LAPACKE_ctrtrs( int matrix_layout, char uplo, char trans, char diag,
4556                            lapack_int n, lapack_int nrhs,
4557                            const lapack_complex_float* a, lapack_int lda,
4558                            lapack_complex_float* b, lapack_int ldb );
4559 lapack_int LAPACKE_ztrtrs( int matrix_layout, char uplo, char trans, char diag,
4560                            lapack_int n, lapack_int nrhs,
4561                            const lapack_complex_double* a, lapack_int lda,
4562                            lapack_complex_double* b, lapack_int ldb );
4563
4564 lapack_int LAPACKE_strttf( int matrix_layout, char transr, char uplo,
4565                            lapack_int n, const float* a, lapack_int lda,
4566                            float* arf );
4567 lapack_int LAPACKE_dtrttf( int matrix_layout, char transr, char uplo,
4568                            lapack_int n, const double* a, lapack_int lda,
4569                            double* arf );
4570 lapack_int LAPACKE_ctrttf( int matrix_layout, char transr, char uplo,
4571                            lapack_int n, const lapack_complex_float* a,
4572                            lapack_int lda, lapack_complex_float* arf );
4573 lapack_int LAPACKE_ztrttf( int matrix_layout, char transr, char uplo,
4574                            lapack_int n, const lapack_complex_double* a,
4575                            lapack_int lda, lapack_complex_double* arf );
4576
4577 lapack_int LAPACKE_strttp( int matrix_layout, char uplo, lapack_int n,
4578                            const float* a, lapack_int lda, float* ap );
4579 lapack_int LAPACKE_dtrttp( int matrix_layout, char uplo, lapack_int n,
4580                            const double* a, lapack_int lda, double* ap );
4581 lapack_int LAPACKE_ctrttp( int matrix_layout, char uplo, lapack_int n,
4582                            const lapack_complex_float* a, lapack_int lda,
4583                            lapack_complex_float* ap );
4584 lapack_int LAPACKE_ztrttp( int matrix_layout, char uplo, lapack_int n,
4585                            const lapack_complex_double* a, lapack_int lda,
4586                            lapack_complex_double* ap );
4587
4588 lapack_int LAPACKE_stzrzf( int matrix_layout, lapack_int m, lapack_int n,
4589                            float* a, lapack_int lda, float* tau );
4590 lapack_int LAPACKE_dtzrzf( int matrix_layout, lapack_int m, lapack_int n,
4591                            double* a, lapack_int lda, double* tau );
4592 lapack_int LAPACKE_ctzrzf( int matrix_layout, lapack_int m, lapack_int n,
4593                            lapack_complex_float* a, lapack_int lda,
4594                            lapack_complex_float* tau );
4595 lapack_int LAPACKE_ztzrzf( int matrix_layout, lapack_int m, lapack_int n,
4596                            lapack_complex_double* a, lapack_int lda,
4597                            lapack_complex_double* tau );
4598
4599 lapack_int LAPACKE_cungbr( int matrix_layout, char vect, lapack_int m,
4600                            lapack_int n, lapack_int k, lapack_complex_float* a,
4601                            lapack_int lda, const lapack_complex_float* tau );
4602 lapack_int LAPACKE_zungbr( int matrix_layout, char vect, lapack_int m,
4603                            lapack_int n, lapack_int k, lapack_complex_double* a,
4604                            lapack_int lda, const lapack_complex_double* tau );
4605
4606 lapack_int LAPACKE_cunghr( int matrix_layout, lapack_int n, lapack_int ilo,
4607                            lapack_int ihi, lapack_complex_float* a,
4608                            lapack_int lda, const lapack_complex_float* tau );
4609 lapack_int LAPACKE_zunghr( int matrix_layout, lapack_int n, lapack_int ilo,
4610                            lapack_int ihi, lapack_complex_double* a,
4611                            lapack_int lda, const lapack_complex_double* tau );
4612
4613 lapack_int LAPACKE_cunglq( int matrix_layout, lapack_int m, lapack_int n,
4614                            lapack_int k, lapack_complex_float* a,
4615                            lapack_int lda, const lapack_complex_float* tau );
4616 lapack_int LAPACKE_zunglq( int matrix_layout, lapack_int m, lapack_int n,
4617                            lapack_int k, lapack_complex_double* a,
4618                            lapack_int lda, const lapack_complex_double* tau );
4619
4620 lapack_int LAPACKE_cungql( int matrix_layout, lapack_int m, lapack_int n,
4621                            lapack_int k, lapack_complex_float* a,
4622                            lapack_int lda, const lapack_complex_float* tau );
4623 lapack_int LAPACKE_zungql( int matrix_layout, lapack_int m, lapack_int n,
4624                            lapack_int k, lapack_complex_double* a,
4625                            lapack_int lda, const lapack_complex_double* tau );
4626
4627 lapack_int LAPACKE_cungqr( int matrix_layout, lapack_int m, lapack_int n,
4628                            lapack_int k, lapack_complex_float* a,
4629                            lapack_int lda, const lapack_complex_float* tau );
4630 lapack_int LAPACKE_zungqr( int matrix_layout, lapack_int m, lapack_int n,
4631                            lapack_int k, lapack_complex_double* a,
4632                            lapack_int lda, const lapack_complex_double* tau );
4633
4634 lapack_int LAPACKE_cungrq( int matrix_layout, lapack_int m, lapack_int n,
4635                            lapack_int k, lapack_complex_float* a,
4636                            lapack_int lda, const lapack_complex_float* tau );
4637 lapack_int LAPACKE_zungrq( int matrix_layout, lapack_int m, lapack_int n,
4638                            lapack_int k, lapack_complex_double* a,
4639                            lapack_int lda, const lapack_complex_double* tau );
4640
4641 lapack_int LAPACKE_cungtr( int matrix_layout, char uplo, lapack_int n,
4642                            lapack_complex_float* a, lapack_int lda,
4643                            const lapack_complex_float* tau );
4644 lapack_int LAPACKE_zungtr( int matrix_layout, char uplo, lapack_int n,
4645                            lapack_complex_double* a, lapack_int lda,
4646                            const lapack_complex_double* tau );
4647
4648 lapack_int LAPACKE_cunmbr( int matrix_layout, char vect, char side, char trans,
4649                            lapack_int m, lapack_int n, lapack_int k,
4650                            const lapack_complex_float* a, lapack_int lda,
4651                            const lapack_complex_float* tau,
4652                            lapack_complex_float* c, lapack_int ldc );
4653 lapack_int LAPACKE_zunmbr( int matrix_layout, char vect, char side, char trans,
4654                            lapack_int m, lapack_int n, lapack_int k,
4655                            const lapack_complex_double* a, lapack_int lda,
4656                            const lapack_complex_double* tau,
4657                            lapack_complex_double* c, lapack_int ldc );
4658
4659 lapack_int LAPACKE_cunmhr( int matrix_layout, char side, char trans,
4660                            lapack_int m, lapack_int n, lapack_int ilo,
4661                            lapack_int ihi, const lapack_complex_float* a,
4662                            lapack_int lda, const lapack_complex_float* tau,
4663                            lapack_complex_float* c, lapack_int ldc );
4664 lapack_int LAPACKE_zunmhr( int matrix_layout, char side, char trans,
4665                            lapack_int m, lapack_int n, lapack_int ilo,
4666                            lapack_int ihi, const lapack_complex_double* a,
4667                            lapack_int lda, const lapack_complex_double* tau,
4668                            lapack_complex_double* c, lapack_int ldc );
4669
4670 lapack_int LAPACKE_cunmlq( int matrix_layout, char side, char trans,
4671                            lapack_int m, lapack_int n, lapack_int k,
4672                            const lapack_complex_float* a, lapack_int lda,
4673                            const lapack_complex_float* tau,
4674                            lapack_complex_float* c, lapack_int ldc );
4675 lapack_int LAPACKE_zunmlq( int matrix_layout, char side, char trans,
4676                            lapack_int m, lapack_int n, lapack_int k,
4677                            const lapack_complex_double* a, lapack_int lda,
4678                            const lapack_complex_double* tau,
4679                            lapack_complex_double* c, lapack_int ldc );
4680
4681 lapack_int LAPACKE_cunmql( int matrix_layout, char side, char trans,
4682                            lapack_int m, lapack_int n, lapack_int k,
4683                            const lapack_complex_float* a, lapack_int lda,
4684                            const lapack_complex_float* tau,
4685                            lapack_complex_float* c, lapack_int ldc );
4686 lapack_int LAPACKE_zunmql( int matrix_layout, char side, char trans,
4687                            lapack_int m, lapack_int n, lapack_int k,
4688                            const lapack_complex_double* a, lapack_int lda,
4689                            const lapack_complex_double* tau,
4690                            lapack_complex_double* c, lapack_int ldc );
4691
4692 lapack_int LAPACKE_cunmqr( int matrix_layout, char side, char trans,
4693                            lapack_int m, lapack_int n, lapack_int k,
4694                            const lapack_complex_float* a, lapack_int lda,
4695                            const lapack_complex_float* tau,
4696                            lapack_complex_float* c, lapack_int ldc );
4697 lapack_int LAPACKE_zunmqr( int matrix_layout, char side, char trans,
4698                            lapack_int m, lapack_int n, lapack_int k,
4699                            const lapack_complex_double* a, lapack_int lda,
4700                            const lapack_complex_double* tau,
4701                            lapack_complex_double* c, lapack_int ldc );
4702
4703 lapack_int LAPACKE_cunmrq( int matrix_layout, char side, char trans,
4704                            lapack_int m, lapack_int n, lapack_int k,
4705                            const lapack_complex_float* a, lapack_int lda,
4706                            const lapack_complex_float* tau,
4707                            lapack_complex_float* c, lapack_int ldc );
4708 lapack_int LAPACKE_zunmrq( int matrix_layout, char side, char trans,
4709                            lapack_int m, lapack_int n, lapack_int k,
4710                            const lapack_complex_double* a, lapack_int lda,
4711                            const lapack_complex_double* tau,
4712                            lapack_complex_double* c, lapack_int ldc );
4713
4714 lapack_int LAPACKE_cunmrz( int matrix_layout, char side, char trans,
4715                            lapack_int m, lapack_int n, lapack_int k,
4716                            lapack_int l, const lapack_complex_float* a,
4717                            lapack_int lda, const lapack_complex_float* tau,
4718                            lapack_complex_float* c, lapack_int ldc );
4719 lapack_int LAPACKE_zunmrz( int matrix_layout, char side, char trans,
4720                            lapack_int m, lapack_int n, lapack_int k,
4721                            lapack_int l, const lapack_complex_double* a,
4722                            lapack_int lda, const lapack_complex_double* tau,
4723                            lapack_complex_double* c, lapack_int ldc );
4724
4725 lapack_int LAPACKE_cunmtr( int matrix_layout, char side, char uplo, char trans,
4726                            lapack_int m, lapack_int n,
4727                            const lapack_complex_float* a, lapack_int lda,
4728                            const lapack_complex_float* tau,
4729                            lapack_complex_float* c, lapack_int ldc );
4730 lapack_int LAPACKE_zunmtr( int matrix_layout, char side, char uplo, char trans,
4731                            lapack_int m, lapack_int n,
4732                            const lapack_complex_double* a, lapack_int lda,
4733                            const lapack_complex_double* tau,
4734                            lapack_complex_double* c, lapack_int ldc );
4735
4736 lapack_int LAPACKE_cupgtr( int matrix_layout, char uplo, lapack_int n,
4737                            const lapack_complex_float* ap,
4738                            const lapack_complex_float* tau,
4739                            lapack_complex_float* q, lapack_int ldq );
4740 lapack_int LAPACKE_zupgtr( int matrix_layout, char uplo, lapack_int n,
4741                            const lapack_complex_double* ap,
4742                            const lapack_complex_double* tau,
4743                            lapack_complex_double* q, lapack_int ldq );
4744
4745 lapack_int LAPACKE_cupmtr( int matrix_layout, char side, char uplo, char trans,
4746                            lapack_int m, lapack_int n,
4747                            const lapack_complex_float* ap,
4748                            const lapack_complex_float* tau,
4749                            lapack_complex_float* c, lapack_int ldc );
4750 lapack_int LAPACKE_zupmtr( int matrix_layout, char side, char uplo, char trans,
4751                            lapack_int m, lapack_int n,
4752                            const lapack_complex_double* ap,
4753                            const lapack_complex_double* tau,
4754                            lapack_complex_double* c, lapack_int ldc );
4755
4756 lapack_int LAPACKE_sbdsdc_work( int matrix_layout, char uplo, char compq,
4757                                 lapack_int n, float* d, float* e, float* u,
4758                                 lapack_int ldu, float* vt, lapack_int ldvt,
4759                                 float* q, lapack_int* iq, float* work,
4760                                 lapack_int* iwork );
4761 lapack_int LAPACKE_dbdsdc_work( int matrix_layout, char uplo, char compq,
4762                                 lapack_int n, double* d, double* e, double* u,
4763                                 lapack_int ldu, double* vt, lapack_int ldvt,
4764                                 double* q, lapack_int* iq, double* work,
4765                                 lapack_int* iwork );
4766
4767 lapack_int LAPACKE_sbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
4768                                  lapack_int n, float* d, float* e,
4769                                  float vl, float vu,
4770                                  lapack_int il, lapack_int iu, lapack_int* ns,
4771                                  float* s, float* z, lapack_int ldz,
4772                                  float* work, lapack_int* iwork );
4773 lapack_int LAPACKE_dbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
4774                                  lapack_int n, double* d, double* e,
4775                                  double vl, double vu,
4776                                  lapack_int il, lapack_int iu, lapack_int* ns,
4777                                  double* s, double* z, lapack_int ldz,
4778                                  double* work, lapack_int* iwork );
4779
4780 lapack_int LAPACKE_sbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4781                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4782                                 float* d, float* e, float* vt, lapack_int ldvt,
4783                                 float* u, lapack_int ldu, float* c,
4784                                 lapack_int ldc, float* work );
4785 lapack_int LAPACKE_dbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4786                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4787                                 double* d, double* e, double* vt,
4788                                 lapack_int ldvt, double* u, lapack_int ldu,
4789                                 double* c, lapack_int ldc, double* work );
4790 lapack_int LAPACKE_cbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4791                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4792                                 float* d, float* e, lapack_complex_float* vt,
4793                                 lapack_int ldvt, lapack_complex_float* u,
4794                                 lapack_int ldu, lapack_complex_float* c,
4795                                 lapack_int ldc, float* work );
4796 lapack_int LAPACKE_zbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4797                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4798                                 double* d, double* e, lapack_complex_double* vt,
4799                                 lapack_int ldvt, lapack_complex_double* u,
4800                                 lapack_int ldu, lapack_complex_double* c,
4801                                 lapack_int ldc, double* work );
4802
4803 lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
4804                                 const float* d, float* sep );
4805 lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
4806                                 const double* d, double* sep );
4807
4808 lapack_int LAPACKE_sgbbrd_work( int matrix_layout, char vect, lapack_int m,
4809                                 lapack_int n, lapack_int ncc, lapack_int kl,
4810                                 lapack_int ku, float* ab, lapack_int ldab,
4811                                 float* d, float* e, float* q, lapack_int ldq,
4812                                 float* pt, lapack_int ldpt, float* c,
4813                                 lapack_int ldc, float* work );
4814 lapack_int LAPACKE_dgbbrd_work( int matrix_layout, char vect, lapack_int m,
4815                                 lapack_int n, lapack_int ncc, lapack_int kl,
4816                                 lapack_int ku, double* ab, lapack_int ldab,
4817                                 double* d, double* e, double* q, lapack_int ldq,
4818                                 double* pt, lapack_int ldpt, double* c,
4819                                 lapack_int ldc, double* work );
4820 lapack_int LAPACKE_cgbbrd_work( int matrix_layout, char vect, lapack_int m,
4821                                 lapack_int n, lapack_int ncc, lapack_int kl,
4822                                 lapack_int ku, lapack_complex_float* ab,
4823                                 lapack_int ldab, float* d, float* e,
4824                                 lapack_complex_float* q, lapack_int ldq,
4825                                 lapack_complex_float* pt, lapack_int ldpt,
4826                                 lapack_complex_float* c, lapack_int ldc,
4827                                 lapack_complex_float* work, float* rwork );
4828 lapack_int LAPACKE_zgbbrd_work( int matrix_layout, char vect, lapack_int m,
4829                                 lapack_int n, lapack_int ncc, lapack_int kl,
4830                                 lapack_int ku, lapack_complex_double* ab,
4831                                 lapack_int ldab, double* d, double* e,
4832                                 lapack_complex_double* q, lapack_int ldq,
4833                                 lapack_complex_double* pt, lapack_int ldpt,
4834                                 lapack_complex_double* c, lapack_int ldc,
4835                                 lapack_complex_double* work, double* rwork );
4836
4837 lapack_int LAPACKE_sgbcon_work( int matrix_layout, char norm, lapack_int n,
4838                                 lapack_int kl, lapack_int ku, const float* ab,
4839                                 lapack_int ldab, const lapack_int* ipiv,
4840                                 float anorm, float* rcond, float* work,
4841                                 lapack_int* iwork );
4842 lapack_int LAPACKE_dgbcon_work( int matrix_layout, char norm, lapack_int n,
4843                                 lapack_int kl, lapack_int ku, const double* ab,
4844                                 lapack_int ldab, const lapack_int* ipiv,
4845                                 double anorm, double* rcond, double* work,
4846                                 lapack_int* iwork );
4847 lapack_int LAPACKE_cgbcon_work( int matrix_layout, char norm, lapack_int n,
4848                                 lapack_int kl, lapack_int ku,
4849                                 const lapack_complex_float* ab, lapack_int ldab,
4850                                 const lapack_int* ipiv, float anorm,
4851                                 float* rcond, lapack_complex_float* work,
4852                                 float* rwork );
4853 lapack_int LAPACKE_zgbcon_work( int matrix_layout, char norm, lapack_int n,
4854                                 lapack_int kl, lapack_int ku,
4855                                 const lapack_complex_double* ab,
4856                                 lapack_int ldab, const lapack_int* ipiv,
4857                                 double anorm, double* rcond,
4858                                 lapack_complex_double* work, double* rwork );
4859
4860 lapack_int LAPACKE_sgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4861                                 lapack_int kl, lapack_int ku, const float* ab,
4862                                 lapack_int ldab, float* r, float* c,
4863                                 float* rowcnd, float* colcnd, float* amax );
4864 lapack_int LAPACKE_dgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4865                                 lapack_int kl, lapack_int ku, const double* ab,
4866                                 lapack_int ldab, double* r, double* c,
4867                                 double* rowcnd, double* colcnd, double* amax );
4868 lapack_int LAPACKE_cgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4869                                 lapack_int kl, lapack_int ku,
4870                                 const lapack_complex_float* ab, lapack_int ldab,
4871                                 float* r, float* c, float* rowcnd,
4872                                 float* colcnd, float* amax );
4873 lapack_int LAPACKE_zgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4874                                 lapack_int kl, lapack_int ku,
4875                                 const lapack_complex_double* ab,
4876                                 lapack_int ldab, double* r, double* c,
4877                                 double* rowcnd, double* colcnd, double* amax );
4878
4879 lapack_int LAPACKE_sgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4880                                  lapack_int kl, lapack_int ku, const float* ab,
4881                                  lapack_int ldab, float* r, float* c,
4882                                  float* rowcnd, float* colcnd, float* amax );
4883 lapack_int LAPACKE_dgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4884                                  lapack_int kl, lapack_int ku, const double* ab,
4885                                  lapack_int ldab, double* r, double* c,
4886                                  double* rowcnd, double* colcnd, double* amax );
4887 lapack_int LAPACKE_cgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4888                                  lapack_int kl, lapack_int ku,
4889                                  const lapack_complex_float* ab,
4890                                  lapack_int ldab, float* r, float* c,
4891                                  float* rowcnd, float* colcnd, float* amax );
4892 lapack_int LAPACKE_zgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4893                                  lapack_int kl, lapack_int ku,
4894                                  const lapack_complex_double* ab,
4895                                  lapack_int ldab, double* r, double* c,
4896                                  double* rowcnd, double* colcnd, double* amax );
4897
4898 lapack_int LAPACKE_sgbrfs_work( int matrix_layout, char trans, lapack_int n,
4899                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4900                                 const float* ab, lapack_int ldab,
4901                                 const float* afb, lapack_int ldafb,
4902                                 const lapack_int* ipiv, const float* b,
4903                                 lapack_int ldb, float* x, lapack_int ldx,
4904                                 float* ferr, float* berr, float* work,
4905                                 lapack_int* iwork );
4906 lapack_int LAPACKE_dgbrfs_work( int matrix_layout, char trans, lapack_int n,
4907                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4908                                 const double* ab, lapack_int ldab,
4909                                 const double* afb, lapack_int ldafb,
4910                                 const lapack_int* ipiv, const double* b,
4911                                 lapack_int ldb, double* x, lapack_int ldx,
4912                                 double* ferr, double* berr, double* work,
4913                                 lapack_int* iwork );
4914 lapack_int LAPACKE_cgbrfs_work( int matrix_layout, char trans, lapack_int n,
4915                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4916                                 const lapack_complex_float* ab, lapack_int ldab,
4917                                 const lapack_complex_float* afb,
4918                                 lapack_int ldafb, const lapack_int* ipiv,
4919                                 const lapack_complex_float* b, lapack_int ldb,
4920                                 lapack_complex_float* x, lapack_int ldx,
4921                                 float* ferr, float* berr,
4922                                 lapack_complex_float* work, float* rwork );
4923 lapack_int LAPACKE_zgbrfs_work( int matrix_layout, char trans, lapack_int n,
4924                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4925                                 const lapack_complex_double* ab,
4926                                 lapack_int ldab,
4927                                 const lapack_complex_double* afb,
4928                                 lapack_int ldafb, const lapack_int* ipiv,
4929                                 const lapack_complex_double* b, lapack_int ldb,
4930                                 lapack_complex_double* x, lapack_int ldx,
4931                                 double* ferr, double* berr,
4932                                 lapack_complex_double* work, double* rwork );
4933
4934 lapack_int LAPACKE_sgbrfsx_work( int matrix_layout, char trans, char equed,
4935                                  lapack_int n, lapack_int kl, lapack_int ku,
4936                                  lapack_int nrhs, const float* ab,
4937                                  lapack_int ldab, const float* afb,
4938                                  lapack_int ldafb, const lapack_int* ipiv,
4939                                  const float* r, const float* c, const float* b,
4940                                  lapack_int ldb, 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, float* work,
4945                                  lapack_int* iwork );
4946 lapack_int LAPACKE_dgbrfsx_work( int matrix_layout, char trans, char equed,
4947                                  lapack_int n, lapack_int kl, lapack_int ku,
4948                                  lapack_int nrhs, const double* ab,
4949                                  lapack_int ldab, const double* afb,
4950                                  lapack_int ldafb, const lapack_int* ipiv,
4951                                  const double* r, const double* c,
4952                                  const double* b, lapack_int ldb, double* x,
4953                                  lapack_int ldx, double* rcond, double* berr,
4954                                  lapack_int n_err_bnds, double* err_bnds_norm,
4955                                  double* err_bnds_comp, lapack_int nparams,
4956                                  double* params, double* work,
4957                                  lapack_int* iwork );
4958 lapack_int LAPACKE_cgbrfsx_work( int matrix_layout, char trans, char equed,
4959                                  lapack_int n, lapack_int kl, lapack_int ku,
4960                                  lapack_int nrhs,
4961                                  const lapack_complex_float* ab,
4962                                  lapack_int ldab,
4963                                  const lapack_complex_float* afb,
4964                                  lapack_int ldafb, const lapack_int* ipiv,
4965                                  const float* r, const float* c,
4966                                  const lapack_complex_float* b, lapack_int ldb,
4967                                  lapack_complex_float* x, lapack_int ldx,
4968                                  float* rcond, float* berr,
4969                                  lapack_int n_err_bnds, float* err_bnds_norm,
4970                                  float* err_bnds_comp, lapack_int nparams,
4971                                  float* params, lapack_complex_float* work,
4972                                  float* rwork );
4973 lapack_int LAPACKE_zgbrfsx_work( int matrix_layout, char trans, char equed,
4974                                  lapack_int n, lapack_int kl, lapack_int ku,
4975                                  lapack_int nrhs,
4976                                  const lapack_complex_double* ab,
4977                                  lapack_int ldab,
4978                                  const lapack_complex_double* afb,
4979                                  lapack_int ldafb, const lapack_int* ipiv,
4980                                  const double* r, const double* c,
4981                                  const lapack_complex_double* b, lapack_int ldb,
4982                                  lapack_complex_double* x, lapack_int ldx,
4983                                  double* rcond, double* berr,
4984                                  lapack_int n_err_bnds, double* err_bnds_norm,
4985                                  double* err_bnds_comp, lapack_int nparams,
4986                                  double* params, lapack_complex_double* work,
4987                                  double* rwork );
4988
4989 lapack_int LAPACKE_sgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
4990                                lapack_int ku, lapack_int nrhs, float* ab,
4991                                lapack_int ldab, lapack_int* ipiv, float* b,
4992                                lapack_int ldb );
4993 lapack_int LAPACKE_dgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
4994                                lapack_int ku, lapack_int nrhs, double* ab,
4995                                lapack_int ldab, lapack_int* ipiv, double* b,
4996                                lapack_int ldb );
4997 lapack_int LAPACKE_cgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
4998                                lapack_int ku, lapack_int nrhs,
4999                                lapack_complex_float* ab, lapack_int ldab,
5000                                lapack_int* ipiv, lapack_complex_float* b,
5001                                lapack_int ldb );
5002 lapack_int LAPACKE_zgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
5003                                lapack_int ku, lapack_int nrhs,
5004                                lapack_complex_double* ab, lapack_int ldab,
5005                                lapack_int* ipiv, lapack_complex_double* b,
5006                                lapack_int ldb );
5007
5008 lapack_int LAPACKE_sgbsvx_work( int matrix_layout, char fact, char trans,
5009                                 lapack_int n, lapack_int kl, lapack_int ku,
5010                                 lapack_int nrhs, float* ab, lapack_int ldab,
5011                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
5012                                 char* equed, float* r, float* c, float* b,
5013                                 lapack_int ldb, float* x, lapack_int ldx,
5014                                 float* rcond, float* ferr, float* berr,
5015                                 float* work, lapack_int* iwork );
5016 lapack_int LAPACKE_dgbsvx_work( int matrix_layout, char fact, char trans,
5017                                 lapack_int n, lapack_int kl, lapack_int ku,
5018                                 lapack_int nrhs, double* ab, lapack_int ldab,
5019                                 double* afb, lapack_int ldafb, lapack_int* ipiv,
5020                                 char* equed, double* r, double* c, double* b,
5021                                 lapack_int ldb, double* x, lapack_int ldx,
5022                                 double* rcond, double* ferr, double* berr,
5023                                 double* work, lapack_int* iwork );
5024 lapack_int LAPACKE_cgbsvx_work( int matrix_layout, char fact, char trans,
5025                                 lapack_int n, lapack_int kl, lapack_int ku,
5026                                 lapack_int nrhs, lapack_complex_float* ab,
5027                                 lapack_int ldab, lapack_complex_float* afb,
5028                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
5029                                 float* r, float* c, lapack_complex_float* b,
5030                                 lapack_int ldb, lapack_complex_float* x,
5031                                 lapack_int ldx, float* rcond, float* ferr,
5032                                 float* berr, lapack_complex_float* work,
5033                                 float* rwork );
5034 lapack_int LAPACKE_zgbsvx_work( int matrix_layout, char fact, char trans,
5035                                 lapack_int n, lapack_int kl, lapack_int ku,
5036                                 lapack_int nrhs, lapack_complex_double* ab,
5037                                 lapack_int ldab, lapack_complex_double* afb,
5038                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
5039                                 double* r, double* c, lapack_complex_double* b,
5040                                 lapack_int ldb, lapack_complex_double* x,
5041                                 lapack_int ldx, double* rcond, double* ferr,
5042                                 double* berr, lapack_complex_double* work,
5043                                 double* rwork );
5044
5045 lapack_int LAPACKE_sgbsvxx_work( int matrix_layout, char fact, char trans,
5046                                  lapack_int n, lapack_int kl, lapack_int ku,
5047                                  lapack_int nrhs, float* ab, lapack_int ldab,
5048                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
5049                                  char* equed, float* r, float* c, float* b,
5050                                  lapack_int ldb, float* x, lapack_int ldx,
5051                                  float* rcond, float* rpvgrw, float* berr,
5052                                  lapack_int n_err_bnds, float* err_bnds_norm,
5053                                  float* err_bnds_comp, lapack_int nparams,
5054                                  float* params, float* work,
5055                                  lapack_int* iwork );
5056 lapack_int LAPACKE_dgbsvxx_work( int matrix_layout, char fact, char trans,
5057                                  lapack_int n, lapack_int kl, lapack_int ku,
5058                                  lapack_int nrhs, double* ab, lapack_int ldab,
5059                                  double* afb, lapack_int ldafb,
5060                                  lapack_int* ipiv, char* equed, double* r,
5061                                  double* c, double* b, lapack_int ldb,
5062                                  double* x, lapack_int ldx, double* rcond,
5063                                  double* rpvgrw, double* berr,
5064                                  lapack_int n_err_bnds, double* err_bnds_norm,
5065                                  double* err_bnds_comp, lapack_int nparams,
5066                                  double* params, double* work,
5067                                  lapack_int* iwork );
5068 lapack_int LAPACKE_cgbsvxx_work( int matrix_layout, char fact, char trans,
5069                                  lapack_int n, lapack_int kl, lapack_int ku,
5070                                  lapack_int nrhs, lapack_complex_float* ab,
5071                                  lapack_int ldab, lapack_complex_float* afb,
5072                                  lapack_int ldafb, lapack_int* ipiv,
5073                                  char* equed, float* r, float* c,
5074                                  lapack_complex_float* b, lapack_int ldb,
5075                                  lapack_complex_float* x, lapack_int ldx,
5076                                  float* rcond, float* rpvgrw, float* berr,
5077                                  lapack_int n_err_bnds, float* err_bnds_norm,
5078                                  float* err_bnds_comp, lapack_int nparams,
5079                                  float* params, lapack_complex_float* work,
5080                                  float* rwork );
5081 lapack_int LAPACKE_zgbsvxx_work( int matrix_layout, char fact, char trans,
5082                                  lapack_int n, lapack_int kl, lapack_int ku,
5083                                  lapack_int nrhs, lapack_complex_double* ab,
5084                                  lapack_int ldab, lapack_complex_double* afb,
5085                                  lapack_int ldafb, lapack_int* ipiv,
5086                                  char* equed, double* r, double* c,
5087                                  lapack_complex_double* b, lapack_int ldb,
5088                                  lapack_complex_double* x, lapack_int ldx,
5089                                  double* rcond, double* rpvgrw, double* berr,
5090                                  lapack_int n_err_bnds, double* err_bnds_norm,
5091                                  double* err_bnds_comp, lapack_int nparams,
5092                                  double* params, lapack_complex_double* work,
5093                                  double* rwork );
5094
5095 lapack_int LAPACKE_sgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5096                                 lapack_int kl, lapack_int ku, float* ab,
5097                                 lapack_int ldab, lapack_int* ipiv );
5098 lapack_int LAPACKE_dgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5099                                 lapack_int kl, lapack_int ku, double* ab,
5100                                 lapack_int ldab, lapack_int* ipiv );
5101 lapack_int LAPACKE_cgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5102                                 lapack_int kl, lapack_int ku,
5103                                 lapack_complex_float* ab, lapack_int ldab,
5104                                 lapack_int* ipiv );
5105 lapack_int LAPACKE_zgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5106                                 lapack_int kl, lapack_int ku,
5107                                 lapack_complex_double* ab, lapack_int ldab,
5108                                 lapack_int* ipiv );
5109
5110 lapack_int LAPACKE_sgbtrs_work( int matrix_layout, char trans, lapack_int n,
5111                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5112                                 const float* ab, lapack_int ldab,
5113                                 const lapack_int* ipiv, float* b,
5114                                 lapack_int ldb );
5115 lapack_int LAPACKE_dgbtrs_work( int matrix_layout, char trans, lapack_int n,
5116                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5117                                 const double* ab, lapack_int ldab,
5118                                 const lapack_int* ipiv, double* b,
5119                                 lapack_int ldb );
5120 lapack_int LAPACKE_cgbtrs_work( int matrix_layout, char trans, lapack_int n,
5121                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5122                                 const lapack_complex_float* ab, lapack_int ldab,
5123                                 const lapack_int* ipiv, lapack_complex_float* b,
5124                                 lapack_int ldb );
5125 lapack_int LAPACKE_zgbtrs_work( int matrix_layout, char trans, lapack_int n,
5126                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5127                                 const lapack_complex_double* ab,
5128                                 lapack_int ldab, const lapack_int* ipiv,
5129                                 lapack_complex_double* b, lapack_int ldb );
5130
5131 lapack_int LAPACKE_sgebak_work( int matrix_layout, char job, char side,
5132                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5133                                 const float* scale, lapack_int m, float* v,
5134                                 lapack_int ldv );
5135 lapack_int LAPACKE_dgebak_work( int matrix_layout, char job, char side,
5136                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5137                                 const double* scale, lapack_int m, double* v,
5138                                 lapack_int ldv );
5139 lapack_int LAPACKE_cgebak_work( int matrix_layout, char job, char side,
5140                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5141                                 const float* scale, lapack_int m,
5142                                 lapack_complex_float* v, lapack_int ldv );
5143 lapack_int LAPACKE_zgebak_work( int matrix_layout, char job, char side,
5144                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5145                                 const double* scale, lapack_int m,
5146                                 lapack_complex_double* v, lapack_int ldv );
5147
5148 lapack_int LAPACKE_sgebal_work( int matrix_layout, char job, lapack_int n,
5149                                 float* a, lapack_int lda, lapack_int* ilo,
5150                                 lapack_int* ihi, float* scale );
5151 lapack_int LAPACKE_dgebal_work( int matrix_layout, char job, lapack_int n,
5152                                 double* a, lapack_int lda, lapack_int* ilo,
5153                                 lapack_int* ihi, double* scale );
5154 lapack_int LAPACKE_cgebal_work( int matrix_layout, char job, lapack_int n,
5155                                 lapack_complex_float* a, lapack_int lda,
5156                                 lapack_int* ilo, lapack_int* ihi,
5157                                 float* scale );
5158 lapack_int LAPACKE_zgebal_work( int matrix_layout, char job, lapack_int n,
5159                                 lapack_complex_double* a, lapack_int lda,
5160                                 lapack_int* ilo, lapack_int* ihi,
5161                                 double* scale );
5162
5163 lapack_int LAPACKE_sgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5164                                 float* a, lapack_int lda, float* d, float* e,
5165                                 float* tauq, float* taup, float* work,
5166                                 lapack_int lwork );
5167 lapack_int LAPACKE_dgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5168                                 double* a, lapack_int lda, double* d, double* e,
5169                                 double* tauq, double* taup, double* work,
5170                                 lapack_int lwork );
5171 lapack_int LAPACKE_cgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5172                                 lapack_complex_float* a, lapack_int lda,
5173                                 float* d, float* e, lapack_complex_float* tauq,
5174                                 lapack_complex_float* taup,
5175                                 lapack_complex_float* work, lapack_int lwork );
5176 lapack_int LAPACKE_zgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5177                                 lapack_complex_double* a, lapack_int lda,
5178                                 double* d, double* e,
5179                                 lapack_complex_double* tauq,
5180                                 lapack_complex_double* taup,
5181                                 lapack_complex_double* work, lapack_int lwork );
5182
5183 lapack_int LAPACKE_sgecon_work( int matrix_layout, char norm, lapack_int n,
5184                                 const float* a, lapack_int lda, float anorm,
5185                                 float* rcond, float* work, lapack_int* iwork );
5186 lapack_int LAPACKE_dgecon_work( int matrix_layout, char norm, lapack_int n,
5187                                 const double* a, lapack_int lda, double anorm,
5188                                 double* rcond, double* work,
5189                                 lapack_int* iwork );
5190 lapack_int LAPACKE_cgecon_work( int matrix_layout, char norm, lapack_int n,
5191                                 const lapack_complex_float* a, lapack_int lda,
5192                                 float anorm, float* rcond,
5193                                 lapack_complex_float* work, float* rwork );
5194 lapack_int LAPACKE_zgecon_work( int matrix_layout, char norm, lapack_int n,
5195                                 const lapack_complex_double* a, lapack_int lda,
5196                                 double anorm, double* rcond,
5197                                 lapack_complex_double* work, double* rwork );
5198
5199 lapack_int LAPACKE_sgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5200                                 const float* a, lapack_int lda, float* r,
5201                                 float* c, float* rowcnd, float* colcnd,
5202                                 float* amax );
5203 lapack_int LAPACKE_dgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5204                                 const double* a, lapack_int lda, double* r,
5205                                 double* c, double* rowcnd, double* colcnd,
5206                                 double* amax );
5207 lapack_int LAPACKE_cgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5208                                 const lapack_complex_float* a, lapack_int lda,
5209                                 float* r, float* c, float* rowcnd,
5210                                 float* colcnd, float* amax );
5211 lapack_int LAPACKE_zgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5212                                 const lapack_complex_double* a, lapack_int lda,
5213                                 double* r, double* c, double* rowcnd,
5214                                 double* colcnd, double* amax );
5215
5216 lapack_int LAPACKE_sgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5217                                  const float* a, lapack_int lda, float* r,
5218                                  float* c, float* rowcnd, float* colcnd,
5219                                  float* amax );
5220 lapack_int LAPACKE_dgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5221                                  const double* a, lapack_int lda, double* r,
5222                                  double* c, double* rowcnd, double* colcnd,
5223                                  double* amax );
5224 lapack_int LAPACKE_cgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5225                                  const lapack_complex_float* a, lapack_int lda,
5226                                  float* r, float* c, float* rowcnd,
5227                                  float* colcnd, float* amax );
5228 lapack_int LAPACKE_zgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5229                                  const lapack_complex_double* a, lapack_int lda,
5230                                  double* r, double* c, double* rowcnd,
5231                                  double* colcnd, double* amax );
5232
5233 lapack_int LAPACKE_sgees_work( int matrix_layout, char jobvs, char sort,
5234                                LAPACK_S_SELECT2 select, lapack_int n, float* a,
5235                                lapack_int lda, lapack_int* sdim, float* wr,
5236                                float* wi, float* vs, lapack_int ldvs,
5237                                float* work, lapack_int lwork,
5238                                lapack_logical* bwork );
5239 lapack_int LAPACKE_dgees_work( int matrix_layout, char jobvs, char sort,
5240                                LAPACK_D_SELECT2 select, lapack_int n, double* a,
5241                                lapack_int lda, lapack_int* sdim, double* wr,
5242                                double* wi, double* vs, lapack_int ldvs,
5243                                double* work, lapack_int lwork,
5244                                lapack_logical* bwork );
5245 lapack_int LAPACKE_cgees_work( int matrix_layout, char jobvs, char sort,
5246                                LAPACK_C_SELECT1 select, lapack_int n,
5247                                lapack_complex_float* a, lapack_int lda,
5248                                lapack_int* sdim, lapack_complex_float* w,
5249                                lapack_complex_float* vs, lapack_int ldvs,
5250                                lapack_complex_float* work, lapack_int lwork,
5251                                float* rwork, lapack_logical* bwork );
5252 lapack_int LAPACKE_zgees_work( int matrix_layout, char jobvs, char sort,
5253                                LAPACK_Z_SELECT1 select, lapack_int n,
5254                                lapack_complex_double* a, lapack_int lda,
5255                                lapack_int* sdim, lapack_complex_double* w,
5256                                lapack_complex_double* vs, lapack_int ldvs,
5257                                lapack_complex_double* work, lapack_int lwork,
5258                                double* rwork, lapack_logical* bwork );
5259
5260 lapack_int LAPACKE_sgeesx_work( int matrix_layout, char jobvs, char sort,
5261                                 LAPACK_S_SELECT2 select, char sense,
5262                                 lapack_int n, float* a, lapack_int lda,
5263                                 lapack_int* sdim, float* wr, float* wi,
5264                                 float* vs, lapack_int ldvs, float* rconde,
5265                                 float* rcondv, float* work, lapack_int lwork,
5266                                 lapack_int* iwork, lapack_int liwork,
5267                                 lapack_logical* bwork );
5268 lapack_int LAPACKE_dgeesx_work( int matrix_layout, char jobvs, char sort,
5269                                 LAPACK_D_SELECT2 select, char sense,
5270                                 lapack_int n, double* a, lapack_int lda,
5271                                 lapack_int* sdim, double* wr, double* wi,
5272                                 double* vs, lapack_int ldvs, double* rconde,
5273                                 double* rcondv, double* work, lapack_int lwork,
5274                                 lapack_int* iwork, lapack_int liwork,
5275                                 lapack_logical* bwork );
5276 lapack_int LAPACKE_cgeesx_work( int matrix_layout, char jobvs, char sort,
5277                                 LAPACK_C_SELECT1 select, char sense,
5278                                 lapack_int n, lapack_complex_float* a,
5279                                 lapack_int lda, lapack_int* sdim,
5280                                 lapack_complex_float* w,
5281                                 lapack_complex_float* vs, lapack_int ldvs,
5282                                 float* rconde, float* rcondv,
5283                                 lapack_complex_float* work, lapack_int lwork,
5284                                 float* rwork, lapack_logical* bwork );
5285 lapack_int LAPACKE_zgeesx_work( int matrix_layout, char jobvs, char sort,
5286                                 LAPACK_Z_SELECT1 select, char sense,
5287                                 lapack_int n, lapack_complex_double* a,
5288                                 lapack_int lda, lapack_int* sdim,
5289                                 lapack_complex_double* w,
5290                                 lapack_complex_double* vs, lapack_int ldvs,
5291                                 double* rconde, double* rcondv,
5292                                 lapack_complex_double* work, lapack_int lwork,
5293                                 double* rwork, lapack_logical* bwork );
5294
5295 lapack_int LAPACKE_sgeev_work( int matrix_layout, char jobvl, char jobvr,
5296                                lapack_int n, float* a, lapack_int lda,
5297                                float* wr, float* wi, float* vl, lapack_int ldvl,
5298                                float* vr, lapack_int ldvr, float* work,
5299                                lapack_int lwork );
5300 lapack_int LAPACKE_dgeev_work( int matrix_layout, char jobvl, char jobvr,
5301                                lapack_int n, double* a, lapack_int lda,
5302                                double* wr, double* wi, double* vl,
5303                                lapack_int ldvl, double* vr, lapack_int ldvr,
5304                                double* work, lapack_int lwork );
5305 lapack_int LAPACKE_cgeev_work( int matrix_layout, char jobvl, char jobvr,
5306                                lapack_int n, lapack_complex_float* a,
5307                                lapack_int lda, lapack_complex_float* w,
5308                                lapack_complex_float* vl, lapack_int ldvl,
5309                                lapack_complex_float* vr, lapack_int ldvr,
5310                                lapack_complex_float* work, lapack_int lwork,
5311                                float* rwork );
5312 lapack_int LAPACKE_zgeev_work( int matrix_layout, char jobvl, char jobvr,
5313                                lapack_int n, lapack_complex_double* a,
5314                                lapack_int lda, lapack_complex_double* w,
5315                                lapack_complex_double* vl, lapack_int ldvl,
5316                                lapack_complex_double* vr, lapack_int ldvr,
5317                                lapack_complex_double* work, lapack_int lwork,
5318                                double* rwork );
5319
5320 lapack_int LAPACKE_sgeevx_work( int matrix_layout, char balanc, char jobvl,
5321                                 char jobvr, char sense, lapack_int n, float* a,
5322                                 lapack_int lda, float* wr, float* wi, float* vl,
5323                                 lapack_int ldvl, float* vr, lapack_int ldvr,
5324                                 lapack_int* ilo, lapack_int* ihi, float* scale,
5325                                 float* abnrm, float* rconde, float* rcondv,
5326                                 float* work, lapack_int lwork,
5327                                 lapack_int* iwork );
5328 lapack_int LAPACKE_dgeevx_work( int matrix_layout, char balanc, char jobvl,
5329                                 char jobvr, char sense, lapack_int n, double* a,
5330                                 lapack_int lda, double* wr, double* wi,
5331                                 double* vl, lapack_int ldvl, double* vr,
5332                                 lapack_int ldvr, lapack_int* ilo,
5333                                 lapack_int* ihi, double* scale, double* abnrm,
5334                                 double* rconde, double* rcondv, double* work,
5335                                 lapack_int lwork, lapack_int* iwork );
5336 lapack_int LAPACKE_cgeevx_work( int matrix_layout, char balanc, char jobvl,
5337                                 char jobvr, char sense, lapack_int n,
5338                                 lapack_complex_float* a, lapack_int lda,
5339                                 lapack_complex_float* w,
5340                                 lapack_complex_float* vl, lapack_int ldvl,
5341                                 lapack_complex_float* vr, lapack_int ldvr,
5342                                 lapack_int* ilo, lapack_int* ihi, float* scale,
5343                                 float* abnrm, float* rconde, float* rcondv,
5344                                 lapack_complex_float* work, lapack_int lwork,
5345                                 float* rwork );
5346 lapack_int LAPACKE_zgeevx_work( int matrix_layout, char balanc, char jobvl,
5347                                 char jobvr, char sense, lapack_int n,
5348                                 lapack_complex_double* a, lapack_int lda,
5349                                 lapack_complex_double* w,
5350                                 lapack_complex_double* vl, lapack_int ldvl,
5351                                 lapack_complex_double* vr, lapack_int ldvr,
5352                                 lapack_int* ilo, lapack_int* ihi, double* scale,
5353                                 double* abnrm, double* rconde, double* rcondv,
5354                                 lapack_complex_double* work, lapack_int lwork,
5355                                 double* rwork );
5356
5357 lapack_int LAPACKE_sgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5358                                 lapack_int ihi, float* a, lapack_int lda,
5359                                 float* tau, float* work, lapack_int lwork );
5360 lapack_int LAPACKE_dgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5361                                 lapack_int ihi, double* a, lapack_int lda,
5362                                 double* tau, double* work, lapack_int lwork );
5363 lapack_int LAPACKE_cgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5364                                 lapack_int ihi, lapack_complex_float* a,
5365                                 lapack_int lda, lapack_complex_float* tau,
5366                                 lapack_complex_float* work, lapack_int lwork );
5367 lapack_int LAPACKE_zgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5368                                 lapack_int ihi, lapack_complex_double* a,
5369                                 lapack_int lda, lapack_complex_double* tau,
5370                                 lapack_complex_double* work, lapack_int lwork );
5371
5372 lapack_int LAPACKE_sgejsv_work( int matrix_layout, char joba, char jobu,
5373                                 char jobv, char jobr, char jobt, char jobp,
5374                                 lapack_int m, lapack_int n, float* a,
5375                                 lapack_int lda, float* sva, float* u,
5376                                 lapack_int ldu, float* v, lapack_int ldv,
5377                                 float* work, lapack_int lwork,
5378                                 lapack_int* iwork );
5379 lapack_int LAPACKE_dgejsv_work( int matrix_layout, char joba, char jobu,
5380                                 char jobv, char jobr, char jobt, char jobp,
5381                                 lapack_int m, lapack_int n, double* a,
5382                                 lapack_int lda, double* sva, double* u,
5383                                 lapack_int ldu, double* v, lapack_int ldv,
5384                                 double* work, lapack_int lwork,
5385                                 lapack_int* iwork );
5386 lapack_int LAPACKE_cgejsv_work( int matrix_layout, char joba, char jobu,
5387                                 char jobv, char jobr, char jobt, char jobp,
5388                                 lapack_int m, lapack_int n, lapack_complex_float* a,
5389                                 lapack_int lda, float* sva, lapack_complex_float* u,
5390                                 lapack_int ldu, lapack_complex_float* v, lapack_int ldv,
5391                                 lapack_complex_float* cwork, lapack_int lwork,
5392                                 float* work, lapack_int lrwork,
5393                                 lapack_int* iwork );
5394 lapack_int LAPACKE_zgejsv_work( int matrix_layout, char joba, char jobu,
5395                                 char jobv, char jobr, char jobt, char jobp,
5396                                 lapack_int m, lapack_int n, lapack_complex_double* a,
5397                                 lapack_int lda, double* sva, lapack_complex_double* u,
5398                                 lapack_int ldu, lapack_complex_double* v, lapack_int ldv,
5399                                 lapack_complex_double* cwork, lapack_int lwork,
5400                                 double* work, lapack_int lrwork,
5401                                 lapack_int* iwork );
5402
5403 lapack_int LAPACKE_sgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5404                                 float* a, lapack_int lda, float* tau,
5405                                 float* work );
5406 lapack_int LAPACKE_dgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5407                                 double* a, lapack_int lda, double* tau,
5408                                 double* work );
5409 lapack_int LAPACKE_cgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5410                                 lapack_complex_float* a, lapack_int lda,
5411                                 lapack_complex_float* tau,
5412                                 lapack_complex_float* work );
5413 lapack_int LAPACKE_zgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5414                                 lapack_complex_double* a, lapack_int lda,
5415                                 lapack_complex_double* tau,
5416                                 lapack_complex_double* work );
5417
5418 lapack_int LAPACKE_sgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5419                                 float* a, lapack_int lda, float* tau,
5420                                 float* work, lapack_int lwork );
5421 lapack_int LAPACKE_dgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5422                                 double* a, lapack_int lda, double* tau,
5423                                 double* work, lapack_int lwork );
5424 lapack_int LAPACKE_cgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5425                                 lapack_complex_float* a, lapack_int lda,
5426                                 lapack_complex_float* tau,
5427                                 lapack_complex_float* work, lapack_int lwork );
5428 lapack_int LAPACKE_zgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5429                                 lapack_complex_double* a, lapack_int lda,
5430                                 lapack_complex_double* tau,
5431                                 lapack_complex_double* work, lapack_int lwork );
5432
5433 lapack_int LAPACKE_sgels_work( int matrix_layout, char trans, lapack_int m,
5434                                lapack_int n, lapack_int nrhs, float* a,
5435                                lapack_int lda, float* b, lapack_int ldb,
5436                                float* work, lapack_int lwork );
5437 lapack_int LAPACKE_dgels_work( int matrix_layout, char trans, lapack_int m,
5438                                lapack_int n, lapack_int nrhs, double* a,
5439                                lapack_int lda, double* b, lapack_int ldb,
5440                                double* work, lapack_int lwork );
5441 lapack_int LAPACKE_cgels_work( int matrix_layout, char trans, lapack_int m,
5442                                lapack_int n, lapack_int nrhs,
5443                                lapack_complex_float* a, lapack_int lda,
5444                                lapack_complex_float* b, lapack_int ldb,
5445                                lapack_complex_float* work, lapack_int lwork );
5446 lapack_int LAPACKE_zgels_work( int matrix_layout, char trans, lapack_int m,
5447                                lapack_int n, lapack_int nrhs,
5448                                lapack_complex_double* a, lapack_int lda,
5449                                lapack_complex_double* b, lapack_int ldb,
5450                                lapack_complex_double* work, lapack_int lwork );
5451
5452 lapack_int LAPACKE_sgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5453                                 lapack_int nrhs, float* a, lapack_int lda,
5454                                 float* b, lapack_int ldb, float* s, float rcond,
5455                                 lapack_int* rank, float* work, lapack_int lwork,
5456                                 lapack_int* iwork );
5457 lapack_int LAPACKE_dgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5458                                 lapack_int nrhs, double* a, lapack_int lda,
5459                                 double* b, lapack_int ldb, double* s,
5460                                 double rcond, lapack_int* rank, double* work,
5461                                 lapack_int lwork, lapack_int* iwork );
5462 lapack_int LAPACKE_cgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5463                                 lapack_int nrhs, lapack_complex_float* a,
5464                                 lapack_int lda, lapack_complex_float* b,
5465                                 lapack_int ldb, float* s, float rcond,
5466                                 lapack_int* rank, lapack_complex_float* work,
5467                                 lapack_int lwork, float* rwork,
5468                                 lapack_int* iwork );
5469 lapack_int LAPACKE_zgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5470                                 lapack_int nrhs, lapack_complex_double* a,
5471                                 lapack_int lda, lapack_complex_double* b,
5472                                 lapack_int ldb, double* s, double rcond,
5473                                 lapack_int* rank, lapack_complex_double* work,
5474                                 lapack_int lwork, double* rwork,
5475                                 lapack_int* iwork );
5476
5477 lapack_int LAPACKE_sgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5478                                 lapack_int nrhs, float* a, lapack_int lda,
5479                                 float* b, lapack_int ldb, float* s, float rcond,
5480                                 lapack_int* rank, float* work,
5481                                 lapack_int lwork );
5482 lapack_int LAPACKE_dgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5483                                 lapack_int nrhs, double* a, lapack_int lda,
5484                                 double* b, lapack_int ldb, double* s,
5485                                 double rcond, lapack_int* rank, double* work,
5486                                 lapack_int lwork );
5487 lapack_int LAPACKE_cgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5488                                 lapack_int nrhs, lapack_complex_float* a,
5489                                 lapack_int lda, lapack_complex_float* b,
5490                                 lapack_int ldb, float* s, float rcond,
5491                                 lapack_int* rank, lapack_complex_float* work,
5492                                 lapack_int lwork, float* rwork );
5493 lapack_int LAPACKE_zgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5494                                 lapack_int nrhs, lapack_complex_double* a,
5495                                 lapack_int lda, lapack_complex_double* b,
5496                                 lapack_int ldb, double* s, double rcond,
5497                                 lapack_int* rank, lapack_complex_double* work,
5498                                 lapack_int lwork, double* rwork );
5499
5500 lapack_int LAPACKE_sgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5501                                 lapack_int nrhs, float* a, lapack_int lda,
5502                                 float* b, lapack_int ldb, lapack_int* jpvt,
5503                                 float rcond, lapack_int* rank, float* work,
5504                                 lapack_int lwork );
5505 lapack_int LAPACKE_dgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5506                                 lapack_int nrhs, double* a, lapack_int lda,
5507                                 double* b, lapack_int ldb, lapack_int* jpvt,
5508                                 double rcond, lapack_int* rank, double* work,
5509                                 lapack_int lwork );
5510 lapack_int LAPACKE_cgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5511                                 lapack_int nrhs, lapack_complex_float* a,
5512                                 lapack_int lda, lapack_complex_float* b,
5513                                 lapack_int ldb, lapack_int* jpvt, float rcond,
5514                                 lapack_int* rank, lapack_complex_float* work,
5515                                 lapack_int lwork, float* rwork );
5516 lapack_int LAPACKE_zgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5517                                 lapack_int nrhs, lapack_complex_double* a,
5518                                 lapack_int lda, lapack_complex_double* b,
5519                                 lapack_int ldb, lapack_int* jpvt, double rcond,
5520                                 lapack_int* rank, lapack_complex_double* work,
5521                                 lapack_int lwork, double* rwork );
5522
5523 lapack_int LAPACKE_sgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5524                                 float* a, lapack_int lda, float* tau,
5525                                 float* work, lapack_int lwork );
5526 lapack_int LAPACKE_dgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5527                                 double* a, lapack_int lda, double* tau,
5528                                 double* work, lapack_int lwork );
5529 lapack_int LAPACKE_cgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5530                                 lapack_complex_float* a, lapack_int lda,
5531                                 lapack_complex_float* tau,
5532                                 lapack_complex_float* work, lapack_int lwork );
5533 lapack_int LAPACKE_zgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5534                                 lapack_complex_double* a, lapack_int lda,
5535                                 lapack_complex_double* tau,
5536                                 lapack_complex_double* work, lapack_int lwork );
5537
5538 lapack_int LAPACKE_sgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5539                                 float* a, lapack_int lda, lapack_int* jpvt,
5540                                 float* tau, float* work, lapack_int lwork );
5541 lapack_int LAPACKE_dgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5542                                 double* a, lapack_int lda, lapack_int* jpvt,
5543                                 double* tau, double* work, lapack_int lwork );
5544 lapack_int LAPACKE_cgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5545                                 lapack_complex_float* a, lapack_int lda,
5546                                 lapack_int* jpvt, lapack_complex_float* tau,
5547                                 lapack_complex_float* work, lapack_int lwork,
5548                                 float* rwork );
5549 lapack_int LAPACKE_zgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5550                                 lapack_complex_double* a, lapack_int lda,
5551                                 lapack_int* jpvt, lapack_complex_double* tau,
5552                                 lapack_complex_double* work, lapack_int lwork,
5553                                 double* rwork );
5554
5555 lapack_int LAPACKE_sgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5556                                 float* a, lapack_int lda, lapack_int* jpvt,
5557                                 float* tau, float* work );
5558 lapack_int LAPACKE_dgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5559                                 double* a, lapack_int lda, lapack_int* jpvt,
5560                                 double* tau, double* work );
5561 lapack_int LAPACKE_cgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5562                                 lapack_complex_float* a, lapack_int lda,
5563                                 lapack_int* jpvt, lapack_complex_float* tau,
5564                                 lapack_complex_float* work, float* rwork );
5565 lapack_int LAPACKE_zgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5566                                 lapack_complex_double* a, lapack_int lda,
5567                                 lapack_int* jpvt, lapack_complex_double* tau,
5568                                 lapack_complex_double* work, double* rwork );
5569
5570 lapack_int LAPACKE_sgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5571                                 float* a, lapack_int lda, float* tau,
5572                                 float* work );
5573 lapack_int LAPACKE_dgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5574                                 double* a, lapack_int lda, double* tau,
5575                                 double* work );
5576 lapack_int LAPACKE_cgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5577                                 lapack_complex_float* a, lapack_int lda,
5578                                 lapack_complex_float* tau,
5579                                 lapack_complex_float* work );
5580 lapack_int LAPACKE_zgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5581                                 lapack_complex_double* a, lapack_int lda,
5582                                 lapack_complex_double* tau,
5583                                 lapack_complex_double* work );
5584
5585 lapack_int LAPACKE_sgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5586                                 float* a, lapack_int lda, float* tau,
5587                                 float* work, lapack_int lwork );
5588 lapack_int LAPACKE_dgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5589                                 double* a, lapack_int lda, double* tau,
5590                                 double* work, lapack_int lwork );
5591 lapack_int LAPACKE_cgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5592                                 lapack_complex_float* a, lapack_int lda,
5593                                 lapack_complex_float* tau,
5594                                 lapack_complex_float* work, lapack_int lwork );
5595 lapack_int LAPACKE_zgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5596                                 lapack_complex_double* a, lapack_int lda,
5597                                 lapack_complex_double* tau,
5598                                 lapack_complex_double* work, lapack_int lwork );
5599
5600 lapack_int LAPACKE_sgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5601                                  float* a, lapack_int lda, float* tau,
5602                                  float* work, lapack_int lwork );
5603 lapack_int LAPACKE_dgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5604                                  double* a, lapack_int lda, double* tau,
5605                                  double* work, lapack_int lwork );
5606 lapack_int LAPACKE_cgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5607                                  lapack_complex_float* a, lapack_int lda,
5608                                  lapack_complex_float* tau,
5609                                  lapack_complex_float* work, lapack_int lwork );
5610 lapack_int LAPACKE_zgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5611                                  lapack_complex_double* a, lapack_int lda,
5612                                  lapack_complex_double* tau,
5613                                  lapack_complex_double* work,
5614                                  lapack_int lwork );
5615
5616 lapack_int LAPACKE_sgerfs_work( int matrix_layout, char trans, lapack_int n,
5617                                 lapack_int nrhs, const float* a, lapack_int lda,
5618                                 const float* af, lapack_int ldaf,
5619                                 const lapack_int* ipiv, const float* b,
5620                                 lapack_int ldb, float* x, lapack_int ldx,
5621                                 float* ferr, float* berr, float* work,
5622                                 lapack_int* iwork );
5623 lapack_int LAPACKE_dgerfs_work( int matrix_layout, char trans, lapack_int n,
5624                                 lapack_int nrhs, const double* a,
5625                                 lapack_int lda, const double* af,
5626                                 lapack_int ldaf, const lapack_int* ipiv,
5627                                 const double* b, lapack_int ldb, double* x,
5628                                 lapack_int ldx, double* ferr, double* berr,
5629                                 double* work, lapack_int* iwork );
5630 lapack_int LAPACKE_cgerfs_work( int matrix_layout, char trans, lapack_int n,
5631                                 lapack_int nrhs, const lapack_complex_float* a,
5632                                 lapack_int lda, const lapack_complex_float* af,
5633                                 lapack_int ldaf, const lapack_int* ipiv,
5634                                 const lapack_complex_float* b, lapack_int ldb,
5635                                 lapack_complex_float* x, lapack_int ldx,
5636                                 float* ferr, float* berr,
5637                                 lapack_complex_float* work, float* rwork );
5638 lapack_int LAPACKE_zgerfs_work( int matrix_layout, char trans, lapack_int n,
5639                                 lapack_int nrhs, const lapack_complex_double* a,
5640                                 lapack_int lda, const lapack_complex_double* af,
5641                                 lapack_int ldaf, const lapack_int* ipiv,
5642                                 const lapack_complex_double* b, lapack_int ldb,
5643                                 lapack_complex_double* x, lapack_int ldx,
5644                                 double* ferr, double* berr,
5645                                 lapack_complex_double* work, double* rwork );
5646
5647 lapack_int LAPACKE_sgerfsx_work( int matrix_layout, char trans, char equed,
5648                                  lapack_int n, lapack_int nrhs, const float* a,
5649                                  lapack_int lda, const float* af,
5650                                  lapack_int ldaf, const lapack_int* ipiv,
5651                                  const float* r, const float* c, const float* b,
5652                                  lapack_int ldb, float* x, lapack_int ldx,
5653                                  float* rcond, float* berr,
5654                                  lapack_int n_err_bnds, float* err_bnds_norm,
5655                                  float* err_bnds_comp, lapack_int nparams,
5656                                  float* params, float* work,
5657                                  lapack_int* iwork );
5658 lapack_int LAPACKE_dgerfsx_work( int matrix_layout, char trans, char equed,
5659                                  lapack_int n, lapack_int nrhs, const double* a,
5660                                  lapack_int lda, const double* af,
5661                                  lapack_int ldaf, const lapack_int* ipiv,
5662                                  const double* r, const double* c,
5663                                  const double* b, lapack_int ldb, double* x,
5664                                  lapack_int ldx, double* rcond, double* berr,
5665                                  lapack_int n_err_bnds, double* err_bnds_norm,
5666                                  double* err_bnds_comp, lapack_int nparams,
5667                                  double* params, double* work,
5668                                  lapack_int* iwork );
5669 lapack_int LAPACKE_cgerfsx_work( int matrix_layout, char trans, char equed,
5670                                  lapack_int n, lapack_int nrhs,
5671                                  const lapack_complex_float* a, lapack_int lda,
5672                                  const lapack_complex_float* af,
5673                                  lapack_int ldaf, const lapack_int* ipiv,
5674                                  const float* r, const float* c,
5675                                  const lapack_complex_float* b, lapack_int ldb,
5676                                  lapack_complex_float* x, lapack_int ldx,
5677                                  float* rcond, float* berr,
5678                                  lapack_int n_err_bnds, float* err_bnds_norm,
5679                                  float* err_bnds_comp, lapack_int nparams,
5680                                  float* params, lapack_complex_float* work,
5681                                  float* rwork );
5682 lapack_int LAPACKE_zgerfsx_work( int matrix_layout, char trans, char equed,
5683                                  lapack_int n, lapack_int nrhs,
5684                                  const lapack_complex_double* a, lapack_int lda,
5685                                  const lapack_complex_double* af,
5686                                  lapack_int ldaf, const lapack_int* ipiv,
5687                                  const double* r, const double* c,
5688                                  const lapack_complex_double* b, lapack_int ldb,
5689                                  lapack_complex_double* x, lapack_int ldx,
5690                                  double* rcond, double* berr,
5691                                  lapack_int n_err_bnds, double* err_bnds_norm,
5692                                  double* err_bnds_comp, lapack_int nparams,
5693                                  double* params, lapack_complex_double* work,
5694                                  double* rwork );
5695
5696 lapack_int LAPACKE_sgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5697                                 float* a, lapack_int lda, float* tau,
5698                                 float* work, lapack_int lwork );
5699 lapack_int LAPACKE_dgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5700                                 double* a, lapack_int lda, double* tau,
5701                                 double* work, lapack_int lwork );
5702 lapack_int LAPACKE_cgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5703                                 lapack_complex_float* a, lapack_int lda,
5704                                 lapack_complex_float* tau,
5705                                 lapack_complex_float* work, lapack_int lwork );
5706 lapack_int LAPACKE_zgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5707                                 lapack_complex_double* a, lapack_int lda,
5708                                 lapack_complex_double* tau,
5709                                 lapack_complex_double* work, lapack_int lwork );
5710
5711 lapack_int LAPACKE_sgesdd_work( int matrix_layout, char jobz, lapack_int m,
5712                                 lapack_int n, float* a, lapack_int lda,
5713                                 float* s, float* u, lapack_int ldu, float* vt,
5714                                 lapack_int ldvt, float* work, lapack_int lwork,
5715                                 lapack_int* iwork );
5716 lapack_int LAPACKE_dgesdd_work( int matrix_layout, char jobz, lapack_int m,
5717                                 lapack_int n, double* a, lapack_int lda,
5718                                 double* s, double* u, lapack_int ldu,
5719                                 double* vt, lapack_int ldvt, double* work,
5720                                 lapack_int lwork, lapack_int* iwork );
5721 lapack_int LAPACKE_cgesdd_work( int matrix_layout, char jobz, lapack_int m,
5722                                 lapack_int n, lapack_complex_float* a,
5723                                 lapack_int lda, float* s,
5724                                 lapack_complex_float* u, lapack_int ldu,
5725                                 lapack_complex_float* vt, lapack_int ldvt,
5726                                 lapack_complex_float* work, lapack_int lwork,
5727                                 float* rwork, lapack_int* iwork );
5728 lapack_int LAPACKE_zgesdd_work( int matrix_layout, char jobz, lapack_int m,
5729                                 lapack_int n, lapack_complex_double* a,
5730                                 lapack_int lda, double* s,
5731                                 lapack_complex_double* u, lapack_int ldu,
5732                                 lapack_complex_double* vt, lapack_int ldvt,
5733                                 lapack_complex_double* work, lapack_int lwork,
5734                                 double* rwork, lapack_int* iwork );
5735
5736 lapack_int LAPACKE_sgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5737                                float* a, lapack_int lda, lapack_int* ipiv,
5738                                float* b, lapack_int ldb );
5739 lapack_int LAPACKE_dgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5740                                double* a, lapack_int lda, lapack_int* ipiv,
5741                                double* b, lapack_int ldb );
5742 lapack_int LAPACKE_cgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5743                                lapack_complex_float* a, lapack_int lda,
5744                                lapack_int* ipiv, lapack_complex_float* b,
5745                                lapack_int ldb );
5746 lapack_int LAPACKE_zgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5747                                lapack_complex_double* a, lapack_int lda,
5748                                lapack_int* ipiv, lapack_complex_double* b,
5749                                lapack_int ldb );
5750 lapack_int LAPACKE_dsgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5751                                 double* a, lapack_int lda, lapack_int* ipiv,
5752                                 double* b, lapack_int ldb, double* x,
5753                                 lapack_int ldx, double* work, float* swork,
5754                                 lapack_int* iter );
5755 lapack_int LAPACKE_zcgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5756                                 lapack_complex_double* a, lapack_int lda,
5757                                 lapack_int* ipiv, lapack_complex_double* b,
5758                                 lapack_int ldb, lapack_complex_double* x,
5759                                 lapack_int ldx, lapack_complex_double* work,
5760                                 lapack_complex_float* swork, double* rwork,
5761                                 lapack_int* iter );
5762
5763 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt,
5764                                 lapack_int m, lapack_int n, float* a,
5765                                 lapack_int lda, float* s, float* u,
5766                                 lapack_int ldu, float* vt, lapack_int ldvt,
5767                                 float* work, lapack_int lwork );
5768 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt,
5769                                 lapack_int m, lapack_int n, double* a,
5770                                 lapack_int lda, double* s, double* u,
5771                                 lapack_int ldu, double* vt, lapack_int ldvt,
5772                                 double* work, lapack_int lwork );
5773 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt,
5774                                 lapack_int m, lapack_int n,
5775                                 lapack_complex_float* a, lapack_int lda,
5776                                 float* s, lapack_complex_float* u,
5777                                 lapack_int ldu, lapack_complex_float* vt,
5778                                 lapack_int ldvt, lapack_complex_float* work,
5779                                 lapack_int lwork, float* rwork );
5780 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt,
5781                                 lapack_int m, lapack_int n,
5782                                 lapack_complex_double* a, lapack_int lda,
5783                                 double* s, lapack_complex_double* u,
5784                                 lapack_int ldu, lapack_complex_double* vt,
5785                                 lapack_int ldvt, lapack_complex_double* work,
5786                                 lapack_int lwork, double* rwork );
5787
5788 lapack_int LAPACKE_sgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5789                                  lapack_int m, lapack_int n, float* a,
5790                                  lapack_int lda, float vl, float vu,
5791                                  lapack_int il, lapack_int iu, lapack_int* ns,
5792                                  float* s, float* u, lapack_int ldu,
5793                                  float* vt, lapack_int ldvt,
5794                                  float* work, lapack_int lwork, lapack_int* iwork );
5795 lapack_int LAPACKE_dgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5796                                  lapack_int m, lapack_int n, double* a,
5797                                  lapack_int lda, double vl, double vu,
5798                                  lapack_int il, lapack_int iu, lapack_int* ns,
5799                                  double* s, double* u, lapack_int ldu,
5800                                  double* vt, lapack_int ldvt,
5801                                  double* work, lapack_int lwork, lapack_int* iwork );
5802 lapack_int LAPACKE_cgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5803                                  lapack_int m, lapack_int n, lapack_complex_float* a,
5804                                  lapack_int lda, float vl, float vu,
5805                                  lapack_int il, lapack_int iu, lapack_int* ns,
5806                                  float* s, lapack_complex_float* u, lapack_int ldu,
5807                                  lapack_complex_float* vt, lapack_int ldvt,
5808                                  lapack_complex_float* work, lapack_int lwork,
5809                                  float* rwork, lapack_int* iwork );
5810 lapack_int LAPACKE_zgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5811                                  lapack_int m, lapack_int n, lapack_complex_double* a,
5812                                  lapack_int lda, double vl, double vu,
5813                                  lapack_int il, lapack_int iu, lapack_int* ns,
5814                                  double* s, lapack_complex_double* u, lapack_int ldu,
5815                                  lapack_complex_double* vt, lapack_int ldvt,
5816                                  lapack_complex_double* work, lapack_int lwork,
5817                                  double* rwork, lapack_int* iwork );
5818
5819 lapack_int LAPACKE_sgesvj_work( int matrix_layout, char joba, char jobu,
5820                                 char jobv, lapack_int m, lapack_int n, float* a,
5821                                 lapack_int lda, float* sva, lapack_int mv,
5822                                 float* v, lapack_int ldv, float* work,
5823                                 lapack_int lwork );
5824 lapack_int LAPACKE_dgesvj_work( int matrix_layout, char joba, char jobu,
5825                                 char jobv, lapack_int m, lapack_int n,
5826                                 double* a, lapack_int lda, double* sva,
5827                                 lapack_int mv, double* v, lapack_int ldv,
5828                                 double* work, lapack_int lwork );
5829 lapack_int LAPACKE_cgesvj_work( int matrix_layout, char joba, char jobu,
5830                                 char jobv, lapack_int m, lapack_int n, lapack_complex_float* a,
5831                                 lapack_int lda, float* sva, lapack_int mv,
5832                                 lapack_complex_float* v, lapack_int ldv,
5833                                 lapack_complex_float* cwork, lapack_int lwork,
5834                                 float* rwork,lapack_int lrwork );
5835 lapack_int LAPACKE_zgesvj_work( int matrix_layout, char joba, char jobu,
5836                                 char jobv, lapack_int m, lapack_int n,
5837                                 lapack_complex_double* a, lapack_int lda, double* sva,
5838                                 lapack_int mv, lapack_complex_double* v, lapack_int ldv,
5839                                 lapack_complex_double* cwork, lapack_int lwork,
5840                                 double* rwork, lapack_int lrwork );
5841
5842 lapack_int LAPACKE_sgesvx_work( int matrix_layout, char fact, char trans,
5843                                 lapack_int n, lapack_int nrhs, float* a,
5844                                 lapack_int lda, float* af, lapack_int ldaf,
5845                                 lapack_int* ipiv, char* equed, float* r,
5846                                 float* c, float* b, lapack_int ldb, float* x,
5847                                 lapack_int ldx, float* rcond, float* ferr,
5848                                 float* berr, float* work, lapack_int* iwork );
5849 lapack_int LAPACKE_dgesvx_work( int matrix_layout, char fact, char trans,
5850                                 lapack_int n, lapack_int nrhs, double* a,
5851                                 lapack_int lda, double* af, lapack_int ldaf,
5852                                 lapack_int* ipiv, char* equed, double* r,
5853                                 double* c, double* b, lapack_int ldb, double* x,
5854                                 lapack_int ldx, double* rcond, double* ferr,
5855                                 double* berr, double* work, lapack_int* iwork );
5856 lapack_int LAPACKE_cgesvx_work( int matrix_layout, char fact, char trans,
5857                                 lapack_int n, lapack_int nrhs,
5858                                 lapack_complex_float* a, lapack_int lda,
5859                                 lapack_complex_float* af, lapack_int ldaf,
5860                                 lapack_int* ipiv, char* equed, float* r,
5861                                 float* c, lapack_complex_float* b,
5862                                 lapack_int ldb, lapack_complex_float* x,
5863                                 lapack_int ldx, float* rcond, float* ferr,
5864                                 float* berr, lapack_complex_float* work,
5865                                 float* rwork );
5866 lapack_int LAPACKE_zgesvx_work( int matrix_layout, char fact, char trans,
5867                                 lapack_int n, lapack_int nrhs,
5868                                 lapack_complex_double* a, lapack_int lda,
5869                                 lapack_complex_double* af, lapack_int ldaf,
5870                                 lapack_int* ipiv, char* equed, double* r,
5871                                 double* c, lapack_complex_double* b,
5872                                 lapack_int ldb, lapack_complex_double* x,
5873                                 lapack_int ldx, double* rcond, double* ferr,
5874                                 double* berr, lapack_complex_double* work,
5875                                 double* rwork );
5876
5877 lapack_int LAPACKE_sgesvxx_work( int matrix_layout, char fact, char trans,
5878                                  lapack_int n, lapack_int nrhs, float* a,
5879                                  lapack_int lda, float* af, lapack_int ldaf,
5880                                  lapack_int* ipiv, char* equed, float* r,
5881                                  float* c, float* b, lapack_int ldb, float* x,
5882                                  lapack_int ldx, float* rcond, float* rpvgrw,
5883                                  float* berr, lapack_int n_err_bnds,
5884                                  float* err_bnds_norm, float* err_bnds_comp,
5885                                  lapack_int nparams, float* params, float* work,
5886                                  lapack_int* iwork );
5887 lapack_int LAPACKE_dgesvxx_work( int matrix_layout, char fact, char trans,
5888                                  lapack_int n, lapack_int nrhs, double* a,
5889                                  lapack_int lda, double* af, lapack_int ldaf,
5890                                  lapack_int* ipiv, char* equed, double* r,
5891                                  double* c, double* b, lapack_int ldb,
5892                                  double* x, lapack_int ldx, double* rcond,
5893                                  double* rpvgrw, double* berr,
5894                                  lapack_int n_err_bnds, double* err_bnds_norm,
5895                                  double* err_bnds_comp, lapack_int nparams,
5896                                  double* params, double* work,
5897                                  lapack_int* iwork );
5898 lapack_int LAPACKE_cgesvxx_work( int matrix_layout, char fact, char trans,
5899                                  lapack_int n, lapack_int nrhs,
5900                                  lapack_complex_float* a, lapack_int lda,
5901                                  lapack_complex_float* af, lapack_int ldaf,
5902                                  lapack_int* ipiv, char* equed, float* r,
5903                                  float* c, lapack_complex_float* b,
5904                                  lapack_int ldb, lapack_complex_float* x,
5905                                  lapack_int ldx, float* rcond, float* rpvgrw,
5906                                  float* berr, lapack_int n_err_bnds,
5907                                  float* err_bnds_norm, float* err_bnds_comp,
5908                                  lapack_int nparams, float* params,
5909                                  lapack_complex_float* work, float* rwork );
5910 lapack_int LAPACKE_zgesvxx_work( int matrix_layout, char fact, char trans,
5911                                  lapack_int n, lapack_int nrhs,
5912                                  lapack_complex_double* a, lapack_int lda,
5913                                  lapack_complex_double* af, lapack_int ldaf,
5914                                  lapack_int* ipiv, char* equed, double* r,
5915                                  double* c, lapack_complex_double* b,
5916                                  lapack_int ldb, lapack_complex_double* x,
5917                                  lapack_int ldx, double* rcond, double* rpvgrw,
5918                                  double* berr, lapack_int n_err_bnds,
5919                                  double* err_bnds_norm, double* err_bnds_comp,
5920                                  lapack_int nparams, double* params,
5921                                  lapack_complex_double* work, double* rwork );
5922
5923 lapack_int LAPACKE_sgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5924                                 float* a, lapack_int lda, lapack_int* ipiv );
5925 lapack_int LAPACKE_dgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5926                                 double* a, lapack_int lda, lapack_int* ipiv );
5927 lapack_int LAPACKE_cgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5928                                 lapack_complex_float* a, lapack_int lda,
5929                                 lapack_int* ipiv );
5930 lapack_int LAPACKE_zgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5931                                 lapack_complex_double* a, lapack_int lda,
5932                                 lapack_int* ipiv );
5933
5934 lapack_int LAPACKE_sgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5935                                 float* a, lapack_int lda, lapack_int* ipiv );
5936 lapack_int LAPACKE_dgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5937                                 double* a, lapack_int lda, lapack_int* ipiv );
5938 lapack_int LAPACKE_cgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5939                                 lapack_complex_float* a, lapack_int lda,
5940                                 lapack_int* ipiv );
5941 lapack_int LAPACKE_zgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5942                                 lapack_complex_double* a, lapack_int lda,
5943                                 lapack_int* ipiv );
5944
5945 lapack_int LAPACKE_sgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5946                                 float* a, lapack_int lda, lapack_int* ipiv );
5947 lapack_int LAPACKE_dgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5948                                 double* a, lapack_int lda, lapack_int* ipiv );
5949 lapack_int LAPACKE_cgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5950                                 lapack_complex_float* a, lapack_int lda,
5951                                 lapack_int* ipiv );
5952 lapack_int LAPACKE_zgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5953                                 lapack_complex_double* a, lapack_int lda,
5954                                 lapack_int* ipiv );
5955
5956 lapack_int LAPACKE_sgetri_work( int matrix_layout, lapack_int n, float* a,
5957                                 lapack_int lda, const lapack_int* ipiv,
5958                                 float* work, lapack_int lwork );
5959 lapack_int LAPACKE_dgetri_work( int matrix_layout, lapack_int n, double* a,
5960                                 lapack_int lda, const lapack_int* ipiv,
5961                                 double* work, lapack_int lwork );
5962 lapack_int LAPACKE_cgetri_work( int matrix_layout, lapack_int n,
5963                                 lapack_complex_float* a, lapack_int lda,
5964                                 const lapack_int* ipiv,
5965                                 lapack_complex_float* work, lapack_int lwork );
5966 lapack_int LAPACKE_zgetri_work( int matrix_layout, lapack_int n,
5967                                 lapack_complex_double* a, lapack_int lda,
5968                                 const lapack_int* ipiv,
5969                                 lapack_complex_double* work, lapack_int lwork );
5970
5971 lapack_int LAPACKE_sgetrs_work( int matrix_layout, char trans, lapack_int n,
5972                                 lapack_int nrhs, const float* a, lapack_int lda,
5973                                 const lapack_int* ipiv, float* b,
5974                                 lapack_int ldb );
5975 lapack_int LAPACKE_dgetrs_work( int matrix_layout, char trans, lapack_int n,
5976                                 lapack_int nrhs, const double* a,
5977                                 lapack_int lda, const lapack_int* ipiv,
5978                                 double* b, lapack_int ldb );
5979 lapack_int LAPACKE_cgetrs_work( int matrix_layout, char trans, lapack_int n,
5980                                 lapack_int nrhs, const lapack_complex_float* a,
5981                                 lapack_int lda, const lapack_int* ipiv,
5982                                 lapack_complex_float* b, lapack_int ldb );
5983 lapack_int LAPACKE_zgetrs_work( int matrix_layout, char trans, lapack_int n,
5984                                 lapack_int nrhs, const lapack_complex_double* a,
5985                                 lapack_int lda, const lapack_int* ipiv,
5986                                 lapack_complex_double* b, lapack_int ldb );
5987
5988 lapack_int LAPACKE_sggbak_work( int matrix_layout, char job, char side,
5989                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5990                                 const float* lscale, const float* rscale,
5991                                 lapack_int m, float* v, lapack_int ldv );
5992 lapack_int LAPACKE_dggbak_work( int matrix_layout, char job, char side,
5993                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5994                                 const double* lscale, const double* rscale,
5995                                 lapack_int m, double* v, lapack_int ldv );
5996 lapack_int LAPACKE_cggbak_work( int matrix_layout, char job, char side,
5997                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5998                                 const float* lscale, const float* rscale,
5999                                 lapack_int m, lapack_complex_float* v,
6000                                 lapack_int ldv );
6001 lapack_int LAPACKE_zggbak_work( int matrix_layout, char job, char side,
6002                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6003                                 const double* lscale, const double* rscale,
6004                                 lapack_int m, lapack_complex_double* v,
6005                                 lapack_int ldv );
6006
6007 lapack_int LAPACKE_sggbal_work( int matrix_layout, char job, lapack_int n,
6008                                 float* a, lapack_int lda, float* b,
6009                                 lapack_int ldb, lapack_int* ilo,
6010                                 lapack_int* ihi, float* lscale, float* rscale,
6011                                 float* work );
6012 lapack_int LAPACKE_dggbal_work( int matrix_layout, char job, lapack_int n,
6013                                 double* a, lapack_int lda, double* b,
6014                                 lapack_int ldb, lapack_int* ilo,
6015                                 lapack_int* ihi, double* lscale, double* rscale,
6016                                 double* work );
6017 lapack_int LAPACKE_cggbal_work( int matrix_layout, char job, lapack_int n,
6018                                 lapack_complex_float* a, lapack_int lda,
6019                                 lapack_complex_float* b, lapack_int ldb,
6020                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
6021                                 float* rscale, float* work );
6022 lapack_int LAPACKE_zggbal_work( int matrix_layout, char job, lapack_int n,
6023                                 lapack_complex_double* a, lapack_int lda,
6024                                 lapack_complex_double* b, lapack_int ldb,
6025                                 lapack_int* ilo, lapack_int* ihi,
6026                                 double* lscale, double* rscale, double* work );
6027
6028 lapack_int LAPACKE_sgges_work( int matrix_layout, char jobvsl, char jobvsr,
6029                                char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
6030                                float* a, lapack_int lda, float* b,
6031                                lapack_int ldb, lapack_int* sdim, float* alphar,
6032                                float* alphai, float* beta, float* vsl,
6033                                lapack_int ldvsl, float* vsr, lapack_int ldvsr,
6034                                float* work, lapack_int lwork,
6035                                lapack_logical* bwork );
6036 lapack_int LAPACKE_dgges_work( int matrix_layout, char jobvsl, char jobvsr,
6037                                char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
6038                                double* a, lapack_int lda, double* b,
6039                                lapack_int ldb, lapack_int* sdim, double* alphar,
6040                                double* alphai, double* beta, double* vsl,
6041                                lapack_int ldvsl, double* vsr, lapack_int ldvsr,
6042                                double* work, lapack_int lwork,
6043                                lapack_logical* bwork );
6044 lapack_int LAPACKE_cgges_work( int matrix_layout, char jobvsl, char jobvsr,
6045                                char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
6046                                lapack_complex_float* a, lapack_int lda,
6047                                lapack_complex_float* b, lapack_int ldb,
6048                                lapack_int* sdim, lapack_complex_float* alpha,
6049                                lapack_complex_float* beta,
6050                                lapack_complex_float* vsl, lapack_int ldvsl,
6051                                lapack_complex_float* vsr, lapack_int ldvsr,
6052                                lapack_complex_float* work, lapack_int lwork,
6053                                float* rwork, lapack_logical* bwork );
6054 lapack_int LAPACKE_zgges_work( int matrix_layout, char jobvsl, char jobvsr,
6055                                char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
6056                                lapack_complex_double* a, lapack_int lda,
6057                                lapack_complex_double* b, lapack_int ldb,
6058                                lapack_int* sdim, lapack_complex_double* alpha,
6059                                lapack_complex_double* beta,
6060                                lapack_complex_double* vsl, lapack_int ldvsl,
6061                                lapack_complex_double* vsr, lapack_int ldvsr,
6062                                lapack_complex_double* work, lapack_int lwork,
6063                                double* rwork, lapack_logical* bwork );
6064
6065 lapack_int LAPACKE_sgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6066                                 char sort, LAPACK_S_SELECT3 selctg,
6067                                 lapack_int n,
6068                                 float* a, lapack_int lda,
6069                                 float* b, lapack_int ldb, lapack_int* sdim,
6070                                 float* alphar, float* alphai, float* beta,
6071                                 float* vsl, lapack_int ldvsl,
6072                                 float* vsr, lapack_int ldvsr,
6073                                 float* work, lapack_int lwork,
6074                                 lapack_logical* bwork );
6075 lapack_int LAPACKE_dgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6076                                 char sort, LAPACK_D_SELECT3 selctg,
6077                                 lapack_int n,
6078                                 double* a, lapack_int lda,
6079                                 double* b, lapack_int ldb, lapack_int* sdim,
6080                                 double* alphar, double* alphai, double* beta,
6081                                 double* vsl, lapack_int ldvsl,
6082                                 double* vsr, lapack_int ldvsr,
6083                                 double* work, lapack_int lwork,
6084                                 lapack_logical* bwork );
6085 lapack_int LAPACKE_cgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6086                                 char sort, LAPACK_C_SELECT2 selctg,
6087                                 lapack_int n,
6088                                 lapack_complex_float* a, lapack_int lda,
6089                                 lapack_complex_float* b, lapack_int ldb,
6090                                 lapack_int* sdim, lapack_complex_float* alpha,
6091                                 lapack_complex_float* beta,
6092                                 lapack_complex_float* vsl, lapack_int ldvsl,
6093                                 lapack_complex_float* vsr, lapack_int ldvsr,
6094                                 lapack_complex_float* work, lapack_int lwork,
6095                                 float* rwork, lapack_logical* bwork );
6096 lapack_int LAPACKE_zgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6097                                 char sort, LAPACK_Z_SELECT2 selctg,
6098                                 lapack_int n,
6099                                 lapack_complex_double* a, lapack_int lda,
6100                                 lapack_complex_double* b, lapack_int ldb,
6101                                 lapack_int* sdim, lapack_complex_double* alpha,
6102                                 lapack_complex_double* beta,
6103                                 lapack_complex_double* vsl, lapack_int ldvsl,
6104                                 lapack_complex_double* vsr, lapack_int ldvsr,
6105                                 lapack_complex_double* work, lapack_int lwork,
6106                                 double* rwork, lapack_logical* bwork );
6107
6108 lapack_int LAPACKE_sggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6109                                 char sort, LAPACK_S_SELECT3 selctg, char sense,
6110                                 lapack_int n, float* a, lapack_int lda,
6111                                 float* b, lapack_int ldb, lapack_int* sdim,
6112                                 float* alphar, float* alphai, float* beta,
6113                                 float* vsl, lapack_int ldvsl, float* vsr,
6114                                 lapack_int ldvsr, float* rconde, float* rcondv,
6115                                 float* work, lapack_int lwork,
6116                                 lapack_int* iwork, lapack_int liwork,
6117                                 lapack_logical* bwork );
6118 lapack_int LAPACKE_dggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6119                                 char sort, LAPACK_D_SELECT3 selctg, char sense,
6120                                 lapack_int n, double* a, lapack_int lda,
6121                                 double* b, lapack_int ldb, lapack_int* sdim,
6122                                 double* alphar, double* alphai, double* beta,
6123                                 double* vsl, lapack_int ldvsl, double* vsr,
6124                                 lapack_int ldvsr, double* rconde,
6125                                 double* rcondv, double* work, lapack_int lwork,
6126                                 lapack_int* iwork, lapack_int liwork,
6127                                 lapack_logical* bwork );
6128 lapack_int LAPACKE_cggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6129                                 char sort, LAPACK_C_SELECT2 selctg, char sense,
6130                                 lapack_int n, lapack_complex_float* a,
6131                                 lapack_int lda, lapack_complex_float* b,
6132                                 lapack_int ldb, lapack_int* sdim,
6133                                 lapack_complex_float* alpha,
6134                                 lapack_complex_float* beta,
6135                                 lapack_complex_float* vsl, lapack_int ldvsl,
6136                                 lapack_complex_float* vsr, lapack_int ldvsr,
6137                                 float* rconde, float* rcondv,
6138                                 lapack_complex_float* work, lapack_int lwork,
6139                                 float* rwork, lapack_int* iwork,
6140                                 lapack_int liwork, lapack_logical* bwork );
6141 lapack_int LAPACKE_zggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6142                                 char sort, LAPACK_Z_SELECT2 selctg, char sense,
6143                                 lapack_int n, lapack_complex_double* a,
6144                                 lapack_int lda, lapack_complex_double* b,
6145                                 lapack_int ldb, lapack_int* sdim,
6146                                 lapack_complex_double* alpha,
6147                                 lapack_complex_double* beta,
6148                                 lapack_complex_double* vsl, lapack_int ldvsl,
6149                                 lapack_complex_double* vsr, lapack_int ldvsr,
6150                                 double* rconde, double* rcondv,
6151                                 lapack_complex_double* work, lapack_int lwork,
6152                                 double* rwork, lapack_int* iwork,
6153                                 lapack_int liwork, lapack_logical* bwork );
6154
6155 lapack_int LAPACKE_sggev_work( int matrix_layout, char jobvl, char jobvr,
6156                                lapack_int n, float* a, lapack_int lda, float* b,
6157                                lapack_int ldb, float* alphar, float* alphai,
6158                                float* beta, float* vl, lapack_int ldvl,
6159                                float* vr, lapack_int ldvr, float* work,
6160                                lapack_int lwork );
6161 lapack_int LAPACKE_dggev_work( int matrix_layout, char jobvl, char jobvr,
6162                                lapack_int n, double* a, lapack_int lda,
6163                                double* b, lapack_int ldb, double* alphar,
6164                                double* alphai, double* beta, double* vl,
6165                                lapack_int ldvl, double* vr, lapack_int ldvr,
6166                                double* work, lapack_int lwork );
6167 lapack_int LAPACKE_cggev_work( int matrix_layout, char jobvl, char jobvr,
6168                                lapack_int n, lapack_complex_float* a,
6169                                lapack_int lda, lapack_complex_float* b,
6170                                lapack_int ldb, lapack_complex_float* alpha,
6171                                lapack_complex_float* beta,
6172                                lapack_complex_float* vl, lapack_int ldvl,
6173                                lapack_complex_float* vr, lapack_int ldvr,
6174                                lapack_complex_float* work, lapack_int lwork,
6175                                float* rwork );
6176 lapack_int LAPACKE_zggev_work( int matrix_layout, char jobvl, char jobvr,
6177                                lapack_int n, lapack_complex_double* a,
6178                                lapack_int lda, lapack_complex_double* b,
6179                                lapack_int ldb, lapack_complex_double* alpha,
6180                                lapack_complex_double* beta,
6181                                lapack_complex_double* vl, lapack_int ldvl,
6182                                lapack_complex_double* vr, lapack_int ldvr,
6183                                lapack_complex_double* work, lapack_int lwork,
6184                                double* rwork );
6185
6186 lapack_int LAPACKE_sggev3_work( int matrix_layout, char jobvl, char jobvr,
6187                                 lapack_int n,
6188                                 float* a, lapack_int lda,
6189                                 float* b, lapack_int ldb,
6190                                 float* alphar, float* alphai, float* beta,
6191                                 float* vl, lapack_int ldvl,
6192                                 float* vr, lapack_int ldvr,
6193                                 float* work, lapack_int lwork );
6194 lapack_int LAPACKE_dggev3_work( int matrix_layout, char jobvl, char jobvr,
6195                                 lapack_int n,
6196                                 double* a, lapack_int lda,
6197                                 double* b, lapack_int ldb,
6198                                 double* alphar, double* alphai, double* beta,
6199                                 double* vl, lapack_int ldvl,
6200                                 double* vr, lapack_int ldvr,
6201                                 double* work, lapack_int lwork );
6202 lapack_int LAPACKE_cggev3_work( int matrix_layout, char jobvl, char jobvr,
6203                                 lapack_int n,
6204                                 lapack_complex_float* a, lapack_int lda,
6205                                 lapack_complex_float* b, lapack_int ldb,
6206                                 lapack_complex_float* alpha,
6207                                 lapack_complex_float* beta,
6208                                 lapack_complex_float* vl, lapack_int ldvl,
6209                                 lapack_complex_float* vr, lapack_int ldvr,
6210                                 lapack_complex_float* work, lapack_int lwork,
6211                                 float* rwork );
6212 lapack_int LAPACKE_zggev3_work( int matrix_layout, char jobvl, char jobvr,
6213                                 lapack_int n,
6214                                 lapack_complex_double* a, lapack_int lda,
6215                                 lapack_complex_double* b, lapack_int ldb,
6216                                 lapack_complex_double* alpha,
6217                                 lapack_complex_double* beta,
6218                                 lapack_complex_double* vl, lapack_int ldvl,
6219                                 lapack_complex_double* vr, lapack_int ldvr,
6220                                 lapack_complex_double* work, lapack_int lwork,
6221                                 double* rwork );
6222
6223 lapack_int LAPACKE_sggevx_work( int matrix_layout, char balanc, char jobvl,
6224                                 char jobvr, char sense, lapack_int n, float* a,
6225                                 lapack_int lda, float* b, lapack_int ldb,
6226                                 float* alphar, float* alphai, float* beta,
6227                                 float* vl, lapack_int ldvl, float* vr,
6228                                 lapack_int ldvr, lapack_int* ilo,
6229                                 lapack_int* ihi, float* lscale, float* rscale,
6230                                 float* abnrm, float* bbnrm, float* rconde,
6231                                 float* rcondv, float* work, lapack_int lwork,
6232                                 lapack_int* iwork, lapack_logical* bwork );
6233 lapack_int LAPACKE_dggevx_work( int matrix_layout, char balanc, char jobvl,
6234                                 char jobvr, char sense, lapack_int n, double* a,
6235                                 lapack_int lda, double* b, lapack_int ldb,
6236                                 double* alphar, double* alphai, double* beta,
6237                                 double* vl, lapack_int ldvl, double* vr,
6238                                 lapack_int ldvr, lapack_int* ilo,
6239                                 lapack_int* ihi, double* lscale, double* rscale,
6240                                 double* abnrm, double* bbnrm, double* rconde,
6241                                 double* rcondv, double* work, lapack_int lwork,
6242                                 lapack_int* iwork, lapack_logical* bwork );
6243 lapack_int LAPACKE_cggevx_work( int matrix_layout, char balanc, char jobvl,
6244                                 char jobvr, char sense, lapack_int n,
6245                                 lapack_complex_float* a, lapack_int lda,
6246                                 lapack_complex_float* b, lapack_int ldb,
6247                                 lapack_complex_float* alpha,
6248                                 lapack_complex_float* beta,
6249                                 lapack_complex_float* vl, lapack_int ldvl,
6250                                 lapack_complex_float* vr, lapack_int ldvr,
6251                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
6252                                 float* rscale, float* abnrm, float* bbnrm,
6253                                 float* rconde, float* rcondv,
6254                                 lapack_complex_float* work, lapack_int lwork,
6255                                 float* rwork, lapack_int* iwork,
6256                                 lapack_logical* bwork );
6257 lapack_int LAPACKE_zggevx_work( int matrix_layout, char balanc, char jobvl,
6258                                 char jobvr, char sense, lapack_int n,
6259                                 lapack_complex_double* a, lapack_int lda,
6260                                 lapack_complex_double* b, lapack_int ldb,
6261                                 lapack_complex_double* alpha,
6262                                 lapack_complex_double* beta,
6263                                 lapack_complex_double* vl, lapack_int ldvl,
6264                                 lapack_complex_double* vr, lapack_int ldvr,
6265                                 lapack_int* ilo, lapack_int* ihi,
6266                                 double* lscale, double* rscale, double* abnrm,
6267                                 double* bbnrm, double* rconde, double* rcondv,
6268                                 lapack_complex_double* work, lapack_int lwork,
6269                                 double* rwork, lapack_int* iwork,
6270                                 lapack_logical* bwork );
6271
6272 lapack_int LAPACKE_sggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6273                                 lapack_int p, float* a, lapack_int lda,
6274                                 float* b, lapack_int ldb, float* d, float* x,
6275                                 float* y, float* work, lapack_int lwork );
6276 lapack_int LAPACKE_dggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6277                                 lapack_int p, double* a, lapack_int lda,
6278                                 double* b, lapack_int ldb, double* d, double* x,
6279                                 double* y, double* work, lapack_int lwork );
6280 lapack_int LAPACKE_cggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6281                                 lapack_int p, lapack_complex_float* a,
6282                                 lapack_int lda, lapack_complex_float* b,
6283                                 lapack_int ldb, lapack_complex_float* d,
6284                                 lapack_complex_float* x,
6285                                 lapack_complex_float* y,
6286                                 lapack_complex_float* work, lapack_int lwork );
6287 lapack_int LAPACKE_zggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6288                                 lapack_int p, lapack_complex_double* a,
6289                                 lapack_int lda, lapack_complex_double* b,
6290                                 lapack_int ldb, lapack_complex_double* d,
6291                                 lapack_complex_double* x,
6292                                 lapack_complex_double* y,
6293                                 lapack_complex_double* work, lapack_int lwork );
6294
6295 lapack_int LAPACKE_sgghrd_work( int matrix_layout, char compq, char compz,
6296                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6297                                 float* a, lapack_int lda, float* b,
6298                                 lapack_int ldb, float* q, lapack_int ldq,
6299                                 float* z, lapack_int ldz );
6300 lapack_int LAPACKE_dgghrd_work( int matrix_layout, char compq, char compz,
6301                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6302                                 double* a, lapack_int lda, double* b,
6303                                 lapack_int ldb, double* q, lapack_int ldq,
6304                                 double* z, lapack_int ldz );
6305 lapack_int LAPACKE_cgghrd_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_int LAPACKE_zgghrd_work( int matrix_layout, char compq, char compz,
6312                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6313                                 lapack_complex_double* a, lapack_int lda,
6314                                 lapack_complex_double* b, lapack_int ldb,
6315                                 lapack_complex_double* q, lapack_int ldq,
6316                                 lapack_complex_double* z, lapack_int ldz );
6317
6318 lapack_int LAPACKE_sgghd3_work( int matrix_layout, char compq, char compz,
6319                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6320                                 float* a, lapack_int lda,
6321                                 float* b, lapack_int ldb,
6322                                 float* q, lapack_int ldq,
6323                                 float* z, lapack_int ldz,
6324                                 float* work, lapack_int lwork );
6325 lapack_int LAPACKE_dgghd3_work( int matrix_layout, char compq, char compz,
6326                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6327                                 double* a, lapack_int lda,
6328                                 double* b, lapack_int ldb,
6329                                 double* q, lapack_int ldq,
6330                                 double* z, lapack_int ldz,
6331                                 double* work, lapack_int lwork );
6332 lapack_int LAPACKE_cgghd3_work( int matrix_layout, char compq, char compz,
6333                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6334                                 lapack_complex_float* a, lapack_int lda,
6335                                 lapack_complex_float* b, lapack_int ldb,
6336                                 lapack_complex_float* q, lapack_int ldq,
6337                                 lapack_complex_float* z, lapack_int ldz,
6338                                 lapack_complex_float* work, lapack_int lwork );
6339 lapack_int LAPACKE_zgghd3_work( int matrix_layout, char compq, char compz,
6340                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6341                                 lapack_complex_double* a, lapack_int lda,
6342                                 lapack_complex_double* b, lapack_int ldb,
6343                                 lapack_complex_double* q, lapack_int ldq,
6344                                 lapack_complex_double* z, lapack_int ldz,
6345                                 lapack_complex_double* work,
6346                                 lapack_int lwork );
6347
6348 lapack_int LAPACKE_sgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6349                                 lapack_int p, float* a, lapack_int lda,
6350                                 float* b, lapack_int ldb, float* c, float* d,
6351                                 float* x, float* work, lapack_int lwork );
6352 lapack_int LAPACKE_dgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6353                                 lapack_int p, double* a, lapack_int lda,
6354                                 double* b, lapack_int ldb, double* c, double* d,
6355                                 double* x, double* work, lapack_int lwork );
6356 lapack_int LAPACKE_cgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6357                                 lapack_int p, lapack_complex_float* a,
6358                                 lapack_int lda, lapack_complex_float* b,
6359                                 lapack_int ldb, lapack_complex_float* c,
6360                                 lapack_complex_float* d,
6361                                 lapack_complex_float* x,
6362                                 lapack_complex_float* work, lapack_int lwork );
6363 lapack_int LAPACKE_zgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6364                                 lapack_int p, lapack_complex_double* a,
6365                                 lapack_int lda, lapack_complex_double* b,
6366                                 lapack_int ldb, lapack_complex_double* c,
6367                                 lapack_complex_double* d,
6368                                 lapack_complex_double* x,
6369                                 lapack_complex_double* work, lapack_int lwork );
6370
6371 lapack_int LAPACKE_sggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6372                                 lapack_int p, float* a, lapack_int lda,
6373                                 float* taua, float* b, lapack_int ldb,
6374                                 float* taub, float* work, lapack_int lwork );
6375 lapack_int LAPACKE_dggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6376                                 lapack_int p, double* a, lapack_int lda,
6377                                 double* taua, double* b, lapack_int ldb,
6378                                 double* taub, double* work, lapack_int lwork );
6379 lapack_int LAPACKE_cggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6380                                 lapack_int p, lapack_complex_float* a,
6381                                 lapack_int lda, lapack_complex_float* taua,
6382                                 lapack_complex_float* b, lapack_int ldb,
6383                                 lapack_complex_float* taub,
6384                                 lapack_complex_float* work, lapack_int lwork );
6385 lapack_int LAPACKE_zggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6386                                 lapack_int p, lapack_complex_double* a,
6387                                 lapack_int lda, lapack_complex_double* taua,
6388                                 lapack_complex_double* b, lapack_int ldb,
6389                                 lapack_complex_double* taub,
6390                                 lapack_complex_double* work, lapack_int lwork );
6391
6392 lapack_int LAPACKE_sggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6393                                 lapack_int n, float* a, lapack_int lda,
6394                                 float* taua, float* b, lapack_int ldb,
6395                                 float* taub, float* work, lapack_int lwork );
6396 lapack_int LAPACKE_dggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6397                                 lapack_int n, double* a, lapack_int lda,
6398                                 double* taua, double* b, lapack_int ldb,
6399                                 double* taub, double* work, lapack_int lwork );
6400 lapack_int LAPACKE_cggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6401                                 lapack_int n, lapack_complex_float* a,
6402                                 lapack_int lda, lapack_complex_float* taua,
6403                                 lapack_complex_float* b, lapack_int ldb,
6404                                 lapack_complex_float* taub,
6405                                 lapack_complex_float* work, lapack_int lwork );
6406 lapack_int LAPACKE_zggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6407                                 lapack_int n, lapack_complex_double* a,
6408                                 lapack_int lda, lapack_complex_double* taua,
6409                                 lapack_complex_double* b, lapack_int ldb,
6410                                 lapack_complex_double* taub,
6411                                 lapack_complex_double* work, lapack_int lwork );
6412
6413 lapack_int LAPACKE_sggsvd_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                                 float* a, lapack_int lda, float* b,
6417                                 lapack_int ldb, float* alpha, float* beta,
6418                                 float* u, lapack_int ldu, float* v,
6419                                 lapack_int ldv, float* q, lapack_int ldq,
6420                                 float* work, lapack_int* iwork );
6421 lapack_int LAPACKE_dggsvd_work( int matrix_layout, char jobu, char jobv,
6422                                 char jobq, lapack_int m, lapack_int n,
6423                                 lapack_int p, lapack_int* k, lapack_int* l,
6424                                 double* a, lapack_int lda, double* b,
6425                                 lapack_int ldb, double* alpha, double* beta,
6426                                 double* u, lapack_int ldu, double* v,
6427                                 lapack_int ldv, double* q, lapack_int ldq,
6428                                 double* work, lapack_int* iwork );
6429 lapack_int LAPACKE_cggsvd_work( int matrix_layout, char jobu, char jobv,
6430                                 char jobq, lapack_int m, lapack_int n,
6431                                 lapack_int p, lapack_int* k, lapack_int* l,
6432                                 lapack_complex_float* a, lapack_int lda,
6433                                 lapack_complex_float* b, lapack_int ldb,
6434                                 float* alpha, float* beta,
6435                                 lapack_complex_float* u, lapack_int ldu,
6436                                 lapack_complex_float* v, lapack_int ldv,
6437                                 lapack_complex_float* q, lapack_int ldq,
6438                                 lapack_complex_float* work, float* rwork,
6439                                 lapack_int* iwork );
6440 lapack_int LAPACKE_zggsvd_work( int matrix_layout, char jobu, char jobv,
6441                                 char jobq, lapack_int m, lapack_int n,
6442                                 lapack_int p, lapack_int* k, lapack_int* l,
6443                                 lapack_complex_double* a, lapack_int lda,
6444                                 lapack_complex_double* b, lapack_int ldb,
6445                                 double* alpha, double* beta,
6446                                 lapack_complex_double* u, lapack_int ldu,
6447                                 lapack_complex_double* v, lapack_int ldv,
6448                                 lapack_complex_double* q, lapack_int ldq,
6449                                 lapack_complex_double* work, double* rwork,
6450                                 lapack_int* iwork );
6451
6452 lapack_int LAPACKE_sggsvd3_work( int matrix_layout, char jobu, char jobv,
6453                                  char jobq, lapack_int m, lapack_int n,
6454                                  lapack_int p, lapack_int* k, lapack_int* l,
6455                                  float* a, lapack_int lda, float* b,
6456                                  lapack_int ldb, float* alpha, float* beta,
6457                                  float* u, lapack_int ldu, float* v,
6458                                  lapack_int ldv, float* q, lapack_int ldq,
6459                                  float* work, lapack_int lwork,
6460                                  lapack_int* iwork );
6461 lapack_int LAPACKE_dggsvd3_work( int matrix_layout, char jobu, char jobv,
6462                                  char jobq, lapack_int m, lapack_int n,
6463                                  lapack_int p, lapack_int* k, lapack_int* l,
6464                                  double* a, lapack_int lda, double* b,
6465                                  lapack_int ldb, double* alpha, double* beta,
6466                                  double* u, lapack_int ldu, double* v,
6467                                  lapack_int ldv, double* q, lapack_int ldq,
6468                                  double* work, lapack_int lwork,
6469                                  lapack_int* iwork );
6470 lapack_int LAPACKE_cggsvd3_work( int matrix_layout, char jobu, char jobv,
6471                                  char jobq, lapack_int m, lapack_int n,
6472                                  lapack_int p, lapack_int* k, lapack_int* l,
6473                                  lapack_complex_float* a, lapack_int lda,
6474                                  lapack_complex_float* b, lapack_int ldb,
6475                                  float* alpha, float* beta,
6476                                  lapack_complex_float* u, lapack_int ldu,
6477                                  lapack_complex_float* v, lapack_int ldv,
6478                                  lapack_complex_float* q, lapack_int ldq,
6479                                  lapack_complex_float* work, lapack_int lwork,
6480                                  float* rwork, lapack_int* iwork );
6481 lapack_int LAPACKE_zggsvd3_work( int matrix_layout, char jobu, char jobv,
6482                                  char jobq, lapack_int m, lapack_int n,
6483                                  lapack_int p, lapack_int* k, lapack_int* l,
6484                                  lapack_complex_double* a, lapack_int lda,
6485                                  lapack_complex_double* b, lapack_int ldb,
6486                                  double* alpha, double* beta,
6487                                  lapack_complex_double* u, lapack_int ldu,
6488                                  lapack_complex_double* v, lapack_int ldv,
6489                                  lapack_complex_double* q, lapack_int ldq,
6490                                  lapack_complex_double* work, lapack_int lwork,
6491                                  double* rwork, lapack_int* iwork );
6492
6493 lapack_int LAPACKE_sggsvp_work( int matrix_layout, char jobu, char jobv,
6494                                 char jobq, lapack_int m, lapack_int p,
6495                                 lapack_int n, float* a, lapack_int lda,
6496                                 float* b, lapack_int ldb, float tola,
6497                                 float tolb, lapack_int* k, lapack_int* l,
6498                                 float* u, lapack_int ldu, float* v,
6499                                 lapack_int ldv, float* q, lapack_int ldq,
6500                                 lapack_int* iwork, float* tau, float* work );
6501 lapack_int LAPACKE_dggsvp_work( int matrix_layout, char jobu, char jobv,
6502                                 char jobq, lapack_int m, lapack_int p,
6503                                 lapack_int n, double* a, lapack_int lda,
6504                                 double* b, lapack_int ldb, double tola,
6505                                 double tolb, lapack_int* k, lapack_int* l,
6506                                 double* u, lapack_int ldu, double* v,
6507                                 lapack_int ldv, double* q, lapack_int ldq,
6508                                 lapack_int* iwork, double* tau, double* work );
6509 lapack_int LAPACKE_cggsvp_work( int matrix_layout, char jobu, char jobv,
6510                                 char jobq, lapack_int m, lapack_int p,
6511                                 lapack_int n, lapack_complex_float* a,
6512                                 lapack_int lda, lapack_complex_float* b,
6513                                 lapack_int ldb, float tola, float tolb,
6514                                 lapack_int* k, lapack_int* l,
6515                                 lapack_complex_float* u, lapack_int ldu,
6516                                 lapack_complex_float* v, lapack_int ldv,
6517                                 lapack_complex_float* q, lapack_int ldq,
6518                                 lapack_int* iwork, float* rwork,
6519                                 lapack_complex_float* tau,
6520                                 lapack_complex_float* work );
6521 lapack_int LAPACKE_zggsvp_work( int matrix_layout, char jobu, char jobv,
6522                                 char jobq, lapack_int m, lapack_int p,
6523                                 lapack_int n, lapack_complex_double* a,
6524                                 lapack_int lda, lapack_complex_double* b,
6525                                 lapack_int ldb, double tola, double tolb,
6526                                 lapack_int* k, lapack_int* l,
6527                                 lapack_complex_double* u, lapack_int ldu,
6528                                 lapack_complex_double* v, lapack_int ldv,
6529                                 lapack_complex_double* q, lapack_int ldq,
6530                                 lapack_int* iwork, double* rwork,
6531                                 lapack_complex_double* tau,
6532                                 lapack_complex_double* work );
6533
6534 lapack_int LAPACKE_sggsvp3_work( int matrix_layout, char jobu, char jobv,
6535                                  char jobq, lapack_int m, lapack_int p,
6536                                  lapack_int n, float* a, lapack_int lda,
6537                                  float* b, lapack_int ldb, float tola,
6538                                  float tolb, lapack_int* k, lapack_int* l,
6539                                  float* u, lapack_int ldu, float* v,
6540                                  lapack_int ldv, float* q, lapack_int ldq,
6541                                  lapack_int* iwork, float* tau,
6542                                  float* work, lapack_int lwork );
6543 lapack_int LAPACKE_dggsvp3_work( int matrix_layout, char jobu, char jobv,
6544                                  char jobq, lapack_int m, lapack_int p,
6545                                  lapack_int n, double* a, lapack_int lda,
6546                                  double* b, lapack_int ldb, double tola,
6547                                  double tolb, lapack_int* k, lapack_int* l,
6548                                  double* u, lapack_int ldu, double* v,
6549                                  lapack_int ldv, double* q, lapack_int ldq,
6550                                  lapack_int* iwork, double* tau, double* work,
6551                                  lapack_int lwork );
6552 lapack_int LAPACKE_cggsvp3_work( int matrix_layout, char jobu, char jobv,
6553                                  char jobq, lapack_int m, lapack_int p,
6554                                  lapack_int n, lapack_complex_float* a,
6555                                  lapack_int lda, lapack_complex_float* b,
6556                                  lapack_int ldb, float tola, float tolb,
6557                                  lapack_int* k, lapack_int* l,
6558                                  lapack_complex_float* u, lapack_int ldu,
6559                                  lapack_complex_float* v, lapack_int ldv,
6560                                  lapack_complex_float* q, lapack_int ldq,
6561                                  lapack_int* iwork, float* rwork,
6562                                  lapack_complex_float* tau,
6563                                  lapack_complex_float* work, lapack_int lwork );
6564 lapack_int LAPACKE_zggsvp3_work( int matrix_layout, char jobu, char jobv,
6565                                  char jobq, lapack_int m, lapack_int p,
6566                                  lapack_int n, lapack_complex_double* a,
6567                                  lapack_int lda, lapack_complex_double* b,
6568                                  lapack_int ldb, double tola, double tolb,
6569                                  lapack_int* k, lapack_int* l,
6570                                  lapack_complex_double* u, lapack_int ldu,
6571                                  lapack_complex_double* v, lapack_int ldv,
6572                                  lapack_complex_double* q, lapack_int ldq,
6573                                  lapack_int* iwork, double* rwork,
6574                                  lapack_complex_double* tau,
6575                                  lapack_complex_double* work, lapack_int lwork );
6576
6577 lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
6578                                 const float* d, const float* du,
6579                                 const float* du2, const lapack_int* ipiv,
6580                                 float anorm, float* rcond, float* work,
6581                                 lapack_int* iwork );
6582 lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
6583                                 const double* d, const double* du,
6584                                 const double* du2, const lapack_int* ipiv,
6585                                 double anorm, double* rcond, double* work,
6586                                 lapack_int* iwork );
6587 lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
6588                                 const lapack_complex_float* dl,
6589                                 const lapack_complex_float* d,
6590                                 const lapack_complex_float* du,
6591                                 const lapack_complex_float* du2,
6592                                 const lapack_int* ipiv, float anorm,
6593                                 float* rcond, lapack_complex_float* work );
6594 lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
6595                                 const lapack_complex_double* dl,
6596                                 const lapack_complex_double* d,
6597                                 const lapack_complex_double* du,
6598                                 const lapack_complex_double* du2,
6599                                 const lapack_int* ipiv, double anorm,
6600                                 double* rcond, lapack_complex_double* work );
6601
6602 lapack_int LAPACKE_sgtrfs_work( int matrix_layout, char trans, lapack_int n,
6603                                 lapack_int nrhs, const float* dl,
6604                                 const float* d, const float* du,
6605                                 const float* dlf, const float* df,
6606                                 const float* duf, const float* du2,
6607                                 const lapack_int* ipiv, const float* b,
6608                                 lapack_int ldb, float* x, lapack_int ldx,
6609                                 float* ferr, float* berr, float* work,
6610                                 lapack_int* iwork );
6611 lapack_int LAPACKE_dgtrfs_work( int matrix_layout, char trans, lapack_int n,
6612                                 lapack_int nrhs, const double* dl,
6613                                 const double* d, const double* du,
6614                                 const double* dlf, const double* df,
6615                                 const double* duf, const double* du2,
6616                                 const lapack_int* ipiv, const double* b,
6617                                 lapack_int ldb, double* x, lapack_int ldx,
6618                                 double* ferr, double* berr, double* work,
6619                                 lapack_int* iwork );
6620 lapack_int LAPACKE_cgtrfs_work( int matrix_layout, char trans, lapack_int n,
6621                                 lapack_int nrhs, const lapack_complex_float* dl,
6622                                 const lapack_complex_float* d,
6623                                 const lapack_complex_float* du,
6624                                 const lapack_complex_float* dlf,
6625                                 const lapack_complex_float* df,
6626                                 const lapack_complex_float* duf,
6627                                 const lapack_complex_float* du2,
6628                                 const lapack_int* ipiv,
6629                                 const lapack_complex_float* b, lapack_int ldb,
6630                                 lapack_complex_float* x, lapack_int ldx,
6631                                 float* ferr, float* berr,
6632                                 lapack_complex_float* work, float* rwork );
6633 lapack_int LAPACKE_zgtrfs_work( int matrix_layout, char trans, lapack_int n,
6634                                 lapack_int nrhs,
6635                                 const lapack_complex_double* dl,
6636                                 const lapack_complex_double* d,
6637                                 const lapack_complex_double* du,
6638                                 const lapack_complex_double* dlf,
6639                                 const lapack_complex_double* df,
6640                                 const lapack_complex_double* duf,
6641                                 const lapack_complex_double* du2,
6642                                 const lapack_int* ipiv,
6643                                 const lapack_complex_double* b, lapack_int ldb,
6644                                 lapack_complex_double* x, lapack_int ldx,
6645                                 double* ferr, double* berr,
6646                                 lapack_complex_double* work, double* rwork );
6647
6648 lapack_int LAPACKE_sgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6649                                float* dl, float* d, float* du, float* b,
6650                                lapack_int ldb );
6651 lapack_int LAPACKE_dgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6652                                double* dl, double* d, double* du, double* b,
6653                                lapack_int ldb );
6654 lapack_int LAPACKE_cgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6655                                lapack_complex_float* dl,
6656                                lapack_complex_float* d,
6657                                lapack_complex_float* du,
6658                                lapack_complex_float* b, lapack_int ldb );
6659 lapack_int LAPACKE_zgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6660                                lapack_complex_double* dl,
6661                                lapack_complex_double* d,
6662                                lapack_complex_double* du,
6663                                lapack_complex_double* b, lapack_int ldb );
6664
6665 lapack_int LAPACKE_sgtsvx_work( int matrix_layout, char fact, char trans,
6666                                 lapack_int n, lapack_int nrhs, const float* dl,
6667                                 const float* d, const float* du, float* dlf,
6668                                 float* df, float* duf, float* du2,
6669                                 lapack_int* ipiv, const float* b,
6670                                 lapack_int ldb, float* x, lapack_int ldx,
6671                                 float* rcond, float* ferr, float* berr,
6672                                 float* work, lapack_int* iwork );
6673 lapack_int LAPACKE_dgtsvx_work( int matrix_layout, char fact, char trans,
6674                                 lapack_int n, lapack_int nrhs, const double* dl,
6675                                 const double* d, const double* du, double* dlf,
6676                                 double* df, double* duf, double* du2,
6677                                 lapack_int* ipiv, const double* b,
6678                                 lapack_int ldb, double* x, lapack_int ldx,
6679                                 double* rcond, double* ferr, double* berr,
6680                                 double* work, lapack_int* iwork );
6681 lapack_int LAPACKE_cgtsvx_work( int matrix_layout, char fact, char trans,
6682                                 lapack_int n, lapack_int nrhs,
6683                                 const lapack_complex_float* dl,
6684                                 const lapack_complex_float* d,
6685                                 const lapack_complex_float* du,
6686                                 lapack_complex_float* dlf,
6687                                 lapack_complex_float* df,
6688                                 lapack_complex_float* duf,
6689                                 lapack_complex_float* du2, lapack_int* ipiv,
6690                                 const lapack_complex_float* b, lapack_int ldb,
6691                                 lapack_complex_float* x, lapack_int ldx,
6692                                 float* rcond, float* ferr, float* berr,
6693                                 lapack_complex_float* work, float* rwork );
6694 lapack_int LAPACKE_zgtsvx_work( int matrix_layout, char fact, char trans,
6695                                 lapack_int n, lapack_int nrhs,
6696                                 const lapack_complex_double* dl,
6697                                 const lapack_complex_double* d,
6698                                 const lapack_complex_double* du,
6699                                 lapack_complex_double* dlf,
6700                                 lapack_complex_double* df,
6701                                 lapack_complex_double* duf,
6702                                 lapack_complex_double* du2, lapack_int* ipiv,
6703                                 const lapack_complex_double* b, lapack_int ldb,
6704                                 lapack_complex_double* x, lapack_int ldx,
6705                                 double* rcond, double* ferr, double* berr,
6706                                 lapack_complex_double* work, double* rwork );
6707
6708 lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
6709                                 float* du2, lapack_int* ipiv );
6710 lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
6711                                 double* du2, lapack_int* ipiv );
6712 lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
6713                                 lapack_complex_float* d,
6714                                 lapack_complex_float* du,
6715                                 lapack_complex_float* du2, lapack_int* ipiv );
6716 lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
6717                                 lapack_complex_double* d,
6718                                 lapack_complex_double* du,
6719                                 lapack_complex_double* du2, lapack_int* ipiv );
6720
6721 lapack_int LAPACKE_sgttrs_work( int matrix_layout, char trans, lapack_int n,
6722                                 lapack_int nrhs, const float* dl,
6723                                 const float* d, const float* du,
6724                                 const float* du2, const lapack_int* ipiv,
6725                                 float* b, lapack_int ldb );
6726 lapack_int LAPACKE_dgttrs_work( int matrix_layout, char trans, lapack_int n,
6727                                 lapack_int nrhs, const double* dl,
6728                                 const double* d, const double* du,
6729                                 const double* du2, const lapack_int* ipiv,
6730                                 double* b, lapack_int ldb );
6731 lapack_int LAPACKE_cgttrs_work( int matrix_layout, char trans, lapack_int n,
6732                                 lapack_int nrhs, const lapack_complex_float* dl,
6733                                 const lapack_complex_float* d,
6734                                 const lapack_complex_float* du,
6735                                 const lapack_complex_float* du2,
6736                                 const lapack_int* ipiv, lapack_complex_float* b,
6737                                 lapack_int ldb );
6738 lapack_int LAPACKE_zgttrs_work( int matrix_layout, char trans, lapack_int n,
6739                                 lapack_int nrhs,
6740                                 const lapack_complex_double* dl,
6741                                 const lapack_complex_double* d,
6742                                 const lapack_complex_double* du,
6743                                 const lapack_complex_double* du2,
6744                                 const lapack_int* ipiv,
6745                                 lapack_complex_double* b, lapack_int ldb );
6746
6747 lapack_int LAPACKE_chbev_work( int matrix_layout, char jobz, char uplo,
6748                                lapack_int n, lapack_int kd,
6749                                lapack_complex_float* ab, lapack_int ldab,
6750                                float* w, lapack_complex_float* z,
6751                                lapack_int ldz, lapack_complex_float* work,
6752                                float* rwork );
6753 lapack_int LAPACKE_zhbev_work( int matrix_layout, char jobz, char uplo,
6754                                lapack_int n, lapack_int kd,
6755                                lapack_complex_double* ab, lapack_int ldab,
6756                                double* w, lapack_complex_double* z,
6757                                lapack_int ldz, lapack_complex_double* work,
6758                                double* rwork );
6759
6760 lapack_int LAPACKE_chbevd_work( int matrix_layout, char jobz, char uplo,
6761                                 lapack_int n, lapack_int kd,
6762                                 lapack_complex_float* ab, lapack_int ldab,
6763                                 float* w, lapack_complex_float* z,
6764                                 lapack_int ldz, lapack_complex_float* work,
6765                                 lapack_int lwork, float* rwork,
6766                                 lapack_int lrwork, lapack_int* iwork,
6767                                 lapack_int liwork );
6768 lapack_int LAPACKE_zhbevd_work( int matrix_layout, char jobz, char uplo,
6769                                 lapack_int n, lapack_int kd,
6770                                 lapack_complex_double* ab, lapack_int ldab,
6771                                 double* w, lapack_complex_double* z,
6772                                 lapack_int ldz, lapack_complex_double* work,
6773                                 lapack_int lwork, double* rwork,
6774                                 lapack_int lrwork, lapack_int* iwork,
6775                                 lapack_int liwork );
6776
6777 lapack_int LAPACKE_chbevx_work( int matrix_layout, char jobz, char range,
6778                                 char uplo, lapack_int n, lapack_int kd,
6779                                 lapack_complex_float* ab, lapack_int ldab,
6780                                 lapack_complex_float* q, lapack_int ldq,
6781                                 float vl, float vu, lapack_int il,
6782                                 lapack_int iu, float abstol, lapack_int* m,
6783                                 float* w, lapack_complex_float* z,
6784                                 lapack_int ldz, lapack_complex_float* work,
6785                                 float* rwork, lapack_int* iwork,
6786                                 lapack_int* ifail );
6787 lapack_int LAPACKE_zhbevx_work( int matrix_layout, char jobz, char range,
6788                                 char uplo, lapack_int n, lapack_int kd,
6789                                 lapack_complex_double* ab, lapack_int ldab,
6790                                 lapack_complex_double* q, lapack_int ldq,
6791                                 double vl, double vu, lapack_int il,
6792                                 lapack_int iu, double abstol, lapack_int* m,
6793                                 double* w, lapack_complex_double* z,
6794                                 lapack_int ldz, lapack_complex_double* work,
6795                                 double* rwork, lapack_int* iwork,
6796                                 lapack_int* ifail );
6797
6798 lapack_int LAPACKE_chbgst_work( int matrix_layout, char vect, char uplo,
6799                                 lapack_int n, lapack_int ka, lapack_int kb,
6800                                 lapack_complex_float* ab, lapack_int ldab,
6801                                 const lapack_complex_float* bb, lapack_int ldbb,
6802                                 lapack_complex_float* x, lapack_int ldx,
6803                                 lapack_complex_float* work, float* rwork );
6804 lapack_int LAPACKE_zhbgst_work( int matrix_layout, char vect, char uplo,
6805                                 lapack_int n, lapack_int ka, lapack_int kb,
6806                                 lapack_complex_double* ab, lapack_int ldab,
6807                                 const lapack_complex_double* bb,
6808                                 lapack_int ldbb, lapack_complex_double* x,
6809                                 lapack_int ldx, lapack_complex_double* work,
6810                                 double* rwork );
6811
6812 lapack_int LAPACKE_chbgv_work( int matrix_layout, char jobz, char uplo,
6813                                lapack_int n, lapack_int ka, lapack_int kb,
6814                                lapack_complex_float* ab, lapack_int ldab,
6815                                lapack_complex_float* bb, lapack_int ldbb,
6816                                float* w, lapack_complex_float* z,
6817                                lapack_int ldz, lapack_complex_float* work,
6818                                float* rwork );
6819 lapack_int LAPACKE_zhbgv_work( int matrix_layout, char jobz, char uplo,
6820                                lapack_int n, lapack_int ka, lapack_int kb,
6821                                lapack_complex_double* ab, lapack_int ldab,
6822                                lapack_complex_double* bb, lapack_int ldbb,
6823                                double* w, lapack_complex_double* z,
6824                                lapack_int ldz, lapack_complex_double* work,
6825                                double* rwork );
6826
6827 lapack_int LAPACKE_chbgvd_work( int matrix_layout, char jobz, char uplo,
6828                                 lapack_int n, lapack_int ka, lapack_int kb,
6829                                 lapack_complex_float* ab, lapack_int ldab,
6830                                 lapack_complex_float* bb, lapack_int ldbb,
6831                                 float* w, lapack_complex_float* z,
6832                                 lapack_int ldz, lapack_complex_float* work,
6833                                 lapack_int lwork, float* rwork,
6834                                 lapack_int lrwork, lapack_int* iwork,
6835                                 lapack_int liwork );
6836 lapack_int LAPACKE_zhbgvd_work( int matrix_layout, char jobz, char uplo,
6837                                 lapack_int n, lapack_int ka, lapack_int kb,
6838                                 lapack_complex_double* ab, lapack_int ldab,
6839                                 lapack_complex_double* bb, lapack_int ldbb,
6840                                 double* w, lapack_complex_double* z,
6841                                 lapack_int ldz, lapack_complex_double* work,
6842                                 lapack_int lwork, double* rwork,
6843                                 lapack_int lrwork, lapack_int* iwork,
6844                                 lapack_int liwork );
6845
6846 lapack_int LAPACKE_chbgvx_work( int matrix_layout, char jobz, char range,
6847                                 char uplo, lapack_int n, lapack_int ka,
6848                                 lapack_int kb, lapack_complex_float* ab,
6849                                 lapack_int ldab, lapack_complex_float* bb,
6850                                 lapack_int ldbb, lapack_complex_float* q,
6851                                 lapack_int ldq, float vl, float vu,
6852                                 lapack_int il, lapack_int iu, float abstol,
6853                                 lapack_int* m, float* w,
6854                                 lapack_complex_float* z, lapack_int ldz,
6855                                 lapack_complex_float* work, float* rwork,
6856                                 lapack_int* iwork, lapack_int* ifail );
6857 lapack_int LAPACKE_zhbgvx_work( int matrix_layout, char jobz, char range,
6858                                 char uplo, lapack_int n, lapack_int ka,
6859                                 lapack_int kb, lapack_complex_double* ab,
6860                                 lapack_int ldab, lapack_complex_double* bb,
6861                                 lapack_int ldbb, lapack_complex_double* q,
6862                                 lapack_int ldq, double vl, double vu,
6863                                 lapack_int il, lapack_int iu, double abstol,
6864                                 lapack_int* m, double* w,
6865                                 lapack_complex_double* z, lapack_int ldz,
6866                                 lapack_complex_double* work, double* rwork,
6867                                 lapack_int* iwork, lapack_int* ifail );
6868
6869 lapack_int LAPACKE_chbtrd_work( int matrix_layout, char vect, char uplo,
6870                                 lapack_int n, lapack_int kd,
6871                                 lapack_complex_float* ab, lapack_int ldab,
6872                                 float* d, float* e, lapack_complex_float* q,
6873                                 lapack_int ldq, lapack_complex_float* work );
6874 lapack_int LAPACKE_zhbtrd_work( int matrix_layout, char vect, char uplo,
6875                                 lapack_int n, lapack_int kd,
6876                                 lapack_complex_double* ab, lapack_int ldab,
6877                                 double* d, double* e, lapack_complex_double* q,
6878                                 lapack_int ldq, lapack_complex_double* work );
6879
6880 lapack_int LAPACKE_checon_work( int matrix_layout, char uplo, lapack_int n,
6881                                 const lapack_complex_float* a, lapack_int lda,
6882                                 const lapack_int* ipiv, float anorm,
6883                                 float* rcond, lapack_complex_float* work );
6884 lapack_int LAPACKE_zhecon_work( int matrix_layout, char uplo, lapack_int n,
6885                                 const lapack_complex_double* a, lapack_int lda,
6886                                 const lapack_int* ipiv, double anorm,
6887                                 double* rcond, lapack_complex_double* work );
6888
6889 lapack_int LAPACKE_cheequb_work( int matrix_layout, char uplo, lapack_int n,
6890                                  const lapack_complex_float* a, lapack_int lda,
6891                                  float* s, float* scond, float* amax,
6892                                  lapack_complex_float* work );
6893 lapack_int LAPACKE_zheequb_work( int matrix_layout, char uplo, lapack_int n,
6894                                  const lapack_complex_double* a, lapack_int lda,
6895                                  double* s, double* scond, double* amax,
6896                                  lapack_complex_double* work );
6897
6898 lapack_int LAPACKE_cheev_work( int matrix_layout, char jobz, char uplo,
6899                                lapack_int n, lapack_complex_float* a,
6900                                lapack_int lda, float* w,
6901                                lapack_complex_float* work, lapack_int lwork,
6902                                float* rwork );
6903 lapack_int LAPACKE_zheev_work( int matrix_layout, char jobz, char uplo,
6904                                lapack_int n, lapack_complex_double* a,
6905                                lapack_int lda, double* w,
6906                                lapack_complex_double* work, lapack_int lwork,
6907                                double* rwork );
6908
6909 lapack_int LAPACKE_cheevd_work( int matrix_layout, char jobz, char uplo,
6910                                 lapack_int n, lapack_complex_float* a,
6911                                 lapack_int lda, float* w,
6912                                 lapack_complex_float* work, lapack_int lwork,
6913                                 float* rwork, lapack_int lrwork,
6914                                 lapack_int* iwork, lapack_int liwork );
6915 lapack_int LAPACKE_zheevd_work( int matrix_layout, char jobz, char uplo,
6916                                 lapack_int n, lapack_complex_double* a,
6917                                 lapack_int lda, double* w,
6918                                 lapack_complex_double* work, lapack_int lwork,
6919                                 double* rwork, lapack_int lrwork,
6920                                 lapack_int* iwork, lapack_int liwork );
6921
6922 lapack_int LAPACKE_cheevr_work( int matrix_layout, char jobz, char range,
6923                                 char uplo, lapack_int n,
6924                                 lapack_complex_float* a, lapack_int lda,
6925                                 float vl, float vu, lapack_int il,
6926                                 lapack_int iu, float abstol, lapack_int* m,
6927                                 float* w, lapack_complex_float* z,
6928                                 lapack_int ldz, lapack_int* isuppz,
6929                                 lapack_complex_float* work, lapack_int lwork,
6930                                 float* rwork, lapack_int lrwork,
6931                                 lapack_int* iwork, lapack_int liwork );
6932 lapack_int LAPACKE_zheevr_work( int matrix_layout, char jobz, char range,
6933                                 char uplo, lapack_int n,
6934                                 lapack_complex_double* a, lapack_int lda,
6935                                 double vl, double vu, lapack_int il,
6936                                 lapack_int iu, double abstol, lapack_int* m,
6937                                 double* w, lapack_complex_double* z,
6938                                 lapack_int ldz, lapack_int* isuppz,
6939                                 lapack_complex_double* work, lapack_int lwork,
6940                                 double* rwork, lapack_int lrwork,
6941                                 lapack_int* iwork, lapack_int liwork );
6942
6943 lapack_int LAPACKE_cheevx_work( int matrix_layout, char jobz, char range,
6944                                 char uplo, lapack_int n,
6945                                 lapack_complex_float* a, lapack_int lda,
6946                                 float vl, float vu, lapack_int il,
6947                                 lapack_int iu, float abstol, lapack_int* m,
6948                                 float* w, lapack_complex_float* z,
6949                                 lapack_int ldz, lapack_complex_float* work,
6950                                 lapack_int lwork, float* rwork,
6951                                 lapack_int* iwork, lapack_int* ifail );
6952 lapack_int LAPACKE_zheevx_work( int matrix_layout, char jobz, char range,
6953                                 char uplo, lapack_int n,
6954                                 lapack_complex_double* a, lapack_int lda,
6955                                 double vl, double vu, lapack_int il,
6956                                 lapack_int iu, double abstol, lapack_int* m,
6957                                 double* w, lapack_complex_double* z,
6958                                 lapack_int ldz, lapack_complex_double* work,
6959                                 lapack_int lwork, double* rwork,
6960                                 lapack_int* iwork, lapack_int* ifail );
6961
6962 lapack_int LAPACKE_chegst_work( int matrix_layout, lapack_int itype, char uplo,
6963                                 lapack_int n, lapack_complex_float* a,
6964                                 lapack_int lda, const lapack_complex_float* b,
6965                                 lapack_int ldb );
6966 lapack_int LAPACKE_zhegst_work( int matrix_layout, lapack_int itype, char uplo,
6967                                 lapack_int n, lapack_complex_double* a,
6968                                 lapack_int lda, const lapack_complex_double* b,
6969                                 lapack_int ldb );
6970
6971 lapack_int LAPACKE_chegv_work( int matrix_layout, lapack_int itype, char jobz,
6972                                char uplo, lapack_int n, lapack_complex_float* a,
6973                                lapack_int lda, lapack_complex_float* b,
6974                                lapack_int ldb, float* w,
6975                                lapack_complex_float* work, lapack_int lwork,
6976                                float* rwork );
6977 lapack_int LAPACKE_zhegv_work( int matrix_layout, lapack_int itype, char jobz,
6978                                char uplo, lapack_int n,
6979                                lapack_complex_double* a, lapack_int lda,
6980                                lapack_complex_double* b, lapack_int ldb,
6981                                double* w, lapack_complex_double* work,
6982                                lapack_int lwork, double* rwork );
6983
6984 lapack_int LAPACKE_chegvd_work( int matrix_layout, lapack_int itype, char jobz,
6985                                 char uplo, lapack_int n,
6986                                 lapack_complex_float* a, lapack_int lda,
6987                                 lapack_complex_float* b, lapack_int ldb,
6988                                 float* w, lapack_complex_float* work,
6989                                 lapack_int lwork, float* rwork,
6990                                 lapack_int lrwork, lapack_int* iwork,
6991                                 lapack_int liwork );
6992 lapack_int LAPACKE_zhegvd_work( int matrix_layout, lapack_int itype, char jobz,
6993                                 char uplo, lapack_int n,
6994                                 lapack_complex_double* a, lapack_int lda,
6995                                 lapack_complex_double* b, lapack_int ldb,
6996                                 double* w, lapack_complex_double* work,
6997                                 lapack_int lwork, double* rwork,
6998                                 lapack_int lrwork, lapack_int* iwork,
6999                                 lapack_int liwork );
7000
7001 lapack_int LAPACKE_chegvx_work( int matrix_layout, lapack_int itype, char jobz,
7002                                 char range, char uplo, lapack_int n,
7003                                 lapack_complex_float* a, lapack_int lda,
7004                                 lapack_complex_float* b, lapack_int ldb,
7005                                 float vl, float vu, lapack_int il,
7006                                 lapack_int iu, float abstol, lapack_int* m,
7007                                 float* w, lapack_complex_float* z,
7008                                 lapack_int ldz, lapack_complex_float* work,
7009                                 lapack_int lwork, float* rwork,
7010                                 lapack_int* iwork, lapack_int* ifail );
7011 lapack_int LAPACKE_zhegvx_work( int matrix_layout, lapack_int itype, char jobz,
7012                                 char range, char uplo, lapack_int n,
7013                                 lapack_complex_double* a, lapack_int lda,
7014                                 lapack_complex_double* b, lapack_int ldb,
7015                                 double vl, double vu, lapack_int il,
7016                                 lapack_int iu, double abstol, lapack_int* m,
7017                                 double* w, lapack_complex_double* z,
7018                                 lapack_int ldz, lapack_complex_double* work,
7019                                 lapack_int lwork, double* rwork,
7020                                 lapack_int* iwork, lapack_int* ifail );
7021
7022 lapack_int LAPACKE_cherfs_work( int matrix_layout, char uplo, lapack_int n,
7023                                 lapack_int nrhs, const lapack_complex_float* a,
7024                                 lapack_int lda, const lapack_complex_float* af,
7025                                 lapack_int ldaf, const lapack_int* ipiv,
7026                                 const lapack_complex_float* b, lapack_int ldb,
7027                                 lapack_complex_float* x, lapack_int ldx,
7028                                 float* ferr, float* berr,
7029                                 lapack_complex_float* work, float* rwork );
7030 lapack_int LAPACKE_zherfs_work( int matrix_layout, char uplo, lapack_int n,
7031                                 lapack_int nrhs, const lapack_complex_double* a,
7032                                 lapack_int lda, const lapack_complex_double* af,
7033                                 lapack_int ldaf, const lapack_int* ipiv,
7034                                 const lapack_complex_double* b, lapack_int ldb,
7035                                 lapack_complex_double* x, lapack_int ldx,
7036                                 double* ferr, double* berr,
7037                                 lapack_complex_double* work, double* rwork );
7038
7039 lapack_int LAPACKE_cherfsx_work( int matrix_layout, char uplo, char equed,
7040                                  lapack_int n, lapack_int nrhs,
7041                                  const lapack_complex_float* a, lapack_int lda,
7042                                  const lapack_complex_float* af,
7043                                  lapack_int ldaf, const lapack_int* ipiv,
7044                                  const float* s, const lapack_complex_float* b,
7045                                  lapack_int ldb, lapack_complex_float* x,
7046                                  lapack_int ldx, float* rcond, float* berr,
7047                                  lapack_int n_err_bnds, float* err_bnds_norm,
7048                                  float* err_bnds_comp, lapack_int nparams,
7049                                  float* params, lapack_complex_float* work,
7050                                  float* rwork );
7051 lapack_int LAPACKE_zherfsx_work( int matrix_layout, char uplo, char equed,
7052                                  lapack_int n, lapack_int nrhs,
7053                                  const lapack_complex_double* a, lapack_int lda,
7054                                  const lapack_complex_double* af,
7055                                  lapack_int ldaf, const lapack_int* ipiv,
7056                                  const double* s,
7057                                  const lapack_complex_double* b, lapack_int ldb,
7058                                  lapack_complex_double* x, lapack_int ldx,
7059                                  double* rcond, double* berr,
7060                                  lapack_int n_err_bnds, double* err_bnds_norm,
7061                                  double* err_bnds_comp, lapack_int nparams,
7062                                  double* params, lapack_complex_double* work,
7063                                  double* rwork );
7064
7065 lapack_int LAPACKE_chesv_work( int matrix_layout, char uplo, lapack_int n,
7066                                lapack_int nrhs, lapack_complex_float* a,
7067                                lapack_int lda, lapack_int* ipiv,
7068                                lapack_complex_float* b, lapack_int ldb,
7069                                lapack_complex_float* work, lapack_int lwork );
7070 lapack_int LAPACKE_zhesv_work( int matrix_layout, char uplo, lapack_int n,
7071                                lapack_int nrhs, lapack_complex_double* a,
7072                                lapack_int lda, lapack_int* ipiv,
7073                                lapack_complex_double* b, lapack_int ldb,
7074                                lapack_complex_double* work, lapack_int lwork );
7075
7076 lapack_int LAPACKE_chesvx_work( int matrix_layout, char fact, char uplo,
7077                                 lapack_int n, lapack_int nrhs,
7078                                 const lapack_complex_float* a, lapack_int lda,
7079                                 lapack_complex_float* af, lapack_int ldaf,
7080                                 lapack_int* ipiv, const lapack_complex_float* b,
7081                                 lapack_int ldb, lapack_complex_float* x,
7082                                 lapack_int ldx, float* rcond, float* ferr,
7083                                 float* berr, lapack_complex_float* work,
7084                                 lapack_int lwork, float* rwork );
7085 lapack_int LAPACKE_zhesvx_work( int matrix_layout, char fact, char uplo,
7086                                 lapack_int n, lapack_int nrhs,
7087                                 const lapack_complex_double* a, lapack_int lda,
7088                                 lapack_complex_double* af, lapack_int ldaf,
7089                                 lapack_int* ipiv,
7090                                 const lapack_complex_double* b, lapack_int ldb,
7091                                 lapack_complex_double* x, lapack_int ldx,
7092                                 double* rcond, double* ferr, double* berr,
7093                                 lapack_complex_double* work, lapack_int lwork,
7094                                 double* rwork );
7095
7096 lapack_int LAPACKE_chesvxx_work( int matrix_layout, char fact, char uplo,
7097                                  lapack_int n, lapack_int nrhs,
7098                                  lapack_complex_float* a, lapack_int lda,
7099                                  lapack_complex_float* af, lapack_int ldaf,
7100                                  lapack_int* ipiv, char* equed, float* s,
7101                                  lapack_complex_float* b, lapack_int ldb,
7102                                  lapack_complex_float* x, lapack_int ldx,
7103                                  float* rcond, float* rpvgrw, float* berr,
7104                                  lapack_int n_err_bnds, float* err_bnds_norm,
7105                                  float* err_bnds_comp, lapack_int nparams,
7106                                  float* params, lapack_complex_float* work,
7107                                  float* rwork );
7108 lapack_int LAPACKE_zhesvxx_work( int matrix_layout, char fact, char uplo,
7109                                  lapack_int n, lapack_int nrhs,
7110                                  lapack_complex_double* a, lapack_int lda,
7111                                  lapack_complex_double* af, lapack_int ldaf,
7112                                  lapack_int* ipiv, char* equed, double* s,
7113                                  lapack_complex_double* b, lapack_int ldb,
7114                                  lapack_complex_double* x, lapack_int ldx,
7115                                  double* rcond, double* rpvgrw, double* berr,
7116                                  lapack_int n_err_bnds, double* err_bnds_norm,
7117                                  double* err_bnds_comp, lapack_int nparams,
7118                                  double* params, lapack_complex_double* work,
7119                                  double* rwork );
7120
7121 lapack_int LAPACKE_chetrd_work( int matrix_layout, char uplo, lapack_int n,
7122                                 lapack_complex_float* a, lapack_int lda,
7123                                 float* d, float* e, lapack_complex_float* tau,
7124                                 lapack_complex_float* work, lapack_int lwork );
7125 lapack_int LAPACKE_zhetrd_work( int matrix_layout, char uplo, lapack_int n,
7126                                 lapack_complex_double* a, lapack_int lda,
7127                                 double* d, double* e,
7128                                 lapack_complex_double* tau,
7129                                 lapack_complex_double* work, lapack_int lwork );
7130
7131 lapack_int LAPACKE_chetrf_work( int matrix_layout, char uplo, lapack_int n,
7132                                 lapack_complex_float* a, lapack_int lda,
7133                                 lapack_int* ipiv, lapack_complex_float* work,
7134                                 lapack_int lwork );
7135 lapack_int LAPACKE_zhetrf_work( int matrix_layout, char uplo, lapack_int n,
7136                                 lapack_complex_double* a, lapack_int lda,
7137                                 lapack_int* ipiv, lapack_complex_double* work,
7138                                 lapack_int lwork );
7139
7140 lapack_int LAPACKE_chetri_work( int matrix_layout, char uplo, lapack_int n,
7141                                 lapack_complex_float* a, lapack_int lda,
7142                                 const lapack_int* ipiv,
7143                                 lapack_complex_float* work );
7144 lapack_int LAPACKE_zhetri_work( int matrix_layout, char uplo, lapack_int n,
7145                                 lapack_complex_double* a, lapack_int lda,
7146                                 const lapack_int* ipiv,
7147                                 lapack_complex_double* work );
7148
7149 lapack_int LAPACKE_chetrs_work( int matrix_layout, char uplo, lapack_int n,
7150                                 lapack_int nrhs, const lapack_complex_float* a,
7151                                 lapack_int lda, const lapack_int* ipiv,
7152                                 lapack_complex_float* b, lapack_int ldb );
7153 lapack_int LAPACKE_zhetrs_work( int matrix_layout, char uplo, lapack_int n,
7154                                 lapack_int nrhs, const lapack_complex_double* a,
7155                                 lapack_int lda, const lapack_int* ipiv,
7156                                 lapack_complex_double* b, lapack_int ldb );
7157
7158 lapack_int LAPACKE_chfrk_work( int matrix_layout, char transr, char uplo,
7159                                char trans, lapack_int n, lapack_int k,
7160                                float alpha, const lapack_complex_float* a,
7161                                lapack_int lda, float beta,
7162                                lapack_complex_float* c );
7163 lapack_int LAPACKE_zhfrk_work( int matrix_layout, char transr, char uplo,
7164                                char trans, lapack_int n, lapack_int k,
7165                                double alpha, const lapack_complex_double* a,
7166                                lapack_int lda, double beta,
7167                                lapack_complex_double* c );
7168
7169 lapack_int LAPACKE_shgeqz_work( int matrix_layout, char job, char compq,
7170                                 char compz, lapack_int n, lapack_int ilo,
7171                                 lapack_int ihi, float* h, lapack_int ldh,
7172                                 float* t, lapack_int ldt, float* alphar,
7173                                 float* alphai, float* beta, float* q,
7174                                 lapack_int ldq, float* z, lapack_int ldz,
7175                                 float* work, lapack_int lwork );
7176 lapack_int LAPACKE_dhgeqz_work( int matrix_layout, char job, char compq,
7177                                 char compz, lapack_int n, lapack_int ilo,
7178                                 lapack_int ihi, double* h, lapack_int ldh,
7179                                 double* t, lapack_int ldt, double* alphar,
7180                                 double* alphai, double* beta, double* q,
7181                                 lapack_int ldq, double* z, lapack_int ldz,
7182                                 double* work, lapack_int lwork );
7183 lapack_int LAPACKE_chgeqz_work( int matrix_layout, char job, char compq,
7184                                 char compz, lapack_int n, lapack_int ilo,
7185                                 lapack_int ihi, lapack_complex_float* h,
7186                                 lapack_int ldh, lapack_complex_float* t,
7187                                 lapack_int ldt, lapack_complex_float* alpha,
7188                                 lapack_complex_float* beta,
7189                                 lapack_complex_float* q, lapack_int ldq,
7190                                 lapack_complex_float* z, lapack_int ldz,
7191                                 lapack_complex_float* work, lapack_int lwork,
7192                                 float* rwork );
7193 lapack_int LAPACKE_zhgeqz_work( int matrix_layout, char job, char compq,
7194                                 char compz, lapack_int n, lapack_int ilo,
7195                                 lapack_int ihi, lapack_complex_double* h,
7196                                 lapack_int ldh, lapack_complex_double* t,
7197                                 lapack_int ldt, lapack_complex_double* alpha,
7198                                 lapack_complex_double* beta,
7199                                 lapack_complex_double* q, lapack_int ldq,
7200                                 lapack_complex_double* z, lapack_int ldz,
7201                                 lapack_complex_double* work, lapack_int lwork,
7202                                 double* rwork );
7203
7204 lapack_int LAPACKE_chpcon_work( int matrix_layout, char uplo, lapack_int n,
7205                                 const lapack_complex_float* ap,
7206                                 const lapack_int* ipiv, float anorm,
7207                                 float* rcond, lapack_complex_float* work );
7208 lapack_int LAPACKE_zhpcon_work( int matrix_layout, char uplo, lapack_int n,
7209                                 const lapack_complex_double* ap,
7210                                 const lapack_int* ipiv, double anorm,
7211                                 double* rcond, lapack_complex_double* work );
7212
7213 lapack_int LAPACKE_chpev_work( int matrix_layout, char jobz, char uplo,
7214                                lapack_int n, lapack_complex_float* ap, float* w,
7215                                lapack_complex_float* z, lapack_int ldz,
7216                                lapack_complex_float* work, float* rwork );
7217 lapack_int LAPACKE_zhpev_work( int matrix_layout, char jobz, char uplo,
7218                                lapack_int n, lapack_complex_double* ap,
7219                                double* w, lapack_complex_double* z,
7220                                lapack_int ldz, lapack_complex_double* work,
7221                                double* rwork );
7222
7223 lapack_int LAPACKE_chpevd_work( int matrix_layout, char jobz, char uplo,
7224                                 lapack_int n, lapack_complex_float* ap,
7225                                 float* w, lapack_complex_float* z,
7226                                 lapack_int ldz, lapack_complex_float* work,
7227                                 lapack_int lwork, float* rwork,
7228                                 lapack_int lrwork, lapack_int* iwork,
7229                                 lapack_int liwork );
7230 lapack_int LAPACKE_zhpevd_work( int matrix_layout, char jobz, char uplo,
7231                                 lapack_int n, lapack_complex_double* ap,
7232                                 double* w, lapack_complex_double* z,
7233                                 lapack_int ldz, lapack_complex_double* work,
7234                                 lapack_int lwork, double* rwork,
7235                                 lapack_int lrwork, lapack_int* iwork,
7236                                 lapack_int liwork );
7237
7238 lapack_int LAPACKE_chpevx_work( int matrix_layout, char jobz, char range,
7239                                 char uplo, lapack_int n,
7240                                 lapack_complex_float* ap, float vl, float vu,
7241                                 lapack_int il, lapack_int iu, float abstol,
7242                                 lapack_int* m, float* w,
7243                                 lapack_complex_float* z, lapack_int ldz,
7244                                 lapack_complex_float* work, float* rwork,
7245                                 lapack_int* iwork, lapack_int* ifail );
7246 lapack_int LAPACKE_zhpevx_work( int matrix_layout, char jobz, char range,
7247                                 char uplo, lapack_int n,
7248                                 lapack_complex_double* ap, double vl, double vu,
7249                                 lapack_int il, lapack_int iu, double abstol,
7250                                 lapack_int* m, double* w,
7251                                 lapack_complex_double* z, lapack_int ldz,
7252                                 lapack_complex_double* work, double* rwork,
7253                                 lapack_int* iwork, lapack_int* ifail );
7254
7255 lapack_int LAPACKE_chpgst_work( int matrix_layout, lapack_int itype, char uplo,
7256                                 lapack_int n, lapack_complex_float* ap,
7257                                 const lapack_complex_float* bp );
7258 lapack_int LAPACKE_zhpgst_work( int matrix_layout, lapack_int itype, char uplo,
7259                                 lapack_int n, lapack_complex_double* ap,
7260                                 const lapack_complex_double* bp );
7261
7262 lapack_int LAPACKE_chpgv_work( int matrix_layout, lapack_int itype, char jobz,
7263                                char uplo, lapack_int n,
7264                                lapack_complex_float* ap,
7265                                lapack_complex_float* bp, float* w,
7266                                lapack_complex_float* z, lapack_int ldz,
7267                                lapack_complex_float* work, float* rwork );
7268 lapack_int LAPACKE_zhpgv_work( int matrix_layout, lapack_int itype, char jobz,
7269                                char uplo, lapack_int n,
7270                                lapack_complex_double* ap,
7271                                lapack_complex_double* bp, double* w,
7272                                lapack_complex_double* z, lapack_int ldz,
7273                                lapack_complex_double* work, double* rwork );
7274
7275 lapack_int LAPACKE_chpgvd_work( int matrix_layout, lapack_int itype, char jobz,
7276                                 char uplo, lapack_int n,
7277                                 lapack_complex_float* ap,
7278                                 lapack_complex_float* bp, float* w,
7279                                 lapack_complex_float* z, lapack_int ldz,
7280                                 lapack_complex_float* work, lapack_int lwork,
7281                                 float* rwork, lapack_int lrwork,
7282                                 lapack_int* iwork, lapack_int liwork );
7283 lapack_int LAPACKE_zhpgvd_work( int matrix_layout, lapack_int itype, char jobz,
7284                                 char uplo, lapack_int n,
7285                                 lapack_complex_double* ap,
7286                                 lapack_complex_double* bp, double* w,
7287                                 lapack_complex_double* z, lapack_int ldz,
7288                                 lapack_complex_double* work, lapack_int lwork,
7289                                 double* rwork, lapack_int lrwork,
7290                                 lapack_int* iwork, lapack_int liwork );
7291
7292 lapack_int LAPACKE_chpgvx_work( int matrix_layout, lapack_int itype, char jobz,
7293                                 char range, char uplo, lapack_int n,
7294                                 lapack_complex_float* ap,
7295                                 lapack_complex_float* bp, float vl, float vu,
7296                                 lapack_int il, lapack_int iu, float abstol,
7297                                 lapack_int* m, float* w,
7298                                 lapack_complex_float* z, lapack_int ldz,
7299                                 lapack_complex_float* work, float* rwork,
7300                                 lapack_int* iwork, lapack_int* ifail );
7301 lapack_int LAPACKE_zhpgvx_work( int matrix_layout, lapack_int itype, char jobz,
7302                                 char range, char uplo, lapack_int n,
7303                                 lapack_complex_double* ap,
7304                                 lapack_complex_double* bp, double vl, double vu,
7305                                 lapack_int il, lapack_int iu, double abstol,
7306                                 lapack_int* m, double* w,
7307                                 lapack_complex_double* z, lapack_int ldz,
7308                                 lapack_complex_double* work, double* rwork,
7309                                 lapack_int* iwork, lapack_int* ifail );
7310
7311 lapack_int LAPACKE_chprfs_work( int matrix_layout, char uplo, lapack_int n,
7312                                 lapack_int nrhs, const lapack_complex_float* ap,
7313                                 const lapack_complex_float* afp,
7314                                 const lapack_int* ipiv,
7315                                 const lapack_complex_float* b, lapack_int ldb,
7316                                 lapack_complex_float* x, lapack_int ldx,
7317                                 float* ferr, float* berr,
7318                                 lapack_complex_float* work, float* rwork );
7319 lapack_int LAPACKE_zhprfs_work( int matrix_layout, char uplo, lapack_int n,
7320                                 lapack_int nrhs,
7321                                 const lapack_complex_double* ap,
7322                                 const lapack_complex_double* afp,
7323                                 const lapack_int* ipiv,
7324                                 const lapack_complex_double* b, lapack_int ldb,
7325                                 lapack_complex_double* x, lapack_int ldx,
7326                                 double* ferr, double* berr,
7327                                 lapack_complex_double* work, double* rwork );
7328
7329 lapack_int LAPACKE_chpsv_work( int matrix_layout, char uplo, lapack_int n,
7330                                lapack_int nrhs, lapack_complex_float* ap,
7331                                lapack_int* ipiv, lapack_complex_float* b,
7332                                lapack_int ldb );
7333 lapack_int LAPACKE_zhpsv_work( int matrix_layout, char uplo, lapack_int n,
7334                                lapack_int nrhs, lapack_complex_double* ap,
7335                                lapack_int* ipiv, lapack_complex_double* b,
7336                                lapack_int ldb );
7337
7338 lapack_int LAPACKE_chpsvx_work( int matrix_layout, char fact, char uplo,
7339                                 lapack_int n, lapack_int nrhs,
7340                                 const lapack_complex_float* ap,
7341                                 lapack_complex_float* afp, lapack_int* ipiv,
7342                                 const lapack_complex_float* b, lapack_int ldb,
7343                                 lapack_complex_float* x, lapack_int ldx,
7344                                 float* rcond, float* ferr, float* berr,
7345                                 lapack_complex_float* work, float* rwork );
7346 lapack_int LAPACKE_zhpsvx_work( int matrix_layout, char fact, char uplo,
7347                                 lapack_int n, lapack_int nrhs,
7348                                 const lapack_complex_double* ap,
7349                                 lapack_complex_double* afp, lapack_int* ipiv,
7350                                 const lapack_complex_double* b, lapack_int ldb,
7351                                 lapack_complex_double* x, lapack_int ldx,
7352                                 double* rcond, double* ferr, double* berr,
7353                                 lapack_complex_double* work, double* rwork );
7354
7355 lapack_int LAPACKE_chptrd_work( int matrix_layout, char uplo, lapack_int n,
7356                                 lapack_complex_float* ap, float* d, float* e,
7357                                 lapack_complex_float* tau );
7358 lapack_int LAPACKE_zhptrd_work( int matrix_layout, char uplo, lapack_int n,
7359                                 lapack_complex_double* ap, double* d, double* e,
7360                                 lapack_complex_double* tau );
7361
7362 lapack_int LAPACKE_chptrf_work( int matrix_layout, char uplo, lapack_int n,
7363                                 lapack_complex_float* ap, lapack_int* ipiv );
7364 lapack_int LAPACKE_zhptrf_work( int matrix_layout, char uplo, lapack_int n,
7365                                 lapack_complex_double* ap, lapack_int* ipiv );
7366
7367 lapack_int LAPACKE_chptri_work( int matrix_layout, char uplo, lapack_int n,
7368                                 lapack_complex_float* ap,
7369                                 const lapack_int* ipiv,
7370                                 lapack_complex_float* work );
7371 lapack_int LAPACKE_zhptri_work( int matrix_layout, char uplo, lapack_int n,
7372                                 lapack_complex_double* ap,
7373                                 const lapack_int* ipiv,
7374                                 lapack_complex_double* work );
7375
7376 lapack_int LAPACKE_chptrs_work( int matrix_layout, char uplo, lapack_int n,
7377                                 lapack_int nrhs, const lapack_complex_float* ap,
7378                                 const lapack_int* ipiv, lapack_complex_float* b,
7379                                 lapack_int ldb );
7380 lapack_int LAPACKE_zhptrs_work( int matrix_layout, char uplo, lapack_int n,
7381                                 lapack_int nrhs,
7382                                 const lapack_complex_double* ap,
7383                                 const lapack_int* ipiv,
7384                                 lapack_complex_double* b, lapack_int ldb );
7385
7386 lapack_int LAPACKE_shsein_work( int matrix_layout, char job, char eigsrc,
7387                                 char initv, lapack_logical* select,
7388                                 lapack_int n, const float* h, lapack_int ldh,
7389                                 float* wr, const float* wi, float* vl,
7390                                 lapack_int ldvl, float* vr, lapack_int ldvr,
7391                                 lapack_int mm, lapack_int* m, float* work,
7392                                 lapack_int* ifaill, lapack_int* ifailr );
7393 lapack_int LAPACKE_dhsein_work( int matrix_layout, char job, char eigsrc,
7394                                 char initv, lapack_logical* select,
7395                                 lapack_int n, const double* h, lapack_int ldh,
7396                                 double* wr, const double* wi, double* vl,
7397                                 lapack_int ldvl, double* vr, lapack_int ldvr,
7398                                 lapack_int mm, lapack_int* m, double* work,
7399                                 lapack_int* ifaill, lapack_int* ifailr );
7400 lapack_int LAPACKE_chsein_work( int matrix_layout, char job, char eigsrc,
7401                                 char initv, const lapack_logical* select,
7402                                 lapack_int n, const lapack_complex_float* h,
7403                                 lapack_int ldh, lapack_complex_float* w,
7404                                 lapack_complex_float* vl, lapack_int ldvl,
7405                                 lapack_complex_float* vr, lapack_int ldvr,
7406                                 lapack_int mm, lapack_int* m,
7407                                 lapack_complex_float* work, float* rwork,
7408                                 lapack_int* ifaill, lapack_int* ifailr );
7409 lapack_int LAPACKE_zhsein_work( int matrix_layout, char job, char eigsrc,
7410                                 char initv, const lapack_logical* select,
7411                                 lapack_int n, const lapack_complex_double* h,
7412                                 lapack_int ldh, lapack_complex_double* w,
7413                                 lapack_complex_double* vl, lapack_int ldvl,
7414                                 lapack_complex_double* vr, lapack_int ldvr,
7415                                 lapack_int mm, lapack_int* m,
7416                                 lapack_complex_double* work, double* rwork,
7417                                 lapack_int* ifaill, lapack_int* ifailr );
7418
7419 lapack_int LAPACKE_shseqr_work( int matrix_layout, char job, char compz,
7420                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7421                                 float* h, lapack_int ldh, float* wr, float* wi,
7422                                 float* z, lapack_int ldz, float* work,
7423                                 lapack_int lwork );
7424 lapack_int LAPACKE_dhseqr_work( int matrix_layout, char job, char compz,
7425                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7426                                 double* h, lapack_int ldh, double* wr,
7427                                 double* wi, double* z, lapack_int ldz,
7428                                 double* work, lapack_int lwork );
7429 lapack_int LAPACKE_chseqr_work( int matrix_layout, char job, char compz,
7430                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7431                                 lapack_complex_float* h, lapack_int ldh,
7432                                 lapack_complex_float* w,
7433                                 lapack_complex_float* z, lapack_int ldz,
7434                                 lapack_complex_float* work, lapack_int lwork );
7435 lapack_int LAPACKE_zhseqr_work( int matrix_layout, char job, char compz,
7436                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7437                                 lapack_complex_double* h, lapack_int ldh,
7438                                 lapack_complex_double* w,
7439                                 lapack_complex_double* z, lapack_int ldz,
7440                                 lapack_complex_double* work, lapack_int lwork );
7441
7442 lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
7443                                 lapack_int incx );
7444 lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
7445                                 lapack_int incx );
7446
7447 lapack_int LAPACKE_slacn2_work( lapack_int n, float* v, float* x,
7448                                 lapack_int* isgn, float* est, lapack_int* kase,
7449                                 lapack_int* isave );
7450 lapack_int LAPACKE_dlacn2_work( lapack_int n, double* v, double* x,
7451                                 lapack_int* isgn, double* est, lapack_int* kase,
7452                                 lapack_int* isave );
7453 lapack_int LAPACKE_clacn2_work( lapack_int n, lapack_complex_float* v,
7454                                 lapack_complex_float* x,
7455                                 float* est, lapack_int* kase,
7456                                 lapack_int* isave );
7457 lapack_int LAPACKE_zlacn2_work( lapack_int n, lapack_complex_double* v,
7458                                 lapack_complex_double* x,
7459                                 double* est, lapack_int* kase,
7460                                 lapack_int* isave );
7461
7462 lapack_int LAPACKE_slacpy_work( int matrix_layout, char uplo, lapack_int m,
7463                                 lapack_int n, const float* a, lapack_int lda,
7464                                 float* b, lapack_int ldb );
7465 lapack_int LAPACKE_dlacpy_work( int matrix_layout, char uplo, lapack_int m,
7466                                 lapack_int n, const double* a, lapack_int lda,
7467                                 double* b, lapack_int ldb );
7468 lapack_int LAPACKE_clacpy_work( int matrix_layout, char uplo, lapack_int m,
7469                                 lapack_int n, const lapack_complex_float* a,
7470                                 lapack_int lda, lapack_complex_float* b,
7471                                 lapack_int ldb );
7472 lapack_int LAPACKE_zlacpy_work( int matrix_layout, char uplo, lapack_int m,
7473                                 lapack_int n, const lapack_complex_double* a,
7474                                 lapack_int lda, lapack_complex_double* b,
7475                                 lapack_int ldb );
7476
7477 lapack_int LAPACKE_clacp2_work( int matrix_layout, char uplo, lapack_int m,
7478                                 lapack_int n, const float* a, lapack_int lda,
7479                                 lapack_complex_float* b, lapack_int ldb );
7480 lapack_int LAPACKE_zlacp2_work( int matrix_layout, char uplo, lapack_int m,
7481                                 lapack_int n, const double* a, lapack_int lda,
7482                                 lapack_complex_double* b, lapack_int ldb );
7483
7484 lapack_int LAPACKE_zlag2c_work( int matrix_layout, lapack_int m, lapack_int n,
7485                                 const lapack_complex_double* a, lapack_int lda,
7486                                 lapack_complex_float* sa, lapack_int ldsa );
7487
7488 lapack_int LAPACKE_slag2d_work( int matrix_layout, lapack_int m, lapack_int n,
7489                                 const float* sa, lapack_int ldsa, double* a,
7490                                 lapack_int lda );
7491
7492 lapack_int LAPACKE_dlag2s_work( int matrix_layout, lapack_int m, lapack_int n,
7493                                 const double* a, lapack_int lda, float* sa,
7494                                 lapack_int ldsa );
7495
7496 lapack_int LAPACKE_clag2z_work( int matrix_layout, lapack_int m, lapack_int n,
7497                                 const lapack_complex_float* sa, lapack_int ldsa,
7498                                 lapack_complex_double* a, lapack_int lda );
7499
7500 lapack_int LAPACKE_slagge_work( int matrix_layout, lapack_int m, lapack_int n,
7501                                 lapack_int kl, lapack_int ku, const float* d,
7502                                 float* a, lapack_int lda, lapack_int* iseed,
7503                                 float* work );
7504 lapack_int LAPACKE_dlagge_work( int matrix_layout, lapack_int m, lapack_int n,
7505                                 lapack_int kl, lapack_int ku, const double* d,
7506                                 double* a, lapack_int lda, lapack_int* iseed,
7507                                 double* work );
7508 lapack_int LAPACKE_clagge_work( int matrix_layout, lapack_int m, lapack_int n,
7509                                 lapack_int kl, lapack_int ku, const float* d,
7510                                 lapack_complex_float* a, lapack_int lda,
7511                                 lapack_int* iseed, lapack_complex_float* work );
7512 lapack_int LAPACKE_zlagge_work( int matrix_layout, lapack_int m, lapack_int n,
7513                                 lapack_int kl, lapack_int ku, const double* d,
7514                                 lapack_complex_double* a, lapack_int lda,
7515                                 lapack_int* iseed,
7516                                 lapack_complex_double* work );
7517
7518 lapack_int LAPACKE_claghe_work( int matrix_layout, lapack_int n, lapack_int k,
7519                                 const float* d, lapack_complex_float* a,
7520                                 lapack_int lda, lapack_int* iseed,
7521                                 lapack_complex_float* work );
7522 lapack_int LAPACKE_zlaghe_work( int matrix_layout, lapack_int n, lapack_int k,
7523                                 const double* d, lapack_complex_double* a,
7524                                 lapack_int lda, lapack_int* iseed,
7525                                 lapack_complex_double* work );
7526
7527 lapack_int LAPACKE_slagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7528                                 const float* d, float* a, lapack_int lda,
7529                                 lapack_int* iseed, float* work );
7530 lapack_int LAPACKE_dlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7531                                 const double* d, double* a, lapack_int lda,
7532                                 lapack_int* iseed, double* work );
7533 lapack_int LAPACKE_clagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7534                                 const float* d, lapack_complex_float* a,
7535                                 lapack_int lda, lapack_int* iseed,
7536                                 lapack_complex_float* work );
7537 lapack_int LAPACKE_zlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7538                                 const double* d, lapack_complex_double* a,
7539                                 lapack_int lda, lapack_int* iseed,
7540                                 lapack_complex_double* work );
7541
7542 lapack_int LAPACKE_slapmr_work( int matrix_layout, lapack_logical forwrd,
7543                                 lapack_int m, lapack_int n, float* x,
7544                                 lapack_int ldx, lapack_int* k );
7545 lapack_int LAPACKE_dlapmr_work( int matrix_layout, lapack_logical forwrd,
7546                                 lapack_int m, lapack_int n, double* x,
7547                                 lapack_int ldx, lapack_int* k );
7548 lapack_int LAPACKE_clapmr_work( int matrix_layout, lapack_logical forwrd,
7549                                 lapack_int m, lapack_int n,
7550                                 lapack_complex_float* x, lapack_int ldx,
7551                                 lapack_int* k );
7552 lapack_int LAPACKE_zlapmr_work( int matrix_layout, lapack_logical forwrd,
7553                                 lapack_int m, lapack_int n,
7554                                 lapack_complex_double* x, lapack_int ldx,
7555                                 lapack_int* k );
7556
7557 lapack_int LAPACKE_slapmt_work( int matrix_layout, lapack_logical forwrd,
7558                                 lapack_int m, lapack_int n, float* x,
7559                                 lapack_int ldx, lapack_int* k );
7560 lapack_int LAPACKE_dlapmt_work( int matrix_layout, lapack_logical forwrd,
7561                                 lapack_int m, lapack_int n, double* x,
7562                                 lapack_int ldx, lapack_int* k );
7563 lapack_int LAPACKE_clapmt_work( int matrix_layout, lapack_logical forwrd,
7564                                 lapack_int m, lapack_int n,
7565                                 lapack_complex_float* x, lapack_int ldx,
7566                                 lapack_int* k );
7567 lapack_int LAPACKE_zlapmt_work( int matrix_layout, lapack_logical forwrd,
7568                                 lapack_int m, lapack_int n,
7569                                 lapack_complex_double* x, lapack_int ldx,
7570                                 lapack_int* k );
7571
7572 lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
7573                                  float* r );
7574 lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
7575                                  double* r );
7576
7577 lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
7578                                  float* sn );
7579 lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
7580                                  double* sn );
7581
7582 float LAPACKE_slapy2_work( float x, float y );
7583 double LAPACKE_dlapy2_work( double x, double y );
7584
7585 float LAPACKE_slapy3_work( float x, float y, float z );
7586 double LAPACKE_dlapy3_work( double x, double y, double z );
7587
7588 float LAPACKE_slamch_work( char cmach );
7589 double LAPACKE_dlamch_work( char cmach );
7590
7591 float LAPACKE_slange_work( int matrix_layout, char norm, lapack_int m,
7592                                 lapack_int n, const float* a, lapack_int lda,
7593                                 float* work );
7594 double LAPACKE_dlange_work( int matrix_layout, char norm, lapack_int m,
7595                                 lapack_int n, const double* a, lapack_int lda,
7596                                 double* work );
7597 float LAPACKE_clange_work( int matrix_layout, char norm, lapack_int m,
7598                                 lapack_int n, const lapack_complex_float* a,
7599                                 lapack_int lda, float* work );
7600 double LAPACKE_zlange_work( int matrix_layout, char norm, lapack_int m,
7601                                 lapack_int n, const lapack_complex_double* a,
7602                                 lapack_int lda, double* work );
7603
7604 float LAPACKE_clanhe_work( int matrix_layout, char norm, char uplo,
7605                                 lapack_int n, const lapack_complex_float* a,
7606                                 lapack_int lda, float* work );
7607 double LAPACKE_zlanhe_work( int matrix_layout, char norm, char uplo,
7608                                 lapack_int n, const lapack_complex_double* a,
7609                                 lapack_int lda, double* work );
7610
7611 lapack_int LAPACKE_clacrm_work( int matrix_layout, lapack_int m, lapack_int n,
7612                                 const lapack_complex_float* a,
7613                                 lapack_int lda, const float* b,
7614                                 lapack_int ldb, lapack_complex_float* c,
7615                                 lapack_int ldc, float* work );
7616 lapack_int LAPACKE_zlacrm_work( int matrix_layout, lapack_int m, lapack_int n,
7617                                 const lapack_complex_double* a,
7618                                 lapack_int lda, const double* b,
7619                                 lapack_int ldb, lapack_complex_double* c,
7620                                 lapack_int ldc, double* work );
7621
7622 lapack_int LAPACKE_clarcm_work( int matrix_layout, lapack_int m, lapack_int n,
7623                                 const float* a, lapack_int lda,
7624                                 const lapack_complex_float* b,
7625                                 lapack_int ldb, lapack_complex_float* c,
7626                                 lapack_int ldc, float* work );
7627 lapack_int LAPACKE_zlarcm_work( int matrix_layout, lapack_int m, lapack_int n,
7628                                 const double* a, lapack_int lda,
7629                                 const lapack_complex_double* b,
7630                                 lapack_int ldb, lapack_complex_double* c,
7631                                 lapack_int ldc, double* work );
7632
7633 float LAPACKE_slansy_work( int matrix_layout, char norm, char uplo,
7634                                 lapack_int n, const float* a, lapack_int lda,
7635                                 float* work );
7636 double LAPACKE_dlansy_work( int matrix_layout, char norm, char uplo,
7637                                 lapack_int n, const double* a, lapack_int lda,
7638                                 double* work );
7639 float LAPACKE_clansy_work( int matrix_layout, char norm, char uplo,
7640                                 lapack_int n, const lapack_complex_float* a,
7641                                 lapack_int lda, float* work );
7642 double LAPACKE_zlansy_work( int matrix_layout, char norm, char uplo,
7643                                 lapack_int n, const lapack_complex_double* a,
7644                                 lapack_int lda, double* work );
7645
7646 float LAPACKE_slantr_work( int matrix_layout, char norm, char uplo,
7647                                 char diag, lapack_int m, lapack_int n, const float* a,
7648                                 lapack_int lda, float* work );
7649 double LAPACKE_dlantr_work( int matrix_layout, char norm, char uplo,
7650                                 char diag, lapack_int m, lapack_int n,
7651                                 const double* a, lapack_int lda, double* work );
7652 float LAPACKE_clantr_work( int matrix_layout, char norm, char uplo,
7653                                 char diag, lapack_int m, lapack_int n,
7654                                 const lapack_complex_float* a, lapack_int lda,
7655                                 float* work );
7656 double LAPACKE_zlantr_work( int matrix_layout, char norm, char uplo,
7657                                 char diag, lapack_int m, lapack_int n,
7658                                 const lapack_complex_double* a, lapack_int lda,
7659                                 double* work );
7660
7661 lapack_int LAPACKE_slarfb_work( int matrix_layout, char side, char trans,
7662                                 char direct, char storev, lapack_int m,
7663                                 lapack_int n, lapack_int k, const float* v,
7664                                 lapack_int ldv, const float* t, lapack_int ldt,
7665                                 float* c, lapack_int ldc, float* work,
7666                                 lapack_int ldwork );
7667 lapack_int LAPACKE_dlarfb_work( int matrix_layout, char side, char trans,
7668                                 char direct, char storev, lapack_int m,
7669                                 lapack_int n, lapack_int k, const double* v,
7670                                 lapack_int ldv, const double* t, lapack_int ldt,
7671                                 double* c, lapack_int ldc, double* work,
7672                                 lapack_int ldwork );
7673 lapack_int LAPACKE_clarfb_work( int matrix_layout, char side, char trans,
7674                                 char direct, char storev, lapack_int m,
7675                                 lapack_int n, lapack_int k,
7676                                 const lapack_complex_float* v, lapack_int ldv,
7677                                 const lapack_complex_float* t, lapack_int ldt,
7678                                 lapack_complex_float* c, lapack_int ldc,
7679                                 lapack_complex_float* work, lapack_int ldwork );
7680 lapack_int LAPACKE_zlarfb_work( int matrix_layout, char side, char trans,
7681                                 char direct, char storev, lapack_int m,
7682                                 lapack_int n, lapack_int k,
7683                                 const lapack_complex_double* v, lapack_int ldv,
7684                                 const lapack_complex_double* t, lapack_int ldt,
7685                                 lapack_complex_double* c, lapack_int ldc,
7686                                 lapack_complex_double* work,
7687                                 lapack_int ldwork );
7688
7689 lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
7690                                 lapack_int incx, float* tau );
7691 lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
7692                                 lapack_int incx, double* tau );
7693 lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
7694                                 lapack_complex_float* x, lapack_int incx,
7695                                 lapack_complex_float* tau );
7696 lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
7697                                 lapack_complex_double* x, lapack_int incx,
7698                                 lapack_complex_double* tau );
7699
7700 lapack_int LAPACKE_slarft_work( int matrix_layout, char direct, char storev,
7701                                 lapack_int n, lapack_int k, const float* v,
7702                                 lapack_int ldv, const float* tau, float* t,
7703                                 lapack_int ldt );
7704 lapack_int LAPACKE_dlarft_work( int matrix_layout, char direct, char storev,
7705                                 lapack_int n, lapack_int k, const double* v,
7706                                 lapack_int ldv, const double* tau, double* t,
7707                                 lapack_int ldt );
7708 lapack_int LAPACKE_clarft_work( int matrix_layout, char direct, char storev,
7709                                 lapack_int n, lapack_int k,
7710                                 const lapack_complex_float* v, lapack_int ldv,
7711                                 const lapack_complex_float* tau,
7712                                 lapack_complex_float* t, lapack_int ldt );
7713 lapack_int LAPACKE_zlarft_work( int matrix_layout, char direct, char storev,
7714                                 lapack_int n, lapack_int k,
7715                                 const lapack_complex_double* v, lapack_int ldv,
7716                                 const lapack_complex_double* tau,
7717                                 lapack_complex_double* t, lapack_int ldt );
7718
7719 lapack_int LAPACKE_slarfx_work( int matrix_layout, char side, lapack_int m,
7720                                 lapack_int n, const float* v, float tau,
7721                                 float* c, lapack_int ldc, float* work );
7722 lapack_int LAPACKE_dlarfx_work( int matrix_layout, char side, lapack_int m,
7723                                 lapack_int n, const double* v, double tau,
7724                                 double* c, lapack_int ldc, double* work );
7725 lapack_int LAPACKE_clarfx_work( int matrix_layout, char side, lapack_int m,
7726                                 lapack_int n, const lapack_complex_float* v,
7727                                 lapack_complex_float tau,
7728                                 lapack_complex_float* c, lapack_int ldc,
7729                                 lapack_complex_float* work );
7730 lapack_int LAPACKE_zlarfx_work( int matrix_layout, char side, lapack_int m,
7731                                 lapack_int n, const lapack_complex_double* v,
7732                                 lapack_complex_double tau,
7733                                 lapack_complex_double* c, lapack_int ldc,
7734                                 lapack_complex_double* work );
7735
7736 lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
7737                                 lapack_int n, float* x );
7738 lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
7739                                 lapack_int n, double* x );
7740 lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
7741                                 lapack_int n, lapack_complex_float* x );
7742 lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
7743                                 lapack_int n, lapack_complex_double* x );
7744
7745
7746 lapack_int LAPACKE_slascl_work( int matrix_layout, char type, lapack_int kl,
7747                            lapack_int ku, float cfrom, float cto,
7748                            lapack_int m, lapack_int n, float* a,
7749                            lapack_int lda );
7750 lapack_int LAPACKE_dlascl_work( int matrix_layout, char type, lapack_int kl,
7751                            lapack_int ku, double cfrom, double cto,
7752                            lapack_int m, lapack_int n, double* a,
7753                            lapack_int lda );
7754 lapack_int LAPACKE_clascl_work( int matrix_layout, char type, lapack_int kl,
7755                            lapack_int ku, float cfrom, float cto,
7756                            lapack_int m, lapack_int n, lapack_complex_float* a,
7757                            lapack_int lda );
7758 lapack_int LAPACKE_zlascl_work( int matrix_layout, char type, lapack_int kl,
7759                            lapack_int ku, double cfrom, double cto,
7760                            lapack_int m, lapack_int n, lapack_complex_double* a,
7761                            lapack_int lda );
7762
7763 lapack_int LAPACKE_slaset_work( int matrix_layout, char uplo, lapack_int m,
7764                                 lapack_int n, float alpha, float beta, float* a,
7765                                 lapack_int lda );
7766 lapack_int LAPACKE_dlaset_work( int matrix_layout, char uplo, lapack_int m,
7767                                 lapack_int n, double alpha, double beta,
7768                                 double* a, lapack_int lda );
7769 lapack_int LAPACKE_claset_work( int matrix_layout, char uplo, lapack_int m,
7770                                 lapack_int n, lapack_complex_float alpha,
7771                                 lapack_complex_float beta,
7772                                 lapack_complex_float* a, lapack_int lda );
7773 lapack_int LAPACKE_zlaset_work( int matrix_layout, char uplo, lapack_int m,
7774                                 lapack_int n, lapack_complex_double alpha,
7775                                 lapack_complex_double beta,
7776                                 lapack_complex_double* a, lapack_int lda );
7777
7778 lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
7779 lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
7780
7781 lapack_int LAPACKE_slassq_work( lapack_int n,                 float* x, lapack_int incx,  float* scale,  float* sumsq );
7782 lapack_int LAPACKE_dlassq_work( lapack_int n,                double* x, lapack_int incx, double* scale, double* sumsq );
7783 lapack_int LAPACKE_classq_work( lapack_int n,  lapack_complex_float* x, lapack_int incx,  float* scale,  float* sumsq );
7784 lapack_int LAPACKE_zlassq_work( lapack_int n, lapack_complex_double* x, lapack_int incx, double* scale, double* sumsq );
7785
7786 lapack_int LAPACKE_slaswp_work( int matrix_layout, lapack_int n, float* a,
7787                                 lapack_int lda, lapack_int k1, lapack_int k2,
7788                                 const lapack_int* ipiv, lapack_int incx );
7789 lapack_int LAPACKE_dlaswp_work( int matrix_layout, lapack_int n, double* a,
7790                                 lapack_int lda, lapack_int k1, lapack_int k2,
7791                                 const lapack_int* ipiv, lapack_int incx );
7792 lapack_int LAPACKE_claswp_work( int matrix_layout, lapack_int n,
7793                                 lapack_complex_float* a, lapack_int lda,
7794                                 lapack_int k1, lapack_int k2,
7795                                 const lapack_int* ipiv, lapack_int incx );
7796 lapack_int LAPACKE_zlaswp_work( int matrix_layout, lapack_int n,
7797                                 lapack_complex_double* a, lapack_int lda,
7798                                 lapack_int k1, lapack_int k2,
7799                                 const lapack_int* ipiv, lapack_int incx );
7800
7801 lapack_int LAPACKE_slatms_work( int matrix_layout, lapack_int m, lapack_int n,
7802                                 char dist, lapack_int* iseed, char sym,
7803                                 float* d, lapack_int mode, float cond,
7804                                 float dmax, lapack_int kl, lapack_int ku,
7805                                 char pack, float* a, lapack_int lda,
7806                                 float* work );
7807 lapack_int LAPACKE_dlatms_work( int matrix_layout, lapack_int m, lapack_int n,
7808                                 char dist, lapack_int* iseed, char sym,
7809                                 double* d, lapack_int mode, double cond,
7810                                 double dmax, lapack_int kl, lapack_int ku,
7811                                 char pack, double* a, lapack_int lda,
7812                                 double* work );
7813 lapack_int LAPACKE_clatms_work( int matrix_layout, lapack_int m, lapack_int n,
7814                                 char dist, lapack_int* iseed, char sym,
7815                                 float* d, lapack_int mode, float cond,
7816                                 float dmax, lapack_int kl, lapack_int ku,
7817                                 char pack, lapack_complex_float* a,
7818                                 lapack_int lda, lapack_complex_float* work );
7819 lapack_int LAPACKE_zlatms_work( int matrix_layout, lapack_int m, lapack_int n,
7820                                 char dist, lapack_int* iseed, char sym,
7821                                 double* d, lapack_int mode, double cond,
7822                                 double dmax, lapack_int kl, lapack_int ku,
7823                                 char pack, lapack_complex_double* a,
7824                                 lapack_int lda, lapack_complex_double* work );
7825
7826 lapack_int LAPACKE_slauum_work( int matrix_layout, char uplo, lapack_int n,
7827                                 float* a, lapack_int lda );
7828 lapack_int LAPACKE_dlauum_work( int matrix_layout, char uplo, lapack_int n,
7829                                 double* a, lapack_int lda );
7830 lapack_int LAPACKE_clauum_work( int matrix_layout, char uplo, lapack_int n,
7831                                 lapack_complex_float* a, lapack_int lda );
7832 lapack_int LAPACKE_zlauum_work( int matrix_layout, char uplo, lapack_int n,
7833                                 lapack_complex_double* a, lapack_int lda );
7834
7835 lapack_int LAPACKE_sopgtr_work( int matrix_layout, char uplo, lapack_int n,
7836                                 const float* ap, const float* tau, float* q,
7837                                 lapack_int ldq, float* work );
7838 lapack_int LAPACKE_dopgtr_work( int matrix_layout, char uplo, lapack_int n,
7839                                 const double* ap, const double* tau, double* q,
7840                                 lapack_int ldq, double* work );
7841
7842 lapack_int LAPACKE_sopmtr_work( int matrix_layout, char side, char uplo,
7843                                 char trans, lapack_int m, lapack_int n,
7844                                 const float* ap, const float* tau, float* c,
7845                                 lapack_int ldc, float* work );
7846 lapack_int LAPACKE_dopmtr_work( int matrix_layout, char side, char uplo,
7847                                 char trans, lapack_int m, lapack_int n,
7848                                 const double* ap, const double* tau, double* c,
7849                                 lapack_int ldc, double* work );
7850
7851 lapack_int LAPACKE_sorgbr_work( int matrix_layout, char vect, lapack_int m,
7852                                 lapack_int n, lapack_int k, float* a,
7853                                 lapack_int lda, const float* tau, float* work,
7854                                 lapack_int lwork );
7855 lapack_int LAPACKE_dorgbr_work( int matrix_layout, char vect, lapack_int m,
7856                                 lapack_int n, lapack_int k, double* a,
7857                                 lapack_int lda, const double* tau, double* work,
7858                                 lapack_int lwork );
7859
7860 lapack_int LAPACKE_sorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
7861                                 lapack_int ihi, float* a, lapack_int lda,
7862                                 const float* tau, float* work,
7863                                 lapack_int lwork );
7864 lapack_int LAPACKE_dorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
7865                                 lapack_int ihi, double* a, lapack_int lda,
7866                                 const double* tau, double* work,
7867                                 lapack_int lwork );
7868
7869 lapack_int LAPACKE_sorglq_work( int matrix_layout, lapack_int m, lapack_int n,
7870                                 lapack_int k, float* a, lapack_int lda,
7871                                 const float* tau, float* work,
7872                                 lapack_int lwork );
7873 lapack_int LAPACKE_dorglq_work( int matrix_layout, lapack_int m, lapack_int n,
7874                                 lapack_int k, double* a, lapack_int lda,
7875                                 const double* tau, double* work,
7876                                 lapack_int lwork );
7877
7878 lapack_int LAPACKE_sorgql_work( int matrix_layout, lapack_int m, lapack_int n,
7879                                 lapack_int k, float* a, lapack_int lda,
7880                                 const float* tau, float* work,
7881                                 lapack_int lwork );
7882 lapack_int LAPACKE_dorgql_work( int matrix_layout, lapack_int m, lapack_int n,
7883                                 lapack_int k, double* a, lapack_int lda,
7884                                 const double* tau, double* work,
7885                                 lapack_int lwork );
7886
7887 lapack_int LAPACKE_sorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
7888                                 lapack_int k, float* a, lapack_int lda,
7889                                 const float* tau, float* work,
7890                                 lapack_int lwork );
7891 lapack_int LAPACKE_dorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
7892                                 lapack_int k, double* a, lapack_int lda,
7893                                 const double* tau, double* work,
7894                                 lapack_int lwork );
7895
7896 lapack_int LAPACKE_sorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
7897                                 lapack_int k, float* a, lapack_int lda,
7898                                 const float* tau, float* work,
7899                                 lapack_int lwork );
7900 lapack_int LAPACKE_dorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
7901                                 lapack_int k, double* a, lapack_int lda,
7902                                 const double* tau, double* work,
7903                                 lapack_int lwork );
7904
7905 lapack_int LAPACKE_sorgtr_work( int matrix_layout, char uplo, lapack_int n,
7906                                 float* a, lapack_int lda, const float* tau,
7907                                 float* work, lapack_int lwork );
7908 lapack_int LAPACKE_dorgtr_work( int matrix_layout, char uplo, lapack_int n,
7909                                 double* a, lapack_int lda, const double* tau,
7910                                 double* work, lapack_int lwork );
7911
7912 lapack_int LAPACKE_sormbr_work( int matrix_layout, char vect, char side,
7913                                 char trans, lapack_int m, lapack_int n,
7914                                 lapack_int k, const float* a, lapack_int lda,
7915                                 const float* tau, float* c, lapack_int ldc,
7916                                 float* work, lapack_int lwork );
7917 lapack_int LAPACKE_dormbr_work( int matrix_layout, char vect, char side,
7918                                 char trans, lapack_int m, lapack_int n,
7919                                 lapack_int k, const double* a, lapack_int lda,
7920                                 const double* tau, double* c, lapack_int ldc,
7921                                 double* work, lapack_int lwork );
7922
7923 lapack_int LAPACKE_sormhr_work( int matrix_layout, char side, char trans,
7924                                 lapack_int m, lapack_int n, lapack_int ilo,
7925                                 lapack_int ihi, const float* a, lapack_int lda,
7926                                 const float* tau, float* c, lapack_int ldc,
7927                                 float* work, lapack_int lwork );
7928 lapack_int LAPACKE_dormhr_work( int matrix_layout, char side, char trans,
7929                                 lapack_int m, lapack_int n, lapack_int ilo,
7930                                 lapack_int ihi, const double* a, lapack_int lda,
7931                                 const double* tau, double* c, lapack_int ldc,
7932                                 double* work, lapack_int lwork );
7933
7934 lapack_int LAPACKE_sormlq_work( int matrix_layout, char side, char trans,
7935                                 lapack_int m, lapack_int n, lapack_int k,
7936                                 const float* a, lapack_int lda,
7937                                 const float* tau, float* c, lapack_int ldc,
7938                                 float* work, lapack_int lwork );
7939 lapack_int LAPACKE_dormlq_work( int matrix_layout, char side, char trans,
7940                                 lapack_int m, lapack_int n, lapack_int k,
7941                                 const double* a, lapack_int lda,
7942                                 const double* tau, double* c, lapack_int ldc,
7943                                 double* work, lapack_int lwork );
7944
7945 lapack_int LAPACKE_sormql_work( int matrix_layout, char side, char trans,
7946                                 lapack_int m, lapack_int n, lapack_int k,
7947                                 const float* a, lapack_int lda,
7948                                 const float* tau, float* c, lapack_int ldc,
7949                                 float* work, lapack_int lwork );
7950 lapack_int LAPACKE_dormql_work( int matrix_layout, char side, char trans,
7951                                 lapack_int m, lapack_int n, lapack_int k,
7952                                 const double* a, lapack_int lda,
7953                                 const double* tau, double* c, lapack_int ldc,
7954                                 double* work, lapack_int lwork );
7955
7956 lapack_int LAPACKE_sormqr_work( int matrix_layout, char side, char trans,
7957                                 lapack_int m, lapack_int n, lapack_int k,
7958                                 const float* a, lapack_int lda,
7959                                 const float* tau, float* c, lapack_int ldc,
7960                                 float* work, lapack_int lwork );
7961 lapack_int LAPACKE_dormqr_work( int matrix_layout, char side, char trans,
7962                                 lapack_int m, lapack_int n, lapack_int k,
7963                                 const double* a, lapack_int lda,
7964                                 const double* tau, double* c, lapack_int ldc,
7965                                 double* work, lapack_int lwork );
7966
7967 lapack_int LAPACKE_sormrq_work( int matrix_layout, char side, char trans,
7968                                 lapack_int m, lapack_int n, lapack_int k,
7969                                 const float* a, lapack_int lda,
7970                                 const float* tau, float* c, lapack_int ldc,
7971                                 float* work, lapack_int lwork );
7972 lapack_int LAPACKE_dormrq_work( int matrix_layout, char side, char trans,
7973                                 lapack_int m, lapack_int n, lapack_int k,
7974                                 const double* a, lapack_int lda,
7975                                 const double* tau, double* c, lapack_int ldc,
7976                                 double* work, lapack_int lwork );
7977
7978 lapack_int LAPACKE_sormrz_work( int matrix_layout, char side, char trans,
7979                                 lapack_int m, lapack_int n, lapack_int k,
7980                                 lapack_int l, const float* a, lapack_int lda,
7981                                 const float* tau, float* c, lapack_int ldc,
7982                                 float* work, lapack_int lwork );
7983 lapack_int LAPACKE_dormrz_work( int matrix_layout, char side, char trans,
7984                                 lapack_int m, lapack_int n, lapack_int k,
7985                                 lapack_int l, const double* a, lapack_int lda,
7986                                 const double* tau, double* c, lapack_int ldc,
7987                                 double* work, lapack_int lwork );
7988
7989 lapack_int LAPACKE_sormtr_work( int matrix_layout, char side, char uplo,
7990                                 char trans, lapack_int m, lapack_int n,
7991                                 const float* a, lapack_int lda,
7992                                 const float* tau, float* c, lapack_int ldc,
7993                                 float* work, lapack_int lwork );
7994 lapack_int LAPACKE_dormtr_work( int matrix_layout, char side, char uplo,
7995                                 char trans, lapack_int m, lapack_int n,
7996                                 const double* a, lapack_int lda,
7997                                 const double* tau, double* c, lapack_int ldc,
7998                                 double* work, lapack_int lwork );
7999
8000 lapack_int LAPACKE_spbcon_work( int matrix_layout, char uplo, lapack_int n,
8001                                 lapack_int kd, const float* ab, lapack_int ldab,
8002                                 float anorm, float* rcond, float* work,
8003                                 lapack_int* iwork );
8004 lapack_int LAPACKE_dpbcon_work( int matrix_layout, char uplo, lapack_int n,
8005                                 lapack_int kd, const double* ab,
8006                                 lapack_int ldab, double anorm, double* rcond,
8007                                 double* work, lapack_int* iwork );
8008 lapack_int LAPACKE_cpbcon_work( int matrix_layout, char uplo, lapack_int n,
8009                                 lapack_int kd, const lapack_complex_float* ab,
8010                                 lapack_int ldab, float anorm, float* rcond,
8011                                 lapack_complex_float* work, float* rwork );
8012 lapack_int LAPACKE_zpbcon_work( int matrix_layout, char uplo, lapack_int n,
8013                                 lapack_int kd, const lapack_complex_double* ab,
8014                                 lapack_int ldab, double anorm, double* rcond,
8015                                 lapack_complex_double* work, double* rwork );
8016
8017 lapack_int LAPACKE_spbequ_work( int matrix_layout, char uplo, lapack_int n,
8018                                 lapack_int kd, const float* ab, lapack_int ldab,
8019                                 float* s, float* scond, float* amax );
8020 lapack_int LAPACKE_dpbequ_work( int matrix_layout, char uplo, lapack_int n,
8021                                 lapack_int kd, const double* ab,
8022                                 lapack_int ldab, double* s, double* scond,
8023                                 double* amax );
8024 lapack_int LAPACKE_cpbequ_work( int matrix_layout, char uplo, lapack_int n,
8025                                 lapack_int kd, const lapack_complex_float* ab,
8026                                 lapack_int ldab, float* s, float* scond,
8027                                 float* amax );
8028 lapack_int LAPACKE_zpbequ_work( int matrix_layout, char uplo, lapack_int n,
8029                                 lapack_int kd, const lapack_complex_double* ab,
8030                                 lapack_int ldab, double* s, double* scond,
8031                                 double* amax );
8032
8033 lapack_int LAPACKE_spbrfs_work( int matrix_layout, char uplo, lapack_int n,
8034                                 lapack_int kd, lapack_int nrhs, const float* ab,
8035                                 lapack_int ldab, const float* afb,
8036                                 lapack_int ldafb, const float* b,
8037                                 lapack_int ldb, float* x, lapack_int ldx,
8038                                 float* ferr, float* berr, float* work,
8039                                 lapack_int* iwork );
8040 lapack_int LAPACKE_dpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8041                                 lapack_int kd, lapack_int nrhs,
8042                                 const double* ab, lapack_int ldab,
8043                                 const double* afb, lapack_int ldafb,
8044                                 const double* b, lapack_int ldb, double* x,
8045                                 lapack_int ldx, double* ferr, double* berr,
8046                                 double* work, lapack_int* iwork );
8047 lapack_int LAPACKE_cpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8048                                 lapack_int kd, lapack_int nrhs,
8049                                 const lapack_complex_float* ab, lapack_int ldab,
8050                                 const lapack_complex_float* afb,
8051                                 lapack_int ldafb, const lapack_complex_float* b,
8052                                 lapack_int ldb, lapack_complex_float* x,
8053                                 lapack_int ldx, float* ferr, float* berr,
8054                                 lapack_complex_float* work, float* rwork );
8055 lapack_int LAPACKE_zpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8056                                 lapack_int kd, lapack_int nrhs,
8057                                 const lapack_complex_double* ab,
8058                                 lapack_int ldab,
8059                                 const lapack_complex_double* afb,
8060                                 lapack_int ldafb,
8061                                 const lapack_complex_double* b, lapack_int ldb,
8062                                 lapack_complex_double* x, lapack_int ldx,
8063                                 double* ferr, double* berr,
8064                                 lapack_complex_double* work, double* rwork );
8065
8066 lapack_int LAPACKE_spbstf_work( int matrix_layout, char uplo, lapack_int n,
8067                                 lapack_int kb, float* bb, lapack_int ldbb );
8068 lapack_int LAPACKE_dpbstf_work( int matrix_layout, char uplo, lapack_int n,
8069                                 lapack_int kb, double* bb, lapack_int ldbb );
8070 lapack_int LAPACKE_cpbstf_work( int matrix_layout, char uplo, lapack_int n,
8071                                 lapack_int kb, lapack_complex_float* bb,
8072                                 lapack_int ldbb );
8073 lapack_int LAPACKE_zpbstf_work( int matrix_layout, char uplo, lapack_int n,
8074                                 lapack_int kb, lapack_complex_double* bb,
8075                                 lapack_int ldbb );
8076
8077 lapack_int LAPACKE_spbsv_work( int matrix_layout, char uplo, lapack_int n,
8078                                lapack_int kd, lapack_int nrhs, float* ab,
8079                                lapack_int ldab, float* b, lapack_int ldb );
8080 lapack_int LAPACKE_dpbsv_work( int matrix_layout, char uplo, lapack_int n,
8081                                lapack_int kd, lapack_int nrhs, double* ab,
8082                                lapack_int ldab, double* b, lapack_int ldb );
8083 lapack_int LAPACKE_cpbsv_work( int matrix_layout, char uplo, lapack_int n,
8084                                lapack_int kd, lapack_int nrhs,
8085                                lapack_complex_float* ab, lapack_int ldab,
8086                                lapack_complex_float* b, lapack_int ldb );
8087 lapack_int LAPACKE_zpbsv_work( int matrix_layout, char uplo, lapack_int n,
8088                                lapack_int kd, lapack_int nrhs,
8089                                lapack_complex_double* ab, lapack_int ldab,
8090                                lapack_complex_double* b, lapack_int ldb );
8091
8092 lapack_int LAPACKE_spbsvx_work( int matrix_layout, char fact, char uplo,
8093                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8094                                 float* ab, lapack_int ldab, float* afb,
8095                                 lapack_int ldafb, char* equed, float* s,
8096                                 float* b, lapack_int ldb, float* x,
8097                                 lapack_int ldx, float* rcond, float* ferr,
8098                                 float* berr, float* work, lapack_int* iwork );
8099 lapack_int LAPACKE_dpbsvx_work( int matrix_layout, char fact, char uplo,
8100                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8101                                 double* ab, lapack_int ldab, double* afb,
8102                                 lapack_int ldafb, char* equed, double* s,
8103                                 double* b, lapack_int ldb, double* x,
8104                                 lapack_int ldx, double* rcond, double* ferr,
8105                                 double* berr, double* work, lapack_int* iwork );
8106 lapack_int LAPACKE_cpbsvx_work( int matrix_layout, char fact, char uplo,
8107                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8108                                 lapack_complex_float* ab, lapack_int ldab,
8109                                 lapack_complex_float* afb, lapack_int ldafb,
8110                                 char* equed, float* s, lapack_complex_float* b,
8111                                 lapack_int ldb, lapack_complex_float* x,
8112                                 lapack_int ldx, float* rcond, float* ferr,
8113                                 float* berr, lapack_complex_float* work,
8114                                 float* rwork );
8115 lapack_int LAPACKE_zpbsvx_work( int matrix_layout, char fact, char uplo,
8116                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8117                                 lapack_complex_double* ab, lapack_int ldab,
8118                                 lapack_complex_double* afb, lapack_int ldafb,
8119                                 char* equed, double* s,
8120                                 lapack_complex_double* b, lapack_int ldb,
8121                                 lapack_complex_double* x, lapack_int ldx,
8122                                 double* rcond, double* ferr, double* berr,
8123                                 lapack_complex_double* work, double* rwork );
8124
8125 lapack_int LAPACKE_spbtrf_work( int matrix_layout, char uplo, lapack_int n,
8126                                 lapack_int kd, float* ab, lapack_int ldab );
8127 lapack_int LAPACKE_dpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8128                                 lapack_int kd, double* ab, lapack_int ldab );
8129 lapack_int LAPACKE_cpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8130                                 lapack_int kd, lapack_complex_float* ab,
8131                                 lapack_int ldab );
8132 lapack_int LAPACKE_zpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8133                                 lapack_int kd, lapack_complex_double* ab,
8134                                 lapack_int ldab );
8135
8136 lapack_int LAPACKE_spbtrs_work( int matrix_layout, char uplo, lapack_int n,
8137                                 lapack_int kd, lapack_int nrhs, const float* ab,
8138                                 lapack_int ldab, float* b, lapack_int ldb );
8139 lapack_int LAPACKE_dpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8140                                 lapack_int kd, lapack_int nrhs,
8141                                 const double* ab, lapack_int ldab, double* b,
8142                                 lapack_int ldb );
8143 lapack_int LAPACKE_cpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8144                                 lapack_int kd, lapack_int nrhs,
8145                                 const lapack_complex_float* ab, lapack_int ldab,
8146                                 lapack_complex_float* b, lapack_int ldb );
8147 lapack_int LAPACKE_zpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8148                                 lapack_int kd, lapack_int nrhs,
8149                                 const lapack_complex_double* ab,
8150                                 lapack_int ldab, lapack_complex_double* b,
8151                                 lapack_int ldb );
8152
8153 lapack_int LAPACKE_spftrf_work( int matrix_layout, char transr, char uplo,
8154                                 lapack_int n, float* a );
8155 lapack_int LAPACKE_dpftrf_work( int matrix_layout, char transr, char uplo,
8156                                 lapack_int n, double* a );
8157 lapack_int LAPACKE_cpftrf_work( int matrix_layout, char transr, char uplo,
8158                                 lapack_int n, lapack_complex_float* a );
8159 lapack_int LAPACKE_zpftrf_work( int matrix_layout, char transr, char uplo,
8160                                 lapack_int n, lapack_complex_double* a );
8161
8162 lapack_int LAPACKE_spftri_work( int matrix_layout, char transr, char uplo,
8163                                 lapack_int n, float* a );
8164 lapack_int LAPACKE_dpftri_work( int matrix_layout, char transr, char uplo,
8165                                 lapack_int n, double* a );
8166 lapack_int LAPACKE_cpftri_work( int matrix_layout, char transr, char uplo,
8167                                 lapack_int n, lapack_complex_float* a );
8168 lapack_int LAPACKE_zpftri_work( int matrix_layout, char transr, char uplo,
8169                                 lapack_int n, lapack_complex_double* a );
8170
8171 lapack_int LAPACKE_spftrs_work( int matrix_layout, char transr, char uplo,
8172                                 lapack_int n, lapack_int nrhs, const float* a,
8173                                 float* b, lapack_int ldb );
8174 lapack_int LAPACKE_dpftrs_work( int matrix_layout, char transr, char uplo,
8175                                 lapack_int n, lapack_int nrhs, const double* a,
8176                                 double* b, lapack_int ldb );
8177 lapack_int LAPACKE_cpftrs_work( int matrix_layout, char transr, char uplo,
8178                                 lapack_int n, lapack_int nrhs,
8179                                 const lapack_complex_float* a,
8180                                 lapack_complex_float* b, lapack_int ldb );
8181 lapack_int LAPACKE_zpftrs_work( int matrix_layout, char transr, char uplo,
8182                                 lapack_int n, lapack_int nrhs,
8183                                 const lapack_complex_double* a,
8184                                 lapack_complex_double* b, lapack_int ldb );
8185
8186 lapack_int LAPACKE_spocon_work( int matrix_layout, char uplo, lapack_int n,
8187                                 const float* a, lapack_int lda, float anorm,
8188                                 float* rcond, float* work, lapack_int* iwork );
8189 lapack_int LAPACKE_dpocon_work( int matrix_layout, char uplo, lapack_int n,
8190                                 const double* a, lapack_int lda, double anorm,
8191                                 double* rcond, double* work,
8192                                 lapack_int* iwork );
8193 lapack_int LAPACKE_cpocon_work( int matrix_layout, char uplo, lapack_int n,
8194                                 const lapack_complex_float* a, lapack_int lda,
8195                                 float anorm, float* rcond,
8196                                 lapack_complex_float* work, float* rwork );
8197 lapack_int LAPACKE_zpocon_work( int matrix_layout, char uplo, lapack_int n,
8198                                 const lapack_complex_double* a, lapack_int lda,
8199                                 double anorm, double* rcond,
8200                                 lapack_complex_double* work, double* rwork );
8201
8202 lapack_int LAPACKE_spoequ_work( int matrix_layout, lapack_int n, const float* a,
8203                                 lapack_int lda, float* s, float* scond,
8204                                 float* amax );
8205 lapack_int LAPACKE_dpoequ_work( int matrix_layout, lapack_int n, const double* a,
8206                                 lapack_int lda, double* s, double* scond,
8207                                 double* amax );
8208 lapack_int LAPACKE_cpoequ_work( int matrix_layout, lapack_int n,
8209                                 const lapack_complex_float* a, lapack_int lda,
8210                                 float* s, float* scond, float* amax );
8211 lapack_int LAPACKE_zpoequ_work( int matrix_layout, lapack_int n,
8212                                 const lapack_complex_double* a, lapack_int lda,
8213                                 double* s, double* scond, double* amax );
8214
8215 lapack_int LAPACKE_spoequb_work( int matrix_layout, lapack_int n, const float* a,
8216                                  lapack_int lda, float* s, float* scond,
8217                                  float* amax );
8218 lapack_int LAPACKE_dpoequb_work( int matrix_layout, lapack_int n,
8219                                  const double* a, lapack_int lda, double* s,
8220                                  double* scond, double* amax );
8221 lapack_int LAPACKE_cpoequb_work( int matrix_layout, lapack_int n,
8222                                  const lapack_complex_float* a, lapack_int lda,
8223                                  float* s, float* scond, float* amax );
8224 lapack_int LAPACKE_zpoequb_work( int matrix_layout, lapack_int n,
8225                                  const lapack_complex_double* a, lapack_int lda,
8226                                  double* s, double* scond, double* amax );
8227
8228 lapack_int LAPACKE_sporfs_work( int matrix_layout, char uplo, lapack_int n,
8229                                 lapack_int nrhs, const float* a, lapack_int lda,
8230                                 const float* af, lapack_int ldaf,
8231                                 const float* b, lapack_int ldb, float* x,
8232                                 lapack_int ldx, float* ferr, float* berr,
8233                                 float* work, lapack_int* iwork );
8234 lapack_int LAPACKE_dporfs_work( int matrix_layout, char uplo, lapack_int n,
8235                                 lapack_int nrhs, const double* a,
8236                                 lapack_int lda, const double* af,
8237                                 lapack_int ldaf, const double* b,
8238                                 lapack_int ldb, double* x, lapack_int ldx,
8239                                 double* ferr, double* berr, double* work,
8240                                 lapack_int* iwork );
8241 lapack_int LAPACKE_cporfs_work( int matrix_layout, char uplo, lapack_int n,
8242                                 lapack_int nrhs, const lapack_complex_float* a,
8243                                 lapack_int lda, const lapack_complex_float* af,
8244                                 lapack_int ldaf, const lapack_complex_float* b,
8245                                 lapack_int ldb, lapack_complex_float* x,
8246                                 lapack_int ldx, float* ferr, float* berr,
8247                                 lapack_complex_float* work, float* rwork );
8248 lapack_int LAPACKE_zporfs_work( int matrix_layout, char uplo, lapack_int n,
8249                                 lapack_int nrhs, const lapack_complex_double* a,
8250                                 lapack_int lda, const lapack_complex_double* af,
8251                                 lapack_int ldaf, const lapack_complex_double* b,
8252                                 lapack_int ldb, lapack_complex_double* x,
8253                                 lapack_int ldx, double* ferr, double* berr,
8254                                 lapack_complex_double* work, double* rwork );
8255
8256 lapack_int LAPACKE_sporfsx_work( int matrix_layout, char uplo, char equed,
8257                                  lapack_int n, lapack_int nrhs, const float* a,
8258                                  lapack_int lda, const float* af,
8259                                  lapack_int ldaf, const float* s,
8260                                  const float* b, lapack_int ldb, float* x,
8261                                  lapack_int ldx, float* rcond, float* berr,
8262                                  lapack_int n_err_bnds, float* err_bnds_norm,
8263                                  float* err_bnds_comp, lapack_int nparams,
8264                                  float* params, float* work,
8265                                  lapack_int* iwork );
8266 lapack_int LAPACKE_dporfsx_work( int matrix_layout, char uplo, char equed,
8267                                  lapack_int n, lapack_int nrhs, const double* a,
8268                                  lapack_int lda, const double* af,
8269                                  lapack_int ldaf, const double* s,
8270                                  const double* b, lapack_int ldb, double* x,
8271                                  lapack_int ldx, double* rcond, double* berr,
8272                                  lapack_int n_err_bnds, double* err_bnds_norm,
8273                                  double* err_bnds_comp, lapack_int nparams,
8274                                  double* params, double* work,
8275                                  lapack_int* iwork );
8276 lapack_int LAPACKE_cporfsx_work( int matrix_layout, char uplo, char equed,
8277                                  lapack_int n, lapack_int nrhs,
8278                                  const lapack_complex_float* a, lapack_int lda,
8279                                  const lapack_complex_float* af,
8280                                  lapack_int ldaf, const float* s,
8281                                  const lapack_complex_float* b, lapack_int ldb,
8282                                  lapack_complex_float* x, lapack_int ldx,
8283                                  float* rcond, float* berr,
8284                                  lapack_int n_err_bnds, float* err_bnds_norm,
8285                                  float* err_bnds_comp, lapack_int nparams,
8286                                  float* params, lapack_complex_float* work,
8287                                  float* rwork );
8288 lapack_int LAPACKE_zporfsx_work( int matrix_layout, char uplo, char equed,
8289                                  lapack_int n, lapack_int nrhs,
8290                                  const lapack_complex_double* a, lapack_int lda,
8291                                  const lapack_complex_double* af,
8292                                  lapack_int ldaf, const double* s,
8293                                  const lapack_complex_double* b, lapack_int ldb,
8294                                  lapack_complex_double* x, lapack_int ldx,
8295                                  double* rcond, double* berr,
8296                                  lapack_int n_err_bnds, double* err_bnds_norm,
8297                                  double* err_bnds_comp, lapack_int nparams,
8298                                  double* params, lapack_complex_double* work,
8299                                  double* rwork );
8300
8301 lapack_int LAPACKE_sposv_work( int matrix_layout, char uplo, lapack_int n,
8302                                lapack_int nrhs, float* a, lapack_int lda,
8303                                float* b, lapack_int ldb );
8304 lapack_int LAPACKE_dposv_work( int matrix_layout, char uplo, lapack_int n,
8305                                lapack_int nrhs, double* a, lapack_int lda,
8306                                double* b, lapack_int ldb );
8307 lapack_int LAPACKE_cposv_work( int matrix_layout, char uplo, lapack_int n,
8308                                lapack_int nrhs, lapack_complex_float* a,
8309                                lapack_int lda, lapack_complex_float* b,
8310                                lapack_int ldb );
8311 lapack_int LAPACKE_zposv_work( int matrix_layout, char uplo, lapack_int n,
8312                                lapack_int nrhs, lapack_complex_double* a,
8313                                lapack_int lda, lapack_complex_double* b,
8314                                lapack_int ldb );
8315 lapack_int LAPACKE_dsposv_work( int matrix_layout, char uplo, lapack_int n,
8316                                 lapack_int nrhs, double* a, lapack_int lda,
8317                                 double* b, lapack_int ldb, double* x,
8318                                 lapack_int ldx, double* work, float* swork,
8319                                 lapack_int* iter );
8320 lapack_int LAPACKE_zcposv_work( int matrix_layout, char uplo, lapack_int n,
8321                                 lapack_int nrhs, lapack_complex_double* a,
8322                                 lapack_int lda, lapack_complex_double* b,
8323                                 lapack_int ldb, lapack_complex_double* x,
8324                                 lapack_int ldx, lapack_complex_double* work,
8325                                 lapack_complex_float* swork, double* rwork,
8326                                 lapack_int* iter );
8327
8328 lapack_int LAPACKE_sposvx_work( int matrix_layout, char fact, char uplo,
8329                                 lapack_int n, lapack_int nrhs, float* a,
8330                                 lapack_int lda, float* af, lapack_int ldaf,
8331                                 char* equed, float* s, float* b, lapack_int ldb,
8332                                 float* x, lapack_int ldx, float* rcond,
8333                                 float* ferr, float* berr, float* work,
8334                                 lapack_int* iwork );
8335 lapack_int LAPACKE_dposvx_work( int matrix_layout, char fact, char uplo,
8336                                 lapack_int n, lapack_int nrhs, double* a,
8337                                 lapack_int lda, double* af, lapack_int ldaf,
8338                                 char* equed, double* s, double* b,
8339                                 lapack_int ldb, double* x, lapack_int ldx,
8340                                 double* rcond, double* ferr, double* berr,
8341                                 double* work, lapack_int* iwork );
8342 lapack_int LAPACKE_cposvx_work( int matrix_layout, char fact, char uplo,
8343                                 lapack_int n, lapack_int nrhs,
8344                                 lapack_complex_float* a, lapack_int lda,
8345                                 lapack_complex_float* af, lapack_int ldaf,
8346                                 char* equed, float* s, lapack_complex_float* b,
8347                                 lapack_int ldb, lapack_complex_float* x,
8348                                 lapack_int ldx, float* rcond, float* ferr,
8349                                 float* berr, lapack_complex_float* work,
8350                                 float* rwork );
8351 lapack_int LAPACKE_zposvx_work( int matrix_layout, char fact, char uplo,
8352                                 lapack_int n, lapack_int nrhs,
8353                                 lapack_complex_double* a, lapack_int lda,
8354                                 lapack_complex_double* af, lapack_int ldaf,
8355                                 char* equed, double* s,
8356                                 lapack_complex_double* b, lapack_int ldb,
8357                                 lapack_complex_double* x, lapack_int ldx,
8358                                 double* rcond, double* ferr, double* berr,
8359                                 lapack_complex_double* work, double* rwork );
8360
8361 lapack_int LAPACKE_sposvxx_work( int matrix_layout, char fact, char uplo,
8362                                  lapack_int n, lapack_int nrhs, float* a,
8363                                  lapack_int lda, float* af, lapack_int ldaf,
8364                                  char* equed, float* s, float* b,
8365                                  lapack_int ldb, float* x, lapack_int ldx,
8366                                  float* rcond, float* rpvgrw, float* berr,
8367                                  lapack_int n_err_bnds, float* err_bnds_norm,
8368                                  float* err_bnds_comp, lapack_int nparams,
8369                                  float* params, float* work,
8370                                  lapack_int* iwork );
8371 lapack_int LAPACKE_dposvxx_work( int matrix_layout, char fact, char uplo,
8372                                  lapack_int n, lapack_int nrhs, double* a,
8373                                  lapack_int lda, double* af, lapack_int ldaf,
8374                                  char* equed, double* s, double* b,
8375                                  lapack_int ldb, double* x, lapack_int ldx,
8376                                  double* rcond, double* rpvgrw, double* berr,
8377                                  lapack_int n_err_bnds, double* err_bnds_norm,
8378                                  double* err_bnds_comp, lapack_int nparams,
8379                                  double* params, double* work,
8380                                  lapack_int* iwork );
8381 lapack_int LAPACKE_cposvxx_work( int matrix_layout, char fact, char uplo,
8382                                  lapack_int n, lapack_int nrhs,
8383                                  lapack_complex_float* a, lapack_int lda,
8384                                  lapack_complex_float* af, lapack_int ldaf,
8385                                  char* equed, float* s, lapack_complex_float* b,
8386                                  lapack_int ldb, lapack_complex_float* x,
8387                                  lapack_int ldx, float* rcond, float* rpvgrw,
8388                                  float* berr, lapack_int n_err_bnds,
8389                                  float* err_bnds_norm, float* err_bnds_comp,
8390                                  lapack_int nparams, float* params,
8391                                  lapack_complex_float* work, float* rwork );
8392 lapack_int LAPACKE_zposvxx_work( int matrix_layout, char fact, char uplo,
8393                                  lapack_int n, lapack_int nrhs,
8394                                  lapack_complex_double* a, lapack_int lda,
8395                                  lapack_complex_double* af, lapack_int ldaf,
8396                                  char* equed, double* s,
8397                                  lapack_complex_double* b, lapack_int ldb,
8398                                  lapack_complex_double* x, lapack_int ldx,
8399                                  double* rcond, double* rpvgrw, double* berr,
8400                                  lapack_int n_err_bnds, double* err_bnds_norm,
8401                                  double* err_bnds_comp, lapack_int nparams,
8402                                  double* params, lapack_complex_double* work,
8403                                  double* rwork );
8404
8405 lapack_int LAPACKE_spotrf2_work( int matrix_layout, char uplo, lapack_int n,
8406                                 float* a, lapack_int lda );
8407 lapack_int LAPACKE_dpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8408                                 double* a, lapack_int lda );
8409 lapack_int LAPACKE_cpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8410                                 lapack_complex_float* a, lapack_int lda );
8411 lapack_int LAPACKE_zpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8412                                 lapack_complex_double* a, lapack_int lda );
8413
8414 lapack_int LAPACKE_spotrf_work( int matrix_layout, char uplo, lapack_int n,
8415                                 float* a, lapack_int lda );
8416 lapack_int LAPACKE_dpotrf_work( int matrix_layout, char uplo, lapack_int n,
8417                                 double* a, lapack_int lda );
8418 lapack_int LAPACKE_cpotrf_work( int matrix_layout, char uplo, lapack_int n,
8419                                 lapack_complex_float* a, lapack_int lda );
8420 lapack_int LAPACKE_zpotrf_work( int matrix_layout, char uplo, lapack_int n,
8421                                 lapack_complex_double* a, lapack_int lda );
8422
8423 lapack_int LAPACKE_spotri_work( int matrix_layout, char uplo, lapack_int n,
8424                                 float* a, lapack_int lda );
8425 lapack_int LAPACKE_dpotri_work( int matrix_layout, char uplo, lapack_int n,
8426                                 double* a, lapack_int lda );
8427 lapack_int LAPACKE_cpotri_work( int matrix_layout, char uplo, lapack_int n,
8428                                 lapack_complex_float* a, lapack_int lda );
8429 lapack_int LAPACKE_zpotri_work( int matrix_layout, char uplo, lapack_int n,
8430                                 lapack_complex_double* a, lapack_int lda );
8431
8432 lapack_int LAPACKE_spotrs_work( int matrix_layout, char uplo, lapack_int n,
8433                                 lapack_int nrhs, const float* a, lapack_int lda,
8434                                 float* b, lapack_int ldb );
8435 lapack_int LAPACKE_dpotrs_work( int matrix_layout, char uplo, lapack_int n,
8436                                 lapack_int nrhs, const double* a,
8437                                 lapack_int lda, double* b, lapack_int ldb );
8438 lapack_int LAPACKE_cpotrs_work( int matrix_layout, char uplo, lapack_int n,
8439                                 lapack_int nrhs, const lapack_complex_float* a,
8440                                 lapack_int lda, lapack_complex_float* b,
8441                                 lapack_int ldb );
8442 lapack_int LAPACKE_zpotrs_work( int matrix_layout, char uplo, lapack_int n,
8443                                 lapack_int nrhs, const lapack_complex_double* a,
8444                                 lapack_int lda, lapack_complex_double* b,
8445                                 lapack_int ldb );
8446
8447 lapack_int LAPACKE_sppcon_work( int matrix_layout, char uplo, lapack_int n,
8448                                 const float* ap, float anorm, float* rcond,
8449                                 float* work, lapack_int* iwork );
8450 lapack_int LAPACKE_dppcon_work( int matrix_layout, char uplo, lapack_int n,
8451                                 const double* ap, double anorm, double* rcond,
8452                                 double* work, lapack_int* iwork );
8453 lapack_int LAPACKE_cppcon_work( int matrix_layout, char uplo, lapack_int n,
8454                                 const lapack_complex_float* ap, float anorm,
8455                                 float* rcond, lapack_complex_float* work,
8456                                 float* rwork );
8457 lapack_int LAPACKE_zppcon_work( int matrix_layout, char uplo, lapack_int n,
8458                                 const lapack_complex_double* ap, double anorm,
8459                                 double* rcond, lapack_complex_double* work,
8460                                 double* rwork );
8461
8462 lapack_int LAPACKE_sppequ_work( int matrix_layout, char uplo, lapack_int n,
8463                                 const float* ap, float* s, float* scond,
8464                                 float* amax );
8465 lapack_int LAPACKE_dppequ_work( int matrix_layout, char uplo, lapack_int n,
8466                                 const double* ap, double* s, double* scond,
8467                                 double* amax );
8468 lapack_int LAPACKE_cppequ_work( int matrix_layout, char uplo, lapack_int n,
8469                                 const lapack_complex_float* ap, float* s,
8470                                 float* scond, float* amax );
8471 lapack_int LAPACKE_zppequ_work( int matrix_layout, char uplo, lapack_int n,
8472                                 const lapack_complex_double* ap, double* s,
8473                                 double* scond, double* amax );
8474
8475 lapack_int LAPACKE_spprfs_work( int matrix_layout, char uplo, lapack_int n,
8476                                 lapack_int nrhs, const float* ap,
8477                                 const float* afp, const float* b,
8478                                 lapack_int ldb, float* x, lapack_int ldx,
8479                                 float* ferr, float* berr, float* work,
8480                                 lapack_int* iwork );
8481 lapack_int LAPACKE_dpprfs_work( int matrix_layout, char uplo, lapack_int n,
8482                                 lapack_int nrhs, const double* ap,
8483                                 const double* afp, const double* b,
8484                                 lapack_int ldb, double* x, lapack_int ldx,
8485                                 double* ferr, double* berr, double* work,
8486                                 lapack_int* iwork );
8487 lapack_int LAPACKE_cpprfs_work( int matrix_layout, char uplo, lapack_int n,
8488                                 lapack_int nrhs, const lapack_complex_float* ap,
8489                                 const lapack_complex_float* afp,
8490                                 const lapack_complex_float* b, lapack_int ldb,
8491                                 lapack_complex_float* x, lapack_int ldx,
8492                                 float* ferr, float* berr,
8493                                 lapack_complex_float* work, float* rwork );
8494 lapack_int LAPACKE_zpprfs_work( int matrix_layout, char uplo, lapack_int n,
8495                                 lapack_int nrhs,
8496                                 const lapack_complex_double* ap,
8497                                 const lapack_complex_double* afp,
8498                                 const lapack_complex_double* b, lapack_int ldb,
8499                                 lapack_complex_double* x, lapack_int ldx,
8500                                 double* ferr, double* berr,
8501                                 lapack_complex_double* work, double* rwork );
8502
8503 lapack_int LAPACKE_sppsv_work( int matrix_layout, char uplo, lapack_int n,
8504                                lapack_int nrhs, float* ap, float* b,
8505                                lapack_int ldb );
8506 lapack_int LAPACKE_dppsv_work( int matrix_layout, char uplo, lapack_int n,
8507                                lapack_int nrhs, double* ap, double* b,
8508                                lapack_int ldb );
8509 lapack_int LAPACKE_cppsv_work( int matrix_layout, char uplo, lapack_int n,
8510                                lapack_int nrhs, lapack_complex_float* ap,
8511                                lapack_complex_float* b, lapack_int ldb );
8512 lapack_int LAPACKE_zppsv_work( int matrix_layout, char uplo, lapack_int n,
8513                                lapack_int nrhs, lapack_complex_double* ap,
8514                                lapack_complex_double* b, lapack_int ldb );
8515
8516 lapack_int LAPACKE_sppsvx_work( int matrix_layout, char fact, char uplo,
8517                                 lapack_int n, lapack_int nrhs, float* ap,
8518                                 float* afp, char* equed, float* s, float* b,
8519                                 lapack_int ldb, float* x, lapack_int ldx,
8520                                 float* rcond, float* ferr, float* berr,
8521                                 float* work, lapack_int* iwork );
8522 lapack_int LAPACKE_dppsvx_work( int matrix_layout, char fact, char uplo,
8523                                 lapack_int n, lapack_int nrhs, double* ap,
8524                                 double* afp, char* equed, double* s, double* b,
8525                                 lapack_int ldb, double* x, lapack_int ldx,
8526                                 double* rcond, double* ferr, double* berr,
8527                                 double* work, lapack_int* iwork );
8528 lapack_int LAPACKE_cppsvx_work( int matrix_layout, char fact, char uplo,
8529                                 lapack_int n, lapack_int nrhs,
8530                                 lapack_complex_float* ap,
8531                                 lapack_complex_float* afp, char* equed,
8532                                 float* s, lapack_complex_float* b,
8533                                 lapack_int ldb, lapack_complex_float* x,
8534                                 lapack_int ldx, float* rcond, float* ferr,
8535                                 float* berr, lapack_complex_float* work,
8536                                 float* rwork );
8537 lapack_int LAPACKE_zppsvx_work( int matrix_layout, char fact, char uplo,
8538                                 lapack_int n, lapack_int nrhs,
8539                                 lapack_complex_double* ap,
8540                                 lapack_complex_double* afp, char* equed,
8541                                 double* s, lapack_complex_double* b,
8542                                 lapack_int ldb, lapack_complex_double* x,
8543                                 lapack_int ldx, double* rcond, double* ferr,
8544                                 double* berr, lapack_complex_double* work,
8545                                 double* rwork );
8546
8547 lapack_int LAPACKE_spptrf_work( int matrix_layout, char uplo, lapack_int n,
8548                                 float* ap );
8549 lapack_int LAPACKE_dpptrf_work( int matrix_layout, char uplo, lapack_int n,
8550                                 double* ap );
8551 lapack_int LAPACKE_cpptrf_work( int matrix_layout, char uplo, lapack_int n,
8552                                 lapack_complex_float* ap );
8553 lapack_int LAPACKE_zpptrf_work( int matrix_layout, char uplo, lapack_int n,
8554                                 lapack_complex_double* ap );
8555
8556 lapack_int LAPACKE_spptri_work( int matrix_layout, char uplo, lapack_int n,
8557                                 float* ap );
8558 lapack_int LAPACKE_dpptri_work( int matrix_layout, char uplo, lapack_int n,
8559                                 double* ap );
8560 lapack_int LAPACKE_cpptri_work( int matrix_layout, char uplo, lapack_int n,
8561                                 lapack_complex_float* ap );
8562 lapack_int LAPACKE_zpptri_work( int matrix_layout, char uplo, lapack_int n,
8563                                 lapack_complex_double* ap );
8564
8565 lapack_int LAPACKE_spptrs_work( int matrix_layout, char uplo, lapack_int n,
8566                                 lapack_int nrhs, const float* ap, float* b,
8567                                 lapack_int ldb );
8568 lapack_int LAPACKE_dpptrs_work( int matrix_layout, char uplo, lapack_int n,
8569                                 lapack_int nrhs, const double* ap, double* b,
8570                                 lapack_int ldb );
8571 lapack_int LAPACKE_cpptrs_work( int matrix_layout, char uplo, lapack_int n,
8572                                 lapack_int nrhs, const lapack_complex_float* ap,
8573                                 lapack_complex_float* b, lapack_int ldb );
8574 lapack_int LAPACKE_zpptrs_work( int matrix_layout, char uplo, lapack_int n,
8575                                 lapack_int nrhs,
8576                                 const lapack_complex_double* ap,
8577                                 lapack_complex_double* b, lapack_int ldb );
8578
8579 lapack_int LAPACKE_spstrf_work( int matrix_layout, char uplo, lapack_int n,
8580                                 float* a, lapack_int lda, lapack_int* piv,
8581                                 lapack_int* rank, float tol, float* work );
8582 lapack_int LAPACKE_dpstrf_work( int matrix_layout, char uplo, lapack_int n,
8583                                 double* a, lapack_int lda, lapack_int* piv,
8584                                 lapack_int* rank, double tol, double* work );
8585 lapack_int LAPACKE_cpstrf_work( int matrix_layout, char uplo, lapack_int n,
8586                                 lapack_complex_float* a, lapack_int lda,
8587                                 lapack_int* piv, lapack_int* rank, float tol,
8588                                 float* work );
8589 lapack_int LAPACKE_zpstrf_work( int matrix_layout, char uplo, lapack_int n,
8590                                 lapack_complex_double* a, lapack_int lda,
8591                                 lapack_int* piv, lapack_int* rank, double tol,
8592                                 double* work );
8593
8594 lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
8595                                 float anorm, float* rcond, float* work );
8596 lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
8597                                 double anorm, double* rcond, double* work );
8598 lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
8599                                 const lapack_complex_float* e, float anorm,
8600                                 float* rcond, float* work );
8601 lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
8602                                 const lapack_complex_double* e, double anorm,
8603                                 double* rcond, double* work );
8604
8605 lapack_int LAPACKE_spteqr_work( int matrix_layout, char compz, lapack_int n,
8606                                 float* d, float* e, float* z, lapack_int ldz,
8607                                 float* work );
8608 lapack_int LAPACKE_dpteqr_work( int matrix_layout, char compz, lapack_int n,
8609                                 double* d, double* e, double* z, lapack_int ldz,
8610                                 double* work );
8611 lapack_int LAPACKE_cpteqr_work( int matrix_layout, char compz, lapack_int n,
8612                                 float* d, float* e, lapack_complex_float* z,
8613                                 lapack_int ldz, float* work );
8614 lapack_int LAPACKE_zpteqr_work( int matrix_layout, char compz, lapack_int n,
8615                                 double* d, double* e, lapack_complex_double* z,
8616                                 lapack_int ldz, double* work );
8617
8618 lapack_int LAPACKE_sptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8619                                 const float* d, const float* e, const float* df,
8620                                 const float* ef, const float* b, lapack_int ldb,
8621                                 float* x, lapack_int ldx, float* ferr,
8622                                 float* berr, float* work );
8623 lapack_int LAPACKE_dptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8624                                 const double* d, const double* e,
8625                                 const double* df, const double* ef,
8626                                 const double* b, lapack_int ldb, double* x,
8627                                 lapack_int ldx, double* ferr, double* berr,
8628                                 double* work );
8629 lapack_int LAPACKE_cptrfs_work( int matrix_layout, char uplo, lapack_int n,
8630                                 lapack_int nrhs, const float* d,
8631                                 const lapack_complex_float* e, const float* df,
8632                                 const lapack_complex_float* ef,
8633                                 const lapack_complex_float* b, lapack_int ldb,
8634                                 lapack_complex_float* x, lapack_int ldx,
8635                                 float* ferr, float* berr,
8636                                 lapack_complex_float* work, float* rwork );
8637 lapack_int LAPACKE_zptrfs_work( int matrix_layout, char uplo, lapack_int n,
8638                                 lapack_int nrhs, const double* d,
8639                                 const lapack_complex_double* e,
8640                                 const double* df,
8641                                 const lapack_complex_double* ef,
8642                                 const lapack_complex_double* b, lapack_int ldb,
8643                                 lapack_complex_double* x, lapack_int ldx,
8644                                 double* ferr, double* berr,
8645                                 lapack_complex_double* work, double* rwork );
8646
8647 lapack_int LAPACKE_sptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8648                                float* d, float* e, float* b, lapack_int ldb );
8649 lapack_int LAPACKE_dptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8650                                double* d, double* e, double* b,
8651                                lapack_int ldb );
8652 lapack_int LAPACKE_cptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8653                                float* d, lapack_complex_float* e,
8654                                lapack_complex_float* b, lapack_int ldb );
8655 lapack_int LAPACKE_zptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8656                                double* d, lapack_complex_double* e,
8657                                lapack_complex_double* b, lapack_int ldb );
8658
8659 lapack_int LAPACKE_sptsvx_work( int matrix_layout, char fact, lapack_int n,
8660                                 lapack_int nrhs, const float* d, const float* e,
8661                                 float* df, float* ef, const float* b,
8662                                 lapack_int ldb, float* x, lapack_int ldx,
8663                                 float* rcond, float* ferr, float* berr,
8664                                 float* work );
8665 lapack_int LAPACKE_dptsvx_work( int matrix_layout, char fact, lapack_int n,
8666                                 lapack_int nrhs, const double* d,
8667                                 const double* e, double* df, double* ef,
8668                                 const double* b, lapack_int ldb, double* x,
8669                                 lapack_int ldx, double* rcond, double* ferr,
8670                                 double* berr, double* work );
8671 lapack_int LAPACKE_cptsvx_work( int matrix_layout, char fact, lapack_int n,
8672                                 lapack_int nrhs, const float* d,
8673                                 const lapack_complex_float* e, float* df,
8674                                 lapack_complex_float* ef,
8675                                 const lapack_complex_float* b, lapack_int ldb,
8676                                 lapack_complex_float* x, lapack_int ldx,
8677                                 float* rcond, float* ferr, float* berr,
8678                                 lapack_complex_float* work, float* rwork );
8679 lapack_int LAPACKE_zptsvx_work( int matrix_layout, char fact, lapack_int n,
8680                                 lapack_int nrhs, const double* d,
8681                                 const lapack_complex_double* e, double* df,
8682                                 lapack_complex_double* ef,
8683                                 const lapack_complex_double* b, lapack_int ldb,
8684                                 lapack_complex_double* x, lapack_int ldx,
8685                                 double* rcond, double* ferr, double* berr,
8686                                 lapack_complex_double* work, double* rwork );
8687
8688 lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
8689 lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
8690 lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
8691                                 lapack_complex_float* e );
8692 lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
8693                                 lapack_complex_double* e );
8694
8695 lapack_int LAPACKE_spttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8696                                 const float* d, const float* e, float* b,
8697                                 lapack_int ldb );
8698 lapack_int LAPACKE_dpttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8699                                 const double* d, const double* e, double* b,
8700                                 lapack_int ldb );
8701 lapack_int LAPACKE_cpttrs_work( int matrix_layout, char uplo, lapack_int n,
8702                                 lapack_int nrhs, const float* d,
8703                                 const lapack_complex_float* e,
8704                                 lapack_complex_float* b, lapack_int ldb );
8705 lapack_int LAPACKE_zpttrs_work( int matrix_layout, char uplo, lapack_int n,
8706                                 lapack_int nrhs, const double* d,
8707                                 const lapack_complex_double* e,
8708                                 lapack_complex_double* b, lapack_int ldb );
8709
8710 lapack_int LAPACKE_ssbev_work( int matrix_layout, char jobz, char uplo,
8711                                lapack_int n, lapack_int kd, float* ab,
8712                                lapack_int ldab, float* w, float* z,
8713                                lapack_int ldz, float* work );
8714 lapack_int LAPACKE_dsbev_work( int matrix_layout, char jobz, char uplo,
8715                                lapack_int n, lapack_int kd, double* ab,
8716                                lapack_int ldab, double* w, double* z,
8717                                lapack_int ldz, double* work );
8718
8719 lapack_int LAPACKE_ssbevd_work( int matrix_layout, char jobz, char uplo,
8720                                 lapack_int n, lapack_int kd, float* ab,
8721                                 lapack_int ldab, float* w, float* z,
8722                                 lapack_int ldz, float* work, lapack_int lwork,
8723                                 lapack_int* iwork, lapack_int liwork );
8724 lapack_int LAPACKE_dsbevd_work( int matrix_layout, char jobz, char uplo,
8725                                 lapack_int n, lapack_int kd, double* ab,
8726                                 lapack_int ldab, double* w, double* z,
8727                                 lapack_int ldz, double* work, lapack_int lwork,
8728                                 lapack_int* iwork, lapack_int liwork );
8729
8730 lapack_int LAPACKE_ssbevx_work( int matrix_layout, char jobz, char range,
8731                                 char uplo, lapack_int n, lapack_int kd,
8732                                 float* ab, lapack_int ldab, float* q,
8733                                 lapack_int ldq, float vl, float vu,
8734                                 lapack_int il, lapack_int iu, float abstol,
8735                                 lapack_int* m, float* w, float* z,
8736                                 lapack_int ldz, float* work,
8737                                 lapack_int* iwork, lapack_int* ifail );
8738 lapack_int LAPACKE_dsbevx_work( int matrix_layout, char jobz, char range,
8739                                 char uplo, lapack_int n, lapack_int kd,
8740                                 double* ab, lapack_int ldab, 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,
8745                                 lapack_int* iwork, lapack_int* ifail );
8746
8747 lapack_int LAPACKE_ssbgst_work( int matrix_layout, char vect, char uplo,
8748                                 lapack_int n, lapack_int ka, lapack_int kb,
8749                                 float* ab, lapack_int ldab, const float* bb,
8750                                 lapack_int ldbb, float* x, lapack_int ldx,
8751                                 float* work );
8752 lapack_int LAPACKE_dsbgst_work( int matrix_layout, char vect, char uplo,
8753                                 lapack_int n, lapack_int ka, lapack_int kb,
8754                                 double* ab, lapack_int ldab, const double* bb,
8755                                 lapack_int ldbb, double* x, lapack_int ldx,
8756                                 double* work );
8757
8758 lapack_int LAPACKE_ssbgv_work( int matrix_layout, char jobz, char uplo,
8759                                lapack_int n, lapack_int ka, lapack_int kb,
8760                                float* ab, lapack_int ldab, float* bb,
8761                                lapack_int ldbb, float* w, float* z,
8762                                lapack_int ldz, float* work );
8763 lapack_int LAPACKE_dsbgv_work( int matrix_layout, char jobz, char uplo,
8764                                lapack_int n, lapack_int ka, lapack_int kb,
8765                                double* ab, lapack_int ldab, double* bb,
8766                                lapack_int ldbb, double* w, double* z,
8767                                lapack_int ldz, double* work );
8768
8769 lapack_int LAPACKE_ssbgvd_work( int matrix_layout, char jobz, char uplo,
8770                                 lapack_int n, lapack_int ka, lapack_int kb,
8771                                 float* ab, lapack_int ldab, float* bb,
8772                                 lapack_int ldbb, float* w, float* z,
8773                                 lapack_int ldz, float* work, lapack_int lwork,
8774                                 lapack_int* iwork, lapack_int liwork );
8775 lapack_int LAPACKE_dsbgvd_work( int matrix_layout, char jobz, char uplo,
8776                                 lapack_int n, lapack_int ka, lapack_int kb,
8777                                 double* ab, lapack_int ldab, double* bb,
8778                                 lapack_int ldbb, double* w, double* z,
8779                                 lapack_int ldz, double* work, lapack_int lwork,
8780                                 lapack_int* iwork, lapack_int liwork );
8781
8782 lapack_int LAPACKE_ssbgvx_work( int matrix_layout, char jobz, char range,
8783                                 char uplo, lapack_int n, lapack_int ka,
8784                                 lapack_int kb, float* ab, lapack_int ldab,
8785                                 float* bb, lapack_int ldbb, float* q,
8786                                 lapack_int ldq, float vl, float vu,
8787                                 lapack_int il, lapack_int iu, float abstol,
8788                                 lapack_int* m, float* w, float* z,
8789                                 lapack_int ldz, float* work, lapack_int* iwork,
8790                                 lapack_int* ifail );
8791 lapack_int LAPACKE_dsbgvx_work( int matrix_layout, char jobz, char range,
8792                                 char uplo, lapack_int n, lapack_int ka,
8793                                 lapack_int kb, double* ab, lapack_int ldab,
8794                                 double* bb, lapack_int ldbb, double* q,
8795                                 lapack_int ldq, double vl, double vu,
8796                                 lapack_int il, lapack_int iu, double abstol,
8797                                 lapack_int* m, double* w, double* z,
8798                                 lapack_int ldz, double* work, lapack_int* iwork,
8799                                 lapack_int* ifail );
8800
8801 lapack_int LAPACKE_ssbtrd_work( int matrix_layout, char vect, char uplo,
8802                                 lapack_int n, lapack_int kd, float* ab,
8803                                 lapack_int ldab, float* d, float* e, float* q,
8804                                 lapack_int ldq, float* work );
8805 lapack_int LAPACKE_dsbtrd_work( int matrix_layout, char vect, char uplo,
8806                                 lapack_int n, lapack_int kd, double* ab,
8807                                 lapack_int ldab, double* d, double* e,
8808                                 double* q, lapack_int ldq, double* work );
8809
8810 lapack_int LAPACKE_ssfrk_work( int matrix_layout, char transr, char uplo,
8811                                char trans, lapack_int n, lapack_int k,
8812                                float alpha, const float* a, lapack_int lda,
8813                                float beta, float* c );
8814 lapack_int LAPACKE_dsfrk_work( int matrix_layout, char transr, char uplo,
8815                                char trans, lapack_int n, lapack_int k,
8816                                double alpha, const double* a, lapack_int lda,
8817                                double beta, double* c );
8818
8819 lapack_int LAPACKE_sspcon_work( int matrix_layout, char uplo, lapack_int n,
8820                                 const float* ap, const lapack_int* ipiv,
8821                                 float anorm, float* rcond, float* work,
8822                                 lapack_int* iwork );
8823 lapack_int LAPACKE_dspcon_work( int matrix_layout, char uplo, lapack_int n,
8824                                 const double* ap, const lapack_int* ipiv,
8825                                 double anorm, double* rcond, double* work,
8826                                 lapack_int* iwork );
8827 lapack_int LAPACKE_cspcon_work( int matrix_layout, char uplo, lapack_int n,
8828                                 const lapack_complex_float* ap,
8829                                 const lapack_int* ipiv, float anorm,
8830                                 float* rcond, lapack_complex_float* work );
8831 lapack_int LAPACKE_zspcon_work( int matrix_layout, char uplo, lapack_int n,
8832                                 const lapack_complex_double* ap,
8833                                 const lapack_int* ipiv, double anorm,
8834                                 double* rcond, lapack_complex_double* work );
8835
8836 lapack_int LAPACKE_sspev_work( int matrix_layout, char jobz, char uplo,
8837                                lapack_int n, float* ap, float* w, float* z,
8838                                lapack_int ldz, float* work );
8839 lapack_int LAPACKE_dspev_work( int matrix_layout, char jobz, char uplo,
8840                                lapack_int n, double* ap, double* w, double* z,
8841                                lapack_int ldz, double* work );
8842
8843 lapack_int LAPACKE_sspevd_work( int matrix_layout, char jobz, char uplo,
8844                                 lapack_int n, float* ap, float* w, float* z,
8845                                 lapack_int ldz, float* work, lapack_int lwork,
8846                                 lapack_int* iwork, lapack_int liwork );
8847 lapack_int LAPACKE_dspevd_work( int matrix_layout, char jobz, char uplo,
8848                                 lapack_int n, double* ap, double* w, double* z,
8849                                 lapack_int ldz, double* work, lapack_int lwork,
8850                                 lapack_int* iwork, lapack_int liwork );
8851
8852 lapack_int LAPACKE_sspevx_work( int matrix_layout, char jobz, char range,
8853                                 char uplo, lapack_int n, float* ap, float vl,
8854                                 float vu, lapack_int il, lapack_int iu,
8855                                 float abstol, lapack_int* m, float* w, float* z,
8856                                 lapack_int ldz, float* work, lapack_int* iwork,
8857                                 lapack_int* ifail );
8858 lapack_int LAPACKE_dspevx_work( int matrix_layout, char jobz, char range,
8859                                 char uplo, lapack_int n, double* ap, double vl,
8860                                 double vu, lapack_int il, lapack_int iu,
8861                                 double abstol, lapack_int* m, double* w,
8862                                 double* z, lapack_int ldz, double* work,
8863                                 lapack_int* iwork, lapack_int* ifail );
8864
8865 lapack_int LAPACKE_sspgst_work( int matrix_layout, lapack_int itype, char uplo,
8866                                 lapack_int n, float* ap, const float* bp );
8867 lapack_int LAPACKE_dspgst_work( int matrix_layout, lapack_int itype, char uplo,
8868                                 lapack_int n, double* ap, const double* bp );
8869
8870 lapack_int LAPACKE_sspgv_work( int matrix_layout, lapack_int itype, char jobz,
8871                                char uplo, lapack_int n, float* ap, float* bp,
8872                                float* w, float* z, lapack_int ldz,
8873                                float* work );
8874 lapack_int LAPACKE_dspgv_work( int matrix_layout, lapack_int itype, char jobz,
8875                                char uplo, lapack_int n, double* ap, double* bp,
8876                                double* w, double* z, lapack_int ldz,
8877                                double* work );
8878
8879 lapack_int LAPACKE_sspgvd_work( int matrix_layout, lapack_int itype, char jobz,
8880                                 char uplo, lapack_int n, float* ap, float* bp,
8881                                 float* w, float* z, lapack_int ldz, float* work,
8882                                 lapack_int lwork, lapack_int* iwork,
8883                                 lapack_int liwork );
8884 lapack_int LAPACKE_dspgvd_work( int matrix_layout, lapack_int itype, char jobz,
8885                                 char uplo, lapack_int n, double* ap, double* bp,
8886                                 double* w, double* z, lapack_int ldz,
8887                                 double* work, lapack_int lwork,
8888                                 lapack_int* iwork, lapack_int liwork );
8889
8890 lapack_int LAPACKE_sspgvx_work( int matrix_layout, lapack_int itype, char jobz,
8891                                 char range, char uplo, lapack_int n, float* ap,
8892                                 float* bp, float vl, float vu, lapack_int il,
8893                                 lapack_int iu, float abstol, lapack_int* m,
8894                                 float* w, float* z, lapack_int ldz, float* work,
8895                                 lapack_int* iwork, lapack_int* ifail );
8896 lapack_int LAPACKE_dspgvx_work( int matrix_layout, lapack_int itype, char jobz,
8897                                 char range, char uplo, lapack_int n, double* ap,
8898                                 double* bp, double vl, double vu, lapack_int il,
8899                                 lapack_int iu, double abstol, lapack_int* m,
8900                                 double* w, double* z, lapack_int ldz,
8901                                 double* work, lapack_int* iwork,
8902                                 lapack_int* ifail );
8903
8904 lapack_int LAPACKE_ssprfs_work( int matrix_layout, char uplo, lapack_int n,
8905                                 lapack_int nrhs, const float* ap,
8906                                 const float* afp, const lapack_int* ipiv,
8907                                 const float* b, lapack_int ldb, float* x,
8908                                 lapack_int ldx, float* ferr, float* berr,
8909                                 float* work, lapack_int* iwork );
8910 lapack_int LAPACKE_dsprfs_work( int matrix_layout, char uplo, lapack_int n,
8911                                 lapack_int nrhs, const double* ap,
8912                                 const double* afp, const lapack_int* ipiv,
8913                                 const double* b, lapack_int ldb, double* x,
8914                                 lapack_int ldx, double* ferr, double* berr,
8915                                 double* work, lapack_int* iwork );
8916 lapack_int LAPACKE_csprfs_work( int matrix_layout, char uplo, lapack_int n,
8917                                 lapack_int nrhs, const lapack_complex_float* ap,
8918                                 const lapack_complex_float* afp,
8919                                 const lapack_int* ipiv,
8920                                 const lapack_complex_float* b, lapack_int ldb,
8921                                 lapack_complex_float* x, lapack_int ldx,
8922                                 float* ferr, float* berr,
8923                                 lapack_complex_float* work, float* rwork );
8924 lapack_int LAPACKE_zsprfs_work( int matrix_layout, char uplo, lapack_int n,
8925                                 lapack_int nrhs,
8926                                 const lapack_complex_double* ap,
8927                                 const lapack_complex_double* afp,
8928                                 const lapack_int* ipiv,
8929                                 const lapack_complex_double* b, lapack_int ldb,
8930                                 lapack_complex_double* x, lapack_int ldx,
8931                                 double* ferr, double* berr,
8932                                 lapack_complex_double* work, double* rwork );
8933
8934 lapack_int LAPACKE_sspsv_work( int matrix_layout, char uplo, lapack_int n,
8935                                lapack_int nrhs, float* ap, lapack_int* ipiv,
8936                                float* b, lapack_int ldb );
8937 lapack_int LAPACKE_dspsv_work( int matrix_layout, char uplo, lapack_int n,
8938                                lapack_int nrhs, double* ap, lapack_int* ipiv,
8939                                double* b, lapack_int ldb );
8940 lapack_int LAPACKE_cspsv_work( int matrix_layout, char uplo, lapack_int n,
8941                                lapack_int nrhs, lapack_complex_float* ap,
8942                                lapack_int* ipiv, lapack_complex_float* b,
8943                                lapack_int ldb );
8944 lapack_int LAPACKE_zspsv_work( int matrix_layout, char uplo, lapack_int n,
8945                                lapack_int nrhs, lapack_complex_double* ap,
8946                                lapack_int* ipiv, lapack_complex_double* b,
8947                                lapack_int ldb );
8948
8949 lapack_int LAPACKE_sspsvx_work( int matrix_layout, char fact, char uplo,
8950                                 lapack_int n, lapack_int nrhs, const float* ap,
8951                                 float* afp, lapack_int* ipiv, const float* b,
8952                                 lapack_int ldb, float* x, lapack_int ldx,
8953                                 float* rcond, float* ferr, float* berr,
8954                                 float* work, lapack_int* iwork );
8955 lapack_int LAPACKE_dspsvx_work( int matrix_layout, char fact, char uplo,
8956                                 lapack_int n, lapack_int nrhs, const double* ap,
8957                                 double* afp, lapack_int* ipiv, const double* b,
8958                                 lapack_int ldb, double* x, lapack_int ldx,
8959                                 double* rcond, double* ferr, double* berr,
8960                                 double* work, lapack_int* iwork );
8961 lapack_int LAPACKE_cspsvx_work( int matrix_layout, char fact, char uplo,
8962                                 lapack_int n, lapack_int nrhs,
8963                                 const lapack_complex_float* ap,
8964                                 lapack_complex_float* afp, lapack_int* ipiv,
8965                                 const lapack_complex_float* b, lapack_int ldb,
8966                                 lapack_complex_float* x, lapack_int ldx,
8967                                 float* rcond, float* ferr, float* berr,
8968                                 lapack_complex_float* work, float* rwork );
8969 lapack_int LAPACKE_zspsvx_work( int matrix_layout, char fact, char uplo,
8970                                 lapack_int n, lapack_int nrhs,
8971                                 const lapack_complex_double* ap,
8972                                 lapack_complex_double* afp, lapack_int* ipiv,
8973                                 const lapack_complex_double* b, lapack_int ldb,
8974                                 lapack_complex_double* x, lapack_int ldx,
8975                                 double* rcond, double* ferr, double* berr,
8976                                 lapack_complex_double* work, double* rwork );
8977
8978 lapack_int LAPACKE_ssptrd_work( int matrix_layout, char uplo, lapack_int n,
8979                                 float* ap, float* d, float* e, float* tau );
8980 lapack_int LAPACKE_dsptrd_work( int matrix_layout, char uplo, lapack_int n,
8981                                 double* ap, double* d, double* e, double* tau );
8982
8983 lapack_int LAPACKE_ssptrf_work( int matrix_layout, char uplo, lapack_int n,
8984                                 float* ap, lapack_int* ipiv );
8985 lapack_int LAPACKE_dsptrf_work( int matrix_layout, char uplo, lapack_int n,
8986                                 double* ap, lapack_int* ipiv );
8987 lapack_int LAPACKE_csptrf_work( int matrix_layout, char uplo, lapack_int n,
8988                                 lapack_complex_float* ap, lapack_int* ipiv );
8989 lapack_int LAPACKE_zsptrf_work( int matrix_layout, char uplo, lapack_int n,
8990                                 lapack_complex_double* ap, lapack_int* ipiv );
8991
8992 lapack_int LAPACKE_ssptri_work( int matrix_layout, char uplo, lapack_int n,
8993                                 float* ap, const lapack_int* ipiv,
8994                                 float* work );
8995 lapack_int LAPACKE_dsptri_work( int matrix_layout, char uplo, lapack_int n,
8996                                 double* ap, const lapack_int* ipiv,
8997                                 double* work );
8998 lapack_int LAPACKE_csptri_work( int matrix_layout, char uplo, lapack_int n,
8999                                 lapack_complex_float* ap,
9000                                 const lapack_int* ipiv,
9001                                 lapack_complex_float* work );
9002 lapack_int LAPACKE_zsptri_work( int matrix_layout, char uplo, lapack_int n,
9003                                 lapack_complex_double* ap,
9004                                 const lapack_int* ipiv,
9005                                 lapack_complex_double* work );
9006
9007 lapack_int LAPACKE_ssptrs_work( int matrix_layout, char uplo, lapack_int n,
9008                                 lapack_int nrhs, const float* ap,
9009                                 const lapack_int* ipiv, float* b,
9010                                 lapack_int ldb );
9011 lapack_int LAPACKE_dsptrs_work( int matrix_layout, char uplo, lapack_int n,
9012                                 lapack_int nrhs, const double* ap,
9013                                 const lapack_int* ipiv, double* b,
9014                                 lapack_int ldb );
9015 lapack_int LAPACKE_csptrs_work( int matrix_layout, char uplo, lapack_int n,
9016                                 lapack_int nrhs, const lapack_complex_float* ap,
9017                                 const lapack_int* ipiv, lapack_complex_float* b,
9018                                 lapack_int ldb );
9019 lapack_int LAPACKE_zsptrs_work( int matrix_layout, char uplo, lapack_int n,
9020                                 lapack_int nrhs,
9021                                 const lapack_complex_double* ap,
9022                                 const lapack_int* ipiv,
9023                                 lapack_complex_double* b, lapack_int ldb );
9024
9025 lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
9026                                 float vu, lapack_int il, lapack_int iu,
9027                                 float abstol, const float* d, const float* e,
9028                                 lapack_int* m, lapack_int* nsplit, float* w,
9029                                 lapack_int* iblock, lapack_int* isplit,
9030                                 float* work, lapack_int* iwork );
9031 lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
9032                                 double vu, lapack_int il, lapack_int iu,
9033                                 double abstol, const double* d, const double* e,
9034                                 lapack_int* m, lapack_int* nsplit, double* w,
9035                                 lapack_int* iblock, lapack_int* isplit,
9036                                 double* work, lapack_int* iwork );
9037
9038 lapack_int LAPACKE_sstedc_work( int matrix_layout, char compz, lapack_int n,
9039                                 float* d, float* e, float* z, lapack_int ldz,
9040                                 float* work, lapack_int lwork,
9041                                 lapack_int* iwork, lapack_int liwork );
9042 lapack_int LAPACKE_dstedc_work( int matrix_layout, char compz, lapack_int n,
9043                                 double* d, double* e, double* z, lapack_int ldz,
9044                                 double* work, lapack_int lwork,
9045                                 lapack_int* iwork, lapack_int liwork );
9046 lapack_int LAPACKE_cstedc_work( int matrix_layout, char compz, lapack_int n,
9047                                 float* d, float* e, lapack_complex_float* z,
9048                                 lapack_int ldz, lapack_complex_float* work,
9049                                 lapack_int lwork, float* rwork,
9050                                 lapack_int lrwork, lapack_int* iwork,
9051                                 lapack_int liwork );
9052 lapack_int LAPACKE_zstedc_work( int matrix_layout, char compz, lapack_int n,
9053                                 double* d, double* e, lapack_complex_double* z,
9054                                 lapack_int ldz, lapack_complex_double* work,
9055                                 lapack_int lwork, double* rwork,
9056                                 lapack_int lrwork, lapack_int* iwork,
9057                                 lapack_int liwork );
9058
9059 lapack_int LAPACKE_sstegr_work( int matrix_layout, char jobz, char range,
9060                                 lapack_int n, float* d, float* e, float vl,
9061                                 float vu, lapack_int il, lapack_int iu,
9062                                 float abstol, lapack_int* m, float* w, float* z,
9063                                 lapack_int ldz, lapack_int* isuppz, float* work,
9064                                 lapack_int lwork, lapack_int* iwork,
9065                                 lapack_int liwork );
9066 lapack_int LAPACKE_dstegr_work( int matrix_layout, char jobz, char range,
9067                                 lapack_int n, double* d, double* e, double vl,
9068                                 double vu, lapack_int il, lapack_int iu,
9069                                 double abstol, lapack_int* m, double* w,
9070                                 double* z, lapack_int ldz, lapack_int* isuppz,
9071                                 double* work, lapack_int lwork,
9072                                 lapack_int* iwork, lapack_int liwork );
9073 lapack_int LAPACKE_cstegr_work( int matrix_layout, char jobz, char range,
9074                                 lapack_int n, float* d, float* e, float vl,
9075                                 float vu, lapack_int il, lapack_int iu,
9076                                 float abstol, lapack_int* m, float* w,
9077                                 lapack_complex_float* z, lapack_int ldz,
9078                                 lapack_int* isuppz, float* work,
9079                                 lapack_int lwork, lapack_int* iwork,
9080                                 lapack_int liwork );
9081 lapack_int LAPACKE_zstegr_work( int matrix_layout, char jobz, char range,
9082                                 lapack_int n, double* d, double* e, double vl,
9083                                 double vu, lapack_int il, lapack_int iu,
9084                                 double abstol, lapack_int* m, double* w,
9085                                 lapack_complex_double* z, lapack_int ldz,
9086                                 lapack_int* isuppz, double* work,
9087                                 lapack_int lwork, lapack_int* iwork,
9088                                 lapack_int liwork );
9089
9090 lapack_int LAPACKE_sstein_work( int matrix_layout, lapack_int n, const float* d,
9091                                 const float* e, lapack_int m, const float* w,
9092                                 const lapack_int* iblock,
9093                                 const lapack_int* isplit, float* z,
9094                                 lapack_int ldz, float* work, lapack_int* iwork,
9095                                 lapack_int* ifailv );
9096 lapack_int LAPACKE_dstein_work( int matrix_layout, lapack_int n, const double* d,
9097                                 const double* e, lapack_int m, const double* w,
9098                                 const lapack_int* iblock,
9099                                 const lapack_int* isplit, double* z,
9100                                 lapack_int ldz, double* work, lapack_int* iwork,
9101                                 lapack_int* ifailv );
9102 lapack_int LAPACKE_cstein_work( int matrix_layout, lapack_int n, const float* d,
9103                                 const float* e, lapack_int m, const float* w,
9104                                 const lapack_int* iblock,
9105                                 const lapack_int* isplit,
9106                                 lapack_complex_float* z, lapack_int ldz,
9107                                 float* work, lapack_int* iwork,
9108                                 lapack_int* ifailv );
9109 lapack_int LAPACKE_zstein_work( int matrix_layout, lapack_int n, const double* d,
9110                                 const double* e, lapack_int m, const double* w,
9111                                 const lapack_int* iblock,
9112                                 const lapack_int* isplit,
9113                                 lapack_complex_double* z, lapack_int ldz,
9114                                 double* work, lapack_int* iwork,
9115                                 lapack_int* ifailv );
9116
9117 lapack_int LAPACKE_sstemr_work( int matrix_layout, char jobz, char range,
9118                                 lapack_int n, float* d, float* e, float vl,
9119                                 float vu, lapack_int il, lapack_int iu,
9120                                 lapack_int* m, float* w, float* z,
9121                                 lapack_int ldz, lapack_int nzc,
9122                                 lapack_int* isuppz, lapack_logical* tryrac,
9123                                 float* work, lapack_int lwork,
9124                                 lapack_int* iwork, lapack_int liwork );
9125 lapack_int LAPACKE_dstemr_work( int matrix_layout, char jobz, char range,
9126                                 lapack_int n, double* d, double* e, double vl,
9127                                 double vu, lapack_int il, lapack_int iu,
9128                                 lapack_int* m, double* w, double* z,
9129                                 lapack_int ldz, lapack_int nzc,
9130                                 lapack_int* isuppz, lapack_logical* tryrac,
9131                                 double* work, lapack_int lwork,
9132                                 lapack_int* iwork, lapack_int liwork );
9133 lapack_int LAPACKE_cstemr_work( int matrix_layout, char jobz, char range,
9134                                 lapack_int n, float* d, float* e, float vl,
9135                                 float vu, lapack_int il, lapack_int iu,
9136                                 lapack_int* m, float* w,
9137                                 lapack_complex_float* z, lapack_int ldz,
9138                                 lapack_int nzc, lapack_int* isuppz,
9139                                 lapack_logical* tryrac, float* work,
9140                                 lapack_int lwork, lapack_int* iwork,
9141                                 lapack_int liwork );
9142 lapack_int LAPACKE_zstemr_work( int matrix_layout, char jobz, char range,
9143                                 lapack_int n, double* d, double* e, double vl,
9144                                 double vu, lapack_int il, lapack_int iu,
9145                                 lapack_int* m, double* w,
9146                                 lapack_complex_double* z, lapack_int ldz,
9147                                 lapack_int nzc, lapack_int* isuppz,
9148                                 lapack_logical* tryrac, double* work,
9149                                 lapack_int lwork, lapack_int* iwork,
9150                                 lapack_int liwork );
9151
9152 lapack_int LAPACKE_ssteqr_work( int matrix_layout, char compz, lapack_int n,
9153                                 float* d, float* e, float* z, lapack_int ldz,
9154                                 float* work );
9155 lapack_int LAPACKE_dsteqr_work( int matrix_layout, char compz, lapack_int n,
9156                                 double* d, double* e, double* z, lapack_int ldz,
9157                                 double* work );
9158 lapack_int LAPACKE_csteqr_work( int matrix_layout, char compz, lapack_int n,
9159                                 float* d, float* e, lapack_complex_float* z,
9160                                 lapack_int ldz, float* work );
9161 lapack_int LAPACKE_zsteqr_work( int matrix_layout, char compz, lapack_int n,
9162                                 double* d, double* e, lapack_complex_double* z,
9163                                 lapack_int ldz, double* work );
9164
9165 lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
9166 lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
9167
9168 lapack_int LAPACKE_sstev_work( int matrix_layout, char jobz, lapack_int n,
9169                                float* d, float* e, float* z, lapack_int ldz,
9170                                float* work );
9171 lapack_int LAPACKE_dstev_work( int matrix_layout, char jobz, lapack_int n,
9172                                double* d, double* e, double* z, lapack_int ldz,
9173                                double* work );
9174
9175 lapack_int LAPACKE_sstevd_work( int matrix_layout, char jobz, lapack_int n,
9176                                 float* d, float* e, float* z, lapack_int ldz,
9177                                 float* work, lapack_int lwork,
9178                                 lapack_int* iwork, lapack_int liwork );
9179 lapack_int LAPACKE_dstevd_work( int matrix_layout, char jobz, lapack_int n,
9180                                 double* d, double* e, double* z, lapack_int ldz,
9181                                 double* work, lapack_int lwork,
9182                                 lapack_int* iwork, lapack_int liwork );
9183
9184 lapack_int LAPACKE_sstevr_work( int matrix_layout, char jobz, char range,
9185                                 lapack_int n, float* d, float* e, float vl,
9186                                 float vu, lapack_int il, lapack_int iu,
9187                                 float abstol, lapack_int* m, float* w, float* z,
9188                                 lapack_int ldz, lapack_int* isuppz, float* work,
9189                                 lapack_int lwork, lapack_int* iwork,
9190                                 lapack_int liwork );
9191 lapack_int LAPACKE_dstevr_work( int matrix_layout, char jobz, char range,
9192                                 lapack_int n, double* d, double* e, double vl,
9193                                 double vu, lapack_int il, lapack_int iu,
9194                                 double abstol, lapack_int* m, double* w,
9195                                 double* z, lapack_int ldz, lapack_int* isuppz,
9196                                 double* work, lapack_int lwork,
9197                                 lapack_int* iwork, lapack_int liwork );
9198
9199 lapack_int LAPACKE_sstevx_work( int matrix_layout, char jobz, char range,
9200                                 lapack_int n, float* d, float* e, float vl,
9201                                 float vu, lapack_int il, lapack_int iu,
9202                                 float abstol, lapack_int* m, float* w, float* z,
9203                                 lapack_int ldz, float* work, lapack_int* iwork,
9204                                 lapack_int* ifail );
9205 lapack_int LAPACKE_dstevx_work( int matrix_layout, char jobz, char range,
9206                                 lapack_int n, double* d, double* e, double vl,
9207                                 double vu, lapack_int il, lapack_int iu,
9208                                 double abstol, lapack_int* m, double* w,
9209                                 double* z, lapack_int ldz, double* work,
9210                                 lapack_int* iwork, lapack_int* ifail );
9211
9212 lapack_int LAPACKE_ssycon_work( int matrix_layout, char uplo, lapack_int n,
9213                                 const float* a, lapack_int lda,
9214                                 const lapack_int* ipiv, float anorm,
9215                                 float* rcond, float* work, lapack_int* iwork );
9216 lapack_int LAPACKE_dsycon_work( int matrix_layout, char uplo, lapack_int n,
9217                                 const double* a, lapack_int lda,
9218                                 const lapack_int* ipiv, double anorm,
9219                                 double* rcond, double* work,
9220                                 lapack_int* iwork );
9221 lapack_int LAPACKE_csycon_work( int matrix_layout, char uplo, lapack_int n,
9222                                 const lapack_complex_float* a, lapack_int lda,
9223                                 const lapack_int* ipiv, float anorm,
9224                                 float* rcond, lapack_complex_float* work );
9225 lapack_int LAPACKE_zsycon_work( int matrix_layout, char uplo, lapack_int n,
9226                                 const lapack_complex_double* a, lapack_int lda,
9227                                 const lapack_int* ipiv, double anorm,
9228                                 double* rcond, lapack_complex_double* work );
9229
9230 lapack_int LAPACKE_ssyequb_work( int matrix_layout, char uplo, lapack_int n,
9231                                  const float* a, lapack_int lda, float* s,
9232                                  float* scond, float* amax, float* work );
9233 lapack_int LAPACKE_dsyequb_work( int matrix_layout, char uplo, lapack_int n,
9234                                  const double* a, lapack_int lda, double* s,
9235                                  double* scond, double* amax, double* work );
9236 lapack_int LAPACKE_csyequb_work( int matrix_layout, char uplo, lapack_int n,
9237                                  const lapack_complex_float* a, lapack_int lda,
9238                                  float* s, float* scond, float* amax,
9239                                  lapack_complex_float* work );
9240 lapack_int LAPACKE_zsyequb_work( int matrix_layout, char uplo, lapack_int n,
9241                                  const lapack_complex_double* a, lapack_int lda,
9242                                  double* s, double* scond, double* amax,
9243                                  lapack_complex_double* work );
9244
9245 lapack_int LAPACKE_ssyev_work( int matrix_layout, char jobz, char uplo,
9246                                lapack_int n, float* a, lapack_int lda, float* w,
9247                                float* work, lapack_int lwork );
9248 lapack_int LAPACKE_dsyev_work( int matrix_layout, char jobz, char uplo,
9249                                lapack_int n, double* a, lapack_int lda,
9250                                double* w, double* work, lapack_int lwork );
9251
9252 lapack_int LAPACKE_ssyevd_work( int matrix_layout, char jobz, char uplo,
9253                                 lapack_int n, float* a, lapack_int lda,
9254                                 float* w, float* work, lapack_int lwork,
9255                                 lapack_int* iwork, lapack_int liwork );
9256 lapack_int LAPACKE_dsyevd_work( int matrix_layout, char jobz, char uplo,
9257                                 lapack_int n, double* a, lapack_int lda,
9258                                 double* w, double* work, lapack_int lwork,
9259                                 lapack_int* iwork, lapack_int liwork );
9260
9261 lapack_int LAPACKE_ssyevr_work( int matrix_layout, char jobz, char range,
9262                                 char uplo, lapack_int n, float* a,
9263                                 lapack_int lda, float vl, float vu,
9264                                 lapack_int il, lapack_int iu, float abstol,
9265                                 lapack_int* m, float* w, float* z,
9266                                 lapack_int ldz, lapack_int* isuppz, float* work,
9267                                 lapack_int lwork, lapack_int* iwork,
9268                                 lapack_int liwork );
9269 lapack_int LAPACKE_dsyevr_work( int matrix_layout, char jobz, char range,
9270                                 char uplo, lapack_int n, double* a,
9271                                 lapack_int lda, double vl, double vu,
9272                                 lapack_int il, lapack_int iu, double abstol,
9273                                 lapack_int* m, double* w, double* z,
9274                                 lapack_int ldz, lapack_int* isuppz,
9275                                 double* work, lapack_int lwork,
9276                                 lapack_int* iwork, lapack_int liwork );
9277
9278 lapack_int LAPACKE_ssyevx_work( int matrix_layout, char jobz, char range,
9279                                 char uplo, lapack_int n, float* a,
9280                                 lapack_int lda, float vl, float vu,
9281                                 lapack_int il, lapack_int iu, float abstol,
9282                                 lapack_int* m, float* w, float* z,
9283                                 lapack_int ldz, float* work, lapack_int lwork,
9284                                 lapack_int* iwork, lapack_int* ifail );
9285 lapack_int LAPACKE_dsyevx_work( int matrix_layout, char jobz, char range,
9286                                 char uplo, lapack_int n, double* a,
9287                                 lapack_int lda, double vl, double vu,
9288                                 lapack_int il, lapack_int iu, double abstol,
9289                                 lapack_int* m, double* w, double* z,
9290                                 lapack_int ldz, double* work, lapack_int lwork,
9291                                 lapack_int* iwork, lapack_int* ifail );
9292
9293 lapack_int LAPACKE_ssygst_work( int matrix_layout, lapack_int itype, char uplo,
9294                                 lapack_int n, float* a, lapack_int lda,
9295                                 const float* b, lapack_int ldb );
9296 lapack_int LAPACKE_dsygst_work( int matrix_layout, lapack_int itype, char uplo,
9297                                 lapack_int n, double* a, lapack_int lda,
9298                                 const double* b, lapack_int ldb );
9299
9300 lapack_int LAPACKE_ssygv_work( int matrix_layout, lapack_int itype, char jobz,
9301                                char uplo, lapack_int n, float* a,
9302                                lapack_int lda, float* b, lapack_int ldb,
9303                                float* w, float* work, lapack_int lwork );
9304 lapack_int LAPACKE_dsygv_work( int matrix_layout, lapack_int itype, char jobz,
9305                                char uplo, lapack_int n, double* a,
9306                                lapack_int lda, double* b, lapack_int ldb,
9307                                double* w, double* work, lapack_int lwork );
9308
9309 lapack_int LAPACKE_ssygvd_work( int matrix_layout, lapack_int itype, char jobz,
9310                                 char uplo, lapack_int n, float* a,
9311                                 lapack_int lda, float* b, lapack_int ldb,
9312                                 float* w, float* work, lapack_int lwork,
9313                                 lapack_int* iwork, lapack_int liwork );
9314 lapack_int LAPACKE_dsygvd_work( int matrix_layout, lapack_int itype, char jobz,
9315                                 char uplo, lapack_int n, double* a,
9316                                 lapack_int lda, double* b, lapack_int ldb,
9317                                 double* w, double* work, lapack_int lwork,
9318                                 lapack_int* iwork, lapack_int liwork );
9319
9320 lapack_int LAPACKE_ssygvx_work( int matrix_layout, lapack_int itype, char jobz,
9321                                 char range, char uplo, lapack_int n, float* a,
9322                                 lapack_int lda, float* b, lapack_int ldb,
9323                                 float vl, float vu, lapack_int il,
9324                                 lapack_int iu, float abstol, lapack_int* m,
9325                                 float* w, float* z, lapack_int ldz, float* work,
9326                                 lapack_int lwork, lapack_int* iwork,
9327                                 lapack_int* ifail );
9328 lapack_int LAPACKE_dsygvx_work( int matrix_layout, lapack_int itype, char jobz,
9329                                 char range, char uplo, lapack_int n, double* a,
9330                                 lapack_int lda, double* b, lapack_int ldb,
9331                                 double vl, double vu, lapack_int il,
9332                                 lapack_int iu, double abstol, lapack_int* m,
9333                                 double* w, double* z, lapack_int ldz,
9334                                 double* work, lapack_int lwork,
9335                                 lapack_int* iwork, lapack_int* ifail );
9336
9337 lapack_int LAPACKE_ssyrfs_work( int matrix_layout, char uplo, lapack_int n,
9338                                 lapack_int nrhs, const float* a, lapack_int lda,
9339                                 const float* af, lapack_int ldaf,
9340                                 const lapack_int* ipiv, const float* b,
9341                                 lapack_int ldb, float* x, lapack_int ldx,
9342                                 float* ferr, float* berr, float* work,
9343                                 lapack_int* iwork );
9344 lapack_int LAPACKE_dsyrfs_work( int matrix_layout, char uplo, lapack_int n,
9345                                 lapack_int nrhs, const double* a,
9346                                 lapack_int lda, const double* af,
9347                                 lapack_int ldaf, const lapack_int* ipiv,
9348                                 const double* b, lapack_int ldb, double* x,
9349                                 lapack_int ldx, double* ferr, double* berr,
9350                                 double* work, lapack_int* iwork );
9351 lapack_int LAPACKE_csyrfs_work( int matrix_layout, char uplo, lapack_int n,
9352                                 lapack_int nrhs, const lapack_complex_float* a,
9353                                 lapack_int lda, const lapack_complex_float* af,
9354                                 lapack_int ldaf, const lapack_int* ipiv,
9355                                 const lapack_complex_float* b, lapack_int ldb,
9356                                 lapack_complex_float* x, lapack_int ldx,
9357                                 float* ferr, float* berr,
9358                                 lapack_complex_float* work, float* rwork );
9359 lapack_int LAPACKE_zsyrfs_work( int matrix_layout, char uplo, lapack_int n,
9360                                 lapack_int nrhs, const lapack_complex_double* a,
9361                                 lapack_int lda, const lapack_complex_double* af,
9362                                 lapack_int ldaf, const lapack_int* ipiv,
9363                                 const lapack_complex_double* b, lapack_int ldb,
9364                                 lapack_complex_double* x, lapack_int ldx,
9365                                 double* ferr, double* berr,
9366                                 lapack_complex_double* work, double* rwork );
9367
9368 lapack_int LAPACKE_ssyrfsx_work( int matrix_layout, char uplo, char equed,
9369                                  lapack_int n, lapack_int nrhs, const float* a,
9370                                  lapack_int lda, const float* af,
9371                                  lapack_int ldaf, const lapack_int* ipiv,
9372                                  const float* s, const float* b, lapack_int ldb,
9373                                  float* x, lapack_int ldx, float* rcond,
9374                                  float* berr, lapack_int n_err_bnds,
9375                                  float* err_bnds_norm, float* err_bnds_comp,
9376                                  lapack_int nparams, float* params, float* work,
9377                                  lapack_int* iwork );
9378 lapack_int LAPACKE_dsyrfsx_work( int matrix_layout, char uplo, char equed,
9379                                  lapack_int n, lapack_int nrhs, const double* a,
9380                                  lapack_int lda, const double* af,
9381                                  lapack_int ldaf, const lapack_int* ipiv,
9382                                  const double* s, const double* b,
9383                                  lapack_int ldb, double* x, lapack_int ldx,
9384                                  double* rcond, double* berr,
9385                                  lapack_int n_err_bnds, double* err_bnds_norm,
9386                                  double* err_bnds_comp, lapack_int nparams,
9387                                  double* params, double* work,
9388                                  lapack_int* iwork );
9389 lapack_int LAPACKE_csyrfsx_work( int matrix_layout, char uplo, char equed,
9390                                  lapack_int n, lapack_int nrhs,
9391                                  const lapack_complex_float* a, lapack_int lda,
9392                                  const lapack_complex_float* af,
9393                                  lapack_int ldaf, const lapack_int* ipiv,
9394                                  const float* s, const lapack_complex_float* b,
9395                                  lapack_int ldb, lapack_complex_float* x,
9396                                  lapack_int ldx, float* rcond, float* berr,
9397                                  lapack_int n_err_bnds, float* err_bnds_norm,
9398                                  float* err_bnds_comp, lapack_int nparams,
9399                                  float* params, lapack_complex_float* work,
9400                                  float* rwork );
9401 lapack_int LAPACKE_zsyrfsx_work( int matrix_layout, char uplo, char equed,
9402                                  lapack_int n, lapack_int nrhs,
9403                                  const lapack_complex_double* a, lapack_int lda,
9404                                  const lapack_complex_double* af,
9405                                  lapack_int ldaf, const lapack_int* ipiv,
9406                                  const double* s,
9407                                  const lapack_complex_double* b, lapack_int ldb,
9408                                  lapack_complex_double* x, lapack_int ldx,
9409                                  double* rcond, double* berr,
9410                                  lapack_int n_err_bnds, double* err_bnds_norm,
9411                                  double* err_bnds_comp, lapack_int nparams,
9412                                  double* params, lapack_complex_double* work,
9413                                  double* rwork );
9414
9415 lapack_int LAPACKE_ssysv_work( int matrix_layout, char uplo, lapack_int n,
9416                                lapack_int nrhs, float* a, lapack_int lda,
9417                                lapack_int* ipiv, float* b, lapack_int ldb,
9418                                float* work, lapack_int lwork );
9419 lapack_int LAPACKE_dsysv_work( int matrix_layout, char uplo, lapack_int n,
9420                                lapack_int nrhs, double* a, lapack_int lda,
9421                                lapack_int* ipiv, double* b, lapack_int ldb,
9422                                double* work, lapack_int lwork );
9423 lapack_int LAPACKE_csysv_work( int matrix_layout, char uplo, lapack_int n,
9424                                lapack_int nrhs, lapack_complex_float* a,
9425                                lapack_int lda, lapack_int* ipiv,
9426                                lapack_complex_float* b, lapack_int ldb,
9427                                lapack_complex_float* work, lapack_int lwork );
9428 lapack_int LAPACKE_zsysv_work( int matrix_layout, char uplo, lapack_int n,
9429                                lapack_int nrhs, lapack_complex_double* a,
9430                                lapack_int lda, lapack_int* ipiv,
9431                                lapack_complex_double* b, lapack_int ldb,
9432                                lapack_complex_double* work, lapack_int lwork );
9433
9434 lapack_int LAPACKE_ssysvx_work( int matrix_layout, char fact, char uplo,
9435                                 lapack_int n, lapack_int nrhs, const float* a,
9436                                 lapack_int lda, float* af, lapack_int ldaf,
9437                                 lapack_int* ipiv, const float* b,
9438                                 lapack_int ldb, float* x, lapack_int ldx,
9439                                 float* rcond, float* ferr, float* berr,
9440                                 float* work, lapack_int lwork,
9441                                 lapack_int* iwork );
9442 lapack_int LAPACKE_dsysvx_work( int matrix_layout, char fact, char uplo,
9443                                 lapack_int n, lapack_int nrhs, const double* a,
9444                                 lapack_int lda, double* af, lapack_int ldaf,
9445                                 lapack_int* ipiv, const double* b,
9446                                 lapack_int ldb, double* x, lapack_int ldx,
9447                                 double* rcond, double* ferr, double* berr,
9448                                 double* work, lapack_int lwork,
9449                                 lapack_int* iwork );
9450 lapack_int LAPACKE_csysvx_work( int matrix_layout, char fact, char uplo,
9451                                 lapack_int n, lapack_int nrhs,
9452                                 const lapack_complex_float* a, lapack_int lda,
9453                                 lapack_complex_float* af, lapack_int ldaf,
9454                                 lapack_int* ipiv, const lapack_complex_float* b,
9455                                 lapack_int ldb, lapack_complex_float* x,
9456                                 lapack_int ldx, float* rcond, float* ferr,
9457                                 float* berr, lapack_complex_float* work,
9458                                 lapack_int lwork, float* rwork );
9459 lapack_int LAPACKE_zsysvx_work( int matrix_layout, char fact, char uplo,
9460                                 lapack_int n, lapack_int nrhs,
9461                                 const lapack_complex_double* a, lapack_int lda,
9462                                 lapack_complex_double* af, lapack_int ldaf,
9463                                 lapack_int* ipiv,
9464                                 const lapack_complex_double* b, lapack_int ldb,
9465                                 lapack_complex_double* x, lapack_int ldx,
9466                                 double* rcond, double* ferr, double* berr,
9467                                 lapack_complex_double* work, lapack_int lwork,
9468                                 double* rwork );
9469
9470 lapack_int LAPACKE_ssysvxx_work( int matrix_layout, char fact, char uplo,
9471                                  lapack_int n, lapack_int nrhs, float* a,
9472                                  lapack_int lda, float* af, lapack_int ldaf,
9473                                  lapack_int* ipiv, char* equed, float* s,
9474                                  float* b, lapack_int ldb, float* x,
9475                                  lapack_int ldx, float* rcond, float* rpvgrw,
9476                                  float* berr, lapack_int n_err_bnds,
9477                                  float* err_bnds_norm, float* err_bnds_comp,
9478                                  lapack_int nparams, float* params, float* work,
9479                                  lapack_int* iwork );
9480 lapack_int LAPACKE_dsysvxx_work( int matrix_layout, char fact, char uplo,
9481                                  lapack_int n, lapack_int nrhs, double* a,
9482                                  lapack_int lda, double* af, lapack_int ldaf,
9483                                  lapack_int* ipiv, char* equed, double* s,
9484                                  double* b, lapack_int ldb, double* x,
9485                                  lapack_int ldx, double* rcond, double* rpvgrw,
9486                                  double* berr, lapack_int n_err_bnds,
9487                                  double* err_bnds_norm, double* err_bnds_comp,
9488                                  lapack_int nparams, double* params,
9489                                  double* work, lapack_int* iwork );
9490 lapack_int LAPACKE_csysvxx_work( int matrix_layout, char fact, char uplo,
9491                                  lapack_int n, lapack_int nrhs,
9492                                  lapack_complex_float* a, lapack_int lda,
9493                                  lapack_complex_float* af, lapack_int ldaf,
9494                                  lapack_int* ipiv, char* equed, float* s,
9495                                  lapack_complex_float* b, lapack_int ldb,
9496                                  lapack_complex_float* x, lapack_int ldx,
9497                                  float* rcond, float* rpvgrw, float* berr,
9498                                  lapack_int n_err_bnds, float* err_bnds_norm,
9499                                  float* err_bnds_comp, lapack_int nparams,
9500                                  float* params, lapack_complex_float* work,
9501                                  float* rwork );
9502 lapack_int LAPACKE_zsysvxx_work( int matrix_layout, char fact, char uplo,
9503                                  lapack_int n, lapack_int nrhs,
9504                                  lapack_complex_double* a, lapack_int lda,
9505                                  lapack_complex_double* af, lapack_int ldaf,
9506                                  lapack_int* ipiv, char* equed, double* s,
9507                                  lapack_complex_double* b, lapack_int ldb,
9508                                  lapack_complex_double* x, lapack_int ldx,
9509                                  double* rcond, double* rpvgrw, double* berr,
9510                                  lapack_int n_err_bnds, double* err_bnds_norm,
9511                                  double* err_bnds_comp, lapack_int nparams,
9512                                  double* params, lapack_complex_double* work,
9513                                  double* rwork );
9514
9515 lapack_int LAPACKE_ssytrd_work( int matrix_layout, char uplo, lapack_int n,
9516                                 float* a, lapack_int lda, float* d, float* e,
9517                                 float* tau, float* work, lapack_int lwork );
9518 lapack_int LAPACKE_dsytrd_work( int matrix_layout, char uplo, lapack_int n,
9519                                 double* a, lapack_int lda, double* d, double* e,
9520                                 double* tau, double* work, lapack_int lwork );
9521
9522 lapack_int LAPACKE_ssytrf_work( int matrix_layout, char uplo, lapack_int n,
9523                                 float* a, lapack_int lda, lapack_int* ipiv,
9524                                 float* work, lapack_int lwork );
9525 lapack_int LAPACKE_dsytrf_work( int matrix_layout, char uplo, lapack_int n,
9526                                 double* a, lapack_int lda, lapack_int* ipiv,
9527                                 double* work, lapack_int lwork );
9528 lapack_int LAPACKE_csytrf_work( int matrix_layout, char uplo, lapack_int n,
9529                                 lapack_complex_float* a, lapack_int lda,
9530                                 lapack_int* ipiv, lapack_complex_float* work,
9531                                 lapack_int lwork );
9532 lapack_int LAPACKE_zsytrf_work( int matrix_layout, char uplo, lapack_int n,
9533                                 lapack_complex_double* a, lapack_int lda,
9534                                 lapack_int* ipiv, lapack_complex_double* work,
9535                                 lapack_int lwork );
9536
9537 lapack_int LAPACKE_ssytri_work( int matrix_layout, char uplo, lapack_int n,
9538                                 float* a, lapack_int lda,
9539                                 const lapack_int* ipiv, float* work );
9540 lapack_int LAPACKE_dsytri_work( int matrix_layout, char uplo, lapack_int n,
9541                                 double* a, lapack_int lda,
9542                                 const lapack_int* ipiv, double* work );
9543 lapack_int LAPACKE_csytri_work( int matrix_layout, char uplo, lapack_int n,
9544                                 lapack_complex_float* a, lapack_int lda,
9545                                 const lapack_int* ipiv,
9546                                 lapack_complex_float* work );
9547 lapack_int LAPACKE_zsytri_work( int matrix_layout, char uplo, lapack_int n,
9548                                 lapack_complex_double* a, lapack_int lda,
9549                                 const lapack_int* ipiv,
9550                                 lapack_complex_double* work );
9551
9552 lapack_int LAPACKE_ssytrs_work( int matrix_layout, char uplo, lapack_int n,
9553                                 lapack_int nrhs, const float* a, lapack_int lda,
9554                                 const lapack_int* ipiv, float* b,
9555                                 lapack_int ldb );
9556 lapack_int LAPACKE_dsytrs_work( int matrix_layout, char uplo, lapack_int n,
9557                                 lapack_int nrhs, const double* a,
9558                                 lapack_int lda, const lapack_int* ipiv,
9559                                 double* b, lapack_int ldb );
9560 lapack_int LAPACKE_csytrs_work( int matrix_layout, char uplo, lapack_int n,
9561                                 lapack_int nrhs, const lapack_complex_float* a,
9562                                 lapack_int lda, const lapack_int* ipiv,
9563                                 lapack_complex_float* b, lapack_int ldb );
9564 lapack_int LAPACKE_zsytrs_work( int matrix_layout, char uplo, lapack_int n,
9565                                 lapack_int nrhs, const lapack_complex_double* a,
9566                                 lapack_int lda, const lapack_int* ipiv,
9567                                 lapack_complex_double* b, lapack_int ldb );
9568
9569 lapack_int LAPACKE_stbcon_work( int matrix_layout, char norm, char uplo,
9570                                 char diag, lapack_int n, lapack_int kd,
9571                                 const float* ab, lapack_int ldab, float* rcond,
9572                                 float* work, lapack_int* iwork );
9573 lapack_int LAPACKE_dtbcon_work( int matrix_layout, char norm, char uplo,
9574                                 char diag, lapack_int n, lapack_int kd,
9575                                 const double* ab, lapack_int ldab,
9576                                 double* rcond, double* work,
9577                                 lapack_int* iwork );
9578 lapack_int LAPACKE_ctbcon_work( int matrix_layout, char norm, char uplo,
9579                                 char diag, lapack_int n, lapack_int kd,
9580                                 const lapack_complex_float* ab, lapack_int ldab,
9581                                 float* rcond, lapack_complex_float* work,
9582                                 float* rwork );
9583 lapack_int LAPACKE_ztbcon_work( int matrix_layout, char norm, char uplo,
9584                                 char diag, lapack_int n, lapack_int kd,
9585                                 const lapack_complex_double* ab,
9586                                 lapack_int ldab, double* rcond,
9587                                 lapack_complex_double* work, double* rwork );
9588
9589 lapack_int LAPACKE_stbrfs_work( int matrix_layout, char uplo, char trans,
9590                                 char diag, lapack_int n, lapack_int kd,
9591                                 lapack_int nrhs, const float* ab,
9592                                 lapack_int ldab, const float* b, lapack_int ldb,
9593                                 const float* x, lapack_int ldx, float* ferr,
9594                                 float* berr, float* work, lapack_int* iwork );
9595 lapack_int LAPACKE_dtbrfs_work( int matrix_layout, char uplo, char trans,
9596                                 char diag, lapack_int n, lapack_int kd,
9597                                 lapack_int nrhs, const double* ab,
9598                                 lapack_int ldab, const double* b,
9599                                 lapack_int ldb, const double* x, lapack_int ldx,
9600                                 double* ferr, double* berr, double* work,
9601                                 lapack_int* iwork );
9602 lapack_int LAPACKE_ctbrfs_work( int matrix_layout, char uplo, char trans,
9603                                 char diag, lapack_int n, lapack_int kd,
9604                                 lapack_int nrhs, const lapack_complex_float* ab,
9605                                 lapack_int ldab, const lapack_complex_float* b,
9606                                 lapack_int ldb, const lapack_complex_float* x,
9607                                 lapack_int ldx, float* ferr, float* berr,
9608                                 lapack_complex_float* work, float* rwork );
9609 lapack_int LAPACKE_ztbrfs_work( int matrix_layout, char uplo, char trans,
9610                                 char diag, lapack_int n, lapack_int kd,
9611                                 lapack_int nrhs,
9612                                 const lapack_complex_double* ab,
9613                                 lapack_int ldab, const lapack_complex_double* b,
9614                                 lapack_int ldb, const lapack_complex_double* x,
9615                                 lapack_int ldx, double* ferr, double* berr,
9616                                 lapack_complex_double* work, double* rwork );
9617
9618 lapack_int LAPACKE_stbtrs_work( int matrix_layout, char uplo, char trans,
9619                                 char diag, lapack_int n, lapack_int kd,
9620                                 lapack_int nrhs, const float* ab,
9621                                 lapack_int ldab, float* b, lapack_int ldb );
9622 lapack_int LAPACKE_dtbtrs_work( int matrix_layout, char uplo, char trans,
9623                                 char diag, lapack_int n, lapack_int kd,
9624                                 lapack_int nrhs, const double* ab,
9625                                 lapack_int ldab, double* b, lapack_int ldb );
9626 lapack_int LAPACKE_ctbtrs_work( int matrix_layout, char uplo, char trans,
9627                                 char diag, lapack_int n, lapack_int kd,
9628                                 lapack_int nrhs, const lapack_complex_float* ab,
9629                                 lapack_int ldab, lapack_complex_float* b,
9630                                 lapack_int ldb );
9631 lapack_int LAPACKE_ztbtrs_work( int matrix_layout, char uplo, char trans,
9632                                 char diag, lapack_int n, lapack_int kd,
9633                                 lapack_int nrhs,
9634                                 const lapack_complex_double* ab,
9635                                 lapack_int ldab, lapack_complex_double* b,
9636                                 lapack_int ldb );
9637
9638 lapack_int LAPACKE_stfsm_work( int matrix_layout, char transr, char side,
9639                                char uplo, char trans, char diag, lapack_int m,
9640                                lapack_int n, float alpha, const float* a,
9641                                float* b, lapack_int ldb );
9642 lapack_int LAPACKE_dtfsm_work( int matrix_layout, char transr, char side,
9643                                char uplo, char trans, char diag, lapack_int m,
9644                                lapack_int n, double alpha, const double* a,
9645                                double* b, lapack_int ldb );
9646 lapack_int LAPACKE_ctfsm_work( int matrix_layout, char transr, char side,
9647                                char uplo, char trans, char diag, lapack_int m,
9648                                lapack_int n, lapack_complex_float alpha,
9649                                const lapack_complex_float* a,
9650                                lapack_complex_float* b, lapack_int ldb );
9651 lapack_int LAPACKE_ztfsm_work( int matrix_layout, char transr, char side,
9652                                char uplo, char trans, char diag, lapack_int m,
9653                                lapack_int n, lapack_complex_double alpha,
9654                                const lapack_complex_double* a,
9655                                lapack_complex_double* b, lapack_int ldb );
9656
9657 lapack_int LAPACKE_stftri_work( int matrix_layout, char transr, char uplo,
9658                                 char diag, lapack_int n, float* a );
9659 lapack_int LAPACKE_dtftri_work( int matrix_layout, char transr, char uplo,
9660                                 char diag, lapack_int n, double* a );
9661 lapack_int LAPACKE_ctftri_work( int matrix_layout, char transr, char uplo,
9662                                 char diag, lapack_int n,
9663                                 lapack_complex_float* a );
9664 lapack_int LAPACKE_ztftri_work( int matrix_layout, char transr, char uplo,
9665                                 char diag, lapack_int n,
9666                                 lapack_complex_double* a );
9667
9668 lapack_int LAPACKE_stfttp_work( int matrix_layout, char transr, char uplo,
9669                                 lapack_int n, const float* arf, float* ap );
9670 lapack_int LAPACKE_dtfttp_work( int matrix_layout, char transr, char uplo,
9671                                 lapack_int n, const double* arf, double* ap );
9672 lapack_int LAPACKE_ctfttp_work( int matrix_layout, char transr, char uplo,
9673                                 lapack_int n, const lapack_complex_float* arf,
9674                                 lapack_complex_float* ap );
9675 lapack_int LAPACKE_ztfttp_work( int matrix_layout, char transr, char uplo,
9676                                 lapack_int n, const lapack_complex_double* arf,
9677                                 lapack_complex_double* ap );
9678
9679 lapack_int LAPACKE_stfttr_work( int matrix_layout, char transr, char uplo,
9680                                 lapack_int n, const float* arf, float* a,
9681                                 lapack_int lda );
9682 lapack_int LAPACKE_dtfttr_work( int matrix_layout, char transr, char uplo,
9683                                 lapack_int n, const double* arf, double* a,
9684                                 lapack_int lda );
9685 lapack_int LAPACKE_ctfttr_work( int matrix_layout, char transr, char uplo,
9686                                 lapack_int n, const lapack_complex_float* arf,
9687                                 lapack_complex_float* a, lapack_int lda );
9688 lapack_int LAPACKE_ztfttr_work( int matrix_layout, char transr, char uplo,
9689                                 lapack_int n, const lapack_complex_double* arf,
9690                                 lapack_complex_double* a, lapack_int lda );
9691
9692 lapack_int LAPACKE_stgevc_work( int matrix_layout, char side, char howmny,
9693                                 const lapack_logical* select, lapack_int n,
9694                                 const float* s, lapack_int lds, const float* p,
9695                                 lapack_int ldp, float* vl, lapack_int ldvl,
9696                                 float* vr, lapack_int ldvr, lapack_int mm,
9697                                 lapack_int* m, float* work );
9698 lapack_int LAPACKE_dtgevc_work( int matrix_layout, char side, char howmny,
9699                                 const lapack_logical* select, lapack_int n,
9700                                 const double* s, lapack_int lds,
9701                                 const double* p, lapack_int ldp, double* vl,
9702                                 lapack_int ldvl, double* vr, lapack_int ldvr,
9703                                 lapack_int mm, lapack_int* m, double* work );
9704 lapack_int LAPACKE_ctgevc_work( int matrix_layout, char side, char howmny,
9705                                 const lapack_logical* select, lapack_int n,
9706                                 const lapack_complex_float* s, lapack_int lds,
9707                                 const lapack_complex_float* p, lapack_int ldp,
9708                                 lapack_complex_float* vl, lapack_int ldvl,
9709                                 lapack_complex_float* vr, lapack_int ldvr,
9710                                 lapack_int mm, lapack_int* m,
9711                                 lapack_complex_float* work, float* rwork );
9712 lapack_int LAPACKE_ztgevc_work( int matrix_layout, char side, char howmny,
9713                                 const lapack_logical* select, lapack_int n,
9714                                 const lapack_complex_double* s, lapack_int lds,
9715                                 const lapack_complex_double* p, lapack_int ldp,
9716                                 lapack_complex_double* vl, lapack_int ldvl,
9717                                 lapack_complex_double* vr, lapack_int ldvr,
9718                                 lapack_int mm, lapack_int* m,
9719                                 lapack_complex_double* work, double* rwork );
9720
9721 lapack_int LAPACKE_stgexc_work( int matrix_layout, lapack_logical wantq,
9722                                 lapack_logical wantz, lapack_int n, float* a,
9723                                 lapack_int lda, float* b, lapack_int ldb,
9724                                 float* q, lapack_int ldq, float* z,
9725                                 lapack_int ldz, lapack_int* ifst,
9726                                 lapack_int* ilst, float* work,
9727                                 lapack_int lwork );
9728 lapack_int LAPACKE_dtgexc_work( int matrix_layout, lapack_logical wantq,
9729                                 lapack_logical wantz, lapack_int n, double* a,
9730                                 lapack_int lda, double* b, lapack_int ldb,
9731                                 double* q, lapack_int ldq, double* z,
9732                                 lapack_int ldz, lapack_int* ifst,
9733                                 lapack_int* ilst, double* work,
9734                                 lapack_int lwork );
9735 lapack_int LAPACKE_ctgexc_work( int matrix_layout, lapack_logical wantq,
9736                                 lapack_logical wantz, lapack_int n,
9737                                 lapack_complex_float* a, lapack_int lda,
9738                                 lapack_complex_float* b, lapack_int ldb,
9739                                 lapack_complex_float* q, lapack_int ldq,
9740                                 lapack_complex_float* z, lapack_int ldz,
9741                                 lapack_int ifst, lapack_int ilst );
9742 lapack_int LAPACKE_ztgexc_work( int matrix_layout, lapack_logical wantq,
9743                                 lapack_logical wantz, lapack_int n,
9744                                 lapack_complex_double* a, lapack_int lda,
9745                                 lapack_complex_double* b, lapack_int ldb,
9746                                 lapack_complex_double* q, lapack_int ldq,
9747                                 lapack_complex_double* z, lapack_int ldz,
9748                                 lapack_int ifst, lapack_int ilst );
9749
9750 lapack_int LAPACKE_stgsen_work( int matrix_layout, lapack_int ijob,
9751                                 lapack_logical wantq, lapack_logical wantz,
9752                                 const lapack_logical* select, lapack_int n,
9753                                 float* a, lapack_int lda, float* b,
9754                                 lapack_int ldb, float* alphar, float* alphai,
9755                                 float* beta, float* q, lapack_int ldq, float* z,
9756                                 lapack_int ldz, lapack_int* m, float* pl,
9757                                 float* pr, float* dif, float* work,
9758                                 lapack_int lwork, lapack_int* iwork,
9759                                 lapack_int liwork );
9760 lapack_int LAPACKE_dtgsen_work( int matrix_layout, lapack_int ijob,
9761                                 lapack_logical wantq, lapack_logical wantz,
9762                                 const lapack_logical* select, lapack_int n,
9763                                 double* a, lapack_int lda, double* b,
9764                                 lapack_int ldb, double* alphar, double* alphai,
9765                                 double* beta, double* q, lapack_int ldq,
9766                                 double* z, lapack_int ldz, lapack_int* m,
9767                                 double* pl, double* pr, double* dif,
9768                                 double* work, lapack_int lwork,
9769                                 lapack_int* iwork, lapack_int liwork );
9770 lapack_int LAPACKE_ctgsen_work( int matrix_layout, lapack_int ijob,
9771                                 lapack_logical wantq, lapack_logical wantz,
9772                                 const lapack_logical* select, lapack_int n,
9773                                 lapack_complex_float* a, lapack_int lda,
9774                                 lapack_complex_float* b, lapack_int ldb,
9775                                 lapack_complex_float* alpha,
9776                                 lapack_complex_float* beta,
9777                                 lapack_complex_float* q, lapack_int ldq,
9778                                 lapack_complex_float* z, lapack_int ldz,
9779                                 lapack_int* m, float* pl, float* pr, float* dif,
9780                                 lapack_complex_float* work, lapack_int lwork,
9781                                 lapack_int* iwork, lapack_int liwork );
9782 lapack_int LAPACKE_ztgsen_work( int matrix_layout, lapack_int ijob,
9783                                 lapack_logical wantq, lapack_logical wantz,
9784                                 const lapack_logical* select, lapack_int n,
9785                                 lapack_complex_double* a, lapack_int lda,
9786                                 lapack_complex_double* b, lapack_int ldb,
9787                                 lapack_complex_double* alpha,
9788                                 lapack_complex_double* beta,
9789                                 lapack_complex_double* q, lapack_int ldq,
9790                                 lapack_complex_double* z, lapack_int ldz,
9791                                 lapack_int* m, double* pl, double* pr,
9792                                 double* dif, lapack_complex_double* work,
9793                                 lapack_int lwork, lapack_int* iwork,
9794                                 lapack_int liwork );
9795
9796 lapack_int LAPACKE_stgsja_work( int matrix_layout, char jobu, char jobv,
9797                                 char jobq, lapack_int m, lapack_int p,
9798                                 lapack_int n, lapack_int k, lapack_int l,
9799                                 float* a, lapack_int lda, float* b,
9800                                 lapack_int ldb, float tola, float tolb,
9801                                 float* alpha, float* beta, float* u,
9802                                 lapack_int ldu, float* v, lapack_int ldv,
9803                                 float* q, lapack_int ldq, float* work,
9804                                 lapack_int* ncycle );
9805 lapack_int LAPACKE_dtgsja_work( int matrix_layout, char jobu, char jobv,
9806                                 char jobq, lapack_int m, lapack_int p,
9807                                 lapack_int n, lapack_int k, lapack_int l,
9808                                 double* a, lapack_int lda, double* b,
9809                                 lapack_int ldb, double tola, double tolb,
9810                                 double* alpha, double* beta, double* u,
9811                                 lapack_int ldu, double* v, lapack_int ldv,
9812                                 double* q, lapack_int ldq, double* work,
9813                                 lapack_int* ncycle );
9814 lapack_int LAPACKE_ctgsja_work( int matrix_layout, char jobu, char jobv,
9815                                 char jobq, lapack_int m, lapack_int p,
9816                                 lapack_int n, lapack_int k, lapack_int l,
9817                                 lapack_complex_float* a, lapack_int lda,
9818                                 lapack_complex_float* b, lapack_int ldb,
9819                                 float tola, float tolb, float* alpha,
9820                                 float* beta, lapack_complex_float* u,
9821                                 lapack_int ldu, lapack_complex_float* v,
9822                                 lapack_int ldv, lapack_complex_float* q,
9823                                 lapack_int ldq, lapack_complex_float* work,
9824                                 lapack_int* ncycle );
9825 lapack_int LAPACKE_ztgsja_work( int matrix_layout, char jobu, char jobv,
9826                                 char jobq, lapack_int m, lapack_int p,
9827                                 lapack_int n, lapack_int k, lapack_int l,
9828                                 lapack_complex_double* a, lapack_int lda,
9829                                 lapack_complex_double* b, lapack_int ldb,
9830                                 double tola, double tolb, double* alpha,
9831                                 double* beta, lapack_complex_double* u,
9832                                 lapack_int ldu, lapack_complex_double* v,
9833                                 lapack_int ldv, lapack_complex_double* q,
9834                                 lapack_int ldq, lapack_complex_double* work,
9835                                 lapack_int* ncycle );
9836
9837 lapack_int LAPACKE_stgsna_work( int matrix_layout, char job, char howmny,
9838                                 const lapack_logical* select, lapack_int n,
9839                                 const float* a, lapack_int lda, const float* b,
9840                                 lapack_int ldb, const float* vl,
9841                                 lapack_int ldvl, const float* vr,
9842                                 lapack_int ldvr, float* s, float* dif,
9843                                 lapack_int mm, lapack_int* m, float* work,
9844                                 lapack_int lwork, lapack_int* iwork );
9845 lapack_int LAPACKE_dtgsna_work( int matrix_layout, char job, char howmny,
9846                                 const lapack_logical* select, lapack_int n,
9847                                 const double* a, lapack_int lda,
9848                                 const double* b, lapack_int ldb,
9849                                 const double* vl, lapack_int ldvl,
9850                                 const double* vr, lapack_int ldvr, double* s,
9851                                 double* dif, lapack_int mm, lapack_int* m,
9852                                 double* work, lapack_int lwork,
9853                                 lapack_int* iwork );
9854 lapack_int LAPACKE_ctgsna_work( int matrix_layout, char job, char howmny,
9855                                 const lapack_logical* select, lapack_int n,
9856                                 const lapack_complex_float* a, lapack_int lda,
9857                                 const lapack_complex_float* b, lapack_int ldb,
9858                                 const lapack_complex_float* vl, lapack_int ldvl,
9859                                 const lapack_complex_float* vr, lapack_int ldvr,
9860                                 float* s, float* dif, lapack_int mm,
9861                                 lapack_int* m, lapack_complex_float* work,
9862                                 lapack_int lwork, lapack_int* iwork );
9863 lapack_int LAPACKE_ztgsna_work( int matrix_layout, char job, char howmny,
9864                                 const lapack_logical* select, lapack_int n,
9865                                 const lapack_complex_double* a, lapack_int lda,
9866                                 const lapack_complex_double* b, lapack_int ldb,
9867                                 const lapack_complex_double* vl,
9868                                 lapack_int ldvl,
9869                                 const lapack_complex_double* vr,
9870                                 lapack_int ldvr, double* s, double* dif,
9871                                 lapack_int mm, lapack_int* m,
9872                                 lapack_complex_double* work, lapack_int lwork,
9873                                 lapack_int* iwork );
9874
9875 lapack_int LAPACKE_stgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9876                                 lapack_int m, lapack_int n, const float* a,
9877                                 lapack_int lda, const float* b, lapack_int ldb,
9878                                 float* c, lapack_int ldc, const float* d,
9879                                 lapack_int ldd, const float* e, lapack_int lde,
9880                                 float* f, lapack_int ldf, float* scale,
9881                                 float* dif, float* work, lapack_int lwork,
9882                                 lapack_int* iwork );
9883 lapack_int LAPACKE_dtgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9884                                 lapack_int m, lapack_int n, const double* a,
9885                                 lapack_int lda, const double* b, lapack_int ldb,
9886                                 double* c, lapack_int ldc, const double* d,
9887                                 lapack_int ldd, const double* e, lapack_int lde,
9888                                 double* f, lapack_int ldf, double* scale,
9889                                 double* dif, double* work, lapack_int lwork,
9890                                 lapack_int* iwork );
9891 lapack_int LAPACKE_ctgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9892                                 lapack_int m, lapack_int n,
9893                                 const lapack_complex_float* a, lapack_int lda,
9894                                 const lapack_complex_float* b, lapack_int ldb,
9895                                 lapack_complex_float* c, lapack_int ldc,
9896                                 const lapack_complex_float* d, lapack_int ldd,
9897                                 const lapack_complex_float* e, lapack_int lde,
9898                                 lapack_complex_float* f, lapack_int ldf,
9899                                 float* scale, float* dif,
9900                                 lapack_complex_float* work, lapack_int lwork,
9901                                 lapack_int* iwork );
9902 lapack_int LAPACKE_ztgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9903                                 lapack_int m, lapack_int n,
9904                                 const lapack_complex_double* a, lapack_int lda,
9905                                 const lapack_complex_double* b, lapack_int ldb,
9906                                 lapack_complex_double* c, lapack_int ldc,
9907                                 const lapack_complex_double* d, lapack_int ldd,
9908                                 const lapack_complex_double* e, lapack_int lde,
9909                                 lapack_complex_double* f, lapack_int ldf,
9910                                 double* scale, double* dif,
9911                                 lapack_complex_double* work, lapack_int lwork,
9912                                 lapack_int* iwork );
9913
9914 lapack_int LAPACKE_stpcon_work( int matrix_layout, char norm, char uplo,
9915                                 char diag, lapack_int n, const float* ap,
9916                                 float* rcond, float* work, lapack_int* iwork );
9917 lapack_int LAPACKE_dtpcon_work( int matrix_layout, char norm, char uplo,
9918                                 char diag, lapack_int n, const double* ap,
9919                                 double* rcond, double* work,
9920                                 lapack_int* iwork );
9921 lapack_int LAPACKE_ctpcon_work( int matrix_layout, char norm, char uplo,
9922                                 char diag, lapack_int n,
9923                                 const lapack_complex_float* ap, float* rcond,
9924                                 lapack_complex_float* work, float* rwork );
9925 lapack_int LAPACKE_ztpcon_work( int matrix_layout, char norm, char uplo,
9926                                 char diag, lapack_int n,
9927                                 const lapack_complex_double* ap, double* rcond,
9928                                 lapack_complex_double* work, double* rwork );
9929
9930 lapack_int LAPACKE_stprfs_work( int matrix_layout, char uplo, char trans,
9931                                 char diag, lapack_int n, lapack_int nrhs,
9932                                 const float* ap, const float* b, lapack_int ldb,
9933                                 const float* x, lapack_int ldx, float* ferr,
9934                                 float* berr, float* work, lapack_int* iwork );
9935 lapack_int LAPACKE_dtprfs_work( int matrix_layout, char uplo, char trans,
9936                                 char diag, lapack_int n, lapack_int nrhs,
9937                                 const double* ap, const double* b,
9938                                 lapack_int ldb, const double* x, lapack_int ldx,
9939                                 double* ferr, double* berr, double* work,
9940                                 lapack_int* iwork );
9941 lapack_int LAPACKE_ctprfs_work( int matrix_layout, char uplo, char trans,
9942                                 char diag, lapack_int n, lapack_int nrhs,
9943                                 const lapack_complex_float* ap,
9944                                 const lapack_complex_float* b, lapack_int ldb,
9945                                 const lapack_complex_float* x, lapack_int ldx,
9946                                 float* ferr, float* berr,
9947                                 lapack_complex_float* work, float* rwork );
9948 lapack_int LAPACKE_ztprfs_work( int matrix_layout, char uplo, char trans,
9949                                 char diag, lapack_int n, lapack_int nrhs,
9950                                 const lapack_complex_double* ap,
9951                                 const lapack_complex_double* b, lapack_int ldb,
9952                                 const lapack_complex_double* x, lapack_int ldx,
9953                                 double* ferr, double* berr,
9954                                 lapack_complex_double* work, double* rwork );
9955
9956 lapack_int LAPACKE_stptri_work( int matrix_layout, char uplo, char diag,
9957                                 lapack_int n, float* ap );
9958 lapack_int LAPACKE_dtptri_work( int matrix_layout, char uplo, char diag,
9959                                 lapack_int n, double* ap );
9960 lapack_int LAPACKE_ctptri_work( int matrix_layout, char uplo, char diag,
9961                                 lapack_int n, lapack_complex_float* ap );
9962 lapack_int LAPACKE_ztptri_work( int matrix_layout, char uplo, char diag,
9963                                 lapack_int n, lapack_complex_double* ap );
9964
9965 lapack_int LAPACKE_stptrs_work( int matrix_layout, char uplo, char trans,
9966                                 char diag, lapack_int n, lapack_int nrhs,
9967                                 const float* ap, float* b, lapack_int ldb );
9968 lapack_int LAPACKE_dtptrs_work( int matrix_layout, char uplo, char trans,
9969                                 char diag, lapack_int n, lapack_int nrhs,
9970                                 const double* ap, double* b, lapack_int ldb );
9971 lapack_int LAPACKE_ctptrs_work( int matrix_layout, char uplo, char trans,
9972                                 char diag, lapack_int n, lapack_int nrhs,
9973                                 const lapack_complex_float* ap,
9974                                 lapack_complex_float* b, lapack_int ldb );
9975 lapack_int LAPACKE_ztptrs_work( int matrix_layout, char uplo, char trans,
9976                                 char diag, lapack_int n, lapack_int nrhs,
9977                                 const lapack_complex_double* ap,
9978                                 lapack_complex_double* b, lapack_int ldb );
9979
9980 lapack_int LAPACKE_stpttf_work( int matrix_layout, char transr, char uplo,
9981                                 lapack_int n, const float* ap, float* arf );
9982 lapack_int LAPACKE_dtpttf_work( int matrix_layout, char transr, char uplo,
9983                                 lapack_int n, const double* ap, double* arf );
9984 lapack_int LAPACKE_ctpttf_work( int matrix_layout, char transr, char uplo,
9985                                 lapack_int n, const lapack_complex_float* ap,
9986                                 lapack_complex_float* arf );
9987 lapack_int LAPACKE_ztpttf_work( int matrix_layout, char transr, char uplo,
9988                                 lapack_int n, const lapack_complex_double* ap,
9989                                 lapack_complex_double* arf );
9990
9991 lapack_int LAPACKE_stpttr_work( int matrix_layout, char uplo, lapack_int n,
9992                                 const float* ap, float* a, lapack_int lda );
9993 lapack_int LAPACKE_dtpttr_work( int matrix_layout, char uplo, lapack_int n,
9994                                 const double* ap, double* a, lapack_int lda );
9995 lapack_int LAPACKE_ctpttr_work( int matrix_layout, char uplo, lapack_int n,
9996                                 const lapack_complex_float* ap,
9997                                 lapack_complex_float* a, lapack_int lda );
9998 lapack_int LAPACKE_ztpttr_work( int matrix_layout, char uplo, lapack_int n,
9999                                 const lapack_complex_double* ap,
10000                                 lapack_complex_double* a, lapack_int lda );
10001
10002 lapack_int LAPACKE_strcon_work( int matrix_layout, char norm, char uplo,
10003                                 char diag, lapack_int n, const float* a,
10004                                 lapack_int lda, float* rcond, float* work,
10005                                 lapack_int* iwork );
10006 lapack_int LAPACKE_dtrcon_work( int matrix_layout, char norm, char uplo,
10007                                 char diag, lapack_int n, const double* a,
10008                                 lapack_int lda, double* rcond, double* work,
10009                                 lapack_int* iwork );
10010 lapack_int LAPACKE_ctrcon_work( int matrix_layout, char norm, char uplo,
10011                                 char diag, lapack_int n,
10012                                 const lapack_complex_float* a, lapack_int lda,
10013                                 float* rcond, lapack_complex_float* work,
10014                                 float* rwork );
10015 lapack_int LAPACKE_ztrcon_work( int matrix_layout, char norm, char uplo,
10016                                 char diag, lapack_int n,
10017                                 const lapack_complex_double* a, lapack_int lda,
10018                                 double* rcond, lapack_complex_double* work,
10019                                 double* rwork );
10020
10021 lapack_int LAPACKE_strevc_work( int matrix_layout, char side, char howmny,
10022                                 lapack_logical* select, lapack_int n,
10023                                 const float* t, lapack_int ldt, float* vl,
10024                                 lapack_int ldvl, float* vr, lapack_int ldvr,
10025                                 lapack_int mm, lapack_int* m, float* work );
10026 lapack_int LAPACKE_dtrevc_work( int matrix_layout, char side, char howmny,
10027                                 lapack_logical* select, lapack_int n,
10028                                 const double* t, lapack_int ldt, double* vl,
10029                                 lapack_int ldvl, double* vr, lapack_int ldvr,
10030                                 lapack_int mm, lapack_int* m, double* work );
10031 lapack_int LAPACKE_ctrevc_work( int matrix_layout, char side, char howmny,
10032                                 const lapack_logical* select, lapack_int n,
10033                                 lapack_complex_float* t, lapack_int ldt,
10034                                 lapack_complex_float* vl, lapack_int ldvl,
10035                                 lapack_complex_float* vr, lapack_int ldvr,
10036                                 lapack_int mm, lapack_int* m,
10037                                 lapack_complex_float* work, float* rwork );
10038 lapack_int LAPACKE_ztrevc_work( int matrix_layout, char side, char howmny,
10039                                 const lapack_logical* select, lapack_int n,
10040                                 lapack_complex_double* t, lapack_int ldt,
10041                                 lapack_complex_double* vl, lapack_int ldvl,
10042                                 lapack_complex_double* vr, lapack_int ldvr,
10043                                 lapack_int mm, lapack_int* m,
10044                                 lapack_complex_double* work, double* rwork );
10045
10046 lapack_int LAPACKE_strexc_work( int matrix_layout, char compq, lapack_int n,
10047                                 float* t, lapack_int ldt, float* q,
10048                                 lapack_int ldq, lapack_int* ifst,
10049                                 lapack_int* ilst, float* work );
10050 lapack_int LAPACKE_dtrexc_work( int matrix_layout, char compq, lapack_int n,
10051                                 double* t, lapack_int ldt, double* q,
10052                                 lapack_int ldq, lapack_int* ifst,
10053                                 lapack_int* ilst, double* work );
10054 lapack_int LAPACKE_ctrexc_work( int matrix_layout, char compq, lapack_int n,
10055                                 lapack_complex_float* t, lapack_int ldt,
10056                                 lapack_complex_float* q, lapack_int ldq,
10057                                 lapack_int ifst, lapack_int ilst );
10058 lapack_int LAPACKE_ztrexc_work( int matrix_layout, char compq, lapack_int n,
10059                                 lapack_complex_double* t, lapack_int ldt,
10060                                 lapack_complex_double* q, lapack_int ldq,
10061                                 lapack_int ifst, lapack_int ilst );
10062
10063 lapack_int LAPACKE_strrfs_work( int matrix_layout, char uplo, char trans,
10064                                 char diag, lapack_int n, lapack_int nrhs,
10065                                 const float* a, lapack_int lda, const float* b,
10066                                 lapack_int ldb, const float* x, lapack_int ldx,
10067                                 float* ferr, float* berr, float* work,
10068                                 lapack_int* iwork );
10069 lapack_int LAPACKE_dtrrfs_work( int matrix_layout, char uplo, char trans,
10070                                 char diag, lapack_int n, lapack_int nrhs,
10071                                 const double* a, lapack_int lda,
10072                                 const double* b, lapack_int ldb,
10073                                 const double* x, lapack_int ldx, double* ferr,
10074                                 double* berr, double* work, lapack_int* iwork );
10075 lapack_int LAPACKE_ctrrfs_work( int matrix_layout, char uplo, char trans,
10076                                 char diag, lapack_int n, lapack_int nrhs,
10077                                 const lapack_complex_float* a, lapack_int lda,
10078                                 const lapack_complex_float* b, lapack_int ldb,
10079                                 const lapack_complex_float* x, lapack_int ldx,
10080                                 float* ferr, float* berr,
10081                                 lapack_complex_float* work, float* rwork );
10082 lapack_int LAPACKE_ztrrfs_work( int matrix_layout, char uplo, char trans,
10083                                 char diag, lapack_int n, lapack_int nrhs,
10084                                 const lapack_complex_double* a, lapack_int lda,
10085                                 const lapack_complex_double* b, lapack_int ldb,
10086                                 const lapack_complex_double* x, lapack_int ldx,
10087                                 double* ferr, double* berr,
10088                                 lapack_complex_double* work, double* rwork );
10089
10090 lapack_int LAPACKE_strsen_work( int matrix_layout, char job, char compq,
10091                                 const lapack_logical* select, lapack_int n,
10092                                 float* t, lapack_int ldt, float* q,
10093                                 lapack_int ldq, float* wr, float* wi,
10094                                 lapack_int* m, float* s, float* sep,
10095                                 float* work, lapack_int lwork,
10096                                 lapack_int* iwork, lapack_int liwork );
10097 lapack_int LAPACKE_dtrsen_work( int matrix_layout, char job, char compq,
10098                                 const lapack_logical* select, lapack_int n,
10099                                 double* t, lapack_int ldt, double* q,
10100                                 lapack_int ldq, double* wr, double* wi,
10101                                 lapack_int* m, double* s, double* sep,
10102                                 double* work, lapack_int lwork,
10103                                 lapack_int* iwork, lapack_int liwork );
10104 lapack_int LAPACKE_ctrsen_work( int matrix_layout, char job, char compq,
10105                                 const lapack_logical* select, lapack_int n,
10106                                 lapack_complex_float* t, lapack_int ldt,
10107                                 lapack_complex_float* q, lapack_int ldq,
10108                                 lapack_complex_float* w, lapack_int* m,
10109                                 float* s, float* sep,
10110                                 lapack_complex_float* work, lapack_int lwork );
10111 lapack_int LAPACKE_ztrsen_work( int matrix_layout, char job, char compq,
10112                                 const lapack_logical* select, lapack_int n,
10113                                 lapack_complex_double* t, lapack_int ldt,
10114                                 lapack_complex_double* q, lapack_int ldq,
10115                                 lapack_complex_double* w, lapack_int* m,
10116                                 double* s, double* sep,
10117                                 lapack_complex_double* work, lapack_int lwork );
10118
10119 lapack_int LAPACKE_strsna_work( int matrix_layout, char job, char howmny,
10120                                 const lapack_logical* select, lapack_int n,
10121                                 const float* t, lapack_int ldt, const float* vl,
10122                                 lapack_int ldvl, const float* vr,
10123                                 lapack_int ldvr, float* s, float* sep,
10124                                 lapack_int mm, lapack_int* m, float* work,
10125                                 lapack_int ldwork, lapack_int* iwork );
10126 lapack_int LAPACKE_dtrsna_work( int matrix_layout, char job, char howmny,
10127                                 const lapack_logical* select, lapack_int n,
10128                                 const double* t, lapack_int ldt,
10129                                 const double* vl, lapack_int ldvl,
10130                                 const double* vr, lapack_int ldvr, double* s,
10131                                 double* sep, lapack_int mm, lapack_int* m,
10132                                 double* work, lapack_int ldwork,
10133                                 lapack_int* iwork );
10134 lapack_int LAPACKE_ctrsna_work( int matrix_layout, char job, char howmny,
10135                                 const lapack_logical* select, lapack_int n,
10136                                 const lapack_complex_float* t, lapack_int ldt,
10137                                 const lapack_complex_float* vl, lapack_int ldvl,
10138                                 const lapack_complex_float* vr, lapack_int ldvr,
10139                                 float* s, float* sep, lapack_int mm,
10140                                 lapack_int* m, lapack_complex_float* work,
10141                                 lapack_int ldwork, float* rwork );
10142 lapack_int LAPACKE_ztrsna_work( int matrix_layout, char job, char howmny,
10143                                 const lapack_logical* select, lapack_int n,
10144                                 const lapack_complex_double* t, lapack_int ldt,
10145                                 const lapack_complex_double* vl,
10146                                 lapack_int ldvl,
10147                                 const lapack_complex_double* vr,
10148                                 lapack_int ldvr, double* s, double* sep,
10149                                 lapack_int mm, lapack_int* m,
10150                                 lapack_complex_double* work, lapack_int ldwork,
10151                                 double* rwork );
10152
10153 lapack_int LAPACKE_strsyl_work( int matrix_layout, char trana, char tranb,
10154                                 lapack_int isgn, lapack_int m, lapack_int n,
10155                                 const float* a, lapack_int lda, const float* b,
10156                                 lapack_int ldb, float* c, lapack_int ldc,
10157                                 float* scale );
10158 lapack_int LAPACKE_dtrsyl_work( int matrix_layout, char trana, char tranb,
10159                                 lapack_int isgn, lapack_int m, lapack_int n,
10160                                 const double* a, lapack_int lda,
10161                                 const double* b, lapack_int ldb, double* c,
10162                                 lapack_int ldc, double* scale );
10163 lapack_int LAPACKE_ctrsyl_work( int matrix_layout, char trana, char tranb,
10164                                 lapack_int isgn, lapack_int m, lapack_int n,
10165                                 const lapack_complex_float* a, lapack_int lda,
10166                                 const lapack_complex_float* b, lapack_int ldb,
10167                                 lapack_complex_float* c, lapack_int ldc,
10168                                 float* scale );
10169 lapack_int LAPACKE_ztrsyl_work( int matrix_layout, char trana, char tranb,
10170                                 lapack_int isgn, lapack_int m, lapack_int n,
10171                                 const lapack_complex_double* a, lapack_int lda,
10172                                 const lapack_complex_double* b, lapack_int ldb,
10173                                 lapack_complex_double* c, lapack_int ldc,
10174                                 double* scale );
10175
10176 lapack_int LAPACKE_strtri_work( int matrix_layout, char uplo, char diag,
10177                                 lapack_int n, float* a, lapack_int lda );
10178 lapack_int LAPACKE_dtrtri_work( int matrix_layout, char uplo, char diag,
10179                                 lapack_int n, double* a, lapack_int lda );
10180 lapack_int LAPACKE_ctrtri_work( int matrix_layout, char uplo, char diag,
10181                                 lapack_int n, lapack_complex_float* a,
10182                                 lapack_int lda );
10183 lapack_int LAPACKE_ztrtri_work( int matrix_layout, char uplo, char diag,
10184                                 lapack_int n, lapack_complex_double* a,
10185                                 lapack_int lda );
10186
10187 lapack_int LAPACKE_strtrs_work( int matrix_layout, char uplo, char trans,
10188                                 char diag, lapack_int n, lapack_int nrhs,
10189                                 const float* a, lapack_int lda, float* b,
10190                                 lapack_int ldb );
10191 lapack_int LAPACKE_dtrtrs_work( int matrix_layout, char uplo, char trans,
10192                                 char diag, lapack_int n, lapack_int nrhs,
10193                                 const double* a, lapack_int lda, double* b,
10194                                 lapack_int ldb );
10195 lapack_int LAPACKE_ctrtrs_work( int matrix_layout, char uplo, char trans,
10196                                 char diag, lapack_int n, lapack_int nrhs,
10197                                 const lapack_complex_float* a, lapack_int lda,
10198                                 lapack_complex_float* b, lapack_int ldb );
10199 lapack_int LAPACKE_ztrtrs_work( int matrix_layout, char uplo, char trans,
10200                                 char diag, lapack_int n, lapack_int nrhs,
10201                                 const lapack_complex_double* a, lapack_int lda,
10202                                 lapack_complex_double* b, lapack_int ldb );
10203
10204 lapack_int LAPACKE_strttf_work( int matrix_layout, char transr, char uplo,
10205                                 lapack_int n, const float* a, lapack_int lda,
10206                                 float* arf );
10207 lapack_int LAPACKE_dtrttf_work( int matrix_layout, char transr, char uplo,
10208                                 lapack_int n, const double* a, lapack_int lda,
10209                                 double* arf );
10210 lapack_int LAPACKE_ctrttf_work( int matrix_layout, char transr, char uplo,
10211                                 lapack_int n, const lapack_complex_float* a,
10212                                 lapack_int lda, lapack_complex_float* arf );
10213 lapack_int LAPACKE_ztrttf_work( int matrix_layout, char transr, char uplo,
10214                                 lapack_int n, const lapack_complex_double* a,
10215                                 lapack_int lda, lapack_complex_double* arf );
10216
10217 lapack_int LAPACKE_strttp_work( int matrix_layout, char uplo, lapack_int n,
10218                                 const float* a, lapack_int lda, float* ap );
10219 lapack_int LAPACKE_dtrttp_work( int matrix_layout, char uplo, lapack_int n,
10220                                 const double* a, lapack_int lda, double* ap );
10221 lapack_int LAPACKE_ctrttp_work( int matrix_layout, char uplo, lapack_int n,
10222                                 const lapack_complex_float* a, lapack_int lda,
10223                                 lapack_complex_float* ap );
10224 lapack_int LAPACKE_ztrttp_work( int matrix_layout, char uplo, lapack_int n,
10225                                 const lapack_complex_double* a, lapack_int lda,
10226                                 lapack_complex_double* ap );
10227
10228 lapack_int LAPACKE_stzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10229                                 float* a, lapack_int lda, float* tau,
10230                                 float* work, lapack_int lwork );
10231 lapack_int LAPACKE_dtzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10232                                 double* a, lapack_int lda, double* tau,
10233                                 double* work, lapack_int lwork );
10234 lapack_int LAPACKE_ctzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10235                                 lapack_complex_float* a, lapack_int lda,
10236                                 lapack_complex_float* tau,
10237                                 lapack_complex_float* work, lapack_int lwork );
10238 lapack_int LAPACKE_ztzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10239                                 lapack_complex_double* a, lapack_int lda,
10240                                 lapack_complex_double* tau,
10241                                 lapack_complex_double* work, lapack_int lwork );
10242
10243 lapack_int LAPACKE_cungbr_work( int matrix_layout, char vect, lapack_int m,
10244                                 lapack_int n, lapack_int k,
10245                                 lapack_complex_float* a, lapack_int lda,
10246                                 const lapack_complex_float* tau,
10247                                 lapack_complex_float* work, lapack_int lwork );
10248 lapack_int LAPACKE_zungbr_work( int matrix_layout, char vect, lapack_int m,
10249                                 lapack_int n, lapack_int k,
10250                                 lapack_complex_double* a, lapack_int lda,
10251                                 const lapack_complex_double* tau,
10252                                 lapack_complex_double* work, lapack_int lwork );
10253
10254 lapack_int LAPACKE_cunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
10255                                 lapack_int ihi, lapack_complex_float* a,
10256                                 lapack_int lda, const lapack_complex_float* tau,
10257                                 lapack_complex_float* work, lapack_int lwork );
10258 lapack_int LAPACKE_zunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
10259                                 lapack_int ihi, lapack_complex_double* a,
10260                                 lapack_int lda,
10261                                 const lapack_complex_double* tau,
10262                                 lapack_complex_double* work, lapack_int lwork );
10263
10264 lapack_int LAPACKE_cunglq_work( int matrix_layout, lapack_int m, lapack_int n,
10265                                 lapack_int k, lapack_complex_float* a,
10266                                 lapack_int lda, const lapack_complex_float* tau,
10267                                 lapack_complex_float* work, lapack_int lwork );
10268 lapack_int LAPACKE_zunglq_work( int matrix_layout, lapack_int m, lapack_int n,
10269                                 lapack_int k, lapack_complex_double* a,
10270                                 lapack_int lda,
10271                                 const lapack_complex_double* tau,
10272                                 lapack_complex_double* work, lapack_int lwork );
10273
10274 lapack_int LAPACKE_cungql_work( int matrix_layout, lapack_int m, lapack_int n,
10275                                 lapack_int k, lapack_complex_float* a,
10276                                 lapack_int lda, const lapack_complex_float* tau,
10277                                 lapack_complex_float* work, lapack_int lwork );
10278 lapack_int LAPACKE_zungql_work( int matrix_layout, lapack_int m, lapack_int n,
10279                                 lapack_int k, lapack_complex_double* a,
10280                                 lapack_int lda,
10281                                 const lapack_complex_double* tau,
10282                                 lapack_complex_double* work, lapack_int lwork );
10283
10284 lapack_int LAPACKE_cungqr_work( int matrix_layout, lapack_int m, lapack_int n,
10285                                 lapack_int k, lapack_complex_float* a,
10286                                 lapack_int lda, const lapack_complex_float* tau,
10287                                 lapack_complex_float* work, lapack_int lwork );
10288 lapack_int LAPACKE_zungqr_work( int matrix_layout, lapack_int m, lapack_int n,
10289                                 lapack_int k, lapack_complex_double* a,
10290                                 lapack_int lda,
10291                                 const lapack_complex_double* tau,
10292                                 lapack_complex_double* work, lapack_int lwork );
10293
10294 lapack_int LAPACKE_cungrq_work( int matrix_layout, lapack_int m, lapack_int n,
10295                                 lapack_int k, lapack_complex_float* a,
10296                                 lapack_int lda, const lapack_complex_float* tau,
10297                                 lapack_complex_float* work, lapack_int lwork );
10298 lapack_int LAPACKE_zungrq_work( int matrix_layout, lapack_int m, lapack_int n,
10299                                 lapack_int k, lapack_complex_double* a,
10300                                 lapack_int lda,
10301                                 const lapack_complex_double* tau,
10302                                 lapack_complex_double* work, lapack_int lwork );
10303
10304 lapack_int LAPACKE_cungtr_work( int matrix_layout, char uplo, lapack_int n,
10305                                 lapack_complex_float* a, lapack_int lda,
10306                                 const lapack_complex_float* tau,
10307                                 lapack_complex_float* work, lapack_int lwork );
10308 lapack_int LAPACKE_zungtr_work( int matrix_layout, char uplo, lapack_int n,
10309                                 lapack_complex_double* a, lapack_int lda,
10310                                 const lapack_complex_double* tau,
10311                                 lapack_complex_double* work, lapack_int lwork );
10312
10313 lapack_int LAPACKE_cunmbr_work( int matrix_layout, char vect, char side,
10314                                 char trans, lapack_int m, lapack_int n,
10315                                 lapack_int k, const lapack_complex_float* a,
10316                                 lapack_int lda, 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_zunmbr_work( int matrix_layout, char vect, char side,
10320                                 char trans, lapack_int m, lapack_int n,
10321                                 lapack_int k, const lapack_complex_double* a,
10322                                 lapack_int lda,
10323                                 const lapack_complex_double* tau,
10324                                 lapack_complex_double* c, lapack_int ldc,
10325                                 lapack_complex_double* work, lapack_int lwork );
10326
10327 lapack_int LAPACKE_cunmhr_work( int matrix_layout, char side, char trans,
10328                                 lapack_int m, lapack_int n, lapack_int ilo,
10329                                 lapack_int ihi, const lapack_complex_float* a,
10330                                 lapack_int lda, const lapack_complex_float* tau,
10331                                 lapack_complex_float* c, lapack_int ldc,
10332                                 lapack_complex_float* work, lapack_int lwork );
10333 lapack_int LAPACKE_zunmhr_work( int matrix_layout, char side, char trans,
10334                                 lapack_int m, lapack_int n, lapack_int ilo,
10335                                 lapack_int ihi, const lapack_complex_double* a,
10336                                 lapack_int lda,
10337                                 const lapack_complex_double* tau,
10338                                 lapack_complex_double* c, lapack_int ldc,
10339                                 lapack_complex_double* work, lapack_int lwork );
10340
10341 lapack_int LAPACKE_cunmlq_work( int matrix_layout, char side, char trans,
10342                                 lapack_int m, lapack_int n, lapack_int k,
10343                                 const lapack_complex_float* a, lapack_int lda,
10344                                 const lapack_complex_float* tau,
10345                                 lapack_complex_float* c, lapack_int ldc,
10346                                 lapack_complex_float* work, lapack_int lwork );
10347 lapack_int LAPACKE_zunmlq_work( int matrix_layout, char side, char trans,
10348                                 lapack_int m, lapack_int n, lapack_int k,
10349                                 const lapack_complex_double* a, lapack_int lda,
10350                                 const lapack_complex_double* tau,
10351                                 lapack_complex_double* c, lapack_int ldc,
10352                                 lapack_complex_double* work, lapack_int lwork );
10353
10354 lapack_int LAPACKE_cunmql_work( int matrix_layout, char side, char trans,
10355                                 lapack_int m, lapack_int n, lapack_int k,
10356                                 const lapack_complex_float* a, lapack_int lda,
10357                                 const lapack_complex_float* tau,
10358                                 lapack_complex_float* c, lapack_int ldc,
10359                                 lapack_complex_float* work, lapack_int lwork );
10360 lapack_int LAPACKE_zunmql_work( int matrix_layout, char side, char trans,
10361                                 lapack_int m, lapack_int n, lapack_int k,
10362                                 const lapack_complex_double* a, lapack_int lda,
10363                                 const lapack_complex_double* tau,
10364                                 lapack_complex_double* c, lapack_int ldc,
10365                                 lapack_complex_double* work, lapack_int lwork );
10366
10367 lapack_int LAPACKE_cunmqr_work( int matrix_layout, char side, char trans,
10368                                 lapack_int m, lapack_int n, lapack_int k,
10369                                 const lapack_complex_float* a, lapack_int lda,
10370                                 const lapack_complex_float* tau,
10371                                 lapack_complex_float* c, lapack_int ldc,
10372                                 lapack_complex_float* work, lapack_int lwork );
10373 lapack_int LAPACKE_zunmqr_work( int matrix_layout, char side, char trans,
10374                                 lapack_int m, lapack_int n, lapack_int k,
10375                                 const lapack_complex_double* a, lapack_int lda,
10376                                 const lapack_complex_double* tau,
10377                                 lapack_complex_double* c, lapack_int ldc,
10378                                 lapack_complex_double* work, lapack_int lwork );
10379
10380 lapack_int LAPACKE_cunmrq_work( int matrix_layout, char side, char trans,
10381                                 lapack_int m, lapack_int n, lapack_int k,
10382                                 const lapack_complex_float* a, lapack_int lda,
10383                                 const lapack_complex_float* tau,
10384                                 lapack_complex_float* c, lapack_int ldc,
10385                                 lapack_complex_float* work, lapack_int lwork );
10386 lapack_int LAPACKE_zunmrq_work( int matrix_layout, char side, char trans,
10387                                 lapack_int m, lapack_int n, lapack_int k,
10388                                 const lapack_complex_double* a, lapack_int lda,
10389                                 const lapack_complex_double* tau,
10390                                 lapack_complex_double* c, lapack_int ldc,
10391                                 lapack_complex_double* work, lapack_int lwork );
10392
10393 lapack_int LAPACKE_cunmrz_work( int matrix_layout, char side, char trans,
10394                                 lapack_int m, lapack_int n, lapack_int k,
10395                                 lapack_int l, const lapack_complex_float* a,
10396                                 lapack_int lda, const lapack_complex_float* tau,
10397                                 lapack_complex_float* c, lapack_int ldc,
10398                                 lapack_complex_float* work, lapack_int lwork );
10399 lapack_int LAPACKE_zunmrz_work( int matrix_layout, char side, char trans,
10400                                 lapack_int m, lapack_int n, lapack_int k,
10401                                 lapack_int l, const lapack_complex_double* a,
10402                                 lapack_int lda,
10403                                 const lapack_complex_double* tau,
10404                                 lapack_complex_double* c, lapack_int ldc,
10405                                 lapack_complex_double* work, lapack_int lwork );
10406
10407 lapack_int LAPACKE_cunmtr_work( int matrix_layout, char side, char uplo,
10408                                 char trans, lapack_int m, lapack_int n,
10409                                 const lapack_complex_float* a, lapack_int lda,
10410                                 const lapack_complex_float* tau,
10411                                 lapack_complex_float* c, lapack_int ldc,
10412                                 lapack_complex_float* work, lapack_int lwork );
10413 lapack_int LAPACKE_zunmtr_work( int matrix_layout, char side, char uplo,
10414                                 char trans, lapack_int m, lapack_int n,
10415                                 const lapack_complex_double* a, lapack_int lda,
10416                                 const lapack_complex_double* tau,
10417                                 lapack_complex_double* c, lapack_int ldc,
10418                                 lapack_complex_double* work, lapack_int lwork );
10419
10420 lapack_int LAPACKE_cupgtr_work( int matrix_layout, char uplo, lapack_int n,
10421                                 const lapack_complex_float* ap,
10422                                 const lapack_complex_float* tau,
10423                                 lapack_complex_float* q, lapack_int ldq,
10424                                 lapack_complex_float* work );
10425 lapack_int LAPACKE_zupgtr_work( int matrix_layout, char uplo, lapack_int n,
10426                                 const lapack_complex_double* ap,
10427                                 const lapack_complex_double* tau,
10428                                 lapack_complex_double* q, lapack_int ldq,
10429                                 lapack_complex_double* work );
10430
10431 lapack_int LAPACKE_cupmtr_work( int matrix_layout, char side, char uplo,
10432                                 char trans, lapack_int m, lapack_int n,
10433                                 const lapack_complex_float* ap,
10434                                 const lapack_complex_float* tau,
10435                                 lapack_complex_float* c, lapack_int ldc,
10436                                 lapack_complex_float* work );
10437 lapack_int LAPACKE_zupmtr_work( int matrix_layout, char side, char uplo,
10438                                 char trans, lapack_int m, lapack_int n,
10439                                 const lapack_complex_double* ap,
10440                                 const lapack_complex_double* tau,
10441                                 lapack_complex_double* c, lapack_int ldc,
10442                                 lapack_complex_double* work );
10443
10444 lapack_int LAPACKE_claghe( int matrix_layout, lapack_int n, lapack_int k,
10445                            const float* d, lapack_complex_float* a,
10446                            lapack_int lda, lapack_int* iseed );
10447 lapack_int LAPACKE_zlaghe( int matrix_layout, lapack_int n, lapack_int k,
10448                            const double* d, lapack_complex_double* a,
10449                            lapack_int lda, lapack_int* iseed );
10450
10451 lapack_int LAPACKE_slagsy( int matrix_layout, lapack_int n, lapack_int k,
10452                            const float* d, float* a, lapack_int lda,
10453                            lapack_int* iseed );
10454 lapack_int LAPACKE_dlagsy( int matrix_layout, lapack_int n, lapack_int k,
10455                            const double* d, double* a, lapack_int lda,
10456                            lapack_int* iseed );
10457 lapack_int LAPACKE_clagsy( int matrix_layout, lapack_int n, lapack_int k,
10458                            const float* d, lapack_complex_float* a,
10459                            lapack_int lda, lapack_int* iseed );
10460 lapack_int LAPACKE_zlagsy( int matrix_layout, lapack_int n, lapack_int k,
10461                            const double* d, lapack_complex_double* a,
10462                            lapack_int lda, lapack_int* iseed );
10463
10464 lapack_int LAPACKE_slapmr( int matrix_layout, lapack_logical forwrd,
10465                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
10466                            lapack_int* k );
10467 lapack_int LAPACKE_dlapmr( int matrix_layout, lapack_logical forwrd,
10468                            lapack_int m, lapack_int n, double* x,
10469                            lapack_int ldx, lapack_int* k );
10470 lapack_int LAPACKE_clapmr( int matrix_layout, lapack_logical forwrd,
10471                            lapack_int m, lapack_int n, lapack_complex_float* x,
10472                            lapack_int ldx, lapack_int* k );
10473 lapack_int LAPACKE_zlapmr( int matrix_layout, lapack_logical forwrd,
10474                            lapack_int m, lapack_int n, lapack_complex_double* x,
10475                            lapack_int ldx, lapack_int* k );
10476
10477 lapack_int LAPACKE_slapmt( int matrix_layout, lapack_logical forwrd,
10478                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
10479                            lapack_int* k );
10480 lapack_int LAPACKE_dlapmt( int matrix_layout, lapack_logical forwrd,
10481                            lapack_int m, lapack_int n, double* x,
10482                            lapack_int ldx, lapack_int* k );
10483 lapack_int LAPACKE_clapmt( int matrix_layout, lapack_logical forwrd,
10484                            lapack_int m, lapack_int n, lapack_complex_float* x,
10485                            lapack_int ldx, lapack_int* k );
10486 lapack_int LAPACKE_zlapmt( int matrix_layout, lapack_logical forwrd,
10487                            lapack_int m, lapack_int n, lapack_complex_double* x,
10488                            lapack_int ldx, lapack_int* k );
10489
10490 float LAPACKE_slapy2( float x, float y );
10491 double LAPACKE_dlapy2( double x, double y );
10492
10493 float LAPACKE_slapy3( float x, float y, float z );
10494 double LAPACKE_dlapy3( double x, double y, double z );
10495
10496 lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
10497 lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
10498                             double* r );
10499
10500 lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
10501                             float* sn );
10502 lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
10503                             double* sn );
10504
10505
10506 //LAPACK 3.3.0
10507 lapack_int LAPACKE_cbbcsd( int matrix_layout, char jobu1, char jobu2,
10508                            char jobv1t, char jobv2t, char trans, lapack_int m,
10509                            lapack_int p, lapack_int q, float* theta, float* phi,
10510                            lapack_complex_float* u1, lapack_int ldu1,
10511                            lapack_complex_float* u2, lapack_int ldu2,
10512                            lapack_complex_float* v1t, lapack_int ldv1t,
10513                            lapack_complex_float* v2t, lapack_int ldv2t,
10514                            float* b11d, float* b11e, float* b12d, float* b12e,
10515                            float* b21d, float* b21e, float* b22d, float* b22e );
10516 lapack_int LAPACKE_cbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10517                                 char jobv1t, char jobv2t, char trans,
10518                                 lapack_int m, lapack_int p, lapack_int q,
10519                                 float* theta, float* phi,
10520                                 lapack_complex_float* u1, lapack_int ldu1,
10521                                 lapack_complex_float* u2, lapack_int ldu2,
10522                                 lapack_complex_float* v1t, lapack_int ldv1t,
10523                                 lapack_complex_float* v2t, lapack_int ldv2t,
10524                                 float* b11d, float* b11e, float* b12d,
10525                                 float* b12e, float* b21d, float* b21e,
10526                                 float* b22d, float* b22e, float* rwork,
10527                                 lapack_int lrwork );
10528 lapack_int LAPACKE_cheswapr( int matrix_layout, char uplo, lapack_int n,
10529                              lapack_complex_float* a, lapack_int lda,
10530                              lapack_int i1, lapack_int i2 );
10531 lapack_int LAPACKE_cheswapr_work( int matrix_layout, char uplo, lapack_int n,
10532                                   lapack_complex_float* a, lapack_int lda,
10533                                   lapack_int i1, lapack_int i2 );
10534 lapack_int LAPACKE_chetri2( int matrix_layout, char uplo, lapack_int n,
10535                             lapack_complex_float* a, lapack_int lda,
10536                             const lapack_int* ipiv );
10537 lapack_int LAPACKE_chetri2_work( int matrix_layout, char uplo, lapack_int n,
10538                                  lapack_complex_float* a, lapack_int lda,
10539                                  const lapack_int* ipiv,
10540                                  lapack_complex_float* work, lapack_int lwork );
10541 lapack_int LAPACKE_chetri2x( int matrix_layout, char uplo, lapack_int n,
10542                              lapack_complex_float* a, lapack_int lda,
10543                              const lapack_int* ipiv, lapack_int nb );
10544 lapack_int LAPACKE_chetri2x_work( int matrix_layout, char uplo, lapack_int n,
10545                                   lapack_complex_float* a, lapack_int lda,
10546                                   const lapack_int* ipiv,
10547                                   lapack_complex_float* work, lapack_int nb );
10548 lapack_int LAPACKE_chetrs2( int matrix_layout, char uplo, lapack_int n,
10549                             lapack_int nrhs, const lapack_complex_float* a,
10550                             lapack_int lda, const lapack_int* ipiv,
10551                             lapack_complex_float* b, lapack_int ldb );
10552 lapack_int LAPACKE_chetrs2_work( int matrix_layout, char uplo, lapack_int n,
10553                                  lapack_int nrhs, const lapack_complex_float* a,
10554                                  lapack_int lda, const lapack_int* ipiv,
10555                                  lapack_complex_float* b, lapack_int ldb,
10556                                  lapack_complex_float* work );
10557 lapack_int LAPACKE_csyconv( int matrix_layout, char uplo, char way, lapack_int n,
10558                             lapack_complex_float* a, lapack_int lda,
10559                             const lapack_int* ipiv, lapack_complex_float* e  );
10560 lapack_int LAPACKE_csyconv_work( int matrix_layout, char uplo, char way,
10561                                  lapack_int n, lapack_complex_float* a,
10562                                  lapack_int lda, const lapack_int* ipiv,
10563                                  lapack_complex_float* e );
10564 lapack_int LAPACKE_csyswapr( int matrix_layout, char uplo, lapack_int n,
10565                              lapack_complex_float* a, lapack_int lda,
10566                              lapack_int i1, lapack_int i2 );
10567 lapack_int LAPACKE_csyswapr_work( int matrix_layout, char uplo, lapack_int n,
10568                                   lapack_complex_float* a, lapack_int lda,
10569                                   lapack_int i1, lapack_int i2 );
10570 lapack_int LAPACKE_csytri2( int matrix_layout, char uplo, lapack_int n,
10571                             lapack_complex_float* a, lapack_int lda,
10572                             const lapack_int* ipiv );
10573 lapack_int LAPACKE_csytri2_work( int matrix_layout, char uplo, lapack_int n,
10574                                  lapack_complex_float* a, lapack_int lda,
10575                                  const lapack_int* ipiv,
10576                                  lapack_complex_float* work, lapack_int lwork );
10577 lapack_int LAPACKE_csytri2x( int matrix_layout, char uplo, lapack_int n,
10578                              lapack_complex_float* a, lapack_int lda,
10579                              const lapack_int* ipiv, lapack_int nb );
10580 lapack_int LAPACKE_csytri2x_work( int matrix_layout, char uplo, lapack_int n,
10581                                   lapack_complex_float* a, lapack_int lda,
10582                                   const lapack_int* ipiv,
10583                                   lapack_complex_float* work, lapack_int nb );
10584 lapack_int LAPACKE_csytrs2( int matrix_layout, char uplo, lapack_int n,
10585                             lapack_int nrhs, const lapack_complex_float* a,
10586                             lapack_int lda, const lapack_int* ipiv,
10587                             lapack_complex_float* b, lapack_int ldb );
10588 lapack_int LAPACKE_csytrs2_work( int matrix_layout, char uplo, lapack_int n,
10589                                  lapack_int nrhs, const lapack_complex_float* a,
10590                                  lapack_int lda, const lapack_int* ipiv,
10591                                  lapack_complex_float* b, lapack_int ldb,
10592                                  lapack_complex_float* work );
10593 lapack_int LAPACKE_cunbdb( int matrix_layout, char trans, char signs,
10594                            lapack_int m, lapack_int p, lapack_int q,
10595                            lapack_complex_float* x11, lapack_int ldx11,
10596                            lapack_complex_float* x12, lapack_int ldx12,
10597                            lapack_complex_float* x21, lapack_int ldx21,
10598                            lapack_complex_float* x22, lapack_int ldx22,
10599                            float* theta, float* phi,
10600                            lapack_complex_float* taup1,
10601                            lapack_complex_float* taup2,
10602                            lapack_complex_float* tauq1,
10603                            lapack_complex_float* tauq2 );
10604 lapack_int LAPACKE_cunbdb_work( int matrix_layout, char trans, char signs,
10605                                 lapack_int m, lapack_int p, lapack_int q,
10606                                 lapack_complex_float* x11, lapack_int ldx11,
10607                                 lapack_complex_float* x12, lapack_int ldx12,
10608                                 lapack_complex_float* x21, lapack_int ldx21,
10609                                 lapack_complex_float* x22, lapack_int ldx22,
10610                                 float* theta, float* phi,
10611                                 lapack_complex_float* taup1,
10612                                 lapack_complex_float* taup2,
10613                                 lapack_complex_float* tauq1,
10614                                 lapack_complex_float* tauq2,
10615                                 lapack_complex_float* work, lapack_int lwork );
10616 lapack_int LAPACKE_cuncsd( int matrix_layout, char jobu1, char jobu2,
10617                            char jobv1t, char jobv2t, char trans, char signs,
10618                            lapack_int m, lapack_int p, lapack_int q,
10619                            lapack_complex_float* x11, lapack_int ldx11,
10620                            lapack_complex_float* x12, lapack_int ldx12,
10621                            lapack_complex_float* x21, lapack_int ldx21,
10622                            lapack_complex_float* x22, lapack_int ldx22,
10623                            float* theta, lapack_complex_float* u1,
10624                            lapack_int ldu1, lapack_complex_float* u2,
10625                            lapack_int ldu2, lapack_complex_float* v1t,
10626                            lapack_int ldv1t, lapack_complex_float* v2t,
10627                            lapack_int ldv2t );
10628 lapack_int LAPACKE_cuncsd_work( int matrix_layout, char jobu1, char jobu2,
10629                                 char jobv1t, char jobv2t, char trans,
10630                                 char signs, lapack_int m, lapack_int p,
10631                                 lapack_int q, lapack_complex_float* x11,
10632                                 lapack_int ldx11, lapack_complex_float* x12,
10633                                 lapack_int ldx12, lapack_complex_float* x21,
10634                                 lapack_int ldx21, lapack_complex_float* x22,
10635                                 lapack_int ldx22, float* theta,
10636                                 lapack_complex_float* u1, lapack_int ldu1,
10637                                 lapack_complex_float* u2, lapack_int ldu2,
10638                                 lapack_complex_float* v1t, lapack_int ldv1t,
10639                                 lapack_complex_float* v2t, lapack_int ldv2t,
10640                                 lapack_complex_float* work, lapack_int lwork,
10641                                 float* rwork, lapack_int lrwork,
10642                                 lapack_int* iwork );
10643 lapack_int LAPACKE_cuncsd2by1( int matrix_layout, char jobu1, char jobu2,
10644                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10645                            lapack_complex_float* x11, lapack_int ldx11,
10646                            lapack_complex_float* x21, lapack_int ldx21,
10647                            float* theta, lapack_complex_float* u1,
10648                            lapack_int ldu1, lapack_complex_float* u2,
10649                            lapack_int ldu2, lapack_complex_float* v1t, lapack_int ldv1t );
10650 lapack_int LAPACKE_cuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10651                                 char jobv1t, lapack_int m, lapack_int p,
10652                                 lapack_int q, lapack_complex_float* x11, lapack_int ldx11,
10653                                 lapack_complex_float* x21, lapack_int ldx21,
10654                                 float* theta, lapack_complex_float* u1,
10655                                 lapack_int ldu1, lapack_complex_float* u2,
10656                                 lapack_int ldu2, lapack_complex_float* v1t,
10657                                 lapack_int ldv1t, lapack_complex_float* work,
10658                                 lapack_int lwork, float* rwork, lapack_int lrwork,
10659                                 lapack_int* iwork );
10660 lapack_int LAPACKE_dbbcsd( int matrix_layout, char jobu1, char jobu2,
10661                            char jobv1t, char jobv2t, char trans, lapack_int m,
10662                            lapack_int p, lapack_int q, double* theta,
10663                            double* phi, double* u1, lapack_int ldu1, double* u2,
10664                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10665                            double* v2t, lapack_int ldv2t, double* b11d,
10666                            double* b11e, double* b12d, double* b12e,
10667                            double* b21d, double* b21e, double* b22d,
10668                            double* b22e );
10669 lapack_int LAPACKE_dbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10670                                 char jobv1t, char jobv2t, char trans,
10671                                 lapack_int m, lapack_int p, lapack_int q,
10672                                 double* theta, double* phi, double* u1,
10673                                 lapack_int ldu1, double* u2, lapack_int ldu2,
10674                                 double* v1t, lapack_int ldv1t, double* v2t,
10675                                 lapack_int ldv2t, double* b11d, double* b11e,
10676                                 double* b12d, double* b12e, double* b21d,
10677                                 double* b21e, double* b22d, double* b22e,
10678                                 double* work, lapack_int lwork );
10679 lapack_int LAPACKE_dorbdb( int matrix_layout, char trans, char signs,
10680                            lapack_int m, lapack_int p, lapack_int q,
10681                            double* x11, lapack_int ldx11, double* x12,
10682                            lapack_int ldx12, double* x21, lapack_int ldx21,
10683                            double* x22, lapack_int ldx22, double* theta,
10684                            double* phi, double* taup1, double* taup2,
10685                            double* tauq1, double* tauq2 );
10686 lapack_int LAPACKE_dorbdb_work( int matrix_layout, char trans, char signs,
10687                                 lapack_int m, lapack_int p, lapack_int q,
10688                                 double* x11, lapack_int ldx11, double* x12,
10689                                 lapack_int ldx12, double* x21, lapack_int ldx21,
10690                                 double* x22, lapack_int ldx22, double* theta,
10691                                 double* phi, double* taup1, double* taup2,
10692                                 double* tauq1, double* tauq2, double* work,
10693                                 lapack_int lwork );
10694 lapack_int LAPACKE_dorcsd( int matrix_layout, char jobu1, char jobu2,
10695                            char jobv1t, char jobv2t, char trans, char signs,
10696                            lapack_int m, lapack_int p, lapack_int q,
10697                            double* x11, lapack_int ldx11, double* x12,
10698                            lapack_int ldx12, double* x21, lapack_int ldx21,
10699                            double* x22, lapack_int ldx22, double* theta,
10700                            double* u1, lapack_int ldu1, double* u2,
10701                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10702                            double* v2t, lapack_int ldv2t );
10703 lapack_int LAPACKE_dorcsd_work( int matrix_layout, char jobu1, char jobu2,
10704                                 char jobv1t, char jobv2t, char trans,
10705                                 char signs, lapack_int m, lapack_int p,
10706                                 lapack_int q, double* x11, lapack_int ldx11,
10707                                 double* x12, lapack_int ldx12, double* x21,
10708                                 lapack_int ldx21, double* x22, lapack_int ldx22,
10709                                 double* theta, double* u1, lapack_int ldu1,
10710                                 double* u2, lapack_int ldu2, double* v1t,
10711                                 lapack_int ldv1t, double* v2t, lapack_int ldv2t,
10712                                 double* work, lapack_int lwork,
10713                                 lapack_int* iwork );
10714 lapack_int LAPACKE_dorcsd2by1( int matrix_layout, char jobu1, char jobu2,
10715                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10716                            double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
10717                            double* theta, double* u1, lapack_int ldu1, double* u2,
10718                            lapack_int ldu2, double* v1t, lapack_int ldv1t);
10719 lapack_int LAPACKE_dorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10720                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10721                            double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
10722                            double* theta, double* u1, lapack_int ldu1, double* u2,
10723                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10724                            double* work, lapack_int lwork, lapack_int* iwork );
10725 lapack_int LAPACKE_dsyconv( int matrix_layout, char uplo, char way, lapack_int n,
10726                             double* a, lapack_int lda, const lapack_int* ipiv, double* e);
10727 lapack_int LAPACKE_dsyconv_work( int matrix_layout, char uplo, char way,
10728                                  lapack_int n, double* a, lapack_int lda,
10729                                  const lapack_int* ipiv, double* e );
10730 lapack_int LAPACKE_dsyswapr( int matrix_layout, char uplo, lapack_int n,
10731                              double* a, lapack_int lda, lapack_int i1,
10732                              lapack_int i2 );
10733 lapack_int LAPACKE_dsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10734                                   double* a, lapack_int lda, lapack_int i1,
10735                                   lapack_int i2 );
10736 lapack_int LAPACKE_dsytri2( int matrix_layout, char uplo, lapack_int n,
10737                             double* a, lapack_int lda, const lapack_int* ipiv );
10738 lapack_int LAPACKE_dsytri2_work( int matrix_layout, char uplo, lapack_int n,
10739                                  double* a, lapack_int lda,
10740                                  const lapack_int* ipiv,
10741                                  double* work, lapack_int lwork );
10742 lapack_int LAPACKE_dsytri2x( int matrix_layout, char uplo, lapack_int n,
10743                              double* a, lapack_int lda, const lapack_int* ipiv,
10744                              lapack_int nb );
10745 lapack_int LAPACKE_dsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10746                                   double* a, lapack_int lda,
10747                                   const lapack_int* ipiv, double* work,
10748                                   lapack_int nb );
10749 lapack_int LAPACKE_dsytrs2( int matrix_layout, char uplo, lapack_int n,
10750                             lapack_int nrhs, const double* a, lapack_int lda,
10751                             const lapack_int* ipiv, double* b, lapack_int ldb );
10752 lapack_int LAPACKE_dsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10753                                  lapack_int nrhs, const double* a,
10754                                  lapack_int lda, const lapack_int* ipiv,
10755                                  double* b, lapack_int ldb, double* work );
10756 lapack_int LAPACKE_sbbcsd( int matrix_layout, char jobu1, char jobu2,
10757                            char jobv1t, char jobv2t, char trans, lapack_int m,
10758                            lapack_int p, lapack_int q, float* theta, float* phi,
10759                            float* u1, lapack_int ldu1, float* u2,
10760                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10761                            float* v2t, lapack_int ldv2t, float* b11d,
10762                            float* b11e, float* b12d, float* b12e, float* b21d,
10763                            float* b21e, float* b22d, float* b22e );
10764 lapack_int LAPACKE_sbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10765                                 char jobv1t, char jobv2t, char trans,
10766                                 lapack_int m, lapack_int p, lapack_int q,
10767                                 float* theta, float* phi, float* u1,
10768                                 lapack_int ldu1, float* u2, lapack_int ldu2,
10769                                 float* v1t, lapack_int ldv1t, float* v2t,
10770                                 lapack_int ldv2t, float* b11d, float* b11e,
10771                                 float* b12d, float* b12e, float* b21d,
10772                                 float* b21e, float* b22d, float* b22e,
10773                                 float* work, lapack_int lwork );
10774 lapack_int LAPACKE_sorbdb( int matrix_layout, char trans, char signs,
10775                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10776                            lapack_int ldx11, float* x12, lapack_int ldx12,
10777                            float* x21, lapack_int ldx21, float* x22,
10778                            lapack_int ldx22, float* theta, float* phi,
10779                            float* taup1, float* taup2, float* tauq1,
10780                            float* tauq2 );
10781 lapack_int LAPACKE_sorbdb_work( int matrix_layout, char trans, char signs,
10782                                 lapack_int m, lapack_int p, lapack_int q,
10783                                 float* x11, lapack_int ldx11, float* x12,
10784                                 lapack_int ldx12, float* x21, lapack_int ldx21,
10785                                 float* x22, lapack_int ldx22, float* theta,
10786                                 float* phi, float* taup1, float* taup2,
10787                                 float* tauq1, float* tauq2, float* work,
10788                                 lapack_int lwork );
10789 lapack_int LAPACKE_sorcsd( int matrix_layout, char jobu1, char jobu2,
10790                            char jobv1t, char jobv2t, char trans, char signs,
10791                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10792                            lapack_int ldx11, float* x12, lapack_int ldx12,
10793                            float* x21, lapack_int ldx21, float* x22,
10794                            lapack_int ldx22, float* theta, float* u1,
10795                            lapack_int ldu1, float* u2, lapack_int ldu2,
10796                            float* v1t, lapack_int ldv1t, float* v2t,
10797                            lapack_int ldv2t );
10798 lapack_int LAPACKE_sorcsd_work( int matrix_layout, char jobu1, char jobu2,
10799                                 char jobv1t, char jobv2t, char trans,
10800                                 char signs, lapack_int m, lapack_int p,
10801                                 lapack_int q, float* x11, lapack_int ldx11,
10802                                 float* x12, lapack_int ldx12, float* x21,
10803                                 lapack_int ldx21, float* x22, lapack_int ldx22,
10804                                 float* theta, float* u1, lapack_int ldu1,
10805                                 float* u2, lapack_int ldu2, float* v1t,
10806                                 lapack_int ldv1t, float* v2t, lapack_int ldv2t,
10807                                 float* work, lapack_int lwork,
10808                                 lapack_int* iwork );
10809 lapack_int LAPACKE_sorcsd2by1( int matrix_layout, char jobu1, char jobu2,
10810                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10811                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10812                            float* theta, float* u1, lapack_int ldu1, float* u2,
10813                            lapack_int ldu2, float* v1t, lapack_int ldv1t);
10814 lapack_int LAPACKE_sorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10815                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10816                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10817                            float* theta, float* u1, lapack_int ldu1, float* u2,
10818                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10819                            float* work, lapack_int lwork, lapack_int* iwork );
10820 lapack_int LAPACKE_ssyconv( int matrix_layout, char uplo, char way, lapack_int n,
10821                             float* a, lapack_int lda, const lapack_int* ipiv, float* e );
10822 lapack_int LAPACKE_ssyconv_work( int matrix_layout, char uplo, char way,
10823                                  lapack_int n, float* a, lapack_int lda,
10824                                  const lapack_int* ipiv, float* e );
10825 lapack_int LAPACKE_ssyswapr( int matrix_layout, char uplo, lapack_int n,
10826                              float* a, lapack_int lda, lapack_int i1,
10827                              lapack_int i2 );
10828 lapack_int LAPACKE_ssyswapr_work( int matrix_layout, char uplo, lapack_int n,
10829                                   float* a, lapack_int lda, lapack_int i1,
10830                                   lapack_int i2 );
10831 lapack_int LAPACKE_ssytri2( int matrix_layout, char uplo, lapack_int n, float* a,
10832                             lapack_int lda, const lapack_int* ipiv );
10833 lapack_int LAPACKE_ssytri2_work( int matrix_layout, char uplo, lapack_int n,
10834                                  float* a, lapack_int lda,
10835                                  const lapack_int* ipiv,
10836                                  float* work, lapack_int lwork );
10837 lapack_int LAPACKE_ssytri2x( int matrix_layout, char uplo, lapack_int n,
10838                              float* a, lapack_int lda, const lapack_int* ipiv,
10839                              lapack_int nb );
10840 lapack_int LAPACKE_ssytri2x_work( int matrix_layout, char uplo, lapack_int n,
10841                                   float* a, lapack_int lda,
10842                                   const lapack_int* ipiv, float* work,
10843                                   lapack_int nb );
10844 lapack_int LAPACKE_ssytrs2( int matrix_layout, char uplo, lapack_int n,
10845                             lapack_int nrhs, const float* a, lapack_int lda,
10846                             const lapack_int* ipiv, float* b, lapack_int ldb );
10847 lapack_int LAPACKE_ssytrs2_work( int matrix_layout, char uplo, lapack_int n,
10848                                  lapack_int nrhs, const float* a,
10849                                  lapack_int lda, const lapack_int* ipiv,
10850                                  float* b, lapack_int ldb, float* work );
10851 lapack_int LAPACKE_zbbcsd( int matrix_layout, char jobu1, char jobu2,
10852                            char jobv1t, char jobv2t, char trans, lapack_int m,
10853                            lapack_int p, lapack_int q, double* theta,
10854                            double* phi, lapack_complex_double* u1,
10855                            lapack_int ldu1, lapack_complex_double* u2,
10856                            lapack_int ldu2, lapack_complex_double* v1t,
10857                            lapack_int ldv1t, lapack_complex_double* v2t,
10858                            lapack_int ldv2t, double* b11d, double* b11e,
10859                            double* b12d, double* b12e, double* b21d,
10860                            double* b21e, double* b22d, double* b22e );
10861 lapack_int LAPACKE_zbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10862                                 char jobv1t, char jobv2t, char trans,
10863                                 lapack_int m, lapack_int p, lapack_int q,
10864                                 double* theta, double* phi,
10865                                 lapack_complex_double* u1, lapack_int ldu1,
10866                                 lapack_complex_double* u2, lapack_int ldu2,
10867                                 lapack_complex_double* v1t, lapack_int ldv1t,
10868                                 lapack_complex_double* v2t, lapack_int ldv2t,
10869                                 double* b11d, double* b11e, double* b12d,
10870                                 double* b12e, double* b21d, double* b21e,
10871                                 double* b22d, double* b22e, double* rwork,
10872                                 lapack_int lrwork );
10873 lapack_int LAPACKE_zheswapr( int matrix_layout, char uplo, lapack_int n,
10874                              lapack_complex_double* a, lapack_int lda,
10875                              lapack_int i1, lapack_int i2 );
10876 lapack_int LAPACKE_zheswapr_work( int matrix_layout, char uplo, lapack_int n,
10877                                   lapack_complex_double* a, lapack_int lda,
10878                                   lapack_int i1, lapack_int i2 );
10879 lapack_int LAPACKE_zhetri2( int matrix_layout, char uplo, lapack_int n,
10880                             lapack_complex_double* a, lapack_int lda,
10881                             const lapack_int* ipiv );
10882 lapack_int LAPACKE_zhetri2_work( int matrix_layout, char uplo, lapack_int n,
10883                                  lapack_complex_double* a, lapack_int lda,
10884                                  const lapack_int* ipiv,
10885                                  lapack_complex_double* work, lapack_int lwork );
10886 lapack_int LAPACKE_zhetri2x( int matrix_layout, char uplo, lapack_int n,
10887                              lapack_complex_double* a, lapack_int lda,
10888                              const lapack_int* ipiv, lapack_int nb );
10889 lapack_int LAPACKE_zhetri2x_work( int matrix_layout, char uplo, lapack_int n,
10890                                   lapack_complex_double* a, lapack_int lda,
10891                                   const lapack_int* ipiv,
10892                                   lapack_complex_double* work, lapack_int nb );
10893 lapack_int LAPACKE_zhetrs2( int matrix_layout, char uplo, lapack_int n,
10894                             lapack_int nrhs, const lapack_complex_double* a,
10895                             lapack_int lda, const lapack_int* ipiv,
10896                             lapack_complex_double* b, lapack_int ldb );
10897 lapack_int LAPACKE_zhetrs2_work( int matrix_layout, char uplo, lapack_int n,
10898                                  lapack_int nrhs, const lapack_complex_double* a,
10899                                  lapack_int lda, const lapack_int* ipiv,
10900                                  lapack_complex_double* b, lapack_int ldb,
10901                                  lapack_complex_double* work );
10902 lapack_int LAPACKE_zsyconv( int matrix_layout, char uplo, char way, lapack_int n,
10903                             lapack_complex_double* a, lapack_int lda,
10904                             const lapack_int* ipiv, lapack_complex_double* e );
10905 lapack_int LAPACKE_zsyconv_work( int matrix_layout, char uplo, char way,
10906                                  lapack_int n, lapack_complex_double* a,
10907                                  lapack_int lda, const lapack_int* ipiv,
10908                                  lapack_complex_double* e );
10909 lapack_int LAPACKE_zsyswapr( int matrix_layout, char uplo, lapack_int n,
10910                              lapack_complex_double* a, lapack_int lda,
10911                              lapack_int i1, lapack_int i2 );
10912 lapack_int LAPACKE_zsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10913                                   lapack_complex_double* a, lapack_int lda,
10914                                   lapack_int i1, lapack_int i2 );
10915 lapack_int LAPACKE_zsytri2( int matrix_layout, char uplo, lapack_int n,
10916                             lapack_complex_double* a, lapack_int lda,
10917                             const lapack_int* ipiv );
10918 lapack_int LAPACKE_zsytri2_work( int matrix_layout, char uplo, lapack_int n,
10919                                  lapack_complex_double* a, lapack_int lda,
10920                                  const lapack_int* ipiv,
10921                                  lapack_complex_double* work, lapack_int lwork );
10922 lapack_int LAPACKE_zsytri2x( int matrix_layout, char uplo, lapack_int n,
10923                              lapack_complex_double* a, lapack_int lda,
10924                              const lapack_int* ipiv, lapack_int nb );
10925 lapack_int LAPACKE_zsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10926                                   lapack_complex_double* a, lapack_int lda,
10927                                   const lapack_int* ipiv,
10928                                   lapack_complex_double* work, lapack_int nb );
10929 lapack_int LAPACKE_zsytrs2( int matrix_layout, char uplo, lapack_int n,
10930                             lapack_int nrhs, const lapack_complex_double* a,
10931                             lapack_int lda, const lapack_int* ipiv,
10932                             lapack_complex_double* b, lapack_int ldb );
10933 lapack_int LAPACKE_zsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10934                                  lapack_int nrhs, const lapack_complex_double* a,
10935                                  lapack_int lda, const lapack_int* ipiv,
10936                                  lapack_complex_double* b, lapack_int ldb,
10937                                  lapack_complex_double* work );
10938 lapack_int LAPACKE_zunbdb( int matrix_layout, char trans, char signs,
10939                            lapack_int m, lapack_int p, lapack_int q,
10940                            lapack_complex_double* x11, lapack_int ldx11,
10941                            lapack_complex_double* x12, lapack_int ldx12,
10942                            lapack_complex_double* x21, lapack_int ldx21,
10943                            lapack_complex_double* x22, lapack_int ldx22,
10944                            double* theta, double* phi,
10945                            lapack_complex_double* taup1,
10946                            lapack_complex_double* taup2,
10947                            lapack_complex_double* tauq1,
10948                            lapack_complex_double* tauq2 );
10949 lapack_int LAPACKE_zunbdb_work( int matrix_layout, char trans, char signs,
10950                                 lapack_int m, lapack_int p, lapack_int q,
10951                                 lapack_complex_double* x11, lapack_int ldx11,
10952                                 lapack_complex_double* x12, lapack_int ldx12,
10953                                 lapack_complex_double* x21, lapack_int ldx21,
10954                                 lapack_complex_double* x22, lapack_int ldx22,
10955                                 double* theta, double* phi,
10956                                 lapack_complex_double* taup1,
10957                                 lapack_complex_double* taup2,
10958                                 lapack_complex_double* tauq1,
10959                                 lapack_complex_double* tauq2,
10960                                 lapack_complex_double* work, lapack_int lwork );
10961 lapack_int LAPACKE_zuncsd( int matrix_layout, char jobu1, char jobu2,
10962                            char jobv1t, char jobv2t, char trans, char signs,
10963                            lapack_int m, lapack_int p, lapack_int q,
10964                            lapack_complex_double* x11, lapack_int ldx11,
10965                            lapack_complex_double* x12, lapack_int ldx12,
10966                            lapack_complex_double* x21, lapack_int ldx21,
10967                            lapack_complex_double* x22, lapack_int ldx22,
10968                            double* theta, lapack_complex_double* u1,
10969                            lapack_int ldu1, lapack_complex_double* u2,
10970                            lapack_int ldu2, lapack_complex_double* v1t,
10971                            lapack_int ldv1t, lapack_complex_double* v2t,
10972                            lapack_int ldv2t );
10973 lapack_int LAPACKE_zuncsd_work( int matrix_layout, char jobu1, char jobu2,
10974                                 char jobv1t, char jobv2t, char trans,
10975                                 char signs, lapack_int m, lapack_int p,
10976                                 lapack_int q, lapack_complex_double* x11,
10977                                 lapack_int ldx11, lapack_complex_double* x12,
10978                                 lapack_int ldx12, lapack_complex_double* x21,
10979                                 lapack_int ldx21, lapack_complex_double* x22,
10980                                 lapack_int ldx22, double* theta,
10981                                 lapack_complex_double* u1, lapack_int ldu1,
10982                                 lapack_complex_double* u2, lapack_int ldu2,
10983                                 lapack_complex_double* v1t, lapack_int ldv1t,
10984                                 lapack_complex_double* v2t, lapack_int ldv2t,
10985                                 lapack_complex_double* work, lapack_int lwork,
10986                                 double* rwork, lapack_int lrwork,
10987                                 lapack_int* iwork );
10988 lapack_int LAPACKE_zuncsd2by1( int matrix_layout, char jobu1, char jobu2,
10989                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10990                            lapack_complex_double* x11, lapack_int ldx11,
10991                            lapack_complex_double* x21, lapack_int ldx21,
10992                            double* theta, lapack_complex_double* u1,
10993                            lapack_int ldu1, lapack_complex_double* u2,
10994                            lapack_int ldu2, lapack_complex_double* v1t, lapack_int ldv1t );
10995 lapack_int LAPACKE_zuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10996                                 char jobv1t, lapack_int m, lapack_int p,
10997                                 lapack_int q, lapack_complex_double* x11, lapack_int ldx11,
10998                                 lapack_complex_double* x21, lapack_int ldx21,
10999                                 double* theta, lapack_complex_double* u1,
11000                                 lapack_int ldu1, lapack_complex_double* u2,
11001                                 lapack_int ldu2, lapack_complex_double* v1t,
11002                                 lapack_int ldv1t, lapack_complex_double* work,
11003                                 lapack_int lwork, double* rwork, lapack_int lrwork,
11004                                 lapack_int* iwork );
11005
11006 //LAPACK 3.4.0
11007 lapack_int LAPACKE_sgemqrt( int matrix_layout, char side, char trans,
11008                             lapack_int m, lapack_int n, lapack_int k,
11009                             lapack_int nb, const float* v, lapack_int ldv,
11010                             const float* t, lapack_int ldt, float* c,
11011                             lapack_int ldc );
11012 lapack_int LAPACKE_dgemqrt( int matrix_layout, char side, char trans,
11013                             lapack_int m, lapack_int n, lapack_int k,
11014                             lapack_int nb, const double* v, lapack_int ldv,
11015                             const double* t, lapack_int ldt, double* c,
11016                             lapack_int ldc );
11017 lapack_int LAPACKE_cgemqrt( int matrix_layout, char side, char trans,
11018                             lapack_int m, lapack_int n, lapack_int k,
11019                             lapack_int nb, const lapack_complex_float* v,
11020                             lapack_int ldv, const lapack_complex_float* t,
11021                             lapack_int ldt, lapack_complex_float* c,
11022                             lapack_int ldc );
11023 lapack_int LAPACKE_zgemqrt( int matrix_layout, char side, char trans,
11024                             lapack_int m, lapack_int n, lapack_int k,
11025                             lapack_int nb, const lapack_complex_double* v,
11026                             lapack_int ldv, const lapack_complex_double* t,
11027                             lapack_int ldt, lapack_complex_double* c,
11028                             lapack_int ldc );
11029
11030 lapack_int LAPACKE_sgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11031                            lapack_int nb, float* a, lapack_int lda, float* t,
11032                            lapack_int ldt );
11033 lapack_int LAPACKE_dgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11034                            lapack_int nb, double* a, lapack_int lda, double* t,
11035                            lapack_int ldt );
11036 lapack_int LAPACKE_cgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11037                            lapack_int nb, lapack_complex_float* a,
11038                            lapack_int lda, lapack_complex_float* t,
11039                            lapack_int ldt );
11040 lapack_int LAPACKE_zgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11041                            lapack_int nb, lapack_complex_double* a,
11042                            lapack_int lda, lapack_complex_double* t,
11043                            lapack_int ldt );
11044
11045 lapack_int LAPACKE_sgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11046                             float* a, lapack_int lda, float* t,
11047                             lapack_int ldt );
11048 lapack_int LAPACKE_dgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11049                             double* a, lapack_int lda, double* t,
11050                             lapack_int ldt );
11051 lapack_int LAPACKE_cgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11052                             lapack_complex_float* a, lapack_int lda,
11053                             lapack_complex_float* t, lapack_int ldt );
11054 lapack_int LAPACKE_zgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11055                             lapack_complex_double* a, lapack_int lda,
11056                             lapack_complex_double* t, lapack_int ldt );
11057
11058 lapack_int LAPACKE_sgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11059                             float* a, lapack_int lda, float* t,
11060                             lapack_int ldt );
11061 lapack_int LAPACKE_dgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11062                             double* a, lapack_int lda, double* t,
11063                             lapack_int ldt );
11064 lapack_int LAPACKE_cgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11065                             lapack_complex_float* a, lapack_int lda,
11066                             lapack_complex_float* t, lapack_int ldt );
11067 lapack_int LAPACKE_zgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11068                             lapack_complex_double* a, lapack_int lda,
11069                             lapack_complex_double* t, lapack_int ldt );
11070
11071 lapack_int LAPACKE_stpmqrt( int matrix_layout, char side, char trans,
11072                             lapack_int m, lapack_int n, lapack_int k,
11073                             lapack_int l, lapack_int nb, const float* v,
11074                             lapack_int ldv, const float* t, lapack_int ldt,
11075                             float* a, lapack_int lda, float* b,
11076                             lapack_int ldb );
11077 lapack_int LAPACKE_dtpmqrt( int matrix_layout, char side, char trans,
11078                             lapack_int m, lapack_int n, lapack_int k,
11079                             lapack_int l, lapack_int nb, const double* v,
11080                             lapack_int ldv, const double* t, lapack_int ldt,
11081                             double* a, lapack_int lda, double* b,
11082                             lapack_int ldb );
11083 lapack_int LAPACKE_ctpmqrt( int matrix_layout, char side, char trans,
11084                             lapack_int m, lapack_int n, lapack_int k,
11085                             lapack_int l, lapack_int nb,
11086                             const lapack_complex_float* v, lapack_int ldv,
11087                             const lapack_complex_float* t, lapack_int ldt,
11088                             lapack_complex_float* a, lapack_int lda,
11089                             lapack_complex_float* b, lapack_int ldb );
11090 lapack_int LAPACKE_ztpmqrt( int matrix_layout, char side, char trans,
11091                             lapack_int m, lapack_int n, lapack_int k,
11092                             lapack_int l, lapack_int nb,
11093                             const lapack_complex_double* v, lapack_int ldv,
11094                             const lapack_complex_double* t, lapack_int ldt,
11095                             lapack_complex_double* a, lapack_int lda,
11096                             lapack_complex_double* b, lapack_int ldb );
11097
11098 lapack_int LAPACKE_stpqrt( int matrix_layout, lapack_int m, lapack_int n,
11099                            lapack_int l, lapack_int nb, float* a,
11100                            lapack_int lda, float* b, lapack_int ldb, float* t,
11101                            lapack_int ldt );
11102
11103 lapack_int LAPACKE_dtpqrt( int matrix_layout, lapack_int m, lapack_int n,
11104                            lapack_int l, lapack_int nb, double* a,
11105                            lapack_int lda, double* b, lapack_int ldb, double* t,
11106                            lapack_int ldt );
11107 lapack_int LAPACKE_ctpqrt( int matrix_layout, lapack_int m, lapack_int n,
11108                            lapack_int l, lapack_int nb,
11109                            lapack_complex_float* a, lapack_int lda,
11110                            lapack_complex_float* b, lapack_int ldb,
11111                            lapack_complex_float* t, lapack_int ldt );
11112 lapack_int LAPACKE_ztpqrt( int matrix_layout, lapack_int m, lapack_int n,
11113                            lapack_int l, lapack_int nb,
11114                            lapack_complex_double* a, lapack_int lda,
11115                            lapack_complex_double* b, lapack_int ldb,
11116                            lapack_complex_double* t, lapack_int ldt );
11117
11118 lapack_int LAPACKE_stpqrt2( int matrix_layout,
11119                             lapack_int m, lapack_int n, lapack_int l,
11120                             float* a, lapack_int lda,
11121                             float* b, lapack_int ldb,
11122                             float* t, lapack_int ldt );
11123 lapack_int LAPACKE_dtpqrt2( int matrix_layout,
11124                             lapack_int m, lapack_int n, lapack_int l,
11125                             double* a, lapack_int lda,
11126                             double* b, lapack_int ldb,
11127                             double* t, lapack_int ldt );
11128 lapack_int LAPACKE_ctpqrt2( int matrix_layout,
11129                             lapack_int m, lapack_int n, lapack_int l,
11130                             lapack_complex_float* a, lapack_int lda,
11131                             lapack_complex_float* b, lapack_int ldb,
11132                             lapack_complex_float* t, lapack_int ldt );
11133 lapack_int LAPACKE_ztpqrt2( int matrix_layout,
11134                             lapack_int m, lapack_int n, lapack_int l,
11135                             lapack_complex_double* a, lapack_int lda,
11136                             lapack_complex_double* b, lapack_int ldb,
11137                             lapack_complex_double* t, lapack_int ldt );
11138
11139 lapack_int LAPACKE_stprfb( int matrix_layout, char side, char trans, char direct,
11140                            char storev, lapack_int m, lapack_int n,
11141                            lapack_int k, lapack_int l, const float* v,
11142                            lapack_int ldv, const float* t, lapack_int ldt,
11143                            float* a, lapack_int lda, float* b, lapack_int ldb );
11144 lapack_int LAPACKE_dtprfb( int matrix_layout, char side, char trans, char direct,
11145                            char storev, lapack_int m, lapack_int n,
11146                            lapack_int k, lapack_int l, const double* v,
11147                            lapack_int ldv, const double* t, lapack_int ldt,
11148                            double* a, lapack_int lda, double* b, lapack_int ldb );
11149 lapack_int LAPACKE_ctprfb( int matrix_layout, char side, char trans, char direct,
11150                            char storev, lapack_int m, lapack_int n,
11151                            lapack_int k, lapack_int l,
11152                            const lapack_complex_float* v, lapack_int ldv,
11153                            const lapack_complex_float* t, lapack_int ldt,
11154                            lapack_complex_float* a, lapack_int lda,
11155                            lapack_complex_float* b, lapack_int ldb );
11156 lapack_int LAPACKE_ztprfb( int matrix_layout, char side, char trans, char direct,
11157                            char storev, lapack_int m, lapack_int n,
11158                            lapack_int k, lapack_int l,
11159                            const lapack_complex_double* v, lapack_int ldv,
11160                            const lapack_complex_double* t, lapack_int ldt,
11161                            lapack_complex_double* a, lapack_int lda,
11162                            lapack_complex_double* b, lapack_int ldb );
11163
11164 lapack_int LAPACKE_sgemqrt_work( int matrix_layout, char side, char trans,
11165                                  lapack_int m, lapack_int n, lapack_int k,
11166                                  lapack_int nb, const float* v, lapack_int ldv,
11167                                  const float* t, lapack_int ldt, float* c,
11168                                  lapack_int ldc, float* work );
11169 lapack_int LAPACKE_dgemqrt_work( int matrix_layout, char side, char trans,
11170                                  lapack_int m, lapack_int n, lapack_int k,
11171                                  lapack_int nb, const double* v, lapack_int ldv,
11172                                  const double* t, lapack_int ldt, double* c,
11173                                  lapack_int ldc, double* work );
11174 lapack_int LAPACKE_cgemqrt_work( int matrix_layout, char side, char trans,
11175                                  lapack_int m, lapack_int n, lapack_int k,
11176                                  lapack_int nb, const lapack_complex_float* v,
11177                                  lapack_int ldv, const lapack_complex_float* t,
11178                                  lapack_int ldt, lapack_complex_float* c,
11179                                  lapack_int ldc, lapack_complex_float* work );
11180 lapack_int LAPACKE_zgemqrt_work( int matrix_layout, char side, char trans,
11181                                  lapack_int m, lapack_int n, lapack_int k,
11182                                  lapack_int nb, const lapack_complex_double* v,
11183                                  lapack_int ldv, const lapack_complex_double* t,
11184                                  lapack_int ldt, lapack_complex_double* c,
11185                                  lapack_int ldc, lapack_complex_double* work );
11186
11187 lapack_int LAPACKE_sgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11188                                 lapack_int nb, float* a, lapack_int lda,
11189                                 float* t, lapack_int ldt, float* work );
11190 lapack_int LAPACKE_dgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11191                                 lapack_int nb, double* a, lapack_int lda,
11192                                 double* t, lapack_int ldt, double* work );
11193 lapack_int LAPACKE_cgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11194                                 lapack_int nb, lapack_complex_float* a,
11195                                 lapack_int lda, lapack_complex_float* t,
11196                                 lapack_int ldt, lapack_complex_float* work );
11197 lapack_int LAPACKE_zgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11198                                 lapack_int nb, lapack_complex_double* a,
11199                                 lapack_int lda, lapack_complex_double* t,
11200                                 lapack_int ldt, lapack_complex_double* work );
11201
11202 lapack_int LAPACKE_sgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11203                                  float* a, lapack_int lda, float* t,
11204                                  lapack_int ldt );
11205 lapack_int LAPACKE_dgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11206                                  double* a, lapack_int lda, double* t,
11207                                  lapack_int ldt );
11208 lapack_int LAPACKE_cgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11209                                  lapack_complex_float* a, lapack_int lda,
11210                                  lapack_complex_float* t, lapack_int ldt );
11211 lapack_int LAPACKE_zgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11212                                  lapack_complex_double* a, lapack_int lda,
11213                                  lapack_complex_double* t, lapack_int ldt );
11214
11215 lapack_int LAPACKE_sgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11216                                  float* a, lapack_int lda, float* t,
11217                                  lapack_int ldt );
11218 lapack_int LAPACKE_dgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11219                                  double* a, lapack_int lda, double* t,
11220                                  lapack_int ldt );
11221 lapack_int LAPACKE_cgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11222                                  lapack_complex_float* a, lapack_int lda,
11223                                  lapack_complex_float* t, lapack_int ldt );
11224 lapack_int LAPACKE_zgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11225                                  lapack_complex_double* a, lapack_int lda,
11226                                  lapack_complex_double* t, lapack_int ldt );
11227
11228 lapack_int LAPACKE_stpmqrt_work( int matrix_layout, char side, char trans,
11229                                  lapack_int m, lapack_int n, lapack_int k,
11230                                  lapack_int l, lapack_int nb, const float* v,
11231                                  lapack_int ldv, const float* t, lapack_int ldt,
11232                                  float* a, lapack_int lda, float* b,
11233                                  lapack_int ldb, float* work );
11234 lapack_int LAPACKE_dtpmqrt_work( int matrix_layout, char side, char trans,
11235                                  lapack_int m, lapack_int n, lapack_int k,
11236                                  lapack_int l, lapack_int nb, const double* v,
11237                                  lapack_int ldv, const double* t,
11238                                  lapack_int ldt, double* a, lapack_int lda,
11239                                  double* b, lapack_int ldb, double* work );
11240 lapack_int LAPACKE_ctpmqrt_work( int matrix_layout, char side, char trans,
11241                                  lapack_int m, lapack_int n, lapack_int k,
11242                                  lapack_int l, lapack_int nb,
11243                                  const lapack_complex_float* v, lapack_int ldv,
11244                                  const lapack_complex_float* t, lapack_int ldt,
11245                                  lapack_complex_float* a, lapack_int lda,
11246                                  lapack_complex_float* b, lapack_int ldb,
11247                                  lapack_complex_float* work );
11248 lapack_int LAPACKE_ztpmqrt_work( int matrix_layout, char side, char trans,
11249                                  lapack_int m, lapack_int n, lapack_int k,
11250                                  lapack_int l, lapack_int nb,
11251                                  const lapack_complex_double* v, lapack_int ldv,
11252                                  const lapack_complex_double* t, lapack_int ldt,
11253                                  lapack_complex_double* a, lapack_int lda,
11254                                  lapack_complex_double* b, lapack_int ldb,
11255                                  lapack_complex_double* work );
11256
11257 lapack_int LAPACKE_stpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11258                                 lapack_int l, lapack_int nb, float* a,
11259                                 lapack_int lda, float* b, lapack_int ldb,
11260                                 float* t, lapack_int ldt, float* work );
11261 lapack_int LAPACKE_dtpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11262                                 lapack_int l, lapack_int nb, double* a,
11263                                 lapack_int lda, double* b, lapack_int ldb,
11264                                 double* t, lapack_int ldt, double* work );
11265 lapack_int LAPACKE_ctpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11266                                 lapack_int l, lapack_int nb,
11267                                 lapack_complex_float* a, lapack_int lda,
11268                                 lapack_complex_float* b, lapack_int ldb,
11269                                 lapack_complex_float* t, lapack_int ldt,
11270                                 lapack_complex_float* work );
11271 lapack_int LAPACKE_ztpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11272                                 lapack_int l, lapack_int nb,
11273                                 lapack_complex_double* a, lapack_int lda,
11274                                 lapack_complex_double* b, lapack_int ldb,
11275                                 lapack_complex_double* t, lapack_int ldt,
11276                                 lapack_complex_double* work );
11277
11278 lapack_int LAPACKE_stpqrt2_work( int matrix_layout,
11279                                  lapack_int m, lapack_int n, lapack_int l,
11280                                  float* a, lapack_int lda,
11281                                  float* b, lapack_int ldb,
11282                                  float* t, lapack_int ldt );
11283 lapack_int LAPACKE_dtpqrt2_work( int matrix_layout,
11284                                  lapack_int m, lapack_int n, lapack_int l,
11285                                  double* a, lapack_int lda,
11286                                  double* b, lapack_int ldb,
11287                                  double* t, lapack_int ldt );
11288 lapack_int LAPACKE_ctpqrt2_work( int matrix_layout,
11289                                  lapack_int m, lapack_int n, lapack_int l,
11290                                  lapack_complex_float* a, lapack_int lda,
11291                                  lapack_complex_float* b, lapack_int ldb,
11292                                  lapack_complex_float* t, lapack_int ldt );
11293 lapack_int LAPACKE_ztpqrt2_work( int matrix_layout,
11294                                  lapack_int m, lapack_int n, lapack_int l,
11295                                  lapack_complex_double* a, lapack_int lda,
11296                                  lapack_complex_double* b, lapack_int ldb,
11297                                  lapack_complex_double* t, lapack_int ldt );
11298
11299 lapack_int LAPACKE_stprfb_work( int matrix_layout, char side, char trans,
11300                                 char direct, char storev, lapack_int m,
11301                                 lapack_int n, lapack_int k, lapack_int l,
11302                                 const float* v, lapack_int ldv, const float* t,
11303                                 lapack_int ldt, float* a, lapack_int lda,
11304                                 float* b, lapack_int ldb, float* work,
11305                                 lapack_int ldwork );
11306 lapack_int LAPACKE_dtprfb_work( int matrix_layout, char side, char trans,
11307                                 char direct, char storev, lapack_int m,
11308                                 lapack_int n, lapack_int k, lapack_int l,
11309                                 const double* v, lapack_int ldv,
11310                                 const double* t, lapack_int ldt, double* a,
11311                                 lapack_int lda, double* b, lapack_int ldb,
11312                                 double* work, lapack_int ldwork );
11313 lapack_int LAPACKE_ctprfb_work( int matrix_layout, char side, char trans,
11314                                 char direct, char storev, lapack_int m,
11315                                 lapack_int n, lapack_int k, lapack_int l,
11316                                 const lapack_complex_float* v, lapack_int ldv,
11317                                 const lapack_complex_float* t, lapack_int ldt,
11318                                 lapack_complex_float* a, lapack_int lda,
11319                                 lapack_complex_float* b, lapack_int ldb,
11320                                 lapack_complex_float* work, lapack_int ldwork );
11321 lapack_int LAPACKE_ztprfb_work( int matrix_layout, char side, char trans,
11322                                 char direct, char storev, lapack_int m,
11323                                 lapack_int n, lapack_int k, lapack_int l,
11324                                 const lapack_complex_double* v, lapack_int ldv,
11325                                 const lapack_complex_double* t, lapack_int ldt,
11326                                 lapack_complex_double* a, lapack_int lda,
11327                                 lapack_complex_double* b, lapack_int ldb,
11328                                 lapack_complex_double* work, lapack_int ldwork );
11329 //LAPACK 3.X.X
11330 lapack_int LAPACKE_ssysv_rook( int matrix_layout, char uplo, lapack_int n,
11331                                lapack_int nrhs, float* a, lapack_int lda,
11332                                lapack_int* ipiv, float* b, lapack_int ldb );
11333 lapack_int LAPACKE_dsysv_rook( int matrix_layout, char uplo, lapack_int n,
11334                                lapack_int nrhs, double* a, lapack_int lda,
11335                                lapack_int* ipiv, double* b, lapack_int ldb );
11336 lapack_int LAPACKE_csysv_rook( int matrix_layout, char uplo, lapack_int n,
11337                                lapack_int nrhs, lapack_complex_float* a,
11338                                lapack_int lda, lapack_int* ipiv,
11339                                lapack_complex_float* b, lapack_int ldb );
11340 lapack_int LAPACKE_zsysv_rook( int matrix_layout, char uplo, lapack_int n,
11341                                lapack_int nrhs, lapack_complex_double* a,
11342                                lapack_int lda, lapack_int* ipiv,
11343                                lapack_complex_double* b, lapack_int ldb );
11344
11345 lapack_int LAPACKE_ssytrf_rook( int matrix_layout, char uplo, lapack_int n, float* a,
11346                            lapack_int lda, lapack_int* ipiv );
11347 lapack_int LAPACKE_dsytrf_rook( int matrix_layout, char uplo, lapack_int n, double* a,
11348                            lapack_int lda, lapack_int* ipiv );
11349 lapack_int LAPACKE_csytrf_rook( int matrix_layout, char uplo, lapack_int n,
11350                            lapack_complex_float* a, lapack_int lda,
11351                            lapack_int* ipiv );
11352 lapack_int LAPACKE_zsytrf_rook( int matrix_layout, char uplo, lapack_int n,
11353                            lapack_complex_double* a, lapack_int lda,
11354                            lapack_int* ipiv );
11355
11356 lapack_int LAPACKE_ssytrs_rook( int matrix_layout, char uplo, lapack_int n,
11357                            lapack_int nrhs, const float* a, lapack_int lda,
11358                            const lapack_int* ipiv, float* b, lapack_int ldb );
11359 lapack_int LAPACKE_dsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11360                            lapack_int nrhs, const double* a, lapack_int lda,
11361                            const lapack_int* ipiv, double* b, lapack_int ldb );
11362 lapack_int LAPACKE_csytrs_rook( int matrix_layout, char uplo, lapack_int n,
11363                            lapack_int nrhs, const lapack_complex_float* a,
11364                            lapack_int lda, const lapack_int* ipiv,
11365                            lapack_complex_float* b, lapack_int ldb );
11366 lapack_int LAPACKE_zsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11367                            lapack_int nrhs, const lapack_complex_double* a,
11368                            lapack_int lda, const lapack_int* ipiv,
11369                            lapack_complex_double* b, lapack_int ldb );
11370
11371 lapack_int LAPACKE_chetrf_rook( int matrix_layout, char uplo, lapack_int n,
11372                            lapack_complex_float* a, lapack_int lda,
11373                            lapack_int* ipiv );
11374 lapack_int LAPACKE_zhetrf_rook( int matrix_layout, char uplo, lapack_int n,
11375                            lapack_complex_double* a, lapack_int lda,
11376                            lapack_int* ipiv );
11377
11378 lapack_int LAPACKE_chetrs_rook( int matrix_layout, char uplo, lapack_int n,
11379                            lapack_int nrhs, const lapack_complex_float* a,
11380                            lapack_int lda, const lapack_int* ipiv,
11381                            lapack_complex_float* b, lapack_int ldb );
11382 lapack_int LAPACKE_zhetrs_rook( int matrix_layout, char uplo, lapack_int n,
11383                            lapack_int nrhs, const lapack_complex_double* a,
11384                            lapack_int lda, const lapack_int* ipiv,
11385                            lapack_complex_double* b, lapack_int ldb );
11386
11387 lapack_int LAPACKE_csyr( int matrix_layout, char uplo, lapack_int n,
11388                              lapack_complex_float alpha,
11389                              const lapack_complex_float* x, lapack_int incx,
11390                              lapack_complex_float* a, lapack_int lda );
11391 lapack_int LAPACKE_zsyr( int matrix_layout, char uplo, lapack_int n,
11392                              lapack_complex_double alpha,
11393                              const lapack_complex_double* x, lapack_int incx,
11394                              lapack_complex_double* a, lapack_int lda );
11395
11396 lapack_int LAPACKE_ssysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11397                                     lapack_int nrhs, float* a, lapack_int lda,
11398                                     lapack_int* ipiv, float* b, lapack_int ldb,
11399                                     float* work, lapack_int lwork );
11400 lapack_int LAPACKE_dsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11401                                     lapack_int nrhs, double* a, lapack_int lda,
11402                                     lapack_int* ipiv, double* b, lapack_int ldb,
11403                                     double* work, lapack_int lwork );
11404 lapack_int LAPACKE_csysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11405                                     lapack_int nrhs, lapack_complex_float* a,
11406                                     lapack_int lda, lapack_int* ipiv,
11407                                     lapack_complex_float* b, lapack_int ldb,
11408                                     lapack_complex_float* work,
11409                                     lapack_int lwork );
11410 lapack_int LAPACKE_zsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11411                                     lapack_int nrhs, lapack_complex_double* a,
11412                                     lapack_int lda, lapack_int* ipiv,
11413                                     lapack_complex_double* b, lapack_int ldb,
11414                                     lapack_complex_double* work,
11415                                     lapack_int lwork );
11416
11417 lapack_int LAPACKE_ssytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11418                                 float* a, lapack_int lda, lapack_int* ipiv,
11419                                 float* work, lapack_int lwork );
11420 lapack_int LAPACKE_dsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11421                                 double* a, lapack_int lda, lapack_int* ipiv,
11422                                 double* work, lapack_int lwork );
11423 lapack_int LAPACKE_csytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11424                                 lapack_complex_float* a, lapack_int lda,
11425                                 lapack_int* ipiv, lapack_complex_float* work,
11426                                 lapack_int lwork );
11427 lapack_int LAPACKE_zsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11428                                 lapack_complex_double* a, lapack_int lda,
11429                                 lapack_int* ipiv, lapack_complex_double* work,
11430                                 lapack_int lwork );
11431
11432 lapack_int LAPACKE_ssytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11433                                 lapack_int nrhs, const float* a, lapack_int lda,
11434                                 const lapack_int* ipiv, float* b,
11435                                 lapack_int ldb );
11436 lapack_int LAPACKE_dsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11437                                 lapack_int nrhs, const double* a,
11438                                 lapack_int lda, const lapack_int* ipiv,
11439                                 double* b, lapack_int ldb );
11440 lapack_int LAPACKE_csytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11441                                 lapack_int nrhs, const lapack_complex_float* a,
11442                                 lapack_int lda, const lapack_int* ipiv,
11443                                 lapack_complex_float* b, lapack_int ldb );
11444 lapack_int LAPACKE_zsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11445                                 lapack_int nrhs, const lapack_complex_double* a,
11446                                 lapack_int lda, const lapack_int* ipiv,
11447                                 lapack_complex_double* b, lapack_int ldb );
11448
11449 lapack_int LAPACKE_chetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11450                                 lapack_complex_float* a, lapack_int lda,
11451                                 lapack_int* ipiv, lapack_complex_float* work,
11452                                 lapack_int lwork );
11453 lapack_int LAPACKE_zhetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11454                                 lapack_complex_double* a, lapack_int lda,
11455                                 lapack_int* ipiv, lapack_complex_double* work,
11456                                 lapack_int lwork );
11457
11458 lapack_int LAPACKE_chetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11459                                 lapack_int nrhs, const lapack_complex_float* a,
11460                                 lapack_int lda, const lapack_int* ipiv,
11461                                 lapack_complex_float* b, lapack_int ldb );
11462 lapack_int LAPACKE_zhetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11463                                 lapack_int nrhs, const lapack_complex_double* a,
11464                                 lapack_int lda, const lapack_int* ipiv,
11465                                 lapack_complex_double* b, lapack_int ldb );
11466
11467
11468 lapack_int LAPACKE_csyr_work( int matrix_layout, char uplo, lapack_int n,
11469                                   lapack_complex_float alpha,
11470                                   const lapack_complex_float* x,
11471                                   lapack_int incx, lapack_complex_float* a,
11472                                   lapack_int lda );
11473 lapack_int LAPACKE_zsyr_work( int matrix_layout, char uplo, lapack_int n,
11474                                   lapack_complex_double alpha,
11475                                   const lapack_complex_double* x,
11476                                   lapack_int incx, lapack_complex_double* a,
11477                                   lapack_int lda );
11478 void LAPACKE_ilaver( lapack_int* vers_major,
11479                      lapack_int* vers_minor,
11480                      lapack_int* vers_patch );
11481 // LAPACK 3.7.0
11482 lapack_int LAPACKE_ssysv_aa( int matrix_layout, char uplo, lapack_int n,
11483                           lapack_int nrhs, float* a, lapack_int lda,
11484                           lapack_int* ipiv, float* b, lapack_int ldb );
11485 lapack_int LAPACKE_ssysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11486                                lapack_int nrhs, float* a, lapack_int lda,
11487                                lapack_int* ipiv, float* b, lapack_int ldb,
11488                                float* work, lapack_int lwork );
11489 lapack_int LAPACKE_dsysv_aa( int matrix_layout, char uplo, lapack_int n,
11490                           lapack_int nrhs, double* a, lapack_int lda,
11491                           lapack_int* ipiv, double* b, lapack_int ldb );
11492 lapack_int LAPACKE_dsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11493                                lapack_int nrhs, double* a, lapack_int lda,
11494                                lapack_int* ipiv, double* b, lapack_int ldb,
11495                                double* work, lapack_int lwork );
11496 lapack_int LAPACKE_csysv_aa( int matrix_layout, char uplo, lapack_int n,
11497                           lapack_int nrhs, lapack_complex_float* a,
11498                           lapack_int lda, lapack_int* ipiv,
11499                           lapack_complex_float* b, lapack_int ldb );
11500 lapack_int LAPACKE_csysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11501                                lapack_int nrhs, lapack_complex_float* a,
11502                                lapack_int lda, lapack_int* ipiv,
11503                                lapack_complex_float* b, lapack_int ldb,
11504                                lapack_complex_float* work, lapack_int lwork );
11505 lapack_int LAPACKE_zsysv_aa( int matrix_layout, char uplo, lapack_int n,
11506                           lapack_int nrhs, lapack_complex_double* a,
11507                           lapack_int lda, lapack_int* ipiv,
11508                           lapack_complex_double* b, lapack_int ldb );
11509 lapack_int LAPACKE_zsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11510                                lapack_int nrhs, lapack_complex_double* a,
11511                                lapack_int lda, lapack_int* ipiv,
11512                                lapack_complex_double* b, lapack_int ldb,
11513                                lapack_complex_double* work, lapack_int lwork );
11514 lapack_int LAPACKE_chesv_aa( int matrix_layout, char uplo, lapack_int n,
11515                           lapack_int nrhs, lapack_complex_float* a,
11516                           lapack_int lda, lapack_int* ipiv,
11517                           lapack_complex_float* b, lapack_int ldb );
11518 lapack_int LAPACKE_chesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11519                                lapack_int nrhs, lapack_complex_float* a,
11520                                lapack_int lda, lapack_int* ipiv,
11521                                lapack_complex_float* b, lapack_int ldb,
11522                                lapack_complex_float* work, lapack_int lwork );
11523 lapack_int LAPACKE_zhesv_aa( int matrix_layout, char uplo, lapack_int n,
11524                           lapack_int nrhs, lapack_complex_double* a,
11525                           lapack_int lda, lapack_int* ipiv,
11526                           lapack_complex_double* b, lapack_int ldb );
11527 lapack_int LAPACKE_zhesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11528                                lapack_int nrhs, lapack_complex_double* a,
11529                                lapack_int lda, lapack_int* ipiv,
11530                                lapack_complex_double* b, lapack_int ldb,
11531                                lapack_complex_double* work, lapack_int lwork );
11532
11533 lapack_int LAPACKE_ssytrf_aa( int matrix_layout, char uplo, lapack_int n, float* a,
11534                            lapack_int lda, lapack_int* ipiv );
11535 lapack_int LAPACKE_dsytrf_aa( int matrix_layout, char uplo, lapack_int n, double* a,
11536                            lapack_int lda, lapack_int* ipiv );
11537 lapack_int LAPACKE_csytrf_aa( int matrix_layout, char uplo, lapack_int n,
11538                            lapack_complex_float* a, lapack_int lda,
11539                            lapack_int* ipiv );
11540 lapack_int LAPACKE_zsytrf_aa( int matrix_layout, char uplo, lapack_int n,
11541                            lapack_complex_double* a, lapack_int lda,
11542                            lapack_int* ipiv );
11543 lapack_int LAPACKE_chetrf_aa( int matrix_layout, char uplo, lapack_int n,
11544                            lapack_complex_float* a, lapack_int lda,
11545                            lapack_int* ipiv );
11546 lapack_int LAPACKE_zhetrf_aa( int matrix_layout, char uplo, lapack_int n,
11547                            lapack_complex_double* a, lapack_int lda,
11548                            lapack_int* ipiv );
11549
11550 lapack_int LAPACKE_ssytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11551                                 float* a, lapack_int lda, lapack_int* ipiv,
11552                                 float* work, lapack_int lwork );
11553 lapack_int LAPACKE_dsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11554                                 double* a, lapack_int lda, lapack_int* ipiv,
11555                                 double* work, lapack_int lwork );
11556 lapack_int LAPACKE_csytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11557                                 lapack_complex_float* a, lapack_int lda,
11558                                 lapack_int* ipiv, lapack_complex_float* work,
11559                                 lapack_int lwork );
11560 lapack_int LAPACKE_zsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11561                                 lapack_complex_double* a, lapack_int lda,
11562                                 lapack_int* ipiv, lapack_complex_double* work,
11563                                 lapack_int lwork );
11564 lapack_int LAPACKE_chetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11565                                 lapack_complex_float* a, lapack_int lda,
11566                                 lapack_int* ipiv, lapack_complex_float* work,
11567                                 lapack_int lwork );
11568 lapack_int LAPACKE_zhetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11569                                 lapack_complex_double* a, lapack_int lda,
11570                                 lapack_int* ipiv, lapack_complex_double* work,
11571                                 lapack_int lwork );
11572
11573
11574 lapack_int LAPACKE_csytrs_aa( int matrix_layout, char uplo, lapack_int n,
11575                             lapack_int nrhs, const lapack_complex_float* a,
11576                             lapack_int lda, const lapack_int* ipiv,
11577                             lapack_complex_float* b, lapack_int ldb );
11578 lapack_int LAPACKE_csytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11579                                  lapack_int nrhs, const lapack_complex_float* a,
11580                                  lapack_int lda, const lapack_int* ipiv,
11581                                  lapack_complex_float* b, lapack_int ldb,
11582                                  lapack_complex_float* work, lapack_int lwork );
11583 lapack_int LAPACKE_chetrs_aa( int matrix_layout, char uplo, lapack_int n,
11584                             lapack_int nrhs, const lapack_complex_float* a,
11585                             lapack_int lda, const lapack_int* ipiv,
11586                             lapack_complex_float* b, lapack_int ldb );
11587 lapack_int LAPACKE_chetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11588                                  lapack_int nrhs, const lapack_complex_float* a,
11589                                  lapack_int lda, const lapack_int* ipiv,
11590                                  lapack_complex_float* b, lapack_int ldb,
11591                                  lapack_complex_float* work, lapack_int lwork );
11592 lapack_int LAPACKE_dsytrs_aa( int matrix_layout, char uplo, lapack_int n,
11593                             lapack_int nrhs, const double* a, lapack_int lda,
11594                             const lapack_int* ipiv, double* b, lapack_int ldb );
11595 lapack_int LAPACKE_dsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11596                                  lapack_int nrhs, const double* a,
11597                                  lapack_int lda, const lapack_int* ipiv,
11598                                  double* b, lapack_int ldb, double* work, lapack_int lwork );
11599 lapack_int LAPACKE_ssytrs_aa( int matrix_layout, char uplo, lapack_int n,
11600                            lapack_int nrhs, const float* a, lapack_int lda,
11601                            const lapack_int* ipiv, float* b, lapack_int ldb );
11602 lapack_int LAPACKE_ssytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11603                                 lapack_int nrhs, const float* a, lapack_int lda,
11604                                 const lapack_int* ipiv, float* b,
11605                                 lapack_int ldb, float* work, lapack_int lwork );
11606 lapack_int LAPACKE_zsytrs_aa( int matrix_layout, char uplo, lapack_int n,
11607                             lapack_int nrhs, const lapack_complex_double* a,
11608                             lapack_int lda, const lapack_int* ipiv,
11609                             lapack_complex_double* b, lapack_int ldb );
11610 lapack_int LAPACKE_zsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11611                                  lapack_int nrhs, const lapack_complex_double* a,
11612                                  lapack_int lda, const lapack_int* ipiv,
11613                                  lapack_complex_double* b, lapack_int ldb,
11614                                  lapack_complex_double* work,  lapack_int lwork);
11615 lapack_int LAPACKE_zhetrs_aa( int matrix_layout, char uplo, lapack_int n,
11616                             lapack_int nrhs, const lapack_complex_double* a,
11617                             lapack_int lda, const lapack_int* ipiv,
11618                             lapack_complex_double* b, lapack_int ldb );
11619 lapack_int LAPACKE_zhetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11620                                  lapack_int nrhs, const lapack_complex_double* a,
11621                                  lapack_int lda, const lapack_int* ipiv,
11622                                  lapack_complex_double* b, lapack_int ldb,
11623                                  lapack_complex_double* work,  lapack_int lwork);
11624
11625
11626 lapack_int LAPACKE_ssysv_rk( int matrix_layout, char uplo, lapack_int n,
11627                           lapack_int nrhs, float* a, lapack_int lda,
11628                           float* e, lapack_int* ipiv, float* b, lapack_int ldb );
11629 lapack_int LAPACKE_ssysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11630                                lapack_int nrhs, float* a, lapack_int lda,
11631                                float* e, lapack_int* ipiv, float* b, lapack_int ldb,
11632                                float* work, lapack_int lwork );
11633 lapack_int LAPACKE_dsysv_rk( int matrix_layout, char uplo, lapack_int n,
11634                           lapack_int nrhs, double* a, lapack_int lda,
11635                           double* e, lapack_int* ipiv, double* b, lapack_int ldb );
11636 lapack_int LAPACKE_dsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11637                                lapack_int nrhs, double* a, lapack_int lda,
11638                                double* e, lapack_int* ipiv, double* b, lapack_int ldb,
11639                                double* work, lapack_int lwork );
11640 lapack_int LAPACKE_csysv_rk( int matrix_layout, char uplo, lapack_int n,
11641                           lapack_int nrhs, lapack_complex_float* a,
11642                           lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11643                           lapack_complex_float* b, lapack_int ldb );
11644 lapack_int LAPACKE_csysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11645                                lapack_int nrhs, lapack_complex_float* a,
11646                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11647                                lapack_complex_float* b, lapack_int ldb,
11648                                lapack_complex_float* work, lapack_int lwork );
11649 lapack_int LAPACKE_zsysv_rk( int matrix_layout, char uplo, lapack_int n,
11650                           lapack_int nrhs, lapack_complex_double* a,
11651                           lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11652                           lapack_complex_double* b, lapack_int ldb );
11653 lapack_int LAPACKE_zsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11654                                lapack_int nrhs, lapack_complex_double* a,
11655                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11656                                lapack_complex_double* b, lapack_int ldb,
11657                                lapack_complex_double* work, lapack_int lwork );
11658 lapack_int LAPACKE_chesv_rk( int matrix_layout, char uplo, lapack_int n,
11659                           lapack_int nrhs, lapack_complex_float* a,
11660                           lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11661                           lapack_complex_float* b, lapack_int ldb );
11662 lapack_int LAPACKE_chesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11663                                lapack_int nrhs, lapack_complex_float* a,
11664                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11665                                lapack_complex_float* b, lapack_int ldb,
11666                                lapack_complex_float* work, lapack_int lwork );
11667 lapack_int LAPACKE_zhesv_rk( int matrix_layout, char uplo, lapack_int n,
11668                           lapack_int nrhs, lapack_complex_double* a,
11669                           lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11670                           lapack_complex_double* b, lapack_int ldb );
11671 lapack_int LAPACKE_zhesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11672                                lapack_int nrhs, lapack_complex_double* a,
11673                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11674                                lapack_complex_double* b, lapack_int ldb,
11675                                lapack_complex_double* work, lapack_int lwork );
11676
11677 lapack_int LAPACKE_ssytrf_rk( int matrix_layout, char uplo, lapack_int n, float* a,
11678                            lapack_int lda, float* e, lapack_int* ipiv );
11679 lapack_int LAPACKE_dsytrf_rk( int matrix_layout, char uplo, lapack_int n, double* a,
11680                            lapack_int lda, double* e, lapack_int* ipiv );
11681 lapack_int LAPACKE_csytrf_rk( int matrix_layout, char uplo, lapack_int n,
11682                            lapack_complex_float* a, lapack_int lda,
11683                            lapack_complex_float* e, lapack_int* ipiv );
11684 lapack_int LAPACKE_zsytrf_rk( int matrix_layout, char uplo, lapack_int n,
11685                            lapack_complex_double* a, lapack_int lda,
11686                            lapack_complex_double* e, lapack_int* ipiv );
11687 lapack_int LAPACKE_chetrf_rk( int matrix_layout, char uplo, lapack_int n,
11688                            lapack_complex_float* a, lapack_int lda,
11689                            lapack_complex_float* e, lapack_int* ipiv );
11690 lapack_int LAPACKE_zhetrf_rk( int matrix_layout, char uplo, lapack_int n,
11691                            lapack_complex_double* a, lapack_int lda,
11692                            lapack_complex_double* e, lapack_int* ipiv );
11693 lapack_int LAPACKE_ssytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11694                                 float* a, lapack_int lda, float* e, lapack_int* ipiv,
11695                                 float* work, lapack_int lwork );
11696 lapack_int LAPACKE_dsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11697                                 double* a, lapack_int lda, double* e, lapack_int* ipiv,
11698                                 double* work, lapack_int lwork );
11699 lapack_int LAPACKE_csytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11700                                 lapack_complex_float* a, lapack_int lda,
11701                                 lapack_complex_float* e,
11702                                 lapack_int* ipiv, lapack_complex_float* work,
11703                                 lapack_int lwork );
11704 lapack_int LAPACKE_zsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11705                                 lapack_complex_double* a, lapack_int lda,
11706                                 lapack_complex_double* e,
11707                                 lapack_int* ipiv, lapack_complex_double* work,
11708                                 lapack_int lwork );
11709 lapack_int LAPACKE_chetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11710                                 lapack_complex_float* a, lapack_int lda,
11711                                 lapack_complex_float* e,
11712                                 lapack_int* ipiv, lapack_complex_float* work,
11713                                 lapack_int lwork );
11714 lapack_int LAPACKE_zhetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11715                                 lapack_complex_double* a, lapack_int lda,
11716                                 lapack_complex_double* e,
11717                                 lapack_int* ipiv, lapack_complex_double* work,
11718                                 lapack_int lwork );
11719
11720 lapack_int LAPACKE_csytrs_3( int matrix_layout, char uplo, lapack_int n,
11721                             lapack_int nrhs, const lapack_complex_float* a,
11722                             lapack_int lda, const lapack_complex_float* e,
11723                             const lapack_int* ipiv,
11724                             lapack_complex_float* b, lapack_int ldb );
11725 lapack_int LAPACKE_csytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11726                                  lapack_int nrhs, const lapack_complex_float* a,
11727                                  lapack_int lda, const lapack_complex_float* e,
11728                                  const lapack_int* ipiv,
11729                                  lapack_complex_float* b, lapack_int ldb);
11730 lapack_int LAPACKE_chetrs_3( int matrix_layout, char uplo, lapack_int n,
11731                             lapack_int nrhs, const lapack_complex_float* a,
11732                             lapack_int lda, const lapack_complex_float* e,
11733                             const lapack_int* ipiv,
11734                             lapack_complex_float* b, lapack_int ldb );
11735 lapack_int LAPACKE_chetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11736                                  lapack_int nrhs, const lapack_complex_float* a,
11737                                  lapack_int lda, const lapack_complex_float* e,
11738                                  const lapack_int* ipiv,
11739                                  lapack_complex_float* b, lapack_int ldb);
11740 lapack_int LAPACKE_dsytrs_3( int matrix_layout, char uplo, lapack_int n,
11741                             lapack_int nrhs, const double* a, lapack_int lda,
11742                             const double* e,
11743                             const lapack_int* ipiv, double* b, lapack_int ldb );
11744 lapack_int LAPACKE_dsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11745                                  lapack_int nrhs, const double* a,
11746                                  lapack_int lda, const double* e,
11747                                  const lapack_int* ipiv,
11748                                  double* b, lapack_int ldb);
11749 lapack_int LAPACKE_ssytrs_3( int matrix_layout, char uplo, lapack_int n,
11750                            lapack_int nrhs, const float* a, lapack_int lda,
11751                            const float* e,
11752                            const lapack_int* ipiv, float* b, lapack_int ldb );
11753 lapack_int LAPACKE_ssytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11754                                 lapack_int nrhs, const float* a, lapack_int lda,
11755                                 const float* e, const lapack_int* ipiv, float* b,
11756                                 lapack_int ldb);
11757 lapack_int LAPACKE_zsytrs_3( int matrix_layout, char uplo, lapack_int n,
11758                             lapack_int nrhs, const lapack_complex_double* a,
11759                             lapack_int lda, const lapack_complex_double* e,
11760                             const lapack_int* ipiv,
11761                             lapack_complex_double* b, lapack_int ldb );
11762 lapack_int LAPACKE_zsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11763                                  lapack_int nrhs, const lapack_complex_double* a,
11764                                  lapack_int lda, const lapack_complex_double* e,
11765                                  const lapack_int* ipiv,
11766                                  lapack_complex_double* b, lapack_int ldb);
11767 lapack_int LAPACKE_zhetrs_3( int matrix_layout, char uplo, lapack_int n,
11768                             lapack_int nrhs, const lapack_complex_double* a,
11769                             lapack_int lda, const lapack_complex_double* e,
11770                             const lapack_int* ipiv,
11771                             lapack_complex_double* b, lapack_int ldb );
11772 lapack_int LAPACKE_zhetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11773                                  lapack_int nrhs, const lapack_complex_double* a,
11774                                  lapack_int lda, const lapack_complex_double* e,
11775                                  const lapack_int* ipiv,
11776                                  lapack_complex_double* b, lapack_int ldb);
11777
11778 lapack_int LAPACKE_ssytri_3( int matrix_layout, char uplo, lapack_int n, float* a,
11779                            lapack_int lda, const float* e, const lapack_int* ipiv );
11780 lapack_int LAPACKE_dsytri_3( int matrix_layout, char uplo, lapack_int n, double* a,
11781                            lapack_int lda, const double* e, const lapack_int* ipiv );
11782 lapack_int LAPACKE_csytri_3( int matrix_layout, char uplo, lapack_int n,
11783                            lapack_complex_float* a, lapack_int lda,
11784                            const lapack_complex_float* e, const lapack_int* ipiv );
11785 lapack_int LAPACKE_zsytri_3( int matrix_layout, char uplo, lapack_int n,
11786                            lapack_complex_double* a, lapack_int lda,
11787                            const lapack_complex_double* e, const lapack_int* ipiv );
11788 lapack_int LAPACKE_chetri_3( int matrix_layout, char uplo, lapack_int n,
11789                            lapack_complex_float* a, lapack_int lda,
11790                            const lapack_complex_float* e, const lapack_int* ipiv );
11791 lapack_int LAPACKE_zhetri_3( int matrix_layout, char uplo, lapack_int n,
11792                            lapack_complex_double* a, lapack_int lda,
11793                            const lapack_complex_double* e, const lapack_int* ipiv );
11794 lapack_int LAPACKE_ssytri_3_work( int matrix_layout, char uplo, lapack_int n, float* a,
11795                            lapack_int lda, const float* e, const lapack_int* ipiv,
11796                            float* work, lapack_int lwork  );
11797 lapack_int LAPACKE_dsytri_3_work( int matrix_layout, char uplo, lapack_int n, double* a,
11798                            lapack_int lda, const double* e, const lapack_int* ipiv,
11799                            double* work, lapack_int lwork  );
11800 lapack_int LAPACKE_csytri_3_work( int matrix_layout, char uplo, lapack_int n,
11801                            lapack_complex_float* a, lapack_int lda,
11802                            const lapack_complex_float* e, const lapack_int* ipiv,
11803                            lapack_complex_float* work, lapack_int lwork  );
11804 lapack_int LAPACKE_zsytri_3_work( int matrix_layout, char uplo, lapack_int n,
11805                            lapack_complex_double* a, lapack_int lda,
11806                            const lapack_complex_double* e, const lapack_int* ipiv,
11807                            lapack_complex_double* work, lapack_int lwork  );
11808 lapack_int LAPACKE_chetri_3_work( int matrix_layout, char uplo, lapack_int n,
11809                            lapack_complex_float* a, lapack_int lda,
11810                            const lapack_complex_float* e, const lapack_int* ipiv,
11811                            lapack_complex_float* work, lapack_int lwork  );
11812 lapack_int LAPACKE_zhetri_3_work( int matrix_layout, char uplo, lapack_int n,
11813                            lapack_complex_double* a, lapack_int lda,
11814                            const lapack_complex_double* e, const lapack_int* ipiv,
11815                            lapack_complex_double* work, lapack_int lwork );
11816
11817 lapack_int LAPACKE_ssycon_3( int matrix_layout, char uplo, lapack_int n,
11818                            const float* a, lapack_int lda, const float* e,
11819                            const lapack_int* ipiv, float anorm, float* rcond );
11820 lapack_int LAPACKE_dsycon_3( int matrix_layout, char uplo, lapack_int n,
11821                            const double* a, lapack_int lda, const double* e,
11822                            const lapack_int* ipiv, double anorm,
11823                            double* rcond );
11824 lapack_int LAPACKE_csycon_3( int matrix_layout, char uplo, lapack_int n,
11825                            const lapack_complex_float* a, lapack_int lda,
11826                            const lapack_complex_float* e,
11827                            const lapack_int* ipiv, float anorm, float* rcond );
11828 lapack_int LAPACKE_zsycon_3( int matrix_layout, char uplo, lapack_int n,
11829                            const lapack_complex_double* a, lapack_int lda,
11830                            const lapack_complex_double* e,
11831                            const lapack_int* ipiv, double anorm,
11832                            double* rcond );
11833 lapack_int LAPACKE_checon_3( int matrix_layout, char uplo, lapack_int n,
11834                            const lapack_complex_float* a, lapack_int lda,
11835                            const lapack_complex_float* e,
11836                            const lapack_int* ipiv, float anorm, float* rcond );
11837 lapack_int LAPACKE_zhecon_3( int matrix_layout, char uplo, lapack_int n,
11838                            const lapack_complex_double* a, lapack_int lda,
11839                            const lapack_complex_double* e,
11840                            const lapack_int* ipiv, double anorm,
11841                            double* rcond );
11842 lapack_int LAPACKE_ssycon_3_work( int matrix_layout, char uplo, lapack_int n,
11843                                 const float* a, lapack_int lda, const float* e,
11844                                 const lapack_int* ipiv, float anorm,
11845                                 float* rcond, float* work, lapack_int* iwork );
11846 lapack_int LAPACKE_dsycon_3_work( int matrix_layout, char uplo, lapack_int n,
11847                                 const double* a, lapack_int lda, const double* e,
11848                                 const lapack_int* ipiv, double anorm,
11849                                 double* rcond, double* work,
11850                                 lapack_int* iwork );
11851 lapack_int LAPACKE_csycon_3_work( int matrix_layout, char uplo, lapack_int n,
11852                                 const lapack_complex_float* a, lapack_int lda,
11853                                 const lapack_complex_float* e,
11854                                 const lapack_int* ipiv, float anorm,
11855                                 float* rcond, lapack_complex_float* work );
11856 lapack_int LAPACKE_zsycon_3_work( int matrix_layout, char uplo, lapack_int n,
11857                                 const lapack_complex_double* a, lapack_int lda,
11858                                 const lapack_complex_double* e,
11859                                 const lapack_int* ipiv, double anorm,
11860                                 double* rcond, lapack_complex_double* work );
11861 lapack_int LAPACKE_checon_3_work( int matrix_layout, char uplo, lapack_int n,
11862                                 const lapack_complex_float* a, lapack_int lda,
11863                                 const lapack_complex_float* e,
11864                                 const lapack_int* ipiv, float anorm,
11865                                 float* rcond, lapack_complex_float* work );
11866 lapack_int LAPACKE_zhecon_3_work( int matrix_layout, char uplo, lapack_int n,
11867                                 const lapack_complex_double* a, lapack_int lda,
11868                                 const lapack_complex_double* e,
11869                                 const lapack_int* ipiv, double anorm,
11870                                 double* rcond, lapack_complex_double* work );
11871
11872 lapack_int LAPACKE_sgelq( int matrix_layout, lapack_int m, lapack_int n,
11873                           float* a, lapack_int lda,
11874                           float* t, lapack_int tsize );
11875 lapack_int LAPACKE_dgelq( int matrix_layout, lapack_int m, lapack_int n,
11876                           double* a, lapack_int lda,
11877                           double* t, lapack_int tsize );
11878 lapack_int LAPACKE_cgelq( int matrix_layout, lapack_int m, lapack_int n,
11879                           lapack_complex_float* a, lapack_int lda,
11880                           lapack_complex_float* t, lapack_int tsize );
11881 lapack_int LAPACKE_zgelq( int matrix_layout, lapack_int m, lapack_int n,
11882                           lapack_complex_double* a, lapack_int lda,
11883                           lapack_complex_double* t, lapack_int tsize );
11884
11885 lapack_int LAPACKE_sgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11886                                float* a, lapack_int lda,
11887                                float* t, lapack_int tsize,
11888                                float* work, lapack_int lwork );
11889 lapack_int LAPACKE_dgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11890                                double* a, lapack_int lda,
11891                                double* t, lapack_int tsize,
11892                                double* work, lapack_int lwork );
11893 lapack_int LAPACKE_cgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11894                                lapack_complex_float* a, lapack_int lda,
11895                                lapack_complex_float* t, lapack_int tsize,
11896                                lapack_complex_float* work, lapack_int lwork );
11897 lapack_int LAPACKE_zgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11898                                lapack_complex_double* a, lapack_int lda,
11899                                lapack_complex_double* t, lapack_int tsize,
11900                                lapack_complex_double* work, lapack_int lwork );
11901
11902 lapack_int LAPACKE_sgemlq( int matrix_layout, char side, char trans,
11903                            lapack_int m, lapack_int n, lapack_int k,
11904                            const float* a, lapack_int lda,
11905                            const float* t, lapack_int tsize,
11906                            float* c, lapack_int ldc );
11907 lapack_int LAPACKE_dgemlq( int matrix_layout, char side, char trans,
11908                            lapack_int m, lapack_int n, lapack_int k,
11909                            const double* a, lapack_int lda,
11910                            const double* t, lapack_int tsize,
11911                            double* c, lapack_int ldc );
11912 lapack_int LAPACKE_cgemlq( int matrix_layout, char side, char trans,
11913                            lapack_int m, lapack_int n, lapack_int k,
11914                            const lapack_complex_float* a, lapack_int lda,
11915                            const lapack_complex_float* t, lapack_int tsize,
11916                            lapack_complex_float* c, lapack_int ldc );
11917 lapack_int LAPACKE_zgemlq( int matrix_layout, char side, char trans,
11918                            lapack_int m, lapack_int n, lapack_int k,
11919                            const lapack_complex_double* a, lapack_int lda,
11920                            const lapack_complex_double* t, lapack_int tsize,
11921                            lapack_complex_double* c, lapack_int ldc );
11922
11923 lapack_int LAPACKE_sgemlq_work( int matrix_layout, char side, char trans,
11924                                 lapack_int m, lapack_int n, lapack_int k,
11925                                 const float* a, lapack_int lda,
11926                                 const float* t, lapack_int tsize,
11927                                 float* c, lapack_int ldc,
11928                                 float* work, lapack_int lwork );
11929 lapack_int LAPACKE_dgemlq_work( int matrix_layout, char side, char trans,
11930                                 lapack_int m, lapack_int n, lapack_int k,
11931                                 const double* a, lapack_int lda,
11932                                 const double* t, lapack_int tsize,
11933                                 double* c, lapack_int ldc,
11934                                 double* work, lapack_int lwork );
11935 lapack_int LAPACKE_cgemlq_work( int matrix_layout, char side, char trans,
11936                                 lapack_int m, lapack_int n, lapack_int k,
11937                                 const lapack_complex_float* a, lapack_int lda,
11938                                 const lapack_complex_float* t, lapack_int tsize,
11939                                 lapack_complex_float* c, lapack_int ldc,
11940                                 lapack_complex_float* work, lapack_int lwork );
11941 lapack_int LAPACKE_zgemlq_work( int matrix_layout, char side, char trans,
11942                                 lapack_int m, lapack_int n, lapack_int k,
11943                                 const lapack_complex_double* a, lapack_int lda,
11944                                 const lapack_complex_double* t, lapack_int tsize,
11945                                 lapack_complex_double* c, lapack_int ldc,
11946                                 lapack_complex_double* work, lapack_int lwork );
11947
11948 lapack_int LAPACKE_sgeqr( int matrix_layout, lapack_int m, lapack_int n,
11949                           float* a, lapack_int lda,
11950                           float* t, lapack_int tsize );
11951 lapack_int LAPACKE_dgeqr( int matrix_layout, lapack_int m, lapack_int n,
11952                           double* a, lapack_int lda,
11953                           double* t, lapack_int tsize );
11954 lapack_int LAPACKE_cgeqr( int matrix_layout, lapack_int m, lapack_int n,
11955                           lapack_complex_float* a, lapack_int lda,
11956                           lapack_complex_float* t, lapack_int tsize );
11957 lapack_int LAPACKE_zgeqr( int matrix_layout, lapack_int m, lapack_int n,
11958                           lapack_complex_double* a, lapack_int lda,
11959                           lapack_complex_double* t, lapack_int tsize );
11960
11961 lapack_int LAPACKE_sgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11962                                float* a, lapack_int lda,
11963                                float* t, lapack_int tsize,
11964                                float* work, lapack_int lwork );
11965 lapack_int LAPACKE_dgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11966                                double* a, lapack_int lda,
11967                                double* t, lapack_int tsize,
11968                                double* work, lapack_int lwork );
11969 lapack_int LAPACKE_cgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11970                                lapack_complex_float* a, lapack_int lda,
11971                                lapack_complex_float* t, lapack_int tsize,
11972                                lapack_complex_float* work, lapack_int lwork );
11973 lapack_int LAPACKE_zgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11974                                lapack_complex_double* a, lapack_int lda,
11975                                lapack_complex_double* t, lapack_int tsize,
11976                                lapack_complex_double* work, lapack_int lwork );
11977
11978 lapack_int LAPACKE_sgemqr( int matrix_layout, char side, char trans,
11979                            lapack_int m, lapack_int n, lapack_int k,
11980                            const float* a, lapack_int lda,
11981                            const float* t, lapack_int tsize,
11982                            float* c, lapack_int ldc );
11983 lapack_int LAPACKE_dgemqr( int matrix_layout, char side, char trans,
11984                            lapack_int m, lapack_int n, lapack_int k,
11985                            const double* a, lapack_int lda,
11986                            const double* t, lapack_int tsize,
11987                            double* c, lapack_int ldc );
11988 lapack_int LAPACKE_cgemqr( int matrix_layout, char side, char trans,
11989                            lapack_int m, lapack_int n, lapack_int k,
11990                            const lapack_complex_float* a, lapack_int lda,
11991                            const lapack_complex_float* t, lapack_int tsize,
11992                            lapack_complex_float* c, lapack_int ldc );
11993 lapack_int LAPACKE_zgemqr( int matrix_layout, char side, char trans,
11994                            lapack_int m, lapack_int n, lapack_int k,
11995                            const lapack_complex_double* a, lapack_int lda,
11996                            const lapack_complex_double* t, lapack_int tsize,
11997                            lapack_complex_double* c, lapack_int ldc );
11998
11999 lapack_int LAPACKE_sgemqr_work( int matrix_layout, char side, char trans,
12000                                 lapack_int m, lapack_int n, lapack_int k,
12001                                 const float* a, lapack_int lda,
12002                                 const float* t, lapack_int tsize,
12003                                 float* c, lapack_int ldc,
12004                                 float* work, lapack_int lwork );
12005 lapack_int LAPACKE_dgemqr_work( int matrix_layout, char side, char trans,
12006                                 lapack_int m, lapack_int n, lapack_int k,
12007                                 const double* a, lapack_int lda,
12008                                 const double* t, lapack_int tsize,
12009                                 double* c, lapack_int ldc,
12010                                 double* work, lapack_int lwork );
12011 lapack_int LAPACKE_cgemqr_work( int matrix_layout, char side, char trans,
12012                                 lapack_int m, lapack_int n, lapack_int k,
12013                                 const lapack_complex_float* a, lapack_int lda,
12014                                 const lapack_complex_float* t, lapack_int tsize,
12015                                 lapack_complex_float* c, lapack_int ldc,
12016                                 lapack_complex_float* work, lapack_int lwork );
12017 lapack_int LAPACKE_zgemqr_work( int matrix_layout, char side, char trans,
12018                                 lapack_int m, lapack_int n, lapack_int k,
12019                                 const lapack_complex_double* a, lapack_int lda,
12020                                 const lapack_complex_double* t, lapack_int tsize,
12021                                 lapack_complex_double* c, lapack_int ldc,
12022                                 lapack_complex_double* work, lapack_int lwork );
12023
12024 lapack_int LAPACKE_sgetsls( int matrix_layout, char trans, lapack_int m,
12025                             lapack_int n, lapack_int nrhs, float* a,
12026                             lapack_int lda, float* b, lapack_int ldb );
12027 lapack_int LAPACKE_dgetsls( int matrix_layout, char trans, lapack_int m,
12028                             lapack_int n, lapack_int nrhs, double* a,
12029                             lapack_int lda, double* b, lapack_int ldb );
12030 lapack_int LAPACKE_cgetsls( int matrix_layout, char trans, lapack_int m,
12031                             lapack_int n, lapack_int nrhs,
12032                             lapack_complex_float* a, lapack_int lda,
12033                             lapack_complex_float* b, lapack_int ldb );
12034 lapack_int LAPACKE_zgetsls( int matrix_layout, char trans, lapack_int m,
12035                             lapack_int n, lapack_int nrhs,
12036                             lapack_complex_double* a, lapack_int lda,
12037                             lapack_complex_double* b, lapack_int ldb );
12038
12039 lapack_int LAPACKE_sgetsls_work( int matrix_layout, char trans, lapack_int m,
12040                                  lapack_int n, lapack_int nrhs, float* a,
12041                                  lapack_int lda, float* b, lapack_int ldb,
12042                                  float* work, lapack_int lwork );
12043 lapack_int LAPACKE_dgetsls_work( int matrix_layout, char trans, lapack_int m,
12044                                  lapack_int n, lapack_int nrhs, double* a,
12045                                  lapack_int lda, double* b, lapack_int ldb,
12046                                  double* work, lapack_int lwork );
12047 lapack_int LAPACKE_cgetsls_work( int matrix_layout, char trans, lapack_int m,
12048                                  lapack_int n, lapack_int nrhs,
12049                                  lapack_complex_float* a, lapack_int lda,
12050                                  lapack_complex_float* b, lapack_int ldb,
12051                                  lapack_complex_float* work, lapack_int lwork );
12052 lapack_int LAPACKE_zgetsls_work( int matrix_layout, char trans, lapack_int m,
12053                                  lapack_int n, lapack_int nrhs,
12054                                  lapack_complex_double* a, lapack_int lda,
12055                                  lapack_complex_double* b, lapack_int ldb,
12056                                  lapack_complex_double* work, lapack_int lwork );
12057
12058 lapack_int LAPACKE_ssyev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12059                           float* a, lapack_int lda, float* w );
12060 lapack_int LAPACKE_dsyev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12061                           double* a, lapack_int lda, double* w );
12062
12063 lapack_int LAPACKE_ssyevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12064                            float* a, lapack_int lda, float* w );
12065 lapack_int LAPACKE_dsyevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12066                            double* a, lapack_int lda, double* w );
12067
12068 lapack_int LAPACKE_ssyevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12069                            lapack_int n, float* a, lapack_int lda, float vl,
12070                            float vu, lapack_int il, lapack_int iu, float abstol,
12071                            lapack_int* m, float* w, float* z, lapack_int ldz,
12072                            lapack_int* isuppz );
12073 lapack_int LAPACKE_dsyevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12074                            lapack_int n, double* a, lapack_int lda, double vl,
12075                            double vu, lapack_int il, lapack_int iu,
12076                            double abstol, lapack_int* m, double* w, double* z,
12077                            lapack_int ldz, lapack_int* isuppz );
12078
12079 lapack_int LAPACKE_ssyevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12080                            lapack_int n, float* a, lapack_int lda, float vl,
12081                            float vu, lapack_int il, lapack_int iu, float abstol,
12082                            lapack_int* m, float* w, float* z, lapack_int ldz,
12083                            lapack_int* ifail );
12084 lapack_int LAPACKE_dsyevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12085                            lapack_int n, double* a, lapack_int lda, double vl,
12086                            double vu, lapack_int il, lapack_int iu,
12087                            double abstol, lapack_int* m, double* w, double* z,
12088                            lapack_int ldz, lapack_int* ifail );
12089
12090 lapack_int LAPACKE_ssyev_2stage_work( int matrix_layout, char jobz, char uplo,
12091                                lapack_int n, float* a, lapack_int lda, float* w,
12092                                float* work, lapack_int lwork );
12093 lapack_int LAPACKE_dsyev_2stage_work( int matrix_layout, char jobz, char uplo,
12094                                lapack_int n, double* a, lapack_int lda,
12095                                double* w, double* work, lapack_int lwork );
12096
12097 lapack_int LAPACKE_ssyevd_2stage_work( int matrix_layout, char jobz, char uplo,
12098                                 lapack_int n, float* a, lapack_int lda,
12099                                 float* w, float* work, lapack_int lwork,
12100                                 lapack_int* iwork, lapack_int liwork );
12101 lapack_int LAPACKE_dsyevd_2stage_work( int matrix_layout, char jobz, char uplo,
12102                                 lapack_int n, double* a, lapack_int lda,
12103                                 double* w, double* work, lapack_int lwork,
12104                                 lapack_int* iwork, lapack_int liwork );
12105
12106 lapack_int LAPACKE_ssyevr_2stage_work( int matrix_layout, char jobz, char range,
12107                                 char uplo, lapack_int n, float* a,
12108                                 lapack_int lda, float vl, float vu,
12109                                 lapack_int il, lapack_int iu, float abstol,
12110                                 lapack_int* m, float* w, float* z,
12111                                 lapack_int ldz, lapack_int* isuppz, float* work,
12112                                 lapack_int lwork, lapack_int* iwork,
12113                                 lapack_int liwork );
12114 lapack_int LAPACKE_dsyevr_2stage_work( int matrix_layout, char jobz, char range,
12115                                 char uplo, lapack_int n, double* a,
12116                                 lapack_int lda, double vl, double vu,
12117                                 lapack_int il, lapack_int iu, double abstol,
12118                                 lapack_int* m, double* w, double* z,
12119                                 lapack_int ldz, lapack_int* isuppz,
12120                                 double* work, lapack_int lwork,
12121                                 lapack_int* iwork, lapack_int liwork );
12122
12123 lapack_int LAPACKE_ssyevx_2stage_work( int matrix_layout, char jobz, char range,
12124                                 char uplo, lapack_int n, float* a,
12125                                 lapack_int lda, float vl, float vu,
12126                                 lapack_int il, lapack_int iu, float abstol,
12127                                 lapack_int* m, float* w, float* z,
12128                                 lapack_int ldz, float* work, lapack_int lwork,
12129                                 lapack_int* iwork, lapack_int* ifail );
12130 lapack_int LAPACKE_dsyevx_2stage_work( int matrix_layout, char jobz, char range,
12131                                 char uplo, lapack_int n, double* a,
12132                                 lapack_int lda, double vl, double vu,
12133                                 lapack_int il, lapack_int iu, double abstol,
12134                                 lapack_int* m, double* w, double* z,
12135                                 lapack_int ldz, double* work, lapack_int lwork,
12136                                 lapack_int* iwork, lapack_int* ifail );
12137
12138 lapack_int LAPACKE_cheev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12139                           lapack_complex_float* a, lapack_int lda, float* w );
12140 lapack_int LAPACKE_zheev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12141                           lapack_complex_double* a, lapack_int lda, double* w );
12142
12143 lapack_int LAPACKE_cheevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12144                            lapack_complex_float* a, lapack_int lda, float* w );
12145 lapack_int LAPACKE_zheevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12146                            lapack_complex_double* a, lapack_int lda,
12147                            double* w );
12148
12149 lapack_int LAPACKE_cheevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12150                            lapack_int n, lapack_complex_float* a,
12151                            lapack_int lda, float vl, float vu, lapack_int il,
12152                            lapack_int iu, float abstol, lapack_int* m, float* w,
12153                            lapack_complex_float* z, lapack_int ldz,
12154                            lapack_int* isuppz );
12155 lapack_int LAPACKE_zheevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12156                            lapack_int n, lapack_complex_double* a,
12157                            lapack_int lda, double vl, double vu, lapack_int il,
12158                            lapack_int iu, double abstol, lapack_int* m,
12159                            double* w, lapack_complex_double* z, lapack_int ldz,
12160                            lapack_int* isuppz );
12161
12162 lapack_int LAPACKE_cheevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12163                            lapack_int n, lapack_complex_float* a,
12164                            lapack_int lda, float vl, float vu, lapack_int il,
12165                            lapack_int iu, float abstol, lapack_int* m, float* w,
12166                            lapack_complex_float* z, lapack_int ldz,
12167                            lapack_int* ifail );
12168 lapack_int LAPACKE_zheevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12169                            lapack_int n, lapack_complex_double* a,
12170                            lapack_int lda, double vl, double vu, lapack_int il,
12171                            lapack_int iu, double abstol, lapack_int* m,
12172                            double* w, lapack_complex_double* z, lapack_int ldz,
12173                            lapack_int* ifail );
12174
12175 lapack_int LAPACKE_cheev_2stage_work( int matrix_layout, char jobz, char uplo,
12176                                lapack_int n, lapack_complex_float* a,
12177                                lapack_int lda, float* w,
12178                                lapack_complex_float* work, lapack_int lwork,
12179                                float* rwork );
12180 lapack_int LAPACKE_zheev_2stage_work( int matrix_layout, char jobz, char uplo,
12181                                lapack_int n, lapack_complex_double* a,
12182                                lapack_int lda, double* w,
12183                                lapack_complex_double* work, lapack_int lwork,
12184                                double* rwork );
12185
12186 lapack_int LAPACKE_cheevd_2stage_work( int matrix_layout, char jobz, char uplo,
12187                                 lapack_int n, lapack_complex_float* a,
12188                                 lapack_int lda, float* w,
12189                                 lapack_complex_float* work, lapack_int lwork,
12190                                 float* rwork, lapack_int lrwork,
12191                                 lapack_int* iwork, lapack_int liwork );
12192 lapack_int LAPACKE_zheevd_2stage_work( int matrix_layout, char jobz, char uplo,
12193                                 lapack_int n, lapack_complex_double* a,
12194                                 lapack_int lda, double* w,
12195                                 lapack_complex_double* work, lapack_int lwork,
12196                                 double* rwork, lapack_int lrwork,
12197                                 lapack_int* iwork, lapack_int liwork );
12198
12199 lapack_int LAPACKE_cheevr_2stage_work( int matrix_layout, char jobz, char range,
12200                                 char uplo, lapack_int n,
12201                                 lapack_complex_float* a, lapack_int lda,
12202                                 float vl, float vu, lapack_int il,
12203                                 lapack_int iu, float abstol, lapack_int* m,
12204                                 float* w, lapack_complex_float* z,
12205                                 lapack_int ldz, lapack_int* isuppz,
12206                                 lapack_complex_float* work, lapack_int lwork,
12207                                 float* rwork, lapack_int lrwork,
12208                                 lapack_int* iwork, lapack_int liwork );
12209 lapack_int LAPACKE_zheevr_2stage_work( int matrix_layout, char jobz, char range,
12210                                 char uplo, lapack_int n,
12211                                 lapack_complex_double* a, lapack_int lda,
12212                                 double vl, double vu, lapack_int il,
12213                                 lapack_int iu, double abstol, lapack_int* m,
12214                                 double* w, lapack_complex_double* z,
12215                                 lapack_int ldz, lapack_int* isuppz,
12216                                 lapack_complex_double* work, lapack_int lwork,
12217                                 double* rwork, lapack_int lrwork,
12218                                 lapack_int* iwork, lapack_int liwork );
12219
12220 lapack_int LAPACKE_cheevx_2stage_work( int matrix_layout, char jobz, char range,
12221                                 char uplo, lapack_int n,
12222                                 lapack_complex_float* a, lapack_int lda,
12223                                 float vl, float vu, lapack_int il,
12224                                 lapack_int iu, float abstol, lapack_int* m,
12225                                 float* w, lapack_complex_float* z,
12226                                 lapack_int ldz, lapack_complex_float* work,
12227                                 lapack_int lwork, float* rwork,
12228                                 lapack_int* iwork, lapack_int* ifail );
12229 lapack_int LAPACKE_zheevx_2stage_work( int matrix_layout, char jobz, char range,
12230                                 char uplo, lapack_int n,
12231                                 lapack_complex_double* a, lapack_int lda,
12232                                 double vl, double vu, lapack_int il,
12233                                 lapack_int iu, double abstol, lapack_int* m,
12234                                 double* w, lapack_complex_double* z,
12235                                 lapack_int ldz, lapack_complex_double* work,
12236                                 lapack_int lwork, double* rwork,
12237                                 lapack_int* iwork, lapack_int* ifail );
12238
12239 lapack_int LAPACKE_ssbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12240                           lapack_int kd, float* ab, lapack_int ldab, float* w,
12241                           float* z, lapack_int ldz );
12242 lapack_int LAPACKE_dsbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12243                           lapack_int kd, double* ab, lapack_int ldab, double* w,
12244                           double* z, lapack_int ldz );
12245
12246 lapack_int LAPACKE_ssbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12247                            lapack_int kd, float* ab, lapack_int ldab, float* w,
12248                            float* z, lapack_int ldz );
12249 lapack_int LAPACKE_dsbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12250                            lapack_int kd, double* ab, lapack_int ldab,
12251                            double* w, double* z, lapack_int ldz );
12252
12253 lapack_int LAPACKE_ssbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12254                            lapack_int n, lapack_int kd, float* ab,
12255                            lapack_int ldab, float* q, lapack_int ldq, float vl,
12256                            float vu, lapack_int il, lapack_int iu, float abstol,
12257                            lapack_int* m, float* w, float* z, lapack_int ldz,
12258                            lapack_int* ifail );
12259 lapack_int LAPACKE_dsbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12260                            lapack_int n, lapack_int kd, double* ab,
12261                            lapack_int ldab, double* q, lapack_int ldq,
12262                            double vl, double vu, lapack_int il, lapack_int iu,
12263                            double abstol, lapack_int* m, double* w, double* z,
12264                            lapack_int ldz, lapack_int* ifail );
12265
12266 lapack_int LAPACKE_ssbev_2stage_work( int matrix_layout, char jobz, char uplo,
12267                                lapack_int n, lapack_int kd, float* ab,
12268                                lapack_int ldab, float* w, float* z,
12269                                lapack_int ldz, float* work, lapack_int lwork );
12270 lapack_int LAPACKE_dsbev_2stage_work( int matrix_layout, char jobz, char uplo,
12271                                lapack_int n, lapack_int kd, double* ab,
12272                                lapack_int ldab, double* w, double* z,
12273                                lapack_int ldz, double* work, lapack_int lwork );
12274
12275 lapack_int LAPACKE_ssbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12276                                 lapack_int n, lapack_int kd, float* ab,
12277                                 lapack_int ldab, float* w, float* z,
12278                                 lapack_int ldz, float* work, lapack_int lwork,
12279                                 lapack_int* iwork, lapack_int liwork );
12280 lapack_int LAPACKE_dsbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12281                                 lapack_int n, lapack_int kd, double* ab,
12282                                 lapack_int ldab, double* w, double* z,
12283                                 lapack_int ldz, double* work, lapack_int lwork,
12284                                 lapack_int* iwork, lapack_int liwork );
12285
12286 lapack_int LAPACKE_ssbevx_2stage_work( int matrix_layout, char jobz, char range,
12287                                 char uplo, lapack_int n, lapack_int kd,
12288                                 float* ab, lapack_int ldab, float* q,
12289                                 lapack_int ldq, float vl, float vu,
12290                                 lapack_int il, lapack_int iu, float abstol,
12291                                 lapack_int* m, float* w, float* z,
12292                                 lapack_int ldz, float* work, lapack_int lwork, lapack_int* iwork,
12293                                 lapack_int* ifail );
12294 lapack_int LAPACKE_dsbevx_2stage_work( int matrix_layout, char jobz, char range,
12295                                 char uplo, lapack_int n, lapack_int kd,
12296                                 double* ab, lapack_int ldab, double* q,
12297                                 lapack_int ldq, double vl, double vu,
12298                                 lapack_int il, lapack_int iu, double abstol,
12299                                 lapack_int* m, double* w, double* z,
12300                                 lapack_int ldz, double* work, lapack_int lwork, lapack_int* iwork,
12301                                 lapack_int* ifail );
12302
12303 lapack_int LAPACKE_chbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12304                           lapack_int kd, lapack_complex_float* ab,
12305                           lapack_int ldab, float* w, lapack_complex_float* z,
12306                           lapack_int ldz );
12307 lapack_int LAPACKE_zhbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12308                           lapack_int kd, lapack_complex_double* ab,
12309                           lapack_int ldab, double* w, lapack_complex_double* z,
12310                           lapack_int ldz );
12311
12312 lapack_int LAPACKE_chbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12313                            lapack_int kd, lapack_complex_float* ab,
12314                            lapack_int ldab, float* w, lapack_complex_float* z,
12315                            lapack_int ldz );
12316 lapack_int LAPACKE_zhbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12317                            lapack_int kd, lapack_complex_double* ab,
12318                            lapack_int ldab, double* w, lapack_complex_double* z,
12319                            lapack_int ldz );
12320
12321 lapack_int LAPACKE_chbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12322                            lapack_int n, lapack_int kd,
12323                            lapack_complex_float* ab, lapack_int ldab,
12324                            lapack_complex_float* q, lapack_int ldq, float vl,
12325                            float vu, lapack_int il, lapack_int iu, float abstol,
12326                            lapack_int* m, float* w, lapack_complex_float* z,
12327                            lapack_int ldz, lapack_int* ifail );
12328 lapack_int LAPACKE_zhbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12329                            lapack_int n, lapack_int kd,
12330                            lapack_complex_double* ab, lapack_int ldab,
12331                            lapack_complex_double* q, lapack_int ldq, double vl,
12332                            double vu, lapack_int il, lapack_int iu,
12333                            double abstol, lapack_int* m, double* w,
12334                            lapack_complex_double* z, lapack_int ldz,
12335                            lapack_int* ifail );
12336
12337 lapack_int LAPACKE_chbev_2stage_work( int matrix_layout, char jobz, char uplo,
12338                                lapack_int n, lapack_int kd,
12339                                lapack_complex_float* ab, lapack_int ldab,
12340                                float* w, lapack_complex_float* z,
12341                                lapack_int ldz, lapack_complex_float* work,
12342                                lapack_int lwork, float* rwork );
12343 lapack_int LAPACKE_zhbev_2stage_work( int matrix_layout, char jobz, char uplo,
12344                                lapack_int n, lapack_int kd,
12345                                lapack_complex_double* ab, lapack_int ldab,
12346                                double* w, lapack_complex_double* z,
12347                                lapack_int ldz, lapack_complex_double* work,
12348                                lapack_int lwork, double* rwork );
12349
12350 lapack_int LAPACKE_chbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12351                                 lapack_int n, lapack_int kd,
12352                                 lapack_complex_float* ab, lapack_int ldab,
12353                                 float* w, lapack_complex_float* z,
12354                                 lapack_int ldz, lapack_complex_float* work,
12355                                 lapack_int lwork, float* rwork,
12356                                 lapack_int lrwork, lapack_int* iwork,
12357                                 lapack_int liwork );
12358 lapack_int LAPACKE_zhbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12359                                 lapack_int n, lapack_int kd,
12360                                 lapack_complex_double* ab, lapack_int ldab,
12361                                 double* w, lapack_complex_double* z,
12362                                 lapack_int ldz, lapack_complex_double* work,
12363                                 lapack_int lwork, double* rwork,
12364                                 lapack_int lrwork, lapack_int* iwork,
12365                                 lapack_int liwork );
12366
12367 lapack_int LAPACKE_chbevx_2stage_work( int matrix_layout, char jobz, char range,
12368                                 char uplo, lapack_int n, lapack_int kd,
12369                                 lapack_complex_float* ab, lapack_int ldab,
12370                                 lapack_complex_float* q, lapack_int ldq,
12371                                 float vl, float vu, lapack_int il,
12372                                 lapack_int iu, float abstol, lapack_int* m,
12373                                 float* w, lapack_complex_float* z,
12374                                 lapack_int ldz, lapack_complex_float* work,
12375                                 lapack_int lwork, float* rwork, lapack_int* iwork,
12376                                 lapack_int* ifail );
12377 lapack_int LAPACKE_zhbevx_2stage_work( int matrix_layout, char jobz, char range,
12378                                 char uplo, lapack_int n, lapack_int kd,
12379                                 lapack_complex_double* ab, lapack_int ldab,
12380                                 lapack_complex_double* q, lapack_int ldq,
12381                                 double vl, double vu, lapack_int il,
12382                                 lapack_int iu, double abstol, lapack_int* m,
12383                                 double* w, lapack_complex_double* z,
12384                                 lapack_int ldz, lapack_complex_double* work,
12385                                 lapack_int lwork, double* rwork, lapack_int* iwork,
12386                                 lapack_int* ifail );
12387
12388 lapack_int LAPACKE_ssygv_2stage( int matrix_layout, lapack_int itype, char jobz,
12389                           char uplo, lapack_int n, float* a, lapack_int lda,
12390                           float* b, lapack_int ldb, float* w );
12391 lapack_int LAPACKE_dsygv_2stage( int matrix_layout, lapack_int itype, char jobz,
12392                           char uplo, lapack_int n, double* a, lapack_int lda,
12393                           double* b, lapack_int ldb, double* w );
12394 lapack_int LAPACKE_ssygv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12395                                char uplo, lapack_int n, float* a,
12396                                lapack_int lda, float* b, lapack_int ldb,
12397                                float* w, float* work, lapack_int lwork );
12398 lapack_int LAPACKE_dsygv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12399                                char uplo, lapack_int n, double* a,
12400                                lapack_int lda, double* b, lapack_int ldb,
12401                                double* w, double* work, lapack_int lwork );
12402
12403 lapack_int LAPACKE_chegv_2stage( int matrix_layout, lapack_int itype, char jobz,
12404                           char uplo, lapack_int n, lapack_complex_float* a,
12405                           lapack_int lda, lapack_complex_float* b,
12406                           lapack_int ldb, float* w );
12407 lapack_int LAPACKE_zhegv_2stage( int matrix_layout, lapack_int itype, char jobz,
12408                           char uplo, lapack_int n, lapack_complex_double* a,
12409                           lapack_int lda, lapack_complex_double* b,
12410                           lapack_int ldb, double* w );
12411 lapack_int LAPACKE_chegv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12412                                char uplo, lapack_int n, lapack_complex_float* a,
12413                                lapack_int lda, lapack_complex_float* b,
12414                                lapack_int ldb, float* w,
12415                                lapack_complex_float* work, lapack_int lwork,
12416                                float* rwork );
12417 lapack_int LAPACKE_zhegv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12418                                char uplo, lapack_int n,
12419                                lapack_complex_double* a, lapack_int lda,
12420                                lapack_complex_double* b, lapack_int ldb,
12421                                double* w, lapack_complex_double* work,
12422                                lapack_int lwork, double* rwork );
12423
12424 //LAPACK 3.8.0
12425 lapack_int LAPACKE_ssysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12426                           lapack_int nrhs, float* a, lapack_int lda,
12427                           float* tb, lapack_int ltb, lapack_int* ipiv,
12428                           lapack_int* ipiv2, float* b, lapack_int ldb );
12429 lapack_int LAPACKE_ssysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12430                                lapack_int nrhs, float* a, lapack_int lda,
12431                                float* tb, lapack_int ltb, lapack_int* ipiv,
12432                                lapack_int* ipiv2, float* b, lapack_int ldb,
12433                                float* work, lapack_int lwork );
12434 lapack_int LAPACKE_dsysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12435                           lapack_int nrhs, double* a, lapack_int lda,
12436                           double* tb, lapack_int ltb,
12437                           lapack_int* ipiv, lapack_int* ipiv2,
12438                           double* b, lapack_int ldb );
12439 lapack_int LAPACKE_dsysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12440                                lapack_int nrhs, double* a, lapack_int lda,
12441                                double* tb, lapack_int ltb,
12442                                lapack_int* ipiv, lapack_int* ipiv2,
12443                                double* b, lapack_int ldb,
12444                                double* work, lapack_int lwork );
12445 lapack_int LAPACKE_csysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12446                           lapack_int nrhs, lapack_complex_float* a,
12447                           lapack_int lda, lapack_complex_float* tb,
12448                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12449                           lapack_complex_float* b, lapack_int ldb );
12450 lapack_int LAPACKE_csysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12451                                lapack_int nrhs, lapack_complex_float* a,
12452                                lapack_int lda, lapack_complex_float* tb,
12453                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12454                                lapack_complex_float* b, lapack_int ldb,
12455                                lapack_complex_float* work, lapack_int lwork );
12456 lapack_int LAPACKE_zsysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12457                           lapack_int nrhs, lapack_complex_double* a,
12458                           lapack_int lda, lapack_complex_double* tb,
12459                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12460                           lapack_complex_double* b, lapack_int ldb );
12461 lapack_int LAPACKE_zsysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12462                                lapack_int nrhs, lapack_complex_double* a,
12463                                lapack_int lda, lapack_complex_double* tb,
12464                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12465                                lapack_complex_double* b, lapack_int ldb,
12466                                lapack_complex_double* work, lapack_int lwork );
12467 lapack_int LAPACKE_chesv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12468                           lapack_int nrhs, lapack_complex_float* a,
12469                           lapack_int lda, lapack_complex_float* tb,
12470                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12471                           lapack_complex_float* b, lapack_int ldb );
12472 lapack_int LAPACKE_chesv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12473                                lapack_int nrhs, lapack_complex_float* a,
12474                                lapack_int lda, lapack_complex_float* tb,
12475                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12476                                lapack_complex_float* b, lapack_int ldb,
12477                                lapack_complex_float* work, lapack_int lwork );
12478 lapack_int LAPACKE_zhesv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12479                           lapack_int nrhs, lapack_complex_double* a,
12480                           lapack_int lda, lapack_complex_double* tb,
12481                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12482                           lapack_complex_double* b, lapack_int ldb );
12483 lapack_int LAPACKE_zhesv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12484                                lapack_int nrhs, lapack_complex_double* a,
12485                                lapack_int lda, lapack_complex_double* tb,
12486                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12487                                lapack_complex_double* b, lapack_int ldb,
12488                                lapack_complex_double* work, lapack_int lwork );
12489
12490 lapack_int LAPACKE_ssytrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12491                           float* a, lapack_int lda,
12492                           float* tb, lapack_int ltb, lapack_int* ipiv,
12493                           lapack_int* ipiv2 );
12494 lapack_int LAPACKE_ssytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12495                                float* a, lapack_int lda,
12496                                float* tb, lapack_int ltb, lapack_int* ipiv,
12497                                lapack_int* ipiv2,
12498                                float* work, lapack_int lwork );
12499 lapack_int LAPACKE_dsytrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12500                           double* a, lapack_int lda,
12501                           double* tb, lapack_int ltb,
12502                           lapack_int* ipiv, lapack_int* ipiv2 );
12503 lapack_int LAPACKE_dsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12504                                double* a, lapack_int lda,
12505                                double* tb, lapack_int ltb,
12506                                lapack_int* ipiv, lapack_int* ipiv2,
12507                                double* work, lapack_int lwork );
12508 lapack_int LAPACKE_csytrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12509                           lapack_complex_float* a,
12510                           lapack_int lda, lapack_complex_float* tb,
12511                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2 );
12512 lapack_int LAPACKE_csytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12513                                lapack_complex_float* a,
12514                                lapack_int lda, lapack_complex_float* tb,
12515                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12516                                lapack_complex_float* work, lapack_int lwork );
12517 lapack_int LAPACKE_zsytrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12518                           lapack_complex_double* a,
12519                           lapack_int lda, lapack_complex_double* tb,
12520                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2 );
12521 lapack_int LAPACKE_zsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12522                                lapack_complex_double* a,
12523                                lapack_int lda, lapack_complex_double* tb,
12524                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12525                                lapack_complex_double* work, lapack_int lwork );
12526 lapack_int LAPACKE_chetrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12527                           lapack_complex_float* a,
12528                           lapack_int lda, lapack_complex_float* tb,
12529                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2 );
12530 lapack_int LAPACKE_chetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12531                                lapack_complex_float* a,
12532                                lapack_int lda, lapack_complex_float* tb,
12533                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12534                                lapack_complex_float* work, lapack_int lwork );
12535 lapack_int LAPACKE_zhetrf_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12536                           lapack_complex_double* a,
12537                           lapack_int lda, lapack_complex_double* tb,
12538                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2 );
12539 lapack_int LAPACKE_zhetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12540                                lapack_complex_double* a,
12541                                lapack_int lda, lapack_complex_double* tb,
12542                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12543                                lapack_complex_double* work, lapack_int lwork );
12544
12545
12546 lapack_int LAPACKE_ssytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12547                           lapack_int nrhs, float* a, lapack_int lda,
12548                           float* tb, lapack_int ltb, lapack_int* ipiv,
12549                           lapack_int* ipiv2, float* b, lapack_int ldb );
12550 lapack_int LAPACKE_ssytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12551                                lapack_int nrhs, float* a, lapack_int lda,
12552                                float* tb, lapack_int ltb, lapack_int* ipiv,
12553                                lapack_int* ipiv2, float* b, lapack_int ldb );
12554 lapack_int LAPACKE_dsytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12555                           lapack_int nrhs, double* a, lapack_int lda,
12556                           double* tb, lapack_int ltb,
12557                           lapack_int* ipiv, lapack_int* ipiv2,
12558                           double* b, lapack_int ldb );
12559 lapack_int LAPACKE_dsytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12560                                lapack_int nrhs, double* a, lapack_int lda,
12561                                double* tb, lapack_int ltb,
12562                                lapack_int* ipiv, lapack_int* ipiv2,
12563                                double* b, lapack_int ldb );
12564 lapack_int LAPACKE_csytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12565                           lapack_int nrhs, lapack_complex_float* a,
12566                           lapack_int lda, lapack_complex_float* tb,
12567                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12568                           lapack_complex_float* b, lapack_int ldb );
12569 lapack_int LAPACKE_csytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12570                                lapack_int nrhs, lapack_complex_float* a,
12571                                lapack_int lda, lapack_complex_float* tb,
12572                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12573                                lapack_complex_float* b, lapack_int ldb );
12574 lapack_int LAPACKE_zsytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12575                           lapack_int nrhs, lapack_complex_double* a,
12576                           lapack_int lda, lapack_complex_double* tb,
12577                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12578                           lapack_complex_double* b, lapack_int ldb );
12579 lapack_int LAPACKE_zsytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12580                                lapack_int nrhs, lapack_complex_double* a,
12581                                lapack_int lda, lapack_complex_double* tb,
12582                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12583                                lapack_complex_double* b, lapack_int ldb );
12584 lapack_int LAPACKE_chetrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12585                           lapack_int nrhs, lapack_complex_float* a,
12586                           lapack_int lda, lapack_complex_float* tb,
12587                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12588                           lapack_complex_float* b, lapack_int ldb );
12589 lapack_int LAPACKE_chetrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12590                                lapack_int nrhs, lapack_complex_float* a,
12591                                lapack_int lda, lapack_complex_float* tb,
12592                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12593                                lapack_complex_float* b, lapack_int ldb );
12594 lapack_int LAPACKE_zhetrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12595                           lapack_int nrhs, lapack_complex_double* a,
12596                           lapack_int lda, lapack_complex_double* tb,
12597                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12598                           lapack_complex_double* b, lapack_int ldb );
12599 lapack_int LAPACKE_zhetrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12600                                lapack_int nrhs, lapack_complex_double* a,
12601                                lapack_int lda, lapack_complex_double* tb,
12602                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12603                                lapack_complex_double* b, lapack_int ldb );
12604
12605 #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
12606 #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
12607 #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
12608 #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
12609 #define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2,SGETRF2)
12610 #define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2,DGETRF2)
12611 #define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2,CGETRF2)
12612 #define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2,ZGETRF2)
12613 #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
12614 #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
12615 #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
12616 #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
12617 #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
12618 #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
12619 #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
12620 #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
12621 #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
12622 #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
12623 #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
12624 #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
12625 #define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2,SPOTRF2)
12626 #define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2,DPOTRF2)
12627 #define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2,CPOTRF2)
12628 #define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2,ZPOTRF2)
12629 #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
12630 #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
12631 #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
12632 #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
12633 #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
12634 #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
12635 #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
12636 #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
12637 #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
12638 #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
12639 #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
12640 #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
12641 #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
12642 #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
12643 #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
12644 #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
12645 #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
12646 #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
12647 #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
12648 #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
12649 #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
12650 #define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook,SSYTRF_ROOK)
12651 #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
12652 #define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook,DSYTRF_ROOK)
12653 #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
12654 #define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook,CSYTRF_ROOK)
12655 #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
12656 #define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook,ZSYTRF_ROOK)
12657 #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
12658 #define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook,CHETRF_ROOK)
12659 #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
12660 #define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook,ZHETRF_ROOK)
12661 #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
12662 #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
12663 #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
12664 #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
12665 #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
12666 #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
12667 #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
12668 #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
12669 #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
12670 #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
12671 #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
12672 #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
12673 #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
12674 #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
12675 #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
12676 #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
12677 #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
12678 #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
12679 #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
12680 #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
12681 #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
12682 #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
12683 #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
12684 #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
12685 #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
12686 #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
12687 #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
12688 #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
12689 #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
12690 #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
12691 #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
12692 #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
12693 #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
12694 #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
12695 #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
12696 #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
12697 #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
12698 #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
12699 #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
12700 #define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook,SSYTRS_ROOK)
12701 #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
12702 #define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook,DSYTRS_ROOK)
12703 #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
12704 #define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook,CSYTRS_ROOK)
12705 #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
12706 #define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook,ZSYTRS_ROOK)
12707 #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
12708 #define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook,CHETRS_ROOK)
12709 #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
12710 #define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook,ZHETRS_ROOK)
12711 #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
12712 #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
12713 #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
12714 #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
12715 #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
12716 #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
12717 #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
12718 #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
12719 #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
12720 #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
12721 #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
12722 #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
12723 #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
12724 #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
12725 #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
12726 #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
12727 #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
12728 #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
12729 #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
12730 #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
12731 #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
12732 #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
12733 #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
12734 #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
12735 #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
12736 #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
12737 #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
12738 #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
12739 #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
12740 #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
12741 #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
12742 #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
12743 #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
12744 #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
12745 #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
12746 #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
12747 #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
12748 #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
12749 #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
12750 #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
12751 #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
12752 #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
12753 #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
12754 #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
12755 #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
12756 #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
12757 #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
12758 #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
12759 #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
12760 #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
12761 #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
12762 #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
12763 #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
12764 #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
12765 #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
12766 #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
12767 #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
12768 #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
12769 #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
12770 #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
12771 #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
12772 #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
12773 #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
12774 #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
12775 #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
12776 #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
12777 #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
12778 #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
12779 #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
12780 #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
12781 #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
12782 #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
12783 #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
12784 #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
12785 #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
12786 #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
12787 #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
12788 #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
12789 #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
12790 #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
12791 #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
12792 #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
12793 #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
12794 #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
12795 #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
12796 #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
12797 #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
12798 #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
12799 #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
12800 #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
12801 #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
12802 #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
12803 #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
12804 #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
12805 #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
12806 #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
12807 #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
12808 #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
12809 #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
12810 #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
12811 #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
12812 #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
12813 #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
12814 #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
12815 #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
12816 #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
12817 #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
12818 #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
12819 #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
12820 #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
12821 #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
12822 #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
12823 #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
12824 #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
12825 #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
12826 #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
12827 #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
12828 #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
12829 #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
12830 #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
12831 #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
12832 #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
12833 #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
12834 #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
12835 #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
12836 #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
12837 #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
12838 #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
12839 #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
12840 #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
12841 #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
12842 #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
12843 #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
12844 #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
12845 #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
12846 #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
12847 #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
12848 #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
12849 #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
12850 #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
12851 #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
12852 #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
12853 #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
12854 #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
12855 #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
12856 #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
12857 #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
12858 #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
12859 #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
12860 #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
12861 #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
12862 #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
12863 #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
12864 #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
12865 #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
12866 #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
12867 #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
12868 #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
12869 #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
12870 #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
12871 #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
12872 #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
12873 #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
12874 #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
12875 #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
12876 #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
12877 #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
12878 #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
12879 #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
12880 #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
12881 #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
12882 #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
12883 #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
12884 #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
12885 #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
12886 #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
12887 #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
12888 #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
12889 #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
12890 #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
12891 #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
12892 #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
12893 #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
12894 #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
12895 #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
12896 #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
12897 #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
12898 #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
12899 #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
12900 #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
12901 #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
12902 #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
12903 #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
12904 #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
12905 #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
12906 #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
12907 #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
12908 #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
12909 #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
12910 #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
12911 #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
12912 #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
12913 #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
12914 #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
12915 #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
12916 #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
12917 #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
12918 #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
12919 #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
12920 #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
12921 #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
12922 #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
12923 #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
12924 #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
12925 #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
12926 #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
12927 #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
12928 #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
12929 #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
12930 #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
12931 #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
12932 #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
12933 #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
12934 #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
12935 #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
12936 #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
12937 #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
12938 #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
12939 #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
12940 #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
12941 #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
12942 #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
12943 #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
12944 #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
12945 #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
12946 #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
12947 #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
12948 #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
12949 #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
12950 #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
12951 #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
12952 #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
12953 #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
12954 #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
12955 #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
12956 #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
12957 #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
12958 #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
12959 #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
12960 #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
12961 #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
12962 #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
12963 #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
12964 #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
12965 #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
12966 #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
12967 #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
12968 #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
12969 #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
12970 #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
12971 #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
12972 #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
12973 #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
12974 #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
12975 #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
12976 #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
12977 #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
12978 #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
12979 #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
12980 #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
12981 #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
12982 #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
12983 #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
12984 #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
12985 #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
12986 #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
12987 #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
12988 #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
12989 #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
12990 #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
12991 #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
12992 #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
12993 #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
12994 #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
12995 #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
12996 #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
12997 #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
12998 #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
12999 #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
13000 #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
13001 #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
13002 #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
13003 #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
13004 #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
13005 #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
13006 #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
13007 #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
13008 #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
13009 #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
13010 #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
13011 #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
13012 #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
13013 #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
13014 #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
13015 #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
13016 #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
13017 #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
13018 #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
13019 #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
13020 #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
13021 #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
13022 #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
13023 #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
13024 #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
13025 #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
13026 #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
13027 #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
13028 #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
13029 #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
13030 #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
13031 #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
13032 #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
13033 #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
13034 #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
13035 #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
13036 #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
13037 #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
13038 #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
13039 #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
13040 #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
13041 #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
13042 #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
13043 #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
13044 #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
13045 #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
13046 #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
13047 #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
13048 #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
13049 #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
13050 #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
13051 #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
13052 #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
13053 #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
13054 #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
13055 #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
13056 #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
13057 #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
13058 #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
13059 #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
13060 #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
13061 #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
13062 #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
13063 #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
13064 #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
13065 #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
13066 #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
13067 #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
13068 #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
13069 #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
13070 #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
13071 #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
13072 #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
13073 #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
13074 #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
13075 #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
13076 #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
13077 #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
13078 #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
13079 #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
13080 #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
13081 #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
13082 #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
13083 #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
13084 #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
13085 #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
13086 #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
13087 #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
13088 #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
13089 #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
13090 #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
13091 #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
13092 #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
13093 #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
13094 #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
13095 #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
13096 #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
13097 #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
13098 #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
13099 #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
13100 #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
13101 #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
13102 #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
13103 #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
13104 #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
13105 #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
13106 #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
13107 #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
13108 #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
13109 #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
13110 #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
13111 #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
13112 #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
13113 #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
13114 #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
13115 #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
13116 #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
13117 #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
13118 #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
13119 #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
13120 #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
13121 #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
13122 #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
13123 #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
13124 #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
13125 #define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx,SBDSVDX)
13126 #define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx,DBDSVDX)
13127 #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
13128 #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
13129 #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
13130 #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
13131 #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
13132 #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
13133 #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
13134 #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
13135 #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
13136 #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
13137 #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
13138 #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
13139 #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
13140 #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
13141 #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
13142 #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
13143 #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
13144 #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
13145 #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
13146 #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
13147 #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
13148 #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
13149 #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
13150 #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
13151 #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
13152 #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
13153 #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
13154 #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
13155 #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
13156 #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
13157 #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
13158 #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
13159 #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
13160 #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
13161 #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
13162 #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
13163 #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
13164 #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
13165 #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
13166 #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
13167 #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
13168 #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
13169 #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
13170 #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
13171 #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
13172 #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
13173 #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
13174 #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
13175 #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
13176 #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
13177 #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
13178 #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
13179 #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
13180 #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
13181 #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
13182 #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
13183 #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
13184 #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
13185 #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
13186 #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
13187 #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
13188 #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
13189 #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
13190 #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
13191 #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
13192 #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
13193 #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
13194 #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
13195 #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
13196 #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
13197 #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
13198 #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
13199 #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
13200 #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
13201 #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
13202 #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
13203 #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
13204 #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
13205 #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
13206 #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
13207 #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
13208 #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
13209 #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
13210 #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
13211 #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
13212 #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
13213 #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
13214 #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
13215 #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
13216 #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
13217 #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
13218 #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
13219 #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
13220 #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
13221 #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
13222 #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
13223 #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
13224 #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
13225 #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
13226 #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
13227 #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
13228 #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
13229 #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
13230 #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
13231 #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
13232 #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
13233 #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
13234 #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
13235 #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
13236 #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
13237 #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
13238 #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
13239 #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
13240 #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
13241 #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
13242 #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
13243 #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
13244 #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
13245 #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
13246 #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
13247 #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
13248 #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
13249 #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
13250 #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
13251 #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
13252 #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
13253 #define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3,SGGHD3)
13254 #define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3,DGGHD3)
13255 #define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3,CGGHD3)
13256 #define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3,ZGGHD3)
13257 #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
13258 #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
13259 #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
13260 #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
13261 #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
13262 #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
13263 #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
13264 #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
13265 #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
13266 #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
13267 #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
13268 #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
13269 #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
13270 #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
13271 #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
13272 #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
13273 #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
13274 #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
13275 #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
13276 #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
13277 #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
13278 #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
13279 #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
13280 #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
13281 #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
13282 #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
13283 #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
13284 #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
13285 #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
13286 #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
13287 #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
13288 #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
13289 #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
13290 #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
13291 #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
13292 #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
13293 #define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3,SGGSVP3)
13294 #define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3,DGGSVP3)
13295 #define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
13296 #define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3,ZGGSVP3)
13297 #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
13298 #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
13299 #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
13300 #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
13301 #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
13302 #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
13303 #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
13304 #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
13305 #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
13306 #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
13307 #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
13308 #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
13309 #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
13310 #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
13311 #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
13312 #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
13313 #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
13314 #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
13315 #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
13316 #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
13317 #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
13318 #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
13319 #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
13320 #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
13321 #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
13322 #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
13323 #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
13324 #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
13325 #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
13326 #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
13327 #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
13328 #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
13329 #define LAPACK_ssyev_2stage LAPACK_GLOBAL(ssyev_2stage,SSYEV_2STAGE)
13330 #define LAPACK_dsyev_2stage LAPACK_GLOBAL(dsyev_2stage,DSYEV_2STAGE)
13331 #define LAPACK_cheev_2stage LAPACK_GLOBAL(cheev_2stage,CHEEV_2STAGE)
13332 #define LAPACK_zheev_2stage LAPACK_GLOBAL(zheev_2stage,ZHEEV_2STAGE)
13333 #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
13334 #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
13335 #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
13336 #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
13337 #define LAPACK_ssyevd_2stage LAPACK_GLOBAL(ssyevd_2stage,SSYEVD_2STAGE)
13338 #define LAPACK_dsyevd_2stage LAPACK_GLOBAL(dsyevd_2stage,DSYEVD_2STAGE)
13339 #define LAPACK_cheevd_2stage LAPACK_GLOBAL(cheevd_2stage,CHEEVD_2STAGE)
13340 #define LAPACK_zheevd_2stage LAPACK_GLOBAL(zheevd_2stage,ZHEEVD_2STAGE)
13341 #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
13342 #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
13343 #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
13344 #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
13345 #define LAPACK_ssyevx_2stage LAPACK_GLOBAL(ssyevx_2stage,SSYEVX_2STAGE)
13346 #define LAPACK_dsyevx_2stage LAPACK_GLOBAL(dsyevx_2stage,DSYEVX_2STAGE)
13347 #define LAPACK_cheevx_2stage LAPACK_GLOBAL(cheevx_2stage,CHEEVX_2STAGE)
13348 #define LAPACK_zheevx_2stage LAPACK_GLOBAL(zheevx_2stage,ZHEEVX_2STAGE)
13349 #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
13350 #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
13351 #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
13352 #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
13353 #define LAPACK_ssyevr_2stage LAPACK_GLOBAL(ssyevr_2stage,SSYEVR_2STAGE)
13354 #define LAPACK_dsyevr_2stage LAPACK_GLOBAL(dsyevr_2stage,DSYEVR_2STAGE)
13355 #define LAPACK_cheevr_2stage LAPACK_GLOBAL(cheevr_2stage,CHEEVR_2STAGE)
13356 #define LAPACK_zheevr_2stage LAPACK_GLOBAL(zheevr_2stage,ZHEEVR_2STAGE)
13357 #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
13358 #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
13359 #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
13360 #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
13361 #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
13362 #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
13363 #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
13364 #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
13365 #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
13366 #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
13367 #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
13368 #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
13369 #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
13370 #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
13371 #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
13372 #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
13373 #define LAPACK_ssbev_2stage LAPACK_GLOBAL(ssbev_2stage,SSBEV_2STAGE)
13374 #define LAPACK_dsbev_2stage LAPACK_GLOBAL(dsbev_2stage,DSBEV_2STAGE)
13375 #define LAPACK_chbev_2stage LAPACK_GLOBAL(chbev_2stage,CHBEV_2STAGE)
13376 #define LAPACK_zhbev_2stage LAPACK_GLOBAL(zhbev_2stage,ZHBEV_2STAGE)
13377 #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
13378 #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
13379 #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
13380 #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
13381 #define LAPACK_ssbevd_2stage LAPACK_GLOBAL(ssbevd_2stage,SSBEVD_2STAGE)
13382 #define LAPACK_dsbevd_2stage LAPACK_GLOBAL(dsbevd_2stage,DSBEVD_2STAGE)
13383 #define LAPACK_chbevd_2stage LAPACK_GLOBAL(chbevd_2stage,CHBEVD_2STAGE)
13384 #define LAPACK_zhbevd_2stage LAPACK_GLOBAL(zhbevd_2stage,ZHBEVD_2STAGE)
13385 #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
13386 #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
13387 #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
13388 #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
13389 #define LAPACK_ssbevx_2stage LAPACK_GLOBAL(ssbevx_2stage,SSBEVX_2STAGE)
13390 #define LAPACK_dsbevx_2stage LAPACK_GLOBAL(dsbevx_2stage,DSBEVX_2STAGE)
13391 #define LAPACK_chbevx_2stage LAPACK_GLOBAL(chbevx_2stage,CHBEVX_2STAGE)
13392 #define LAPACK_zhbevx_2stage LAPACK_GLOBAL(zhbevx_2stage,ZHBEVX_2STAGE)
13393 #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
13394 #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
13395 #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
13396 #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
13397 #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
13398 #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
13399 #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
13400 #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
13401 #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
13402 #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
13403 #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
13404 #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
13405 #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
13406 #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
13407 #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
13408 #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
13409 #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
13410 #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
13411 #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
13412 #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
13413 #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
13414 #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
13415 #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
13416 #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
13417 #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
13418 #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
13419 #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
13420 #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
13421 #define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx,SGESVDX)
13422 #define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx,DGESVDX)
13423 #define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx,CGESVDX)
13424 #define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx,ZGESVDX)
13425 #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
13426 #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
13427 #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
13428 #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
13429 #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
13430 #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
13431 #define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv,CGEJSV)
13432 #define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv,ZGEJSV)
13433 #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
13434 #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
13435 #define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj,CGESVJ)
13436 #define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj,ZGESVJ)
13437 #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
13438 #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
13439 #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
13440 #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
13441 #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
13442 #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
13443 #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
13444 #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
13445 #define LAPACK_ssygv_2stage LAPACK_GLOBAL(ssygv_2stage,SSYGV_2STAGE)
13446 #define LAPACK_dsygv_2stage LAPACK_GLOBAL(dsygv_2stage,DSYGV_2STAGE)
13447 #define LAPACK_chegv_2stage LAPACK_GLOBAL(chegv_2stage,CHEGV_2STAGE)
13448 #define LAPACK_zhegv_2stage LAPACK_GLOBAL(zhegv_2stage,ZHEGV_2STAGE)
13449 #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
13450 #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
13451 #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
13452 #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
13453 #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
13454 #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
13455 #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
13456 #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
13457 #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
13458 #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
13459 #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
13460 #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
13461 #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
13462 #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
13463 #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
13464 #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
13465 #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
13466 #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
13467 #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
13468 #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
13469 #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
13470 #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
13471 #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
13472 #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
13473 #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
13474 #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
13475 #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
13476 #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
13477 #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
13478 #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
13479 #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
13480 #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
13481 #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
13482 #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
13483 #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
13484 #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
13485 #define LAPACK_sgges3 LAPACK_GLOBAL(sgges3,SGGES3)
13486 #define LAPACK_dgges3 LAPACK_GLOBAL(dgges3,DGGES3)
13487 #define LAPACK_cgges3 LAPACK_GLOBAL(cgges3,CGGES3)
13488 #define LAPACK_zgges3 LAPACK_GLOBAL(zgges3,ZGGES3)
13489 #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
13490 #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
13491 #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
13492 #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
13493 #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
13494 #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
13495 #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
13496 #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
13497 #define LAPACK_sggev3 LAPACK_GLOBAL(sggev3,SGGEV3)
13498 #define LAPACK_dggev3 LAPACK_GLOBAL(dggev3,DGGEV3)
13499 #define LAPACK_cggev3 LAPACK_GLOBAL(cggev3,CGGEV3)
13500 #define LAPACK_zggev3 LAPACK_GLOBAL(zggev3,ZGGEV3)
13501 #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
13502 #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
13503 #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
13504 #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
13505 #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
13506 #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
13507 #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
13508 #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
13509 #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
13510 #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
13511 #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
13512 #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
13513 #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
13514 #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
13515 #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
13516 #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
13517 #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
13518 #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
13519 #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
13520 #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
13521 #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
13522 #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
13523 #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
13524 #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
13525 #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
13526 #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
13527 #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
13528 #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
13529 #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
13530 #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
13531 #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
13532 #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
13533 #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
13534 #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
13535 #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
13536 #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
13537 #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
13538 #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
13539 #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
13540 #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
13541 #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
13542 #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
13543 #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
13544 #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
13545 #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
13546 #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
13547 #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
13548 #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
13549 #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
13550 #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
13551 #define LAPACK_slacn2 LAPACK_GLOBAL(slacn2,SLACN2)
13552 #define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2,DLACN2)
13553 #define LAPACK_clacn2 LAPACK_GLOBAL(clacn2,CLACN2)
13554 #define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2,ZLACN2)
13555 #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
13556 #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
13557 #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
13558 #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
13559 #define LAPACK_clacp2 LAPACK_GLOBAL(clacp2,CLACP2)
13560 #define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2,ZLACP2)
13561 #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
13562 #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
13563 #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
13564 #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
13565 #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
13566 #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
13567 #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
13568 #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
13569 #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
13570 #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
13571 #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
13572 #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
13573 #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
13574 #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
13575 #define LAPACK_clarcm LAPACK_GLOBAL(clarcm,CLARCM)
13576 #define LAPACK_zlarcm LAPACK_GLOBAL(zlarcm,ZLARCM)
13577 #define LAPACK_clacrm LAPACK_GLOBAL(clacrm,CLACRM)
13578 #define LAPACK_zlacrm LAPACK_GLOBAL(zlacrm,ZLACRM)
13579 #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
13580 #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
13581 #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
13582 #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
13583 #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
13584 #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
13585 #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
13586 #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
13587 #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
13588 #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
13589 #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
13590 #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
13591 #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
13592 #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
13593 #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
13594 #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
13595 #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
13596 #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
13597 #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
13598 #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
13599 #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
13600 #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
13601 #define LAPACK_slassq LAPACK_GLOBAL(slassq,SLASSQ)
13602 #define LAPACK_dlassq LAPACK_GLOBAL(dlassq,DLASSQ)
13603 #define LAPACK_classq LAPACK_GLOBAL(classq,CLASSQ)
13604 #define LAPACK_zlassq LAPACK_GLOBAL(zlassq,ZLASSQ)
13605 #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
13606 #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
13607 #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
13608 #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
13609 #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
13610 #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
13611 #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
13612 #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
13613 #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
13614 #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
13615 #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
13616 #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
13617 #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
13618 #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
13619 #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
13620 #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
13621 #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
13622 #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
13623 #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
13624 #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
13625 #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
13626 #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
13627 #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
13628 #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
13629 #define LAPACK_slascl LAPACK_GLOBAL(slascl,SLASCL)
13630 #define LAPACK_dlascl LAPACK_GLOBAL(dlascl,DLASCL)
13631 #define LAPACK_clascl LAPACK_GLOBAL(clascl,CLASCL)
13632 #define LAPACK_zlascl LAPACK_GLOBAL(zlascl,ZLASCL)
13633 #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
13634 #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
13635 #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
13636 #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
13637 #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
13638 #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
13639 #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
13640 #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
13641 #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
13642 #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
13643 #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
13644 #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
13645 #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
13646 #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
13647 #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
13648 #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
13649 #define LAPACK_slapmt LAPACK_GLOBAL(slapmt,SLAPMT)
13650 #define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt,DLAPMT)
13651 #define LAPACK_clapmt LAPACK_GLOBAL(clapmt,CLAPMT)
13652 #define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt,ZLAPMT)
13653 #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
13654 #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
13655 #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
13656 #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
13657 #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
13658 #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
13659 #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
13660 #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
13661 // LAPACK 3.3.0
13662 #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
13663 #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
13664 #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
13665 #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
13666 #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
13667 #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
13668 #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
13669 #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
13670 #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
13671 #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
13672 #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
13673 #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
13674 #define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1,CUNCSD2BY1)
13675 #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
13676 #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
13677 #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
13678 #define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1,DORCSD2BY1)
13679 #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
13680 #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
13681 #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
13682 #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
13683 #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
13684 #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
13685 #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
13686 #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
13687 #define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1,SORCSD2BY1)
13688 #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
13689 #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
13690 #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
13691 #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
13692 #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
13693 #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
13694 #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
13695 #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
13696 #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
13697 #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
13698 #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
13699 #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
13700 #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
13701 #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
13702 #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
13703 #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
13704 #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
13705 #define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1,ZUNCSD2BY1)
13706 // LAPACK 3.4.0
13707 #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
13708 #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
13709 #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
13710 #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
13711 #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
13712 #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
13713 #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
13714 #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
13715 #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
13716 #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
13717 #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
13718 #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
13719 #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
13720 #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
13721 #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
13722 #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
13723 #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
13724 #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
13725 #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
13726 #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
13727 #define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt,STPQRT)
13728 #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
13729 #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
13730 #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
13731 #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
13732 #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
13733 #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
13734 #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
13735 #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
13736 #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
13737 #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
13738 #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
13739 // LAPACK 3.5.0
13740 #define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook,SSYSV_ROOK)
13741 #define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook,DSYSV_ROOK)
13742 #define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook,CSYSV_ROOK)
13743 #define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook,ZSYSV_ROOK)
13744 #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
13745 #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
13746 #define LAPACK_ilaver LAPACK_GLOBAL(ilaver,ILAVER)
13747 // LAPACK 3.6.0
13748 #define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3,SGGSVD3)
13749 #define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3,DGGSVD3)
13750 #define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
13751 #define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3,ZGGSVD3)
13752 // LAPACK 3.7.0
13753 #define LAPACK_ssysv_aa LAPACK_GLOBAL(ssysv_aa,SSYSV_AA)
13754 #define LAPACK_dsysv_aa LAPACK_GLOBAL(dsysv_aa,DSYSV_AA)
13755 #define LAPACK_chesv_aa LAPACK_GLOBAL(chesv_aa,CHESV_AA)
13756 #define LAPACK_zsysv_aa LAPACK_GLOBAL(zsysv_aa,ZSYSV_AA)
13757 #define LAPACK_csysv_aa LAPACK_GLOBAL(csysv_aa,CSYSV_AA)
13758 #define LAPACK_zhesv_aa LAPACK_GLOBAL(zhesv_aa,ZHESV_AA)
13759 #define LAPACK_ssytrs_aa LAPACK_GLOBAL(ssytrs_aa,SSYTRS_AA)
13760 #define LAPACK_dsytrs_aa LAPACK_GLOBAL(dsytrs_aa,DSYTRS_AA)
13761 #define LAPACK_csytrs_aa LAPACK_GLOBAL(csytrs_aa,CSYTRS_AA)
13762 #define LAPACK_zsytrs_aa LAPACK_GLOBAL(zsytrs_aa,ZSYTRS_AA)
13763 #define LAPACK_chetrs_aa LAPACK_GLOBAL(chetrs_aa,CHETRS_AA)
13764 #define LAPACK_zhetrs_aa LAPACK_GLOBAL(zhetrs_aa,ZHETRS_AA)
13765 #define LAPACK_ssytrf_aa LAPACK_GLOBAL(ssytrf_aa,SSYTRF_AA)
13766 #define LAPACK_dsytrf_aa LAPACK_GLOBAL(dsytrf_aa,DSYTRF_AA)
13767 #define LAPACK_csytrf_aa LAPACK_GLOBAL(csytrf_aa,CSYTRF_AA)
13768 #define LAPACK_zsytrf_aa LAPACK_GLOBAL(zsytrf_aa,ZSYTRF_AA)
13769 #define LAPACK_chetrf_aa LAPACK_GLOBAL(chetrf_aa,CHETRF_AA)
13770 #define LAPACK_zhetrf_aa LAPACK_GLOBAL(zhetrf_aa,ZHETRF_AA)
13771
13772 #define LAPACK_ssysv_rk LAPACK_GLOBAL(ssysv_rk,SSYSV_RK)
13773 #define LAPACK_dsysv_rk LAPACK_GLOBAL(dsysv_rk,DSYSV_RK)
13774 #define LAPACK_chesv_rk LAPACK_GLOBAL(chesv_rk,CHESV_RK)
13775 #define LAPACK_zsysv_rk LAPACK_GLOBAL(zsysv_rk,ZSYSV_RK)
13776 #define LAPACK_csysv_rk LAPACK_GLOBAL(csysv_rk,CSYSV_RK)
13777 #define LAPACK_zhesv_rk LAPACK_GLOBAL(zhesv_rk,ZHESV_RK)
13778 #define LAPACK_ssytrf_rk LAPACK_GLOBAL(ssytrf_rk,SSYTRF_RK)
13779 #define LAPACK_dsytrf_rk LAPACK_GLOBAL(dsytrf_rk,DSYTRF_RK)
13780 #define LAPACK_csytrf_rk LAPACK_GLOBAL(csytrf_rk,CSYTRF_RK)
13781 #define LAPACK_zsytrf_rk LAPACK_GLOBAL(zsytrf_rk,ZSYTRF_RK)
13782 #define LAPACK_chetrf_rk LAPACK_GLOBAL(chetrf_rk,CHETRF_RK)
13783 #define LAPACK_zhetrf_rk LAPACK_GLOBAL(zhetrf_rk,ZHETRF_RK)
13784 #define LAPACK_ssytrs_3 LAPACK_GLOBAL(ssytrs_3,SSYTRS_3)
13785 #define LAPACK_dsytrs_3 LAPACK_GLOBAL(dsytrs_3,DSYTRS_3)
13786 #define LAPACK_csytrs_3 LAPACK_GLOBAL(csytrs_3,CSYTRS_3)
13787 #define LAPACK_zsytrs_3 LAPACK_GLOBAL(zsytrs_3,ZSYTRS_3)
13788 #define LAPACK_chetrs_3 LAPACK_GLOBAL(chetrs_3,CHETRS_3)
13789 #define LAPACK_zhetrs_3 LAPACK_GLOBAL(zhetrs_3,ZHETRS_3)
13790 #define LAPACK_ssytri_3 LAPACK_GLOBAL(ssytri_3,SSYTRI_3)
13791 #define LAPACK_dsytri_3 LAPACK_GLOBAL(dsytri_3,DSYTRI_3)
13792 #define LAPACK_csytri_3 LAPACK_GLOBAL(csytri_3,CSYTRI_3)
13793 #define LAPACK_zsytri_3 LAPACK_GLOBAL(zsytri_3,ZSYTRI_3)
13794 #define LAPACK_chetri_3 LAPACK_GLOBAL(chetri_3,CHETRI_3)
13795 #define LAPACK_zhetri_3 LAPACK_GLOBAL(zhetri_3,ZHETRI_3)
13796 #define LAPACK_ssycon_3 LAPACK_GLOBAL(ssycon_3,SSYCON_3)
13797 #define LAPACK_dsycon_3 LAPACK_GLOBAL(dsycon_3,DSYCON_3)
13798 #define LAPACK_csycon_3 LAPACK_GLOBAL(csycon_3,CSYCON_3)
13799 #define LAPACK_zsycon_3 LAPACK_GLOBAL(zsycon_3,ZSYCON_3)
13800 #define LAPACK_checon_3 LAPACK_GLOBAL(checon_3,CHECON_3)
13801 #define LAPACK_zhecon_3 LAPACK_GLOBAL(zhecon_3,ZHECON_3)
13802 #define LAPACK_sgelq LAPACK_GLOBAL(sgelq,SGELQ)
13803 #define LAPACK_dgelq LAPACK_GLOBAL(dgelq,DGELQ)
13804 #define LAPACK_cgelq LAPACK_GLOBAL(cgelq,CGELQ)
13805 #define LAPACK_zgelq LAPACK_GLOBAL(zgelq,ZGELQ)
13806 #define LAPACK_sgemlq LAPACK_GLOBAL(sgemlq,SGEMLQ)
13807 #define LAPACK_dgemlq LAPACK_GLOBAL(dgemlq,DGEMLQ)
13808 #define LAPACK_cgemlq LAPACK_GLOBAL(cgemlq,CGEMLQ)
13809 #define LAPACK_zgemlq LAPACK_GLOBAL(zgemlq,ZGEMLQ)
13810 #define LAPACK_sgeqr LAPACK_GLOBAL(sgeqr,SGEQR)
13811 #define LAPACK_dgeqr LAPACK_GLOBAL(dgeqr,DGEQR)
13812 #define LAPACK_cgeqr LAPACK_GLOBAL(cgeqr,CGEQR)
13813 #define LAPACK_zgeqr LAPACK_GLOBAL(zgeqr,ZGEQR)
13814 #define LAPACK_sgemqr LAPACK_GLOBAL(sgemqr,SGEMQR)
13815 #define LAPACK_dgemqr LAPACK_GLOBAL(dgemqr,DGEMQR)
13816 #define LAPACK_cgemqr LAPACK_GLOBAL(cgemqr,CGEMQR)
13817 #define LAPACK_zgemqr LAPACK_GLOBAL(zgemqr,ZGEMQR)
13818 #define LAPACK_sgetsls LAPACK_GLOBAL(sgetsls,SGETSLS)
13819 #define LAPACK_dgetsls LAPACK_GLOBAL(dgetsls,DGETSLS)
13820 #define LAPACK_cgetsls LAPACK_GLOBAL(cgetsls,CGETSLS)
13821 #define LAPACK_zgetsls LAPACK_GLOBAL(zgetsls,ZGETSLS)
13822
13823 // LAPACK 3.8.0
13824 #define LAPACK_ssysv_aa_2stage LAPACK_GLOBAL(ssysv_aa_2stage,SSYSV_AA_2STAGE)
13825 #define LAPACK_dsysv_aa_2stage LAPACK_GLOBAL(dsysv_aa_2stage,DSYSV_AA_2STAGE)
13826 #define LAPACK_chesv_aa_2stage LAPACK_GLOBAL(chesv_aa_2stage,CHESV_AA_2STAGE)
13827 #define LAPACK_zsysv_aa_2stage LAPACK_GLOBAL(zsysv_aa_2stage,ZSYSV_AA_2STAGE)
13828 #define LAPACK_csysv_aa_2stage LAPACK_GLOBAL(csysv_aa_2stage,CSYSV_AA_2STAGE)
13829 #define LAPACK_zhesv_aa_2stage LAPACK_GLOBAL(zhesv_aa_2stage,ZHESV_AA_2STAGE)
13830 #define LAPACK_ssytrs_aa_2stage LAPACK_GLOBAL(ssytrs_aa_2stage,SSYTRS_AA_2STAGE)
13831 #define LAPACK_dsytrs_aa_2stage LAPACK_GLOBAL(dsytrs_aa_2stage,DSYTRS_AA_2STAGE)
13832 #define LAPACK_csytrs_aa_2stage LAPACK_GLOBAL(csytrs_aa_2stage,CSYTRS_AA_2STAGE)
13833 #define LAPACK_zsytrs_aa_2stage LAPACK_GLOBAL(zsytrs_aa_2stage,ZSYTRS_AA_2STAGE)
13834 #define LAPACK_chetrs_aa_2stage LAPACK_GLOBAL(chetrs_aa_2stage,CHETRS_AA_2STAGE)
13835 #define LAPACK_zhetrs_aa_2stage LAPACK_GLOBAL(zhetrs_aa_2stage,ZHETRS_AA_2STAGE)
13836 #define LAPACK_ssytrf_aa_2stage LAPACK_GLOBAL(ssytrf_aa_2stage,SSYTRF_AA_2STAGE)
13837 #define LAPACK_dsytrf_aa_2stage LAPACK_GLOBAL(dsytrf_aa_2stage,DSYTRF_AA_2STAGE)
13838 #define LAPACK_csytrf_aa_2stage LAPACK_GLOBAL(csytrf_aa_2stage,CSYTRF_AA_2STAGE)
13839 #define LAPACK_zsytrf_aa_2stage LAPACK_GLOBAL(zsytrf_aa_2stage,ZSYTRF_AA_2STAGE)
13840 #define LAPACK_chetrf_aa_2stage LAPACK_GLOBAL(chetrf_aa_2stage,CHETRF_AA_2STAGE)
13841 #define LAPACK_zhetrf_aa_2stage LAPACK_GLOBAL(zhetrf_aa_2stage,ZHETRF_AA_2STAGE)
13842
13843
13844 void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13845                     lapack_int* ipiv, lapack_int *info );
13846 void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13847                     lapack_int* ipiv, lapack_int *info );
13848 void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13849                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13850 void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13851                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13852 void LAPACK_sgetrf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13853                     lapack_int* ipiv, lapack_int *info );
13854 void LAPACK_dgetrf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13855                     lapack_int* ipiv, lapack_int *info );
13856 void LAPACK_cgetrf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13857                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13858 void LAPACK_zgetrf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13859                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13860 void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13861                     lapack_int* ku, float* ab, lapack_int* ldab,
13862                     lapack_int* ipiv, lapack_int *info );
13863 void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13864                     lapack_int* ku, double* ab, lapack_int* ldab,
13865                     lapack_int* ipiv, lapack_int *info );
13866 void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13867                     lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
13868                     lapack_int* ipiv, lapack_int *info );
13869 void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13870                     lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
13871                     lapack_int* ipiv, lapack_int *info );
13872 void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
13873                     lapack_int* ipiv, lapack_int *info );
13874 void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
13875                     double* du2, lapack_int* ipiv, lapack_int *info );
13876 void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
13877                     lapack_complex_float* d, lapack_complex_float* du,
13878                     lapack_complex_float* du2, lapack_int* ipiv,
13879                     lapack_int *info );
13880 void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
13881                     lapack_complex_double* d, lapack_complex_double* du,
13882                     lapack_complex_double* du2, lapack_int* ipiv,
13883                     lapack_int *info );
13884 void LAPACK_spotrf2( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13885                     lapack_int *info );
13886 void LAPACK_dpotrf2( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13887                     lapack_int *info );
13888 void LAPACK_cpotrf2( char* uplo, lapack_int* n, lapack_complex_float* a,
13889                     lapack_int* lda, lapack_int *info );
13890 void LAPACK_zpotrf2( char* uplo, lapack_int* n, lapack_complex_double* a,
13891                     lapack_int* lda, lapack_int *info );
13892 void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13893                     lapack_int *info );
13894 void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13895                     lapack_int *info );
13896 void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13897                     lapack_int* lda, lapack_int *info );
13898 void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13899                     lapack_int* lda, lapack_int *info );
13900 void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13901                     lapack_int* piv, lapack_int* rank, double* tol,
13902                     double* work, lapack_int *info );
13903 void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13904                     lapack_int* piv, lapack_int* rank, float* tol, float* work,
13905                     lapack_int *info );
13906 void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13907                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
13908                     double* tol, double* work, lapack_int *info );
13909 void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13910                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
13911                     float* tol, float* work, lapack_int *info );
13912 void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
13913                     lapack_int *info );
13914 void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
13915                     lapack_int *info );
13916 void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
13917                     lapack_complex_double* a, lapack_int *info );
13918 void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
13919                     lapack_complex_float* a, lapack_int *info );
13920 void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
13921 void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
13922 void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13923                     lapack_int *info );
13924 void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13925                     lapack_int *info );
13926 void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
13927                     lapack_int* ldab, lapack_int *info );
13928 void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
13929                     lapack_int* ldab, lapack_int *info );
13930 void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13931                     lapack_complex_float* ab, lapack_int* ldab,
13932                     lapack_int *info );
13933 void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13934                     lapack_complex_double* ab, lapack_int* ldab,
13935                     lapack_int *info );
13936 void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
13937 void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
13938 void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
13939                     lapack_int *info );
13940 void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
13941                     lapack_int *info );
13942 void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13943                     lapack_int* ipiv, float* work, lapack_int* lwork,
13944                     lapack_int *info );
13945 void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13946                     lapack_int* ipiv, double* work, lapack_int* lwork,
13947                     lapack_int *info );
13948 void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13949                     lapack_int* lda, lapack_int* ipiv,
13950                     lapack_complex_float* work, lapack_int* lwork,
13951                     lapack_int *info );
13952 void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13953                     lapack_int* lda, lapack_int* ipiv,
13954                     lapack_complex_double* work, lapack_int* lwork,
13955                     lapack_int *info );
13956 void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13957                     lapack_int* lda, lapack_int* ipiv,
13958                     lapack_complex_float* work, lapack_int* lwork,
13959                     lapack_int *info );
13960 void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13961                     lapack_int* lda, lapack_int* ipiv,
13962                     lapack_complex_double* work, lapack_int* lwork,
13963                     lapack_int *info );
13964 void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
13965                     lapack_int *info );
13966 void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
13967                     lapack_int *info );
13968 void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13969                     lapack_int* ipiv, lapack_int *info );
13970 void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13971                     lapack_int* ipiv, lapack_int *info );
13972 void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13973                     lapack_int* ipiv, lapack_int *info );
13974 void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13975                     lapack_int* ipiv, lapack_int *info );
13976 void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13977                     const float* a, lapack_int* lda, const lapack_int* ipiv,
13978                     float* b, lapack_int* ldb, lapack_int *info );
13979 void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13980                     const double* a, lapack_int* lda, const lapack_int* ipiv,
13981                     double* b, lapack_int* ldb, lapack_int *info );
13982 void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13983                     const lapack_complex_float* a, lapack_int* lda,
13984                     const lapack_int* ipiv, lapack_complex_float* b,
13985                     lapack_int* ldb, lapack_int *info );
13986 void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13987                     const lapack_complex_double* a, lapack_int* lda,
13988                     const lapack_int* ipiv, lapack_complex_double* b,
13989                     lapack_int* ldb, lapack_int *info );
13990 void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13991                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
13992                     const lapack_int* ipiv, float* b, lapack_int* ldb,
13993                     lapack_int *info );
13994 void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13995                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
13996                     const lapack_int* ipiv, double* b, lapack_int* ldb,
13997                     lapack_int *info );
13998 void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13999                     lapack_int* nrhs, const lapack_complex_float* ab,
14000                     lapack_int* ldab, const lapack_int* ipiv,
14001                     lapack_complex_float* b, lapack_int* ldb,
14002                     lapack_int *info );
14003 void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14004                     lapack_int* nrhs, const lapack_complex_double* ab,
14005                     lapack_int* ldab, const lapack_int* ipiv,
14006                     lapack_complex_double* b, lapack_int* ldb,
14007                     lapack_int *info );
14008 void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14009                     const float* dl, const float* d, const float* du,
14010                     const float* du2, const lapack_int* ipiv, float* b,
14011                     lapack_int* ldb, lapack_int *info );
14012 void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14013                     const double* dl, const double* d, const double* du,
14014                     const double* du2, const lapack_int* ipiv, double* b,
14015                     lapack_int* ldb, lapack_int *info );
14016 void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14017                     const lapack_complex_float* dl,
14018                     const lapack_complex_float* d,
14019                     const lapack_complex_float* du,
14020                     const lapack_complex_float* du2, const lapack_int* ipiv,
14021                     lapack_complex_float* b, lapack_int* ldb,
14022                     lapack_int *info );
14023 void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14024                     const lapack_complex_double* dl,
14025                     const lapack_complex_double* d,
14026                     const lapack_complex_double* du,
14027                     const lapack_complex_double* du2, const lapack_int* ipiv,
14028                     lapack_complex_double* b, lapack_int* ldb,
14029                     lapack_int *info );
14030 void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14031                     lapack_int* lda, float* b, lapack_int* ldb,
14032                     lapack_int *info );
14033 void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14034                     const double* a, lapack_int* lda, double* b,
14035                     lapack_int* ldb, lapack_int *info );
14036 void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14037                     const lapack_complex_float* a, lapack_int* lda,
14038                     lapack_complex_float* b, lapack_int* ldb,
14039                     lapack_int *info );
14040 void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14041                     const lapack_complex_double* a, lapack_int* lda,
14042                     lapack_complex_double* b, lapack_int* ldb,
14043                     lapack_int *info );
14044 void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14045                     const double* a, double* b, lapack_int* ldb,
14046                     lapack_int *info );
14047 void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14048                     const float* a, float* b, lapack_int* ldb,
14049                     lapack_int *info );
14050 void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14051                     const lapack_complex_double* a, lapack_complex_double* b,
14052                     lapack_int* ldb, lapack_int *info );
14053 void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14054                     const lapack_complex_float* a, lapack_complex_float* b,
14055                     lapack_int* ldb, lapack_int *info );
14056 void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14057                     const float* ap, float* b, lapack_int* ldb,
14058                     lapack_int *info );
14059 void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14060                     const double* ap, double* b, lapack_int* ldb,
14061                     lapack_int *info );
14062 void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14063                     const lapack_complex_float* ap, lapack_complex_float* b,
14064                     lapack_int* ldb, lapack_int *info );
14065 void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14066                     const lapack_complex_double* ap, lapack_complex_double* b,
14067                     lapack_int* ldb, lapack_int *info );
14068 void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14069                     const float* ab, lapack_int* ldab, float* b,
14070                     lapack_int* ldb, lapack_int *info );
14071 void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14072                     const double* ab, lapack_int* ldab, double* b,
14073                     lapack_int* ldb, lapack_int *info );
14074 void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14075                     const lapack_complex_float* ab, lapack_int* ldab,
14076                     lapack_complex_float* b, lapack_int* ldb,
14077                     lapack_int *info );
14078 void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14079                     const lapack_complex_double* ab, lapack_int* ldab,
14080                     lapack_complex_double* b, lapack_int* ldb,
14081                     lapack_int *info );
14082 void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
14083                     const float* e, float* b, lapack_int* ldb,
14084                     lapack_int *info );
14085 void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
14086                     const double* e, double* b, lapack_int* ldb,
14087                     lapack_int *info );
14088 void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
14089                     const lapack_complex_float* e, lapack_complex_float* b,
14090                     lapack_int* ldb, lapack_int *info );
14091 void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14092                     const double* d, const lapack_complex_double* e,
14093                     lapack_complex_double* b, lapack_int* ldb,
14094                     lapack_int *info );
14095 void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14096                     lapack_int* lda, const lapack_int* ipiv, float* b,
14097                     lapack_int* ldb, lapack_int *info );
14098 void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14099                     const double* a, lapack_int* lda, const lapack_int* ipiv,
14100                     double* b, lapack_int* ldb, lapack_int *info );
14101 void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14102                     const lapack_complex_float* a, lapack_int* lda,
14103                     const lapack_int* ipiv, lapack_complex_float* b,
14104                     lapack_int* ldb, lapack_int *info );
14105 void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14106                     const lapack_complex_double* a, lapack_int* lda,
14107                     const lapack_int* ipiv, lapack_complex_double* b,
14108                     lapack_int* ldb, lapack_int *info );
14109 void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14110                     const lapack_complex_float* a, lapack_int* lda,
14111                     const lapack_int* ipiv, lapack_complex_float* b,
14112                     lapack_int* ldb, lapack_int *info );
14113 void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14114                     const lapack_complex_double* a, lapack_int* lda,
14115                     const lapack_int* ipiv, lapack_complex_double* b,
14116                     lapack_int* ldb, lapack_int *info );
14117 void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14118                     const float* ap, const lapack_int* ipiv, float* b,
14119                     lapack_int* ldb, lapack_int *info );
14120 void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14121                     const double* ap, const lapack_int* ipiv, double* b,
14122                     lapack_int* ldb, lapack_int *info );
14123 void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14124                     const lapack_complex_float* ap, const lapack_int* ipiv,
14125                     lapack_complex_float* b, lapack_int* ldb,
14126                     lapack_int *info );
14127 void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14128                     const lapack_complex_double* ap, const lapack_int* ipiv,
14129                     lapack_complex_double* b, lapack_int* ldb,
14130                     lapack_int *info );
14131 void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14132                     const lapack_complex_float* ap, const lapack_int* ipiv,
14133                     lapack_complex_float* b, lapack_int* ldb,
14134                     lapack_int *info );
14135 void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14136                     const lapack_complex_double* ap, const lapack_int* ipiv,
14137                     lapack_complex_double* b, lapack_int* ldb,
14138                     lapack_int *info );
14139 void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14140                     lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
14141                     lapack_int* ldb, lapack_int *info );
14142 void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14143                     lapack_int* nrhs, const double* a, lapack_int* lda,
14144                     double* b, lapack_int* ldb, lapack_int *info );
14145 void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14146                     lapack_int* nrhs, const lapack_complex_float* a,
14147                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14148                     lapack_int *info );
14149 void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14150                     lapack_int* nrhs, const lapack_complex_double* a,
14151                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14152                     lapack_int *info );
14153 void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14154                     lapack_int* nrhs, const float* ap, float* b,
14155                     lapack_int* ldb, lapack_int *info );
14156 void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14157                     lapack_int* nrhs, const double* ap, double* b,
14158                     lapack_int* ldb, lapack_int *info );
14159 void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14160                     lapack_int* nrhs, const lapack_complex_float* ap,
14161                     lapack_complex_float* b, lapack_int* ldb,
14162                     lapack_int *info );
14163 void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14164                     lapack_int* nrhs, const lapack_complex_double* ap,
14165                     lapack_complex_double* b, lapack_int* ldb,
14166                     lapack_int *info );
14167 void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14168                     lapack_int* kd, lapack_int* nrhs, const float* ab,
14169                     lapack_int* ldab, float* b, lapack_int* ldb,
14170                     lapack_int *info );
14171 void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14172                     lapack_int* kd, lapack_int* nrhs, const double* ab,
14173                     lapack_int* ldab, double* b, lapack_int* ldb,
14174                     lapack_int *info );
14175 void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14176                     lapack_int* kd, lapack_int* nrhs,
14177                     const lapack_complex_float* ab, lapack_int* ldab,
14178                     lapack_complex_float* b, lapack_int* ldb,
14179                     lapack_int *info );
14180 void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14181                     lapack_int* kd, lapack_int* nrhs,
14182                     const lapack_complex_double* ab, lapack_int* ldab,
14183                     lapack_complex_double* b, lapack_int* ldb,
14184                     lapack_int *info );
14185 void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
14186                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14187                     lapack_int *info );
14188 void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
14189                     double* anorm, double* rcond, double* work,
14190                     lapack_int* iwork, lapack_int *info );
14191 void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
14192                     lapack_int* lda, float* anorm, float* rcond,
14193                     lapack_complex_float* work, float* rwork,
14194                     lapack_int *info );
14195 void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
14196                     lapack_int* lda, double* anorm, double* rcond,
14197                     lapack_complex_double* work, double* rwork,
14198                     lapack_int *info );
14199 void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14200                     const float* ab, lapack_int* ldab, const lapack_int* ipiv,
14201                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14202                     lapack_int *info );
14203 void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14204                     const double* ab, lapack_int* ldab, const lapack_int* ipiv,
14205                     double* anorm, double* rcond, double* work,
14206                     lapack_int* iwork, lapack_int *info );
14207 void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14208                     const lapack_complex_float* ab, lapack_int* ldab,
14209                     const lapack_int* ipiv, float* anorm, float* rcond,
14210                     lapack_complex_float* work, float* rwork,
14211                     lapack_int *info );
14212 void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14213                     const lapack_complex_double* ab, lapack_int* ldab,
14214                     const lapack_int* ipiv, double* anorm, double* rcond,
14215                     lapack_complex_double* work, double* rwork,
14216                     lapack_int *info );
14217 void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
14218                     const float* du, const float* du2, const lapack_int* ipiv,
14219                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14220                     lapack_int *info );
14221 void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
14222                     const double* d, const double* du, const double* du2,
14223                     const lapack_int* ipiv, double* anorm, double* rcond,
14224                     double* work, lapack_int* iwork, lapack_int *info );
14225 void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
14226                     const lapack_complex_float* d,
14227                     const lapack_complex_float* du,
14228                     const lapack_complex_float* du2, const lapack_int* ipiv,
14229                     float* anorm, float* rcond, lapack_complex_float* work,
14230                     lapack_int *info );
14231 void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
14232                     const lapack_complex_double* d,
14233                     const lapack_complex_double* du,
14234                     const lapack_complex_double* du2, const lapack_int* ipiv,
14235                     double* anorm, double* rcond, lapack_complex_double* work,
14236                     lapack_int *info );
14237 void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14238                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14239                     lapack_int *info );
14240 void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
14241                     double* anorm, double* rcond, double* work,
14242                     lapack_int* iwork, lapack_int *info );
14243 void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14244                     lapack_int* lda, float* anorm, float* rcond,
14245                     lapack_complex_float* work, float* rwork,
14246                     lapack_int *info );
14247 void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14248                     lapack_int* lda, double* anorm, double* rcond,
14249                     lapack_complex_double* work, double* rwork,
14250                     lapack_int *info );
14251 void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
14252                     float* rcond, float* work, lapack_int* iwork,
14253                     lapack_int *info );
14254 void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
14255                     double* rcond, double* work, lapack_int* iwork,
14256                     lapack_int *info );
14257 void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14258                     float* anorm, float* rcond, lapack_complex_float* work,
14259                     float* rwork, lapack_int *info );
14260 void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14261                     double* anorm, double* rcond, lapack_complex_double* work,
14262                     double* rwork, lapack_int *info );
14263 void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
14264                     lapack_int* ldab, float* anorm, float* rcond, float* work,
14265                     lapack_int* iwork, lapack_int *info );
14266 void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
14267                     lapack_int* ldab, double* anorm, double* rcond,
14268                     double* work, lapack_int* iwork, lapack_int *info );
14269 void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
14270                     const lapack_complex_float* ab, lapack_int* ldab,
14271                     float* anorm, float* rcond, lapack_complex_float* work,
14272                     float* rwork, lapack_int *info );
14273 void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
14274                     const lapack_complex_double* ab, lapack_int* ldab,
14275                     double* anorm, double* rcond, lapack_complex_double* work,
14276                     double* rwork, lapack_int *info );
14277 void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
14278                     float* rcond, float* work, lapack_int *info );
14279 void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
14280                     double* anorm, double* rcond, double* work,
14281                     lapack_int *info );
14282 void LAPACK_cptcon( lapack_int* n, const float* d,
14283                     const lapack_complex_float* e, float* anorm, float* rcond,
14284                     float* work, lapack_int *info );
14285 void LAPACK_zptcon( lapack_int* n, const double* d,
14286                     const lapack_complex_double* e, double* anorm,
14287                     double* rcond, double* work, lapack_int *info );
14288 void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14289                     const lapack_int* ipiv, float* anorm, float* rcond,
14290                     float* work, lapack_int* iwork, lapack_int *info );
14291 void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
14292                     const lapack_int* ipiv, double* anorm, double* rcond,
14293                     double* work, lapack_int* iwork, lapack_int *info );
14294 void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14295                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
14296                     float* rcond, lapack_complex_float* work,
14297                     lapack_int *info );
14298 void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14299                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
14300                     double* rcond, lapack_complex_double* work,
14301                     lapack_int *info );
14302 void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14303                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
14304                     float* rcond, lapack_complex_float* work,
14305                     lapack_int *info );
14306 void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14307                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
14308                     double* rcond, lapack_complex_double* work,
14309                     lapack_int *info );
14310 void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
14311                     const lapack_int* ipiv, float* anorm, float* rcond,
14312                     float* work, lapack_int* iwork, lapack_int *info );
14313 void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
14314                     const lapack_int* ipiv, double* anorm, double* rcond,
14315                     double* work, lapack_int* iwork, lapack_int *info );
14316 void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14317                     const lapack_int* ipiv, float* anorm, float* rcond,
14318                     lapack_complex_float* work, lapack_int *info );
14319 void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14320                     const lapack_int* ipiv, double* anorm, double* rcond,
14321                     lapack_complex_double* work, lapack_int *info );
14322 void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14323                     const lapack_int* ipiv, float* anorm, float* rcond,
14324                     lapack_complex_float* work, lapack_int *info );
14325 void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14326                     const lapack_int* ipiv, double* anorm, double* rcond,
14327                     lapack_complex_double* work, lapack_int *info );
14328 void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
14329                     const float* a, lapack_int* lda, float* rcond, float* work,
14330                     lapack_int* iwork, lapack_int *info );
14331 void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14332                     const double* a, lapack_int* lda, double* rcond,
14333                     double* work, lapack_int* iwork, lapack_int *info );
14334 void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14335                     const lapack_complex_float* a, lapack_int* lda,
14336                     float* rcond, lapack_complex_float* work, float* rwork,
14337                     lapack_int *info );
14338 void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14339                     const lapack_complex_double* a, lapack_int* lda,
14340                     double* rcond, lapack_complex_double* work, double* rwork,
14341                     lapack_int *info );
14342 void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14343                     const float* ap, float* rcond, float* work,
14344                     lapack_int* iwork, lapack_int *info );
14345 void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14346                     const double* ap, double* rcond, double* work,
14347                     lapack_int* iwork, lapack_int *info );
14348 void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14349                     const lapack_complex_float* ap, float* rcond,
14350                     lapack_complex_float* work, float* rwork,
14351                     lapack_int *info );
14352 void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14353                     const lapack_complex_double* ap, double* rcond,
14354                     lapack_complex_double* work, double* rwork,
14355                     lapack_int *info );
14356 void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14357                     lapack_int* kd, const float* ab, lapack_int* ldab,
14358                     float* rcond, float* work, lapack_int* iwork,
14359                     lapack_int *info );
14360 void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14361                     lapack_int* kd, const double* ab, lapack_int* ldab,
14362                     double* rcond, double* work, lapack_int* iwork,
14363                     lapack_int *info );
14364 void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14365                     lapack_int* kd, const lapack_complex_float* ab,
14366                     lapack_int* ldab, float* rcond, lapack_complex_float* work,
14367                     float* rwork, lapack_int *info );
14368 void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14369                     lapack_int* kd, const lapack_complex_double* ab,
14370                     lapack_int* ldab, double* rcond,
14371                     lapack_complex_double* work, double* rwork,
14372                     lapack_int *info );
14373 void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14374                     const float* a, lapack_int* lda, const float* af,
14375                     lapack_int* ldaf, const lapack_int* ipiv, const float* b,
14376                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14377                     float* berr, float* work, lapack_int* iwork,
14378                     lapack_int *info );
14379 void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14380                     const double* a, lapack_int* lda, const double* af,
14381                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
14382                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14383                     double* berr, double* work, lapack_int* iwork,
14384                     lapack_int *info );
14385 void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14386                     const lapack_complex_float* a, lapack_int* lda,
14387                     const lapack_complex_float* af, lapack_int* ldaf,
14388                     const lapack_int* ipiv, const lapack_complex_float* b,
14389                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14390                     float* ferr, float* berr, lapack_complex_float* work,
14391                     float* rwork, lapack_int *info );
14392 void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14393                     const lapack_complex_double* a, lapack_int* lda,
14394                     const lapack_complex_double* af, lapack_int* ldaf,
14395                     const lapack_int* ipiv, const lapack_complex_double* b,
14396                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14397                     double* ferr, double* berr, lapack_complex_double* work,
14398                     double* rwork, lapack_int *info );
14399 void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14400                      const double* a, lapack_int* lda, const double* af,
14401                      lapack_int* ldaf, const lapack_int* ipiv, const double* r,
14402                      const double* c, const double* b, lapack_int* ldb,
14403                      double* x, lapack_int* ldx, double* rcond, double* berr,
14404                      lapack_int* n_err_bnds, double* err_bnds_norm,
14405                      double* err_bnds_comp, lapack_int* nparams, double* params,
14406                      double* work, lapack_int* iwork, lapack_int *info );
14407 void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14408                      const float* a, lapack_int* lda, const float* af,
14409                      lapack_int* ldaf, const lapack_int* ipiv, const float* r,
14410                      const float* c, const float* b, lapack_int* ldb, float* x,
14411                      lapack_int* ldx, float* rcond, float* berr,
14412                      lapack_int* n_err_bnds, float* err_bnds_norm,
14413                      float* err_bnds_comp, lapack_int* nparams, float* params,
14414                      float* work, lapack_int* iwork, lapack_int *info );
14415 void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14416                      const lapack_complex_double* a, lapack_int* lda,
14417                      const lapack_complex_double* af, lapack_int* ldaf,
14418                      const lapack_int* ipiv, const double* r, const double* c,
14419                      const lapack_complex_double* b, lapack_int* ldb,
14420                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14421                      double* berr, lapack_int* n_err_bnds,
14422                      double* err_bnds_norm, double* err_bnds_comp,
14423                      lapack_int* nparams, double* params,
14424                      lapack_complex_double* work, double* rwork,
14425                      lapack_int *info );
14426 void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14427                      const lapack_complex_float* a, lapack_int* lda,
14428                      const lapack_complex_float* af, lapack_int* ldaf,
14429                      const lapack_int* ipiv, const float* r, const float* c,
14430                      const lapack_complex_float* b, lapack_int* ldb,
14431                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14432                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14433                      float* err_bnds_comp, lapack_int* nparams, float* params,
14434                      lapack_complex_float* work, float* rwork,
14435                      lapack_int *info );
14436 void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14437                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
14438                     const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
14439                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14440                     float* ferr, float* berr, float* work, lapack_int* iwork,
14441                     lapack_int *info );
14442 void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14443                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
14444                     const double* afb, lapack_int* ldafb,
14445                     const lapack_int* ipiv, const double* b, lapack_int* ldb,
14446                     double* x, lapack_int* ldx, double* ferr, double* berr,
14447                     double* work, lapack_int* iwork, lapack_int *info );
14448 void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14449                     lapack_int* nrhs, const lapack_complex_float* ab,
14450                     lapack_int* ldab, const lapack_complex_float* afb,
14451                     lapack_int* ldafb, const lapack_int* ipiv,
14452                     const lapack_complex_float* b, lapack_int* ldb,
14453                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14454                     float* berr, lapack_complex_float* work, float* rwork,
14455                     lapack_int *info );
14456 void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14457                     lapack_int* nrhs, const lapack_complex_double* ab,
14458                     lapack_int* ldab, const lapack_complex_double* afb,
14459                     lapack_int* ldafb, const lapack_int* ipiv,
14460                     const lapack_complex_double* b, lapack_int* ldb,
14461                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14462                     double* berr, lapack_complex_double* work, double* rwork,
14463                     lapack_int *info );
14464 void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14465                      lapack_int* ku, lapack_int* nrhs, const double* ab,
14466                      lapack_int* ldab, const double* afb, lapack_int* ldafb,
14467                      const lapack_int* ipiv, const double* r, const double* c,
14468                      const double* b, lapack_int* ldb, double* x,
14469                      lapack_int* ldx, double* rcond, double* berr,
14470                      lapack_int* n_err_bnds, double* err_bnds_norm,
14471                      double* err_bnds_comp, lapack_int* nparams, double* params,
14472                      double* work, lapack_int* iwork, lapack_int *info );
14473 void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14474                      lapack_int* ku, lapack_int* nrhs, const float* ab,
14475                      lapack_int* ldab, const float* afb, lapack_int* ldafb,
14476                      const lapack_int* ipiv, const float* r, const float* c,
14477                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14478                      float* rcond, float* berr, lapack_int* n_err_bnds,
14479                      float* err_bnds_norm, float* err_bnds_comp,
14480                      lapack_int* nparams, float* params, float* work,
14481                      lapack_int* iwork, lapack_int *info );
14482 void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14483                      lapack_int* ku, lapack_int* nrhs,
14484                      const lapack_complex_double* ab, lapack_int* ldab,
14485                      const lapack_complex_double* afb, lapack_int* ldafb,
14486                      const lapack_int* ipiv, const double* r, const double* c,
14487                      const lapack_complex_double* b, lapack_int* ldb,
14488                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14489                      double* berr, lapack_int* n_err_bnds,
14490                      double* err_bnds_norm, double* err_bnds_comp,
14491                      lapack_int* nparams, double* params,
14492                      lapack_complex_double* work, double* rwork,
14493                      lapack_int *info );
14494 void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14495                      lapack_int* ku, lapack_int* nrhs,
14496                      const lapack_complex_float* ab, lapack_int* ldab,
14497                      const lapack_complex_float* afb, lapack_int* ldafb,
14498                      const lapack_int* ipiv, const float* r, const float* c,
14499                      const lapack_complex_float* b, lapack_int* ldb,
14500                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14501                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14502                      float* err_bnds_comp, lapack_int* nparams, float* params,
14503                      lapack_complex_float* work, float* rwork,
14504                      lapack_int *info );
14505 void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14506                     const float* dl, const float* d, const float* du,
14507                     const float* dlf, const float* df, const float* duf,
14508                     const float* du2, const lapack_int* ipiv, const float* b,
14509                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14510                     float* berr, float* work, lapack_int* iwork,
14511                     lapack_int *info );
14512 void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14513                     const double* dl, const double* d, const double* du,
14514                     const double* dlf, const double* df, const double* duf,
14515                     const double* du2, const lapack_int* ipiv, const double* b,
14516                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14517                     double* berr, double* work, lapack_int* iwork,
14518                     lapack_int *info );
14519 void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14520                     const lapack_complex_float* dl,
14521                     const lapack_complex_float* d,
14522                     const lapack_complex_float* du,
14523                     const lapack_complex_float* dlf,
14524                     const lapack_complex_float* df,
14525                     const lapack_complex_float* duf,
14526                     const lapack_complex_float* du2, const lapack_int* ipiv,
14527                     const lapack_complex_float* b, lapack_int* ldb,
14528                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14529                     float* berr, lapack_complex_float* work, float* rwork,
14530                     lapack_int *info );
14531 void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14532                     const lapack_complex_double* dl,
14533                     const lapack_complex_double* d,
14534                     const lapack_complex_double* du,
14535                     const lapack_complex_double* dlf,
14536                     const lapack_complex_double* df,
14537                     const lapack_complex_double* duf,
14538                     const lapack_complex_double* du2, const lapack_int* ipiv,
14539                     const lapack_complex_double* b, lapack_int* ldb,
14540                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14541                     double* berr, lapack_complex_double* work, double* rwork,
14542                     lapack_int *info );
14543 void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14544                     lapack_int* lda, const float* af, lapack_int* ldaf,
14545                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14546                     float* ferr, float* berr, float* work, lapack_int* iwork,
14547                     lapack_int *info );
14548 void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14549                     const double* a, lapack_int* lda, const double* af,
14550                     lapack_int* ldaf, const double* b, lapack_int* ldb,
14551                     double* x, lapack_int* ldx, double* ferr, double* berr,
14552                     double* work, lapack_int* iwork, lapack_int *info );
14553 void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14554                     const lapack_complex_float* a, lapack_int* lda,
14555                     const lapack_complex_float* af, lapack_int* ldaf,
14556                     const lapack_complex_float* b, lapack_int* ldb,
14557                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14558                     float* berr, lapack_complex_float* work, float* rwork,
14559                     lapack_int *info );
14560 void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14561                     const lapack_complex_double* a, lapack_int* lda,
14562                     const lapack_complex_double* af, lapack_int* ldaf,
14563                     const lapack_complex_double* b, lapack_int* ldb,
14564                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14565                     double* berr, lapack_complex_double* work, double* rwork,
14566                     lapack_int *info );
14567 void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14568                      const double* a, lapack_int* lda, const double* af,
14569                      lapack_int* ldaf, const double* s, const double* b,
14570                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14571                      double* berr, lapack_int* n_err_bnds,
14572                      double* err_bnds_norm, double* err_bnds_comp,
14573                      lapack_int* nparams, double* params, double* work,
14574                      lapack_int* iwork, lapack_int *info );
14575 void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14576                      const float* a, lapack_int* lda, const float* af,
14577                      lapack_int* ldaf, const float* s, const float* b,
14578                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14579                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14580                      float* err_bnds_comp, lapack_int* nparams, float* params,
14581                      float* work, lapack_int* iwork, lapack_int *info );
14582 void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14583                      const lapack_complex_double* a, lapack_int* lda,
14584                      const lapack_complex_double* af, lapack_int* ldaf,
14585                      const double* s, const lapack_complex_double* b,
14586                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14587                      double* rcond, double* berr, lapack_int* n_err_bnds,
14588                      double* err_bnds_norm, double* err_bnds_comp,
14589                      lapack_int* nparams, double* params,
14590                      lapack_complex_double* work, double* rwork,
14591                      lapack_int *info );
14592 void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14593                      const lapack_complex_float* a, lapack_int* lda,
14594                      const lapack_complex_float* af, lapack_int* ldaf,
14595                      const float* s, const lapack_complex_float* b,
14596                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14597                      float* rcond, float* berr, lapack_int* n_err_bnds,
14598                      float* err_bnds_norm, float* err_bnds_comp,
14599                      lapack_int* nparams, float* params,
14600                      lapack_complex_float* work, float* rwork,
14601                      lapack_int *info );
14602 void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14603                     const float* ap, const float* afp, const float* b,
14604                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14605                     float* berr, float* work, lapack_int* iwork,
14606                     lapack_int *info );
14607 void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14608                     const double* ap, const double* afp, const double* b,
14609                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14610                     double* berr, double* work, lapack_int* iwork,
14611                     lapack_int *info );
14612 void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14613                     const lapack_complex_float* ap,
14614                     const lapack_complex_float* afp,
14615                     const lapack_complex_float* b, lapack_int* ldb,
14616                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14617                     float* berr, lapack_complex_float* work, float* rwork,
14618                     lapack_int *info );
14619 void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14620                     const lapack_complex_double* ap,
14621                     const lapack_complex_double* afp,
14622                     const lapack_complex_double* b, lapack_int* ldb,
14623                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14624                     double* berr, lapack_complex_double* work, double* rwork,
14625                     lapack_int *info );
14626 void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14627                     const float* ab, lapack_int* ldab, const float* afb,
14628                     lapack_int* ldafb, const float* b, lapack_int* ldb,
14629                     float* x, lapack_int* ldx, float* ferr, float* berr,
14630                     float* work, lapack_int* iwork, lapack_int *info );
14631 void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14632                     const double* ab, lapack_int* ldab, const double* afb,
14633                     lapack_int* ldafb, const double* b, lapack_int* ldb,
14634                     double* x, lapack_int* ldx, double* ferr, double* berr,
14635                     double* work, lapack_int* iwork, lapack_int *info );
14636 void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14637                     const lapack_complex_float* ab, lapack_int* ldab,
14638                     const lapack_complex_float* afb, lapack_int* ldafb,
14639                     const lapack_complex_float* b, lapack_int* ldb,
14640                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14641                     float* berr, lapack_complex_float* work, float* rwork,
14642                     lapack_int *info );
14643 void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14644                     const lapack_complex_double* ab, lapack_int* ldab,
14645                     const lapack_complex_double* afb, lapack_int* ldafb,
14646                     const lapack_complex_double* b, lapack_int* ldb,
14647                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14648                     double* berr, lapack_complex_double* work, double* rwork,
14649                     lapack_int *info );
14650 void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
14651                     const float* e, const float* df, const float* ef,
14652                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14653                     float* ferr, float* berr, float* work, lapack_int *info );
14654 void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
14655                     const double* e, const double* df, const double* ef,
14656                     const double* b, lapack_int* ldb, double* x,
14657                     lapack_int* ldx, double* ferr, double* berr, double* work,
14658                     lapack_int *info );
14659 void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
14660                     const lapack_complex_float* e, const float* df,
14661                     const lapack_complex_float* ef,
14662                     const lapack_complex_float* b, lapack_int* ldb,
14663                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14664                     float* berr, lapack_complex_float* work, float* rwork,
14665                     lapack_int *info );
14666 void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14667                     const double* d, const lapack_complex_double* e,
14668                     const double* df, const lapack_complex_double* ef,
14669                     const lapack_complex_double* b, lapack_int* ldb,
14670                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14671                     double* berr, lapack_complex_double* work, double* rwork,
14672                     lapack_int *info );
14673 void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14674                     lapack_int* lda, const float* af, lapack_int* ldaf,
14675                     const lapack_int* ipiv, const float* b, lapack_int* ldb,
14676                     float* x, lapack_int* ldx, float* ferr, float* berr,
14677                     float* work, lapack_int* iwork, lapack_int *info );
14678 void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14679                     const double* a, lapack_int* lda, const double* af,
14680                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
14681                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14682                     double* berr, double* work, lapack_int* iwork,
14683                     lapack_int *info );
14684 void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14685                     const lapack_complex_float* a, lapack_int* lda,
14686                     const lapack_complex_float* af, lapack_int* ldaf,
14687                     const lapack_int* ipiv, const lapack_complex_float* b,
14688                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14689                     float* ferr, float* berr, lapack_complex_float* work,
14690                     float* rwork, lapack_int *info );
14691 void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14692                     const lapack_complex_double* a, lapack_int* lda,
14693                     const lapack_complex_double* af, lapack_int* ldaf,
14694                     const lapack_int* ipiv, const lapack_complex_double* b,
14695                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14696                     double* ferr, double* berr, lapack_complex_double* work,
14697                     double* rwork, lapack_int *info );
14698 void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14699                      const double* a, lapack_int* lda, const double* af,
14700                      lapack_int* ldaf, const lapack_int* ipiv, const double* s,
14701                      const double* b, lapack_int* ldb, double* x,
14702                      lapack_int* ldx, double* rcond, double* berr,
14703                      lapack_int* n_err_bnds, double* err_bnds_norm,
14704                      double* err_bnds_comp, lapack_int* nparams, double* params,
14705                      double* work, lapack_int* iwork, lapack_int *info );
14706 void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14707                      const float* a, lapack_int* lda, const float* af,
14708                      lapack_int* ldaf, const lapack_int* ipiv, const float* s,
14709                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14710                      float* rcond, float* berr, lapack_int* n_err_bnds,
14711                      float* err_bnds_norm, float* err_bnds_comp,
14712                      lapack_int* nparams, float* params, float* work,
14713                      lapack_int* iwork, lapack_int *info );
14714 void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14715                      const lapack_complex_double* a, lapack_int* lda,
14716                      const lapack_complex_double* af, lapack_int* ldaf,
14717                      const lapack_int* ipiv, const double* s,
14718                      const lapack_complex_double* b, lapack_int* ldb,
14719                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14720                      double* berr, lapack_int* n_err_bnds,
14721                      double* err_bnds_norm, double* err_bnds_comp,
14722                      lapack_int* nparams, double* params,
14723                      lapack_complex_double* work, double* rwork,
14724                      lapack_int *info );
14725 void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14726                      const lapack_complex_float* a, lapack_int* lda,
14727                      const lapack_complex_float* af, lapack_int* ldaf,
14728                      const lapack_int* ipiv, const float* s,
14729                      const lapack_complex_float* b, lapack_int* ldb,
14730                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14731                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14732                      float* err_bnds_comp, lapack_int* nparams, float* params,
14733                      lapack_complex_float* work, float* rwork,
14734                      lapack_int *info );
14735 void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14736                     const lapack_complex_float* a, lapack_int* lda,
14737                     const lapack_complex_float* af, lapack_int* ldaf,
14738                     const lapack_int* ipiv, const lapack_complex_float* b,
14739                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14740                     float* ferr, float* berr, lapack_complex_float* work,
14741                     float* rwork, lapack_int *info );
14742 void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14743                     const lapack_complex_double* a, lapack_int* lda,
14744                     const lapack_complex_double* af, lapack_int* ldaf,
14745                     const lapack_int* ipiv, const lapack_complex_double* b,
14746                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14747                     double* ferr, double* berr, lapack_complex_double* work,
14748                     double* rwork, lapack_int *info );
14749 void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14750                      const lapack_complex_double* a, lapack_int* lda,
14751                      const lapack_complex_double* af, lapack_int* ldaf,
14752                      const lapack_int* ipiv, const double* s,
14753                      const lapack_complex_double* b, lapack_int* ldb,
14754                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14755                      double* berr, lapack_int* n_err_bnds,
14756                      double* err_bnds_norm, double* err_bnds_comp,
14757                      lapack_int* nparams, double* params,
14758                      lapack_complex_double* work, double* rwork,
14759                      lapack_int *info );
14760 void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14761                      const lapack_complex_float* a, lapack_int* lda,
14762                      const lapack_complex_float* af, lapack_int* ldaf,
14763                      const lapack_int* ipiv, const float* s,
14764                      const lapack_complex_float* b, lapack_int* ldb,
14765                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14766                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14767                      float* err_bnds_comp, lapack_int* nparams, float* params,
14768                      lapack_complex_float* work, float* rwork,
14769                      lapack_int *info );
14770 void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14771                     const float* ap, const float* afp, const lapack_int* ipiv,
14772                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14773                     float* ferr, float* berr, float* work, lapack_int* iwork,
14774                     lapack_int *info );
14775 void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14776                     const double* ap, const double* afp, const lapack_int* ipiv,
14777                     const double* b, lapack_int* ldb, double* x,
14778                     lapack_int* ldx, double* ferr, double* berr, double* work,
14779                     lapack_int* iwork, lapack_int *info );
14780 void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14781                     const lapack_complex_float* ap,
14782                     const lapack_complex_float* afp, const lapack_int* ipiv,
14783                     const lapack_complex_float* b, lapack_int* ldb,
14784                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14785                     float* berr, lapack_complex_float* work, float* rwork,
14786                     lapack_int *info );
14787 void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14788                     const lapack_complex_double* ap,
14789                     const lapack_complex_double* afp, const lapack_int* ipiv,
14790                     const lapack_complex_double* b, lapack_int* ldb,
14791                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14792                     double* berr, lapack_complex_double* work, double* rwork,
14793                     lapack_int *info );
14794 void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14795                     const lapack_complex_float* ap,
14796                     const lapack_complex_float* afp, const lapack_int* ipiv,
14797                     const lapack_complex_float* b, lapack_int* ldb,
14798                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14799                     float* berr, lapack_complex_float* work, float* rwork,
14800                     lapack_int *info );
14801 void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14802                     const lapack_complex_double* ap,
14803                     const lapack_complex_double* afp, const lapack_int* ipiv,
14804                     const lapack_complex_double* b, lapack_int* ldb,
14805                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14806                     double* berr, lapack_complex_double* work, double* rwork,
14807                     lapack_int *info );
14808 void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14809                     lapack_int* nrhs, const float* a, lapack_int* lda,
14810                     const float* b, lapack_int* ldb, const float* x,
14811                     lapack_int* ldx, float* ferr, float* berr, float* work,
14812                     lapack_int* iwork, lapack_int *info );
14813 void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14814                     lapack_int* nrhs, const double* a, lapack_int* lda,
14815                     const double* b, lapack_int* ldb, const double* x,
14816                     lapack_int* ldx, double* ferr, double* berr, double* work,
14817                     lapack_int* iwork, lapack_int *info );
14818 void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14819                     lapack_int* nrhs, const lapack_complex_float* a,
14820                     lapack_int* lda, const lapack_complex_float* b,
14821                     lapack_int* ldb, const lapack_complex_float* x,
14822                     lapack_int* ldx, float* ferr, float* berr,
14823                     lapack_complex_float* work, float* rwork,
14824                     lapack_int *info );
14825 void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14826                     lapack_int* nrhs, const lapack_complex_double* a,
14827                     lapack_int* lda, const lapack_complex_double* b,
14828                     lapack_int* ldb, const lapack_complex_double* x,
14829                     lapack_int* ldx, double* ferr, double* berr,
14830                     lapack_complex_double* work, double* rwork,
14831                     lapack_int *info );
14832 void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14833                     lapack_int* nrhs, const float* ap, const float* b,
14834                     lapack_int* ldb, const float* x, lapack_int* ldx,
14835                     float* ferr, float* berr, float* work, lapack_int* iwork,
14836                     lapack_int *info );
14837 void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14838                     lapack_int* nrhs, const double* ap, const double* b,
14839                     lapack_int* ldb, const double* x, lapack_int* ldx,
14840                     double* ferr, double* berr, double* work, lapack_int* iwork,
14841                     lapack_int *info );
14842 void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14843                     lapack_int* nrhs, const lapack_complex_float* ap,
14844                     const lapack_complex_float* b, lapack_int* ldb,
14845                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
14846                     float* berr, lapack_complex_float* work, float* rwork,
14847                     lapack_int *info );
14848 void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14849                     lapack_int* nrhs, const lapack_complex_double* ap,
14850                     const lapack_complex_double* b, lapack_int* ldb,
14851                     const lapack_complex_double* x, lapack_int* ldx,
14852                     double* ferr, double* berr, lapack_complex_double* work,
14853                     double* rwork, lapack_int *info );
14854 void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14855                     lapack_int* kd, lapack_int* nrhs, const float* ab,
14856                     lapack_int* ldab, const float* b, lapack_int* ldb,
14857                     const float* x, lapack_int* ldx, float* ferr, float* berr,
14858                     float* work, lapack_int* iwork, lapack_int *info );
14859 void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14860                     lapack_int* kd, lapack_int* nrhs, const double* ab,
14861                     lapack_int* ldab, const double* b, lapack_int* ldb,
14862                     const double* x, lapack_int* ldx, double* ferr,
14863                     double* berr, double* work, lapack_int* iwork,
14864                     lapack_int *info );
14865 void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14866                     lapack_int* kd, lapack_int* nrhs,
14867                     const lapack_complex_float* ab, lapack_int* ldab,
14868                     const lapack_complex_float* b, lapack_int* ldb,
14869                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
14870                     float* berr, lapack_complex_float* work, float* rwork,
14871                     lapack_int *info );
14872 void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14873                     lapack_int* kd, lapack_int* nrhs,
14874                     const lapack_complex_double* ab, lapack_int* ldab,
14875                     const lapack_complex_double* b, lapack_int* ldb,
14876                     const lapack_complex_double* x, lapack_int* ldx,
14877                     double* ferr, double* berr, lapack_complex_double* work,
14878                     double* rwork, lapack_int *info );
14879 void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
14880                     const lapack_int* ipiv, float* work, lapack_int* lwork,
14881                     lapack_int *info );
14882 void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
14883                     const lapack_int* ipiv, double* work, lapack_int* lwork,
14884                     lapack_int *info );
14885 void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
14886                     const lapack_int* ipiv, lapack_complex_float* work,
14887                     lapack_int* lwork, lapack_int *info );
14888 void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
14889                     const lapack_int* ipiv, lapack_complex_double* work,
14890                     lapack_int* lwork, lapack_int *info );
14891 void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
14892                     lapack_int *info );
14893 void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
14894                     lapack_int *info );
14895 void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
14896                     lapack_int* lda, lapack_int *info );
14897 void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
14898                     lapack_int* lda, lapack_int *info );
14899 void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
14900                     lapack_int *info );
14901 void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
14902                     lapack_int *info );
14903 void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
14904                     lapack_complex_double* a, lapack_int *info );
14905 void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
14906                     lapack_complex_float* a, lapack_int *info );
14907 void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
14908 void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
14909 void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14910                     lapack_int *info );
14911 void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14912                     lapack_int *info );
14913 void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
14914                     const lapack_int* ipiv, float* work, lapack_int *info );
14915 void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
14916                     const lapack_int* ipiv, double* work, lapack_int *info );
14917 void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
14918                     lapack_int* lda, const lapack_int* ipiv,
14919                     lapack_complex_float* work, lapack_int *info );
14920 void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
14921                     lapack_int* lda, const lapack_int* ipiv,
14922                     lapack_complex_double* work, lapack_int *info );
14923 void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
14924                     lapack_int* lda, const lapack_int* ipiv,
14925                     lapack_complex_float* work, lapack_int *info );
14926 void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
14927                     lapack_int* lda, const lapack_int* ipiv,
14928                     lapack_complex_double* work, lapack_int *info );
14929 void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
14930                     const lapack_int* ipiv, float* work, lapack_int *info );
14931 void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
14932                     const lapack_int* ipiv, double* work, lapack_int *info );
14933 void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14934                     const lapack_int* ipiv, lapack_complex_float* work,
14935                     lapack_int *info );
14936 void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14937                     const lapack_int* ipiv, lapack_complex_double* work,
14938                     lapack_int *info );
14939 void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14940                     const lapack_int* ipiv, lapack_complex_float* work,
14941                     lapack_int *info );
14942 void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14943                     const lapack_int* ipiv, lapack_complex_double* work,
14944                     lapack_int *info );
14945 void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
14946                     lapack_int* lda, lapack_int *info );
14947 void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
14948                     lapack_int* lda, lapack_int *info );
14949 void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
14950                     lapack_complex_float* a, lapack_int* lda,
14951                     lapack_int *info );
14952 void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
14953                     lapack_complex_double* a, lapack_int* lda,
14954                     lapack_int *info );
14955 void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
14956                     double* a, lapack_int *info );
14957 void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
14958                     float* a, lapack_int *info );
14959 void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
14960                     lapack_complex_double* a, lapack_int *info );
14961 void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
14962                     lapack_complex_float* a, lapack_int *info );
14963 void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
14964                     lapack_int *info );
14965 void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
14966                     lapack_int *info );
14967 void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
14968                     lapack_complex_float* ap, lapack_int *info );
14969 void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
14970                     lapack_complex_double* ap, lapack_int *info );
14971 void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
14972                     lapack_int* lda, float* r, float* c, float* rowcnd,
14973                     float* colcnd, float* amax, lapack_int *info );
14974 void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
14975                     lapack_int* lda, double* r, double* c, double* rowcnd,
14976                     double* colcnd, double* amax, lapack_int *info );
14977 void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
14978                     lapack_int* lda, float* r, float* c, float* rowcnd,
14979                     float* colcnd, float* amax, lapack_int *info );
14980 void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
14981                     const lapack_complex_double* a, lapack_int* lda, double* r,
14982                     double* c, double* rowcnd, double* colcnd, double* amax,
14983                     lapack_int *info );
14984 void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
14985                      lapack_int* lda, double* r, double* c, double* rowcnd,
14986                      double* colcnd, double* amax, lapack_int *info );
14987 void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
14988                      lapack_int* lda, float* r, float* c, float* rowcnd,
14989                      float* colcnd, float* amax, lapack_int *info );
14990 void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
14991                      const lapack_complex_double* a, lapack_int* lda, double* r,
14992                      double* c, double* rowcnd, double* colcnd, double* amax,
14993                      lapack_int *info );
14994 void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
14995                      const lapack_complex_float* a, lapack_int* lda, float* r,
14996                      float* c, float* rowcnd, float* colcnd, float* amax,
14997                      lapack_int *info );
14998 void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
14999                     lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
15000                     float* c, float* rowcnd, float* colcnd, float* amax,
15001                     lapack_int *info );
15002 void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15003                     lapack_int* ku, const double* ab, lapack_int* ldab,
15004                     double* r, double* c, double* rowcnd, double* colcnd,
15005                     double* amax, lapack_int *info );
15006 void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15007                     lapack_int* ku, const lapack_complex_float* ab,
15008                     lapack_int* ldab, float* r, float* c, float* rowcnd,
15009                     float* colcnd, float* amax, lapack_int *info );
15010 void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15011                     lapack_int* ku, const lapack_complex_double* ab,
15012                     lapack_int* ldab, double* r, double* c, double* rowcnd,
15013                     double* colcnd, double* amax, lapack_int *info );
15014 void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15015                      lapack_int* ku, const double* ab, lapack_int* ldab,
15016                      double* r, double* c, double* rowcnd, double* colcnd,
15017                      double* amax, lapack_int *info );
15018 void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15019                      lapack_int* ku, const float* ab, lapack_int* ldab,
15020                      float* r, float* c, float* rowcnd, float* colcnd,
15021                      float* amax, lapack_int *info );
15022 void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15023                      lapack_int* ku, const lapack_complex_double* ab,
15024                      lapack_int* ldab, double* r, double* c, double* rowcnd,
15025                      double* colcnd, double* amax, lapack_int *info );
15026 void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15027                      lapack_int* ku, const lapack_complex_float* ab,
15028                      lapack_int* ldab, float* r, float* c, float* rowcnd,
15029                      float* colcnd, float* amax, lapack_int *info );
15030 void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
15031                     float* scond, float* amax, lapack_int *info );
15032 void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
15033                     double* scond, double* amax, lapack_int *info );
15034 void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
15035                     lapack_int* lda, float* s, float* scond, float* amax,
15036                     lapack_int *info );
15037 void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
15038                     lapack_int* lda, double* s, double* scond, double* amax,
15039                     lapack_int *info );
15040 void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
15041                      double* scond, double* amax, lapack_int *info );
15042 void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
15043                      float* scond, float* amax, lapack_int *info );
15044 void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
15045                      lapack_int* lda, double* s, double* scond, double* amax,
15046                      lapack_int *info );
15047 void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
15048                      lapack_int* lda, float* s, float* scond, float* amax,
15049                      lapack_int *info );
15050 void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
15051                     float* scond, float* amax, lapack_int *info );
15052 void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
15053                     double* scond, double* amax, lapack_int *info );
15054 void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
15055                     float* s, float* scond, float* amax, lapack_int *info );
15056 void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
15057                     double* s, double* scond, double* amax, lapack_int *info );
15058 void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
15059                     lapack_int* ldab, float* s, float* scond, float* amax,
15060                     lapack_int *info );
15061 void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
15062                     lapack_int* ldab, double* s, double* scond, double* amax,
15063                     lapack_int *info );
15064 void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
15065                     const lapack_complex_float* ab, lapack_int* ldab, float* s,
15066                     float* scond, float* amax, lapack_int *info );
15067 void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
15068                     const lapack_complex_double* ab, lapack_int* ldab,
15069                     double* s, double* scond, double* amax, lapack_int *info );
15070 void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
15071                      lapack_int* lda, double* s, double* scond, double* amax,
15072                      double* work, lapack_int *info );
15073 void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
15074                      float* s, float* scond, float* amax, float* work,
15075                      lapack_int *info );
15076 void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
15077                      lapack_int* lda, double* s, double* scond, double* amax,
15078                      lapack_complex_double* work, lapack_int *info );
15079 void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
15080                      lapack_int* lda, float* s, float* scond, float* amax,
15081                      lapack_complex_float* work, lapack_int *info );
15082 void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
15083                      lapack_int* lda, double* s, double* scond, double* amax,
15084                      lapack_complex_double* work, lapack_int *info );
15085 void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
15086                      lapack_int* lda, float* s, float* scond, float* amax,
15087                      lapack_complex_float* work, lapack_int *info );
15088 void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
15089                    lapack_int* ipiv, float* b, lapack_int* ldb,
15090                    lapack_int *info );
15091 void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
15092                    lapack_int* ipiv, double* b, lapack_int* ldb,
15093                    lapack_int *info );
15094 void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
15095                    lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
15096                    lapack_int* ldb, lapack_int *info );
15097 void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
15098                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
15099                    lapack_int* ldb, lapack_int *info );
15100 void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
15101                     lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
15102                     lapack_int* ldx, double* work, float* swork,
15103                     lapack_int* iter, lapack_int *info );
15104 void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
15105                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
15106                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15107                     lapack_complex_double* work, lapack_complex_float* swork,
15108                     double* rwork, lapack_int* iter, lapack_int *info );
15109 void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15110                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15111                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
15112                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15113                     float* ferr, float* berr, float* work, lapack_int* iwork,
15114                     lapack_int *info );
15115 void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15116                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15117                     lapack_int* ipiv, char* equed, double* r, double* c,
15118                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15119                     double* rcond, double* ferr, double* berr, double* work,
15120                     lapack_int* iwork, lapack_int *info );
15121 void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15122                     lapack_complex_float* a, lapack_int* lda,
15123                     lapack_complex_float* af, lapack_int* ldaf,
15124                     lapack_int* ipiv, char* equed, float* r, float* c,
15125                     lapack_complex_float* b, lapack_int* ldb,
15126                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15127                     float* ferr, float* berr, lapack_complex_float* work,
15128                     float* rwork, lapack_int *info );
15129 void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15130                     lapack_complex_double* a, lapack_int* lda,
15131                     lapack_complex_double* af, lapack_int* ldaf,
15132                     lapack_int* ipiv, char* equed, double* r, double* c,
15133                     lapack_complex_double* b, lapack_int* ldb,
15134                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15135                     double* ferr, double* berr, lapack_complex_double* work,
15136                     double* rwork, lapack_int *info );
15137 void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15138                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15139                      lapack_int* ipiv, char* equed, double* r, double* c,
15140                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15141                      double* rcond, double* rpvgrw, double* berr,
15142                      lapack_int* n_err_bnds, double* err_bnds_norm,
15143                      double* err_bnds_comp, lapack_int* nparams, double* params,
15144                      double* work, lapack_int* iwork, lapack_int *info );
15145 void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15146                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15147                      lapack_int* ipiv, char* equed, float* r, float* c,
15148                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15149                      float* rcond, float* rpvgrw, float* berr,
15150                      lapack_int* n_err_bnds, float* err_bnds_norm,
15151                      float* err_bnds_comp, lapack_int* nparams, float* params,
15152                      float* work, lapack_int* iwork, lapack_int *info );
15153 void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15154                      lapack_complex_double* a, lapack_int* lda,
15155                      lapack_complex_double* af, lapack_int* ldaf,
15156                      lapack_int* ipiv, char* equed, double* r, double* c,
15157                      lapack_complex_double* b, lapack_int* ldb,
15158                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15159                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15160                      double* err_bnds_norm, double* err_bnds_comp,
15161                      lapack_int* nparams, double* params,
15162                      lapack_complex_double* work, double* rwork,
15163                      lapack_int *info );
15164 void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15165                      lapack_complex_float* a, lapack_int* lda,
15166                      lapack_complex_float* af, lapack_int* ldaf,
15167                      lapack_int* ipiv, char* equed, float* r, float* c,
15168                      lapack_complex_float* b, lapack_int* ldb,
15169                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15170                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15171                      float* err_bnds_norm, float* err_bnds_comp,
15172                      lapack_int* nparams, float* params,
15173                      lapack_complex_float* work, float* rwork,
15174                      lapack_int *info );
15175 void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15176                    lapack_int* nrhs, float* ab, lapack_int* ldab,
15177                    lapack_int* ipiv, float* b, lapack_int* ldb,
15178                    lapack_int *info );
15179 void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15180                    lapack_int* nrhs, double* ab, lapack_int* ldab,
15181                    lapack_int* ipiv, double* b, lapack_int* ldb,
15182                    lapack_int *info );
15183 void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15184                    lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
15185                    lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
15186                    lapack_int *info );
15187 void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15188                    lapack_int* nrhs, lapack_complex_double* ab,
15189                    lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
15190                    lapack_int* ldb, lapack_int *info );
15191 void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15192                     lapack_int* ku, lapack_int* nrhs, float* ab,
15193                     lapack_int* ldab, float* afb, lapack_int* ldafb,
15194                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
15195                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15196                     float* ferr, float* berr, float* work, lapack_int* iwork,
15197                     lapack_int *info );
15198 void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15199                     lapack_int* ku, lapack_int* nrhs, double* ab,
15200                     lapack_int* ldab, double* afb, lapack_int* ldafb,
15201                     lapack_int* ipiv, char* equed, double* r, double* c,
15202                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15203                     double* rcond, double* ferr, double* berr, double* work,
15204                     lapack_int* iwork, lapack_int *info );
15205 void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15206                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
15207                     lapack_int* ldab, lapack_complex_float* afb,
15208                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
15209                     float* c, lapack_complex_float* b, lapack_int* ldb,
15210                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15211                     float* ferr, float* berr, lapack_complex_float* work,
15212                     float* rwork, lapack_int *info );
15213 void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15214                     lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
15215                     lapack_int* ldab, lapack_complex_double* afb,
15216                     lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
15217                     double* c, lapack_complex_double* b, lapack_int* ldb,
15218                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15219                     double* ferr, double* berr, lapack_complex_double* work,
15220                     double* rwork, lapack_int *info );
15221 void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15222                      lapack_int* ku, lapack_int* nrhs, double* ab,
15223                      lapack_int* ldab, double* afb, lapack_int* ldafb,
15224                      lapack_int* ipiv, char* equed, double* r, double* c,
15225                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15226                      double* rcond, double* rpvgrw, double* berr,
15227                      lapack_int* n_err_bnds, double* err_bnds_norm,
15228                      double* err_bnds_comp, lapack_int* nparams, double* params,
15229                      double* work, lapack_int* iwork, lapack_int *info );
15230 void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15231                      lapack_int* ku, lapack_int* nrhs, float* ab,
15232                      lapack_int* ldab, float* afb, lapack_int* ldafb,
15233                      lapack_int* ipiv, char* equed, float* r, float* c,
15234                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15235                      float* rcond, float* rpvgrw, float* berr,
15236                      lapack_int* n_err_bnds, float* err_bnds_norm,
15237                      float* err_bnds_comp, lapack_int* nparams, float* params,
15238                      float* work, lapack_int* iwork, lapack_int *info );
15239 void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15240                      lapack_int* ku, lapack_int* nrhs,
15241                      lapack_complex_double* ab, lapack_int* ldab,
15242                      lapack_complex_double* afb, lapack_int* ldafb,
15243                      lapack_int* ipiv, char* equed, double* r, double* c,
15244                      lapack_complex_double* b, lapack_int* ldb,
15245                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15246                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15247                      double* err_bnds_norm, double* err_bnds_comp,
15248                      lapack_int* nparams, double* params,
15249                      lapack_complex_double* work, double* rwork,
15250                      lapack_int *info );
15251 void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15252                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
15253                      lapack_int* ldab, lapack_complex_float* afb,
15254                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
15255                      float* c, lapack_complex_float* b, lapack_int* ldb,
15256                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15257                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15258                      float* err_bnds_norm, float* err_bnds_comp,
15259                      lapack_int* nparams, float* params,
15260                      lapack_complex_float* work, float* rwork,
15261                      lapack_int *info );
15262 void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
15263                    float* du, float* b, lapack_int* ldb, lapack_int *info );
15264 void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
15265                    double* du, double* b, lapack_int* ldb, lapack_int *info );
15266 void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
15267                    lapack_complex_float* d, lapack_complex_float* du,
15268                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15269 void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
15270                    lapack_complex_double* d, lapack_complex_double* du,
15271                    lapack_complex_double* b, lapack_int* ldb,
15272                    lapack_int *info );
15273 void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15274                     const float* dl, const float* d, const float* du,
15275                     float* dlf, float* df, float* duf, float* du2,
15276                     lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
15277                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
15278                     float* work, lapack_int* iwork, lapack_int *info );
15279 void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15280                     const double* dl, const double* d, const double* du,
15281                     double* dlf, double* df, double* duf, double* du2,
15282                     lapack_int* ipiv, const double* b, lapack_int* ldb,
15283                     double* x, lapack_int* ldx, double* rcond, double* ferr,
15284                     double* berr, double* work, lapack_int* iwork,
15285                     lapack_int *info );
15286 void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15287                     const lapack_complex_float* dl,
15288                     const lapack_complex_float* d,
15289                     const lapack_complex_float* du, lapack_complex_float* dlf,
15290                     lapack_complex_float* df, lapack_complex_float* duf,
15291                     lapack_complex_float* du2, lapack_int* ipiv,
15292                     const lapack_complex_float* b, lapack_int* ldb,
15293                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15294                     float* ferr, float* berr, lapack_complex_float* work,
15295                     float* rwork, lapack_int *info );
15296 void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15297                     const lapack_complex_double* dl,
15298                     const lapack_complex_double* d,
15299                     const lapack_complex_double* du, lapack_complex_double* dlf,
15300                     lapack_complex_double* df, lapack_complex_double* duf,
15301                     lapack_complex_double* du2, lapack_int* ipiv,
15302                     const lapack_complex_double* b, lapack_int* ldb,
15303                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15304                     double* ferr, double* berr, lapack_complex_double* work,
15305                     double* rwork, lapack_int *info );
15306 void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
15307                    lapack_int* lda, float* b, lapack_int* ldb,
15308                    lapack_int *info );
15309 void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15310                    lapack_int* lda, double* b, lapack_int* ldb,
15311                    lapack_int *info );
15312 void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15313                    lapack_complex_float* a, lapack_int* lda,
15314                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15315 void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15316                    lapack_complex_double* a, lapack_int* lda,
15317                    lapack_complex_double* b, lapack_int* ldb,
15318                    lapack_int *info );
15319 void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15320                     lapack_int* lda, double* b, lapack_int* ldb, double* x,
15321                     lapack_int* ldx, double* work, float* swork,
15322                     lapack_int* iter, lapack_int *info );
15323 void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15324                     lapack_complex_double* a, lapack_int* lda,
15325                     lapack_complex_double* b, lapack_int* ldb,
15326                     lapack_complex_double* x, lapack_int* ldx,
15327                     lapack_complex_double* work, lapack_complex_float* swork,
15328                     double* rwork, lapack_int* iter, lapack_int *info );
15329 void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15330                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15331                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
15332                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
15333                     float* work, lapack_int* iwork, lapack_int *info );
15334 void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15335                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15336                     char* equed, double* s, double* b, lapack_int* ldb,
15337                     double* x, lapack_int* ldx, double* rcond, double* ferr,
15338                     double* berr, double* work, lapack_int* iwork,
15339                     lapack_int *info );
15340 void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15341                     lapack_complex_float* a, lapack_int* lda,
15342                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
15343                     float* s, lapack_complex_float* b, lapack_int* ldb,
15344                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15345                     float* ferr, float* berr, lapack_complex_float* work,
15346                     float* rwork, lapack_int *info );
15347 void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15348                     lapack_complex_double* a, lapack_int* lda,
15349                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
15350                     double* s, lapack_complex_double* b, lapack_int* ldb,
15351                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15352                     double* ferr, double* berr, lapack_complex_double* work,
15353                     double* rwork, lapack_int *info );
15354 void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15355                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15356                      char* equed, double* s, double* b, lapack_int* ldb,
15357                      double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
15358                      double* berr, lapack_int* n_err_bnds,
15359                      double* err_bnds_norm, double* err_bnds_comp,
15360                      lapack_int* nparams, double* params, double* work,
15361                      lapack_int* iwork, lapack_int *info );
15362 void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15363                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15364                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
15365                      lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
15366                      lapack_int* n_err_bnds, float* err_bnds_norm,
15367                      float* err_bnds_comp, lapack_int* nparams, float* params,
15368                      float* work, lapack_int* iwork, lapack_int *info );
15369 void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15370                      lapack_complex_double* a, lapack_int* lda,
15371                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
15372                      double* s, lapack_complex_double* b, lapack_int* ldb,
15373                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15374                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15375                      double* err_bnds_norm, double* err_bnds_comp,
15376                      lapack_int* nparams, double* params,
15377                      lapack_complex_double* work, double* rwork,
15378                      lapack_int *info );
15379 void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15380                      lapack_complex_float* a, lapack_int* lda,
15381                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
15382                      float* s, lapack_complex_float* b, lapack_int* ldb,
15383                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15384                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15385                      float* err_bnds_norm, float* err_bnds_comp,
15386                      lapack_int* nparams, float* params,
15387                      lapack_complex_float* work, float* rwork,
15388                      lapack_int *info );
15389 void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
15390                    float* b, lapack_int* ldb, lapack_int *info );
15391 void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
15392                    double* b, lapack_int* ldb, lapack_int *info );
15393 void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15394                    lapack_complex_float* ap, lapack_complex_float* b,
15395                    lapack_int* ldb, lapack_int *info );
15396 void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15397                    lapack_complex_double* ap, lapack_complex_double* b,
15398                    lapack_int* ldb, lapack_int *info );
15399 void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15400                     float* ap, float* afp, char* equed, float* s, float* b,
15401                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15402                     float* ferr, float* berr, float* work, lapack_int* iwork,
15403                     lapack_int *info );
15404 void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15405                     double* ap, double* afp, char* equed, double* s, double* b,
15406                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15407                     double* ferr, double* berr, double* work, lapack_int* iwork,
15408                     lapack_int *info );
15409 void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15410                     lapack_complex_float* ap, lapack_complex_float* afp,
15411                     char* equed, float* s, lapack_complex_float* b,
15412                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15413                     float* rcond, float* ferr, float* berr,
15414                     lapack_complex_float* work, float* rwork,
15415                     lapack_int *info );
15416 void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15417                     lapack_complex_double* ap, lapack_complex_double* afp,
15418                     char* equed, double* s, lapack_complex_double* b,
15419                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15420                     double* rcond, double* ferr, double* berr,
15421                     lapack_complex_double* work, double* rwork,
15422                     lapack_int *info );
15423 void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15424                    float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
15425                    lapack_int *info );
15426 void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15427                    double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
15428                    lapack_int *info );
15429 void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15430                    lapack_complex_float* ab, lapack_int* ldab,
15431                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15432 void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15433                    lapack_complex_double* ab, lapack_int* ldab,
15434                    lapack_complex_double* b, lapack_int* ldb,
15435                    lapack_int *info );
15436 void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15437                     lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
15438                     lapack_int* ldafb, char* equed, float* s, float* b,
15439                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15440                     float* ferr, float* berr, float* work, lapack_int* iwork,
15441                     lapack_int *info );
15442 void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15443                     lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
15444                     lapack_int* ldafb, char* equed, double* s, double* b,
15445                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15446                     double* ferr, double* berr, double* work, lapack_int* iwork,
15447                     lapack_int *info );
15448 void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15449                     lapack_int* nrhs, lapack_complex_float* ab,
15450                     lapack_int* ldab, lapack_complex_float* afb,
15451                     lapack_int* ldafb, char* equed, float* s,
15452                     lapack_complex_float* b, lapack_int* ldb,
15453                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15454                     float* ferr, float* berr, lapack_complex_float* work,
15455                     float* rwork, lapack_int *info );
15456 void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15457                     lapack_int* nrhs, lapack_complex_double* ab,
15458                     lapack_int* ldab, lapack_complex_double* afb,
15459                     lapack_int* ldafb, char* equed, double* s,
15460                     lapack_complex_double* b, lapack_int* ldb,
15461                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15462                     double* ferr, double* berr, lapack_complex_double* work,
15463                     double* rwork, lapack_int *info );
15464 void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
15465                    float* b, lapack_int* ldb, lapack_int *info );
15466 void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
15467                    double* b, lapack_int* ldb, lapack_int *info );
15468 void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
15469                    lapack_complex_float* e, lapack_complex_float* b,
15470                    lapack_int* ldb, lapack_int *info );
15471 void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
15472                    lapack_complex_double* e, lapack_complex_double* b,
15473                    lapack_int* ldb, lapack_int *info );
15474 void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
15475                     const float* e, float* df, float* ef, const float* b,
15476                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15477                     float* ferr, float* berr, float* work, lapack_int *info );
15478 void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
15479                     const double* d, const double* e, double* df, double* ef,
15480                     const double* b, lapack_int* ldb, double* x,
15481                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
15482                     double* work, lapack_int *info );
15483 void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
15484                     const lapack_complex_float* e, float* df,
15485                     lapack_complex_float* ef, const lapack_complex_float* b,
15486                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15487                     float* rcond, float* ferr, float* berr,
15488                     lapack_complex_float* work, float* rwork,
15489                     lapack_int *info );
15490 void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
15491                     const double* d, const lapack_complex_double* e, double* df,
15492                     lapack_complex_double* ef, const lapack_complex_double* b,
15493                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15494                     double* rcond, double* ferr, double* berr,
15495                     lapack_complex_double* work, double* rwork,
15496                     lapack_int *info );
15497 void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
15498                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
15499                    float* work, lapack_int* lwork, lapack_int *info );
15500 void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15501                    lapack_int* lda, lapack_int* ipiv, double* b,
15502                    lapack_int* ldb, double* work, lapack_int* lwork,
15503                    lapack_int *info );
15504 void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
15505                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
15506                    lapack_complex_float* b, lapack_int* ldb,
15507                    lapack_complex_float* work, lapack_int* lwork,
15508                    lapack_int *info );
15509 void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
15510                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
15511                    lapack_complex_double* b, lapack_int* ldb,
15512                    lapack_complex_double* work, lapack_int* lwork,
15513                    lapack_int *info );
15514 void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15515                     const float* a, lapack_int* lda, float* af,
15516                     lapack_int* ldaf, lapack_int* ipiv, const float* b,
15517                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15518                     float* ferr, float* berr, float* work, lapack_int* lwork,
15519                     lapack_int* iwork, lapack_int *info );
15520 void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15521                     const double* a, lapack_int* lda, double* af,
15522                     lapack_int* ldaf, lapack_int* ipiv, const double* b,
15523                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15524                     double* ferr, double* berr, double* work, lapack_int* lwork,
15525                     lapack_int* iwork, lapack_int *info );
15526 void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15527                     const lapack_complex_float* a, lapack_int* lda,
15528                     lapack_complex_float* af, lapack_int* ldaf,
15529                     lapack_int* ipiv, const lapack_complex_float* b,
15530                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15531                     float* rcond, float* ferr, float* berr,
15532                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15533                     lapack_int *info );
15534 void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15535                     const lapack_complex_double* a, lapack_int* lda,
15536                     lapack_complex_double* af, lapack_int* ldaf,
15537                     lapack_int* ipiv, const lapack_complex_double* b,
15538                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15539                     double* rcond, double* ferr, double* berr,
15540                     lapack_complex_double* work, lapack_int* lwork,
15541                     double* rwork, lapack_int *info );
15542 void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15543                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15544                      lapack_int* ipiv, char* equed, double* s, double* b,
15545                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15546                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15547                      double* err_bnds_norm, double* err_bnds_comp,
15548                      lapack_int* nparams, double* params, double* work,
15549                      lapack_int* iwork, lapack_int *info );
15550 void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15551                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15552                      lapack_int* ipiv, char* equed, float* s, float* b,
15553                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15554                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15555                      float* err_bnds_norm, float* err_bnds_comp,
15556                      lapack_int* nparams, float* params, float* work,
15557                      lapack_int* iwork, lapack_int *info );
15558 void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15559                      lapack_complex_double* a, lapack_int* lda,
15560                      lapack_complex_double* af, lapack_int* ldaf,
15561                      lapack_int* ipiv, char* equed, double* s,
15562                      lapack_complex_double* b, lapack_int* ldb,
15563                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15564                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15565                      double* err_bnds_norm, double* err_bnds_comp,
15566                      lapack_int* nparams, double* params,
15567                      lapack_complex_double* work, double* rwork,
15568                      lapack_int *info );
15569 void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15570                      lapack_complex_float* a, lapack_int* lda,
15571                      lapack_complex_float* af, lapack_int* ldaf,
15572                      lapack_int* ipiv, char* equed, float* s,
15573                      lapack_complex_float* b, lapack_int* ldb,
15574                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15575                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15576                      float* err_bnds_norm, float* err_bnds_comp,
15577                      lapack_int* nparams, float* params,
15578                      lapack_complex_float* work, float* rwork,
15579                      lapack_int *info );
15580 void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
15581                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
15582                    lapack_complex_float* b, lapack_int* ldb,
15583                    lapack_complex_float* work, lapack_int* lwork,
15584                    lapack_int *info );
15585 void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
15586                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
15587                    lapack_complex_double* b, lapack_int* ldb,
15588                    lapack_complex_double* work, lapack_int* lwork,
15589                    lapack_int *info );
15590 void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15591                     const lapack_complex_float* a, lapack_int* lda,
15592                     lapack_complex_float* af, lapack_int* ldaf,
15593                     lapack_int* ipiv, const lapack_complex_float* b,
15594                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15595                     float* rcond, float* ferr, float* berr,
15596                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15597                     lapack_int *info );
15598 void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15599                     const lapack_complex_double* a, lapack_int* lda,
15600                     lapack_complex_double* af, lapack_int* ldaf,
15601                     lapack_int* ipiv, const lapack_complex_double* b,
15602                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15603                     double* rcond, double* ferr, double* berr,
15604                     lapack_complex_double* work, lapack_int* lwork,
15605                     double* rwork, lapack_int *info );
15606 void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15607                      lapack_complex_double* a, lapack_int* lda,
15608                      lapack_complex_double* af, lapack_int* ldaf,
15609                      lapack_int* ipiv, char* equed, double* s,
15610                      lapack_complex_double* b, lapack_int* ldb,
15611                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15612                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15613                      double* err_bnds_norm, double* err_bnds_comp,
15614                      lapack_int* nparams, double* params,
15615                      lapack_complex_double* work, double* rwork,
15616                      lapack_int *info );
15617 void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15618                      lapack_complex_float* a, lapack_int* lda,
15619                      lapack_complex_float* af, lapack_int* ldaf,
15620                      lapack_int* ipiv, char* equed, float* s,
15621                      lapack_complex_float* b, lapack_int* ldb,
15622                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15623                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15624                      float* err_bnds_norm, float* err_bnds_comp,
15625                      lapack_int* nparams, float* params,
15626                      lapack_complex_float* work, float* rwork,
15627                      lapack_int *info );
15628 void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
15629                    lapack_int* ipiv, float* b, lapack_int* ldb,
15630                    lapack_int *info );
15631 void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
15632                    lapack_int* ipiv, double* b, lapack_int* ldb,
15633                    lapack_int *info );
15634 void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15635                    lapack_complex_float* ap, lapack_int* ipiv,
15636                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15637 void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15638                    lapack_complex_double* ap, lapack_int* ipiv,
15639                    lapack_complex_double* b, lapack_int* ldb,
15640                    lapack_int *info );
15641 void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15642                     const float* ap, float* afp, lapack_int* ipiv,
15643                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15644                     float* rcond, float* ferr, float* berr, float* work,
15645                     lapack_int* iwork, lapack_int *info );
15646 void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15647                     const double* ap, double* afp, lapack_int* ipiv,
15648                     const double* b, lapack_int* ldb, double* x,
15649                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
15650                     double* work, lapack_int* iwork, lapack_int *info );
15651 void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15652                     const lapack_complex_float* ap, lapack_complex_float* afp,
15653                     lapack_int* ipiv, const lapack_complex_float* b,
15654                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15655                     float* rcond, float* ferr, float* berr,
15656                     lapack_complex_float* work, float* rwork,
15657                     lapack_int *info );
15658 void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15659                     const lapack_complex_double* ap, lapack_complex_double* afp,
15660                     lapack_int* ipiv, const lapack_complex_double* b,
15661                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15662                     double* rcond, double* ferr, double* berr,
15663                     lapack_complex_double* work, double* rwork,
15664                     lapack_int *info );
15665 void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15666                    lapack_complex_float* ap, lapack_int* ipiv,
15667                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15668 void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15669                    lapack_complex_double* ap, lapack_int* ipiv,
15670                    lapack_complex_double* b, lapack_int* ldb,
15671                    lapack_int *info );
15672 void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15673                     const lapack_complex_float* ap, lapack_complex_float* afp,
15674                     lapack_int* ipiv, const lapack_complex_float* b,
15675                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15676                     float* rcond, float* ferr, float* berr,
15677                     lapack_complex_float* work, float* rwork,
15678                     lapack_int *info );
15679 void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15680                     const lapack_complex_double* ap, lapack_complex_double* afp,
15681                     lapack_int* ipiv, const lapack_complex_double* b,
15682                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15683                     double* rcond, double* ferr, double* berr,
15684                     lapack_complex_double* work, double* rwork,
15685                     lapack_int *info );
15686 void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15687                     float* tau, float* work, lapack_int* lwork,
15688                     lapack_int *info );
15689 void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15690                     double* tau, double* work, lapack_int* lwork,
15691                     lapack_int *info );
15692 void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15693                     lapack_int* lda, lapack_complex_float* tau,
15694                     lapack_complex_float* work, lapack_int* lwork,
15695                     lapack_int *info );
15696 void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15697                     lapack_int* lda, lapack_complex_double* tau,
15698                     lapack_complex_double* work, lapack_int* lwork,
15699                     lapack_int *info );
15700 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15701                     lapack_int* jpvt, float* tau, float* work,
15702                     lapack_int *info );
15703 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15704                     lapack_int* jpvt, double* tau, double* work,
15705                     lapack_int *info );
15706 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15707                     lapack_int* lda, lapack_int* jpvt,
15708                     lapack_complex_float* tau, lapack_complex_float* work,
15709                     float* rwork, lapack_int *info );
15710 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15711                     lapack_int* lda, lapack_int* jpvt,
15712                     lapack_complex_double* tau, lapack_complex_double* work,
15713                     double* rwork, lapack_int *info );
15714 void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15715                     lapack_int* jpvt, float* tau, float* work,
15716                     lapack_int* lwork, lapack_int *info );
15717 void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15718                     lapack_int* jpvt, double* tau, double* work,
15719                     lapack_int* lwork, lapack_int *info );
15720 void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15721                     lapack_int* lda, lapack_int* jpvt,
15722                     lapack_complex_float* tau, lapack_complex_float* work,
15723                     lapack_int* lwork, float* rwork, lapack_int *info );
15724 void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15725                     lapack_int* lda, lapack_int* jpvt,
15726                     lapack_complex_double* tau, lapack_complex_double* work,
15727                     lapack_int* lwork, double* rwork, lapack_int *info );
15728 void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15729                     lapack_int* lda, const float* tau, float* work,
15730                     lapack_int* lwork, lapack_int *info );
15731 void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15732                     lapack_int* lda, const double* tau, double* work,
15733                     lapack_int* lwork, lapack_int *info );
15734 void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15735                     lapack_int* k, const float* a, lapack_int* lda,
15736                     const float* tau, float* c, lapack_int* ldc, float* work,
15737                     lapack_int* lwork, lapack_int *info );
15738 void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15739                     lapack_int* k, const double* a, lapack_int* lda,
15740                     const double* tau, double* c, lapack_int* ldc, double* work,
15741                     lapack_int* lwork, lapack_int *info );
15742 void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
15743                     lapack_complex_float* a, lapack_int* lda,
15744                     const lapack_complex_float* tau, lapack_complex_float* work,
15745                     lapack_int* lwork, lapack_int *info );
15746 void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
15747                     lapack_complex_double* a, lapack_int* lda,
15748                     const lapack_complex_double* tau,
15749                     lapack_complex_double* work, lapack_int* lwork,
15750                     lapack_int *info );
15751 void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15752                     lapack_int* k, const lapack_complex_float* a,
15753                     lapack_int* lda, const lapack_complex_float* tau,
15754                     lapack_complex_float* c, lapack_int* ldc,
15755                     lapack_complex_float* work, lapack_int* lwork,
15756                     lapack_int *info );
15757 void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15758                     lapack_int* k, const lapack_complex_double* a,
15759                     lapack_int* lda, const lapack_complex_double* tau,
15760                     lapack_complex_double* c, lapack_int* ldc,
15761                     lapack_complex_double* work, lapack_int* lwork,
15762                     lapack_int *info );
15763 void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15764                     float* tau, float* work, lapack_int* lwork,
15765                     lapack_int *info );
15766 void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15767                     double* tau, double* work, lapack_int* lwork,
15768                     lapack_int *info );
15769 void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15770                     lapack_int* lda, lapack_complex_float* tau,
15771                     lapack_complex_float* work, lapack_int* lwork,
15772                     lapack_int *info );
15773 void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15774                     lapack_int* lda, lapack_complex_double* tau,
15775                     lapack_complex_double* work, lapack_int* lwork,
15776                     lapack_int *info );
15777 void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15778                     lapack_int* lda, const float* tau, float* work,
15779                     lapack_int* lwork, lapack_int *info );
15780 void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15781                     lapack_int* lda, const double* tau, double* work,
15782                     lapack_int* lwork, lapack_int *info );
15783 void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15784                     lapack_int* k, const float* a, lapack_int* lda,
15785                     const float* tau, float* c, lapack_int* ldc, float* work,
15786                     lapack_int* lwork, lapack_int *info );
15787 void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15788                     lapack_int* k, const double* a, lapack_int* lda,
15789                     const double* tau, double* c, lapack_int* ldc, double* work,
15790                     lapack_int* lwork, lapack_int *info );
15791 void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
15792                     lapack_complex_float* a, lapack_int* lda,
15793                     const lapack_complex_float* tau, lapack_complex_float* work,
15794                     lapack_int* lwork, lapack_int *info );
15795 void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
15796                     lapack_complex_double* a, lapack_int* lda,
15797                     const lapack_complex_double* tau,
15798                     lapack_complex_double* work, lapack_int* lwork,
15799                     lapack_int *info );
15800 void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15801                     lapack_int* k, const lapack_complex_float* a,
15802                     lapack_int* lda, const lapack_complex_float* tau,
15803                     lapack_complex_float* c, lapack_int* ldc,
15804                     lapack_complex_float* work, lapack_int* lwork,
15805                     lapack_int *info );
15806 void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15807                     lapack_int* k, const lapack_complex_double* a,
15808                     lapack_int* lda, const lapack_complex_double* tau,
15809                     lapack_complex_double* c, lapack_int* ldc,
15810                     lapack_complex_double* work, lapack_int* lwork,
15811                     lapack_int *info );
15812 void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15813                     float* tau, float* work, lapack_int* lwork,
15814                     lapack_int *info );
15815 void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15816                     double* tau, double* work, lapack_int* lwork,
15817                     lapack_int *info );
15818 void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15819                     lapack_int* lda, lapack_complex_float* tau,
15820                     lapack_complex_float* work, lapack_int* lwork,
15821                     lapack_int *info );
15822 void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15823                     lapack_int* lda, lapack_complex_double* tau,
15824                     lapack_complex_double* work, lapack_int* lwork,
15825                     lapack_int *info );
15826 void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15827                     lapack_int* lda, const float* tau, float* work,
15828                     lapack_int* lwork, lapack_int *info );
15829 void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15830                     lapack_int* lda, const double* tau, double* work,
15831                     lapack_int* lwork, lapack_int *info );
15832 void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
15833                     lapack_complex_float* a, lapack_int* lda,
15834                     const lapack_complex_float* tau, lapack_complex_float* work,
15835                     lapack_int* lwork, lapack_int *info );
15836 void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
15837                     lapack_complex_double* a, lapack_int* lda,
15838                     const lapack_complex_double* tau,
15839                     lapack_complex_double* work, lapack_int* lwork,
15840                     lapack_int *info );
15841 void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
15842                     lapack_int* k, const float* a, lapack_int* lda,
15843                     const float* tau, float* c, lapack_int* ldc, float* work,
15844                     lapack_int* lwork, lapack_int *info );
15845 void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
15846                     lapack_int* k, const double* a, lapack_int* lda,
15847                     const double* tau, double* c, lapack_int* ldc, double* work,
15848                     lapack_int* lwork, lapack_int *info );
15849 void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
15850                     lapack_int* k, const lapack_complex_float* a,
15851                     lapack_int* lda, const lapack_complex_float* tau,
15852                     lapack_complex_float* c, lapack_int* ldc,
15853                     lapack_complex_float* work, lapack_int* lwork,
15854                     lapack_int *info );
15855 void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
15856                     lapack_int* k, const lapack_complex_double* a,
15857                     lapack_int* lda, const lapack_complex_double* tau,
15858                     lapack_complex_double* c, lapack_int* ldc,
15859                     lapack_complex_double* work, lapack_int* lwork,
15860                     lapack_int *info );
15861 void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15862                     float* tau, float* work, lapack_int* lwork,
15863                     lapack_int *info );
15864 void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15865                     double* tau, double* work, lapack_int* lwork,
15866                     lapack_int *info );
15867 void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15868                     lapack_int* lda, lapack_complex_float* tau,
15869                     lapack_complex_float* work, lapack_int* lwork,
15870                     lapack_int *info );
15871 void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15872                     lapack_int* lda, lapack_complex_double* tau,
15873                     lapack_complex_double* work, lapack_int* lwork,
15874                     lapack_int *info );
15875 void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15876                     lapack_int* lda, const float* tau, float* work,
15877                     lapack_int* lwork, lapack_int *info );
15878 void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15879                     lapack_int* lda, const double* tau, double* work,
15880                     lapack_int* lwork, lapack_int *info );
15881 void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
15882                     lapack_complex_float* a, lapack_int* lda,
15883                     const lapack_complex_float* tau, lapack_complex_float* work,
15884                     lapack_int* lwork, lapack_int *info );
15885 void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
15886                     lapack_complex_double* a, lapack_int* lda,
15887                     const lapack_complex_double* tau,
15888                     lapack_complex_double* work, lapack_int* lwork,
15889                     lapack_int *info );
15890 void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15891                     lapack_int* k, const float* a, lapack_int* lda,
15892                     const float* tau, float* c, lapack_int* ldc, float* work,
15893                     lapack_int* lwork, lapack_int *info );
15894 void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15895                     lapack_int* k, const double* a, lapack_int* lda,
15896                     const double* tau, double* c, lapack_int* ldc, double* work,
15897                     lapack_int* lwork, lapack_int *info );
15898 void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15899                     lapack_int* k, const lapack_complex_float* a,
15900                     lapack_int* lda, const lapack_complex_float* tau,
15901                     lapack_complex_float* c, lapack_int* ldc,
15902                     lapack_complex_float* work, lapack_int* lwork,
15903                     lapack_int *info );
15904 void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15905                     lapack_int* k, const lapack_complex_double* a,
15906                     lapack_int* lda, const lapack_complex_double* tau,
15907                     lapack_complex_double* c, lapack_int* ldc,
15908                     lapack_complex_double* work, lapack_int* lwork,
15909                     lapack_int *info );
15910 void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15911                     float* tau, float* work, lapack_int* lwork,
15912                     lapack_int *info );
15913 void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15914                     double* tau, double* work, lapack_int* lwork,
15915                     lapack_int *info );
15916 void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15917                     lapack_int* lda, lapack_complex_float* tau,
15918                     lapack_complex_float* work, lapack_int* lwork,
15919                     lapack_int *info );
15920 void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15921                     lapack_int* lda, lapack_complex_double* tau,
15922                     lapack_complex_double* work, lapack_int* lwork,
15923                     lapack_int *info );
15924 void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15925                     lapack_int* k, lapack_int* l, const float* a,
15926                     lapack_int* lda, const float* tau, float* c,
15927                     lapack_int* ldc, float* work, lapack_int* lwork,
15928                     lapack_int *info );
15929 void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15930                     lapack_int* k, lapack_int* l, const double* a,
15931                     lapack_int* lda, const double* tau, double* c,
15932                     lapack_int* ldc, double* work, lapack_int* lwork,
15933                     lapack_int *info );
15934 void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15935                     lapack_int* k, lapack_int* l, const lapack_complex_float* a,
15936                     lapack_int* lda, const lapack_complex_float* tau,
15937                     lapack_complex_float* c, lapack_int* ldc,
15938                     lapack_complex_float* work, lapack_int* lwork,
15939                     lapack_int *info );
15940 void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15941                     lapack_int* k, lapack_int* l,
15942                     const lapack_complex_double* a, lapack_int* lda,
15943                     const lapack_complex_double* tau, lapack_complex_double* c,
15944                     lapack_int* ldc, lapack_complex_double* work,
15945                     lapack_int* lwork, lapack_int *info );
15946 void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
15947                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15948                     float* taub, float* work, lapack_int* lwork,
15949                     lapack_int *info );
15950 void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
15951                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15952                     double* taub, double* work, lapack_int* lwork,
15953                     lapack_int *info );
15954 void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15955                     lapack_complex_float* a, lapack_int* lda,
15956                     lapack_complex_float* taua, lapack_complex_float* b,
15957                     lapack_int* ldb, lapack_complex_float* taub,
15958                     lapack_complex_float* work, lapack_int* lwork,
15959                     lapack_int *info );
15960 void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15961                     lapack_complex_double* a, lapack_int* lda,
15962                     lapack_complex_double* taua, lapack_complex_double* b,
15963                     lapack_int* ldb, lapack_complex_double* taub,
15964                     lapack_complex_double* work, lapack_int* lwork,
15965                     lapack_int *info );
15966 void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
15967                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15968                     float* taub, float* work, lapack_int* lwork,
15969                     lapack_int *info );
15970 void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
15971                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15972                     double* taub, double* work, lapack_int* lwork,
15973                     lapack_int *info );
15974 void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15975                     lapack_complex_float* a, lapack_int* lda,
15976                     lapack_complex_float* taua, lapack_complex_float* b,
15977                     lapack_int* ldb, lapack_complex_float* taub,
15978                     lapack_complex_float* work, lapack_int* lwork,
15979                     lapack_int *info );
15980 void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15981                     lapack_complex_double* a, lapack_int* lda,
15982                     lapack_complex_double* taua, lapack_complex_double* b,
15983                     lapack_int* ldb, lapack_complex_double* taub,
15984                     lapack_complex_double* work, lapack_int* lwork,
15985                     lapack_int *info );
15986 void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15987                     float* d, float* e, float* tauq, float* taup, float* work,
15988                     lapack_int* lwork, lapack_int *info );
15989 void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15990                     double* d, double* e, double* tauq, double* taup,
15991                     double* work, lapack_int* lwork, lapack_int *info );
15992 void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15993                     lapack_int* lda, float* d, float* e,
15994                     lapack_complex_float* tauq, lapack_complex_float* taup,
15995                     lapack_complex_float* work, lapack_int* lwork,
15996                     lapack_int *info );
15997 void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15998                     lapack_int* lda, double* d, double* e,
15999                     lapack_complex_double* tauq, lapack_complex_double* taup,
16000                     lapack_complex_double* work, lapack_int* lwork,
16001                     lapack_int *info );
16002 void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16003                     lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
16004                     float* d, float* e, float* q, lapack_int* ldq, float* pt,
16005                     lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
16006                     lapack_int *info );
16007 void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16008                     lapack_int* kl, lapack_int* ku, double* ab,
16009                     lapack_int* ldab, double* d, double* e, double* q,
16010                     lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
16011                     lapack_int* ldc, double* work, lapack_int *info );
16012 void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16013                     lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
16014                     lapack_int* ldab, float* d, float* e,
16015                     lapack_complex_float* q, lapack_int* ldq,
16016                     lapack_complex_float* pt, lapack_int* ldpt,
16017                     lapack_complex_float* c, lapack_int* ldc,
16018                     lapack_complex_float* work, float* rwork,
16019                     lapack_int *info );
16020 void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16021                     lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
16022                     lapack_int* ldab, double* d, double* e,
16023                     lapack_complex_double* q, lapack_int* ldq,
16024                     lapack_complex_double* pt, lapack_int* ldpt,
16025                     lapack_complex_double* c, lapack_int* ldc,
16026                     lapack_complex_double* work, double* rwork,
16027                     lapack_int *info );
16028 void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16029                     float* a, lapack_int* lda, const float* tau, float* work,
16030                     lapack_int* lwork, lapack_int *info );
16031 void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16032                     double* a, lapack_int* lda, const double* tau, double* work,
16033                     lapack_int* lwork, lapack_int *info );
16034 void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
16035                     lapack_int* n, lapack_int* k, const float* a,
16036                     lapack_int* lda, const float* tau, float* c,
16037                     lapack_int* ldc, float* work, lapack_int* lwork,
16038                     lapack_int *info );
16039 void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
16040                     lapack_int* n, lapack_int* k, const double* a,
16041                     lapack_int* lda, const double* tau, double* c,
16042                     lapack_int* ldc, double* work, lapack_int* lwork,
16043                     lapack_int *info );
16044 void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16045                     lapack_complex_float* a, lapack_int* lda,
16046                     const lapack_complex_float* tau, lapack_complex_float* work,
16047                     lapack_int* lwork, lapack_int *info );
16048 void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16049                     lapack_complex_double* a, lapack_int* lda,
16050                     const lapack_complex_double* tau,
16051                     lapack_complex_double* work, lapack_int* lwork,
16052                     lapack_int *info );
16053 void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
16054                     lapack_int* n, lapack_int* k, const lapack_complex_float* a,
16055                     lapack_int* lda, const lapack_complex_float* tau,
16056                     lapack_complex_float* c, lapack_int* ldc,
16057                     lapack_complex_float* work, lapack_int* lwork,
16058                     lapack_int *info );
16059 void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
16060                     lapack_int* n, lapack_int* k,
16061                     const lapack_complex_double* a, lapack_int* lda,
16062                     const lapack_complex_double* tau, lapack_complex_double* c,
16063                     lapack_int* ldc, lapack_complex_double* work,
16064                     lapack_int* lwork, lapack_int *info );
16065 void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16066                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
16067                     float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
16068                     float* c, lapack_int* ldc, float* work, lapack_int *info );
16069 void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16070                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
16071                     double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
16072                     double* c, lapack_int* ldc, double* work,
16073                     lapack_int *info );
16074 void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16075                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
16076                     lapack_complex_float* vt, lapack_int* ldvt,
16077                     lapack_complex_float* u, lapack_int* ldu,
16078                     lapack_complex_float* c, lapack_int* ldc, float* work,
16079                     lapack_int *info );
16080 void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16081                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
16082                     lapack_complex_double* vt, lapack_int* ldvt,
16083                     lapack_complex_double* u, lapack_int* ldu,
16084                     lapack_complex_double* c, lapack_int* ldc, double* work,
16085                     lapack_int *info );
16086 void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
16087                     float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
16088                     float* q, lapack_int* iq, float* work, lapack_int* iwork,
16089                     lapack_int *info );
16090 void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
16091                     double* e, double* u, lapack_int* ldu, double* vt,
16092                     lapack_int* ldvt, double* q, lapack_int* iq, double* work,
16093                     lapack_int* iwork, lapack_int *info );
16094 void LAPACK_sbdsvdx( char* uplo, char* jobz, char* range,
16095                      lapack_int* n, float* d, float* e,
16096                      float* vl, float* vu,
16097                      lapack_int* il, lapack_int* iu, lapack_int* ns,
16098                      float* s, float* z, lapack_int* ldz,
16099                      float* work, lapack_int *iwork, lapack_int *info );
16100 void LAPACK_dbdsvdx( char* uplo, char* jobz, char* range,
16101                      lapack_int* n, double* d, double* e,
16102                      double* vl, double* vu,
16103                      lapack_int* il, lapack_int* iu, lapack_int* ns,
16104                      double* s, double* z, lapack_int* ldz,
16105                      double* work, lapack_int *iwork, lapack_int *info );
16106 void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
16107                     float* d, float* e, float* tau, float* work,
16108                     lapack_int* lwork, lapack_int *info );
16109 void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
16110                     double* d, double* e, double* tau, double* work,
16111                     lapack_int* lwork, lapack_int *info );
16112 void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
16113                     const float* tau, float* work, lapack_int* lwork,
16114                     lapack_int *info );
16115 void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
16116                     const double* tau, double* work, lapack_int* lwork,
16117                     lapack_int *info );
16118 void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
16119                     lapack_int* n, const float* a, lapack_int* lda,
16120                     const float* tau, float* c, lapack_int* ldc, float* work,
16121                     lapack_int* lwork, lapack_int *info );
16122 void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
16123                     lapack_int* n, const double* a, lapack_int* lda,
16124                     const double* tau, double* c, lapack_int* ldc, double* work,
16125                     lapack_int* lwork, lapack_int *info );
16126 void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
16127                     lapack_int* lda, float* d, float* e,
16128                     lapack_complex_float* tau, lapack_complex_float* work,
16129                     lapack_int* lwork, lapack_int *info );
16130 void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
16131                     lapack_int* lda, double* d, double* e,
16132                     lapack_complex_double* tau, lapack_complex_double* work,
16133                     lapack_int* lwork, lapack_int *info );
16134 void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
16135                     lapack_int* lda, const lapack_complex_float* tau,
16136                     lapack_complex_float* work, lapack_int* lwork,
16137                     lapack_int *info );
16138 void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
16139                     lapack_int* lda, const lapack_complex_double* tau,
16140                     lapack_complex_double* work, lapack_int* lwork,
16141                     lapack_int *info );
16142 void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
16143                     lapack_int* n, const lapack_complex_float* a,
16144                     lapack_int* lda, const lapack_complex_float* tau,
16145                     lapack_complex_float* c, lapack_int* ldc,
16146                     lapack_complex_float* work, lapack_int* lwork,
16147                     lapack_int *info );
16148 void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
16149                     lapack_int* n, const lapack_complex_double* a,
16150                     lapack_int* lda, const lapack_complex_double* tau,
16151                     lapack_complex_double* c, lapack_int* ldc,
16152                     lapack_complex_double* work, lapack_int* lwork,
16153                     lapack_int *info );
16154 void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
16155                     float* tau, lapack_int *info );
16156 void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
16157                     double* tau, lapack_int *info );
16158 void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
16159                     const float* tau, float* q, lapack_int* ldq, float* work,
16160                     lapack_int *info );
16161 void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
16162                     const double* tau, double* q, lapack_int* ldq, double* work,
16163                     lapack_int *info );
16164 void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
16165                     lapack_int* n, const float* ap, const float* tau, float* c,
16166                     lapack_int* ldc, float* work, lapack_int *info );
16167 void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
16168                     lapack_int* n, const double* ap, const double* tau,
16169                     double* c, lapack_int* ldc, double* work,
16170                     lapack_int *info );
16171 void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
16172                     float* d, float* e, lapack_complex_float* tau,
16173                     lapack_int *info );
16174 void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
16175                     double* d, double* e, lapack_complex_double* tau,
16176                     lapack_int *info );
16177 void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
16178                     const lapack_complex_float* tau, lapack_complex_float* q,
16179                     lapack_int* ldq, lapack_complex_float* work,
16180                     lapack_int *info );
16181 void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
16182                     const lapack_complex_double* tau, lapack_complex_double* q,
16183                     lapack_int* ldq, lapack_complex_double* work,
16184                     lapack_int *info );
16185 void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
16186                     lapack_int* n, const lapack_complex_float* ap,
16187                     const lapack_complex_float* tau, lapack_complex_float* c,
16188                     lapack_int* ldc, lapack_complex_float* work,
16189                     lapack_int *info );
16190 void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
16191                     lapack_int* n, const lapack_complex_double* ap,
16192                     const lapack_complex_double* tau, lapack_complex_double* c,
16193                     lapack_int* ldc, lapack_complex_double* work,
16194                     lapack_int *info );
16195 void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16196                     float* ab, lapack_int* ldab, float* d, float* e, float* q,
16197                     lapack_int* ldq, float* work, lapack_int *info );
16198 void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16199                     double* ab, lapack_int* ldab, double* d, double* e,
16200                     double* q, lapack_int* ldq, double* work,
16201                     lapack_int *info );
16202 void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16203                     lapack_complex_float* ab, lapack_int* ldab, float* d,
16204                     float* e, lapack_complex_float* q, lapack_int* ldq,
16205                     lapack_complex_float* work, lapack_int *info );
16206 void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16207                     lapack_complex_double* ab, lapack_int* ldab, double* d,
16208                     double* e, lapack_complex_double* q, lapack_int* ldq,
16209                     lapack_complex_double* work, lapack_int *info );
16210 void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
16211 void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
16212 void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
16213                     lapack_int* ldz, float* work, lapack_int *info );
16214 void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
16215                     lapack_int* ldz, double* work, lapack_int *info );
16216 void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
16217                     lapack_complex_float* z, lapack_int* ldz, float* work,
16218                     lapack_int *info );
16219 void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
16220                     lapack_complex_double* z, lapack_int* ldz, double* work,
16221                     lapack_int *info );
16222 void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16223                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16224                     lapack_int* m, float* w, float* z, lapack_int* ldz,
16225                     lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
16226                     float* work, lapack_int* lwork, lapack_int* iwork,
16227                     lapack_int* liwork, lapack_int *info );
16228 void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
16229                     double* e, double* vl, double* vu, lapack_int* il,
16230                     lapack_int* iu, lapack_int* m, double* w, double* z,
16231                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
16232                     lapack_logical* tryrac, double* work, lapack_int* lwork,
16233                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16234 void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16235                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16236                     lapack_int* m, float* w, lapack_complex_float* z,
16237                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
16238                     lapack_logical* tryrac, float* work, lapack_int* lwork,
16239                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16240 void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
16241                     double* e, double* vl, double* vu, lapack_int* il,
16242                     lapack_int* iu, lapack_int* m, double* w,
16243                     lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
16244                     lapack_int* isuppz, lapack_logical* tryrac, double* work,
16245                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16246                     lapack_int *info );
16247 void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
16248                     lapack_int* ldz, float* work, lapack_int* lwork,
16249                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16250 void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
16251                     lapack_int* ldz, double* work, lapack_int* lwork,
16252                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16253 void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
16254                     lapack_complex_float* z, lapack_int* ldz,
16255                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16256                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16257                     lapack_int *info );
16258 void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
16259                     lapack_complex_double* z, lapack_int* ldz,
16260                     lapack_complex_double* work, lapack_int* lwork,
16261                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16262                     lapack_int* liwork, lapack_int *info );
16263 void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16264                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16265                     float* abstol, lapack_int* m, float* w, float* z,
16266                     lapack_int* ldz, lapack_int* isuppz, float* work,
16267                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16268                     lapack_int *info );
16269 void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
16270                     double* e, double* vl, double* vu, lapack_int* il,
16271                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16272                     double* z, lapack_int* ldz, lapack_int* isuppz,
16273                     double* work, lapack_int* lwork, lapack_int* iwork,
16274                     lapack_int* liwork, lapack_int *info );
16275 void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16276                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16277                     float* abstol, lapack_int* m, float* w,
16278                     lapack_complex_float* z, lapack_int* ldz,
16279                     lapack_int* isuppz, float* work, lapack_int* lwork,
16280                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16281 void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
16282                     double* e, double* vl, double* vu, lapack_int* il,
16283                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16284                     lapack_complex_double* z, lapack_int* ldz,
16285                     lapack_int* isuppz, double* work, lapack_int* lwork,
16286                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16287 void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
16288                     lapack_int* ldz, float* work, lapack_int *info );
16289 void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
16290                     lapack_int* ldz, double* work, lapack_int *info );
16291 void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
16292                     lapack_complex_float* z, lapack_int* ldz, float* work,
16293                     lapack_int *info );
16294 void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
16295                     lapack_complex_double* z, lapack_int* ldz, double* work,
16296                     lapack_int *info );
16297 void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
16298                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16299                     const float* d, const float* e, lapack_int* m,
16300                     lapack_int* nsplit, float* w, lapack_int* iblock,
16301                     lapack_int* isplit, float* work, lapack_int* iwork,
16302                     lapack_int *info );
16303 void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
16304                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16305                     const double* d, const double* e, lapack_int* m,
16306                     lapack_int* nsplit, double* w, lapack_int* iblock,
16307                     lapack_int* isplit, double* work, lapack_int* iwork,
16308                     lapack_int *info );
16309 void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
16310                     lapack_int* m, const float* w, const lapack_int* iblock,
16311                     const lapack_int* isplit, float* z, lapack_int* ldz,
16312                     float* work, lapack_int* iwork, lapack_int* ifailv,
16313                     lapack_int *info );
16314 void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
16315                     lapack_int* m, const double* w, const lapack_int* iblock,
16316                     const lapack_int* isplit, double* z, lapack_int* ldz,
16317                     double* work, lapack_int* iwork, lapack_int* ifailv,
16318                     lapack_int *info );
16319 void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
16320                     lapack_int* m, const float* w, const lapack_int* iblock,
16321                     const lapack_int* isplit, lapack_complex_float* z,
16322                     lapack_int* ldz, float* work, lapack_int* iwork,
16323                     lapack_int* ifailv, lapack_int *info );
16324 void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
16325                     lapack_int* m, const double* w, const lapack_int* iblock,
16326                     const lapack_int* isplit, lapack_complex_double* z,
16327                     lapack_int* ldz, double* work, lapack_int* iwork,
16328                     lapack_int* ifailv, lapack_int *info );
16329 void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
16330                     float* sep, lapack_int *info );
16331 void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
16332                     double* sep, lapack_int *info );
16333 void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
16334                     lapack_int* lda, const float* b, lapack_int* ldb,
16335                     lapack_int *info );
16336 void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
16337                     lapack_int* lda, const double* b, lapack_int* ldb,
16338                     lapack_int *info );
16339 void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
16340                     lapack_complex_float* a, lapack_int* lda,
16341                     const lapack_complex_float* b, lapack_int* ldb,
16342                     lapack_int *info );
16343 void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
16344                     lapack_complex_double* a, lapack_int* lda,
16345                     const lapack_complex_double* b, lapack_int* ldb,
16346                     lapack_int *info );
16347 void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
16348                     const float* bp, lapack_int *info );
16349 void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
16350                     const double* bp, lapack_int *info );
16351 void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
16352                     lapack_complex_float* ap, const lapack_complex_float* bp,
16353                     lapack_int *info );
16354 void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
16355                     lapack_complex_double* ap, const lapack_complex_double* bp,
16356                     lapack_int *info );
16357 void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16358                     lapack_int* kb, float* ab, lapack_int* ldab,
16359                     const float* bb, lapack_int* ldbb, float* x,
16360                     lapack_int* ldx, float* work, lapack_int *info );
16361 void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16362                     lapack_int* kb, double* ab, lapack_int* ldab,
16363                     const double* bb, lapack_int* ldbb, double* x,
16364                     lapack_int* ldx, double* work, lapack_int *info );
16365 void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16366                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
16367                     const lapack_complex_float* bb, lapack_int* ldbb,
16368                     lapack_complex_float* x, lapack_int* ldx,
16369                     lapack_complex_float* work, float* rwork,
16370                     lapack_int *info );
16371 void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16372                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
16373                     const lapack_complex_double* bb, lapack_int* ldbb,
16374                     lapack_complex_double* x, lapack_int* ldx,
16375                     lapack_complex_double* work, double* rwork,
16376                     lapack_int *info );
16377 void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
16378                     lapack_int* ldbb, lapack_int *info );
16379 void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
16380                     lapack_int* ldbb, lapack_int *info );
16381 void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
16382                     lapack_complex_float* bb, lapack_int* ldbb,
16383                     lapack_int *info );
16384 void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
16385                     lapack_complex_double* bb, lapack_int* ldbb,
16386                     lapack_int *info );
16387 void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
16388                     lapack_int* lda, float* tau, float* work, lapack_int* lwork,
16389                     lapack_int *info );
16390 void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
16391                     lapack_int* lda, double* tau, double* work,
16392                     lapack_int* lwork, lapack_int *info );
16393 void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16394                     lapack_complex_float* a, lapack_int* lda,
16395                     lapack_complex_float* tau, lapack_complex_float* work,
16396                     lapack_int* lwork, lapack_int *info );
16397 void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16398                     lapack_complex_double* a, lapack_int* lda,
16399                     lapack_complex_double* tau, lapack_complex_double* work,
16400                     lapack_int* lwork, lapack_int *info );
16401 void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
16402                     lapack_int* lda, const float* tau, float* work,
16403                     lapack_int* lwork, lapack_int *info );
16404 void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
16405                     lapack_int* lda, const double* tau, double* work,
16406                     lapack_int* lwork, lapack_int *info );
16407 void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16408                     lapack_int* ilo, lapack_int* ihi, const float* a,
16409                     lapack_int* lda, const float* tau, float* c,
16410                     lapack_int* ldc, float* work, lapack_int* lwork,
16411                     lapack_int *info );
16412 void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16413                     lapack_int* ilo, lapack_int* ihi, const double* a,
16414                     lapack_int* lda, const double* tau, double* c,
16415                     lapack_int* ldc, double* work, lapack_int* lwork,
16416                     lapack_int *info );
16417 void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16418                     lapack_complex_float* a, lapack_int* lda,
16419                     const lapack_complex_float* tau, lapack_complex_float* work,
16420                     lapack_int* lwork, lapack_int *info );
16421 void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16422                     lapack_complex_double* a, lapack_int* lda,
16423                     const lapack_complex_double* tau,
16424                     lapack_complex_double* work, lapack_int* lwork,
16425                     lapack_int *info );
16426 void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16427                     lapack_int* ilo, lapack_int* ihi,
16428                     const lapack_complex_float* a, lapack_int* lda,
16429                     const lapack_complex_float* tau, lapack_complex_float* c,
16430                     lapack_int* ldc, lapack_complex_float* work,
16431                     lapack_int* lwork, lapack_int *info );
16432 void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16433                     lapack_int* ilo, lapack_int* ihi,
16434                     const lapack_complex_double* a, lapack_int* lda,
16435                     const lapack_complex_double* tau, lapack_complex_double* c,
16436                     lapack_int* ldc, lapack_complex_double* work,
16437                     lapack_int* lwork, lapack_int *info );
16438 void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
16439                     lapack_int* ilo, lapack_int* ihi, float* scale,
16440                     lapack_int *info );
16441 void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
16442                     lapack_int* ilo, lapack_int* ihi, double* scale,
16443                     lapack_int *info );
16444 void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
16445                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
16446                     float* scale, lapack_int *info );
16447 void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
16448                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
16449                     double* scale, lapack_int *info );
16450 void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16451                     lapack_int* ihi, const float* scale, lapack_int* m,
16452                     float* v, lapack_int* ldv, lapack_int *info );
16453 void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16454                     lapack_int* ihi, const double* scale, lapack_int* m,
16455                     double* v, lapack_int* ldv, lapack_int *info );
16456 void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16457                     lapack_int* ihi, const float* scale, lapack_int* m,
16458                     lapack_complex_float* v, lapack_int* ldv,
16459                     lapack_int *info );
16460 void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16461                     lapack_int* ihi, const double* scale, lapack_int* m,
16462                     lapack_complex_double* v, lapack_int* ldv,
16463                     lapack_int *info );
16464 void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16465                     lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
16466                     float* wi, float* z, lapack_int* ldz, float* work,
16467                     lapack_int* lwork, lapack_int *info );
16468 void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16469                     lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
16470                     double* wi, double* z, lapack_int* ldz, double* work,
16471                     lapack_int* lwork, lapack_int *info );
16472 void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16473                     lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
16474                     lapack_complex_float* w, lapack_complex_float* z,
16475                     lapack_int* ldz, lapack_complex_float* work,
16476                     lapack_int* lwork, lapack_int *info );
16477 void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16478                     lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
16479                     lapack_complex_double* w, lapack_complex_double* z,
16480                     lapack_int* ldz, lapack_complex_double* work,
16481                     lapack_int* lwork, lapack_int *info );
16482 void LAPACK_shsein( char* job, char* eigsrc, char* initv,
16483                     lapack_logical* select, lapack_int* n, const float* h,
16484                     lapack_int* ldh, float* wr, const float* wi, float* vl,
16485                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16486                     lapack_int* mm, lapack_int* m, float* work,
16487                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16488 void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
16489                     lapack_logical* select, lapack_int* n, const double* h,
16490                     lapack_int* ldh, double* wr, const double* wi, double* vl,
16491                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16492                     lapack_int* mm, lapack_int* m, double* work,
16493                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16494 void LAPACK_chsein( char* job, char* eigsrc, char* initv,
16495                     const lapack_logical* select, lapack_int* n,
16496                     const lapack_complex_float* h, lapack_int* ldh,
16497                     lapack_complex_float* w, lapack_complex_float* vl,
16498                     lapack_int* ldvl, lapack_complex_float* vr,
16499                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16500                     lapack_complex_float* work, float* rwork,
16501                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16502 void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
16503                     const lapack_logical* select, lapack_int* n,
16504                     const lapack_complex_double* h, lapack_int* ldh,
16505                     lapack_complex_double* w, lapack_complex_double* vl,
16506                     lapack_int* ldvl, lapack_complex_double* vr,
16507                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16508                     lapack_complex_double* work, double* rwork,
16509                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16510 void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
16511                     lapack_int* n, const float* t, lapack_int* ldt, float* vl,
16512                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16513                     lapack_int* mm, lapack_int* m, float* work,
16514                     lapack_int *info );
16515 void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
16516                     lapack_int* n, const double* t, lapack_int* ldt, double* vl,
16517                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16518                     lapack_int* mm, lapack_int* m, double* work,
16519                     lapack_int *info );
16520 void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
16521                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
16522                     lapack_complex_float* vl, lapack_int* ldvl,
16523                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
16524                     lapack_int* m, lapack_complex_float* work, float* rwork,
16525                     lapack_int *info );
16526 void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
16527                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
16528                     lapack_complex_double* vl, lapack_int* ldvl,
16529                     lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
16530                     lapack_int* m, lapack_complex_double* work, double* rwork,
16531                     lapack_int *info );
16532 void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
16533                     lapack_int* n, const float* t, lapack_int* ldt,
16534                     const float* vl, lapack_int* ldvl, const float* vr,
16535                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
16536                     lapack_int* m, float* work, lapack_int* ldwork,
16537                     lapack_int* iwork, lapack_int *info );
16538 void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
16539                     lapack_int* n, const double* t, lapack_int* ldt,
16540                     const double* vl, lapack_int* ldvl, const double* vr,
16541                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
16542                     lapack_int* m, double* work, lapack_int* ldwork,
16543                     lapack_int* iwork, lapack_int *info );
16544 void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
16545                     lapack_int* n, const lapack_complex_float* t,
16546                     lapack_int* ldt, const lapack_complex_float* vl,
16547                     lapack_int* ldvl, const lapack_complex_float* vr,
16548                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
16549                     lapack_int* m, lapack_complex_float* work,
16550                     lapack_int* ldwork, float* rwork, lapack_int *info );
16551 void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
16552                     lapack_int* n, const lapack_complex_double* t,
16553                     lapack_int* ldt, const lapack_complex_double* vl,
16554                     lapack_int* ldvl, const lapack_complex_double* vr,
16555                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
16556                     lapack_int* m, lapack_complex_double* work,
16557                     lapack_int* ldwork, double* rwork, lapack_int *info );
16558 void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
16559                     float* q, lapack_int* ldq, lapack_int* ifst,
16560                     lapack_int* ilst, float* work, lapack_int *info );
16561 void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
16562                     double* q, lapack_int* ldq, lapack_int* ifst,
16563                     lapack_int* ilst, double* work, lapack_int *info );
16564 void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
16565                     lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
16566                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
16567 void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
16568                     lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
16569                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
16570 void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
16571                     lapack_int* n, float* t, lapack_int* ldt, float* q,
16572                     lapack_int* ldq, float* wr, float* wi, lapack_int* m,
16573                     float* s, float* sep, float* work, lapack_int* lwork,
16574                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16575 void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
16576                     lapack_int* n, double* t, lapack_int* ldt, double* q,
16577                     lapack_int* ldq, double* wr, double* wi, lapack_int* m,
16578                     double* s, double* sep, double* work, lapack_int* lwork,
16579                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16580 void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
16581                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
16582                     lapack_complex_float* q, lapack_int* ldq,
16583                     lapack_complex_float* w, lapack_int* m, float* s,
16584                     float* sep, lapack_complex_float* work, lapack_int* lwork,
16585                     lapack_int *info );
16586 void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
16587                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
16588                     lapack_complex_double* q, lapack_int* ldq,
16589                     lapack_complex_double* w, lapack_int* m, double* s,
16590                     double* sep, lapack_complex_double* work, lapack_int* lwork,
16591                     lapack_int *info );
16592 void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16593                     lapack_int* n, const float* a, lapack_int* lda,
16594                     const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
16595                     float* scale, lapack_int *info );
16596 void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16597                     lapack_int* n, const double* a, lapack_int* lda,
16598                     const double* b, lapack_int* ldb, double* c,
16599                     lapack_int* ldc, double* scale, lapack_int *info );
16600 void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16601                     lapack_int* n, const lapack_complex_float* a,
16602                     lapack_int* lda, const lapack_complex_float* b,
16603                     lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
16604                     float* scale, lapack_int *info );
16605 void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16606                     lapack_int* n, const lapack_complex_double* a,
16607                     lapack_int* lda, const lapack_complex_double* b,
16608                     lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
16609                     double* scale, lapack_int *info );
16610 void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16611                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
16612                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
16613                     lapack_int* ldz, lapack_int *info );
16614 void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16615                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
16616                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
16617                     lapack_int* ldz, lapack_int *info );
16618 void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16619                     lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
16620                     lapack_complex_float* b, lapack_int* ldb,
16621                     lapack_complex_float* q, lapack_int* ldq,
16622                     lapack_complex_float* z, lapack_int* ldz,
16623                     lapack_int *info );
16624 void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16625                     lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
16626                     lapack_complex_double* b, lapack_int* ldb,
16627                     lapack_complex_double* q, lapack_int* ldq,
16628                     lapack_complex_double* z, lapack_int* ldz,
16629                     lapack_int *info );
16630 void LAPACK_sgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16631                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
16632                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
16633                     lapack_int* ldz, float* work, lapack_int* lwork,
16634                     lapack_int *info );
16635 void LAPACK_dgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16636                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
16637                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
16638                     lapack_int* ldz, double* work, lapack_int* lwork,
16639                     lapack_int *info );
16640 void LAPACK_cgghd3( char* compq, char* compz, lapack_int* n,
16641                     lapack_int* ilo, lapack_int* ihi,
16642                     lapack_complex_float* a, lapack_int* lda,
16643                     lapack_complex_float* b, lapack_int* ldb,
16644                     lapack_complex_float* q, lapack_int* ldq,
16645                     lapack_complex_float* z, lapack_int* ldz,
16646                     lapack_complex_float* work, lapack_int* lwork,
16647                     lapack_int *info );
16648 void LAPACK_zgghd3( char* compq, char* compz, lapack_int* n,
16649                     lapack_int* ilo, lapack_int* ihi,
16650                     lapack_complex_double* a, lapack_int* lda,
16651                     lapack_complex_double* b, lapack_int* ldb,
16652                     lapack_complex_double* q, lapack_int* ldq,
16653                     lapack_complex_double* z, lapack_int* ldz,
16654                     lapack_complex_double* work, lapack_int* lwork,
16655                     lapack_int *info );
16656 void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
16657                     float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
16658                     float* lscale, float* rscale, float* work,
16659                     lapack_int *info );
16660 void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
16661                     double* b, lapack_int* ldb, lapack_int* ilo,
16662                     lapack_int* ihi, double* lscale, double* rscale,
16663                     double* work, lapack_int *info );
16664 void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
16665                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16666                     lapack_int* ilo, lapack_int* ihi, float* lscale,
16667                     float* rscale, float* work, lapack_int *info );
16668 void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
16669                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16670                     lapack_int* ilo, lapack_int* ihi, double* lscale,
16671                     double* rscale, double* work, lapack_int *info );
16672 void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16673                     lapack_int* ihi, const float* lscale, const float* rscale,
16674                     lapack_int* m, float* v, lapack_int* ldv,
16675                     lapack_int *info );
16676 void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16677                     lapack_int* ihi, const double* lscale, const double* rscale,
16678                     lapack_int* m, double* v, lapack_int* ldv,
16679                     lapack_int *info );
16680 void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16681                     lapack_int* ihi, const float* lscale, const float* rscale,
16682                     lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
16683                     lapack_int *info );
16684 void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16685                     lapack_int* ihi, const double* lscale, const double* rscale,
16686                     lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
16687                     lapack_int *info );
16688 void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
16689                     lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
16690                     float* t, lapack_int* ldt, float* alphar, float* alphai,
16691                     float* beta, float* q, lapack_int* ldq, float* z,
16692                     lapack_int* ldz, float* work, lapack_int* lwork,
16693                     lapack_int *info );
16694 void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
16695                     lapack_int* ilo, lapack_int* ihi, double* h,
16696                     lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
16697                     double* alphai, double* beta, double* q, lapack_int* ldq,
16698                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
16699                     lapack_int *info );
16700 void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
16701                     lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
16702                     lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
16703                     lapack_complex_float* alpha, lapack_complex_float* beta,
16704                     lapack_complex_float* q, lapack_int* ldq,
16705                     lapack_complex_float* z, lapack_int* ldz,
16706                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16707                     lapack_int *info );
16708 void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
16709                     lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
16710                     lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
16711                     lapack_complex_double* alpha, lapack_complex_double* beta,
16712                     lapack_complex_double* q, lapack_int* ldq,
16713                     lapack_complex_double* z, lapack_int* ldz,
16714                     lapack_complex_double* work, lapack_int* lwork,
16715                     double* rwork, lapack_int *info );
16716 void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
16717                     lapack_int* n, const float* s, lapack_int* lds,
16718                     const float* p, lapack_int* ldp, float* vl,
16719                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16720                     lapack_int* mm, lapack_int* m, float* work,
16721                     lapack_int *info );
16722 void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
16723                     lapack_int* n, const double* s, lapack_int* lds,
16724                     const double* p, lapack_int* ldp, double* vl,
16725                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16726                     lapack_int* mm, lapack_int* m, double* work,
16727                     lapack_int *info );
16728 void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
16729                     lapack_int* n, const lapack_complex_float* s,
16730                     lapack_int* lds, const lapack_complex_float* p,
16731                     lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
16732                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
16733                     lapack_int* m, lapack_complex_float* work, float* rwork,
16734                     lapack_int *info );
16735 void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
16736                     lapack_int* n, const lapack_complex_double* s,
16737                     lapack_int* lds, const lapack_complex_double* p,
16738                     lapack_int* ldp, lapack_complex_double* vl,
16739                     lapack_int* ldvl, lapack_complex_double* vr,
16740                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16741                     lapack_complex_double* work, double* rwork,
16742                     lapack_int *info );
16743 void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16744                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16745                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
16746                     lapack_int* ifst, lapack_int* ilst, float* work,
16747                     lapack_int* lwork, lapack_int *info );
16748 void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16749                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16750                     double* q, lapack_int* ldq, double* z, lapack_int* ldz,
16751                     lapack_int* ifst, lapack_int* ilst, double* work,
16752                     lapack_int* lwork, lapack_int *info );
16753 void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16754                     lapack_complex_float* a, lapack_int* lda,
16755                     lapack_complex_float* b, lapack_int* ldb,
16756                     lapack_complex_float* q, lapack_int* ldq,
16757                     lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
16758                     lapack_int* ilst, lapack_int *info );
16759 void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16760                     lapack_complex_double* a, lapack_int* lda,
16761                     lapack_complex_double* b, lapack_int* ldb,
16762                     lapack_complex_double* q, lapack_int* ldq,
16763                     lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
16764                     lapack_int* ilst, lapack_int *info );
16765 void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
16766                     lapack_logical* wantz, const lapack_logical* select,
16767                     lapack_int* n, float* a, lapack_int* lda, float* b,
16768                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
16769                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
16770                     lapack_int* m, float* pl, float* pr, float* dif,
16771                     float* work, lapack_int* lwork, lapack_int* iwork,
16772                     lapack_int* liwork, lapack_int *info );
16773 void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
16774                     lapack_logical* wantz, const lapack_logical* select,
16775                     lapack_int* n, double* a, lapack_int* lda, double* b,
16776                     lapack_int* ldb, double* alphar, double* alphai,
16777                     double* beta, double* q, lapack_int* ldq, double* z,
16778                     lapack_int* ldz, lapack_int* m, double* pl, double* pr,
16779                     double* dif, double* work, lapack_int* lwork,
16780                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16781 void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
16782                     lapack_logical* wantz, const lapack_logical* select,
16783                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
16784                     lapack_complex_float* b, lapack_int* ldb,
16785                     lapack_complex_float* alpha, lapack_complex_float* beta,
16786                     lapack_complex_float* q, lapack_int* ldq,
16787                     lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
16788                     float* pl, float* pr, float* dif,
16789                     lapack_complex_float* work, lapack_int* lwork,
16790                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16791 void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
16792                     lapack_logical* wantz, const lapack_logical* select,
16793                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
16794                     lapack_complex_double* b, lapack_int* ldb,
16795                     lapack_complex_double* alpha, lapack_complex_double* beta,
16796                     lapack_complex_double* q, lapack_int* ldq,
16797                     lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
16798                     double* pl, double* pr, double* dif,
16799                     lapack_complex_double* work, lapack_int* lwork,
16800                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16801 void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16802                     const float* a, lapack_int* lda, const float* b,
16803                     lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
16804                     lapack_int* ldd, const float* e, lapack_int* lde, float* f,
16805                     lapack_int* ldf, float* scale, float* dif, float* work,
16806                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16807 void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16808                     const double* a, lapack_int* lda, const double* b,
16809                     lapack_int* ldb, double* c, lapack_int* ldc,
16810                     const double* d, lapack_int* ldd, const double* e,
16811                     lapack_int* lde, double* f, lapack_int* ldf, double* scale,
16812                     double* dif, double* work, lapack_int* lwork,
16813                     lapack_int* iwork, lapack_int *info );
16814 void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16815                     const lapack_complex_float* a, lapack_int* lda,
16816                     const lapack_complex_float* b, lapack_int* ldb,
16817                     lapack_complex_float* c, lapack_int* ldc,
16818                     const lapack_complex_float* d, lapack_int* ldd,
16819                     const lapack_complex_float* e, lapack_int* lde,
16820                     lapack_complex_float* f, lapack_int* ldf, float* scale,
16821                     float* dif, lapack_complex_float* work, lapack_int* lwork,
16822                     lapack_int* iwork, lapack_int *info );
16823 void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16824                     const lapack_complex_double* a, lapack_int* lda,
16825                     const lapack_complex_double* b, lapack_int* ldb,
16826                     lapack_complex_double* c, lapack_int* ldc,
16827                     const lapack_complex_double* d, lapack_int* ldd,
16828                     const lapack_complex_double* e, lapack_int* lde,
16829                     lapack_complex_double* f, lapack_int* ldf, double* scale,
16830                     double* dif, lapack_complex_double* work, lapack_int* lwork,
16831                     lapack_int* iwork, lapack_int *info );
16832 void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
16833                     lapack_int* n, const float* a, lapack_int* lda,
16834                     const float* b, lapack_int* ldb, const float* vl,
16835                     lapack_int* ldvl, const float* vr, lapack_int* ldvr,
16836                     float* s, float* dif, lapack_int* mm, lapack_int* m,
16837                     float* work, lapack_int* lwork, lapack_int* iwork,
16838                     lapack_int *info );
16839 void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
16840                     lapack_int* n, const double* a, lapack_int* lda,
16841                     const double* b, lapack_int* ldb, const double* vl,
16842                     lapack_int* ldvl, const double* vr, lapack_int* ldvr,
16843                     double* s, double* dif, lapack_int* mm, lapack_int* m,
16844                     double* work, lapack_int* lwork, lapack_int* iwork,
16845                     lapack_int *info );
16846 void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
16847                     lapack_int* n, const lapack_complex_float* a,
16848                     lapack_int* lda, const lapack_complex_float* b,
16849                     lapack_int* ldb, const lapack_complex_float* vl,
16850                     lapack_int* ldvl, const lapack_complex_float* vr,
16851                     lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
16852                     lapack_int* m, lapack_complex_float* work,
16853                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16854 void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
16855                     lapack_int* n, const lapack_complex_double* a,
16856                     lapack_int* lda, const lapack_complex_double* b,
16857                     lapack_int* ldb, const lapack_complex_double* vl,
16858                     lapack_int* ldvl, const lapack_complex_double* vr,
16859                     lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
16860                     lapack_int* m, lapack_complex_double* work,
16861                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16862 void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16863                     lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
16864                     float* b, lapack_int* ldb, float* tola, float* tolb,
16865                     lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
16866                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16867                     lapack_int* iwork, float* tau, float* work,
16868                     lapack_int *info );
16869 void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16870                     lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
16871                     double* b, lapack_int* ldb, double* tola, double* tolb,
16872                     lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
16873                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16874                     lapack_int* iwork, double* tau, double* work,
16875                     lapack_int *info );
16876 void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16877                     lapack_int* p, lapack_int* n, lapack_complex_float* a,
16878                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16879                     float* tola, float* tolb, lapack_int* k, lapack_int* l,
16880                     lapack_complex_float* u, lapack_int* ldu,
16881                     lapack_complex_float* v, lapack_int* ldv,
16882                     lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
16883                     float* rwork, lapack_complex_float* tau,
16884                     lapack_complex_float* work, lapack_int *info );
16885 void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16886                     lapack_int* p, lapack_int* n, lapack_complex_double* a,
16887                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16888                     double* tola, double* tolb, lapack_int* k, lapack_int* l,
16889                     lapack_complex_double* u, lapack_int* ldu,
16890                     lapack_complex_double* v, lapack_int* ldv,
16891                     lapack_complex_double* q, lapack_int* ldq,
16892                     lapack_int* iwork, double* rwork,
16893                     lapack_complex_double* tau, lapack_complex_double* work,
16894                     lapack_int *info );
16895 void LAPACK_sggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16896                      lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
16897                      float* b, lapack_int* ldb, float* tola, float* tolb,
16898                      lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
16899                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16900                      lapack_int* iwork, float* tau, float* work,
16901                      lapack_int* lwork, lapack_int *info );
16902 void LAPACK_dggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16903                      lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
16904                      double* b, lapack_int* ldb, double* tola, double* tolb,
16905                      lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
16906                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16907                      lapack_int* iwork, double* tau, double* work,
16908                      lapack_int* lwork, lapack_int *info );
16909 void LAPACK_cggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16910                      lapack_int* p, lapack_int* n, lapack_complex_float* a,
16911                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16912                      float* tola, float* tolb, lapack_int* k, lapack_int* l,
16913                      lapack_complex_float* u, lapack_int* ldu,
16914                      lapack_complex_float* v, lapack_int* ldv,
16915                      lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
16916                      float* rwork, lapack_complex_float* tau,
16917                      lapack_complex_float* work, lapack_int* lwork,
16918                      lapack_int *info );
16919 void LAPACK_zggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16920                      lapack_int* p, lapack_int* n, lapack_complex_double* a,
16921                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16922                      double* tola, double* tolb, lapack_int* k, lapack_int* l,
16923                      lapack_complex_double* u, lapack_int* ldu,
16924                      lapack_complex_double* v, lapack_int* ldv,
16925                      lapack_complex_double* q, lapack_int* ldq,
16926                      lapack_int* iwork, double* rwork,
16927                      lapack_complex_double* tau, lapack_complex_double* work,
16928                      lapack_int* lwork, lapack_int *info );
16929 void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16930                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16931                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16932                     float* tola, float* tolb, float* alpha, float* beta,
16933                     float* u, lapack_int* ldu, float* v, lapack_int* ldv,
16934                     float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
16935                     lapack_int *info );
16936 void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16937                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16938                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16939                     double* tola, double* tolb, double* alpha, double* beta,
16940                     double* u, lapack_int* ldu, double* v, lapack_int* ldv,
16941                     double* q, lapack_int* ldq, double* work,
16942                     lapack_int* ncycle, lapack_int *info );
16943 void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16944                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16945                     lapack_complex_float* a, lapack_int* lda,
16946                     lapack_complex_float* b, lapack_int* ldb, float* tola,
16947                     float* tolb, float* alpha, float* beta,
16948                     lapack_complex_float* u, lapack_int* ldu,
16949                     lapack_complex_float* v, lapack_int* ldv,
16950                     lapack_complex_float* q, lapack_int* ldq,
16951                     lapack_complex_float* work, lapack_int* ncycle,
16952                     lapack_int *info );
16953 void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16954                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16955                     lapack_complex_double* a, lapack_int* lda,
16956                     lapack_complex_double* b, lapack_int* ldb, double* tola,
16957                     double* tolb, double* alpha, double* beta,
16958                     lapack_complex_double* u, lapack_int* ldu,
16959                     lapack_complex_double* v, lapack_int* ldv,
16960                     lapack_complex_double* q, lapack_int* ldq,
16961                     lapack_complex_double* work, lapack_int* ncycle,
16962                     lapack_int *info );
16963 void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16964                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
16965                    float* work, lapack_int* lwork, lapack_int *info );
16966 void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16967                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
16968                    double* work, lapack_int* lwork, lapack_int *info );
16969 void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16970                    lapack_complex_float* a, lapack_int* lda,
16971                    lapack_complex_float* b, lapack_int* ldb,
16972                    lapack_complex_float* work, lapack_int* lwork,
16973                    lapack_int *info );
16974 void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16975                    lapack_complex_double* a, lapack_int* lda,
16976                    lapack_complex_double* b, lapack_int* ldb,
16977                    lapack_complex_double* work, lapack_int* lwork,
16978                    lapack_int *info );
16979 void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16980                     lapack_int* lda, float* b, lapack_int* ldb,
16981                     lapack_int* jpvt, float* rcond, lapack_int* rank,
16982                     float* work, lapack_int* lwork, lapack_int *info );
16983 void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
16984                     lapack_int* lda, double* b, lapack_int* ldb,
16985                     lapack_int* jpvt, double* rcond, lapack_int* rank,
16986                     double* work, lapack_int* lwork, lapack_int *info );
16987 void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16988                     lapack_complex_float* a, lapack_int* lda,
16989                     lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
16990                     float* rcond, lapack_int* rank, lapack_complex_float* work,
16991                     lapack_int* lwork, float* rwork, lapack_int *info );
16992 void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16993                     lapack_complex_double* a, lapack_int* lda,
16994                     lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
16995                     double* rcond, lapack_int* rank,
16996                     lapack_complex_double* work, lapack_int* lwork,
16997                     double* rwork, lapack_int *info );
16998 void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16999                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
17000                     float* rcond, lapack_int* rank, float* work,
17001                     lapack_int* lwork, lapack_int *info );
17002 void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
17003                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
17004                     double* rcond, lapack_int* rank, double* work,
17005                     lapack_int* lwork, lapack_int *info );
17006 void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17007                     lapack_complex_float* a, lapack_int* lda,
17008                     lapack_complex_float* b, lapack_int* ldb, float* s,
17009                     float* rcond, lapack_int* rank, lapack_complex_float* work,
17010                     lapack_int* lwork, float* rwork, lapack_int *info );
17011 void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17012                     lapack_complex_double* a, lapack_int* lda,
17013                     lapack_complex_double* b, lapack_int* ldb, double* s,
17014                     double* rcond, lapack_int* rank,
17015                     lapack_complex_double* work, lapack_int* lwork,
17016                     double* rwork, lapack_int *info );
17017 void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
17018                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
17019                     float* rcond, lapack_int* rank, float* work,
17020                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17021 void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
17022                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
17023                     double* rcond, lapack_int* rank, double* work,
17024                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17025 void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17026                     lapack_complex_float* a, lapack_int* lda,
17027                     lapack_complex_float* b, lapack_int* ldb, float* s,
17028                     float* rcond, lapack_int* rank, lapack_complex_float* work,
17029                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17030                     lapack_int *info );
17031 void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17032                     lapack_complex_double* a, lapack_int* lda,
17033                     lapack_complex_double* b, lapack_int* ldb, double* s,
17034                     double* rcond, lapack_int* rank,
17035                     lapack_complex_double* work, lapack_int* lwork,
17036                     double* rwork, lapack_int* iwork, lapack_int *info );
17037 void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
17038                     lapack_int* lda, float* b, lapack_int* ldb, float* c,
17039                     float* d, float* x, float* work, lapack_int* lwork,
17040                     lapack_int *info );
17041 void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
17042                     lapack_int* lda, double* b, lapack_int* ldb, double* c,
17043                     double* d, double* x, double* work, lapack_int* lwork,
17044                     lapack_int *info );
17045 void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
17046                     lapack_complex_float* a, lapack_int* lda,
17047                     lapack_complex_float* b, lapack_int* ldb,
17048                     lapack_complex_float* c, lapack_complex_float* d,
17049                     lapack_complex_float* x, lapack_complex_float* work,
17050                     lapack_int* lwork, lapack_int *info );
17051 void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
17052                     lapack_complex_double* a, lapack_int* lda,
17053                     lapack_complex_double* b, lapack_int* ldb,
17054                     lapack_complex_double* c, lapack_complex_double* d,
17055                     lapack_complex_double* x, lapack_complex_double* work,
17056                     lapack_int* lwork, lapack_int *info );
17057 void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
17058                     lapack_int* lda, float* b, lapack_int* ldb, float* d,
17059                     float* x, float* y, float* work, lapack_int* lwork,
17060                     lapack_int *info );
17061 void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
17062                     lapack_int* lda, double* b, lapack_int* ldb, double* d,
17063                     double* x, double* y, double* work, lapack_int* lwork,
17064                     lapack_int *info );
17065 void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
17066                     lapack_complex_float* a, lapack_int* lda,
17067                     lapack_complex_float* b, lapack_int* ldb,
17068                     lapack_complex_float* d, lapack_complex_float* x,
17069                     lapack_complex_float* y, lapack_complex_float* work,
17070                     lapack_int* lwork, lapack_int *info );
17071 void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
17072                     lapack_complex_double* a, lapack_int* lda,
17073                     lapack_complex_double* b, lapack_int* ldb,
17074                     lapack_complex_double* d, lapack_complex_double* x,
17075                     lapack_complex_double* y, lapack_complex_double* work,
17076                     lapack_int* lwork, lapack_int *info );
17077 void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
17078                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
17079                    lapack_int *info );
17080 void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
17081                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
17082                    lapack_int *info );
17083 void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
17084                    lapack_complex_float* a, lapack_int* lda, float* w,
17085                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17086                    lapack_int *info );
17087 void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
17088                    lapack_complex_double* a, lapack_int* lda, double* w,
17089                    lapack_complex_double* work, lapack_int* lwork,
17090                    double* rwork, lapack_int *info );
17091 void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
17092                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
17093                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17094 void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
17095                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
17096                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17097 void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
17098                     lapack_complex_float* a, lapack_int* lda, float* w,
17099                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17100                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17101                     lapack_int *info );
17102 void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
17103                     lapack_complex_double* a, lapack_int* lda, double* w,
17104                     lapack_complex_double* work, lapack_int* lwork,
17105                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17106                     lapack_int* liwork, lapack_int *info );
17107 void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
17108                     float* a, lapack_int* lda, float* vl, float* vu,
17109                     lapack_int* il, lapack_int* iu, float* abstol,
17110                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17111                     float* work, lapack_int* lwork, lapack_int* iwork,
17112                     lapack_int* ifail, lapack_int *info );
17113 void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
17114                     double* a, lapack_int* lda, double* vl, double* vu,
17115                     lapack_int* il, lapack_int* iu, double* abstol,
17116                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17117                     double* work, lapack_int* lwork, lapack_int* iwork,
17118                     lapack_int* ifail, lapack_int *info );
17119 void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
17120                     lapack_complex_float* a, lapack_int* lda, float* vl,
17121                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17122                     lapack_int* m, float* w, lapack_complex_float* z,
17123                     lapack_int* ldz, lapack_complex_float* work,
17124                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17125                     lapack_int* ifail, lapack_int *info );
17126 void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
17127                     lapack_complex_double* a, lapack_int* lda, double* vl,
17128                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17129                     lapack_int* m, double* w, lapack_complex_double* z,
17130                     lapack_int* ldz, lapack_complex_double* work,
17131                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17132                     lapack_int* ifail, lapack_int *info );
17133 void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
17134                     float* a, lapack_int* lda, float* vl, float* vu,
17135                     lapack_int* il, lapack_int* iu, float* abstol,
17136                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17137                     lapack_int* isuppz, float* work, lapack_int* lwork,
17138                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17139 void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
17140                     double* a, lapack_int* lda, double* vl, double* vu,
17141                     lapack_int* il, lapack_int* iu, double* abstol,
17142                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17143                     lapack_int* isuppz, double* work, lapack_int* lwork,
17144                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17145 void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
17146                     lapack_complex_float* a, lapack_int* lda, float* vl,
17147                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17148                     lapack_int* m, float* w, lapack_complex_float* z,
17149                     lapack_int* ldz, lapack_int* isuppz,
17150                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17151                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17152                     lapack_int *info );
17153 void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
17154                     lapack_complex_double* a, lapack_int* lda, double* vl,
17155                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17156                     lapack_int* m, double* w, lapack_complex_double* z,
17157                     lapack_int* ldz, lapack_int* isuppz,
17158                     lapack_complex_double* work, lapack_int* lwork,
17159                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17160                     lapack_int* liwork, lapack_int *info );
17161 void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
17162                    float* z, lapack_int* ldz, float* work, lapack_int *info );
17163 void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
17164                    double* z, lapack_int* ldz, double* work, lapack_int *info );
17165 void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
17166                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
17167                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
17168                    lapack_int *info );
17169 void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
17170                    lapack_complex_double* ap, double* w,
17171                    lapack_complex_double* z, lapack_int* ldz,
17172                    lapack_complex_double* work, double* rwork,
17173                    lapack_int *info );
17174 void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
17175                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
17176                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17177 void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
17178                     double* w, double* z, lapack_int* ldz, double* work,
17179                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17180                     lapack_int *info );
17181 void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
17182                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
17183                     lapack_int* ldz, lapack_complex_float* work,
17184                     lapack_int* lwork, float* rwork, lapack_int* lrwork,
17185                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17186 void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
17187                     lapack_complex_double* ap, double* w,
17188                     lapack_complex_double* z, lapack_int* ldz,
17189                     lapack_complex_double* work, lapack_int* lwork,
17190                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17191                     lapack_int* liwork, lapack_int *info );
17192 void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
17193                     float* ap, float* vl, float* vu, lapack_int* il,
17194                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17195                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
17196                     lapack_int* ifail, lapack_int *info );
17197 void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
17198                     double* ap, double* vl, double* vu, lapack_int* il,
17199                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17200                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17201                     lapack_int* ifail, lapack_int *info );
17202 void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
17203                     lapack_complex_float* ap, float* vl, float* vu,
17204                     lapack_int* il, lapack_int* iu, float* abstol,
17205                     lapack_int* m, float* w, lapack_complex_float* z,
17206                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
17207                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17208 void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
17209                     lapack_complex_double* ap, double* vl, double* vu,
17210                     lapack_int* il, lapack_int* iu, double* abstol,
17211                     lapack_int* m, double* w, lapack_complex_double* z,
17212                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
17213                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17214 void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17215                    float* ab, lapack_int* ldab, float* w, float* z,
17216                    lapack_int* ldz, float* work, lapack_int *info );
17217 void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17218                    double* ab, lapack_int* ldab, double* w, double* z,
17219                    lapack_int* ldz, double* work, lapack_int *info );
17220 void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17221                    lapack_complex_float* ab, lapack_int* ldab, float* w,
17222                    lapack_complex_float* z, lapack_int* ldz,
17223                    lapack_complex_float* work, float* rwork, lapack_int *info );
17224 void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17225                    lapack_complex_double* ab, lapack_int* ldab, double* w,
17226                    lapack_complex_double* z, lapack_int* ldz,
17227                    lapack_complex_double* work, double* rwork,
17228                    lapack_int *info );
17229 void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17230                     float* ab, lapack_int* ldab, float* w, float* z,
17231                     lapack_int* ldz, float* work, lapack_int* lwork,
17232                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17233 void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17234                     double* ab, lapack_int* ldab, double* w, double* z,
17235                     lapack_int* ldz, double* work, lapack_int* lwork,
17236                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17237 void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17238                     lapack_complex_float* ab, lapack_int* ldab, float* w,
17239                     lapack_complex_float* z, lapack_int* ldz,
17240                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17241                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17242                     lapack_int *info );
17243 void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17244                     lapack_complex_double* ab, lapack_int* ldab, double* w,
17245                     lapack_complex_double* z, lapack_int* ldz,
17246                     lapack_complex_double* work, lapack_int* lwork,
17247                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17248                     lapack_int* liwork, lapack_int *info );
17249 void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17250                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
17251                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
17252                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17253                     float* z, lapack_int* ldz, float* work,
17254                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17255 void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17256                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
17257                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
17258                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17259                     double* z, lapack_int* ldz, double* work,
17260                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17261 void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17262                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
17263                     lapack_complex_float* q, lapack_int* ldq, float* vl,
17264                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17265                     lapack_int* m, float* w, lapack_complex_float* z,
17266                     lapack_int* ldz, lapack_complex_float* work,
17267                     float* rwork, lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17268 void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17269                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
17270                     lapack_complex_double* q, lapack_int* ldq, double* vl,
17271                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17272                     lapack_int* m, double* w, lapack_complex_double* z,
17273                     lapack_int* ldz, lapack_complex_double* work,
17274                     double* rwork, lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17275 void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
17276                    lapack_int* ldz, float* work, lapack_int *info );
17277 void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
17278                    lapack_int* ldz, double* work, lapack_int *info );
17279 void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
17280                     lapack_int* ldz, float* work, lapack_int* lwork,
17281                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17282 void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
17283                     lapack_int* ldz, double* work, lapack_int* lwork,
17284                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17285 void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
17286                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17287                     float* abstol, lapack_int* m, float* w, float* z,
17288                     lapack_int* ldz, float* work, lapack_int* iwork,
17289                     lapack_int* ifail, lapack_int *info );
17290 void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
17291                     double* e, double* vl, double* vu, lapack_int* il,
17292                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17293                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17294                     lapack_int* ifail, lapack_int *info );
17295 void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
17296                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17297                     float* abstol, lapack_int* m, float* w, float* z,
17298                     lapack_int* ldz, lapack_int* isuppz, float* work,
17299                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17300                     lapack_int *info );
17301 void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
17302                     double* e, double* vl, double* vu, lapack_int* il,
17303                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17304                     double* z, lapack_int* ldz, lapack_int* isuppz,
17305                     double* work, lapack_int* lwork, lapack_int* iwork,
17306                     lapack_int* liwork, lapack_int *info );
17307 void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
17308                    lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
17309                    float* wr, float* wi, float* vs, lapack_int* ldvs,
17310                    float* work, lapack_int* lwork, lapack_logical* bwork,
17311                    lapack_int *info );
17312 void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
17313                    lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
17314                    double* wr, double* wi, double* vs, lapack_int* ldvs,
17315                    double* work, lapack_int* lwork, lapack_logical* bwork,
17316                    lapack_int *info );
17317 void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
17318                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17319                    lapack_int* sdim, lapack_complex_float* w,
17320                    lapack_complex_float* vs, lapack_int* ldvs,
17321                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17322                    lapack_logical* bwork, lapack_int *info );
17323 void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
17324                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17325                    lapack_int* sdim, lapack_complex_double* w,
17326                    lapack_complex_double* vs, lapack_int* ldvs,
17327                    lapack_complex_double* work, lapack_int* lwork,
17328                    double* rwork, lapack_logical* bwork, lapack_int *info );
17329 void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
17330                     char* sense, lapack_int* n, float* a, lapack_int* lda,
17331                     lapack_int* sdim, float* wr, float* wi, float* vs,
17332                     lapack_int* ldvs, float* rconde, float* rcondv, float* work,
17333                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17334                     lapack_logical* bwork, lapack_int *info );
17335 void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
17336                     char* sense, lapack_int* n, double* a, lapack_int* lda,
17337                     lapack_int* sdim, double* wr, double* wi, double* vs,
17338                     lapack_int* ldvs, double* rconde, double* rcondv,
17339                     double* work, lapack_int* lwork, lapack_int* iwork,
17340                     lapack_int* liwork, lapack_logical* bwork,
17341                     lapack_int *info );
17342 void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
17343                     char* sense, lapack_int* n, lapack_complex_float* a,
17344                     lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
17345                     lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
17346                     float* rcondv, lapack_complex_float* work,
17347                     lapack_int* lwork, float* rwork, lapack_logical* bwork,
17348                     lapack_int *info );
17349 void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
17350                     char* sense, lapack_int* n, lapack_complex_double* a,
17351                     lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
17352                     lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
17353                     double* rcondv, lapack_complex_double* work,
17354                     lapack_int* lwork, double* rwork, lapack_logical* bwork,
17355                     lapack_int *info );
17356 void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
17357                    lapack_int* lda, float* wr, float* wi, float* vl,
17358                    lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
17359                    lapack_int* lwork, lapack_int *info );
17360 void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
17361                    lapack_int* lda, double* wr, double* wi, double* vl,
17362                    lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
17363                    lapack_int* lwork, lapack_int *info );
17364 void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
17365                    lapack_complex_float* a, lapack_int* lda,
17366                    lapack_complex_float* w, lapack_complex_float* vl,
17367                    lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
17368                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17369                    lapack_int *info );
17370 void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
17371                    lapack_complex_double* a, lapack_int* lda,
17372                    lapack_complex_double* w, lapack_complex_double* vl,
17373                    lapack_int* ldvl, lapack_complex_double* vr,
17374                    lapack_int* ldvr, lapack_complex_double* work,
17375                    lapack_int* lwork, double* rwork, lapack_int *info );
17376 void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17377                     lapack_int* n, float* a, lapack_int* lda, float* wr,
17378                     float* wi, float* vl, lapack_int* ldvl, float* vr,
17379                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17380                     float* scale, float* abnrm, float* rconde, float* rcondv,
17381                     float* work, lapack_int* lwork, lapack_int* iwork,
17382                     lapack_int *info );
17383 void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17384                     lapack_int* n, double* a, lapack_int* lda, double* wr,
17385                     double* wi, double* vl, lapack_int* ldvl, double* vr,
17386                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17387                     double* scale, double* abnrm, double* rconde,
17388                     double* rcondv, double* work, lapack_int* lwork,
17389                     lapack_int* iwork, lapack_int *info );
17390 void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17391                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17392                     lapack_complex_float* w, lapack_complex_float* vl,
17393                     lapack_int* ldvl, lapack_complex_float* vr,
17394                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17395                     float* scale, float* abnrm, float* rconde, float* rcondv,
17396                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17397                     lapack_int *info );
17398 void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17399                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17400                     lapack_complex_double* w, lapack_complex_double* vl,
17401                     lapack_int* ldvl, lapack_complex_double* vr,
17402                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17403                     double* scale, double* abnrm, double* rconde,
17404                     double* rcondv, lapack_complex_double* work,
17405                     lapack_int* lwork, double* rwork, lapack_int *info );
17406 void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17407                     float* a, lapack_int* lda, float* s, float* u,
17408                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
17409                     lapack_int* lwork, lapack_int *info );
17410 void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17411                     double* a, lapack_int* lda, double* s, double* u,
17412                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
17413                     lapack_int* lwork, lapack_int *info );
17414 void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17415                     lapack_complex_float* a, lapack_int* lda, float* s,
17416                     lapack_complex_float* u, lapack_int* ldu,
17417                     lapack_complex_float* vt, lapack_int* ldvt,
17418                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17419                     lapack_int *info );
17420 void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17421                     lapack_complex_double* a, lapack_int* lda, double* s,
17422                     lapack_complex_double* u, lapack_int* ldu,
17423                     lapack_complex_double* vt, lapack_int* ldvt,
17424                     lapack_complex_double* work, lapack_int* lwork,
17425                     double* rwork, lapack_int *info );
17426 void LAPACK_sgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17427                     float* a, lapack_int* lda, float* vl, float* vu,
17428                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s, float* u,
17429                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
17430                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
17431 void LAPACK_dgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17432                     double* a, lapack_int* lda, double* vl, double* vu,
17433                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s, double* u,
17434                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
17435                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
17436 void LAPACK_cgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17437                     lapack_complex_float* a, lapack_int* lda, float* vl, float* vu,
17438                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s,
17439                     lapack_complex_float* u, lapack_int* ldu,
17440                     lapack_complex_float* vt, lapack_int* ldvt,
17441                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17442                     lapack_int *iwork, lapack_int *info );
17443 void LAPACK_zgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17444                     lapack_complex_double* a, lapack_int* lda, double* vl, double* vu,
17445                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s,
17446                     lapack_complex_double* u, lapack_int* ldu,
17447                     lapack_complex_double* vt, lapack_int* ldvt,
17448                     lapack_complex_double* work, lapack_int* lwork,
17449                     double* rwork, lapack_int *iwork, lapack_int *info );
17450 void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
17451                     lapack_int* lda, float* s, float* u, lapack_int* ldu,
17452                     float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
17453                     lapack_int* iwork, lapack_int *info );
17454 void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
17455                     lapack_int* lda, double* s, double* u, lapack_int* ldu,
17456                     double* vt, lapack_int* ldvt, double* work,
17457                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17458 void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
17459                     lapack_complex_float* a, lapack_int* lda, float* s,
17460                     lapack_complex_float* u, lapack_int* ldu,
17461                     lapack_complex_float* vt, lapack_int* ldvt,
17462                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17463                     lapack_int* iwork, lapack_int *info );
17464 void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
17465                     lapack_complex_double* a, lapack_int* lda, double* s,
17466                     lapack_complex_double* u, lapack_int* ldu,
17467                     lapack_complex_double* vt, lapack_int* ldvt,
17468                     lapack_complex_double* work, lapack_int* lwork,
17469                     double* rwork, lapack_int* iwork, lapack_int *info );
17470 void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17471                     char* jobp, lapack_int* m, lapack_int* n, double* a,
17472                     lapack_int* lda, double* sva, double* u, lapack_int* ldu,
17473                     double* v, lapack_int* ldv, double* work, lapack_int* lwork,
17474                     lapack_int* iwork, lapack_int *info );
17475 void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17476                     char* jobp, lapack_int* m, lapack_int* n, float* a,
17477                     lapack_int* lda, float* sva, float* u, lapack_int* ldu,
17478                     float* v, lapack_int* ldv, float* work, lapack_int* lwork,
17479                     lapack_int* iwork, lapack_int *info );
17480 void LAPACK_cgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17481                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_float* a,
17482                     lapack_int* lda, float* sva, lapack_complex_float* u, lapack_int* ldu,
17483                     lapack_complex_float* v, lapack_int* ldv, lapack_complex_float* cwork,
17484                     lapack_int* lwork, float* work, lapack_int* lrwork,
17485                     lapack_int* iwork, lapack_int *info );
17486 void LAPACK_zgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17487                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_double* a,
17488                     lapack_int* lda, double* sva, lapack_complex_double* u, lapack_int* ldu,
17489                     lapack_complex_double* v, lapack_int* ldv, lapack_complex_double* cwork,
17490                     lapack_int* lwork, double* work, lapack_int* lrwork,
17491                     lapack_int* iwork, lapack_int *info );
17492 void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17493                     lapack_int* n, double* a, lapack_int* lda, double* sva,
17494                     lapack_int* mv, double* v, lapack_int* ldv, double* work,
17495                     lapack_int* lwork, lapack_int *info );
17496 void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17497                     lapack_int* n, float* a, lapack_int* lda, float* sva,
17498                     lapack_int* mv, float* v, lapack_int* ldv, float* work,
17499                     lapack_int* lwork, lapack_int *info );
17500 void LAPACK_cgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17501                     lapack_int* n, lapack_complex_float* a, lapack_int* lda, float* sva,
17502                     lapack_int* mv, lapack_complex_float* v, lapack_int* ldv,
17503                     lapack_complex_float* cwork, lapack_int* lwork, float* rwork,
17504                     lapack_int* lrwork, lapack_int *info );
17505 void LAPACK_zgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17506                     lapack_int* n, lapack_complex_double* a, lapack_int* lda, double* sva,
17507                     lapack_int* mv, lapack_complex_double* v, lapack_int* ldv,
17508                     lapack_complex_double* cwork, lapack_int* lwork, double* rwork,
17509                     lapack_int* lrwork, lapack_int *info );
17510 void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17511                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17512                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17513                     float* alpha, float* beta, float* u, lapack_int* ldu,
17514                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
17515                     float* work, lapack_int* iwork, lapack_int *info );
17516 void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17517                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17518                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17519                     double* alpha, double* beta, double* u, lapack_int* ldu,
17520                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
17521                     double* work, lapack_int* iwork, lapack_int *info );
17522 void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17523                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17524                     lapack_complex_float* a, lapack_int* lda,
17525                     lapack_complex_float* b, lapack_int* ldb, float* alpha,
17526                     float* beta, lapack_complex_float* u, lapack_int* ldu,
17527                     lapack_complex_float* v, lapack_int* ldv,
17528                     lapack_complex_float* q, lapack_int* ldq,
17529                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
17530                     lapack_int *info );
17531 void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17532                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17533                     lapack_complex_double* a, lapack_int* lda,
17534                     lapack_complex_double* b, lapack_int* ldb, double* alpha,
17535                     double* beta, lapack_complex_double* u, lapack_int* ldu,
17536                     lapack_complex_double* v, lapack_int* ldv,
17537                     lapack_complex_double* q, lapack_int* ldq,
17538                     lapack_complex_double* work, double* rwork,
17539                     lapack_int* iwork, lapack_int *info );
17540 void LAPACK_sggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17541                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17542                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
17543                      float* alpha, float* beta, float* u, lapack_int* ldu,
17544                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
17545                      float* work, lapack_int* lwork, lapack_int* iwork,
17546                      lapack_int *info );
17547 void LAPACK_dggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17548                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17549                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
17550                      double* alpha, double* beta, double* u, lapack_int* ldu,
17551                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
17552                      double* work, lapack_int* lwork, lapack_int* iwork,
17553                      lapack_int *info );
17554 void LAPACK_cggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17555                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17556                      lapack_complex_float* a, lapack_int* lda,
17557                      lapack_complex_float* b, lapack_int* ldb, float* alpha,
17558                      float* beta, lapack_complex_float* u, lapack_int* ldu,
17559                      lapack_complex_float* v, lapack_int* ldv,
17560                      lapack_complex_float* q, lapack_int* ldq,
17561                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
17562                      lapack_int* iwork, lapack_int *info );
17563 void LAPACK_zggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17564                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17565                      lapack_complex_double* a, lapack_int* lda,
17566                      lapack_complex_double* b, lapack_int* ldb, double* alpha,
17567                      double* beta, lapack_complex_double* u, lapack_int* ldu,
17568                      lapack_complex_double* v, lapack_int* ldv,
17569                      lapack_complex_double* q, lapack_int* ldq,
17570                      lapack_complex_double* work, lapack_int* lwork,
17571                      double* rwork, lapack_int* iwork, lapack_int *info );
17572 void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17573                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
17574                    float* w, float* work, lapack_int* lwork, lapack_int *info );
17575 void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17576                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
17577                    double* w, double* work, lapack_int* lwork,
17578                    lapack_int *info );
17579 void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17580                    lapack_complex_float* a, lapack_int* lda,
17581                    lapack_complex_float* b, lapack_int* ldb, float* w,
17582                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17583                    lapack_int *info );
17584 void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17585                    lapack_complex_double* a, lapack_int* lda,
17586                    lapack_complex_double* b, lapack_int* ldb, double* w,
17587                    lapack_complex_double* work, lapack_int* lwork,
17588                    double* rwork, lapack_int *info );
17589 void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17590                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17591                     float* w, float* work, lapack_int* lwork, lapack_int* iwork,
17592                     lapack_int* liwork, lapack_int *info );
17593 void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17594                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17595                     double* w, double* work, lapack_int* lwork,
17596                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17597 void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17598                     lapack_complex_float* a, lapack_int* lda,
17599                     lapack_complex_float* b, lapack_int* ldb, float* w,
17600                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17601                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17602                     lapack_int *info );
17603 void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17604                     lapack_complex_double* a, lapack_int* lda,
17605                     lapack_complex_double* b, lapack_int* ldb, double* w,
17606                     lapack_complex_double* work, lapack_int* lwork,
17607                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17608                     lapack_int* liwork, lapack_int *info );
17609 void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17610                     lapack_int* n, float* a, lapack_int* lda, float* b,
17611                     lapack_int* ldb, float* vl, float* vu, lapack_int* il,
17612                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17613                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
17614                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17615 void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17616                     lapack_int* n, double* a, lapack_int* lda, double* b,
17617                     lapack_int* ldb, double* vl, double* vu, lapack_int* il,
17618                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17619                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
17620                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17621 void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17622                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17623                     lapack_complex_float* b, lapack_int* ldb, float* vl,
17624                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17625                     lapack_int* m, float* w, lapack_complex_float* z,
17626                     lapack_int* ldz, lapack_complex_float* work,
17627                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17628                     lapack_int* ifail, lapack_int *info );
17629 void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17630                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17631                     lapack_complex_double* b, lapack_int* ldb, double* vl,
17632                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17633                     lapack_int* m, double* w, lapack_complex_double* z,
17634                     lapack_int* ldz, lapack_complex_double* work,
17635                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17636                     lapack_int* ifail, lapack_int *info );
17637 void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17638                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
17639                    float* work, lapack_int *info );
17640 void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17641                    double* ap, double* bp, double* w, double* z,
17642                    lapack_int* ldz, double* work, lapack_int *info );
17643 void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17644                    lapack_complex_float* ap, lapack_complex_float* bp, float* w,
17645                    lapack_complex_float* z, lapack_int* ldz,
17646                    lapack_complex_float* work, float* rwork, lapack_int *info );
17647 void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17648                    lapack_complex_double* ap, lapack_complex_double* bp,
17649                    double* w, lapack_complex_double* z, lapack_int* ldz,
17650                    lapack_complex_double* work, double* rwork,
17651                    lapack_int *info );
17652 void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17653                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
17654                     float* work, lapack_int* lwork, lapack_int* iwork,
17655                     lapack_int* liwork, lapack_int *info );
17656 void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17657                     double* ap, double* bp, double* w, double* z,
17658                     lapack_int* ldz, double* work, lapack_int* lwork,
17659                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17660 void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17661                     lapack_complex_float* ap, lapack_complex_float* bp,
17662                     float* w, lapack_complex_float* z, lapack_int* ldz,
17663                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17664                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17665                     lapack_int *info );
17666 void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17667                     lapack_complex_double* ap, lapack_complex_double* bp,
17668                     double* w, lapack_complex_double* z, lapack_int* ldz,
17669                     lapack_complex_double* work, lapack_int* lwork,
17670                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17671                     lapack_int* liwork, lapack_int *info );
17672 void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17673                     lapack_int* n, float* ap, float* bp, float* vl, float* vu,
17674                     lapack_int* il, lapack_int* iu, float* abstol,
17675                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17676                     float* work, lapack_int* iwork, lapack_int* ifail,
17677                     lapack_int *info );
17678 void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17679                     lapack_int* n, double* ap, double* bp, double* vl,
17680                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17681                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17682                     double* work, lapack_int* iwork, lapack_int* ifail,
17683                     lapack_int *info );
17684 void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17685                     lapack_int* n, lapack_complex_float* ap,
17686                     lapack_complex_float* bp, float* vl, float* vu,
17687                     lapack_int* il, lapack_int* iu, float* abstol,
17688                     lapack_int* m, float* w, lapack_complex_float* z,
17689                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
17690                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17691 void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17692                     lapack_int* n, lapack_complex_double* ap,
17693                     lapack_complex_double* bp, double* vl, double* vu,
17694                     lapack_int* il, lapack_int* iu, double* abstol,
17695                     lapack_int* m, double* w, lapack_complex_double* z,
17696                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
17697                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17698 void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17699                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
17700                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
17701                    float* work, lapack_int *info );
17702 void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17703                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
17704                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
17705                    double* work, lapack_int *info );
17706 void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17707                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
17708                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
17709                    lapack_complex_float* z, lapack_int* ldz,
17710                    lapack_complex_float* work, float* rwork, lapack_int *info );
17711 void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17712                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
17713                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
17714                    lapack_complex_double* z, lapack_int* ldz,
17715                    lapack_complex_double* work, double* rwork,
17716                    lapack_int *info );
17717 void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17718                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
17719                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
17720                     float* work, lapack_int* lwork, lapack_int* iwork,
17721                     lapack_int* liwork, lapack_int *info );
17722 void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17723                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
17724                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
17725                     double* work, lapack_int* lwork, lapack_int* iwork,
17726                     lapack_int* liwork, lapack_int *info );
17727 void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17728                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
17729                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
17730                     lapack_complex_float* z, lapack_int* ldz,
17731                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17732                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17733                     lapack_int *info );
17734 void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17735                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
17736                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
17737                     lapack_complex_double* z, lapack_int* ldz,
17738                     lapack_complex_double* work, lapack_int* lwork,
17739                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17740                     lapack_int* liwork, lapack_int *info );
17741 void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17742                     lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
17743                     float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
17744                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17745                     float* abstol, lapack_int* m, float* w, float* z,
17746                     lapack_int* ldz, float* work, lapack_int* iwork,
17747                     lapack_int* ifail, lapack_int *info );
17748 void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17749                     lapack_int* ka, lapack_int* kb, double* ab,
17750                     lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
17751                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
17752                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17753                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17754                     lapack_int* ifail, lapack_int *info );
17755 void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17756                     lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
17757                     lapack_int* ldab, lapack_complex_float* bb,
17758                     lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
17759                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17760                     float* abstol, lapack_int* m, float* w,
17761                     lapack_complex_float* z, lapack_int* ldz,
17762                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
17763                     lapack_int* ifail, lapack_int *info );
17764 void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17765                     lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
17766                     lapack_int* ldab, lapack_complex_double* bb,
17767                     lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
17768                     double* vl, double* vu, lapack_int* il, lapack_int* iu,
17769                     double* abstol, lapack_int* m, double* w,
17770                     lapack_complex_double* z, lapack_int* ldz,
17771                     lapack_complex_double* work, double* rwork,
17772                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17773 void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
17774                    LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
17775                    lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
17776                    float* alphar, float* alphai, float* beta, float* vsl,
17777                    lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
17778                    float* work, lapack_int* lwork, lapack_logical* bwork,
17779                    lapack_int *info );
17780 void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
17781                    LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
17782                    lapack_int* lda, double* b, lapack_int* ldb,
17783                    lapack_int* sdim, double* alphar, double* alphai,
17784                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17785                    lapack_int* ldvsr, double* work, lapack_int* lwork,
17786                    lapack_logical* bwork, lapack_int *info );
17787 void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
17788                    LAPACK_C_SELECT2 selctg, lapack_int* n,
17789                    lapack_complex_float* a, lapack_int* lda,
17790                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
17791                    lapack_complex_float* alpha, lapack_complex_float* beta,
17792                    lapack_complex_float* vsl, lapack_int* ldvsl,
17793                    lapack_complex_float* vsr, lapack_int* ldvsr,
17794                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17795                    lapack_logical* bwork, lapack_int *info );
17796 void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
17797                    LAPACK_Z_SELECT2 selctg, lapack_int* n,
17798                    lapack_complex_double* a, lapack_int* lda,
17799                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17800                    lapack_complex_double* alpha, lapack_complex_double* beta,
17801                    lapack_complex_double* vsl, lapack_int* ldvsl,
17802                    lapack_complex_double* vsr, lapack_int* ldvsr,
17803                    lapack_complex_double* work, lapack_int* lwork,
17804                    double* rwork, lapack_logical* bwork, lapack_int *info );
17805 void LAPACK_sgges3( char* jobvsl, char* jobvsr, char* sort,
17806                     LAPACK_S_SELECT3 selctg, lapack_int* n,
17807                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17808                     lapack_int* sdim, float* alphar, float* alphai,
17809                     float* beta, float* vsl, lapack_int* ldvsl,
17810                     float* vsr, lapack_int* ldvsr,
17811                     float* work, lapack_int* lwork, lapack_logical* bwork,
17812                     lapack_int *info );
17813 void LAPACK_dgges3( char* jobvsl, char* jobvsr, char* sort,
17814                     LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
17815                     lapack_int* lda, double* b, lapack_int* ldb,
17816                     lapack_int* sdim, double* alphar, double* alphai,
17817                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17818                     lapack_int* ldvsr, double* work, lapack_int* lwork,
17819                     lapack_logical* bwork, lapack_int *info );
17820 void LAPACK_cgges3( char* jobvsl, char* jobvsr, char* sort,
17821                     LAPACK_C_SELECT2 selctg, lapack_int* n,
17822                     lapack_complex_float* a, lapack_int* lda,
17823                     lapack_complex_float* b, lapack_int* ldb,
17824                     lapack_int* sdim,
17825                     lapack_complex_float* alpha, lapack_complex_float* beta,
17826                     lapack_complex_float* vsl, lapack_int* ldvsl,
17827                     lapack_complex_float* vsr, lapack_int* ldvsr,
17828                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17829                     lapack_logical* bwork, lapack_int *info );
17830 void LAPACK_zgges3( char* jobvsl, char* jobvsr, char* sort,
17831                     LAPACK_Z_SELECT2 selctg, lapack_int* n,
17832                     lapack_complex_double* a, lapack_int* lda,
17833                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17834                     lapack_complex_double* alpha, lapack_complex_double* beta,
17835                     lapack_complex_double* vsl, lapack_int* ldvsl,
17836                     lapack_complex_double* vsr, lapack_int* ldvsr,
17837                     lapack_complex_double* work, lapack_int* lwork,
17838                     double* rwork, lapack_logical* bwork, lapack_int *info );
17839 void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
17840                     LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
17841                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17842                     lapack_int* sdim, float* alphar, float* alphai, float* beta,
17843                     float* vsl, lapack_int* ldvsl, float* vsr,
17844                     lapack_int* ldvsr, float* rconde, float* rcondv,
17845                     float* work, lapack_int* lwork, lapack_int* iwork,
17846                     lapack_int* liwork, lapack_logical* bwork,
17847                     lapack_int *info );
17848 void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
17849                     LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
17850                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17851                     lapack_int* sdim, double* alphar, double* alphai,
17852                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17853                     lapack_int* ldvsr, double* rconde, double* rcondv,
17854                     double* work, lapack_int* lwork, lapack_int* iwork,
17855                     lapack_int* liwork, lapack_logical* bwork,
17856                     lapack_int *info );
17857 void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
17858                     LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
17859                     lapack_complex_float* a, lapack_int* lda,
17860                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
17861                     lapack_complex_float* alpha, lapack_complex_float* beta,
17862                     lapack_complex_float* vsl, lapack_int* ldvsl,
17863                     lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
17864                     float* rcondv, lapack_complex_float* work,
17865                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17866                     lapack_int* liwork, lapack_logical* bwork,
17867                     lapack_int *info );
17868 void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
17869                     LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
17870                     lapack_complex_double* a, lapack_int* lda,
17871                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17872                     lapack_complex_double* alpha, lapack_complex_double* beta,
17873                     lapack_complex_double* vsl, lapack_int* ldvsl,
17874                     lapack_complex_double* vsr, lapack_int* ldvsr,
17875                     double* rconde, double* rcondv, lapack_complex_double* work,
17876                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17877                     lapack_int* liwork, lapack_logical* bwork,
17878                     lapack_int *info );
17879 void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
17880                    lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
17881                    float* alphai, float* beta, float* vl, lapack_int* ldvl,
17882                    float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
17883                    lapack_int *info );
17884 void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
17885                    lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
17886                    double* alphai, double* beta, double* vl, lapack_int* ldvl,
17887                    double* vr, lapack_int* ldvr, double* work,
17888                    lapack_int* lwork, lapack_int *info );
17889 void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
17890                    lapack_complex_float* a, lapack_int* lda,
17891                    lapack_complex_float* b, lapack_int* ldb,
17892                    lapack_complex_float* alpha, lapack_complex_float* beta,
17893                    lapack_complex_float* vl, lapack_int* ldvl,
17894                    lapack_complex_float* vr, lapack_int* ldvr,
17895                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17896                    lapack_int *info );
17897 void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
17898                    lapack_complex_double* a, lapack_int* lda,
17899                    lapack_complex_double* b, lapack_int* ldb,
17900                    lapack_complex_double* alpha, lapack_complex_double* beta,
17901                    lapack_complex_double* vl, lapack_int* ldvl,
17902                    lapack_complex_double* vr, lapack_int* ldvr,
17903                    lapack_complex_double* work, lapack_int* lwork,
17904                    double* rwork, lapack_int *info );
17905 void LAPACK_sggev3( char* jobvl, char* jobvr, lapack_int* n, float* a,
17906                     lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
17907                     float* alphai, float* beta, float* vl, lapack_int* ldvl,
17908                     float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
17909                     lapack_int *info );
17910 void LAPACK_dggev3( char* jobvl, char* jobvr, lapack_int* n, double* a,
17911                     lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
17912                     double* alphai, double* beta, double* vl, lapack_int* ldvl,
17913                     double* vr, lapack_int* ldvr, double* work,
17914                     lapack_int* lwork, lapack_int *info );
17915 void LAPACK_cggev3( char* jobvl, char* jobvr, lapack_int* n,
17916                     lapack_complex_float* a, lapack_int* lda,
17917                     lapack_complex_float* b, lapack_int* ldb,
17918                     lapack_complex_float* alpha, lapack_complex_float* beta,
17919                     lapack_complex_float* vl, lapack_int* ldvl,
17920                     lapack_complex_float* vr, lapack_int* ldvr,
17921                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17922                     lapack_int *info );
17923 void LAPACK_zggev3( char* jobvl, char* jobvr, lapack_int* n,
17924                     lapack_complex_double* a, lapack_int* lda,
17925                     lapack_complex_double* b, lapack_int* ldb,
17926                     lapack_complex_double* alpha, lapack_complex_double* beta,
17927                     lapack_complex_double* vl, lapack_int* ldvl,
17928                     lapack_complex_double* vr, lapack_int* ldvr,
17929                     lapack_complex_double* work, lapack_int* lwork,
17930                     double* rwork, lapack_int *info );
17931 void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17932                     lapack_int* n, float* a, lapack_int* lda, float* b,
17933                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
17934                     float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
17935                     lapack_int* ilo, lapack_int* ihi, float* lscale,
17936                     float* rscale, float* abnrm, float* bbnrm, float* rconde,
17937                     float* rcondv, float* work, lapack_int* lwork,
17938                     lapack_int* iwork, lapack_logical* bwork,
17939                     lapack_int *info );
17940 void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17941                     lapack_int* n, double* a, lapack_int* lda, double* b,
17942                     lapack_int* ldb, double* alphar, double* alphai,
17943                     double* beta, double* vl, lapack_int* ldvl, double* vr,
17944                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17945                     double* lscale, double* rscale, double* abnrm,
17946                     double* bbnrm, double* rconde, double* rcondv, double* work,
17947                     lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
17948                     lapack_int *info );
17949 void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17950                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17951                     lapack_complex_float* b, lapack_int* ldb,
17952                     lapack_complex_float* alpha, lapack_complex_float* beta,
17953                     lapack_complex_float* vl, lapack_int* ldvl,
17954                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
17955                     lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
17956                     float* bbnrm, float* rconde, float* rcondv,
17957                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17958                     lapack_int* iwork, lapack_logical* bwork,
17959                     lapack_int *info );
17960 void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17961                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17962                     lapack_complex_double* b, lapack_int* ldb,
17963                     lapack_complex_double* alpha, lapack_complex_double* beta,
17964                     lapack_complex_double* vl, lapack_int* ldvl,
17965                     lapack_complex_double* vr, lapack_int* ldvr,
17966                     lapack_int* ilo, lapack_int* ihi, double* lscale,
17967                     double* rscale, double* abnrm, double* bbnrm,
17968                     double* rconde, double* rcondv, lapack_complex_double* work,
17969                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17970                     lapack_logical* bwork, lapack_int *info );
17971 void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17972                    lapack_int* k, double* alpha, const double* a,
17973                    lapack_int* lda, double* beta, double* c );
17974 void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17975                    lapack_int* k, float* alpha, const float* a, lapack_int* lda,
17976                    float* beta, float* c );
17977 void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17978                    lapack_int* k, double* alpha, const lapack_complex_double* a,
17979                    lapack_int* lda, double* beta, lapack_complex_double* c );
17980 void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17981                    lapack_int* k, float* alpha, const lapack_complex_float* a,
17982                    lapack_int* lda, float* beta, lapack_complex_float* c );
17983 void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
17984                    char* diag, lapack_int* m, lapack_int* n, double* alpha,
17985                    const double* a, double* b, lapack_int* ldb );
17986 void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
17987                    char* diag, lapack_int* m, lapack_int* n, float* alpha,
17988                    const float* a, float* b, lapack_int* ldb );
17989 void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
17990                    char* diag, lapack_int* m, lapack_int* n,
17991                    lapack_complex_double* alpha, const lapack_complex_double* a,
17992                    lapack_complex_double* b, lapack_int* ldb );
17993 void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
17994                    char* diag, lapack_int* m, lapack_int* n,
17995                    lapack_complex_float* alpha, const lapack_complex_float* a,
17996                    lapack_complex_float* b, lapack_int* ldb );
17997 void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
17998                     double* ap, lapack_int *info );
17999 void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
18000                     float* ap, lapack_int *info );
18001 void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
18002                     const lapack_complex_double* arf, lapack_complex_double* ap,
18003                     lapack_int *info );
18004 void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
18005                     const lapack_complex_float* arf, lapack_complex_float* ap,
18006                     lapack_int *info );
18007 void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
18008                     double* a, lapack_int* lda, lapack_int *info );
18009 void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
18010                     float* a, lapack_int* lda, lapack_int *info );
18011 void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
18012                     const lapack_complex_double* arf, lapack_complex_double* a,
18013                     lapack_int* lda, lapack_int *info );
18014 void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
18015                     const lapack_complex_float* arf, lapack_complex_float* a,
18016                     lapack_int* lda, lapack_int *info );
18017 void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
18018                     double* arf, lapack_int *info );
18019 void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
18020                     float* arf, lapack_int *info );
18021 void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
18022                     const lapack_complex_double* ap, lapack_complex_double* arf,
18023                     lapack_int *info );
18024 void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
18025                     const lapack_complex_float* ap, lapack_complex_float* arf,
18026                     lapack_int *info );
18027 void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
18028                     lapack_int* lda, lapack_int *info );
18029 void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
18030                     lapack_int* lda, lapack_int *info );
18031 void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
18032                     lapack_complex_double* a, lapack_int* lda,
18033                     lapack_int *info );
18034 void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
18035                     lapack_complex_float* a, lapack_int* lda,
18036                     lapack_int *info );
18037 void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
18038                     lapack_int* lda, double* arf, lapack_int *info );
18039 void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
18040                     lapack_int* lda, float* arf, lapack_int *info );
18041 void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
18042                     const lapack_complex_double* a, lapack_int* lda,
18043                     lapack_complex_double* arf, lapack_int *info );
18044 void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
18045                     const lapack_complex_float* a, lapack_int* lda,
18046                     lapack_complex_float* arf, lapack_int *info );
18047 void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
18048                     double* ap, lapack_int *info );
18049 void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
18050                     float* ap, lapack_int *info );
18051 void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
18052                     lapack_int* lda, lapack_complex_double* ap,
18053                     lapack_int *info );
18054 void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
18055                     lapack_int* lda, lapack_complex_float* ap,
18056                     lapack_int *info );
18057 void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18058                      float* tau, float* work, lapack_int* lwork,
18059                      lapack_int *info );
18060 void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18061                      double* tau, double* work, lapack_int* lwork,
18062                      lapack_int *info );
18063 void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18064                      lapack_int* lda, lapack_complex_float* tau,
18065                      lapack_complex_float* work, lapack_int* lwork,
18066                      lapack_int *info );
18067 void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18068                      lapack_int* lda, lapack_complex_double* tau,
18069                      lapack_complex_double* work, lapack_int* lwork,
18070                      lapack_int *info );
18071 void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
18072 void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
18073 void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18074                     float* x );
18075 void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18076                     double* x );
18077 void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18078                     lapack_complex_float* x );
18079 void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18080                     lapack_complex_double* x );
18081 void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18082                     float* tau, float* work, lapack_int *info );
18083 void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18084                     double* tau, double* work, lapack_int *info );
18085 void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18086                     lapack_int* lda, lapack_complex_float* tau,
18087                     lapack_complex_float* work, lapack_int *info );
18088 void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18089                     lapack_int* lda, lapack_complex_double* tau,
18090                     lapack_complex_double* work, lapack_int *info );
18091 void LAPACK_slacn2( lapack_int* n, float* v, float* x, lapack_int* isgn,
18092                     float* est, lapack_int* kase, lapack_int* isave );
18093 void LAPACK_dlacn2( lapack_int* n, double* v, double* x, lapack_int* isgn,
18094                     double* est, lapack_int* kase, lapack_int* isave );
18095 void LAPACK_clacn2( lapack_int* n, lapack_complex_float* v,
18096                     lapack_complex_float* x, float* est,
18097                     lapack_int* kase, lapack_int* isave );
18098 void LAPACK_zlacn2( lapack_int* n, lapack_complex_double* v,
18099                     lapack_complex_double* x, double* est,
18100                     lapack_int* kase, lapack_int* isave );
18101 void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
18102                     lapack_int* lda, float* b, lapack_int* ldb );
18103 void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
18104                     lapack_int* lda, double* b, lapack_int* ldb );
18105 void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
18106                     const lapack_complex_float* a, lapack_int* lda,
18107                     lapack_complex_float* b, lapack_int* ldb );
18108 void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
18109                     const lapack_complex_double* a, lapack_int* lda,
18110                     lapack_complex_double* b, lapack_int* ldb );
18111
18112 void LAPACK_clacp2( char* uplo, lapack_int* m, lapack_int* n, const float* a,
18113                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb );
18114 void LAPACK_zlacp2( char* uplo, lapack_int* m, lapack_int* n, const double* a,
18115                     lapack_int* lda, lapack_complex_double* b,
18116                     lapack_int* ldb );
18117
18118 void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18119                     lapack_int* ipiv, lapack_int *info );
18120 void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18121                     lapack_int* ipiv, lapack_int *info );
18122 void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18123                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
18124 void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18125                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
18126 void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
18127                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
18128 void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
18129                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
18130 void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
18131                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
18132                     lapack_int* incx );
18133 void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
18134                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
18135                     lapack_int* incx );
18136 float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
18137                     lapack_int* lda, float* work );
18138 double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
18139                     lapack_int* lda, double* work );
18140 float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
18141                     const lapack_complex_float* a, lapack_int* lda, float* work );
18142 double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
18143                     const lapack_complex_double* a, lapack_int* lda, double* work );
18144 float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
18145                     const lapack_complex_float* a, lapack_int* lda, float* work );
18146 double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
18147                     const lapack_complex_double* a, lapack_int* lda, double* work );
18148 void LAPACK_clarcm( lapack_int* m, lapack_int* n, const float* a,
18149                     lapack_int* lda, const lapack_complex_float* b,
18150                     lapack_int* ldb, lapack_complex_float* c,
18151                     lapack_int* ldc, float* work );
18152 void LAPACK_zlarcm( lapack_int* m, lapack_int* n, const double* a,
18153                     lapack_int* lda, const lapack_complex_double* b,
18154                     lapack_int* ldb, lapack_complex_double* c,
18155                     lapack_int* ldc, double* work );
18156 void LAPACK_clacrm( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
18157                     lapack_int* lda, const float* b,
18158                     lapack_int* ldb, lapack_complex_float* c,
18159                     lapack_int* ldc, float* work );
18160 void LAPACK_zlacrm( lapack_int* m, lapack_int* n, const lapack_complex_double* a,
18161                     lapack_int* lda, const double* b,
18162                     lapack_int* ldb, lapack_complex_double* c,
18163                     lapack_int* ldc, double* work );
18164 float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
18165                     lapack_int* lda, float* work );
18166 double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
18167                     lapack_int* lda, double* work );
18168 float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
18169                     const lapack_complex_float* a, lapack_int* lda, float* work );
18170 double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
18171                     const lapack_complex_double* a, lapack_int* lda, double* work );
18172 float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
18173                     lapack_int* n, const float* a, lapack_int* lda, float* work );
18174 double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
18175                     lapack_int* n, const double* a, lapack_int* lda, double* work );
18176 float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
18177                     lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
18178                     float* work );
18179 double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
18180                     lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
18181                     double* work );
18182 float LAPACK_slamch( char* cmach );
18183 double LAPACK_dlamch( char* cmach );
18184 void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18185                     float* tau, float* work, lapack_int *info );
18186 void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18187                     double* tau, double* work, lapack_int *info );
18188 void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18189                     lapack_int* lda, lapack_complex_float* tau,
18190                     lapack_complex_float* work, lapack_int *info );
18191 void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18192                     lapack_int* lda, lapack_complex_double* tau,
18193                     lapack_complex_double* work, lapack_int *info );
18194 void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
18195                     lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
18196                     lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
18197                     lapack_int* ldc, float* work, lapack_int* ldwork );
18198 void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
18199                     lapack_int* m, lapack_int* n, lapack_int* k,
18200                     const double* v, lapack_int* ldv, const double* t,
18201                     lapack_int* ldt, double* c, lapack_int* ldc, double* work,
18202                     lapack_int* ldwork );
18203 void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
18204                     lapack_int* m, lapack_int* n, lapack_int* k,
18205                     const lapack_complex_float* v, lapack_int* ldv,
18206                     const lapack_complex_float* t, lapack_int* ldt,
18207                     lapack_complex_float* c, lapack_int* ldc,
18208                     lapack_complex_float* work, lapack_int* ldwork );
18209 void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
18210                     lapack_int* m, lapack_int* n, lapack_int* k,
18211                     const lapack_complex_double* v, lapack_int* ldv,
18212                     const lapack_complex_double* t, lapack_int* ldt,
18213                     lapack_complex_double* c, lapack_int* ldc,
18214                     lapack_complex_double* work, lapack_int* ldwork );
18215 void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
18216                     float* tau );
18217 void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
18218                     double* tau );
18219 void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
18220                     lapack_complex_float* x, lapack_int* incx,
18221                     lapack_complex_float* tau );
18222 void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
18223                     lapack_complex_double* x, lapack_int* incx,
18224                     lapack_complex_double* tau );
18225 void LAPACK_slassq( lapack_int *n,                 float* x, lapack_int *incx,  float* scale,  float* sumsq );
18226 void LAPACK_dlassq( lapack_int *n,                double* x, lapack_int *incx, double* scale, double* sumsq );
18227 void LAPACK_classq( lapack_int *n,  lapack_complex_float* x, lapack_int *incx,  float* scale,  float* sumsq );
18228 void LAPACK_zlassq( lapack_int *n, lapack_complex_double* x, lapack_int *incx, double* scale, double* sumsq );
18229 void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18230                     const float* v, lapack_int* ldv, const float* tau, float* t,
18231                     lapack_int* ldt );
18232 void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18233                     const double* v, lapack_int* ldv, const double* tau,
18234                     double* t, lapack_int* ldt );
18235 void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18236                     const lapack_complex_float* v, lapack_int* ldv,
18237                     const lapack_complex_float* tau, lapack_complex_float* t,
18238                     lapack_int* ldt );
18239 void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18240                     const lapack_complex_double* v, lapack_int* ldv,
18241                     const lapack_complex_double* tau, lapack_complex_double* t,
18242                     lapack_int* ldt );
18243 void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
18244                     float* tau, float* c, lapack_int* ldc, float* work );
18245 void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
18246                     double* tau, double* c, lapack_int* ldc, double* work );
18247 void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
18248                     const lapack_complex_float* v, lapack_complex_float* tau,
18249                     lapack_complex_float* c, lapack_int* ldc,
18250                     lapack_complex_float* work );
18251 void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
18252                     const lapack_complex_double* v, lapack_complex_double* tau,
18253                     lapack_complex_double* c, lapack_int* ldc,
18254                     lapack_complex_double* work );
18255 void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18256                     char* sym, float* d, lapack_int* mode, float* cond,
18257                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18258                     float* a, lapack_int* lda, float* work, lapack_int *info );
18259 void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18260                     char* sym, double* d, lapack_int* mode, double* cond,
18261                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18262                     double* a, lapack_int* lda, double* work,
18263                     lapack_int *info );
18264 void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18265                     char* sym, float* d, lapack_int* mode, float* cond,
18266                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18267                     lapack_complex_float* a, lapack_int* lda,
18268                     lapack_complex_float* work, lapack_int *info );
18269 void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18270                     char* sym, double* d, lapack_int* mode, double* cond,
18271                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18272                     lapack_complex_double* a, lapack_int* lda,
18273                     lapack_complex_double* work, lapack_int *info );
18274 void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
18275                     lapack_int* ldsa, double* a, lapack_int* lda,
18276                     lapack_int *info );
18277 void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
18278                     lapack_int* lda, float* sa, lapack_int* ldsa,
18279                     lapack_int *info );
18280 void LAPACK_clag2z( lapack_int* m, lapack_int* n,
18281                     const lapack_complex_float* sa, lapack_int* ldsa,
18282                     lapack_complex_double* a, lapack_int* lda,
18283                     lapack_int *info );
18284 void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
18285                     const lapack_complex_double* a, lapack_int* lda,
18286                     lapack_complex_float* sa, lapack_int* ldsa,
18287                     lapack_int *info );
18288 void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18289                     lapack_int *info );
18290 void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18291                     lapack_int *info );
18292 void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
18293                     lapack_int* lda, lapack_int *info );
18294 void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
18295                     lapack_int* lda, lapack_int *info );
18296 void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18297                     lapack_int* ku, const float* d, float* a, lapack_int* lda,
18298                     lapack_int* iseed, float* work, lapack_int *info );
18299 void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18300                     lapack_int* ku, const double* d, double* a, lapack_int* lda,
18301                     lapack_int* iseed, double* work, lapack_int *info );
18302 void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18303                     lapack_int* ku, const float* d, lapack_complex_float* a,
18304                     lapack_int* lda, lapack_int* iseed,
18305                     lapack_complex_float* work, lapack_int *info );
18306 void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18307                     lapack_int* ku, const double* d, lapack_complex_double* a,
18308                     lapack_int* lda, lapack_int* iseed,
18309                     lapack_complex_double* work, lapack_int *info );
18310 void LAPACK_slascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
18311                     float* cto, lapack_int* m, lapack_int* n, float* a,
18312                     lapack_int* lda, lapack_int *info );
18313 void LAPACK_dlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
18314                     double* cto, lapack_int* m, lapack_int* n, double* a,
18315                     lapack_int* lda, lapack_int *info );
18316 void LAPACK_clascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
18317                     float* cto, lapack_int* m, lapack_int* n, lapack_complex_float* a,
18318                     lapack_int* lda, lapack_int *info );
18319 void LAPACK_zlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
18320                     double* cto, lapack_int* m, lapack_int* n, lapack_complex_double* a,
18321                     lapack_int* lda, lapack_int *info );
18322 void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
18323                     float* beta, float* a, lapack_int* lda );
18324 void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
18325                     double* beta, double* a, lapack_int* lda );
18326 void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
18327                     lapack_complex_float* alpha, lapack_complex_float* beta,
18328                     lapack_complex_float* a, lapack_int* lda );
18329 void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
18330                     lapack_complex_double* alpha, lapack_complex_double* beta,
18331                     lapack_complex_double* a, lapack_int* lda );
18332 void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
18333 void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
18334 void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
18335                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
18336                     lapack_complex_float* work, lapack_int *info );
18337 void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
18338                     lapack_complex_double* a, lapack_int* lda,
18339                     lapack_int* iseed, lapack_complex_double* work,
18340                     lapack_int *info );
18341 void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
18342                     lapack_int* lda, lapack_int* iseed, float* work,
18343                     lapack_int *info );
18344 void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
18345                     lapack_int* lda, lapack_int* iseed, double* work,
18346                     lapack_int *info );
18347 void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
18348                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
18349                     lapack_complex_float* work, lapack_int *info );
18350 void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
18351                     lapack_complex_double* a, lapack_int* lda,
18352                     lapack_int* iseed, lapack_complex_double* work,
18353                     lapack_int *info );
18354 void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18355                     float* x, lapack_int* ldx, lapack_int* k );
18356 void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18357                     double* x, lapack_int* ldx, lapack_int* k );
18358 void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18359                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
18360 void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18361                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
18362 void LAPACK_slapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18363                     float* x, lapack_int* ldx, lapack_int* k );
18364 void LAPACK_dlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18365                     double* x, lapack_int* ldx, lapack_int* k );
18366 void LAPACK_clapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18367                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
18368 void LAPACK_zlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18369                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
18370 float LAPACK_slapy2( float* x, float* y );
18371 double LAPACK_dlapy2( double* x, double* y );
18372 float LAPACK_slapy3( float* x, float* y, float* z );
18373 double LAPACK_dlapy3( double* x, double* y, double* z );
18374 void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
18375 void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
18376 void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
18377 void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
18378                      double* sn );
18379 // LAPACK 3.3.0
18380 void LAPACK_cbbcsd( char* jobu1, char* jobu2,
18381                     char* jobv1t, char* jobv2t, char* trans,
18382                     lapack_int* m, lapack_int* p, lapack_int* q,
18383                     float* theta, float* phi,
18384                     lapack_complex_float* u1, lapack_int* ldu1,
18385                     lapack_complex_float* u2, lapack_int* ldu2,
18386                     lapack_complex_float* v1t, lapack_int* ldv1t,
18387                     lapack_complex_float* v2t, lapack_int* ldv2t,
18388                     float* b11d, float* b11e, float* b12d,
18389                     float* b12e, float* b21d, float* b21e,
18390                     float* b22d, float* b22e, float* rwork,
18391                     lapack_int* lrwork , lapack_int *info );
18392 void LAPACK_cheswapr( char* uplo, lapack_int* n, lapack_complex_float* a,
18393                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18394 void LAPACK_chetri2( char* uplo, lapack_int* n,
18395                      lapack_complex_float* a, lapack_int* lda,
18396                      const lapack_int* ipiv,
18397                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
18398 void LAPACK_chetri2x( char* uplo, lapack_int* n,
18399                       lapack_complex_float* a, lapack_int* lda,
18400                       const lapack_int* ipiv,
18401                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
18402 void LAPACK_chetrs2( char* uplo, lapack_int* n,
18403                      lapack_int* nrhs, const lapack_complex_float* a,
18404                      lapack_int* lda, const lapack_int* ipiv,
18405                      lapack_complex_float* b, lapack_int* ldb,
18406                      lapack_complex_float* work , lapack_int *info );
18407 void LAPACK_csyconv( char* uplo, char* way,
18408                      lapack_int* n, lapack_complex_float* a,
18409                      lapack_int* lda, const lapack_int* ipiv,
18410                      lapack_complex_float* e , lapack_int *info );
18411 void LAPACK_csyswapr( char* uplo, lapack_int* n,
18412                       lapack_complex_float* a, lapack_int* lda,
18413                       lapack_int* i1, lapack_int* i2 );
18414 void LAPACK_csytri2( char* uplo, lapack_int* n,
18415                      lapack_complex_float* a, lapack_int* lda,
18416                      const lapack_int* ipiv,
18417                      lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
18418 void LAPACK_csytri2x( char* uplo, lapack_int* n,
18419                       lapack_complex_float* a, lapack_int* lda,
18420                       const lapack_int* ipiv,
18421                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
18422 void LAPACK_csytrs2( char* uplo, lapack_int* n,
18423                      lapack_int* nrhs, const lapack_complex_float* a,
18424                      lapack_int* lda, const lapack_int* ipiv,
18425                      lapack_complex_float* b, lapack_int* ldb,
18426                      lapack_complex_float* work , lapack_int *info );
18427 void LAPACK_cunbdb( char* trans, char* signs,
18428                     lapack_int* m, lapack_int* p, lapack_int* q,
18429                     lapack_complex_float* x11, lapack_int* ldx11,
18430                     lapack_complex_float* x12, lapack_int* ldx12,
18431                     lapack_complex_float* x21, lapack_int* ldx21,
18432                     lapack_complex_float* x22, lapack_int* ldx22,
18433                     float* theta, float* phi,
18434                     lapack_complex_float* taup1,
18435                     lapack_complex_float* taup2,
18436                     lapack_complex_float* tauq1,
18437                     lapack_complex_float* tauq2,
18438                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
18439 void LAPACK_cuncsd( char* jobu1, char* jobu2,
18440                     char* jobv1t, char* jobv2t, char* trans,
18441                     char* signs, lapack_int* m, lapack_int* p,
18442                     lapack_int* q, lapack_complex_float* x11,
18443                     lapack_int* ldx11, lapack_complex_float* x12,
18444                     lapack_int* ldx12, lapack_complex_float* x21,
18445                     lapack_int* ldx21, lapack_complex_float* x22,
18446                     lapack_int* ldx22, float* theta,
18447                     lapack_complex_float* u1, lapack_int* ldu1,
18448                     lapack_complex_float* u2, lapack_int* ldu2,
18449                     lapack_complex_float* v1t, lapack_int* ldv1t,
18450                     lapack_complex_float* v2t, lapack_int* ldv2t,
18451                     lapack_complex_float* work, lapack_int* lwork,
18452                     float* rwork, lapack_int* lrwork,
18453                     lapack_int* iwork , lapack_int *info );
18454 void LAPACK_cuncsd2by1( char* jobu1, char* jobu2,
18455                     char* jobv1t, lapack_int* m, lapack_int* p,
18456                     lapack_int* q, lapack_complex_float* x11,
18457                     lapack_int* ldx11, lapack_complex_float* x21,
18458                     lapack_int* ldx21, float* theta,
18459                     lapack_complex_float* u1, lapack_int* ldu1,
18460                     lapack_complex_float* u2, lapack_int* ldu2,
18461                     lapack_complex_float* v1t, lapack_int* ldv1t,
18462                     lapack_complex_float* work, lapack_int* lwork,
18463                     float* rwork, lapack_int* lrwork,
18464                     lapack_int* iwork , lapack_int *info );
18465 void LAPACK_dbbcsd( char* jobu1, char* jobu2,
18466                     char* jobv1t, char* jobv2t, char* trans,
18467                     lapack_int* m, lapack_int* p, lapack_int* q,
18468                     double* theta, double* phi, double* u1,
18469                     lapack_int* ldu1, double* u2, lapack_int* ldu2,
18470                     double* v1t, lapack_int* ldv1t, double* v2t,
18471                     lapack_int* ldv2t, double* b11d, double* b11e,
18472                     double* b12d, double* b12e, double* b21d,
18473                     double* b21e, double* b22d, double* b22e,
18474                     double* work, lapack_int* lwork , lapack_int *info );
18475 void LAPACK_dorbdb( char* trans, char* signs,
18476                     lapack_int* m, lapack_int* p, lapack_int* q,
18477                     double* x11, lapack_int* ldx11, double* x12,
18478                     lapack_int* ldx12, double* x21, lapack_int* ldx21,
18479                     double* x22, lapack_int* ldx22, double* theta,
18480                     double* phi, double* taup1, double* taup2,
18481                     double* tauq1, double* tauq2, double* work,
18482                     lapack_int* lwork , lapack_int *info );
18483 void LAPACK_dorcsd( char* jobu1, char* jobu2,
18484                     char* jobv1t, char* jobv2t, char* trans,
18485                     char* signs, lapack_int* m, lapack_int* p,
18486                     lapack_int* q, double* x11, lapack_int* ldx11,
18487                     double* x12, lapack_int* ldx12, double* x21,
18488                     lapack_int* ldx21, double* x22, lapack_int* ldx22,
18489                     double* theta, double* u1, lapack_int* ldu1,
18490                     double* u2, lapack_int* ldu2, double* v1t,
18491                     lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
18492                     double* work, lapack_int* lwork,
18493                     lapack_int* iwork , lapack_int *info );
18494 void LAPACK_dorcsd2by1( char* jobu1, char* jobu2,
18495                     char* jobv1t, lapack_int* m, lapack_int* p,
18496                     lapack_int* q, double* x11, lapack_int* ldx11,
18497                     double* x21, lapack_int* ldx21,
18498                     double* theta, double* u1, lapack_int* ldu1,
18499                     double* u2, lapack_int* ldu2, double* v1t,
18500                     lapack_int* ldv1t, double* work, lapack_int* lwork,
18501                     lapack_int* iwork , lapack_int *info );
18502 void LAPACK_dsyconv( char* uplo, char* way,
18503                      lapack_int* n, double* a, lapack_int* lda,
18504                      const lapack_int* ipiv, double* e , lapack_int *info );
18505 void LAPACK_dsyswapr( char* uplo, lapack_int* n, double* a,
18506                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18507 void LAPACK_dsytri2( char* uplo, lapack_int* n,
18508                      double* a, lapack_int* lda,
18509                      const lapack_int* ipiv,
18510                      double* work, lapack_int* lwork , lapack_int *info );
18511 void LAPACK_dsytri2x( char* uplo, lapack_int* n,
18512                       double* a, lapack_int* lda,
18513                       const lapack_int* ipiv, double* work,
18514                       lapack_int* nb , lapack_int *info );
18515 void LAPACK_dsytrs2( char* uplo, lapack_int* n,
18516                      lapack_int* nrhs, const double* a,
18517                      lapack_int* lda, const lapack_int* ipiv,
18518                      double* b, lapack_int* ldb, double* work , lapack_int *info );
18519 void LAPACK_sbbcsd( char* jobu1, char* jobu2,
18520                     char* jobv1t, char* jobv2t, char* trans,
18521                     lapack_int* m, lapack_int* p, lapack_int* q,
18522                     float* theta, float* phi, float* u1,
18523                     lapack_int* ldu1, float* u2, lapack_int* ldu2,
18524                     float* v1t, lapack_int* ldv1t, float* v2t,
18525                     lapack_int* ldv2t, float* b11d, float* b11e,
18526                     float* b12d, float* b12e, float* b21d,
18527                     float* b21e, float* b22d, float* b22e,
18528                     float* work, lapack_int* lwork , lapack_int *info );
18529 void LAPACK_sorbdb( char* trans, char* signs,
18530                     lapack_int* m, lapack_int* p, lapack_int* q,
18531                     float* x11, lapack_int* ldx11, float* x12,
18532                     lapack_int* ldx12, float* x21, lapack_int* ldx21,
18533                     float* x22, lapack_int* ldx22, float* theta,
18534                     float* phi, float* taup1, float* taup2,
18535                     float* tauq1, float* tauq2, float* work,
18536                     lapack_int* lwork , lapack_int *info );
18537 void LAPACK_sorcsd( char* jobu1, char* jobu2,
18538                     char* jobv1t, char* jobv2t, char* trans,
18539                     char* signs, lapack_int* m, lapack_int* p,
18540                     lapack_int* q, float* x11, lapack_int* ldx11,
18541                     float* x12, lapack_int* ldx12, float* x21,
18542                     lapack_int* ldx21, float* x22, lapack_int* ldx22,
18543                     float* theta, float* u1, lapack_int* ldu1,
18544                     float* u2, lapack_int* ldu2, float* v1t,
18545                     lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
18546                     float* work, lapack_int* lwork,
18547                     lapack_int* iwork , lapack_int *info );
18548 void LAPACK_sorcsd2by1( char* jobu1, char* jobu2,
18549                     char* jobv1t, lapack_int* m, lapack_int* p,
18550                     lapack_int* q, float* x11, lapack_int* ldx11,
18551                     float* x21, lapack_int* ldx21,
18552                     float* theta, float* u1, lapack_int* ldu1,
18553                     float* u2, lapack_int* ldu2, float* v1t,
18554                     lapack_int* ldv1t, float* work, lapack_int* lwork,
18555                     lapack_int* iwork , lapack_int *info );
18556 void LAPACK_ssyconv( char* uplo, char* way,
18557                      lapack_int* n, float* a, lapack_int* lda,
18558                      const lapack_int* ipiv, float* e , lapack_int *info );
18559 void LAPACK_ssyswapr( char* uplo, lapack_int* n, float* a,
18560                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18561 void LAPACK_ssytri2( char* uplo, lapack_int* n,
18562                      float* a, lapack_int* lda,
18563                      const lapack_int* ipiv,
18564                      float* work, lapack_int* lwork , lapack_int *info );
18565 void LAPACK_ssytri2x( char* uplo, lapack_int* n,
18566                       float* a, lapack_int* lda,
18567                       const lapack_int* ipiv, float* work,
18568                       lapack_int* nb , lapack_int *info );
18569 void LAPACK_ssytrs2( char* uplo, lapack_int* n,
18570                      lapack_int* nrhs, const float* a,
18571                      lapack_int* lda, const lapack_int* ipiv,
18572                      float* b, lapack_int* ldb, float* work , lapack_int *info );
18573 void LAPACK_zbbcsd( char* jobu1, char* jobu2,
18574                     char* jobv1t, char* jobv2t, char* trans,
18575                     lapack_int* m, lapack_int* p, lapack_int* q,
18576                     double* theta, double* phi,
18577                     lapack_complex_double* u1, lapack_int* ldu1,
18578                     lapack_complex_double* u2, lapack_int* ldu2,
18579                     lapack_complex_double* v1t, lapack_int* ldv1t,
18580                     lapack_complex_double* v2t, lapack_int* ldv2t,
18581                     double* b11d, double* b11e, double* b12d,
18582                     double* b12e, double* b21d, double* b21e,
18583                     double* b22d, double* b22e, double* rwork,
18584                     lapack_int* lrwork , lapack_int *info );
18585 void LAPACK_zheswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
18586                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18587 void LAPACK_zhetri2( char* uplo, lapack_int* n,
18588                      lapack_complex_double* a, lapack_int* lda,
18589                      const lapack_int* ipiv,
18590                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
18591 void LAPACK_zhetri2x( char* uplo, lapack_int* n,
18592                       lapack_complex_double* a, lapack_int* lda,
18593                       const lapack_int* ipiv,
18594                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
18595 void LAPACK_zhetrs2( char* uplo, lapack_int* n,
18596                      lapack_int* nrhs,
18597                      const lapack_complex_double* a, lapack_int* lda,
18598                      const lapack_int* ipiv,
18599                      lapack_complex_double* b, lapack_int* ldb,
18600                      lapack_complex_double* work , lapack_int *info );
18601 void LAPACK_zsyconv( char* uplo, char* way,
18602                      lapack_int* n, lapack_complex_double* a,
18603                      lapack_int* lda, const lapack_int* ipiv,
18604                      lapack_complex_double* e , lapack_int *info );
18605 void LAPACK_zsyswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
18606                       lapack_int* lda, lapack_int* i1,
18607                       lapack_int* i2 );
18608 void LAPACK_zsytri2( char* uplo, lapack_int* n,
18609                      lapack_complex_double* a, lapack_int* lda,
18610                      const lapack_int* ipiv,
18611                      lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
18612 void LAPACK_zsytri2x( char* uplo, lapack_int* n,
18613                       lapack_complex_double* a, lapack_int* lda,
18614                       const lapack_int* ipiv,
18615                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
18616 void LAPACK_zsytrs2( char* uplo, lapack_int* n,
18617                      lapack_int* nrhs,
18618                      const lapack_complex_double* a, lapack_int* lda,
18619                      const lapack_int* ipiv,
18620                      lapack_complex_double* b, lapack_int* ldb,
18621                      lapack_complex_double* work , lapack_int *info );
18622 void LAPACK_zunbdb( char* trans, char* signs,
18623                     lapack_int* m, lapack_int* p, lapack_int* q,
18624                     lapack_complex_double* x11, lapack_int* ldx11,
18625                     lapack_complex_double* x12, lapack_int* ldx12,
18626                     lapack_complex_double* x21, lapack_int* ldx21,
18627                     lapack_complex_double* x22, lapack_int* ldx22,
18628                     double* theta, double* phi,
18629                     lapack_complex_double* taup1,
18630                     lapack_complex_double* taup2,
18631                     lapack_complex_double* tauq1,
18632                     lapack_complex_double* tauq2,
18633                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
18634 void LAPACK_zuncsd( char* jobu1, char* jobu2,
18635                     char* jobv1t, char* jobv2t, char* trans,
18636                     char* signs, lapack_int* m, lapack_int* p,
18637                     lapack_int* q, lapack_complex_double* x11,
18638                     lapack_int* ldx11, lapack_complex_double* x12,
18639                     lapack_int* ldx12, lapack_complex_double* x21,
18640                     lapack_int* ldx21, lapack_complex_double* x22,
18641                     lapack_int* ldx22, double* theta,
18642                     lapack_complex_double* u1, lapack_int* ldu1,
18643                     lapack_complex_double* u2, lapack_int* ldu2,
18644                     lapack_complex_double* v1t, lapack_int* ldv1t,
18645                     lapack_complex_double* v2t, lapack_int* ldv2t,
18646                     lapack_complex_double* work, lapack_int* lwork,
18647                     double* rwork, lapack_int* lrwork,
18648                     lapack_int* iwork , lapack_int *info );
18649 void LAPACK_zuncsd2by1( char* jobu1, char* jobu2,
18650                     char* jobv1t, lapack_int* m, lapack_int* p,
18651                     lapack_int* q, lapack_complex_double* x11,
18652                     lapack_int* ldx11, lapack_complex_double* x21,
18653                     lapack_int* ldx21, double* theta,
18654                     lapack_complex_double* u1, lapack_int* ldu1,
18655                     lapack_complex_double* u2, lapack_int* ldu2,
18656                     lapack_complex_double* v1t, lapack_int* ldv1t,
18657                     lapack_complex_double* work, lapack_int* lwork,
18658                     double* rwork, lapack_int* lrwork,
18659                     lapack_int* iwork , lapack_int *info );
18660 // LAPACK 3.4.0
18661 void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18662                      lapack_int* k, lapack_int* nb, const float* v,
18663                      lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
18664                      lapack_int* ldc, float* work, lapack_int *info );
18665 void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18666                      lapack_int* k, lapack_int* nb, const double* v,
18667                      lapack_int* ldv, const double* t, lapack_int* ldt,
18668                      double* c, lapack_int* ldc, double* work,
18669                      lapack_int *info );
18670 void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18671                      lapack_int* k, lapack_int* nb,
18672                      const lapack_complex_float* v, lapack_int* ldv,
18673                      const lapack_complex_float* t, lapack_int* ldt,
18674                      lapack_complex_float* c, lapack_int* ldc,
18675                      lapack_complex_float* work, lapack_int *info );
18676 void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18677                      lapack_int* k, lapack_int* nb,
18678                      const lapack_complex_double* v, lapack_int* ldv,
18679                      const lapack_complex_double* t, lapack_int* ldt,
18680                      lapack_complex_double* c, lapack_int* ldc,
18681                      lapack_complex_double* work, lapack_int *info );
18682 void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
18683                     lapack_int* lda, float* t, lapack_int* ldt, float* work,
18684                     lapack_int *info );
18685 void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
18686                     lapack_int* lda, double* t, lapack_int* ldt, double* work,
18687                     lapack_int *info );
18688 void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
18689                     lapack_complex_float* a, lapack_int* lda,
18690                     lapack_complex_float* t, lapack_int* ldt,
18691                     lapack_complex_float* work, lapack_int *info );
18692 void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
18693                     lapack_complex_double* a, lapack_int* lda,
18694                     lapack_complex_double* t, lapack_int* ldt,
18695                     lapack_complex_double* work, lapack_int *info );
18696 void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18697                      float* t, lapack_int* ldt, lapack_int *info );
18698 void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18699                      double* t, lapack_int* ldt, lapack_int *info );
18700 void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18701                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
18702                      lapack_int *info );
18703 void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18704                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
18705                      lapack_int *info );
18706 void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18707                      float* t, lapack_int* ldt, lapack_int *info );
18708 void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18709                      double* t, lapack_int* ldt, lapack_int *info );
18710 void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18711                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
18712                      lapack_int *info );
18713 void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18714                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
18715                      lapack_int *info );
18716 void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18717                      lapack_int* k, lapack_int* l, lapack_int* nb,
18718                      const float* v, lapack_int* ldv, const float* t,
18719                      lapack_int* ldt, float* a, lapack_int* lda, float* b,
18720                      lapack_int* ldb, float* work, lapack_int *info );
18721 void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18722                      lapack_int* k, lapack_int* l, lapack_int* nb,
18723                      const double* v, lapack_int* ldv, const double* t,
18724                      lapack_int* ldt, double* a, lapack_int* lda, double* b,
18725                      lapack_int* ldb, double* work, lapack_int *info );
18726 void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18727                      lapack_int* k, lapack_int* l, lapack_int* nb,
18728                      const lapack_complex_float* v, lapack_int* ldv,
18729                      const lapack_complex_float* t, lapack_int* ldt,
18730                      lapack_complex_float* a, lapack_int* lda,
18731                      lapack_complex_float* b, lapack_int* ldb,
18732                      lapack_complex_float* work, lapack_int *info );
18733 void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18734                      lapack_int* k, lapack_int* l, lapack_int* nb,
18735                      const lapack_complex_double* v, lapack_int* ldv,
18736                      const lapack_complex_double* t, lapack_int* ldt,
18737                      lapack_complex_double* a, lapack_int* lda,
18738                      lapack_complex_double* b, lapack_int* ldb,
18739                      lapack_complex_double* work, lapack_int *info );
18740 void LAPACK_stpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18741                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
18742                     float* t, lapack_int* ldt, float* work, lapack_int *info );
18743 void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18744                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
18745                     double* t, lapack_int* ldt, double* work,
18746                     lapack_int *info );
18747 void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18748                     lapack_complex_float* a, lapack_int* lda,
18749                     lapack_complex_float* b, lapack_int* ldb,
18750                     lapack_complex_float* t, lapack_int* ldt,
18751                     lapack_complex_float* work, lapack_int *info );
18752 void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18753                     lapack_complex_double* a, lapack_int* lda,
18754                     lapack_complex_double* b, lapack_int* ldb,
18755                     lapack_complex_double* t, lapack_int* ldt,
18756                     lapack_complex_double* work, lapack_int *info );
18757 void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18758                      float* a, lapack_int* lda,
18759                      float* b, lapack_int* ldb,
18760                      float* t, lapack_int* ldt,
18761                      lapack_int *info );
18762 void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18763                      double* a, lapack_int* lda,
18764                      double* b, lapack_int* ldb,
18765                      double* t, lapack_int* ldt,
18766                      lapack_int *info );
18767 void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18768                      lapack_complex_float* a, lapack_int* lda,
18769                      lapack_complex_float* b, lapack_int* ldb,
18770                      lapack_complex_float* t, lapack_int* ldt,
18771                      lapack_int *info );
18772 void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18773                      lapack_complex_double* a, lapack_int* lda,
18774                      lapack_complex_double* b, lapack_int* ldb,
18775                      lapack_complex_double* t, lapack_int* ldt,
18776                      lapack_int *info );
18777 void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
18778                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18779                     const float* v, lapack_int* ldv, const float* t,
18780                     lapack_int* ldt, float* a, lapack_int* lda, float* b,
18781                     lapack_int* ldb, const float* work,
18782                     lapack_int* ldwork );
18783 void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
18784                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18785                     const double* v, lapack_int* ldv, const double* t,
18786                     lapack_int* ldt, double* a, lapack_int* lda, double* b,
18787                     lapack_int* ldb, const double* work,
18788                     lapack_int* ldwork );
18789 void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
18790                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18791                     const lapack_complex_float* v, lapack_int* ldv,
18792                     const lapack_complex_float* t, lapack_int* ldt,
18793                     lapack_complex_float* a, lapack_int* lda,
18794                     lapack_complex_float* b, lapack_int* ldb,
18795                     lapack_complex_float* work, lapack_int* ldwork );
18796 void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
18797                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18798                     const lapack_complex_double* v, lapack_int* ldv,
18799                     const lapack_complex_double* t, lapack_int* ldt,
18800                     lapack_complex_double* a, lapack_int* lda,
18801                     lapack_complex_double* b, lapack_int* ldb,
18802                     lapack_complex_double* work, lapack_int* ldwork );
18803 // LAPACK 3.5.0
18804 void LAPACK_ssysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18805                         lapack_int* lda, lapack_int* ipiv, float* b,
18806                         lapack_int* ldb, float* work, lapack_int* lwork,
18807                         lapack_int *info );
18808 void LAPACK_ssytrf_rook( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18809                     lapack_int* ipiv, float* work, lapack_int* lwork,
18810                     lapack_int *info );
18811 void LAPACK_dsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18812                         lapack_int* lda, lapack_int* ipiv, double* b,
18813                         lapack_int* ldb, double* work, lapack_int* lwork,
18814                         lapack_int *info );
18815 void LAPACK_dsytrf_rook( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18816                     lapack_int* ipiv, double* work, lapack_int* lwork,
18817                     lapack_int *info );
18818 void LAPACK_csysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18819                         lapack_complex_float* a, lapack_int* lda,
18820                         lapack_int* ipiv, lapack_complex_float* b,
18821                         lapack_int* ldb, lapack_complex_float* work,
18822                         lapack_int* lwork, lapack_int *info );
18823 void LAPACK_csytrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
18824                     lapack_int* lda, lapack_int* ipiv,
18825                     lapack_complex_float* work, lapack_int* lwork,
18826                     lapack_int *info );
18827 void LAPACK_zsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18828                         lapack_complex_double* a, lapack_int* lda,
18829                         lapack_int* ipiv, lapack_complex_double* b,
18830                         lapack_int* ldb, lapack_complex_double* work,
18831                         lapack_int* lwork, lapack_int *info );
18832 void LAPACK_zsytrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
18833                     lapack_int* lda, lapack_int* ipiv,
18834                     lapack_complex_double* work, lapack_int* lwork,
18835                     lapack_int *info );
18836 void LAPACK_ssytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
18837                     lapack_int* lda, const lapack_int* ipiv, float* b,
18838                     lapack_int* ldb, lapack_int *info );
18839 void LAPACK_dsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18840                     const double* a, lapack_int* lda, const lapack_int* ipiv,
18841                     double* b, lapack_int* ldb, lapack_int *info );
18842 void LAPACK_csytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18843                     const lapack_complex_float* a, lapack_int* lda,
18844                     const lapack_int* ipiv, lapack_complex_float* b,
18845                     lapack_int* ldb, lapack_int *info );
18846 void LAPACK_zsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18847                     const lapack_complex_double* a, lapack_int* lda,
18848                     const lapack_int* ipiv, lapack_complex_double* b,
18849                     lapack_int* ldb, lapack_int *info );
18850 void LAPACK_chetrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
18851                     lapack_int* lda, lapack_int* ipiv,
18852                     lapack_complex_float* work, lapack_int* lwork,
18853                     lapack_int *info );
18854 void LAPACK_zhetrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
18855                     lapack_int* lda, lapack_int* ipiv,
18856                     lapack_complex_double* work, lapack_int* lwork,
18857                     lapack_int *info );
18858 void LAPACK_chetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18859                     const lapack_complex_float* a, lapack_int* lda,
18860                     const lapack_int* ipiv, lapack_complex_float* b,
18861                     lapack_int* ldb, lapack_int *info );
18862 void LAPACK_zhetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18863                     const lapack_complex_double* a, lapack_int* lda,
18864                     const lapack_int* ipiv, lapack_complex_double* b,
18865                     lapack_int* ldb, lapack_int *info );
18866
18867 void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
18868                       const lapack_complex_float* x, lapack_int* incx,
18869                       lapack_complex_float* a, lapack_int* lda );
18870 void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
18871                       const lapack_complex_double* x, lapack_int* incx,
18872                       lapack_complex_double* a, lapack_int* lda );
18873 void LAPACK_ilaver( const lapack_int* vers_major, const lapack_int* vers_minor,
18874                      const lapack_int* vers_patch );
18875
18876 // LAPACK 3.7.0
18877 void LAPACK_ssysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18878                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
18879                    float* work, lapack_int* lwork, lapack_int *info );
18880 void LAPACK_dsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18881                    lapack_int* lda, lapack_int* ipiv, double* b,
18882                    lapack_int* ldb, double* work, lapack_int* lwork,
18883                    lapack_int *info );
18884 void LAPACK_csysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18885                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
18886                    lapack_complex_float* b, lapack_int* ldb,
18887                    lapack_complex_float* work, lapack_int* lwork,
18888                    lapack_int *info );
18889 void LAPACK_zsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18890                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
18891                    lapack_complex_double* b, lapack_int* ldb,
18892                    lapack_complex_double* work, lapack_int* lwork,
18893                    lapack_int *info );
18894 void LAPACK_chesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18895                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
18896                    lapack_complex_float* b, lapack_int* ldb,
18897                    lapack_complex_float* work, lapack_int* lwork,
18898                    lapack_int *info );
18899 void LAPACK_zhesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18900                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
18901                    lapack_complex_double* b, lapack_int* ldb,
18902                    lapack_complex_double* work, lapack_int* lwork,
18903                    lapack_int *info );
18904
18905 void LAPACK_ssytrf_aa( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18906                     lapack_int* ipiv, float* work, lapack_int* lwork,
18907                     lapack_int *info );
18908 void LAPACK_dsytrf_aa( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18909                     lapack_int* ipiv, double* work, lapack_int* lwork,
18910                     lapack_int *info );
18911 void LAPACK_csytrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
18912                     lapack_int* lda, lapack_int* ipiv,
18913                     lapack_complex_float* work, lapack_int* lwork,
18914                     lapack_int *info );
18915 void LAPACK_zsytrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
18916                     lapack_int* lda, lapack_int* ipiv,
18917                     lapack_complex_double* work, lapack_int* lwork,
18918                     lapack_int *info );
18919 void LAPACK_chetrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
18920                     lapack_int* lda, lapack_int* ipiv,
18921                     lapack_complex_float* work, lapack_int* lwork,
18922                     lapack_int *info );
18923 void LAPACK_zhetrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
18924                     lapack_int* lda, lapack_int* ipiv,
18925                     lapack_complex_double* work, lapack_int* lwork,
18926                     lapack_int *info );
18927
18928 void LAPACK_ssytrs_aa( char* uplo, lapack_int* n,
18929                      lapack_int* nrhs, const float* a,
18930                      lapack_int* lda, const lapack_int* ipiv,
18931                      float* b, lapack_int* ldb, float* work, lapack_int* lwork, lapack_int *info );
18932 void LAPACK_dsytrs_aa( char* uplo, lapack_int* n,
18933                      lapack_int* nrhs, const double* a,
18934                      lapack_int* lda, const lapack_int* ipiv,
18935                      double* b, lapack_int* ldb, double* work, lapack_int* lwork,  lapack_int *info );
18936 void LAPACK_csytrs_aa( char* uplo, lapack_int* n,
18937                      lapack_int* nrhs, const lapack_complex_float* a,
18938                      lapack_int* lda, const lapack_int* ipiv,
18939                      lapack_complex_float* b, lapack_int* ldb,
18940                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
18941 void LAPACK_zsytrs_aa( char* uplo, lapack_int* n,
18942                      lapack_int* nrhs,
18943                      const lapack_complex_double* a, lapack_int* lda,
18944                      const lapack_int* ipiv,
18945                      lapack_complex_double* b, lapack_int* ldb,
18946                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18947 void LAPACK_chetrs_aa( char* uplo, lapack_int* n,
18948                      lapack_int* nrhs, const lapack_complex_float* a,
18949                      lapack_int* lda, const lapack_int* ipiv,
18950                      lapack_complex_float* b, lapack_int* ldb,
18951                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
18952 void LAPACK_zhetrs_aa( char* uplo, lapack_int* n,
18953                      lapack_int* nrhs,
18954                      const lapack_complex_double* a, lapack_int* lda,
18955                      const lapack_int* ipiv,
18956                      lapack_complex_double* b, lapack_int* ldb,
18957                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18958
18959 void LAPACK_ssysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18960                    lapack_int* lda, float* e, lapack_int* ipiv, float* b, lapack_int* ldb,
18961                    float* work, lapack_int* lwork, lapack_int *info );
18962 void LAPACK_dsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18963                    lapack_int* lda, double* e, lapack_int* ipiv, double* b,
18964                    lapack_int* ldb, double* work, lapack_int* lwork,
18965                    lapack_int *info );
18966 void LAPACK_csysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18967                    lapack_complex_float* a, lapack_int* lda,
18968                    lapack_complex_float* e, lapack_int* ipiv,
18969                    lapack_complex_float* b, lapack_int* ldb,
18970                    lapack_complex_float* work, lapack_int* lwork,
18971                    lapack_int *info );
18972 void LAPACK_zsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18973                    lapack_complex_double* a, lapack_int* lda,
18974                    lapack_complex_double* e, lapack_int* ipiv,
18975                    lapack_complex_double* b, lapack_int* ldb,
18976                    lapack_complex_double* work, lapack_int* lwork,
18977                    lapack_int *info );
18978 void LAPACK_chesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18979                    lapack_complex_float* a, lapack_int* lda,
18980                    lapack_complex_float* e, lapack_int* ipiv,
18981                    lapack_complex_float* b, lapack_int* ldb,
18982                    lapack_complex_float* work, lapack_int* lwork,
18983                    lapack_int *info );
18984 void LAPACK_zhesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18985                    lapack_complex_double* a, lapack_int* lda,
18986                    lapack_complex_double* e, lapack_int* ipiv,
18987                    lapack_complex_double* b, lapack_int* ldb,
18988                    lapack_complex_double* work, lapack_int* lwork,
18989                    lapack_int *info );
18990
18991 void LAPACK_ssytrf_rk( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18992                     float* e, lapack_int* ipiv, float* work, lapack_int* lwork,
18993                     lapack_int *info );
18994 void LAPACK_dsytrf_rk( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18995                     double* e, lapack_int* ipiv, double* work, lapack_int* lwork,
18996                     lapack_int *info );
18997 void LAPACK_csytrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
18998                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
18999                     lapack_complex_float* work, lapack_int* lwork,
19000                     lapack_int *info );
19001 void LAPACK_zsytrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
19002                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
19003                     lapack_complex_double* work, lapack_int* lwork,
19004                     lapack_int *info );
19005 void LAPACK_chetrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
19006                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
19007                     lapack_complex_float* work, lapack_int* lwork,
19008                     lapack_int *info );
19009 void LAPACK_zhetrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
19010                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
19011                     lapack_complex_double* work, lapack_int* lwork,
19012                     lapack_int *info );
19013
19014 void LAPACK_ssytrs_3( char* uplo, lapack_int* n,
19015                      lapack_int* nrhs, const float* a,
19016                      lapack_int* lda, const float* e, const lapack_int* ipiv,
19017                      float* b, lapack_int* ldb, lapack_int *info );
19018 void LAPACK_dsytrs_3( char* uplo, lapack_int* n,
19019                      lapack_int* nrhs, const double* a,
19020                      lapack_int* lda, const double* e, const lapack_int* ipiv,
19021                      double* b, lapack_int* ldb, lapack_int *info );
19022 void LAPACK_csytrs_3( char* uplo, lapack_int* n,
19023                      lapack_int* nrhs, const lapack_complex_float* a,
19024                      lapack_int* lda, const lapack_complex_float* e,
19025                      const lapack_int* ipiv,
19026                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
19027 void LAPACK_zsytrs_3( char* uplo, lapack_int* n,
19028                      lapack_int* nrhs,
19029                      const lapack_complex_double* a, lapack_int* lda,
19030                      const lapack_complex_double* e, const lapack_int* ipiv,
19031                      lapack_complex_double* b, lapack_int* ldb, lapack_int *info );
19032 void LAPACK_chetrs_3( char* uplo, lapack_int* n,
19033                      lapack_int* nrhs, const lapack_complex_float* a,
19034                      lapack_int* lda, const lapack_complex_float* e,
19035                      const lapack_int* ipiv,
19036                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
19037 void LAPACK_zhetrs_3( char* uplo, lapack_int* n,
19038                      lapack_int* nrhs,
19039                      const lapack_complex_double* a, lapack_int* lda,
19040                      const lapack_complex_double* e,
19041                      const lapack_int* ipiv,
19042                      lapack_complex_double* b, lapack_int* ldb,  lapack_int *info );
19043
19044 void LAPACK_ssytri_3( char* uplo, lapack_int* n, float* a, lapack_int* lda, const float* e,
19045                     const lapack_int* ipiv, float* work, lapack_int* lwork, lapack_int *info );
19046 void LAPACK_dsytri_3( char* uplo, lapack_int* n, double* a, lapack_int* lda, const double* e,
19047                     const lapack_int* ipiv, double* work, lapack_int* lwork, lapack_int *info );
19048 void LAPACK_csytri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
19049                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
19050                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
19051 void LAPACK_zsytri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
19052                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
19053                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
19054 void LAPACK_chetri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
19055                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
19056                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
19057 void LAPACK_zhetri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
19058                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
19059                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
19060
19061 void LAPACK_ssycon_3( char* uplo, lapack_int* n, const float* a, lapack_int* lda, const float* e,
19062                     const lapack_int* ipiv, float* anorm, float* rcond,
19063                     float* work, lapack_int* iwork, lapack_int *info );
19064 void LAPACK_dsycon_3( char* uplo, lapack_int* n, const double* a, lapack_int* lda, const double* e,
19065                     const lapack_int* ipiv, double* anorm, double* rcond,
19066                     double* work, lapack_int* iwork, lapack_int *info );
19067 void LAPACK_csycon_3( char* uplo, lapack_int* n, const lapack_complex_float* a,
19068                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv, float* anorm,
19069                     float* rcond, lapack_complex_float* work,
19070                     lapack_int *info );
19071 void LAPACK_zsycon_3( char* uplo, lapack_int* n, const lapack_complex_double* a,
19072                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv, double* anorm,
19073                     double* rcond, lapack_complex_double* work,
19074                     lapack_int *info );
19075 void LAPACK_checon_3( char* uplo, lapack_int* n, const lapack_complex_float* a,
19076                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv, float* anorm,
19077                     float* rcond, lapack_complex_float* work,
19078                     lapack_int *info );
19079 void LAPACK_zhecon_3( char* uplo, lapack_int* n, const lapack_complex_double* a,
19080                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv, double* anorm,
19081                     double* rcond, lapack_complex_double* work,
19082                     lapack_int *info );
19083
19084 void LAPACK_sgelq( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
19085                    float* t, lapack_int* tsize, float* work, lapack_int* lwork,
19086                    lapack_int* info );
19087 void LAPACK_dgelq( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
19088                    double* t, lapack_int* tsize, double* work, lapack_int* lwork,
19089                    lapack_int* info );
19090 void LAPACK_cgelq( lapack_int* m, lapack_int* n, lapack_complex_float* a, lapack_int* lda,
19091                    lapack_complex_float* t, lapack_int* tsize, lapack_complex_float* work, lapack_int* lwork,
19092                    lapack_int* info );
19093 void LAPACK_zgelq( lapack_int* m, lapack_int* n, lapack_complex_double* a, lapack_int* lda,
19094                    lapack_complex_double* t, lapack_int* tsize, lapack_complex_double* work, lapack_int* lwork,
19095                    lapack_int* info );
19096
19097 void LAPACK_sgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19098                     const float* a, lapack_int* lda,
19099                     const float* t, lapack_int* tsize,
19100                     float* c, lapack_int* ldc,
19101                     float* work, lapack_int* lwork,
19102                     lapack_int* info );
19103 void LAPACK_dgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19104                     const double* a, lapack_int* lda,
19105                     const double* t, lapack_int* tsize,
19106                     double* c, lapack_int* ldc,
19107                     double* work, lapack_int* lwork,
19108                     lapack_int* info );
19109 void LAPACK_cgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19110                     const lapack_complex_float* a, lapack_int* lda,
19111                     const lapack_complex_float* t, lapack_int* tsize,
19112                     lapack_complex_float* c, lapack_int* ldc,
19113                     lapack_complex_float* work, lapack_int* lwork,
19114                     lapack_int* info );
19115 void LAPACK_zgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19116                     const lapack_complex_double* a, lapack_int* lda,
19117                     const lapack_complex_double* t, lapack_int* tsize,
19118                     lapack_complex_double* c, lapack_int* ldc,
19119                     lapack_complex_double* work, lapack_int* lwork,
19120                     lapack_int* info );
19121
19122 void LAPACK_sgeqr( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
19123                    float* t, lapack_int* tsize, float* work, lapack_int* lwork,
19124                    lapack_int* info );
19125 void LAPACK_dgeqr( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
19126                    double* t, lapack_int* tsize, double* work, lapack_int* lwork,
19127                    lapack_int* info );
19128 void LAPACK_cgeqr( lapack_int* m, lapack_int* n, lapack_complex_float* a, lapack_int* lda,
19129                    lapack_complex_float* t, lapack_int* tsize, lapack_complex_float* work, lapack_int* lwork,
19130                    lapack_int* info );
19131 void LAPACK_zgeqr( lapack_int* m, lapack_int* n, lapack_complex_double* a, lapack_int* lda,
19132                    lapack_complex_double* t, lapack_int* tsize, lapack_complex_double* work, lapack_int* lwork,
19133                    lapack_int* info );
19134
19135 void LAPACK_sgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19136                     const float* a, lapack_int* lda,
19137                     const float* t, lapack_int* tsize,
19138                     float* c, lapack_int* ldc,
19139                     float* work, lapack_int* lwork,
19140                     lapack_int* info );
19141 void LAPACK_dgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19142                     const double* a, lapack_int* lda,
19143                     const double* t, lapack_int* tsize,
19144                     double* c, lapack_int* ldc,
19145                     double* work, lapack_int* lwork,
19146                     lapack_int* info );
19147 void LAPACK_cgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19148                     const lapack_complex_float* a, lapack_int* lda,
19149                     const lapack_complex_float* t, lapack_int* tsize,
19150                     lapack_complex_float* c, lapack_int* ldc,
19151                     lapack_complex_float* work, lapack_int* lwork,
19152                     lapack_int* info );
19153 void LAPACK_zgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19154                     const lapack_complex_double* a, lapack_int* lda,
19155                     const lapack_complex_double* t, lapack_int* tsize,
19156                     lapack_complex_double* c, lapack_int* ldc,
19157                     lapack_complex_double* work, lapack_int* lwork,
19158                     lapack_int* info );
19159
19160 void LAPACK_sgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19161                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
19162                      float* work, lapack_int* lwork, lapack_int *info );
19163 void LAPACK_dgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19164                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
19165                      double* work, lapack_int* lwork, lapack_int *info );
19166 void LAPACK_cgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19167                      lapack_complex_float* a, lapack_int* lda,
19168                      lapack_complex_float* b, lapack_int* ldb,
19169                      lapack_complex_float* work, lapack_int* lwork,
19170                      lapack_int *info );
19171 void LAPACK_zgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19172                      lapack_complex_double* a, lapack_int* lda,
19173                      lapack_complex_double* b, lapack_int* ldb,
19174                      lapack_complex_double* work, lapack_int* lwork,
19175                      lapack_int *info );
19176
19177 void LAPACK_ssyev_2stage( char* jobz, char* uplo, lapack_int* n, float* a,
19178                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
19179                    lapack_int *info );
19180 void LAPACK_dsyev_2stage( char* jobz, char* uplo, lapack_int* n, double* a,
19181                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
19182                    lapack_int *info );
19183 void LAPACK_cheev_2stage( char* jobz, char* uplo, lapack_int* n,
19184                    lapack_complex_float* a, lapack_int* lda, float* w,
19185                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
19186                    lapack_int *info );
19187 void LAPACK_zheev_2stage( char* jobz, char* uplo, lapack_int* n,
19188                    lapack_complex_double* a, lapack_int* lda, double* w,
19189                    lapack_complex_double* work, lapack_int* lwork,
19190                    double* rwork, lapack_int *info );
19191 void LAPACK_ssyevd_2stage( char* jobz, char* uplo, lapack_int* n, float* a,
19192                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
19193                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19194 void LAPACK_dsyevd_2stage( char* jobz, char* uplo, lapack_int* n, double* a,
19195                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
19196                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19197 void LAPACK_cheevd_2stage( char* jobz, char* uplo, lapack_int* n,
19198                     lapack_complex_float* a, lapack_int* lda, float* w,
19199                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19200                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19201                     lapack_int *info );
19202 void LAPACK_zheevd_2stage( char* jobz, char* uplo, lapack_int* n,
19203                     lapack_complex_double* a, lapack_int* lda, double* w,
19204                     lapack_complex_double* work, lapack_int* lwork,
19205                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19206                     lapack_int* liwork, lapack_int *info );
19207 void LAPACK_ssyevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19208                     float* a, lapack_int* lda, float* vl, float* vu,
19209                     lapack_int* il, lapack_int* iu, float* abstol,
19210                     lapack_int* m, float* w, float* z, lapack_int* ldz,
19211                     float* work, lapack_int* lwork, lapack_int* iwork,
19212                     lapack_int* ifail, lapack_int *info );
19213 void LAPACK_dsyevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19214                     double* a, lapack_int* lda, double* vl, double* vu,
19215                     lapack_int* il, lapack_int* iu, double* abstol,
19216                     lapack_int* m, double* w, double* z, lapack_int* ldz,
19217                     double* work, lapack_int* lwork, lapack_int* iwork,
19218                     lapack_int* ifail, lapack_int *info );
19219 void LAPACK_cheevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19220                     lapack_complex_float* a, lapack_int* lda, float* vl,
19221                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19222                     lapack_int* m, float* w, lapack_complex_float* z,
19223                     lapack_int* ldz, lapack_complex_float* work,
19224                     lapack_int* lwork, float* rwork, lapack_int* iwork,
19225                     lapack_int* ifail, lapack_int *info );
19226 void LAPACK_zheevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19227                     lapack_complex_double* a, lapack_int* lda, double* vl,
19228                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19229                     lapack_int* m, double* w, lapack_complex_double* z,
19230                     lapack_int* ldz, lapack_complex_double* work,
19231                     lapack_int* lwork, double* rwork, lapack_int* iwork,
19232                     lapack_int* ifail, lapack_int *info );
19233 void LAPACK_ssyevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19234                     float* a, lapack_int* lda, float* vl, float* vu,
19235                     lapack_int* il, lapack_int* iu, float* abstol,
19236                     lapack_int* m, float* w, float* z, lapack_int* ldz,
19237                     lapack_int* isuppz, float* work, lapack_int* lwork,
19238                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19239 void LAPACK_dsyevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19240                     double* a, lapack_int* lda, double* vl, double* vu,
19241                     lapack_int* il, lapack_int* iu, double* abstol,
19242                     lapack_int* m, double* w, double* z, lapack_int* ldz,
19243                     lapack_int* isuppz, double* work, lapack_int* lwork,
19244                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19245 void LAPACK_cheevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19246                     lapack_complex_float* a, lapack_int* lda, float* vl,
19247                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19248                     lapack_int* m, float* w, lapack_complex_float* z,
19249                     lapack_int* ldz, lapack_int* isuppz,
19250                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19251                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19252                     lapack_int *info );
19253 void LAPACK_zheevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19254                     lapack_complex_double* a, lapack_int* lda, double* vl,
19255                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19256                     lapack_int* m, double* w, lapack_complex_double* z,
19257                     lapack_int* ldz, lapack_int* isuppz,
19258                     lapack_complex_double* work, lapack_int* lwork,
19259                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19260                     lapack_int* liwork, lapack_int *info );
19261 void LAPACK_ssbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19262                    float* ab, lapack_int* ldab, float* w, float* z,
19263                    lapack_int* ldz, float* work, lapack_int* lwork, lapack_int *info );
19264 void LAPACK_dsbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19265                    double* ab, lapack_int* ldab, double* w, double* z,
19266                    lapack_int* ldz, double* work, lapack_int* lwork, lapack_int *info );
19267 void LAPACK_chbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19268                    lapack_complex_float* ab, lapack_int* ldab, float* w,
19269                    lapack_complex_float* z, lapack_int* ldz,
19270                    lapack_complex_float* work, lapack_int* lwork, float* rwork, lapack_int *info );
19271 void LAPACK_zhbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19272                    lapack_complex_double* ab, lapack_int* ldab, double* w,
19273                    lapack_complex_double* z, lapack_int* ldz,
19274                    lapack_complex_double* work, lapack_int* lwork, double* rwork,
19275                    lapack_int *info );
19276 void LAPACK_ssbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19277                     float* ab, lapack_int* ldab, float* w, float* z,
19278                     lapack_int* ldz, float* work, lapack_int* lwork,
19279                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19280 void LAPACK_dsbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19281                     double* ab, lapack_int* ldab, double* w, double* z,
19282                     lapack_int* ldz, double* work, lapack_int* lwork,
19283                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19284 void LAPACK_chbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19285                     lapack_complex_float* ab, lapack_int* ldab, float* w,
19286                     lapack_complex_float* z, lapack_int* ldz,
19287                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19288                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19289                     lapack_int *info );
19290 void LAPACK_zhbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19291                     lapack_complex_double* ab, lapack_int* ldab, double* w,
19292                     lapack_complex_double* z, lapack_int* ldz,
19293                     lapack_complex_double* work, lapack_int* lwork,
19294                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19295                     lapack_int* liwork, lapack_int *info );
19296 void LAPACK_ssbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19297                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
19298                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
19299                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
19300                     float* z, lapack_int* ldz, float* work, lapack_int* lwork, lapack_int* iwork,
19301                     lapack_int* ifail, lapack_int *info );
19302 void LAPACK_dsbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19303                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
19304                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
19305                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
19306                     double* z, lapack_int* ldz, double* work, lapack_int* lwork, lapack_int* iwork,
19307                     lapack_int* ifail, lapack_int *info );
19308 void LAPACK_chbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19309                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
19310                     lapack_complex_float* q, lapack_int* ldq, float* vl,
19311                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19312                     lapack_int* m, float* w, lapack_complex_float* z,
19313                     lapack_int* ldz, lapack_complex_float* work, lapack_int* lwork, float* rwork,
19314                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
19315 void LAPACK_zhbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19316                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
19317                     lapack_complex_double* q, lapack_int* ldq, double* vl,
19318                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19319                     lapack_int* m, double* w, lapack_complex_double* z,
19320                     lapack_int* ldz, lapack_complex_double* work, lapack_int* lwork, double* rwork,
19321                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
19322 void LAPACK_ssygv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19323                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
19324                    float* w, float* work, lapack_int* lwork, lapack_int *info );
19325 void LAPACK_dsygv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19326                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
19327                    double* w, double* work, lapack_int* lwork,
19328                    lapack_int *info );
19329 void LAPACK_chegv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19330                    lapack_complex_float* a, lapack_int* lda,
19331                    lapack_complex_float* b, lapack_int* ldb, float* w,
19332                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
19333                    lapack_int *info );
19334 void LAPACK_zhegv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19335                    lapack_complex_double* a, lapack_int* lda,
19336                    lapack_complex_double* b, lapack_int* ldb, double* w,
19337                    lapack_complex_double* work, lapack_int* lwork,
19338                    double* rwork, lapack_int *info );
19339
19340 //LAPACK 3.8.0
19341
19342 void LAPACK_ssysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19343                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19344                                    lapack_int* ipiv, lapack_int* ipiv2, float* b, lapack_int* ldb,
19345                    float* work, lapack_int* lwork, lapack_int *info );
19346 void LAPACK_dsysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
19347                    lapack_int* lda, double* tb, lapack_int* ltb,
19348                    lapack_int* ipiv, lapack_int* ipiv2, double* b,
19349                    lapack_int* ldb, double* work, lapack_int* lwork,
19350                    lapack_int *info );
19351 void LAPACK_csysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19352                    lapack_complex_float* a, lapack_int* lda,
19353                    lapack_complex_float* tb, lapack_int* ltb,
19354                    lapack_int* ipiv, lapack_int* ipiv2,
19355                    lapack_complex_float* b, lapack_int* ldb,
19356                    lapack_complex_float* work, lapack_int* lwork,
19357                    lapack_int *info );
19358 void LAPACK_zsysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19359                    lapack_complex_double* a, lapack_int* lda,
19360                    lapack_complex_double* tb, lapack_int* ltb,
19361                    lapack_int* ipiv, lapack_int* ipiv2,
19362                    lapack_complex_double* b, lapack_int* ldb,
19363                    lapack_complex_double* work, lapack_int* lwork,
19364                    lapack_int *info );
19365 void LAPACK_chesv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19366                    lapack_complex_float* a, lapack_int* lda,
19367                    lapack_complex_float* tb, lapack_int* ltb,
19368                    lapack_int* ipiv, lapack_int* ipiv2,
19369                    lapack_complex_float* b, lapack_int* ldb,
19370                    lapack_complex_float* work, lapack_int* lwork,
19371                    lapack_int *info );
19372 void LAPACK_zhesv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19373                    lapack_complex_double* a, lapack_int* lda,
19374                    lapack_complex_double* tb, lapack_int* ltb,
19375                    lapack_int* ipiv, lapack_int* ipiv2,
19376                    lapack_complex_double* b, lapack_int* ldb,
19377                    lapack_complex_double* work, lapack_int* lwork,
19378                    lapack_int *info );
19379
19380 void LAPACK_ssytrf_aa_2stage( char* uplo, lapack_int* n,
19381                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19382                                    lapack_int* ipiv, lapack_int* ipiv2,
19383                    float* work, lapack_int* lwork, lapack_int *info );
19384 void LAPACK_dsytrf_aa_2stage( char* uplo, lapack_int* n, double* a,
19385                    lapack_int* lda, double* tb, lapack_int* ltb,
19386                    lapack_int* ipiv, lapack_int* ipiv2,
19387                    double* work, lapack_int* lwork,
19388                    lapack_int *info );
19389 void LAPACK_csytrf_aa_2stage( char* uplo, lapack_int* n,
19390                    lapack_complex_float* a, lapack_int* lda,
19391                    lapack_complex_float* tb, lapack_int* ltb,
19392                    lapack_int* ipiv, lapack_int* ipiv2,
19393                    lapack_complex_float* work, lapack_int* lwork,
19394                    lapack_int *info );
19395 void LAPACK_zsytrf_aa_2stage( char* uplo, lapack_int* n,
19396                    lapack_complex_double* a, lapack_int* lda,
19397                    lapack_complex_double* tb, lapack_int* ltb,
19398                    lapack_int* ipiv, lapack_int* ipiv2,
19399                    lapack_complex_double* work, lapack_int* lwork,
19400                    lapack_int *info );
19401 void LAPACK_chetrf_aa_2stage( char* uplo, lapack_int* n,
19402                    lapack_complex_float* a, lapack_int* lda,
19403                    lapack_complex_float* tb, lapack_int* ltb,
19404                    lapack_int* ipiv, lapack_int* ipiv2,
19405                    lapack_complex_float* work, lapack_int* lwork,
19406                    lapack_int *info );
19407 void LAPACK_zhetrf_aa_2stage( char* uplo, lapack_int* n,
19408                    lapack_complex_double* a, lapack_int* lda,
19409                    lapack_complex_double* tb, lapack_int* ltb,
19410                    lapack_int* ipiv, lapack_int* ipiv2,
19411                    lapack_complex_double* work, lapack_int* lwork,
19412                    lapack_int *info );
19413
19414 void LAPACK_ssytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19415                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19416                                    lapack_int* ipiv, lapack_int* ipiv2, float* b, lapack_int* ldb,
19417                 lapack_int *info );
19418 void LAPACK_dsytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
19419                    lapack_int* lda, double* tb, lapack_int* ltb,
19420                    lapack_int* ipiv, lapack_int* ipiv2, double* b,
19421                    lapack_int* ldb, lapack_int *info );
19422 void LAPACK_csytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19423                    lapack_complex_float* a, lapack_int* lda,
19424                    lapack_complex_float* tb, lapack_int* ltb,
19425                    lapack_int* ipiv, lapack_int* ipiv2,
19426                    lapack_complex_float* b, lapack_int* ldb,
19427                    lapack_int *info );
19428 void LAPACK_zsytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19429                    lapack_complex_double* a, lapack_int* lda,
19430                    lapack_complex_double* tb, lapack_int* ltb,
19431                    lapack_int* ipiv, lapack_int* ipiv2,
19432                    lapack_complex_double* b, lapack_int* ldb,
19433                    lapack_int *info );
19434 void LAPACK_chetrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19435                    lapack_complex_float* a, lapack_int* lda,
19436                    lapack_complex_float* tb, lapack_int* ltb,
19437                    lapack_int* ipiv, lapack_int* ipiv2,
19438                    lapack_complex_float* b, lapack_int* ldb,
19439                    lapack_int *info );
19440 void LAPACK_zhetrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19441                    lapack_complex_double* a, lapack_int* lda,
19442                    lapack_complex_double* tb, lapack_int* ltb,
19443                    lapack_int* ipiv, lapack_int* ipiv2,
19444                    lapack_complex_double* b, lapack_int* ldb,
19445                    lapack_int *info );
19446
19447 /* APIs for set/get nancheck flags */
19448 void LAPACKE_set_nancheck( int flag );
19449 int LAPACKE_get_nancheck( );
19450
19451 #ifdef __cplusplus
19452 }
19453 #endif /* __cplusplus */
19454
19455 #endif /* _LAPACKE_H_ */