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 #ifndef __cplusplus
  90 #include <complex.h>
  91 #else
  92 #include <complex>
  93 #endif
  94 #define lapack_complex_double   double _Complex
  95 #endif
  96
  97 #ifndef lapack_complex_double_real
  98 #define lapack_complex_double_real(z)      (creal(z))
  99 #endif
 100
 101 #ifndef lapack_complex_double_imag
 102 #define lapack_complex_double_imag(z)       (cimag(z))
 103 #endif
 104
 105 lapack_complex_double lapack_make_complex_double( double re, double im );
 106
 107 #endif
 108
 109 #ifdef __cplusplus
 110 extern "C" {
 111 #endif /* __cplusplus */
 112
 113 #ifndef LAPACKE_malloc
 114 #define LAPACKE_malloc( size ) malloc( size )
 115 #endif
 116 #ifndef LAPACKE_free
 117 #define LAPACKE_free( p )      free( p )
 118 #endif
 119
 120 #define LAPACK_C2INT( x ) (lapack_int)(*((float*)&x ))
 121 #define LAPACK_Z2INT( x ) (lapack_int)(*((double*)&x ))
 122
 123 #define LAPACK_ROW_MAJOR               101
 124 #define LAPACK_COL_MAJOR               102
 125
 126 #define LAPACK_WORK_MEMORY_ERROR       -1010
 127 #define LAPACK_TRANSPOSE_MEMORY_ERROR  -1011
 128
 129 /* Callback logical functions of one, two, or three arguments are used
 130 *  to select eigenvalues to sort to the top left of the Schur form.
 131 *  The value is selected if function returns TRUE (non-zero). */
 132
 133 typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
 134 typedef lapack_logical (*LAPACK_S_SELECT3)
 135     ( const float*, const float*, const float* );
 136 typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
 137 typedef lapack_logical (*LAPACK_D_SELECT3)
 138     ( const double*, const double*, const double* );
 139
 140 typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
 141 typedef lapack_logical (*LAPACK_C_SELECT2)
 142     ( const lapack_complex_float*, const lapack_complex_float* );
 143 typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
 144 typedef lapack_logical (*LAPACK_Z_SELECT2)
 145     ( const lapack_complex_double*, const lapack_complex_double* );
 146
 147 #include "lapacke_mangling.h"
 148
 149 #define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
 150 lapack_logical LAPACK_lsame( char* ca,  char* cb,
 151                               lapack_int lca, lapack_int lcb );
 152
 153 /* C-LAPACK function prototypes */
 154
 155 lapack_int LAPACKE_sbdsdc( int matrix_layout, char uplo, char compq,
 156                            lapack_int n, float* d, float* e, float* u,
 157                            lapack_int ldu, float* vt, lapack_int ldvt, float* q,
 158                            lapack_int* iq );
 159 lapack_int LAPACKE_dbdsdc( int matrix_layout, char uplo, char compq,
 160                            lapack_int n, double* d, double* e, double* u,
 161                            lapack_int ldu, double* vt, lapack_int ldvt,
 162                            double* q, lapack_int* iq );
 163
 164 lapack_int LAPACKE_sbdsqr( int matrix_layout, char uplo, lapack_int n,
 165                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
 166                            float* d, float* e, float* vt, lapack_int ldvt,
 167                            float* u, lapack_int ldu, float* c, lapack_int ldc );
 168 lapack_int LAPACKE_dbdsqr( int matrix_layout, char uplo, lapack_int n,
 169                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
 170                            double* d, double* e, double* vt, lapack_int ldvt,
 171                            double* u, lapack_int ldu, double* c,
 172                            lapack_int ldc );
 173 lapack_int LAPACKE_cbdsqr( int matrix_layout, char uplo, lapack_int n,
 174                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
 175                            float* d, float* e, lapack_complex_float* vt,
 176                            lapack_int ldvt, lapack_complex_float* u,
 177                            lapack_int ldu, lapack_complex_float* c,
 178                            lapack_int ldc );
 179 lapack_int LAPACKE_zbdsqr( int matrix_layout, char uplo, lapack_int n,
 180                            lapack_int ncvt, lapack_int nru, lapack_int ncc,
 181                            double* d, double* e, lapack_complex_double* vt,
 182                            lapack_int ldvt, lapack_complex_double* u,
 183                            lapack_int ldu, lapack_complex_double* c,
 184                            lapack_int ldc );
 185 lapack_int LAPACKE_sbdsvdx( int matrix_layout, char uplo, char jobz, char range,
 186                            lapack_int n, float* d, float* e,
 187                            float vl, float vu,
 188                            lapack_int il, lapack_int iu, lapack_int* ns,
 189                            float* s, float* z, lapack_int ldz,
 190                            lapack_int* superb );
 191 lapack_int LAPACKE_dbdsvdx( int matrix_layout, char uplo, char jobz, char range,
 192                            lapack_int n, double* d, double* e,
 193                            double vl, double vu,
 194                            lapack_int il, lapack_int iu, lapack_int* ns,
 195                            double* s, double* z, lapack_int ldz,
 196                            lapack_int* superb );
 197 lapack_int LAPACKE_sdisna( char job, lapack_int m, lapack_int n, const float* d,
 198                            float* sep );
 199 lapack_int LAPACKE_ddisna( char job, lapack_int m, lapack_int n,
 200                            const double* d, double* sep );
 201
 202 lapack_int LAPACKE_sgbbrd( int matrix_layout, char vect, lapack_int m,
 203                            lapack_int n, lapack_int ncc, lapack_int kl,
 204                            lapack_int ku, float* ab, lapack_int ldab, float* d,
 205                            float* e, float* q, lapack_int ldq, float* pt,
 206                            lapack_int ldpt, float* c, lapack_int ldc );
 207 lapack_int LAPACKE_dgbbrd( int matrix_layout, char vect, lapack_int m,
 208                            lapack_int n, lapack_int ncc, lapack_int kl,
 209                            lapack_int ku, double* ab, lapack_int ldab,
 210                            double* d, double* e, double* q, lapack_int ldq,
 211                            double* pt, lapack_int ldpt, double* c,
 212                            lapack_int ldc );
 213 lapack_int LAPACKE_cgbbrd( int matrix_layout, char vect, lapack_int m,
 214                            lapack_int n, lapack_int ncc, lapack_int kl,
 215                            lapack_int ku, lapack_complex_float* ab,
 216                            lapack_int ldab, float* d, float* e,
 217                            lapack_complex_float* q, lapack_int ldq,
 218                            lapack_complex_float* pt, lapack_int ldpt,
 219                            lapack_complex_float* c, lapack_int ldc );
 220 lapack_int LAPACKE_zgbbrd( int matrix_layout, char vect, lapack_int m,
 221                            lapack_int n, lapack_int ncc, lapack_int kl,
 222                            lapack_int ku, lapack_complex_double* ab,
 223                            lapack_int ldab, double* d, double* e,
 224                            lapack_complex_double* q, lapack_int ldq,
 225                            lapack_complex_double* pt, lapack_int ldpt,
 226                            lapack_complex_double* c, lapack_int ldc );
 227
 228 lapack_int LAPACKE_sgbcon( int matrix_layout, char norm, lapack_int n,
 229                            lapack_int kl, lapack_int ku, const float* ab,
 230                            lapack_int ldab, const lapack_int* ipiv, float anorm,
 231                            float* rcond );
 232 lapack_int LAPACKE_dgbcon( int matrix_layout, char norm, lapack_int n,
 233                            lapack_int kl, lapack_int ku, const double* ab,
 234                            lapack_int ldab, const lapack_int* ipiv,
 235                            double anorm, double* rcond );
 236 lapack_int LAPACKE_cgbcon( int matrix_layout, char norm, lapack_int n,
 237                            lapack_int kl, lapack_int ku,
 238                            const lapack_complex_float* ab, lapack_int ldab,
 239                            const lapack_int* ipiv, float anorm, float* rcond );
 240 lapack_int LAPACKE_zgbcon( int matrix_layout, char norm, lapack_int n,
 241                            lapack_int kl, lapack_int ku,
 242                            const lapack_complex_double* ab, lapack_int ldab,
 243                            const lapack_int* ipiv, double anorm,
 244                            double* rcond );
 245
 246 lapack_int LAPACKE_sgbequ( int matrix_layout, lapack_int m, lapack_int n,
 247                            lapack_int kl, lapack_int ku, const float* ab,
 248                            lapack_int ldab, float* r, float* c, float* rowcnd,
 249                            float* colcnd, float* amax );
 250 lapack_int LAPACKE_dgbequ( int matrix_layout, lapack_int m, lapack_int n,
 251                            lapack_int kl, lapack_int ku, const double* ab,
 252                            lapack_int ldab, double* r, double* c,
 253                            double* rowcnd, double* colcnd, double* amax );
 254 lapack_int LAPACKE_cgbequ( int matrix_layout, lapack_int m, lapack_int n,
 255                            lapack_int kl, lapack_int ku,
 256                            const lapack_complex_float* ab, lapack_int ldab,
 257                            float* r, float* c, float* rowcnd, float* colcnd,
 258                            float* amax );
 259 lapack_int LAPACKE_zgbequ( int matrix_layout, lapack_int m, lapack_int n,
 260                            lapack_int kl, lapack_int ku,
 261                            const lapack_complex_double* ab, lapack_int ldab,
 262                            double* r, double* c, double* rowcnd, double* colcnd,
 263                            double* amax );
 264
 265 lapack_int LAPACKE_sgbequb( int matrix_layout, lapack_int m, lapack_int n,
 266                             lapack_int kl, lapack_int ku, const float* ab,
 267                             lapack_int ldab, float* r, float* c, float* rowcnd,
 268                             float* colcnd, float* amax );
 269 lapack_int LAPACKE_dgbequb( int matrix_layout, lapack_int m, lapack_int n,
 270                             lapack_int kl, lapack_int ku, const double* ab,
 271                             lapack_int ldab, double* r, double* c,
 272                             double* rowcnd, double* colcnd, double* amax );
 273 lapack_int LAPACKE_cgbequb( int matrix_layout, lapack_int m, lapack_int n,
 274                             lapack_int kl, lapack_int ku,
 275                             const lapack_complex_float* ab, lapack_int ldab,
 276                             float* r, float* c, float* rowcnd, float* colcnd,
 277                             float* amax );
 278 lapack_int LAPACKE_zgbequb( int matrix_layout, lapack_int m, lapack_int n,
 279                             lapack_int kl, lapack_int ku,
 280                             const lapack_complex_double* ab, lapack_int ldab,
 281                             double* r, double* c, double* rowcnd,
 282                             double* colcnd, double* amax );
 283
 284 lapack_int LAPACKE_sgbrfs( int matrix_layout, char trans, lapack_int n,
 285                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 286                            const float* ab, lapack_int ldab, const float* afb,
 287                            lapack_int ldafb, const lapack_int* ipiv,
 288                            const float* b, lapack_int ldb, float* x,
 289                            lapack_int ldx, float* ferr, float* berr );
 290 lapack_int LAPACKE_dgbrfs( int matrix_layout, char trans, lapack_int n,
 291                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 292                            const double* ab, lapack_int ldab, const double* afb,
 293                            lapack_int ldafb, const lapack_int* ipiv,
 294                            const double* b, lapack_int ldb, double* x,
 295                            lapack_int ldx, double* ferr, double* berr );
 296 lapack_int LAPACKE_cgbrfs( int matrix_layout, char trans, lapack_int n,
 297                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 298                            const lapack_complex_float* ab, lapack_int ldab,
 299                            const lapack_complex_float* afb, lapack_int ldafb,
 300                            const lapack_int* ipiv,
 301                            const lapack_complex_float* b, lapack_int ldb,
 302                            lapack_complex_float* x, lapack_int ldx, float* ferr,
 303                            float* berr );
 304 lapack_int LAPACKE_zgbrfs( int matrix_layout, char trans, lapack_int n,
 305                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 306                            const lapack_complex_double* ab, lapack_int ldab,
 307                            const lapack_complex_double* afb, lapack_int ldafb,
 308                            const lapack_int* ipiv,
 309                            const lapack_complex_double* b, lapack_int ldb,
 310                            lapack_complex_double* x, lapack_int ldx,
 311                            double* ferr, double* berr );
 312
 313 lapack_int LAPACKE_sgbrfsx( int matrix_layout, char trans, char equed,
 314                             lapack_int n, lapack_int kl, lapack_int ku,
 315                             lapack_int nrhs, const float* ab, lapack_int ldab,
 316                             const float* afb, lapack_int ldafb,
 317                             const lapack_int* ipiv, const float* r,
 318                             const float* c, const float* b, lapack_int ldb,
 319                             float* x, lapack_int ldx, float* rcond, float* berr,
 320                             lapack_int n_err_bnds, float* err_bnds_norm,
 321                             float* err_bnds_comp, lapack_int nparams,
 322                             float* params );
 323 lapack_int LAPACKE_dgbrfsx( int matrix_layout, char trans, char equed,
 324                             lapack_int n, lapack_int kl, lapack_int ku,
 325                             lapack_int nrhs, const double* ab, lapack_int ldab,
 326                             const double* afb, lapack_int ldafb,
 327                             const lapack_int* ipiv, const double* r,
 328                             const double* c, const double* b, lapack_int ldb,
 329                             double* x, lapack_int ldx, double* rcond,
 330                             double* berr, lapack_int n_err_bnds,
 331                             double* err_bnds_norm, double* err_bnds_comp,
 332                             lapack_int nparams, double* params );
 333 lapack_int LAPACKE_cgbrfsx( int matrix_layout, char trans, char equed,
 334                             lapack_int n, lapack_int kl, lapack_int ku,
 335                             lapack_int nrhs, const lapack_complex_float* ab,
 336                             lapack_int ldab, const lapack_complex_float* afb,
 337                             lapack_int ldafb, const lapack_int* ipiv,
 338                             const float* r, const float* c,
 339                             const lapack_complex_float* b, lapack_int ldb,
 340                             lapack_complex_float* x, lapack_int ldx,
 341                             float* rcond, float* berr, lapack_int n_err_bnds,
 342                             float* err_bnds_norm, float* err_bnds_comp,
 343                             lapack_int nparams, float* params );
 344 lapack_int LAPACKE_zgbrfsx( int matrix_layout, char trans, char equed,
 345                             lapack_int n, lapack_int kl, lapack_int ku,
 346                             lapack_int nrhs, const lapack_complex_double* ab,
 347                             lapack_int ldab, const lapack_complex_double* afb,
 348                             lapack_int ldafb, const lapack_int* ipiv,
 349                             const double* r, const double* c,
 350                             const lapack_complex_double* b, lapack_int ldb,
 351                             lapack_complex_double* x, lapack_int ldx,
 352                             double* rcond, double* berr, lapack_int n_err_bnds,
 353                             double* err_bnds_norm, double* err_bnds_comp,
 354                             lapack_int nparams, double* params );
 355
 356 lapack_int LAPACKE_sgbsv( int matrix_layout, lapack_int n, lapack_int kl,
 357                           lapack_int ku, lapack_int nrhs, float* ab,
 358                           lapack_int ldab, lapack_int* ipiv, float* b,
 359                           lapack_int ldb );
 360 lapack_int LAPACKE_dgbsv( int matrix_layout, lapack_int n, lapack_int kl,
 361                           lapack_int ku, lapack_int nrhs, double* ab,
 362                           lapack_int ldab, lapack_int* ipiv, double* b,
 363                           lapack_int ldb );
 364 lapack_int LAPACKE_cgbsv( int matrix_layout, lapack_int n, lapack_int kl,
 365                           lapack_int ku, lapack_int nrhs,
 366                           lapack_complex_float* ab, lapack_int ldab,
 367                           lapack_int* ipiv, lapack_complex_float* b,
 368                           lapack_int ldb );
 369 lapack_int LAPACKE_zgbsv( int matrix_layout, lapack_int n, lapack_int kl,
 370                           lapack_int ku, lapack_int nrhs,
 371                           lapack_complex_double* ab, lapack_int ldab,
 372                           lapack_int* ipiv, lapack_complex_double* b,
 373                           lapack_int ldb );
 374
 375 lapack_int LAPACKE_sgbsvx( int matrix_layout, char fact, char trans,
 376                            lapack_int n, lapack_int kl, lapack_int ku,
 377                            lapack_int nrhs, float* ab, lapack_int ldab,
 378                            float* afb, lapack_int ldafb, lapack_int* ipiv,
 379                            char* equed, float* r, float* c, float* b,
 380                            lapack_int ldb, float* x, lapack_int ldx,
 381                            float* rcond, float* ferr, float* berr,
 382                            float* rpivot );
 383 lapack_int LAPACKE_dgbsvx( int matrix_layout, char fact, char trans,
 384                            lapack_int n, lapack_int kl, lapack_int ku,
 385                            lapack_int nrhs, double* ab, lapack_int ldab,
 386                            double* afb, lapack_int ldafb, lapack_int* ipiv,
 387                            char* equed, double* r, double* c, double* b,
 388                            lapack_int ldb, double* x, lapack_int ldx,
 389                            double* rcond, double* ferr, double* berr,
 390                            double* rpivot );
 391 lapack_int LAPACKE_cgbsvx( int matrix_layout, char fact, char trans,
 392                            lapack_int n, lapack_int kl, lapack_int ku,
 393                            lapack_int nrhs, lapack_complex_float* ab,
 394                            lapack_int ldab, lapack_complex_float* afb,
 395                            lapack_int ldafb, lapack_int* ipiv, char* equed,
 396                            float* r, float* c, lapack_complex_float* b,
 397                            lapack_int ldb, lapack_complex_float* x,
 398                            lapack_int ldx, float* rcond, float* ferr,
 399                            float* berr, float* rpivot );
 400 lapack_int LAPACKE_zgbsvx( int matrix_layout, char fact, char trans,
 401                            lapack_int n, lapack_int kl, lapack_int ku,
 402                            lapack_int nrhs, lapack_complex_double* ab,
 403                            lapack_int ldab, lapack_complex_double* afb,
 404                            lapack_int ldafb, lapack_int* ipiv, char* equed,
 405                            double* r, double* c, lapack_complex_double* b,
 406                            lapack_int ldb, lapack_complex_double* x,
 407                            lapack_int ldx, double* rcond, double* ferr,
 408                            double* berr, double* rpivot );
 409
 410 lapack_int LAPACKE_sgbsvxx( int matrix_layout, char fact, char trans,
 411                             lapack_int n, lapack_int kl, lapack_int ku,
 412                             lapack_int nrhs, float* ab, lapack_int ldab,
 413                             float* afb, lapack_int ldafb, lapack_int* ipiv,
 414                             char* equed, float* r, float* c, float* b,
 415                             lapack_int ldb, float* x, lapack_int ldx,
 416                             float* rcond, float* rpvgrw, float* berr,
 417                             lapack_int n_err_bnds, float* err_bnds_norm,
 418                             float* err_bnds_comp, lapack_int nparams,
 419                             float* params );
 420 lapack_int LAPACKE_dgbsvxx( int matrix_layout, char fact, char trans,
 421                             lapack_int n, lapack_int kl, lapack_int ku,
 422                             lapack_int nrhs, double* ab, lapack_int ldab,
 423                             double* afb, lapack_int ldafb, lapack_int* ipiv,
 424                             char* equed, double* r, double* c, double* b,
 425                             lapack_int ldb, double* x, lapack_int ldx,
 426                             double* rcond, double* rpvgrw, double* berr,
 427                             lapack_int n_err_bnds, double* err_bnds_norm,
 428                             double* err_bnds_comp, lapack_int nparams,
 429                             double* params );
 430 lapack_int LAPACKE_cgbsvxx( int matrix_layout, char fact, char trans,
 431                             lapack_int n, lapack_int kl, lapack_int ku,
 432                             lapack_int nrhs, lapack_complex_float* ab,
 433                             lapack_int ldab, lapack_complex_float* afb,
 434                             lapack_int ldafb, lapack_int* ipiv, char* equed,
 435                             float* r, float* c, lapack_complex_float* b,
 436                             lapack_int ldb, lapack_complex_float* x,
 437                             lapack_int ldx, float* rcond, float* rpvgrw,
 438                             float* berr, lapack_int n_err_bnds,
 439                             float* err_bnds_norm, float* err_bnds_comp,
 440                             lapack_int nparams, float* params );
 441 lapack_int LAPACKE_zgbsvxx( int matrix_layout, char fact, char trans,
 442                             lapack_int n, lapack_int kl, lapack_int ku,
 443                             lapack_int nrhs, lapack_complex_double* ab,
 444                             lapack_int ldab, lapack_complex_double* afb,
 445                             lapack_int ldafb, lapack_int* ipiv, char* equed,
 446                             double* r, double* c, lapack_complex_double* b,
 447                             lapack_int ldb, lapack_complex_double* x,
 448                             lapack_int ldx, double* rcond, double* rpvgrw,
 449                             double* berr, lapack_int n_err_bnds,
 450                             double* err_bnds_norm, double* err_bnds_comp,
 451                             lapack_int nparams, double* params );
 452
 453 lapack_int LAPACKE_sgbtrf( int matrix_layout, lapack_int m, lapack_int n,
 454                            lapack_int kl, lapack_int ku, float* ab,
 455                            lapack_int ldab, lapack_int* ipiv );
 456 lapack_int LAPACKE_dgbtrf( int matrix_layout, lapack_int m, lapack_int n,
 457                            lapack_int kl, lapack_int ku, double* ab,
 458                            lapack_int ldab, lapack_int* ipiv );
 459 lapack_int LAPACKE_cgbtrf( int matrix_layout, lapack_int m, lapack_int n,
 460                            lapack_int kl, lapack_int ku,
 461                            lapack_complex_float* ab, lapack_int ldab,
 462                            lapack_int* ipiv );
 463 lapack_int LAPACKE_zgbtrf( int matrix_layout, lapack_int m, lapack_int n,
 464                            lapack_int kl, lapack_int ku,
 465                            lapack_complex_double* ab, lapack_int ldab,
 466                            lapack_int* ipiv );
 467
 468 lapack_int LAPACKE_sgbtrs( int matrix_layout, char trans, lapack_int n,
 469                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 470                            const float* ab, lapack_int ldab,
 471                            const lapack_int* ipiv, float* b, lapack_int ldb );
 472 lapack_int LAPACKE_dgbtrs( int matrix_layout, char trans, lapack_int n,
 473                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 474                            const double* ab, lapack_int ldab,
 475                            const lapack_int* ipiv, double* b, lapack_int ldb );
 476 lapack_int LAPACKE_cgbtrs( int matrix_layout, char trans, lapack_int n,
 477                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 478                            const lapack_complex_float* ab, lapack_int ldab,
 479                            const lapack_int* ipiv, lapack_complex_float* b,
 480                            lapack_int ldb );
 481 lapack_int LAPACKE_zgbtrs( int matrix_layout, char trans, lapack_int n,
 482                            lapack_int kl, lapack_int ku, lapack_int nrhs,
 483                            const lapack_complex_double* ab, lapack_int ldab,
 484                            const lapack_int* ipiv, lapack_complex_double* b,
 485                            lapack_int ldb );
 486
 487 lapack_int LAPACKE_sgebak( int matrix_layout, char job, char side, lapack_int n,
 488                            lapack_int ilo, lapack_int ihi, const float* scale,
 489                            lapack_int m, float* v, lapack_int ldv );
 490 lapack_int LAPACKE_dgebak( int matrix_layout, char job, char side, lapack_int n,
 491                            lapack_int ilo, lapack_int ihi, const double* scale,
 492                            lapack_int m, double* v, lapack_int ldv );
 493 lapack_int LAPACKE_cgebak( int matrix_layout, char job, char side, lapack_int n,
 494                            lapack_int ilo, lapack_int ihi, const float* scale,
 495                            lapack_int m, lapack_complex_float* v,
 496                            lapack_int ldv );
 497 lapack_int LAPACKE_zgebak( int matrix_layout, char job, char side, lapack_int n,
 498                            lapack_int ilo, lapack_int ihi, const double* scale,
 499                            lapack_int m, lapack_complex_double* v,
 500                            lapack_int ldv );
 501
 502 lapack_int LAPACKE_sgebal( int matrix_layout, char job, lapack_int n, float* a,
 503                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
 504                            float* scale );
 505 lapack_int LAPACKE_dgebal( int matrix_layout, char job, lapack_int n, double* a,
 506                            lapack_int lda, lapack_int* ilo, lapack_int* ihi,
 507                            double* scale );
 508 lapack_int LAPACKE_cgebal( int matrix_layout, char job, lapack_int n,
 509                            lapack_complex_float* a, lapack_int lda,
 510                            lapack_int* ilo, lapack_int* ihi, float* scale );
 511 lapack_int LAPACKE_zgebal( int matrix_layout, char job, lapack_int n,
 512                            lapack_complex_double* a, lapack_int lda,
 513                            lapack_int* ilo, lapack_int* ihi, double* scale );
 514
 515 lapack_int LAPACKE_sgebrd( int matrix_layout, lapack_int m, lapack_int n,
 516                            float* a, lapack_int lda, float* d, float* e,
 517                            float* tauq, float* taup );
 518 lapack_int LAPACKE_dgebrd( int matrix_layout, lapack_int m, lapack_int n,
 519                            double* a, lapack_int lda, double* d, double* e,
 520                            double* tauq, double* taup );
 521 lapack_int LAPACKE_cgebrd( int matrix_layout, lapack_int m, lapack_int n,
 522                            lapack_complex_float* a, lapack_int lda, float* d,
 523                            float* e, lapack_complex_float* tauq,
 524                            lapack_complex_float* taup );
 525 lapack_int LAPACKE_zgebrd( int matrix_layout, lapack_int m, lapack_int n,
 526                            lapack_complex_double* a, lapack_int lda, double* d,
 527                            double* e, lapack_complex_double* tauq,
 528                            lapack_complex_double* taup );
 529
 530 lapack_int LAPACKE_sgecon( int matrix_layout, char norm, lapack_int n,
 531                            const float* a, lapack_int lda, float anorm,
 532                            float* rcond );
 533 lapack_int LAPACKE_dgecon( int matrix_layout, char norm, lapack_int n,
 534                            const double* a, lapack_int lda, double anorm,
 535                            double* rcond );
 536 lapack_int LAPACKE_cgecon( int matrix_layout, char norm, lapack_int n,
 537                            const lapack_complex_float* a, lapack_int lda,
 538                            float anorm, float* rcond );
 539 lapack_int LAPACKE_zgecon( int matrix_layout, char norm, lapack_int n,
 540                            const lapack_complex_double* a, lapack_int lda,
 541                            double anorm, double* rcond );
 542
 543 lapack_int LAPACKE_sgeequ( int matrix_layout, lapack_int m, lapack_int n,
 544                            const float* a, lapack_int lda, float* r, float* c,
 545                            float* rowcnd, float* colcnd, float* amax );
 546 lapack_int LAPACKE_dgeequ( int matrix_layout, lapack_int m, lapack_int n,
 547                            const double* a, lapack_int lda, double* r,
 548                            double* c, double* rowcnd, double* colcnd,
 549                            double* amax );
 550 lapack_int LAPACKE_cgeequ( int matrix_layout, lapack_int m, lapack_int n,
 551                            const lapack_complex_float* a, lapack_int lda,
 552                            float* r, float* c, float* rowcnd, float* colcnd,
 553                            float* amax );
 554 lapack_int LAPACKE_zgeequ( int matrix_layout, lapack_int m, lapack_int n,
 555                            const lapack_complex_double* a, lapack_int lda,
 556                            double* r, double* c, double* rowcnd, double* colcnd,
 557                            double* amax );
 558
 559 lapack_int LAPACKE_sgeequb( int matrix_layout, lapack_int m, lapack_int n,
 560                             const float* a, lapack_int lda, float* r, float* c,
 561                             float* rowcnd, float* colcnd, float* amax );
 562 lapack_int LAPACKE_dgeequb( int matrix_layout, lapack_int m, lapack_int n,
 563                             const double* a, lapack_int lda, double* r,
 564                             double* c, double* rowcnd, double* colcnd,
 565                             double* amax );
 566 lapack_int LAPACKE_cgeequb( int matrix_layout, lapack_int m, lapack_int n,
 567                             const lapack_complex_float* a, lapack_int lda,
 568                             float* r, float* c, float* rowcnd, float* colcnd,
 569                             float* amax );
 570 lapack_int LAPACKE_zgeequb( int matrix_layout, lapack_int m, lapack_int n,
 571                             const lapack_complex_double* a, lapack_int lda,
 572                             double* r, double* c, double* rowcnd,
 573                             double* colcnd, double* amax );
 574
 575 lapack_int LAPACKE_sgees( int matrix_layout, char jobvs, char sort,
 576                           LAPACK_S_SELECT2 select, lapack_int n, float* a,
 577                           lapack_int lda, lapack_int* sdim, float* wr,
 578                           float* wi, float* vs, lapack_int ldvs );
 579 lapack_int LAPACKE_dgees( int matrix_layout, char jobvs, char sort,
 580                           LAPACK_D_SELECT2 select, lapack_int n, double* a,
 581                           lapack_int lda, lapack_int* sdim, double* wr,
 582                           double* wi, double* vs, lapack_int ldvs );
 583 lapack_int LAPACKE_cgees( int matrix_layout, char jobvs, char sort,
 584                           LAPACK_C_SELECT1 select, lapack_int n,
 585                           lapack_complex_float* a, lapack_int lda,
 586                           lapack_int* sdim, lapack_complex_float* w,
 587                           lapack_complex_float* vs, lapack_int ldvs );
 588 lapack_int LAPACKE_zgees( int matrix_layout, char jobvs, char sort,
 589                           LAPACK_Z_SELECT1 select, lapack_int n,
 590                           lapack_complex_double* a, lapack_int lda,
 591                           lapack_int* sdim, lapack_complex_double* w,
 592                           lapack_complex_double* vs, lapack_int ldvs );
 593
 594 lapack_int LAPACKE_sgeesx( int matrix_layout, char jobvs, char sort,
 595                            LAPACK_S_SELECT2 select, char sense, lapack_int n,
 596                            float* a, lapack_int lda, lapack_int* sdim,
 597                            float* wr, float* wi, float* vs, lapack_int ldvs,
 598                            float* rconde, float* rcondv );
 599 lapack_int LAPACKE_dgeesx( int matrix_layout, char jobvs, char sort,
 600                            LAPACK_D_SELECT2 select, char sense, lapack_int n,
 601                            double* a, lapack_int lda, lapack_int* sdim,
 602                            double* wr, double* wi, double* vs, lapack_int ldvs,
 603                            double* rconde, double* rcondv );
 604 lapack_int LAPACKE_cgeesx( int matrix_layout, char jobvs, char sort,
 605                            LAPACK_C_SELECT1 select, char sense, lapack_int n,
 606                            lapack_complex_float* a, lapack_int lda,
 607                            lapack_int* sdim, lapack_complex_float* w,
 608                            lapack_complex_float* vs, lapack_int ldvs,
 609                            float* rconde, float* rcondv );
 610 lapack_int LAPACKE_zgeesx( int matrix_layout, char jobvs, char sort,
 611                            LAPACK_Z_SELECT1 select, char sense, lapack_int n,
 612                            lapack_complex_double* a, lapack_int lda,
 613                            lapack_int* sdim, lapack_complex_double* w,
 614                            lapack_complex_double* vs, lapack_int ldvs,
 615                            double* rconde, double* rcondv );
 616
 617 lapack_int LAPACKE_sgeev( int matrix_layout, char jobvl, char jobvr,
 618                           lapack_int n, float* a, lapack_int lda, float* wr,
 619                           float* wi, float* vl, lapack_int ldvl, float* vr,
 620                           lapack_int ldvr );
 621 lapack_int LAPACKE_dgeev( int matrix_layout, char jobvl, char jobvr,
 622                           lapack_int n, double* a, lapack_int lda, double* wr,
 623                           double* wi, double* vl, lapack_int ldvl, double* vr,
 624                           lapack_int ldvr );
 625 lapack_int LAPACKE_cgeev( int matrix_layout, char jobvl, char jobvr,
 626                           lapack_int n, lapack_complex_float* a, lapack_int lda,
 627                           lapack_complex_float* w, lapack_complex_float* vl,
 628                           lapack_int ldvl, lapack_complex_float* vr,
 629                           lapack_int ldvr );
 630 lapack_int LAPACKE_zgeev( int matrix_layout, char jobvl, char jobvr,
 631                           lapack_int n, lapack_complex_double* a,
 632                           lapack_int lda, lapack_complex_double* w,
 633                           lapack_complex_double* vl, lapack_int ldvl,
 634                           lapack_complex_double* vr, lapack_int ldvr );
 635
 636 lapack_int LAPACKE_sgeevx( int matrix_layout, char balanc, char jobvl,
 637                            char jobvr, char sense, lapack_int n, float* a,
 638                            lapack_int lda, float* wr, float* wi, float* vl,
 639                            lapack_int ldvl, float* vr, lapack_int ldvr,
 640                            lapack_int* ilo, lapack_int* ihi, float* scale,
 641                            float* abnrm, float* rconde, float* rcondv );
 642 lapack_int LAPACKE_dgeevx( int matrix_layout, char balanc, char jobvl,
 643                            char jobvr, char sense, lapack_int n, double* a,
 644                            lapack_int lda, double* wr, double* wi, double* vl,
 645                            lapack_int ldvl, double* vr, lapack_int ldvr,
 646                            lapack_int* ilo, lapack_int* ihi, double* scale,
 647                            double* abnrm, double* rconde, double* rcondv );
 648 lapack_int LAPACKE_cgeevx( int matrix_layout, char balanc, char jobvl,
 649                            char jobvr, char sense, lapack_int n,
 650                            lapack_complex_float* a, lapack_int lda,
 651                            lapack_complex_float* w, lapack_complex_float* vl,
 652                            lapack_int ldvl, lapack_complex_float* vr,
 653                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
 654                            float* scale, float* abnrm, float* rconde,
 655                            float* rcondv );
 656 lapack_int LAPACKE_zgeevx( int matrix_layout, char balanc, char jobvl,
 657                            char jobvr, char sense, lapack_int n,
 658                            lapack_complex_double* a, lapack_int lda,
 659                            lapack_complex_double* w, lapack_complex_double* vl,
 660                            lapack_int ldvl, lapack_complex_double* vr,
 661                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
 662                            double* scale, double* abnrm, double* rconde,
 663                            double* rcondv );
 664
 665 lapack_int LAPACKE_sgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
 666                            lapack_int ihi, float* a, lapack_int lda,
 667                            float* tau );
 668 lapack_int LAPACKE_dgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
 669                            lapack_int ihi, double* a, lapack_int lda,
 670                            double* tau );
 671 lapack_int LAPACKE_cgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
 672                            lapack_int ihi, lapack_complex_float* a,
 673                            lapack_int lda, lapack_complex_float* tau );
 674 lapack_int LAPACKE_zgehrd( int matrix_layout, lapack_int n, lapack_int ilo,
 675                            lapack_int ihi, lapack_complex_double* a,
 676                            lapack_int lda, lapack_complex_double* tau );
 677
 678 lapack_int LAPACKE_sgejsv( int matrix_layout, char joba, char jobu, char jobv,
 679                            char jobr, char jobt, char jobp, lapack_int m,
 680                            lapack_int n, float* a, lapack_int lda, float* sva,
 681                            float* u, lapack_int ldu, float* v, lapack_int ldv,
 682                            float* stat, lapack_int* istat );
 683 lapack_int LAPACKE_dgejsv( int matrix_layout, char joba, char jobu, char jobv,
 684                            char jobr, char jobt, char jobp, lapack_int m,
 685                            lapack_int n, double* a, lapack_int lda, double* sva,
 686                            double* u, lapack_int ldu, double* v, lapack_int ldv,
 687                            double* stat, lapack_int* istat );
 688 lapack_int LAPACKE_cgejsv( int matrix_layout, char joba, char jobu, char jobv,
 689                            char jobr, char jobt, char jobp, lapack_int m,
 690                            lapack_int n, lapack_complex_float* a, lapack_int lda, float* sva,
 691                            lapack_complex_float* u, lapack_int ldu, lapack_complex_float* v, lapack_int ldv,
 692                            float* stat, lapack_int* istat );
 693 lapack_int LAPACKE_zgejsv( int matrix_layout, char joba, char jobu, char jobv,
 694                            char jobr, char jobt, char jobp, lapack_int m,
 695                            lapack_int n, lapack_complex_double* a, lapack_int lda, double* sva,
 696                            lapack_complex_double* u, lapack_int ldu, lapack_complex_double* v, lapack_int ldv,
 697                            double* stat, lapack_int* istat );
 698
 699 lapack_int LAPACKE_sgelq2( int matrix_layout, lapack_int m, lapack_int n,
 700                            float* a, lapack_int lda, float* tau );
 701 lapack_int LAPACKE_dgelq2( int matrix_layout, lapack_int m, lapack_int n,
 702                            double* a, lapack_int lda, double* tau );
 703 lapack_int LAPACKE_cgelq2( int matrix_layout, lapack_int m, lapack_int n,
 704                            lapack_complex_float* a, lapack_int lda,
 705                            lapack_complex_float* tau );
 706 lapack_int LAPACKE_zgelq2( int matrix_layout, lapack_int m, lapack_int n,
 707                            lapack_complex_double* a, lapack_int lda,
 708                            lapack_complex_double* tau );
 709
 710 lapack_int LAPACKE_sgelqf( int matrix_layout, lapack_int m, lapack_int n,
 711                            float* a, lapack_int lda, float* tau );
 712 lapack_int LAPACKE_dgelqf( int matrix_layout, lapack_int m, lapack_int n,
 713                            double* a, lapack_int lda, double* tau );
 714 lapack_int LAPACKE_cgelqf( int matrix_layout, lapack_int m, lapack_int n,
 715                            lapack_complex_float* a, lapack_int lda,
 716                            lapack_complex_float* tau );
 717 lapack_int LAPACKE_zgelqf( int matrix_layout, lapack_int m, lapack_int n,
 718                            lapack_complex_double* a, lapack_int lda,
 719                            lapack_complex_double* tau );
 720
 721 lapack_int LAPACKE_sgels( int matrix_layout, char trans, lapack_int m,
 722                           lapack_int n, lapack_int nrhs, float* a,
 723                           lapack_int lda, float* b, lapack_int ldb );
 724 lapack_int LAPACKE_dgels( int matrix_layout, char trans, lapack_int m,
 725                           lapack_int n, lapack_int nrhs, double* a,
 726                           lapack_int lda, double* b, lapack_int ldb );
 727 lapack_int LAPACKE_cgels( int matrix_layout, char trans, lapack_int m,
 728                           lapack_int n, lapack_int nrhs,
 729                           lapack_complex_float* a, lapack_int lda,
 730                           lapack_complex_float* b, lapack_int ldb );
 731 lapack_int LAPACKE_zgels( int matrix_layout, char trans, lapack_int m,
 732                           lapack_int n, lapack_int nrhs,
 733                           lapack_complex_double* a, lapack_int lda,
 734                           lapack_complex_double* b, lapack_int ldb );
 735
 736 lapack_int LAPACKE_sgelsd( int matrix_layout, lapack_int m, lapack_int n,
 737                            lapack_int nrhs, float* a, lapack_int lda, float* b,
 738                            lapack_int ldb, float* s, float rcond,
 739                            lapack_int* rank );
 740 lapack_int LAPACKE_dgelsd( int matrix_layout, lapack_int m, lapack_int n,
 741                            lapack_int nrhs, double* a, lapack_int lda,
 742                            double* b, lapack_int ldb, double* s, double rcond,
 743                            lapack_int* rank );
 744 lapack_int LAPACKE_cgelsd( int matrix_layout, lapack_int m, lapack_int n,
 745                            lapack_int nrhs, lapack_complex_float* a,
 746                            lapack_int lda, lapack_complex_float* b,
 747                            lapack_int ldb, float* s, float rcond,
 748                            lapack_int* rank );
 749 lapack_int LAPACKE_zgelsd( int matrix_layout, lapack_int m, lapack_int n,
 750                            lapack_int nrhs, lapack_complex_double* a,
 751                            lapack_int lda, lapack_complex_double* b,
 752                            lapack_int ldb, double* s, double rcond,
 753                            lapack_int* rank );
 754
 755 lapack_int LAPACKE_sgelss( int matrix_layout, lapack_int m, lapack_int n,
 756                            lapack_int nrhs, float* a, lapack_int lda, float* b,
 757                            lapack_int ldb, float* s, float rcond,
 758                            lapack_int* rank );
 759 lapack_int LAPACKE_dgelss( int matrix_layout, lapack_int m, lapack_int n,
 760                            lapack_int nrhs, double* a, lapack_int lda,
 761                            double* b, lapack_int ldb, double* s, double rcond,
 762                            lapack_int* rank );
 763 lapack_int LAPACKE_cgelss( int matrix_layout, lapack_int m, lapack_int n,
 764                            lapack_int nrhs, lapack_complex_float* a,
 765                            lapack_int lda, lapack_complex_float* b,
 766                            lapack_int ldb, float* s, float rcond,
 767                            lapack_int* rank );
 768 lapack_int LAPACKE_zgelss( int matrix_layout, lapack_int m, lapack_int n,
 769                            lapack_int nrhs, lapack_complex_double* a,
 770                            lapack_int lda, lapack_complex_double* b,
 771                            lapack_int ldb, double* s, double rcond,
 772                            lapack_int* rank );
 773
 774 lapack_int LAPACKE_sgelsy( int matrix_layout, lapack_int m, lapack_int n,
 775                            lapack_int nrhs, float* a, lapack_int lda, float* b,
 776                            lapack_int ldb, lapack_int* jpvt, float rcond,
 777                            lapack_int* rank );
 778 lapack_int LAPACKE_dgelsy( int matrix_layout, lapack_int m, lapack_int n,
 779                            lapack_int nrhs, double* a, lapack_int lda,
 780                            double* b, lapack_int ldb, lapack_int* jpvt,
 781                            double rcond, lapack_int* rank );
 782 lapack_int LAPACKE_cgelsy( int matrix_layout, lapack_int m, lapack_int n,
 783                            lapack_int nrhs, lapack_complex_float* a,
 784                            lapack_int lda, lapack_complex_float* b,
 785                            lapack_int ldb, lapack_int* jpvt, float rcond,
 786                            lapack_int* rank );
 787 lapack_int LAPACKE_zgelsy( int matrix_layout, lapack_int m, lapack_int n,
 788                            lapack_int nrhs, lapack_complex_double* a,
 789                            lapack_int lda, lapack_complex_double* b,
 790                            lapack_int ldb, lapack_int* jpvt, double rcond,
 791                            lapack_int* rank );
 792
 793 lapack_int LAPACKE_sgeqlf( int matrix_layout, lapack_int m, lapack_int n,
 794                            float* a, lapack_int lda, float* tau );
 795 lapack_int LAPACKE_dgeqlf( int matrix_layout, lapack_int m, lapack_int n,
 796                            double* a, lapack_int lda, double* tau );
 797 lapack_int LAPACKE_cgeqlf( int matrix_layout, lapack_int m, lapack_int n,
 798                            lapack_complex_float* a, lapack_int lda,
 799                            lapack_complex_float* tau );
 800 lapack_int LAPACKE_zgeqlf( int matrix_layout, lapack_int m, lapack_int n,
 801                            lapack_complex_double* a, lapack_int lda,
 802                            lapack_complex_double* tau );
 803
 804 lapack_int LAPACKE_sgeqp3( int matrix_layout, lapack_int m, lapack_int n,
 805                            float* a, lapack_int lda, lapack_int* jpvt,
 806                            float* tau );
 807 lapack_int LAPACKE_dgeqp3( int matrix_layout, lapack_int m, lapack_int n,
 808                            double* a, lapack_int lda, lapack_int* jpvt,
 809                            double* tau );
 810 lapack_int LAPACKE_cgeqp3( int matrix_layout, lapack_int m, lapack_int n,
 811                            lapack_complex_float* a, lapack_int lda,
 812                            lapack_int* jpvt, lapack_complex_float* tau );
 813 lapack_int LAPACKE_zgeqp3( int matrix_layout, lapack_int m, lapack_int n,
 814                            lapack_complex_double* a, lapack_int lda,
 815                            lapack_int* jpvt, lapack_complex_double* tau );
 816
 817 lapack_int LAPACKE_sgeqpf( int matrix_layout, lapack_int m, lapack_int n,
 818                            float* a, lapack_int lda, lapack_int* jpvt,
 819                            float* tau );
 820 lapack_int LAPACKE_dgeqpf( int matrix_layout, lapack_int m, lapack_int n,
 821                            double* a, lapack_int lda, lapack_int* jpvt,
 822                            double* tau );
 823 lapack_int LAPACKE_cgeqpf( int matrix_layout, lapack_int m, lapack_int n,
 824                            lapack_complex_float* a, lapack_int lda,
 825                            lapack_int* jpvt, lapack_complex_float* tau );
 826 lapack_int LAPACKE_zgeqpf( int matrix_layout, lapack_int m, lapack_int n,
 827                            lapack_complex_double* a, lapack_int lda,
 828                            lapack_int* jpvt, lapack_complex_double* tau );
 829
 830 lapack_int LAPACKE_sgeqr2( int matrix_layout, lapack_int m, lapack_int n,
 831                            float* a, lapack_int lda, float* tau );
 832 lapack_int LAPACKE_dgeqr2( int matrix_layout, lapack_int m, lapack_int n,
 833                            double* a, lapack_int lda, double* tau );
 834 lapack_int LAPACKE_cgeqr2( int matrix_layout, lapack_int m, lapack_int n,
 835                            lapack_complex_float* a, lapack_int lda,
 836                            lapack_complex_float* tau );
 837 lapack_int LAPACKE_zgeqr2( int matrix_layout, lapack_int m, lapack_int n,
 838                            lapack_complex_double* a, lapack_int lda,
 839                            lapack_complex_double* tau );
 840
 841 lapack_int LAPACKE_sgeqrf( int matrix_layout, lapack_int m, lapack_int n,
 842                            float* a, lapack_int lda, float* tau );
 843 lapack_int LAPACKE_dgeqrf( int matrix_layout, lapack_int m, lapack_int n,
 844                            double* a, lapack_int lda, double* tau );
 845 lapack_int LAPACKE_cgeqrf( int matrix_layout, lapack_int m, lapack_int n,
 846                            lapack_complex_float* a, lapack_int lda,
 847                            lapack_complex_float* tau );
 848 lapack_int LAPACKE_zgeqrf( int matrix_layout, lapack_int m, lapack_int n,
 849                            lapack_complex_double* a, lapack_int lda,
 850                            lapack_complex_double* tau );
 851
 852 lapack_int LAPACKE_sgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
 853                             float* a, lapack_int lda, float* tau );
 854 lapack_int LAPACKE_dgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
 855                             double* a, lapack_int lda, double* tau );
 856 lapack_int LAPACKE_cgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
 857                             lapack_complex_float* a, lapack_int lda,
 858                             lapack_complex_float* tau );
 859 lapack_int LAPACKE_zgeqrfp( int matrix_layout, lapack_int m, lapack_int n,
 860                             lapack_complex_double* a, lapack_int lda,
 861                             lapack_complex_double* tau );
 862
 863 lapack_int LAPACKE_sgerfs( int matrix_layout, char trans, lapack_int n,
 864                            lapack_int nrhs, const float* a, lapack_int lda,
 865                            const float* af, lapack_int ldaf,
 866                            const lapack_int* ipiv, const float* b,
 867                            lapack_int ldb, float* x, lapack_int ldx,
 868                            float* ferr, float* berr );
 869 lapack_int LAPACKE_dgerfs( int matrix_layout, char trans, lapack_int n,
 870                            lapack_int nrhs, const double* a, lapack_int lda,
 871                            const double* af, lapack_int ldaf,
 872                            const lapack_int* ipiv, const double* b,
 873                            lapack_int ldb, double* x, lapack_int ldx,
 874                            double* ferr, double* berr );
 875 lapack_int LAPACKE_cgerfs( int matrix_layout, char trans, lapack_int n,
 876                            lapack_int nrhs, const lapack_complex_float* a,
 877                            lapack_int lda, const lapack_complex_float* af,
 878                            lapack_int ldaf, const lapack_int* ipiv,
 879                            const lapack_complex_float* b, lapack_int ldb,
 880                            lapack_complex_float* x, lapack_int ldx, float* ferr,
 881                            float* berr );
 882 lapack_int LAPACKE_zgerfs( int matrix_layout, char trans, lapack_int n,
 883                            lapack_int nrhs, const lapack_complex_double* a,
 884                            lapack_int lda, const lapack_complex_double* af,
 885                            lapack_int ldaf, const lapack_int* ipiv,
 886                            const lapack_complex_double* b, lapack_int ldb,
 887                            lapack_complex_double* x, lapack_int ldx,
 888                            double* ferr, double* berr );
 889
 890 lapack_int LAPACKE_sgerfsx( int matrix_layout, char trans, char equed,
 891                             lapack_int n, lapack_int nrhs, const float* a,
 892                             lapack_int lda, const float* af, lapack_int ldaf,
 893                             const lapack_int* ipiv, const float* r,
 894                             const float* c, const float* b, lapack_int ldb,
 895                             float* x, lapack_int ldx, float* rcond, float* berr,
 896                             lapack_int n_err_bnds, float* err_bnds_norm,
 897                             float* err_bnds_comp, lapack_int nparams,
 898                             float* params );
 899 lapack_int LAPACKE_dgerfsx( int matrix_layout, char trans, char equed,
 900                             lapack_int n, lapack_int nrhs, const double* a,
 901                             lapack_int lda, const double* af, lapack_int ldaf,
 902                             const lapack_int* ipiv, const double* r,
 903                             const double* c, const double* b, lapack_int ldb,
 904                             double* x, lapack_int ldx, double* rcond,
 905                             double* berr, lapack_int n_err_bnds,
 906                             double* err_bnds_norm, double* err_bnds_comp,
 907                             lapack_int nparams, double* params );
 908 lapack_int LAPACKE_cgerfsx( int matrix_layout, char trans, char equed,
 909                             lapack_int n, lapack_int nrhs,
 910                             const lapack_complex_float* a, lapack_int lda,
 911                             const lapack_complex_float* af, lapack_int ldaf,
 912                             const lapack_int* ipiv, const float* r,
 913                             const float* c, const lapack_complex_float* b,
 914                             lapack_int ldb, lapack_complex_float* x,
 915                             lapack_int ldx, float* rcond, float* berr,
 916                             lapack_int n_err_bnds, float* err_bnds_norm,
 917                             float* err_bnds_comp, lapack_int nparams,
 918                             float* params );
 919 lapack_int LAPACKE_zgerfsx( int matrix_layout, char trans, char equed,
 920                             lapack_int n, lapack_int nrhs,
 921                             const lapack_complex_double* a, lapack_int lda,
 922                             const lapack_complex_double* af, lapack_int ldaf,
 923                             const lapack_int* ipiv, const double* r,
 924                             const double* c, const lapack_complex_double* b,
 925                             lapack_int ldb, lapack_complex_double* x,
 926                             lapack_int ldx, double* rcond, double* berr,
 927                             lapack_int n_err_bnds, double* err_bnds_norm,
 928                             double* err_bnds_comp, lapack_int nparams,
 929                             double* params );
 930
 931 lapack_int LAPACKE_sgerqf( int matrix_layout, lapack_int m, lapack_int n,
 932                            float* a, lapack_int lda, float* tau );
 933 lapack_int LAPACKE_dgerqf( int matrix_layout, lapack_int m, lapack_int n,
 934                            double* a, lapack_int lda, double* tau );
 935 lapack_int LAPACKE_cgerqf( int matrix_layout, lapack_int m, lapack_int n,
 936                            lapack_complex_float* a, lapack_int lda,
 937                            lapack_complex_float* tau );
 938 lapack_int LAPACKE_zgerqf( int matrix_layout, lapack_int m, lapack_int n,
 939                            lapack_complex_double* a, lapack_int lda,
 940                            lapack_complex_double* tau );
 941
 942 lapack_int LAPACKE_sgesdd( int matrix_layout, char jobz, lapack_int m,
 943                            lapack_int n, float* a, lapack_int lda, float* s,
 944                            float* u, lapack_int ldu, float* vt,
 945                            lapack_int ldvt );
 946 lapack_int LAPACKE_dgesdd( int matrix_layout, char jobz, lapack_int m,
 947                            lapack_int n, double* a, lapack_int lda, double* s,
 948                            double* u, lapack_int ldu, double* vt,
 949                            lapack_int ldvt );
 950 lapack_int LAPACKE_cgesdd( int matrix_layout, char jobz, lapack_int m,
 951                            lapack_int n, lapack_complex_float* a,
 952                            lapack_int lda, float* s, lapack_complex_float* u,
 953                            lapack_int ldu, lapack_complex_float* vt,
 954                            lapack_int ldvt );
 955 lapack_int LAPACKE_zgesdd( int matrix_layout, char jobz, lapack_int m,
 956                            lapack_int n, lapack_complex_double* a,
 957                            lapack_int lda, double* s, lapack_complex_double* u,
 958                            lapack_int ldu, lapack_complex_double* vt,
 959                            lapack_int ldvt );
 960
 961 lapack_int LAPACKE_sgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 962                           float* a, lapack_int lda, lapack_int* ipiv, float* b,
 963                           lapack_int ldb );
 964 lapack_int LAPACKE_dgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 965                           double* a, lapack_int lda, lapack_int* ipiv,
 966                           double* b, lapack_int ldb );
 967 lapack_int LAPACKE_cgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 968                           lapack_complex_float* a, lapack_int lda,
 969                           lapack_int* ipiv, lapack_complex_float* b,
 970                           lapack_int ldb );
 971 lapack_int LAPACKE_zgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 972                           lapack_complex_double* a, lapack_int lda,
 973                           lapack_int* ipiv, lapack_complex_double* b,
 974                           lapack_int ldb );
 975 lapack_int LAPACKE_dsgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 976                            double* a, lapack_int lda, lapack_int* ipiv,
 977                            double* b, lapack_int ldb, double* x, lapack_int ldx,
 978                            lapack_int* iter );
 979 lapack_int LAPACKE_zcgesv( int matrix_layout, lapack_int n, lapack_int nrhs,
 980                            lapack_complex_double* a, lapack_int lda,
 981                            lapack_int* ipiv, lapack_complex_double* b,
 982                            lapack_int ldb, lapack_complex_double* x,
 983                            lapack_int ldx, lapack_int* iter );
 984
 985 lapack_int LAPACKE_sgesvd( int matrix_layout, char jobu, char jobvt,
 986                            lapack_int m, lapack_int n, float* a, lapack_int lda,
 987                            float* s, float* u, lapack_int ldu, float* vt,
 988                            lapack_int ldvt, float* superb );
 989 lapack_int LAPACKE_dgesvd( int matrix_layout, char jobu, char jobvt,
 990                            lapack_int m, lapack_int n, double* a,
 991                            lapack_int lda, double* s, double* u, lapack_int ldu,
 992                            double* vt, lapack_int ldvt, double* superb );
 993 lapack_int LAPACKE_cgesvd( int matrix_layout, char jobu, char jobvt,
 994                            lapack_int m, lapack_int n, lapack_complex_float* a,
 995                            lapack_int lda, float* s, lapack_complex_float* u,
 996                            lapack_int ldu, lapack_complex_float* vt,
 997                            lapack_int ldvt, float* superb );
 998 lapack_int LAPACKE_zgesvd( int matrix_layout, char jobu, char jobvt,
 999                            lapack_int m, lapack_int n, lapack_complex_double* a,
1000                            lapack_int lda, double* s, lapack_complex_double* u,
1001                            lapack_int ldu, lapack_complex_double* vt,
1002                            lapack_int ldvt, double* superb );
1003
1004 lapack_int LAPACKE_sgesvdx( int matrix_layout, char jobu, char jobvt, char range,
1005                            lapack_int m, lapack_int n, float* a,
1006                            lapack_int lda, float vl, float vu,
1007                            lapack_int il, lapack_int iu, lapack_int* ns,
1008                            float* s, float* u, lapack_int ldu,
1009                            float* vt, lapack_int ldvt,
1010                            lapack_int* superb );
1011 lapack_int LAPACKE_dgesvdx( int matrix_layout, char jobu, char jobvt, char range,
1012                            lapack_int m, lapack_int n, double* a,
1013                            lapack_int lda, double vl, double vu,
1014                            lapack_int il, lapack_int iu, lapack_int* ns,
1015                            double* s, double* u, lapack_int ldu,
1016                            double* vt, lapack_int ldvt,
1017                            lapack_int* superb );
1018 lapack_int LAPACKE_cgesvdx( int matrix_layout, char jobu, char jobvt, char range,
1019                            lapack_int m, lapack_int n, lapack_complex_float* a,
1020                            lapack_int lda, float vl, float vu,
1021                            lapack_int il, lapack_int iu, lapack_int* ns,
1022                            float* s, lapack_complex_float* u, lapack_int ldu,
1023                            lapack_complex_float* vt, lapack_int ldvt,
1024                            lapack_int* superb );
1025 lapack_int LAPACKE_zgesvdx( int matrix_layout, char jobu, char jobvt, char range,
1026                            lapack_int m, lapack_int n, lapack_complex_double* a,
1027                            lapack_int lda, double vl, double vu,
1028                            lapack_int il, lapack_int iu, lapack_int* ns,
1029                            double* s, lapack_complex_double* u, lapack_int ldu,
1030                            lapack_complex_double* vt, lapack_int ldvt,
1031                            lapack_int* superb );
1032
1033 lapack_int LAPACKE_sgesvj( int matrix_layout, char joba, char jobu, char jobv,
1034                            lapack_int m, lapack_int n, float* a, lapack_int lda,
1035                            float* sva, lapack_int mv, float* v, lapack_int ldv,
1036                            float* stat );
1037 lapack_int LAPACKE_dgesvj( int matrix_layout, char joba, char jobu, char jobv,
1038                            lapack_int m, lapack_int n, double* a,
1039                            lapack_int lda, double* sva, lapack_int mv,
1040                            double* v, lapack_int ldv, double* stat );
1041 lapack_int LAPACKE_cgesvj( int matrix_layout, char joba, char jobu, char jobv,
1042                            lapack_int m, lapack_int n, lapack_complex_float* a,
1043                            lapack_int lda, float* sva, lapack_int mv,
1044                            lapack_complex_float* v, lapack_int ldv, float* stat );
1045 lapack_int LAPACKE_zgesvj( int matrix_layout, char joba, char jobu, char jobv,
1046                            lapack_int m, lapack_int n, lapack_complex_double* a,
1047                            lapack_int lda, double* sva, lapack_int mv,
1048                            lapack_complex_double* v, lapack_int ldv, double* stat );
1049
1050 lapack_int LAPACKE_sgesvx( int matrix_layout, char fact, char trans,
1051                            lapack_int n, lapack_int nrhs, float* a,
1052                            lapack_int lda, float* af, lapack_int ldaf,
1053                            lapack_int* ipiv, char* equed, float* r, float* c,
1054                            float* b, lapack_int ldb, float* x, lapack_int ldx,
1055                            float* rcond, float* ferr, float* berr,
1056                            float* rpivot );
1057 lapack_int LAPACKE_dgesvx( int matrix_layout, char fact, char trans,
1058                            lapack_int n, lapack_int nrhs, double* a,
1059                            lapack_int lda, double* af, lapack_int ldaf,
1060                            lapack_int* ipiv, char* equed, double* r, double* c,
1061                            double* b, lapack_int ldb, double* x, lapack_int ldx,
1062                            double* rcond, double* ferr, double* berr,
1063                            double* rpivot );
1064 lapack_int LAPACKE_cgesvx( int matrix_layout, char fact, char trans,
1065                            lapack_int n, lapack_int nrhs,
1066                            lapack_complex_float* a, lapack_int lda,
1067                            lapack_complex_float* af, lapack_int ldaf,
1068                            lapack_int* ipiv, char* equed, float* r, float* c,
1069                            lapack_complex_float* b, lapack_int ldb,
1070                            lapack_complex_float* x, lapack_int ldx,
1071                            float* rcond, float* ferr, float* berr,
1072                            float* rpivot );
1073 lapack_int LAPACKE_zgesvx( int matrix_layout, char fact, char trans,
1074                            lapack_int n, lapack_int nrhs,
1075                            lapack_complex_double* a, lapack_int lda,
1076                            lapack_complex_double* af, lapack_int ldaf,
1077                            lapack_int* ipiv, char* equed, double* r, double* c,
1078                            lapack_complex_double* b, lapack_int ldb,
1079                            lapack_complex_double* x, lapack_int ldx,
1080                            double* rcond, double* ferr, double* berr,
1081                            double* rpivot );
1082
1083 lapack_int LAPACKE_sgesvxx( int matrix_layout, char fact, char trans,
1084                             lapack_int n, lapack_int nrhs, float* a,
1085                             lapack_int lda, float* af, lapack_int ldaf,
1086                             lapack_int* ipiv, char* equed, float* r, float* c,
1087                             float* b, lapack_int ldb, float* x, lapack_int ldx,
1088                             float* rcond, float* rpvgrw, float* berr,
1089                             lapack_int n_err_bnds, float* err_bnds_norm,
1090                             float* err_bnds_comp, lapack_int nparams,
1091                             float* params );
1092 lapack_int LAPACKE_dgesvxx( int matrix_layout, char fact, char trans,
1093                             lapack_int n, lapack_int nrhs, double* a,
1094                             lapack_int lda, double* af, lapack_int ldaf,
1095                             lapack_int* ipiv, char* equed, double* r, double* c,
1096                             double* b, lapack_int ldb, double* x,
1097                             lapack_int ldx, double* rcond, double* rpvgrw,
1098                             double* berr, lapack_int n_err_bnds,
1099                             double* err_bnds_norm, double* err_bnds_comp,
1100                             lapack_int nparams, double* params );
1101 lapack_int LAPACKE_cgesvxx( int matrix_layout, char fact, char trans,
1102                             lapack_int n, lapack_int nrhs,
1103                             lapack_complex_float* a, lapack_int lda,
1104                             lapack_complex_float* af, lapack_int ldaf,
1105                             lapack_int* ipiv, char* equed, float* r, float* c,
1106                             lapack_complex_float* b, lapack_int ldb,
1107                             lapack_complex_float* x, lapack_int ldx,
1108                             float* rcond, float* rpvgrw, float* berr,
1109                             lapack_int n_err_bnds, float* err_bnds_norm,
1110                             float* err_bnds_comp, lapack_int nparams,
1111                             float* params );
1112 lapack_int LAPACKE_zgesvxx( int matrix_layout, char fact, char trans,
1113                             lapack_int n, lapack_int nrhs,
1114                             lapack_complex_double* a, lapack_int lda,
1115                             lapack_complex_double* af, lapack_int ldaf,
1116                             lapack_int* ipiv, char* equed, double* r, double* c,
1117                             lapack_complex_double* b, lapack_int ldb,
1118                             lapack_complex_double* x, lapack_int ldx,
1119                             double* rcond, double* rpvgrw, double* berr,
1120                             lapack_int n_err_bnds, double* err_bnds_norm,
1121                             double* err_bnds_comp, lapack_int nparams,
1122                             double* params );
1123
1124 lapack_int LAPACKE_sgetf2( int matrix_layout, lapack_int m, lapack_int n,
1125                            float* a, lapack_int lda, lapack_int* ipiv );
1126 lapack_int LAPACKE_dgetf2( int matrix_layout, lapack_int m, lapack_int n,
1127                            double* a, lapack_int lda, lapack_int* ipiv );
1128 lapack_int LAPACKE_cgetf2( int matrix_layout, lapack_int m, lapack_int n,
1129                            lapack_complex_float* a, lapack_int lda,
1130                            lapack_int* ipiv );
1131 lapack_int LAPACKE_zgetf2( int matrix_layout, lapack_int m, lapack_int n,
1132                            lapack_complex_double* a, lapack_int lda,
1133                            lapack_int* ipiv );
1134
1135 lapack_int LAPACKE_sgetrf( int matrix_layout, lapack_int m, lapack_int n,
1136                            float* a, lapack_int lda, lapack_int* ipiv );
1137 lapack_int LAPACKE_dgetrf( int matrix_layout, lapack_int m, lapack_int n,
1138                            double* a, lapack_int lda, lapack_int* ipiv );
1139 lapack_int LAPACKE_cgetrf( int matrix_layout, lapack_int m, lapack_int n,
1140                            lapack_complex_float* a, lapack_int lda,
1141                            lapack_int* ipiv );
1142 lapack_int LAPACKE_zgetrf( int matrix_layout, lapack_int m, lapack_int n,
1143                            lapack_complex_double* a, lapack_int lda,
1144                            lapack_int* ipiv );
1145
1146 lapack_int LAPACKE_sgetrf2( int matrix_layout, lapack_int m, lapack_int n,
1147                            float* a, lapack_int lda, lapack_int* ipiv );
1148 lapack_int LAPACKE_dgetrf2( int matrix_layout, lapack_int m, lapack_int n,
1149                            double* a, lapack_int lda, lapack_int* ipiv );
1150 lapack_int LAPACKE_cgetrf2( int matrix_layout, lapack_int m, lapack_int n,
1151                            lapack_complex_float* a, lapack_int lda,
1152                            lapack_int* ipiv );
1153 lapack_int LAPACKE_zgetrf2( int matrix_layout, lapack_int m, lapack_int n,
1154                            lapack_complex_double* a, lapack_int lda,
1155                            lapack_int* ipiv );
1156
1157 lapack_int LAPACKE_sgetri( int matrix_layout, lapack_int n, float* a,
1158                            lapack_int lda, const lapack_int* ipiv );
1159 lapack_int LAPACKE_dgetri( int matrix_layout, lapack_int n, double* a,
1160                            lapack_int lda, const lapack_int* ipiv );
1161 lapack_int LAPACKE_cgetri( int matrix_layout, lapack_int n,
1162                            lapack_complex_float* a, lapack_int lda,
1163                            const lapack_int* ipiv );
1164 lapack_int LAPACKE_zgetri( int matrix_layout, lapack_int n,
1165                            lapack_complex_double* a, lapack_int lda,
1166                            const lapack_int* ipiv );
1167
1168 lapack_int LAPACKE_sgetrs( int matrix_layout, char trans, lapack_int n,
1169                            lapack_int nrhs, const float* a, lapack_int lda,
1170                            const lapack_int* ipiv, float* b, lapack_int ldb );
1171 lapack_int LAPACKE_dgetrs( int matrix_layout, char trans, lapack_int n,
1172                            lapack_int nrhs, const double* a, lapack_int lda,
1173                            const lapack_int* ipiv, double* b, lapack_int ldb );
1174 lapack_int LAPACKE_cgetrs( int matrix_layout, char trans, lapack_int n,
1175                            lapack_int nrhs, const lapack_complex_float* a,
1176                            lapack_int lda, const lapack_int* ipiv,
1177                            lapack_complex_float* b, lapack_int ldb );
1178 lapack_int LAPACKE_zgetrs( int matrix_layout, char trans, lapack_int n,
1179                            lapack_int nrhs, const lapack_complex_double* a,
1180                            lapack_int lda, const lapack_int* ipiv,
1181                            lapack_complex_double* b, lapack_int ldb );
1182
1183 lapack_int LAPACKE_sggbak( int matrix_layout, char job, char side, lapack_int n,
1184                            lapack_int ilo, lapack_int ihi, const float* lscale,
1185                            const float* rscale, lapack_int m, float* v,
1186                            lapack_int ldv );
1187 lapack_int LAPACKE_dggbak( int matrix_layout, char job, char side, lapack_int n,
1188                            lapack_int ilo, lapack_int ihi, const double* lscale,
1189                            const double* rscale, lapack_int m, double* v,
1190                            lapack_int ldv );
1191 lapack_int LAPACKE_cggbak( int matrix_layout, char job, char side, lapack_int n,
1192                            lapack_int ilo, lapack_int ihi, const float* lscale,
1193                            const float* rscale, lapack_int m,
1194                            lapack_complex_float* v, lapack_int ldv );
1195 lapack_int LAPACKE_zggbak( int matrix_layout, char job, char side, lapack_int n,
1196                            lapack_int ilo, lapack_int ihi, const double* lscale,
1197                            const double* rscale, lapack_int m,
1198                            lapack_complex_double* v, lapack_int ldv );
1199
1200 lapack_int LAPACKE_sggbal( int matrix_layout, char job, lapack_int n, float* a,
1201                            lapack_int lda, float* b, lapack_int ldb,
1202                            lapack_int* ilo, lapack_int* ihi, float* lscale,
1203                            float* rscale );
1204 lapack_int LAPACKE_dggbal( int matrix_layout, char job, lapack_int n, double* a,
1205                            lapack_int lda, double* b, lapack_int ldb,
1206                            lapack_int* ilo, lapack_int* ihi, double* lscale,
1207                            double* rscale );
1208 lapack_int LAPACKE_cggbal( int matrix_layout, char job, lapack_int n,
1209                            lapack_complex_float* a, lapack_int lda,
1210                            lapack_complex_float* b, lapack_int ldb,
1211                            lapack_int* ilo, lapack_int* ihi, float* lscale,
1212                            float* rscale );
1213 lapack_int LAPACKE_zggbal( int matrix_layout, char job, lapack_int n,
1214                            lapack_complex_double* a, lapack_int lda,
1215                            lapack_complex_double* b, lapack_int ldb,
1216                            lapack_int* ilo, lapack_int* ihi, double* lscale,
1217                            double* rscale );
1218
1219 lapack_int LAPACKE_sgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
1220                           LAPACK_S_SELECT3 selctg, lapack_int n, float* a,
1221                           lapack_int lda, float* b, lapack_int ldb,
1222                           lapack_int* sdim, float* alphar, float* alphai,
1223                           float* beta, float* vsl, lapack_int ldvsl, float* vsr,
1224                           lapack_int ldvsr );
1225 lapack_int LAPACKE_dgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
1226                           LAPACK_D_SELECT3 selctg, lapack_int n, double* a,
1227                           lapack_int lda, double* b, lapack_int ldb,
1228                           lapack_int* sdim, double* alphar, double* alphai,
1229                           double* beta, double* vsl, lapack_int ldvsl,
1230                           double* vsr, lapack_int ldvsr );
1231 lapack_int LAPACKE_cgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
1232                           LAPACK_C_SELECT2 selctg, lapack_int n,
1233                           lapack_complex_float* a, lapack_int lda,
1234                           lapack_complex_float* b, lapack_int ldb,
1235                           lapack_int* sdim, lapack_complex_float* alpha,
1236                           lapack_complex_float* beta, lapack_complex_float* vsl,
1237                           lapack_int ldvsl, lapack_complex_float* vsr,
1238                           lapack_int ldvsr );
1239 lapack_int LAPACKE_zgges( int matrix_layout, char jobvsl, char jobvsr, char sort,
1240                           LAPACK_Z_SELECT2 selctg, lapack_int n,
1241                           lapack_complex_double* a, lapack_int lda,
1242                           lapack_complex_double* b, lapack_int ldb,
1243                           lapack_int* sdim, lapack_complex_double* alpha,
1244                           lapack_complex_double* beta,
1245                           lapack_complex_double* vsl, lapack_int ldvsl,
1246                           lapack_complex_double* vsr, lapack_int ldvsr );
1247
1248 lapack_int LAPACKE_sgges3( int matrix_layout, char jobvsl, char jobvsr,
1249                            char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
1250                            float* a, lapack_int lda, float* b, lapack_int ldb,
1251                            lapack_int* sdim, float* alphar, float* alphai,
1252                            float* beta, float* vsl, lapack_int ldvsl,
1253                            float* vsr, lapack_int ldvsr );
1254 lapack_int LAPACKE_dgges3( int matrix_layout, char jobvsl, char jobvsr,
1255                            char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
1256                            double* a, lapack_int lda, double* b, lapack_int ldb,
1257                            lapack_int* sdim, double* alphar, double* alphai,
1258                            double* beta, double* vsl, lapack_int ldvsl,
1259                            double* vsr, lapack_int ldvsr );
1260 lapack_int LAPACKE_cgges3( int matrix_layout, char jobvsl, char jobvsr,
1261                            char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
1262                            lapack_complex_float* a, lapack_int lda,
1263                            lapack_complex_float* b, lapack_int ldb,
1264                            lapack_int* sdim, lapack_complex_float* alpha,
1265                            lapack_complex_float* beta,
1266                            lapack_complex_float* vsl, lapack_int ldvsl,
1267                            lapack_complex_float* vsr, lapack_int ldvsr );
1268 lapack_int LAPACKE_zgges3( int matrix_layout, char jobvsl, char jobvsr,
1269                            char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
1270                            lapack_complex_double* a, lapack_int lda,
1271                            lapack_complex_double* b, lapack_int ldb,
1272                            lapack_int* sdim, lapack_complex_double* alpha,
1273                            lapack_complex_double* beta,
1274                            lapack_complex_double* vsl, lapack_int ldvsl,
1275                            lapack_complex_double* vsr, lapack_int ldvsr );
1276
1277 lapack_int LAPACKE_sggesx( int matrix_layout, char jobvsl, char jobvsr,
1278                            char sort, LAPACK_S_SELECT3 selctg, char sense,
1279                            lapack_int n, float* a, lapack_int lda, float* b,
1280                            lapack_int ldb, lapack_int* sdim, float* alphar,
1281                            float* alphai, float* beta, float* vsl,
1282                            lapack_int ldvsl, float* vsr, lapack_int ldvsr,
1283                            float* rconde, float* rcondv );
1284 lapack_int LAPACKE_dggesx( int matrix_layout, char jobvsl, char jobvsr,
1285                            char sort, LAPACK_D_SELECT3 selctg, char sense,
1286                            lapack_int n, double* a, lapack_int lda, double* b,
1287                            lapack_int ldb, lapack_int* sdim, double* alphar,
1288                            double* alphai, double* beta, double* vsl,
1289                            lapack_int ldvsl, double* vsr, lapack_int ldvsr,
1290                            double* rconde, double* rcondv );
1291 lapack_int LAPACKE_cggesx( int matrix_layout, char jobvsl, char jobvsr,
1292                            char sort, LAPACK_C_SELECT2 selctg, char sense,
1293                            lapack_int n, lapack_complex_float* a,
1294                            lapack_int lda, lapack_complex_float* b,
1295                            lapack_int ldb, lapack_int* sdim,
1296                            lapack_complex_float* alpha,
1297                            lapack_complex_float* beta,
1298                            lapack_complex_float* vsl, lapack_int ldvsl,
1299                            lapack_complex_float* vsr, lapack_int ldvsr,
1300                            float* rconde, float* rcondv );
1301 lapack_int LAPACKE_zggesx( int matrix_layout, char jobvsl, char jobvsr,
1302                            char sort, LAPACK_Z_SELECT2 selctg, char sense,
1303                            lapack_int n, lapack_complex_double* a,
1304                            lapack_int lda, lapack_complex_double* b,
1305                            lapack_int ldb, lapack_int* sdim,
1306                            lapack_complex_double* alpha,
1307                            lapack_complex_double* beta,
1308                            lapack_complex_double* vsl, lapack_int ldvsl,
1309                            lapack_complex_double* vsr, lapack_int ldvsr,
1310                            double* rconde, double* rcondv );
1311
1312 lapack_int LAPACKE_sggev( int matrix_layout, char jobvl, char jobvr,
1313                           lapack_int n, float* a, lapack_int lda, float* b,
1314                           lapack_int ldb, float* alphar, float* alphai,
1315                           float* beta, float* vl, lapack_int ldvl, float* vr,
1316                           lapack_int ldvr );
1317 lapack_int LAPACKE_dggev( int matrix_layout, char jobvl, char jobvr,
1318                           lapack_int n, double* a, lapack_int lda, double* b,
1319                           lapack_int ldb, double* alphar, double* alphai,
1320                           double* beta, double* vl, lapack_int ldvl, double* vr,
1321                           lapack_int ldvr );
1322 lapack_int LAPACKE_cggev( int matrix_layout, char jobvl, char jobvr,
1323                           lapack_int n, lapack_complex_float* a, lapack_int lda,
1324                           lapack_complex_float* b, lapack_int ldb,
1325                           lapack_complex_float* alpha,
1326                           lapack_complex_float* beta, lapack_complex_float* vl,
1327                           lapack_int ldvl, lapack_complex_float* vr,
1328                           lapack_int ldvr );
1329 lapack_int LAPACKE_zggev( int matrix_layout, char jobvl, char jobvr,
1330                           lapack_int n, lapack_complex_double* a,
1331                           lapack_int lda, lapack_complex_double* b,
1332                           lapack_int ldb, lapack_complex_double* alpha,
1333                           lapack_complex_double* beta,
1334                           lapack_complex_double* vl, lapack_int ldvl,
1335                           lapack_complex_double* vr, lapack_int ldvr );
1336
1337 lapack_int LAPACKE_sggev3( int matrix_layout, char jobvl, char jobvr,
1338                            lapack_int n, float* a, lapack_int lda,
1339                            float* b, lapack_int ldb,
1340                            float* alphar, float* alphai, float* beta,
1341                            float* vl, lapack_int ldvl,
1342                            float* vr, lapack_int ldvr );
1343 lapack_int LAPACKE_dggev3( int matrix_layout, char jobvl, char jobvr,
1344                            lapack_int n, double* a, lapack_int lda,
1345                            double* b, lapack_int ldb,
1346                            double* alphar, double* alphai, double* beta,
1347                            double* vl, lapack_int ldvl,
1348                            double* vr, lapack_int ldvr );
1349 lapack_int LAPACKE_cggev3( int matrix_layout, char jobvl, char jobvr,
1350                            lapack_int n,
1351                            lapack_complex_float* a, lapack_int lda,
1352                            lapack_complex_float* b, lapack_int ldb,
1353                            lapack_complex_float* alpha,
1354                            lapack_complex_float* beta,
1355                            lapack_complex_float* vl, lapack_int ldvl,
1356                            lapack_complex_float* vr, lapack_int ldvr );
1357 lapack_int LAPACKE_zggev3( int matrix_layout, char jobvl, char jobvr,
1358                            lapack_int n,
1359                            lapack_complex_double* a, lapack_int lda,
1360                            lapack_complex_double* b, lapack_int ldb,
1361                            lapack_complex_double* alpha,
1362                            lapack_complex_double* beta,
1363                            lapack_complex_double* vl, lapack_int ldvl,
1364                            lapack_complex_double* vr, lapack_int ldvr );
1365
1366 lapack_int LAPACKE_sggevx( int matrix_layout, char balanc, char jobvl,
1367                            char jobvr, char sense, lapack_int n, float* a,
1368                            lapack_int lda, float* b, lapack_int ldb,
1369                            float* alphar, float* alphai, float* beta, float* vl,
1370                            lapack_int ldvl, float* vr, lapack_int ldvr,
1371                            lapack_int* ilo, lapack_int* ihi, float* lscale,
1372                            float* rscale, float* abnrm, float* bbnrm,
1373                            float* rconde, float* rcondv );
1374 lapack_int LAPACKE_dggevx( int matrix_layout, char balanc, char jobvl,
1375                            char jobvr, char sense, lapack_int n, double* a,
1376                            lapack_int lda, double* b, lapack_int ldb,
1377                            double* alphar, double* alphai, double* beta,
1378                            double* vl, lapack_int ldvl, double* vr,
1379                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
1380                            double* lscale, double* rscale, double* abnrm,
1381                            double* bbnrm, double* rconde, double* rcondv );
1382 lapack_int LAPACKE_cggevx( int matrix_layout, char balanc, char jobvl,
1383                            char jobvr, char sense, lapack_int n,
1384                            lapack_complex_float* a, lapack_int lda,
1385                            lapack_complex_float* b, lapack_int ldb,
1386                            lapack_complex_float* alpha,
1387                            lapack_complex_float* beta, lapack_complex_float* vl,
1388                            lapack_int ldvl, lapack_complex_float* vr,
1389                            lapack_int ldvr, lapack_int* ilo, lapack_int* ihi,
1390                            float* lscale, float* rscale, float* abnrm,
1391                            float* bbnrm, float* rconde, float* rcondv );
1392 lapack_int LAPACKE_zggevx( int matrix_layout, char balanc, char jobvl,
1393                            char jobvr, char sense, lapack_int n,
1394                            lapack_complex_double* a, lapack_int lda,
1395                            lapack_complex_double* b, lapack_int ldb,
1396                            lapack_complex_double* alpha,
1397                            lapack_complex_double* beta,
1398                            lapack_complex_double* vl, lapack_int ldvl,
1399                            lapack_complex_double* vr, lapack_int ldvr,
1400                            lapack_int* ilo, lapack_int* ihi, double* lscale,
1401                            double* rscale, double* abnrm, double* bbnrm,
1402                            double* rconde, double* rcondv );
1403
1404 lapack_int LAPACKE_sggglm( int matrix_layout, lapack_int n, lapack_int m,
1405                            lapack_int p, float* a, lapack_int lda, float* b,
1406                            lapack_int ldb, float* d, float* x, float* y );
1407 lapack_int LAPACKE_dggglm( int matrix_layout, lapack_int n, lapack_int m,
1408                            lapack_int p, double* a, lapack_int lda, double* b,
1409                            lapack_int ldb, double* d, double* x, double* y );
1410 lapack_int LAPACKE_cggglm( int matrix_layout, lapack_int n, lapack_int m,
1411                            lapack_int p, lapack_complex_float* a,
1412                            lapack_int lda, lapack_complex_float* b,
1413                            lapack_int ldb, lapack_complex_float* d,
1414                            lapack_complex_float* x, lapack_complex_float* y );
1415 lapack_int LAPACKE_zggglm( int matrix_layout, lapack_int n, lapack_int m,
1416                            lapack_int p, lapack_complex_double* a,
1417                            lapack_int lda, lapack_complex_double* b,
1418                            lapack_int ldb, lapack_complex_double* d,
1419                            lapack_complex_double* x, lapack_complex_double* y );
1420
1421 lapack_int LAPACKE_sgghrd( int matrix_layout, char compq, char compz,
1422                            lapack_int n, lapack_int ilo, lapack_int ihi,
1423                            float* a, lapack_int lda, float* b, lapack_int ldb,
1424                            float* q, lapack_int ldq, float* z, lapack_int ldz );
1425 lapack_int LAPACKE_dgghrd( int matrix_layout, char compq, char compz,
1426                            lapack_int n, lapack_int ilo, lapack_int ihi,
1427                            double* a, lapack_int lda, double* b, lapack_int ldb,
1428                            double* q, lapack_int ldq, double* z,
1429                            lapack_int ldz );
1430 lapack_int LAPACKE_cgghrd( int matrix_layout, char compq, char compz,
1431                            lapack_int n, lapack_int ilo, lapack_int ihi,
1432                            lapack_complex_float* a, lapack_int lda,
1433                            lapack_complex_float* b, lapack_int ldb,
1434                            lapack_complex_float* q, lapack_int ldq,
1435                            lapack_complex_float* z, lapack_int ldz );
1436 lapack_int LAPACKE_zgghrd( int matrix_layout, char compq, char compz,
1437                            lapack_int n, lapack_int ilo, lapack_int ihi,
1438                            lapack_complex_double* a, lapack_int lda,
1439                            lapack_complex_double* b, lapack_int ldb,
1440                            lapack_complex_double* q, lapack_int ldq,
1441                            lapack_complex_double* z, lapack_int ldz );
1442
1443 lapack_int LAPACKE_sgghd3( int matrix_layout, char compq, char compz,
1444                            lapack_int n, lapack_int ilo, lapack_int ihi,
1445                            float* a, lapack_int lda, float* b, lapack_int ldb,
1446                            float* q, lapack_int ldq, float* z, lapack_int ldz );
1447 lapack_int LAPACKE_dgghd3( int matrix_layout, char compq, char compz,
1448                            lapack_int n, lapack_int ilo, lapack_int ihi,
1449                            double* a, lapack_int lda, double* b, lapack_int ldb,
1450                            double* q, lapack_int ldq, double* z,
1451                            lapack_int ldz );
1452 lapack_int LAPACKE_cgghd3( int matrix_layout, char compq, char compz,
1453                            lapack_int n, lapack_int ilo, lapack_int ihi,
1454                            lapack_complex_float* a, lapack_int lda,
1455                            lapack_complex_float* b, lapack_int ldb,
1456                            lapack_complex_float* q, lapack_int ldq,
1457                            lapack_complex_float* z, lapack_int ldz );
1458 lapack_int LAPACKE_zgghd3( int matrix_layout, char compq, char compz,
1459                            lapack_int n, lapack_int ilo, lapack_int ihi,
1460                            lapack_complex_double* a, lapack_int lda,
1461                            lapack_complex_double* b, lapack_int ldb,
1462                            lapack_complex_double* q, lapack_int ldq,
1463                            lapack_complex_double* z, lapack_int ldz );
1464
1465 lapack_int LAPACKE_sgglse( int matrix_layout, lapack_int m, lapack_int n,
1466                            lapack_int p, float* a, lapack_int lda, float* b,
1467                            lapack_int ldb, float* c, float* d, float* x );
1468 lapack_int LAPACKE_dgglse( int matrix_layout, lapack_int m, lapack_int n,
1469                            lapack_int p, double* a, lapack_int lda, double* b,
1470                            lapack_int ldb, double* c, double* d, double* x );
1471 lapack_int LAPACKE_cgglse( int matrix_layout, lapack_int m, lapack_int n,
1472                            lapack_int p, lapack_complex_float* a,
1473                            lapack_int lda, lapack_complex_float* b,
1474                            lapack_int ldb, lapack_complex_float* c,
1475                            lapack_complex_float* d, lapack_complex_float* x );
1476 lapack_int LAPACKE_zgglse( int matrix_layout, lapack_int m, lapack_int n,
1477                            lapack_int p, lapack_complex_double* a,
1478                            lapack_int lda, lapack_complex_double* b,
1479                            lapack_int ldb, lapack_complex_double* c,
1480                            lapack_complex_double* d, lapack_complex_double* x );
1481
1482 lapack_int LAPACKE_sggqrf( int matrix_layout, lapack_int n, lapack_int m,
1483                            lapack_int p, float* a, lapack_int lda, float* taua,
1484                            float* b, lapack_int ldb, float* taub );
1485 lapack_int LAPACKE_dggqrf( int matrix_layout, lapack_int n, lapack_int m,
1486                            lapack_int p, double* a, lapack_int lda,
1487                            double* taua, double* b, lapack_int ldb,
1488                            double* taub );
1489 lapack_int LAPACKE_cggqrf( int matrix_layout, lapack_int n, lapack_int m,
1490                            lapack_int p, lapack_complex_float* a,
1491                            lapack_int lda, lapack_complex_float* taua,
1492                            lapack_complex_float* b, lapack_int ldb,
1493                            lapack_complex_float* taub );
1494 lapack_int LAPACKE_zggqrf( int matrix_layout, lapack_int n, lapack_int m,
1495                            lapack_int p, lapack_complex_double* a,
1496                            lapack_int lda, lapack_complex_double* taua,
1497                            lapack_complex_double* b, lapack_int ldb,
1498                            lapack_complex_double* taub );
1499
1500 lapack_int LAPACKE_sggrqf( int matrix_layout, lapack_int m, lapack_int p,
1501                            lapack_int n, float* a, lapack_int lda, float* taua,
1502                            float* b, lapack_int ldb, float* taub );
1503 lapack_int LAPACKE_dggrqf( int matrix_layout, lapack_int m, lapack_int p,
1504                            lapack_int n, double* a, lapack_int lda,
1505                            double* taua, double* b, lapack_int ldb,
1506                            double* taub );
1507 lapack_int LAPACKE_cggrqf( int matrix_layout, lapack_int m, lapack_int p,
1508                            lapack_int n, lapack_complex_float* a,
1509                            lapack_int lda, lapack_complex_float* taua,
1510                            lapack_complex_float* b, lapack_int ldb,
1511                            lapack_complex_float* taub );
1512 lapack_int LAPACKE_zggrqf( int matrix_layout, lapack_int m, lapack_int p,
1513                            lapack_int n, lapack_complex_double* a,
1514                            lapack_int lda, lapack_complex_double* taua,
1515                            lapack_complex_double* b, lapack_int ldb,
1516                            lapack_complex_double* taub );
1517
1518 lapack_int LAPACKE_sggsvd( int matrix_layout, char jobu, char jobv, char jobq,
1519                            lapack_int m, lapack_int n, lapack_int p,
1520                            lapack_int* k, lapack_int* l, float* a,
1521                            lapack_int lda, float* b, lapack_int ldb,
1522                            float* alpha, float* beta, float* u, lapack_int ldu,
1523                            float* v, lapack_int ldv, float* q, lapack_int ldq,
1524                            lapack_int* iwork );
1525 lapack_int LAPACKE_dggsvd( int matrix_layout, char jobu, char jobv, char jobq,
1526                            lapack_int m, lapack_int n, lapack_int p,
1527                            lapack_int* k, lapack_int* l, double* a,
1528                            lapack_int lda, double* b, lapack_int ldb,
1529                            double* alpha, double* beta, double* u,
1530                            lapack_int ldu, double* v, lapack_int ldv, double* q,
1531                            lapack_int ldq, lapack_int* iwork );
1532 lapack_int LAPACKE_cggsvd( int matrix_layout, char jobu, char jobv, char jobq,
1533                            lapack_int m, lapack_int n, lapack_int p,
1534                            lapack_int* k, lapack_int* l,
1535                            lapack_complex_float* a, lapack_int lda,
1536                            lapack_complex_float* b, lapack_int ldb,
1537                            float* alpha, float* beta, lapack_complex_float* u,
1538                            lapack_int ldu, lapack_complex_float* v,
1539                            lapack_int ldv, lapack_complex_float* q,
1540                            lapack_int ldq, lapack_int* iwork );
1541 lapack_int LAPACKE_zggsvd( int matrix_layout, char jobu, char jobv, char jobq,
1542                            lapack_int m, lapack_int n, lapack_int p,
1543                            lapack_int* k, lapack_int* l,
1544                            lapack_complex_double* a, lapack_int lda,
1545                            lapack_complex_double* b, lapack_int ldb,
1546                            double* alpha, double* beta,
1547                            lapack_complex_double* u, lapack_int ldu,
1548                            lapack_complex_double* v, lapack_int ldv,
1549                            lapack_complex_double* q, lapack_int ldq,
1550                            lapack_int* iwork );
1551
1552 lapack_int LAPACKE_sggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
1553                             lapack_int m, lapack_int n, lapack_int p,
1554                             lapack_int* k, lapack_int* l, float* a,
1555                             lapack_int lda, float* b, lapack_int ldb,
1556                             float* alpha, float* beta, float* u, lapack_int ldu,
1557                             float* v, lapack_int ldv, float* q, lapack_int ldq,
1558                             lapack_int* iwork );
1559 lapack_int LAPACKE_dggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
1560                             lapack_int m, lapack_int n, lapack_int p,
1561                             lapack_int* k, lapack_int* l, double* a,
1562                             lapack_int lda, double* b, lapack_int ldb,
1563                             double* alpha, double* beta, double* u,
1564                             lapack_int ldu, double* v, lapack_int ldv, double* q,
1565                             lapack_int ldq, lapack_int* iwork );
1566 lapack_int LAPACKE_cggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
1567                             lapack_int m, lapack_int n, lapack_int p,
1568                             lapack_int* k, lapack_int* l,
1569                             lapack_complex_float* a, lapack_int lda,
1570                             lapack_complex_float* b, lapack_int ldb,
1571                             float* alpha, float* beta, lapack_complex_float* u,
1572                             lapack_int ldu, lapack_complex_float* v,
1573                             lapack_int ldv, lapack_complex_float* q,
1574                             lapack_int ldq, lapack_int* iwork );
1575 lapack_int LAPACKE_zggsvd3( int matrix_layout, char jobu, char jobv, char jobq,
1576                             lapack_int m, lapack_int n, lapack_int p,
1577                             lapack_int* k, lapack_int* l,
1578                             lapack_complex_double* a, lapack_int lda,
1579                             lapack_complex_double* b, lapack_int ldb,
1580                             double* alpha, double* beta,
1581                             lapack_complex_double* u, lapack_int ldu,
1582                             lapack_complex_double* v, lapack_int ldv,
1583                             lapack_complex_double* q, lapack_int ldq,
1584                             lapack_int* iwork );
1585
1586 lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
1587                            lapack_int m, lapack_int p, lapack_int n, float* a,
1588                            lapack_int lda, float* b, lapack_int ldb, float tola,
1589                            float tolb, lapack_int* k, lapack_int* l, float* u,
1590                            lapack_int ldu, float* v, lapack_int ldv, float* q,
1591                            lapack_int ldq );
1592 lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
1593                            lapack_int m, lapack_int p, lapack_int n, double* a,
1594                            lapack_int lda, double* b, lapack_int ldb,
1595                            double tola, double tolb, lapack_int* k,
1596                            lapack_int* l, double* u, lapack_int ldu, double* v,
1597                            lapack_int ldv, double* q, lapack_int ldq );
1598 lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
1599                            lapack_int m, lapack_int p, lapack_int n,
1600                            lapack_complex_float* a, lapack_int lda,
1601                            lapack_complex_float* b, lapack_int ldb, float tola,
1602                            float tolb, lapack_int* k, lapack_int* l,
1603                            lapack_complex_float* u, lapack_int ldu,
1604                            lapack_complex_float* v, lapack_int ldv,
1605                            lapack_complex_float* q, lapack_int ldq );
1606 lapack_int LAPACKE_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
1607                            lapack_int m, lapack_int p, lapack_int n,
1608                            lapack_complex_double* a, lapack_int lda,
1609                            lapack_complex_double* b, lapack_int ldb,
1610                            double tola, double tolb, lapack_int* k,
1611                            lapack_int* l, lapack_complex_double* u,
1612                            lapack_int ldu, lapack_complex_double* v,
1613                            lapack_int ldv, lapack_complex_double* q,
1614                            lapack_int ldq );
1615
1616 lapack_int LAPACKE_sggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
1617                             lapack_int m, lapack_int p, lapack_int n, float* a,
1618                             lapack_int lda, float* b, lapack_int ldb, float tola,
1619                             float tolb, lapack_int* k, lapack_int* l, float* u,
1620                             lapack_int ldu, float* v, lapack_int ldv, float* q,
1621                             lapack_int ldq );
1622 lapack_int LAPACKE_dggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
1623                             lapack_int m, lapack_int p, lapack_int n, double* a,
1624                             lapack_int lda, double* b, lapack_int ldb,
1625                             double tola, double tolb, lapack_int* k,
1626                             lapack_int* l, double* u, lapack_int ldu, double* v,
1627                             lapack_int ldv, double* q, lapack_int ldq );
1628 lapack_int LAPACKE_cggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
1629                             lapack_int m, lapack_int p, lapack_int n,
1630                             lapack_complex_float* a, lapack_int lda,
1631                             lapack_complex_float* b, lapack_int ldb, float tola,
1632                             float tolb, lapack_int* k, lapack_int* l,
1633                             lapack_complex_float* u, lapack_int ldu,
1634                             lapack_complex_float* v, lapack_int ldv,
1635                             lapack_complex_float* q, lapack_int ldq );
1636 lapack_int LAPACKE_zggsvp3( int matrix_layout, char jobu, char jobv, char jobq,
1637                             lapack_int m, lapack_int p, lapack_int n,
1638                             lapack_complex_double* a, lapack_int lda,
1639                             lapack_complex_double* b, lapack_int ldb,
1640                             double tola, double tolb, lapack_int* k,
1641                             lapack_int* l, lapack_complex_double* u,
1642                             lapack_int ldu, lapack_complex_double* v,
1643                             lapack_int ldv, lapack_complex_double* q,
1644                             lapack_int ldq );
1645
1646 lapack_int LAPACKE_sgtcon( char norm, lapack_int n, const float* dl,
1647                            const float* d, const float* du, const float* du2,
1648                            const lapack_int* ipiv, float anorm, float* rcond );
1649 lapack_int LAPACKE_dgtcon( char norm, lapack_int n, const double* dl,
1650                            const double* d, const double* du, const double* du2,
1651                            const lapack_int* ipiv, double anorm,
1652                            double* rcond );
1653 lapack_int LAPACKE_cgtcon( char norm, lapack_int n,
1654                            const lapack_complex_float* dl,
1655                            const lapack_complex_float* d,
1656                            const lapack_complex_float* du,
1657                            const lapack_complex_float* du2,
1658                            const lapack_int* ipiv, float anorm, float* rcond );
1659 lapack_int LAPACKE_zgtcon( char norm, lapack_int n,
1660                            const lapack_complex_double* dl,
1661                            const lapack_complex_double* d,
1662                            const lapack_complex_double* du,
1663                            const lapack_complex_double* du2,
1664                            const lapack_int* ipiv, double anorm,
1665                            double* rcond );
1666
1667 lapack_int LAPACKE_sgtrfs( int matrix_layout, char trans, lapack_int n,
1668                            lapack_int nrhs, const float* dl, const float* d,
1669                            const float* du, const float* dlf, const float* df,
1670                            const float* duf, const float* du2,
1671                            const lapack_int* ipiv, const float* b,
1672                            lapack_int ldb, float* x, lapack_int ldx,
1673                            float* ferr, float* berr );
1674 lapack_int LAPACKE_dgtrfs( int matrix_layout, char trans, lapack_int n,
1675                            lapack_int nrhs, const double* dl, const double* d,
1676                            const double* du, const double* dlf,
1677                            const double* df, const double* duf,
1678                            const double* du2, const lapack_int* ipiv,
1679                            const double* b, lapack_int ldb, double* x,
1680                            lapack_int ldx, double* ferr, double* berr );
1681 lapack_int LAPACKE_cgtrfs( int matrix_layout, char trans, lapack_int n,
1682                            lapack_int nrhs, const lapack_complex_float* dl,
1683                            const lapack_complex_float* d,
1684                            const lapack_complex_float* du,
1685                            const lapack_complex_float* dlf,
1686                            const lapack_complex_float* df,
1687                            const lapack_complex_float* duf,
1688                            const lapack_complex_float* du2,
1689                            const lapack_int* ipiv,
1690                            const lapack_complex_float* b, lapack_int ldb,
1691                            lapack_complex_float* x, lapack_int ldx, float* ferr,
1692                            float* berr );
1693 lapack_int LAPACKE_zgtrfs( int matrix_layout, char trans, lapack_int n,
1694                            lapack_int nrhs, const lapack_complex_double* dl,
1695                            const lapack_complex_double* d,
1696                            const lapack_complex_double* du,
1697                            const lapack_complex_double* dlf,
1698                            const lapack_complex_double* df,
1699                            const lapack_complex_double* duf,
1700                            const lapack_complex_double* du2,
1701                            const lapack_int* ipiv,
1702                            const lapack_complex_double* b, lapack_int ldb,
1703                            lapack_complex_double* x, lapack_int ldx,
1704                            double* ferr, double* berr );
1705
1706 lapack_int LAPACKE_sgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
1707                           float* dl, float* d, float* du, float* b,
1708                           lapack_int ldb );
1709 lapack_int LAPACKE_dgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
1710                           double* dl, double* d, double* du, double* b,
1711                           lapack_int ldb );
1712 lapack_int LAPACKE_cgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
1713                           lapack_complex_float* dl, lapack_complex_float* d,
1714                           lapack_complex_float* du, lapack_complex_float* b,
1715                           lapack_int ldb );
1716 lapack_int LAPACKE_zgtsv( int matrix_layout, lapack_int n, lapack_int nrhs,
1717                           lapack_complex_double* dl, lapack_complex_double* d,
1718                           lapack_complex_double* du, lapack_complex_double* b,
1719                           lapack_int ldb );
1720
1721 lapack_int LAPACKE_sgtsvx( int matrix_layout, char fact, char trans,
1722                            lapack_int n, lapack_int nrhs, const float* dl,
1723                            const float* d, const float* du, float* dlf,
1724                            float* df, float* duf, float* du2, lapack_int* ipiv,
1725                            const float* b, lapack_int ldb, float* x,
1726                            lapack_int ldx, float* rcond, float* ferr,
1727                            float* berr );
1728 lapack_int LAPACKE_dgtsvx( int matrix_layout, char fact, char trans,
1729                            lapack_int n, lapack_int nrhs, const double* dl,
1730                            const double* d, const double* du, double* dlf,
1731                            double* df, double* duf, double* du2,
1732                            lapack_int* ipiv, const double* b, lapack_int ldb,
1733                            double* x, lapack_int ldx, double* rcond,
1734                            double* ferr, double* berr );
1735 lapack_int LAPACKE_cgtsvx( int matrix_layout, char fact, char trans,
1736                            lapack_int n, lapack_int nrhs,
1737                            const lapack_complex_float* dl,
1738                            const lapack_complex_float* d,
1739                            const lapack_complex_float* du,
1740                            lapack_complex_float* dlf, lapack_complex_float* df,
1741                            lapack_complex_float* duf, lapack_complex_float* du2,
1742                            lapack_int* ipiv, const lapack_complex_float* b,
1743                            lapack_int ldb, lapack_complex_float* x,
1744                            lapack_int ldx, float* rcond, float* ferr,
1745                            float* berr );
1746 lapack_int LAPACKE_zgtsvx( int matrix_layout, char fact, char trans,
1747                            lapack_int n, lapack_int nrhs,
1748                            const lapack_complex_double* dl,
1749                            const lapack_complex_double* d,
1750                            const lapack_complex_double* du,
1751                            lapack_complex_double* dlf,
1752                            lapack_complex_double* df,
1753                            lapack_complex_double* duf,
1754                            lapack_complex_double* du2, lapack_int* ipiv,
1755                            const lapack_complex_double* b, lapack_int ldb,
1756                            lapack_complex_double* x, lapack_int ldx,
1757                            double* rcond, double* ferr, double* berr );
1758
1759 lapack_int LAPACKE_sgttrf( lapack_int n, float* dl, float* d, float* du,
1760                            float* du2, lapack_int* ipiv );
1761 lapack_int LAPACKE_dgttrf( lapack_int n, double* dl, double* d, double* du,
1762                            double* du2, lapack_int* ipiv );
1763 lapack_int LAPACKE_cgttrf( lapack_int n, lapack_complex_float* dl,
1764                            lapack_complex_float* d, lapack_complex_float* du,
1765                            lapack_complex_float* du2, lapack_int* ipiv );
1766 lapack_int LAPACKE_zgttrf( lapack_int n, lapack_complex_double* dl,
1767                            lapack_complex_double* d, lapack_complex_double* du,
1768                            lapack_complex_double* du2, lapack_int* ipiv );
1769
1770 lapack_int LAPACKE_sgttrs( int matrix_layout, char trans, lapack_int n,
1771                            lapack_int nrhs, const float* dl, const float* d,
1772                            const float* du, const float* du2,
1773                            const lapack_int* ipiv, float* b, lapack_int ldb );
1774 lapack_int LAPACKE_dgttrs( int matrix_layout, char trans, lapack_int n,
1775                            lapack_int nrhs, const double* dl, const double* d,
1776                            const double* du, const double* du2,
1777                            const lapack_int* ipiv, double* b, lapack_int ldb );
1778 lapack_int LAPACKE_cgttrs( int matrix_layout, char trans, lapack_int n,
1779                            lapack_int nrhs, const lapack_complex_float* dl,
1780                            const lapack_complex_float* d,
1781                            const lapack_complex_float* du,
1782                            const lapack_complex_float* du2,
1783                            const lapack_int* ipiv, lapack_complex_float* b,
1784                            lapack_int ldb );
1785 lapack_int LAPACKE_zgttrs( int matrix_layout, char trans, lapack_int n,
1786                            lapack_int nrhs, const lapack_complex_double* dl,
1787                            const lapack_complex_double* d,
1788                            const lapack_complex_double* du,
1789                            const lapack_complex_double* du2,
1790                            const lapack_int* ipiv, lapack_complex_double* b,
1791                            lapack_int ldb );
1792
1793 lapack_int LAPACKE_chbev( int matrix_layout, char jobz, char uplo, lapack_int n,
1794                           lapack_int kd, lapack_complex_float* ab,
1795                           lapack_int ldab, float* w, lapack_complex_float* z,
1796                           lapack_int ldz );
1797 lapack_int LAPACKE_zhbev( int matrix_layout, char jobz, char uplo, lapack_int n,
1798                           lapack_int kd, lapack_complex_double* ab,
1799                           lapack_int ldab, double* w, lapack_complex_double* z,
1800                           lapack_int ldz );
1801
1802 lapack_int LAPACKE_chbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
1803                            lapack_int kd, lapack_complex_float* ab,
1804                            lapack_int ldab, float* w, lapack_complex_float* z,
1805                            lapack_int ldz );
1806 lapack_int LAPACKE_zhbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
1807                            lapack_int kd, lapack_complex_double* ab,
1808                            lapack_int ldab, double* w, lapack_complex_double* z,
1809                            lapack_int ldz );
1810
1811 lapack_int LAPACKE_chbevx( int matrix_layout, char jobz, char range, char uplo,
1812                            lapack_int n, lapack_int kd,
1813                            lapack_complex_float* ab, lapack_int ldab,
1814                            lapack_complex_float* q, lapack_int ldq, float vl,
1815                            float vu, lapack_int il, lapack_int iu, float abstol,
1816                            lapack_int* m, float* w, lapack_complex_float* z,
1817                            lapack_int ldz, lapack_int* ifail );
1818 lapack_int LAPACKE_zhbevx( int matrix_layout, char jobz, char range, char uplo,
1819                            lapack_int n, lapack_int kd,
1820                            lapack_complex_double* ab, lapack_int ldab,
1821                            lapack_complex_double* q, lapack_int ldq, double vl,
1822                            double vu, lapack_int il, lapack_int iu,
1823                            double abstol, lapack_int* m, double* w,
1824                            lapack_complex_double* z, lapack_int ldz,
1825                            lapack_int* ifail );
1826
1827 lapack_int LAPACKE_chbgst( int matrix_layout, char vect, char uplo, lapack_int n,
1828                            lapack_int ka, lapack_int kb,
1829                            lapack_complex_float* ab, lapack_int ldab,
1830                            const lapack_complex_float* bb, lapack_int ldbb,
1831                            lapack_complex_float* x, lapack_int ldx );
1832 lapack_int LAPACKE_zhbgst( int matrix_layout, char vect, char uplo, lapack_int n,
1833                            lapack_int ka, lapack_int kb,
1834                            lapack_complex_double* ab, lapack_int ldab,
1835                            const lapack_complex_double* bb, lapack_int ldbb,
1836                            lapack_complex_double* x, lapack_int ldx );
1837
1838 lapack_int LAPACKE_chbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
1839                           lapack_int ka, lapack_int kb,
1840                           lapack_complex_float* ab, lapack_int ldab,
1841                           lapack_complex_float* bb, lapack_int ldbb, float* w,
1842                           lapack_complex_float* z, lapack_int ldz );
1843 lapack_int LAPACKE_zhbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
1844                           lapack_int ka, lapack_int kb,
1845                           lapack_complex_double* ab, lapack_int ldab,
1846                           lapack_complex_double* bb, lapack_int ldbb, double* w,
1847                           lapack_complex_double* z, lapack_int ldz );
1848
1849 lapack_int LAPACKE_chbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
1850                            lapack_int ka, lapack_int kb,
1851                            lapack_complex_float* ab, lapack_int ldab,
1852                            lapack_complex_float* bb, lapack_int ldbb, float* w,
1853                            lapack_complex_float* z, lapack_int ldz );
1854 lapack_int LAPACKE_zhbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
1855                            lapack_int ka, lapack_int kb,
1856                            lapack_complex_double* ab, lapack_int ldab,
1857                            lapack_complex_double* bb, lapack_int ldbb,
1858                            double* w, lapack_complex_double* z,
1859                            lapack_int ldz );
1860
1861 lapack_int LAPACKE_chbgvx( int matrix_layout, char jobz, char range, char uplo,
1862                            lapack_int n, lapack_int ka, lapack_int kb,
1863                            lapack_complex_float* ab, lapack_int ldab,
1864                            lapack_complex_float* bb, lapack_int ldbb,
1865                            lapack_complex_float* q, lapack_int ldq, float vl,
1866                            float vu, lapack_int il, lapack_int iu, float abstol,
1867                            lapack_int* m, float* w, lapack_complex_float* z,
1868                            lapack_int ldz, lapack_int* ifail );
1869 lapack_int LAPACKE_zhbgvx( int matrix_layout, char jobz, char range, char uplo,
1870                            lapack_int n, lapack_int ka, lapack_int kb,
1871                            lapack_complex_double* ab, lapack_int ldab,
1872                            lapack_complex_double* bb, lapack_int ldbb,
1873                            lapack_complex_double* q, lapack_int ldq, double vl,
1874                            double vu, lapack_int il, lapack_int iu,
1875                            double abstol, lapack_int* m, double* w,
1876                            lapack_complex_double* z, lapack_int ldz,
1877                            lapack_int* ifail );
1878
1879 lapack_int LAPACKE_chbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
1880                            lapack_int kd, lapack_complex_float* ab,
1881                            lapack_int ldab, float* d, float* e,
1882                            lapack_complex_float* q, lapack_int ldq );
1883 lapack_int LAPACKE_zhbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
1884                            lapack_int kd, lapack_complex_double* ab,
1885                            lapack_int ldab, double* d, double* e,
1886                            lapack_complex_double* q, lapack_int ldq );
1887
1888 lapack_int LAPACKE_checon( int matrix_layout, char uplo, lapack_int n,
1889                            const lapack_complex_float* a, lapack_int lda,
1890                            const lapack_int* ipiv, float anorm, float* rcond );
1891 lapack_int LAPACKE_zhecon( int matrix_layout, char uplo, lapack_int n,
1892                            const lapack_complex_double* a, lapack_int lda,
1893                            const lapack_int* ipiv, double anorm,
1894                            double* rcond );
1895
1896 lapack_int LAPACKE_cheequb( int matrix_layout, char uplo, lapack_int n,
1897                             const lapack_complex_float* a, lapack_int lda,
1898                             float* s, float* scond, float* amax );
1899 lapack_int LAPACKE_zheequb( int matrix_layout, char uplo, lapack_int n,
1900                             const lapack_complex_double* a, lapack_int lda,
1901                             double* s, double* scond, double* amax );
1902
1903 lapack_int LAPACKE_cheev( int matrix_layout, char jobz, char uplo, lapack_int n,
1904                           lapack_complex_float* a, lapack_int lda, float* w );
1905 lapack_int LAPACKE_zheev( int matrix_layout, char jobz, char uplo, lapack_int n,
1906                           lapack_complex_double* a, lapack_int lda, double* w );
1907
1908 lapack_int LAPACKE_cheevd( int matrix_layout, char jobz, char uplo, lapack_int n,
1909                            lapack_complex_float* a, lapack_int lda, float* w );
1910 lapack_int LAPACKE_zheevd( int matrix_layout, char jobz, char uplo, lapack_int n,
1911                            lapack_complex_double* a, lapack_int lda,
1912                            double* w );
1913
1914 lapack_int LAPACKE_cheevr( int matrix_layout, char jobz, char range, char uplo,
1915                            lapack_int n, lapack_complex_float* a,
1916                            lapack_int lda, float vl, float vu, lapack_int il,
1917                            lapack_int iu, float abstol, lapack_int* m, float* w,
1918                            lapack_complex_float* z, lapack_int ldz,
1919                            lapack_int* isuppz );
1920 lapack_int LAPACKE_zheevr( int matrix_layout, char jobz, char range, char uplo,
1921                            lapack_int n, lapack_complex_double* a,
1922                            lapack_int lda, double vl, double vu, lapack_int il,
1923                            lapack_int iu, double abstol, lapack_int* m,
1924                            double* w, lapack_complex_double* z, lapack_int ldz,
1925                            lapack_int* isuppz );
1926
1927 lapack_int LAPACKE_cheevx( int matrix_layout, char jobz, char range, char uplo,
1928                            lapack_int n, lapack_complex_float* a,
1929                            lapack_int lda, float vl, float vu, lapack_int il,
1930                            lapack_int iu, float abstol, lapack_int* m, float* w,
1931                            lapack_complex_float* z, lapack_int ldz,
1932                            lapack_int* ifail );
1933 lapack_int LAPACKE_zheevx( int matrix_layout, char jobz, char range, char uplo,
1934                            lapack_int n, lapack_complex_double* a,
1935                            lapack_int lda, double vl, double vu, lapack_int il,
1936                            lapack_int iu, double abstol, lapack_int* m,
1937                            double* w, lapack_complex_double* z, lapack_int ldz,
1938                            lapack_int* ifail );
1939
1940 lapack_int LAPACKE_chegst( int matrix_layout, lapack_int itype, char uplo,
1941                            lapack_int n, lapack_complex_float* a,
1942                            lapack_int lda, const lapack_complex_float* b,
1943                            lapack_int ldb );
1944 lapack_int LAPACKE_zhegst( int matrix_layout, lapack_int itype, char uplo,
1945                            lapack_int n, lapack_complex_double* a,
1946                            lapack_int lda, const lapack_complex_double* b,
1947                            lapack_int ldb );
1948
1949 lapack_int LAPACKE_chegv( int matrix_layout, lapack_int itype, char jobz,
1950                           char uplo, lapack_int n, lapack_complex_float* a,
1951                           lapack_int lda, lapack_complex_float* b,
1952                           lapack_int ldb, float* w );
1953 lapack_int LAPACKE_zhegv( int matrix_layout, lapack_int itype, char jobz,
1954                           char uplo, lapack_int n, lapack_complex_double* a,
1955                           lapack_int lda, lapack_complex_double* b,
1956                           lapack_int ldb, double* w );
1957
1958 lapack_int LAPACKE_chegvd( int matrix_layout, lapack_int itype, char jobz,
1959                            char uplo, lapack_int n, lapack_complex_float* a,
1960                            lapack_int lda, lapack_complex_float* b,
1961                            lapack_int ldb, float* w );
1962 lapack_int LAPACKE_zhegvd( int matrix_layout, lapack_int itype, char jobz,
1963                            char uplo, lapack_int n, lapack_complex_double* a,
1964                            lapack_int lda, lapack_complex_double* b,
1965                            lapack_int ldb, double* w );
1966
1967 lapack_int LAPACKE_chegvx( int matrix_layout, lapack_int itype, char jobz,
1968                            char range, char uplo, lapack_int n,
1969                            lapack_complex_float* a, lapack_int lda,
1970                            lapack_complex_float* b, lapack_int ldb, float vl,
1971                            float vu, lapack_int il, lapack_int iu, float abstol,
1972                            lapack_int* m, float* w, lapack_complex_float* z,
1973                            lapack_int ldz, lapack_int* ifail );
1974 lapack_int LAPACKE_zhegvx( int matrix_layout, lapack_int itype, char jobz,
1975                            char range, char uplo, lapack_int n,
1976                            lapack_complex_double* a, lapack_int lda,
1977                            lapack_complex_double* b, lapack_int ldb, double vl,
1978                            double vu, lapack_int il, lapack_int iu,
1979                            double abstol, lapack_int* m, double* w,
1980                            lapack_complex_double* z, lapack_int ldz,
1981                            lapack_int* ifail );
1982
1983 lapack_int LAPACKE_cherfs( int matrix_layout, char uplo, lapack_int n,
1984                            lapack_int nrhs, const lapack_complex_float* a,
1985                            lapack_int lda, const lapack_complex_float* af,
1986                            lapack_int ldaf, const lapack_int* ipiv,
1987                            const lapack_complex_float* b, lapack_int ldb,
1988                            lapack_complex_float* x, lapack_int ldx, float* ferr,
1989                            float* berr );
1990 lapack_int LAPACKE_zherfs( int matrix_layout, char uplo, lapack_int n,
1991                            lapack_int nrhs, const lapack_complex_double* a,
1992                            lapack_int lda, const lapack_complex_double* af,
1993                            lapack_int ldaf, const lapack_int* ipiv,
1994                            const lapack_complex_double* b, lapack_int ldb,
1995                            lapack_complex_double* x, lapack_int ldx,
1996                            double* ferr, double* berr );
1997
1998 lapack_int LAPACKE_cherfsx( int matrix_layout, char uplo, char equed,
1999                             lapack_int n, lapack_int nrhs,
2000                             const lapack_complex_float* a, lapack_int lda,
2001                             const lapack_complex_float* af, lapack_int ldaf,
2002                             const lapack_int* ipiv, const float* s,
2003                             const lapack_complex_float* b, lapack_int ldb,
2004                             lapack_complex_float* x, lapack_int ldx,
2005                             float* rcond, float* berr, lapack_int n_err_bnds,
2006                             float* err_bnds_norm, float* err_bnds_comp,
2007                             lapack_int nparams, float* params );
2008 lapack_int LAPACKE_zherfsx( int matrix_layout, char uplo, char equed,
2009                             lapack_int n, lapack_int nrhs,
2010                             const lapack_complex_double* a, lapack_int lda,
2011                             const lapack_complex_double* af, lapack_int ldaf,
2012                             const lapack_int* ipiv, const double* s,
2013                             const lapack_complex_double* b, lapack_int ldb,
2014                             lapack_complex_double* x, lapack_int ldx,
2015                             double* rcond, double* berr, lapack_int n_err_bnds,
2016                             double* err_bnds_norm, double* err_bnds_comp,
2017                             lapack_int nparams, double* params );
2018
2019 lapack_int LAPACKE_chesv( int matrix_layout, char uplo, lapack_int n,
2020                           lapack_int nrhs, lapack_complex_float* a,
2021                           lapack_int lda, lapack_int* ipiv,
2022                           lapack_complex_float* b, lapack_int ldb );
2023 lapack_int LAPACKE_zhesv( int matrix_layout, char uplo, lapack_int n,
2024                           lapack_int nrhs, lapack_complex_double* a,
2025                           lapack_int lda, lapack_int* ipiv,
2026                           lapack_complex_double* b, lapack_int ldb );
2027
2028 lapack_int LAPACKE_chesvx( int matrix_layout, char fact, char uplo, lapack_int n,
2029                            lapack_int nrhs, const lapack_complex_float* a,
2030                            lapack_int lda, lapack_complex_float* af,
2031                            lapack_int ldaf, lapack_int* ipiv,
2032                            const lapack_complex_float* b, lapack_int ldb,
2033                            lapack_complex_float* x, lapack_int ldx,
2034                            float* rcond, float* ferr, float* berr );
2035 lapack_int LAPACKE_zhesvx( int matrix_layout, char fact, char uplo, lapack_int n,
2036                            lapack_int nrhs, const lapack_complex_double* a,
2037                            lapack_int lda, lapack_complex_double* af,
2038                            lapack_int ldaf, lapack_int* ipiv,
2039                            const lapack_complex_double* b, lapack_int ldb,
2040                            lapack_complex_double* x, lapack_int ldx,
2041                            double* rcond, double* ferr, double* berr );
2042
2043 lapack_int LAPACKE_chesvxx( int matrix_layout, char fact, char uplo,
2044                             lapack_int n, lapack_int nrhs,
2045                             lapack_complex_float* a, lapack_int lda,
2046                             lapack_complex_float* af, lapack_int ldaf,
2047                             lapack_int* ipiv, char* equed, float* s,
2048                             lapack_complex_float* b, lapack_int ldb,
2049                             lapack_complex_float* x, lapack_int ldx,
2050                             float* rcond, float* rpvgrw, float* berr,
2051                             lapack_int n_err_bnds, float* err_bnds_norm,
2052                             float* err_bnds_comp, lapack_int nparams,
2053                             float* params );
2054 lapack_int LAPACKE_zhesvxx( int matrix_layout, char fact, char uplo,
2055                             lapack_int n, lapack_int nrhs,
2056                             lapack_complex_double* a, lapack_int lda,
2057                             lapack_complex_double* af, lapack_int ldaf,
2058                             lapack_int* ipiv, char* equed, double* s,
2059                             lapack_complex_double* b, lapack_int ldb,
2060                             lapack_complex_double* x, lapack_int ldx,
2061                             double* rcond, double* rpvgrw, double* berr,
2062                             lapack_int n_err_bnds, double* err_bnds_norm,
2063                             double* err_bnds_comp, lapack_int nparams,
2064                             double* params );
2065
2066 lapack_int LAPACKE_chetrd( int matrix_layout, char uplo, lapack_int n,
2067                            lapack_complex_float* a, lapack_int lda, float* d,
2068                            float* e, lapack_complex_float* tau );
2069 lapack_int LAPACKE_zhetrd( int matrix_layout, char uplo, lapack_int n,
2070                            lapack_complex_double* a, lapack_int lda, double* d,
2071                            double* e, lapack_complex_double* tau );
2072
2073 lapack_int LAPACKE_chetrf( int matrix_layout, char uplo, lapack_int n,
2074                            lapack_complex_float* a, lapack_int lda,
2075                            lapack_int* ipiv );
2076 lapack_int LAPACKE_zhetrf( int matrix_layout, char uplo, lapack_int n,
2077                            lapack_complex_double* a, lapack_int lda,
2078                            lapack_int* ipiv );
2079
2080 lapack_int LAPACKE_chetri( int matrix_layout, char uplo, lapack_int n,
2081                            lapack_complex_float* a, lapack_int lda,
2082                            const lapack_int* ipiv );
2083 lapack_int LAPACKE_zhetri( int matrix_layout, char uplo, lapack_int n,
2084                            lapack_complex_double* a, lapack_int lda,
2085                            const lapack_int* ipiv );
2086
2087 lapack_int LAPACKE_chetrs( int matrix_layout, char uplo, lapack_int n,
2088                            lapack_int nrhs, const lapack_complex_float* a,
2089                            lapack_int lda, const lapack_int* ipiv,
2090                            lapack_complex_float* b, lapack_int ldb );
2091 lapack_int LAPACKE_zhetrs( int matrix_layout, char uplo, lapack_int n,
2092                            lapack_int nrhs, const lapack_complex_double* a,
2093                            lapack_int lda, const lapack_int* ipiv,
2094                            lapack_complex_double* b, lapack_int ldb );
2095
2096 lapack_int LAPACKE_chfrk( int matrix_layout, char transr, char uplo, char trans,
2097                           lapack_int n, lapack_int k, float alpha,
2098                           const lapack_complex_float* a, lapack_int lda,
2099                           float beta, lapack_complex_float* c );
2100 lapack_int LAPACKE_zhfrk( int matrix_layout, char transr, char uplo, char trans,
2101                           lapack_int n, lapack_int k, double alpha,
2102                           const lapack_complex_double* a, lapack_int lda,
2103                           double beta, lapack_complex_double* c );
2104
2105 lapack_int LAPACKE_shgeqz( int matrix_layout, char job, char compq, char compz,
2106                            lapack_int n, lapack_int ilo, lapack_int ihi,
2107                            float* h, lapack_int ldh, float* t, lapack_int ldt,
2108                            float* alphar, float* alphai, float* beta, float* q,
2109                            lapack_int ldq, float* z, lapack_int ldz );
2110 lapack_int LAPACKE_dhgeqz( int matrix_layout, char job, char compq, char compz,
2111                            lapack_int n, lapack_int ilo, lapack_int ihi,
2112                            double* h, lapack_int ldh, double* t, lapack_int ldt,
2113                            double* alphar, double* alphai, double* beta,
2114                            double* q, lapack_int ldq, double* z,
2115                            lapack_int ldz );
2116 lapack_int LAPACKE_chgeqz( int matrix_layout, char job, char compq, char compz,
2117                            lapack_int n, lapack_int ilo, lapack_int ihi,
2118                            lapack_complex_float* h, lapack_int ldh,
2119                            lapack_complex_float* t, lapack_int ldt,
2120                            lapack_complex_float* alpha,
2121                            lapack_complex_float* beta, lapack_complex_float* q,
2122                            lapack_int ldq, lapack_complex_float* z,
2123                            lapack_int ldz );
2124 lapack_int LAPACKE_zhgeqz( int matrix_layout, char job, char compq, char compz,
2125                            lapack_int n, lapack_int ilo, lapack_int ihi,
2126                            lapack_complex_double* h, lapack_int ldh,
2127                            lapack_complex_double* t, lapack_int ldt,
2128                            lapack_complex_double* alpha,
2129                            lapack_complex_double* beta,
2130                            lapack_complex_double* q, lapack_int ldq,
2131                            lapack_complex_double* z, lapack_int ldz );
2132
2133 lapack_int LAPACKE_chpcon( int matrix_layout, char uplo, lapack_int n,
2134                            const lapack_complex_float* ap,
2135                            const lapack_int* ipiv, float anorm, float* rcond );
2136 lapack_int LAPACKE_zhpcon( int matrix_layout, char uplo, lapack_int n,
2137                            const lapack_complex_double* ap,
2138                            const lapack_int* ipiv, double anorm,
2139                            double* rcond );
2140
2141 lapack_int LAPACKE_chpev( int matrix_layout, char jobz, char uplo, lapack_int n,
2142                           lapack_complex_float* ap, float* w,
2143                           lapack_complex_float* z, lapack_int ldz );
2144 lapack_int LAPACKE_zhpev( int matrix_layout, char jobz, char uplo, lapack_int n,
2145                           lapack_complex_double* ap, double* w,
2146                           lapack_complex_double* z, lapack_int ldz );
2147
2148 lapack_int LAPACKE_chpevd( int matrix_layout, char jobz, char uplo, lapack_int n,
2149                            lapack_complex_float* ap, float* w,
2150                            lapack_complex_float* z, lapack_int ldz );
2151 lapack_int LAPACKE_zhpevd( int matrix_layout, char jobz, char uplo, lapack_int n,
2152                            lapack_complex_double* ap, double* w,
2153                            lapack_complex_double* z, lapack_int ldz );
2154
2155 lapack_int LAPACKE_chpevx( int matrix_layout, char jobz, char range, char uplo,
2156                            lapack_int n, lapack_complex_float* ap, float vl,
2157                            float vu, lapack_int il, lapack_int iu, float abstol,
2158                            lapack_int* m, float* w, lapack_complex_float* z,
2159                            lapack_int ldz, lapack_int* ifail );
2160 lapack_int LAPACKE_zhpevx( int matrix_layout, char jobz, char range, char uplo,
2161                            lapack_int n, lapack_complex_double* ap, double vl,
2162                            double vu, lapack_int il, lapack_int iu,
2163                            double abstol, lapack_int* m, double* w,
2164                            lapack_complex_double* z, lapack_int ldz,
2165                            lapack_int* ifail );
2166
2167 lapack_int LAPACKE_chpgst( int matrix_layout, lapack_int itype, char uplo,
2168                            lapack_int n, lapack_complex_float* ap,
2169                            const lapack_complex_float* bp );
2170 lapack_int LAPACKE_zhpgst( int matrix_layout, lapack_int itype, char uplo,
2171                            lapack_int n, lapack_complex_double* ap,
2172                            const lapack_complex_double* bp );
2173
2174 lapack_int LAPACKE_chpgv( int matrix_layout, lapack_int itype, char jobz,
2175                           char uplo, lapack_int n, lapack_complex_float* ap,
2176                           lapack_complex_float* bp, float* w,
2177                           lapack_complex_float* z, lapack_int ldz );
2178 lapack_int LAPACKE_zhpgv( int matrix_layout, lapack_int itype, char jobz,
2179                           char uplo, lapack_int n, lapack_complex_double* ap,
2180                           lapack_complex_double* bp, double* w,
2181                           lapack_complex_double* z, lapack_int ldz );
2182
2183 lapack_int LAPACKE_chpgvd( int matrix_layout, lapack_int itype, char jobz,
2184                            char uplo, lapack_int n, lapack_complex_float* ap,
2185                            lapack_complex_float* bp, float* w,
2186                            lapack_complex_float* z, lapack_int ldz );
2187 lapack_int LAPACKE_zhpgvd( int matrix_layout, lapack_int itype, char jobz,
2188                            char uplo, lapack_int n, lapack_complex_double* ap,
2189                            lapack_complex_double* bp, double* w,
2190                            lapack_complex_double* z, lapack_int ldz );
2191
2192 lapack_int LAPACKE_chpgvx( int matrix_layout, lapack_int itype, char jobz,
2193                            char range, char uplo, lapack_int n,
2194                            lapack_complex_float* ap, lapack_complex_float* bp,
2195                            float vl, float vu, lapack_int il, lapack_int iu,
2196                            float abstol, lapack_int* m, float* w,
2197                            lapack_complex_float* z, lapack_int ldz,
2198                            lapack_int* ifail );
2199 lapack_int LAPACKE_zhpgvx( int matrix_layout, lapack_int itype, char jobz,
2200                            char range, char uplo, lapack_int n,
2201                            lapack_complex_double* ap, lapack_complex_double* bp,
2202                            double vl, double vu, lapack_int il, lapack_int iu,
2203                            double abstol, lapack_int* m, double* w,
2204                            lapack_complex_double* z, lapack_int ldz,
2205                            lapack_int* ifail );
2206
2207 lapack_int LAPACKE_chprfs( int matrix_layout, char uplo, lapack_int n,
2208                            lapack_int nrhs, const lapack_complex_float* ap,
2209                            const lapack_complex_float* afp,
2210                            const lapack_int* ipiv,
2211                            const lapack_complex_float* b, lapack_int ldb,
2212                            lapack_complex_float* x, lapack_int ldx, float* ferr,
2213                            float* berr );
2214 lapack_int LAPACKE_zhprfs( int matrix_layout, char uplo, lapack_int n,
2215                            lapack_int nrhs, const lapack_complex_double* ap,
2216                            const lapack_complex_double* afp,
2217                            const lapack_int* ipiv,
2218                            const lapack_complex_double* b, lapack_int ldb,
2219                            lapack_complex_double* x, lapack_int ldx,
2220                            double* ferr, double* berr );
2221
2222 lapack_int LAPACKE_chpsv( int matrix_layout, char uplo, lapack_int n,
2223                           lapack_int nrhs, lapack_complex_float* ap,
2224                           lapack_int* ipiv, lapack_complex_float* b,
2225                           lapack_int ldb );
2226 lapack_int LAPACKE_zhpsv( int matrix_layout, char uplo, lapack_int n,
2227                           lapack_int nrhs, lapack_complex_double* ap,
2228                           lapack_int* ipiv, lapack_complex_double* b,
2229                           lapack_int ldb );
2230
2231 lapack_int LAPACKE_chpsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2232                            lapack_int nrhs, const lapack_complex_float* ap,
2233                            lapack_complex_float* afp, lapack_int* ipiv,
2234                            const lapack_complex_float* b, lapack_int ldb,
2235                            lapack_complex_float* x, lapack_int ldx,
2236                            float* rcond, float* ferr, float* berr );
2237 lapack_int LAPACKE_zhpsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2238                            lapack_int nrhs, const lapack_complex_double* ap,
2239                            lapack_complex_double* afp, lapack_int* ipiv,
2240                            const lapack_complex_double* b, lapack_int ldb,
2241                            lapack_complex_double* x, lapack_int ldx,
2242                            double* rcond, double* ferr, double* berr );
2243
2244 lapack_int LAPACKE_chptrd( int matrix_layout, char uplo, lapack_int n,
2245                            lapack_complex_float* ap, float* d, float* e,
2246                            lapack_complex_float* tau );
2247 lapack_int LAPACKE_zhptrd( int matrix_layout, char uplo, lapack_int n,
2248                            lapack_complex_double* ap, double* d, double* e,
2249                            lapack_complex_double* tau );
2250
2251 lapack_int LAPACKE_chptrf( int matrix_layout, char uplo, lapack_int n,
2252                            lapack_complex_float* ap, lapack_int* ipiv );
2253 lapack_int LAPACKE_zhptrf( int matrix_layout, char uplo, lapack_int n,
2254                            lapack_complex_double* ap, lapack_int* ipiv );
2255
2256 lapack_int LAPACKE_chptri( int matrix_layout, char uplo, lapack_int n,
2257                            lapack_complex_float* ap, const lapack_int* ipiv );
2258 lapack_int LAPACKE_zhptri( int matrix_layout, char uplo, lapack_int n,
2259                            lapack_complex_double* ap, const lapack_int* ipiv );
2260
2261 lapack_int LAPACKE_chptrs( int matrix_layout, char uplo, lapack_int n,
2262                            lapack_int nrhs, const lapack_complex_float* ap,
2263                            const lapack_int* ipiv, lapack_complex_float* b,
2264                            lapack_int ldb );
2265 lapack_int LAPACKE_zhptrs( int matrix_layout, char uplo, lapack_int n,
2266                            lapack_int nrhs, const lapack_complex_double* ap,
2267                            const lapack_int* ipiv, lapack_complex_double* b,
2268                            lapack_int ldb );
2269
2270 lapack_int LAPACKE_shsein( int matrix_layout, char job, char eigsrc, char initv,
2271                            lapack_logical* select, lapack_int n, const float* h,
2272                            lapack_int ldh, float* wr, const float* wi,
2273                            float* vl, lapack_int ldvl, float* vr,
2274                            lapack_int ldvr, lapack_int mm, lapack_int* m,
2275                            lapack_int* ifaill, lapack_int* ifailr );
2276 lapack_int LAPACKE_dhsein( int matrix_layout, char job, char eigsrc, char initv,
2277                            lapack_logical* select, lapack_int n,
2278                            const double* h, lapack_int ldh, double* wr,
2279                            const double* wi, double* vl, lapack_int ldvl,
2280                            double* vr, lapack_int ldvr, lapack_int mm,
2281                            lapack_int* m, lapack_int* ifaill,
2282                            lapack_int* ifailr );
2283 lapack_int LAPACKE_chsein( int matrix_layout, char job, char eigsrc, char initv,
2284                            const lapack_logical* select, lapack_int n,
2285                            const lapack_complex_float* h, lapack_int ldh,
2286                            lapack_complex_float* w, lapack_complex_float* vl,
2287                            lapack_int ldvl, lapack_complex_float* vr,
2288                            lapack_int ldvr, lapack_int mm, lapack_int* m,
2289                            lapack_int* ifaill, lapack_int* ifailr );
2290 lapack_int LAPACKE_zhsein( int matrix_layout, char job, char eigsrc, char initv,
2291                            const lapack_logical* select, lapack_int n,
2292                            const lapack_complex_double* h, lapack_int ldh,
2293                            lapack_complex_double* w, lapack_complex_double* vl,
2294                            lapack_int ldvl, lapack_complex_double* vr,
2295                            lapack_int ldvr, lapack_int mm, lapack_int* m,
2296                            lapack_int* ifaill, lapack_int* ifailr );
2297
2298 lapack_int LAPACKE_shseqr( int matrix_layout, char job, char compz, lapack_int n,
2299                            lapack_int ilo, lapack_int ihi, float* h,
2300                            lapack_int ldh, float* wr, float* wi, float* z,
2301                            lapack_int ldz );
2302 lapack_int LAPACKE_dhseqr( int matrix_layout, char job, char compz, lapack_int n,
2303                            lapack_int ilo, lapack_int ihi, double* h,
2304                            lapack_int ldh, double* wr, double* wi, double* z,
2305                            lapack_int ldz );
2306 lapack_int LAPACKE_chseqr( int matrix_layout, char job, char compz, lapack_int n,
2307                            lapack_int ilo, lapack_int ihi,
2308                            lapack_complex_float* h, lapack_int ldh,
2309                            lapack_complex_float* w, lapack_complex_float* z,
2310                            lapack_int ldz );
2311 lapack_int LAPACKE_zhseqr( int matrix_layout, char job, char compz, lapack_int n,
2312                            lapack_int ilo, lapack_int ihi,
2313                            lapack_complex_double* h, lapack_int ldh,
2314                            lapack_complex_double* w, lapack_complex_double* z,
2315                            lapack_int ldz );
2316
2317 lapack_int LAPACKE_clacgv( lapack_int n, lapack_complex_float* x,
2318                            lapack_int incx );
2319 lapack_int LAPACKE_zlacgv( lapack_int n, lapack_complex_double* x,
2320                            lapack_int incx );
2321
2322 lapack_int LAPACKE_slacn2( lapack_int n, float* v, float* x, lapack_int* isgn,
2323                            float* est, lapack_int* kase, lapack_int* isave );
2324 lapack_int LAPACKE_dlacn2( lapack_int n, double* v, double* x, lapack_int* isgn,
2325                            double* est, lapack_int* kase, lapack_int* isave );
2326 lapack_int LAPACKE_clacn2( lapack_int n, lapack_complex_float* v,
2327                            lapack_complex_float* x,
2328                            float* est, lapack_int* kase, lapack_int* isave );
2329 lapack_int LAPACKE_zlacn2( lapack_int n, lapack_complex_double* v,
2330                            lapack_complex_double* x,
2331                            double* est, lapack_int* kase, lapack_int* isave );
2332
2333 lapack_int LAPACKE_slacpy( int matrix_layout, char uplo, lapack_int m,
2334                            lapack_int n, const float* a, lapack_int lda, float* b,
2335                            lapack_int ldb );
2336 lapack_int LAPACKE_dlacpy( int matrix_layout, char uplo, lapack_int m,
2337                            lapack_int n, const double* a, lapack_int lda, double* b,
2338                            lapack_int ldb );
2339 lapack_int LAPACKE_clacpy( int matrix_layout, char uplo, lapack_int m,
2340                            lapack_int n, const lapack_complex_float* a,
2341                            lapack_int lda, lapack_complex_float* b,
2342                            lapack_int ldb );
2343 lapack_int LAPACKE_zlacpy( int matrix_layout, char uplo, lapack_int m,
2344                            lapack_int n, const lapack_complex_double* a,
2345                            lapack_int lda, lapack_complex_double* b,
2346                            lapack_int ldb );
2347
2348 lapack_int LAPACKE_clacp2( int matrix_layout, char uplo, lapack_int m,
2349                            lapack_int n, const float* a, lapack_int lda,
2350                            lapack_complex_float* b, lapack_int ldb );
2351 lapack_int LAPACKE_zlacp2( int matrix_layout, char uplo, lapack_int m,
2352                            lapack_int n, const double* a, lapack_int lda,
2353                            lapack_complex_double* b, lapack_int ldb );
2354
2355 lapack_int LAPACKE_zlag2c( int matrix_layout, lapack_int m, lapack_int n,
2356                            const lapack_complex_double* a, lapack_int lda,
2357                            lapack_complex_float* sa, lapack_int ldsa );
2358
2359 lapack_int LAPACKE_slag2d( int matrix_layout, lapack_int m, lapack_int n,
2360                            const float* sa, lapack_int ldsa, double* a,
2361                            lapack_int lda );
2362
2363 lapack_int LAPACKE_dlag2s( int matrix_layout, lapack_int m, lapack_int n,
2364                            const double* a, lapack_int lda, float* sa,
2365                            lapack_int ldsa );
2366
2367 lapack_int LAPACKE_clag2z( int matrix_layout, lapack_int m, lapack_int n,
2368                            const lapack_complex_float* sa, lapack_int ldsa,
2369                            lapack_complex_double* a, lapack_int lda );
2370
2371 lapack_int LAPACKE_slagge( int matrix_layout, lapack_int m, lapack_int n,
2372                            lapack_int kl, lapack_int ku, const float* d,
2373                            float* a, lapack_int lda, lapack_int* iseed );
2374 lapack_int LAPACKE_dlagge( int matrix_layout, lapack_int m, lapack_int n,
2375                            lapack_int kl, lapack_int ku, const double* d,
2376                            double* a, lapack_int lda, lapack_int* iseed );
2377 lapack_int LAPACKE_clagge( int matrix_layout, lapack_int m, lapack_int n,
2378                            lapack_int kl, lapack_int ku, const float* d,
2379                            lapack_complex_float* a, lapack_int lda,
2380                            lapack_int* iseed );
2381 lapack_int LAPACKE_zlagge( int matrix_layout, lapack_int m, lapack_int n,
2382                            lapack_int kl, lapack_int ku, const double* d,
2383                            lapack_complex_double* a, lapack_int lda,
2384                            lapack_int* iseed );
2385
2386 float LAPACKE_slamch( char cmach );
2387 double LAPACKE_dlamch( char cmach );
2388
2389 float LAPACKE_slange( int matrix_layout, char norm, lapack_int m,
2390                            lapack_int n, const float* a, lapack_int lda );
2391 double LAPACKE_dlange( int matrix_layout, char norm, lapack_int m,
2392                            lapack_int n, const double* a, lapack_int lda );
2393 float LAPACKE_clange( int matrix_layout, char norm, lapack_int m,
2394                            lapack_int n, const lapack_complex_float* a,
2395                            lapack_int lda );
2396 double LAPACKE_zlange( int matrix_layout, char norm, lapack_int m,
2397                            lapack_int n, const lapack_complex_double* a,
2398                            lapack_int lda );
2399
2400 float LAPACKE_clanhe( int matrix_layout, char norm, char uplo, lapack_int n,
2401                            const lapack_complex_float* a, lapack_int lda );
2402 double LAPACKE_zlanhe( int matrix_layout, char norm, char uplo, lapack_int n,
2403                            const lapack_complex_double* a, lapack_int lda );
2404
2405 lapack_int LAPACKE_clacrm( int matrix_layout, lapack_int m, lapack_int n,
2406                           const lapack_complex_float* a,
2407                           lapack_int lda, const float* b,
2408                           lapack_int ldb, lapack_complex_float* c,
2409                           lapack_int ldc );
2410 lapack_int LAPACKE_zlacrm( int matrix_layout, lapack_int m, lapack_int n,
2411                            const lapack_complex_double* a,
2412                            lapack_int lda, const double* b,
2413                            lapack_int ldb, lapack_complex_double* c,
2414                            lapack_int ldc );
2415
2416 lapack_int LAPACKE_clarcm( int matrix_layout, lapack_int m, lapack_int n,
2417                           const float* a, lapack_int lda,
2418                           const lapack_complex_float* b,
2419                           lapack_int ldb, lapack_complex_float* c,
2420                           lapack_int ldc );
2421 lapack_int LAPACKE_zlarcm( int matrix_layout, lapack_int m, lapack_int n,
2422                            const double* a, lapack_int lda,
2423                            const lapack_complex_double* b,
2424                            lapack_int ldb, lapack_complex_double* c,
2425                            lapack_int ldc );
2426
2427 float LAPACKE_slansy( int matrix_layout, char norm, char uplo, lapack_int n,
2428                            const float* a, lapack_int lda );
2429 double LAPACKE_dlansy( int matrix_layout, char norm, char uplo, lapack_int n,
2430                            const double* a, lapack_int lda );
2431 float LAPACKE_clansy( int matrix_layout, char norm, char uplo, lapack_int n,
2432                            const lapack_complex_float* a, lapack_int lda );
2433 double LAPACKE_zlansy( int matrix_layout, char norm, char uplo, lapack_int n,
2434                            const lapack_complex_double* a, lapack_int lda );
2435
2436 float LAPACKE_slantr( int matrix_layout, char norm, char uplo, char diag,
2437                            lapack_int m, lapack_int n, const float* a,
2438                            lapack_int lda );
2439 double LAPACKE_dlantr( int matrix_layout, char norm, char uplo, char diag,
2440                            lapack_int m, lapack_int n, const double* a,
2441                            lapack_int lda );
2442 float LAPACKE_clantr( int matrix_layout, char norm, char uplo, char diag,
2443                            lapack_int m, lapack_int n, const lapack_complex_float* a,
2444                            lapack_int lda );
2445 double LAPACKE_zlantr( int matrix_layout, char norm, char uplo, char diag,
2446                            lapack_int m, lapack_int n, const lapack_complex_double* a,
2447                            lapack_int lda );
2448
2449
2450 lapack_int LAPACKE_slarfb( int matrix_layout, char side, char trans, char direct,
2451                            char storev, lapack_int m, lapack_int n,
2452                            lapack_int k, const float* v, lapack_int ldv,
2453                            const float* t, lapack_int ldt, float* c,
2454                            lapack_int ldc );
2455 lapack_int LAPACKE_dlarfb( int matrix_layout, char side, char trans, char direct,
2456                            char storev, lapack_int m, lapack_int n,
2457                            lapack_int k, const double* v, lapack_int ldv,
2458                            const double* t, lapack_int ldt, double* c,
2459                            lapack_int ldc );
2460 lapack_int LAPACKE_clarfb( int matrix_layout, char side, char trans, char direct,
2461                            char storev, lapack_int m, lapack_int n,
2462                            lapack_int k, const lapack_complex_float* v,
2463                            lapack_int ldv, const lapack_complex_float* t,
2464                            lapack_int ldt, lapack_complex_float* c,
2465                            lapack_int ldc );
2466 lapack_int LAPACKE_zlarfb( int matrix_layout, char side, char trans, char direct,
2467                            char storev, lapack_int m, lapack_int n,
2468                            lapack_int k, const lapack_complex_double* v,
2469                            lapack_int ldv, const lapack_complex_double* t,
2470                            lapack_int ldt, lapack_complex_double* c,
2471                            lapack_int ldc );
2472
2473 lapack_int LAPACKE_slarfg( lapack_int n, float* alpha, float* x,
2474                            lapack_int incx, float* tau );
2475 lapack_int LAPACKE_dlarfg( lapack_int n, double* alpha, double* x,
2476                            lapack_int incx, double* tau );
2477 lapack_int LAPACKE_clarfg( lapack_int n, lapack_complex_float* alpha,
2478                            lapack_complex_float* x, lapack_int incx,
2479                            lapack_complex_float* tau );
2480 lapack_int LAPACKE_zlarfg( lapack_int n, lapack_complex_double* alpha,
2481                            lapack_complex_double* x, lapack_int incx,
2482                            lapack_complex_double* tau );
2483
2484 lapack_int LAPACKE_slarft( int matrix_layout, char direct, char storev,
2485                            lapack_int n, lapack_int k, const float* v,
2486                            lapack_int ldv, const float* tau, float* t,
2487                            lapack_int ldt );
2488 lapack_int LAPACKE_dlarft( int matrix_layout, char direct, char storev,
2489                            lapack_int n, lapack_int k, const double* v,
2490                            lapack_int ldv, const double* tau, double* t,
2491                            lapack_int ldt );
2492 lapack_int LAPACKE_clarft( int matrix_layout, char direct, char storev,
2493                            lapack_int n, lapack_int k,
2494                            const lapack_complex_float* v, lapack_int ldv,
2495                            const lapack_complex_float* tau,
2496                            lapack_complex_float* t, lapack_int ldt );
2497 lapack_int LAPACKE_zlarft( int matrix_layout, char direct, char storev,
2498                            lapack_int n, lapack_int k,
2499                            const lapack_complex_double* v, lapack_int ldv,
2500                            const lapack_complex_double* tau,
2501                            lapack_complex_double* t, lapack_int ldt );
2502
2503 lapack_int LAPACKE_slarfx( int matrix_layout, char side, lapack_int m,
2504                            lapack_int n, const float* v, float tau, float* c,
2505                            lapack_int ldc, float* work );
2506 lapack_int LAPACKE_dlarfx( int matrix_layout, char side, lapack_int m,
2507                            lapack_int n, const double* v, double tau, double* c,
2508                            lapack_int ldc, double* work );
2509 lapack_int LAPACKE_clarfx( int matrix_layout, char side, lapack_int m,
2510                            lapack_int n, const lapack_complex_float* v,
2511                            lapack_complex_float tau, lapack_complex_float* c,
2512                            lapack_int ldc, lapack_complex_float* work );
2513 lapack_int LAPACKE_zlarfx( int matrix_layout, char side, lapack_int m,
2514                            lapack_int n, const lapack_complex_double* v,
2515                            lapack_complex_double tau, lapack_complex_double* c,
2516                            lapack_int ldc, lapack_complex_double* work );
2517
2518 lapack_int LAPACKE_slarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2519                            float* x );
2520 lapack_int LAPACKE_dlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2521                            double* x );
2522 lapack_int LAPACKE_clarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2523                            lapack_complex_float* x );
2524 lapack_int LAPACKE_zlarnv( lapack_int idist, lapack_int* iseed, lapack_int n,
2525                            lapack_complex_double* x );
2526
2527 lapack_int LAPACKE_slascl( int matrix_layout, char type, lapack_int kl,
2528                            lapack_int ku, float cfrom, float cto,
2529                            lapack_int m, lapack_int n, float* a,
2530                            lapack_int lda );
2531 lapack_int LAPACKE_dlascl( int matrix_layout, char type, lapack_int kl,
2532                            lapack_int ku, double cfrom, double cto,
2533                            lapack_int m, lapack_int n, double* a,
2534                            lapack_int lda );
2535 lapack_int LAPACKE_clascl( int matrix_layout, char type, lapack_int kl,
2536                            lapack_int ku, float cfrom, float cto,
2537                            lapack_int m, lapack_int n, lapack_complex_float* a,
2538                            lapack_int lda );
2539 lapack_int LAPACKE_zlascl( int matrix_layout, char type, lapack_int kl,
2540                            lapack_int ku, double cfrom, double cto,
2541                            lapack_int m, lapack_int n, lapack_complex_double* a,
2542                            lapack_int lda );
2543
2544 lapack_int LAPACKE_slaset( int matrix_layout, char uplo, lapack_int m,
2545                            lapack_int n, float alpha, float beta, float* a,
2546                            lapack_int lda );
2547 lapack_int LAPACKE_dlaset( int matrix_layout, char uplo, lapack_int m,
2548                            lapack_int n, double alpha, double beta, double* a,
2549                            lapack_int lda );
2550 lapack_int LAPACKE_claset( int matrix_layout, char uplo, lapack_int m,
2551                            lapack_int n, lapack_complex_float alpha,
2552                            lapack_complex_float beta, lapack_complex_float* a,
2553                            lapack_int lda );
2554 lapack_int LAPACKE_zlaset( int matrix_layout, char uplo, lapack_int m,
2555                            lapack_int n, lapack_complex_double alpha,
2556                            lapack_complex_double beta, lapack_complex_double* a,
2557                            lapack_int lda );
2558
2559 lapack_int LAPACKE_slasrt( char id, lapack_int n, float* d );
2560 lapack_int LAPACKE_dlasrt( char id, lapack_int n, double* d );
2561
2562 lapack_int LAPACKE_slassq( lapack_int n,                 float* x, lapack_int incx,  float* scale,  float* sumsq );
2563 lapack_int LAPACKE_dlassq( lapack_int n,                double* x, lapack_int incx, double* scale, double* sumsq );
2564 lapack_int LAPACKE_classq( lapack_int n,  lapack_complex_float* x, lapack_int incx,  float* scale,  float* sumsq );
2565 lapack_int LAPACKE_zlassq( lapack_int n, lapack_complex_double* x, lapack_int incx, double* scale, double* sumsq );
2566
2567 lapack_int LAPACKE_slaswp( int matrix_layout, lapack_int n, float* a,
2568                            lapack_int lda, lapack_int k1, lapack_int k2,
2569                            const lapack_int* ipiv, lapack_int incx );
2570 lapack_int LAPACKE_dlaswp( int matrix_layout, lapack_int n, double* a,
2571                            lapack_int lda, lapack_int k1, lapack_int k2,
2572                            const lapack_int* ipiv, lapack_int incx );
2573 lapack_int LAPACKE_claswp( int matrix_layout, lapack_int n,
2574                            lapack_complex_float* a, lapack_int lda,
2575                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2576                            lapack_int incx );
2577 lapack_int LAPACKE_zlaswp( int matrix_layout, lapack_int n,
2578                            lapack_complex_double* a, lapack_int lda,
2579                            lapack_int k1, lapack_int k2, const lapack_int* ipiv,
2580                            lapack_int incx );
2581
2582 lapack_int LAPACKE_slatms( int matrix_layout, lapack_int m, lapack_int n,
2583                            char dist, lapack_int* iseed, char sym, float* d,
2584                            lapack_int mode, float cond, float dmax,
2585                            lapack_int kl, lapack_int ku, char pack, float* a,
2586                            lapack_int lda );
2587 lapack_int LAPACKE_dlatms( int matrix_layout, lapack_int m, lapack_int n,
2588                            char dist, lapack_int* iseed, char sym, double* d,
2589                            lapack_int mode, double cond, double dmax,
2590                            lapack_int kl, lapack_int ku, char pack, double* a,
2591                            lapack_int lda );
2592 lapack_int LAPACKE_clatms( int matrix_layout, lapack_int m, lapack_int n,
2593                            char dist, lapack_int* iseed, char sym, float* d,
2594                            lapack_int mode, float cond, float dmax,
2595                            lapack_int kl, lapack_int ku, char pack,
2596                            lapack_complex_float* a, lapack_int lda );
2597 lapack_int LAPACKE_zlatms( int matrix_layout, lapack_int m, lapack_int n,
2598                            char dist, lapack_int* iseed, char sym, double* d,
2599                            lapack_int mode, double cond, double dmax,
2600                            lapack_int kl, lapack_int ku, char pack,
2601                            lapack_complex_double* a, lapack_int lda );
2602
2603 lapack_int LAPACKE_slauum( int matrix_layout, char uplo, lapack_int n, float* a,
2604                            lapack_int lda );
2605 lapack_int LAPACKE_dlauum( int matrix_layout, char uplo, lapack_int n, double* a,
2606                            lapack_int lda );
2607 lapack_int LAPACKE_clauum( int matrix_layout, char uplo, lapack_int n,
2608                            lapack_complex_float* a, lapack_int lda );
2609 lapack_int LAPACKE_zlauum( int matrix_layout, char uplo, lapack_int n,
2610                            lapack_complex_double* a, lapack_int lda );
2611
2612 lapack_int LAPACKE_sopgtr( int matrix_layout, char uplo, lapack_int n,
2613                            const float* ap, const float* tau, float* q,
2614                            lapack_int ldq );
2615 lapack_int LAPACKE_dopgtr( int matrix_layout, char uplo, lapack_int n,
2616                            const double* ap, const double* tau, double* q,
2617                            lapack_int ldq );
2618
2619 lapack_int LAPACKE_sopmtr( int matrix_layout, char side, char uplo, char trans,
2620                            lapack_int m, lapack_int n, const float* ap,
2621                            const float* tau, float* c, lapack_int ldc );
2622 lapack_int LAPACKE_dopmtr( int matrix_layout, char side, char uplo, char trans,
2623                            lapack_int m, lapack_int n, const double* ap,
2624                            const double* tau, double* c, lapack_int ldc );
2625
2626 lapack_int LAPACKE_sorgbr( int matrix_layout, char vect, lapack_int m,
2627                            lapack_int n, lapack_int k, float* a, lapack_int lda,
2628                            const float* tau );
2629 lapack_int LAPACKE_dorgbr( int matrix_layout, char vect, lapack_int m,
2630                            lapack_int n, lapack_int k, double* a,
2631                            lapack_int lda, const double* tau );
2632
2633 lapack_int LAPACKE_sorghr( int matrix_layout, lapack_int n, lapack_int ilo,
2634                            lapack_int ihi, float* a, lapack_int lda,
2635                            const float* tau );
2636 lapack_int LAPACKE_dorghr( int matrix_layout, lapack_int n, lapack_int ilo,
2637                            lapack_int ihi, double* a, lapack_int lda,
2638                            const double* tau );
2639
2640 lapack_int LAPACKE_sorglq( int matrix_layout, lapack_int m, lapack_int n,
2641                            lapack_int k, float* a, lapack_int lda,
2642                            const float* tau );
2643 lapack_int LAPACKE_dorglq( int matrix_layout, lapack_int m, lapack_int n,
2644                            lapack_int k, double* a, lapack_int lda,
2645                            const double* tau );
2646
2647 lapack_int LAPACKE_sorgql( int matrix_layout, lapack_int m, lapack_int n,
2648                            lapack_int k, float* a, lapack_int lda,
2649                            const float* tau );
2650 lapack_int LAPACKE_dorgql( int matrix_layout, lapack_int m, lapack_int n,
2651                            lapack_int k, double* a, lapack_int lda,
2652                            const double* tau );
2653
2654 lapack_int LAPACKE_sorgqr( int matrix_layout, lapack_int m, lapack_int n,
2655                            lapack_int k, float* a, lapack_int lda,
2656                            const float* tau );
2657 lapack_int LAPACKE_dorgqr( int matrix_layout, lapack_int m, lapack_int n,
2658                            lapack_int k, double* a, lapack_int lda,
2659                            const double* tau );
2660
2661 lapack_int LAPACKE_sorgrq( int matrix_layout, lapack_int m, lapack_int n,
2662                            lapack_int k, float* a, lapack_int lda,
2663                            const float* tau );
2664 lapack_int LAPACKE_dorgrq( int matrix_layout, lapack_int m, lapack_int n,
2665                            lapack_int k, double* a, lapack_int lda,
2666                            const double* tau );
2667
2668 lapack_int LAPACKE_sorgtr( int matrix_layout, char uplo, lapack_int n, float* a,
2669                            lapack_int lda, const float* tau );
2670 lapack_int LAPACKE_dorgtr( int matrix_layout, char uplo, lapack_int n, double* a,
2671                            lapack_int lda, const double* tau );
2672
2673 lapack_int LAPACKE_sormbr( int matrix_layout, char vect, char side, char trans,
2674                            lapack_int m, lapack_int n, lapack_int k,
2675                            const float* a, lapack_int lda, const float* tau,
2676                            float* c, lapack_int ldc );
2677 lapack_int LAPACKE_dormbr( int matrix_layout, char vect, char side, char trans,
2678                            lapack_int m, lapack_int n, lapack_int k,
2679                            const double* a, lapack_int lda, const double* tau,
2680                            double* c, lapack_int ldc );
2681
2682 lapack_int LAPACKE_sormhr( int matrix_layout, char side, char trans,
2683                            lapack_int m, lapack_int n, lapack_int ilo,
2684                            lapack_int ihi, const float* a, lapack_int lda,
2685                            const float* tau, float* c, lapack_int ldc );
2686 lapack_int LAPACKE_dormhr( int matrix_layout, char side, char trans,
2687                            lapack_int m, lapack_int n, lapack_int ilo,
2688                            lapack_int ihi, const double* a, lapack_int lda,
2689                            const double* tau, double* c, lapack_int ldc );
2690
2691 lapack_int LAPACKE_sormlq( int matrix_layout, char side, char trans,
2692                            lapack_int m, lapack_int n, lapack_int k,
2693                            const float* a, lapack_int lda, const float* tau,
2694                            float* c, lapack_int ldc );
2695 lapack_int LAPACKE_dormlq( int matrix_layout, char side, char trans,
2696                            lapack_int m, lapack_int n, lapack_int k,
2697                            const double* a, lapack_int lda, const double* tau,
2698                            double* c, lapack_int ldc );
2699
2700 lapack_int LAPACKE_sormql( int matrix_layout, char side, char trans,
2701                            lapack_int m, lapack_int n, lapack_int k,
2702                            const float* a, lapack_int lda, const float* tau,
2703                            float* c, lapack_int ldc );
2704 lapack_int LAPACKE_dormql( int matrix_layout, char side, char trans,
2705                            lapack_int m, lapack_int n, lapack_int k,
2706                            const double* a, lapack_int lda, const double* tau,
2707                            double* c, lapack_int ldc );
2708
2709 lapack_int LAPACKE_sormqr( int matrix_layout, char side, char trans,
2710                            lapack_int m, lapack_int n, lapack_int k,
2711                            const float* a, lapack_int lda, const float* tau,
2712                            float* c, lapack_int ldc );
2713 lapack_int LAPACKE_dormqr( int matrix_layout, char side, char trans,
2714                            lapack_int m, lapack_int n, lapack_int k,
2715                            const double* a, lapack_int lda, const double* tau,
2716                            double* c, lapack_int ldc );
2717
2718 lapack_int LAPACKE_sormrq( int matrix_layout, char side, char trans,
2719                            lapack_int m, lapack_int n, lapack_int k,
2720                            const float* a, lapack_int lda, const float* tau,
2721                            float* c, lapack_int ldc );
2722 lapack_int LAPACKE_dormrq( int matrix_layout, char side, char trans,
2723                            lapack_int m, lapack_int n, lapack_int k,
2724                            const double* a, lapack_int lda, const double* tau,
2725                            double* c, lapack_int ldc );
2726
2727 lapack_int LAPACKE_sormrz( int matrix_layout, char side, char trans,
2728                            lapack_int m, lapack_int n, lapack_int k,
2729                            lapack_int l, const float* a, lapack_int lda,
2730                            const float* tau, float* c, lapack_int ldc );
2731 lapack_int LAPACKE_dormrz( int matrix_layout, char side, char trans,
2732                            lapack_int m, lapack_int n, lapack_int k,
2733                            lapack_int l, const double* a, lapack_int lda,
2734                            const double* tau, double* c, lapack_int ldc );
2735
2736 lapack_int LAPACKE_sormtr( int matrix_layout, char side, char uplo, char trans,
2737                            lapack_int m, lapack_int n, const float* a,
2738                            lapack_int lda, const float* tau, float* c,
2739                            lapack_int ldc );
2740 lapack_int LAPACKE_dormtr( int matrix_layout, char side, char uplo, char trans,
2741                            lapack_int m, lapack_int n, const double* a,
2742                            lapack_int lda, const double* tau, double* c,
2743                            lapack_int ldc );
2744
2745 lapack_int LAPACKE_spbcon( int matrix_layout, char uplo, lapack_int n,
2746                            lapack_int kd, const float* ab, lapack_int ldab,
2747                            float anorm, float* rcond );
2748 lapack_int LAPACKE_dpbcon( int matrix_layout, char uplo, lapack_int n,
2749                            lapack_int kd, const double* ab, lapack_int ldab,
2750                            double anorm, double* rcond );
2751 lapack_int LAPACKE_cpbcon( int matrix_layout, char uplo, lapack_int n,
2752                            lapack_int kd, const lapack_complex_float* ab,
2753                            lapack_int ldab, float anorm, float* rcond );
2754 lapack_int LAPACKE_zpbcon( int matrix_layout, char uplo, lapack_int n,
2755                            lapack_int kd, const lapack_complex_double* ab,
2756                            lapack_int ldab, double anorm, double* rcond );
2757
2758 lapack_int LAPACKE_spbequ( int matrix_layout, char uplo, lapack_int n,
2759                            lapack_int kd, const float* ab, lapack_int ldab,
2760                            float* s, float* scond, float* amax );
2761 lapack_int LAPACKE_dpbequ( int matrix_layout, char uplo, lapack_int n,
2762                            lapack_int kd, const double* ab, lapack_int ldab,
2763                            double* s, double* scond, double* amax );
2764 lapack_int LAPACKE_cpbequ( int matrix_layout, char uplo, lapack_int n,
2765                            lapack_int kd, const lapack_complex_float* ab,
2766                            lapack_int ldab, float* s, float* scond,
2767                            float* amax );
2768 lapack_int LAPACKE_zpbequ( int matrix_layout, char uplo, lapack_int n,
2769                            lapack_int kd, const lapack_complex_double* ab,
2770                            lapack_int ldab, double* s, double* scond,
2771                            double* amax );
2772
2773 lapack_int LAPACKE_spbrfs( int matrix_layout, char uplo, lapack_int n,
2774                            lapack_int kd, lapack_int nrhs, const float* ab,
2775                            lapack_int ldab, const float* afb, lapack_int ldafb,
2776                            const float* b, lapack_int ldb, float* x,
2777                            lapack_int ldx, float* ferr, float* berr );
2778 lapack_int LAPACKE_dpbrfs( int matrix_layout, char uplo, lapack_int n,
2779                            lapack_int kd, lapack_int nrhs, const double* ab,
2780                            lapack_int ldab, const double* afb, lapack_int ldafb,
2781                            const double* b, lapack_int ldb, double* x,
2782                            lapack_int ldx, double* ferr, double* berr );
2783 lapack_int LAPACKE_cpbrfs( int matrix_layout, char uplo, lapack_int n,
2784                            lapack_int kd, lapack_int nrhs,
2785                            const lapack_complex_float* ab, lapack_int ldab,
2786                            const lapack_complex_float* afb, lapack_int ldafb,
2787                            const lapack_complex_float* b, lapack_int ldb,
2788                            lapack_complex_float* x, lapack_int ldx, float* ferr,
2789                            float* berr );
2790 lapack_int LAPACKE_zpbrfs( int matrix_layout, char uplo, lapack_int n,
2791                            lapack_int kd, lapack_int nrhs,
2792                            const lapack_complex_double* ab, lapack_int ldab,
2793                            const lapack_complex_double* afb, lapack_int ldafb,
2794                            const lapack_complex_double* b, lapack_int ldb,
2795                            lapack_complex_double* x, lapack_int ldx,
2796                            double* ferr, double* berr );
2797
2798 lapack_int LAPACKE_spbstf( int matrix_layout, char uplo, lapack_int n,
2799                            lapack_int kb, float* bb, lapack_int ldbb );
2800 lapack_int LAPACKE_dpbstf( int matrix_layout, char uplo, lapack_int n,
2801                            lapack_int kb, double* bb, lapack_int ldbb );
2802 lapack_int LAPACKE_cpbstf( int matrix_layout, char uplo, lapack_int n,
2803                            lapack_int kb, lapack_complex_float* bb,
2804                            lapack_int ldbb );
2805 lapack_int LAPACKE_zpbstf( int matrix_layout, char uplo, lapack_int n,
2806                            lapack_int kb, lapack_complex_double* bb,
2807                            lapack_int ldbb );
2808
2809 lapack_int LAPACKE_spbsv( int matrix_layout, char uplo, lapack_int n,
2810                           lapack_int kd, lapack_int nrhs, float* ab,
2811                           lapack_int ldab, float* b, lapack_int ldb );
2812 lapack_int LAPACKE_dpbsv( int matrix_layout, char uplo, lapack_int n,
2813                           lapack_int kd, lapack_int nrhs, double* ab,
2814                           lapack_int ldab, double* b, lapack_int ldb );
2815 lapack_int LAPACKE_cpbsv( int matrix_layout, char uplo, lapack_int n,
2816                           lapack_int kd, lapack_int nrhs,
2817                           lapack_complex_float* ab, lapack_int ldab,
2818                           lapack_complex_float* b, lapack_int ldb );
2819 lapack_int LAPACKE_zpbsv( int matrix_layout, char uplo, lapack_int n,
2820                           lapack_int kd, lapack_int nrhs,
2821                           lapack_complex_double* ab, lapack_int ldab,
2822                           lapack_complex_double* b, lapack_int ldb );
2823
2824 lapack_int LAPACKE_spbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2825                            lapack_int kd, lapack_int nrhs, float* ab,
2826                            lapack_int ldab, float* afb, lapack_int ldafb,
2827                            char* equed, float* s, float* b, lapack_int ldb,
2828                            float* x, lapack_int ldx, float* rcond, float* ferr,
2829                            float* berr );
2830 lapack_int LAPACKE_dpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2831                            lapack_int kd, lapack_int nrhs, double* ab,
2832                            lapack_int ldab, double* afb, lapack_int ldafb,
2833                            char* equed, double* s, double* b, lapack_int ldb,
2834                            double* x, lapack_int ldx, double* rcond,
2835                            double* ferr, double* berr );
2836 lapack_int LAPACKE_cpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2837                            lapack_int kd, lapack_int nrhs,
2838                            lapack_complex_float* ab, lapack_int ldab,
2839                            lapack_complex_float* afb, lapack_int ldafb,
2840                            char* equed, float* s, lapack_complex_float* b,
2841                            lapack_int ldb, lapack_complex_float* x,
2842                            lapack_int ldx, float* rcond, float* ferr,
2843                            float* berr );
2844 lapack_int LAPACKE_zpbsvx( int matrix_layout, char fact, char uplo, lapack_int n,
2845                            lapack_int kd, lapack_int nrhs,
2846                            lapack_complex_double* ab, lapack_int ldab,
2847                            lapack_complex_double* afb, lapack_int ldafb,
2848                            char* equed, double* s, lapack_complex_double* b,
2849                            lapack_int ldb, lapack_complex_double* x,
2850                            lapack_int ldx, double* rcond, double* ferr,
2851                            double* berr );
2852
2853 lapack_int LAPACKE_spbtrf( int matrix_layout, char uplo, lapack_int n,
2854                            lapack_int kd, float* ab, lapack_int ldab );
2855 lapack_int LAPACKE_dpbtrf( int matrix_layout, char uplo, lapack_int n,
2856                            lapack_int kd, double* ab, lapack_int ldab );
2857 lapack_int LAPACKE_cpbtrf( int matrix_layout, char uplo, lapack_int n,
2858                            lapack_int kd, lapack_complex_float* ab,
2859                            lapack_int ldab );
2860 lapack_int LAPACKE_zpbtrf( int matrix_layout, char uplo, lapack_int n,
2861                            lapack_int kd, lapack_complex_double* ab,
2862                            lapack_int ldab );
2863
2864 lapack_int LAPACKE_spbtrs( int matrix_layout, char uplo, lapack_int n,
2865                            lapack_int kd, lapack_int nrhs, const float* ab,
2866                            lapack_int ldab, float* b, lapack_int ldb );
2867 lapack_int LAPACKE_dpbtrs( int matrix_layout, char uplo, lapack_int n,
2868                            lapack_int kd, lapack_int nrhs, const double* ab,
2869                            lapack_int ldab, double* b, lapack_int ldb );
2870 lapack_int LAPACKE_cpbtrs( int matrix_layout, char uplo, lapack_int n,
2871                            lapack_int kd, lapack_int nrhs,
2872                            const lapack_complex_float* ab, lapack_int ldab,
2873                            lapack_complex_float* b, lapack_int ldb );
2874 lapack_int LAPACKE_zpbtrs( int matrix_layout, char uplo, lapack_int n,
2875                            lapack_int kd, lapack_int nrhs,
2876                            const lapack_complex_double* ab, lapack_int ldab,
2877                            lapack_complex_double* b, lapack_int ldb );
2878
2879 lapack_int LAPACKE_spftrf( int matrix_layout, char transr, char uplo,
2880                            lapack_int n, float* a );
2881 lapack_int LAPACKE_dpftrf( int matrix_layout, char transr, char uplo,
2882                            lapack_int n, double* a );
2883 lapack_int LAPACKE_cpftrf( int matrix_layout, char transr, char uplo,
2884                            lapack_int n, lapack_complex_float* a );
2885 lapack_int LAPACKE_zpftrf( int matrix_layout, char transr, char uplo,
2886                            lapack_int n, lapack_complex_double* a );
2887
2888 lapack_int LAPACKE_spftri( int matrix_layout, char transr, char uplo,
2889                            lapack_int n, float* a );
2890 lapack_int LAPACKE_dpftri( int matrix_layout, char transr, char uplo,
2891                            lapack_int n, double* a );
2892 lapack_int LAPACKE_cpftri( int matrix_layout, char transr, char uplo,
2893                            lapack_int n, lapack_complex_float* a );
2894 lapack_int LAPACKE_zpftri( int matrix_layout, char transr, char uplo,
2895                            lapack_int n, lapack_complex_double* a );
2896
2897 lapack_int LAPACKE_spftrs( int matrix_layout, char transr, char uplo,
2898                            lapack_int n, lapack_int nrhs, const float* a,
2899                            float* b, lapack_int ldb );
2900 lapack_int LAPACKE_dpftrs( int matrix_layout, char transr, char uplo,
2901                            lapack_int n, lapack_int nrhs, const double* a,
2902                            double* b, lapack_int ldb );
2903 lapack_int LAPACKE_cpftrs( int matrix_layout, char transr, char uplo,
2904                            lapack_int n, lapack_int nrhs,
2905                            const lapack_complex_float* a,
2906                            lapack_complex_float* b, lapack_int ldb );
2907 lapack_int LAPACKE_zpftrs( int matrix_layout, char transr, char uplo,
2908                            lapack_int n, lapack_int nrhs,
2909                            const lapack_complex_double* a,
2910                            lapack_complex_double* b, lapack_int ldb );
2911
2912 lapack_int LAPACKE_spocon( int matrix_layout, char uplo, lapack_int n,
2913                            const float* a, lapack_int lda, float anorm,
2914                            float* rcond );
2915 lapack_int LAPACKE_dpocon( int matrix_layout, char uplo, lapack_int n,
2916                            const double* a, lapack_int lda, double anorm,
2917                            double* rcond );
2918 lapack_int LAPACKE_cpocon( int matrix_layout, char uplo, lapack_int n,
2919                            const lapack_complex_float* a, lapack_int lda,
2920                            float anorm, float* rcond );
2921 lapack_int LAPACKE_zpocon( int matrix_layout, char uplo, lapack_int n,
2922                            const lapack_complex_double* a, lapack_int lda,
2923                            double anorm, double* rcond );
2924
2925 lapack_int LAPACKE_spoequ( int matrix_layout, lapack_int n, const float* a,
2926                            lapack_int lda, float* s, float* scond,
2927                            float* amax );
2928 lapack_int LAPACKE_dpoequ( int matrix_layout, lapack_int n, const double* a,
2929                            lapack_int lda, double* s, double* scond,
2930                            double* amax );
2931 lapack_int LAPACKE_cpoequ( int matrix_layout, lapack_int n,
2932                            const lapack_complex_float* a, lapack_int lda,
2933                            float* s, float* scond, float* amax );
2934 lapack_int LAPACKE_zpoequ( int matrix_layout, lapack_int n,
2935                            const lapack_complex_double* a, lapack_int lda,
2936                            double* s, double* scond, double* amax );
2937
2938 lapack_int LAPACKE_spoequb( int matrix_layout, lapack_int n, const float* a,
2939                             lapack_int lda, float* s, float* scond,
2940                             float* amax );
2941 lapack_int LAPACKE_dpoequb( int matrix_layout, lapack_int n, const double* a,
2942                             lapack_int lda, double* s, double* scond,
2943                             double* amax );
2944 lapack_int LAPACKE_cpoequb( int matrix_layout, lapack_int n,
2945                             const lapack_complex_float* a, lapack_int lda,
2946                             float* s, float* scond, float* amax );
2947 lapack_int LAPACKE_zpoequb( int matrix_layout, lapack_int n,
2948                             const lapack_complex_double* a, lapack_int lda,
2949                             double* s, double* scond, double* amax );
2950
2951 lapack_int LAPACKE_sporfs( int matrix_layout, char uplo, lapack_int n,
2952                            lapack_int nrhs, const float* a, lapack_int lda,
2953                            const float* af, lapack_int ldaf, const float* b,
2954                            lapack_int ldb, float* x, lapack_int ldx,
2955                            float* ferr, float* berr );
2956 lapack_int LAPACKE_dporfs( int matrix_layout, char uplo, lapack_int n,
2957                            lapack_int nrhs, const double* a, lapack_int lda,
2958                            const double* af, lapack_int ldaf, const double* b,
2959                            lapack_int ldb, double* x, lapack_int ldx,
2960                            double* ferr, double* berr );
2961 lapack_int LAPACKE_cporfs( int matrix_layout, char uplo, lapack_int n,
2962                            lapack_int nrhs, const lapack_complex_float* a,
2963                            lapack_int lda, const lapack_complex_float* af,
2964                            lapack_int ldaf, const lapack_complex_float* b,
2965                            lapack_int ldb, lapack_complex_float* x,
2966                            lapack_int ldx, float* ferr, float* berr );
2967 lapack_int LAPACKE_zporfs( int matrix_layout, char uplo, lapack_int n,
2968                            lapack_int nrhs, const lapack_complex_double* a,
2969                            lapack_int lda, const lapack_complex_double* af,
2970                            lapack_int ldaf, const lapack_complex_double* b,
2971                            lapack_int ldb, lapack_complex_double* x,
2972                            lapack_int ldx, double* ferr, double* berr );
2973
2974 lapack_int LAPACKE_sporfsx( int matrix_layout, char uplo, char equed,
2975                             lapack_int n, lapack_int nrhs, const float* a,
2976                             lapack_int lda, const float* af, lapack_int ldaf,
2977                             const float* s, const float* b, lapack_int ldb,
2978                             float* x, lapack_int ldx, float* rcond, float* berr,
2979                             lapack_int n_err_bnds, float* err_bnds_norm,
2980                             float* err_bnds_comp, lapack_int nparams,
2981                             float* params );
2982 lapack_int LAPACKE_dporfsx( int matrix_layout, char uplo, char equed,
2983                             lapack_int n, lapack_int nrhs, const double* a,
2984                             lapack_int lda, const double* af, lapack_int ldaf,
2985                             const double* s, const double* b, lapack_int ldb,
2986                             double* x, lapack_int ldx, double* rcond,
2987                             double* berr, lapack_int n_err_bnds,
2988                             double* err_bnds_norm, double* err_bnds_comp,
2989                             lapack_int nparams, double* params );
2990 lapack_int LAPACKE_cporfsx( int matrix_layout, char uplo, char equed,
2991                             lapack_int n, lapack_int nrhs,
2992                             const lapack_complex_float* a, lapack_int lda,
2993                             const lapack_complex_float* af, lapack_int ldaf,
2994                             const float* s, const lapack_complex_float* b,
2995                             lapack_int ldb, lapack_complex_float* x,
2996                             lapack_int ldx, float* rcond, float* berr,
2997                             lapack_int n_err_bnds, float* err_bnds_norm,
2998                             float* err_bnds_comp, lapack_int nparams,
2999                             float* params );
3000 lapack_int LAPACKE_zporfsx( int matrix_layout, char uplo, char equed,
3001                             lapack_int n, lapack_int nrhs,
3002                             const lapack_complex_double* a, lapack_int lda,
3003                             const lapack_complex_double* af, lapack_int ldaf,
3004                             const double* s, const lapack_complex_double* b,
3005                             lapack_int ldb, lapack_complex_double* x,
3006                             lapack_int ldx, double* rcond, double* berr,
3007                             lapack_int n_err_bnds, double* err_bnds_norm,
3008                             double* err_bnds_comp, lapack_int nparams,
3009                             double* params );
3010
3011 lapack_int LAPACKE_sposv( int matrix_layout, char uplo, lapack_int n,
3012                           lapack_int nrhs, float* a, lapack_int lda, float* b,
3013                           lapack_int ldb );
3014 lapack_int LAPACKE_dposv( int matrix_layout, char uplo, lapack_int n,
3015                           lapack_int nrhs, double* a, lapack_int lda, double* b,
3016                           lapack_int ldb );
3017 lapack_int LAPACKE_cposv( int matrix_layout, char uplo, lapack_int n,
3018                           lapack_int nrhs, lapack_complex_float* a,
3019                           lapack_int lda, lapack_complex_float* b,
3020                           lapack_int ldb );
3021 lapack_int LAPACKE_zposv( int matrix_layout, char uplo, lapack_int n,
3022                           lapack_int nrhs, lapack_complex_double* a,
3023                           lapack_int lda, lapack_complex_double* b,
3024                           lapack_int ldb );
3025 lapack_int LAPACKE_dsposv( int matrix_layout, char uplo, lapack_int n,
3026                            lapack_int nrhs, double* a, lapack_int lda,
3027                            double* b, lapack_int ldb, double* x, lapack_int ldx,
3028                            lapack_int* iter );
3029 lapack_int LAPACKE_zcposv( int matrix_layout, char uplo, lapack_int n,
3030                            lapack_int nrhs, lapack_complex_double* a,
3031                            lapack_int lda, lapack_complex_double* b,
3032                            lapack_int ldb, lapack_complex_double* x,
3033                            lapack_int ldx, lapack_int* iter );
3034
3035 lapack_int LAPACKE_sposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3036                            lapack_int nrhs, float* a, lapack_int lda, float* af,
3037                            lapack_int ldaf, char* equed, float* s, float* b,
3038                            lapack_int ldb, float* x, lapack_int ldx,
3039                            float* rcond, float* ferr, float* berr );
3040 lapack_int LAPACKE_dposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3041                            lapack_int nrhs, double* a, lapack_int lda,
3042                            double* af, lapack_int ldaf, char* equed, double* s,
3043                            double* b, lapack_int ldb, double* x, lapack_int ldx,
3044                            double* rcond, double* ferr, double* berr );
3045 lapack_int LAPACKE_cposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3046                            lapack_int nrhs, lapack_complex_float* a,
3047                            lapack_int lda, lapack_complex_float* af,
3048                            lapack_int ldaf, char* equed, float* s,
3049                            lapack_complex_float* b, lapack_int ldb,
3050                            lapack_complex_float* x, lapack_int ldx,
3051                            float* rcond, float* ferr, float* berr );
3052 lapack_int LAPACKE_zposvx( int matrix_layout, char fact, char uplo, lapack_int n,
3053                            lapack_int nrhs, lapack_complex_double* a,
3054                            lapack_int lda, lapack_complex_double* af,
3055                            lapack_int ldaf, char* equed, double* s,
3056                            lapack_complex_double* b, lapack_int ldb,
3057                            lapack_complex_double* x, lapack_int ldx,
3058                            double* rcond, double* ferr, double* berr );
3059
3060 lapack_int LAPACKE_sposvxx( int matrix_layout, char fact, char uplo,
3061                             lapack_int n, lapack_int nrhs, float* a,
3062                             lapack_int lda, float* af, lapack_int ldaf,
3063                             char* equed, float* s, float* b, lapack_int ldb,
3064                             float* x, lapack_int ldx, float* rcond,
3065                             float* rpvgrw, float* berr, lapack_int n_err_bnds,
3066                             float* err_bnds_norm, float* err_bnds_comp,
3067                             lapack_int nparams, float* params );
3068 lapack_int LAPACKE_dposvxx( int matrix_layout, char fact, char uplo,
3069                             lapack_int n, lapack_int nrhs, double* a,
3070                             lapack_int lda, double* af, lapack_int ldaf,
3071                             char* equed, double* s, double* b, lapack_int ldb,
3072                             double* x, lapack_int ldx, double* rcond,
3073                             double* rpvgrw, double* berr, lapack_int n_err_bnds,
3074                             double* err_bnds_norm, double* err_bnds_comp,
3075                             lapack_int nparams, double* params );
3076 lapack_int LAPACKE_cposvxx( int matrix_layout, char fact, char uplo,
3077                             lapack_int n, lapack_int nrhs,
3078                             lapack_complex_float* a, lapack_int lda,
3079                             lapack_complex_float* af, lapack_int ldaf,
3080                             char* equed, float* s, lapack_complex_float* b,
3081                             lapack_int ldb, lapack_complex_float* x,
3082                             lapack_int ldx, float* rcond, float* rpvgrw,
3083                             float* berr, lapack_int n_err_bnds,
3084                             float* err_bnds_norm, float* err_bnds_comp,
3085                             lapack_int nparams, float* params );
3086 lapack_int LAPACKE_zposvxx( int matrix_layout, char fact, char uplo,
3087                             lapack_int n, lapack_int nrhs,
3088                             lapack_complex_double* a, lapack_int lda,
3089                             lapack_complex_double* af, lapack_int ldaf,
3090                             char* equed, double* s, lapack_complex_double* b,
3091                             lapack_int ldb, lapack_complex_double* x,
3092                             lapack_int ldx, double* rcond, double* rpvgrw,
3093                             double* berr, lapack_int n_err_bnds,
3094                             double* err_bnds_norm, double* err_bnds_comp,
3095                             lapack_int nparams, double* params );
3096
3097 lapack_int LAPACKE_spotrf2( int matrix_layout, char uplo, lapack_int n, float* a,
3098                            lapack_int lda );
3099 lapack_int LAPACKE_dpotrf2( int matrix_layout, char uplo, lapack_int n, double* a,
3100                            lapack_int lda );
3101 lapack_int LAPACKE_cpotrf2( int matrix_layout, char uplo, lapack_int n,
3102                            lapack_complex_float* a, lapack_int lda );
3103 lapack_int LAPACKE_zpotrf2( int matrix_layout, char uplo, lapack_int n,
3104                            lapack_complex_double* a, lapack_int lda );
3105
3106 lapack_int LAPACKE_spotrf( int matrix_layout, char uplo, lapack_int n, float* a,
3107                            lapack_int lda );
3108 lapack_int LAPACKE_dpotrf( int matrix_layout, char uplo, lapack_int n, double* a,
3109                            lapack_int lda );
3110 lapack_int LAPACKE_cpotrf( int matrix_layout, char uplo, lapack_int n,
3111                            lapack_complex_float* a, lapack_int lda );
3112 lapack_int LAPACKE_zpotrf( int matrix_layout, char uplo, lapack_int n,
3113                            lapack_complex_double* a, lapack_int lda );
3114
3115 lapack_int LAPACKE_spotri( int matrix_layout, char uplo, lapack_int n, float* a,
3116                            lapack_int lda );
3117 lapack_int LAPACKE_dpotri( int matrix_layout, char uplo, lapack_int n, double* a,
3118                            lapack_int lda );
3119 lapack_int LAPACKE_cpotri( int matrix_layout, char uplo, lapack_int n,
3120                            lapack_complex_float* a, lapack_int lda );
3121 lapack_int LAPACKE_zpotri( int matrix_layout, char uplo, lapack_int n,
3122                            lapack_complex_double* a, lapack_int lda );
3123
3124 lapack_int LAPACKE_spotrs( int matrix_layout, char uplo, lapack_int n,
3125                            lapack_int nrhs, const float* a, lapack_int lda,
3126                            float* b, lapack_int ldb );
3127 lapack_int LAPACKE_dpotrs( int matrix_layout, char uplo, lapack_int n,
3128                            lapack_int nrhs, const double* a, lapack_int lda,
3129                            double* b, lapack_int ldb );
3130 lapack_int LAPACKE_cpotrs( int matrix_layout, char uplo, lapack_int n,
3131                            lapack_int nrhs, const lapack_complex_float* a,
3132                            lapack_int lda, lapack_complex_float* b,
3133                            lapack_int ldb );
3134 lapack_int LAPACKE_zpotrs( int matrix_layout, char uplo, lapack_int n,
3135                            lapack_int nrhs, const lapack_complex_double* a,
3136                            lapack_int lda, lapack_complex_double* b,
3137                            lapack_int ldb );
3138
3139 lapack_int LAPACKE_sppcon( int matrix_layout, char uplo, lapack_int n,
3140                            const float* ap, float anorm, float* rcond );
3141 lapack_int LAPACKE_dppcon( int matrix_layout, char uplo, lapack_int n,
3142                            const double* ap, double anorm, double* rcond );
3143 lapack_int LAPACKE_cppcon( int matrix_layout, char uplo, lapack_int n,
3144                            const lapack_complex_float* ap, float anorm,
3145                            float* rcond );
3146 lapack_int LAPACKE_zppcon( int matrix_layout, char uplo, lapack_int n,
3147                            const lapack_complex_double* ap, double anorm,
3148                            double* rcond );
3149
3150 lapack_int LAPACKE_sppequ( int matrix_layout, char uplo, lapack_int n,
3151                            const float* ap, float* s, float* scond,
3152                            float* amax );
3153 lapack_int LAPACKE_dppequ( int matrix_layout, char uplo, lapack_int n,
3154                            const double* ap, double* s, double* scond,
3155                            double* amax );
3156 lapack_int LAPACKE_cppequ( int matrix_layout, char uplo, lapack_int n,
3157                            const lapack_complex_float* ap, float* s,
3158                            float* scond, float* amax );
3159 lapack_int LAPACKE_zppequ( int matrix_layout, char uplo, lapack_int n,
3160                            const lapack_complex_double* ap, double* s,
3161                            double* scond, double* amax );
3162
3163 lapack_int LAPACKE_spprfs( int matrix_layout, char uplo, lapack_int n,
3164                            lapack_int nrhs, const float* ap, const float* afp,
3165                            const float* b, lapack_int ldb, float* x,
3166                            lapack_int ldx, float* ferr, float* berr );
3167 lapack_int LAPACKE_dpprfs( int matrix_layout, char uplo, lapack_int n,
3168                            lapack_int nrhs, const double* ap, const double* afp,
3169                            const double* b, lapack_int ldb, double* x,
3170                            lapack_int ldx, double* ferr, double* berr );
3171 lapack_int LAPACKE_cpprfs( int matrix_layout, char uplo, lapack_int n,
3172                            lapack_int nrhs, const lapack_complex_float* ap,
3173                            const lapack_complex_float* afp,
3174                            const lapack_complex_float* b, lapack_int ldb,
3175                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3176                            float* berr );
3177 lapack_int LAPACKE_zpprfs( int matrix_layout, char uplo, lapack_int n,
3178                            lapack_int nrhs, const lapack_complex_double* ap,
3179                            const lapack_complex_double* afp,
3180                            const lapack_complex_double* b, lapack_int ldb,
3181                            lapack_complex_double* x, lapack_int ldx,
3182                            double* ferr, double* berr );
3183
3184 lapack_int LAPACKE_sppsv( int matrix_layout, char uplo, lapack_int n,
3185                           lapack_int nrhs, float* ap, float* b,
3186                           lapack_int ldb );
3187 lapack_int LAPACKE_dppsv( int matrix_layout, char uplo, lapack_int n,
3188                           lapack_int nrhs, double* ap, double* b,
3189                           lapack_int ldb );
3190 lapack_int LAPACKE_cppsv( int matrix_layout, char uplo, lapack_int n,
3191                           lapack_int nrhs, lapack_complex_float* ap,
3192                           lapack_complex_float* b, lapack_int ldb );
3193 lapack_int LAPACKE_zppsv( int matrix_layout, char uplo, lapack_int n,
3194                           lapack_int nrhs, lapack_complex_double* ap,
3195                           lapack_complex_double* b, lapack_int ldb );
3196
3197 lapack_int LAPACKE_sppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3198                            lapack_int nrhs, float* ap, float* afp, char* equed,
3199                            float* s, float* b, lapack_int ldb, float* x,
3200                            lapack_int ldx, float* rcond, float* ferr,
3201                            float* berr );
3202 lapack_int LAPACKE_dppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3203                            lapack_int nrhs, double* ap, double* afp,
3204                            char* equed, double* s, double* b, lapack_int ldb,
3205                            double* x, lapack_int ldx, double* rcond,
3206                            double* ferr, double* berr );
3207 lapack_int LAPACKE_cppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3208                            lapack_int nrhs, lapack_complex_float* ap,
3209                            lapack_complex_float* afp, char* equed, float* s,
3210                            lapack_complex_float* b, lapack_int ldb,
3211                            lapack_complex_float* x, lapack_int ldx,
3212                            float* rcond, float* ferr, float* berr );
3213 lapack_int LAPACKE_zppsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3214                            lapack_int nrhs, lapack_complex_double* ap,
3215                            lapack_complex_double* afp, char* equed, double* s,
3216                            lapack_complex_double* b, lapack_int ldb,
3217                            lapack_complex_double* x, lapack_int ldx,
3218                            double* rcond, double* ferr, double* berr );
3219
3220 lapack_int LAPACKE_spptrf( int matrix_layout, char uplo, lapack_int n,
3221                            float* ap );
3222 lapack_int LAPACKE_dpptrf( int matrix_layout, char uplo, lapack_int n,
3223                            double* ap );
3224 lapack_int LAPACKE_cpptrf( int matrix_layout, char uplo, lapack_int n,
3225                            lapack_complex_float* ap );
3226 lapack_int LAPACKE_zpptrf( int matrix_layout, char uplo, lapack_int n,
3227                            lapack_complex_double* ap );
3228
3229 lapack_int LAPACKE_spptri( int matrix_layout, char uplo, lapack_int n,
3230                            float* ap );
3231 lapack_int LAPACKE_dpptri( int matrix_layout, char uplo, lapack_int n,
3232                            double* ap );
3233 lapack_int LAPACKE_cpptri( int matrix_layout, char uplo, lapack_int n,
3234                            lapack_complex_float* ap );
3235 lapack_int LAPACKE_zpptri( int matrix_layout, char uplo, lapack_int n,
3236                            lapack_complex_double* ap );
3237
3238 lapack_int LAPACKE_spptrs( int matrix_layout, char uplo, lapack_int n,
3239                            lapack_int nrhs, const float* ap, float* b,
3240                            lapack_int ldb );
3241 lapack_int LAPACKE_dpptrs( int matrix_layout, char uplo, lapack_int n,
3242                            lapack_int nrhs, const double* ap, double* b,
3243                            lapack_int ldb );
3244 lapack_int LAPACKE_cpptrs( int matrix_layout, char uplo, lapack_int n,
3245                            lapack_int nrhs, const lapack_complex_float* ap,
3246                            lapack_complex_float* b, lapack_int ldb );
3247 lapack_int LAPACKE_zpptrs( int matrix_layout, char uplo, lapack_int n,
3248                            lapack_int nrhs, const lapack_complex_double* ap,
3249                            lapack_complex_double* b, lapack_int ldb );
3250
3251 lapack_int LAPACKE_spstrf( int matrix_layout, char uplo, lapack_int n, float* a,
3252                            lapack_int lda, lapack_int* piv, lapack_int* rank,
3253                            float tol );
3254 lapack_int LAPACKE_dpstrf( int matrix_layout, char uplo, lapack_int n, double* a,
3255                            lapack_int lda, lapack_int* piv, lapack_int* rank,
3256                            double tol );
3257 lapack_int LAPACKE_cpstrf( int matrix_layout, char uplo, lapack_int n,
3258                            lapack_complex_float* a, lapack_int lda,
3259                            lapack_int* piv, lapack_int* rank, float tol );
3260 lapack_int LAPACKE_zpstrf( int matrix_layout, char uplo, lapack_int n,
3261                            lapack_complex_double* a, lapack_int lda,
3262                            lapack_int* piv, lapack_int* rank, double tol );
3263
3264 lapack_int LAPACKE_sptcon( lapack_int n, const float* d, const float* e,
3265                            float anorm, float* rcond );
3266 lapack_int LAPACKE_dptcon( lapack_int n, const double* d, const double* e,
3267                            double anorm, double* rcond );
3268 lapack_int LAPACKE_cptcon( lapack_int n, const float* d,
3269                            const lapack_complex_float* e, float anorm,
3270                            float* rcond );
3271 lapack_int LAPACKE_zptcon( lapack_int n, const double* d,
3272                            const lapack_complex_double* e, double anorm,
3273                            double* rcond );
3274
3275 lapack_int LAPACKE_spteqr( int matrix_layout, char compz, lapack_int n, float* d,
3276                            float* e, float* z, lapack_int ldz );
3277 lapack_int LAPACKE_dpteqr( int matrix_layout, char compz, lapack_int n,
3278                            double* d, double* e, double* z, lapack_int ldz );
3279 lapack_int LAPACKE_cpteqr( int matrix_layout, char compz, lapack_int n, float* d,
3280                            float* e, lapack_complex_float* z, lapack_int ldz );
3281 lapack_int LAPACKE_zpteqr( int matrix_layout, char compz, lapack_int n,
3282                            double* d, double* e, lapack_complex_double* z,
3283                            lapack_int ldz );
3284
3285 lapack_int LAPACKE_sptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
3286                            const float* d, const float* e, const float* df,
3287                            const float* ef, const float* b, lapack_int ldb,
3288                            float* x, lapack_int ldx, float* ferr, float* berr );
3289 lapack_int LAPACKE_dptrfs( int matrix_layout, lapack_int n, lapack_int nrhs,
3290                            const double* d, const double* e, const double* df,
3291                            const double* ef, const double* b, lapack_int ldb,
3292                            double* x, lapack_int ldx, double* ferr,
3293                            double* berr );
3294 lapack_int LAPACKE_cptrfs( int matrix_layout, char uplo, lapack_int n,
3295                            lapack_int nrhs, const float* d,
3296                            const lapack_complex_float* e, const float* df,
3297                            const lapack_complex_float* ef,
3298                            const lapack_complex_float* b, lapack_int ldb,
3299                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3300                            float* berr );
3301 lapack_int LAPACKE_zptrfs( int matrix_layout, char uplo, lapack_int n,
3302                            lapack_int nrhs, const double* d,
3303                            const lapack_complex_double* e, const double* df,
3304                            const lapack_complex_double* ef,
3305                            const lapack_complex_double* b, lapack_int ldb,
3306                            lapack_complex_double* x, lapack_int ldx,
3307                            double* ferr, double* berr );
3308
3309 lapack_int LAPACKE_sptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3310                           float* d, float* e, float* b, lapack_int ldb );
3311 lapack_int LAPACKE_dptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3312                           double* d, double* e, double* b, lapack_int ldb );
3313 lapack_int LAPACKE_cptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3314                           float* d, lapack_complex_float* e,
3315                           lapack_complex_float* b, lapack_int ldb );
3316 lapack_int LAPACKE_zptsv( int matrix_layout, lapack_int n, lapack_int nrhs,
3317                           double* d, lapack_complex_double* e,
3318                           lapack_complex_double* b, lapack_int ldb );
3319
3320 lapack_int LAPACKE_sptsvx( int matrix_layout, char fact, lapack_int n,
3321                            lapack_int nrhs, const float* d, const float* e,
3322                            float* df, float* ef, const float* b, lapack_int ldb,
3323                            float* x, lapack_int ldx, float* rcond, float* ferr,
3324                            float* berr );
3325 lapack_int LAPACKE_dptsvx( int matrix_layout, char fact, lapack_int n,
3326                            lapack_int nrhs, const double* d, const double* e,
3327                            double* df, double* ef, const double* b,
3328                            lapack_int ldb, double* x, lapack_int ldx,
3329                            double* rcond, double* ferr, double* berr );
3330 lapack_int LAPACKE_cptsvx( int matrix_layout, char fact, lapack_int n,
3331                            lapack_int nrhs, const float* d,
3332                            const lapack_complex_float* e, float* df,
3333                            lapack_complex_float* ef,
3334                            const lapack_complex_float* b, lapack_int ldb,
3335                            lapack_complex_float* x, lapack_int ldx,
3336                            float* rcond, float* ferr, float* berr );
3337 lapack_int LAPACKE_zptsvx( int matrix_layout, char fact, lapack_int n,
3338                            lapack_int nrhs, const double* d,
3339                            const lapack_complex_double* e, double* df,
3340                            lapack_complex_double* ef,
3341                            const lapack_complex_double* b, lapack_int ldb,
3342                            lapack_complex_double* x, lapack_int ldx,
3343                            double* rcond, double* ferr, double* berr );
3344
3345 lapack_int LAPACKE_spttrf( lapack_int n, float* d, float* e );
3346 lapack_int LAPACKE_dpttrf( lapack_int n, double* d, double* e );
3347 lapack_int LAPACKE_cpttrf( lapack_int n, float* d, lapack_complex_float* e );
3348 lapack_int LAPACKE_zpttrf( lapack_int n, double* d, lapack_complex_double* e );
3349
3350 lapack_int LAPACKE_spttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
3351                            const float* d, const float* e, float* b,
3352                            lapack_int ldb );
3353 lapack_int LAPACKE_dpttrs( int matrix_layout, lapack_int n, lapack_int nrhs,
3354                            const double* d, const double* e, double* b,
3355                            lapack_int ldb );
3356 lapack_int LAPACKE_cpttrs( int matrix_layout, char uplo, lapack_int n,
3357                            lapack_int nrhs, const float* d,
3358                            const lapack_complex_float* e,
3359                            lapack_complex_float* b, lapack_int ldb );
3360 lapack_int LAPACKE_zpttrs( int matrix_layout, char uplo, lapack_int n,
3361                            lapack_int nrhs, const double* d,
3362                            const lapack_complex_double* e,
3363                            lapack_complex_double* b, lapack_int ldb );
3364
3365 lapack_int LAPACKE_ssbev( int matrix_layout, char jobz, char uplo, lapack_int n,
3366                           lapack_int kd, float* ab, lapack_int ldab, float* w,
3367                           float* z, lapack_int ldz );
3368 lapack_int LAPACKE_dsbev( int matrix_layout, char jobz, char uplo, lapack_int n,
3369                           lapack_int kd, double* ab, lapack_int ldab, double* w,
3370                           double* z, lapack_int ldz );
3371
3372 lapack_int LAPACKE_ssbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3373                            lapack_int kd, float* ab, lapack_int ldab, float* w,
3374                            float* z, lapack_int ldz );
3375 lapack_int LAPACKE_dsbevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3376                            lapack_int kd, double* ab, lapack_int ldab,
3377                            double* w, double* z, lapack_int ldz );
3378
3379 lapack_int LAPACKE_ssbevx( int matrix_layout, char jobz, char range, char uplo,
3380                            lapack_int n, lapack_int kd, float* ab,
3381                            lapack_int ldab, float* q, lapack_int ldq, float vl,
3382                            float vu, lapack_int il, lapack_int iu, float abstol,
3383                            lapack_int* m, float* w, float* z, lapack_int ldz,
3384                            lapack_int* ifail );
3385 lapack_int LAPACKE_dsbevx( int matrix_layout, char jobz, char range, char uplo,
3386                            lapack_int n, lapack_int kd, double* ab,
3387                            lapack_int ldab, double* q, lapack_int ldq,
3388                            double vl, double vu, lapack_int il, lapack_int iu,
3389                            double abstol, lapack_int* m, double* w, double* z,
3390                            lapack_int ldz, lapack_int* ifail );
3391
3392 lapack_int LAPACKE_ssbgst( int matrix_layout, char vect, char uplo, lapack_int n,
3393                            lapack_int ka, lapack_int kb, float* ab,
3394                            lapack_int ldab, const float* bb, lapack_int ldbb,
3395                            float* x, lapack_int ldx );
3396 lapack_int LAPACKE_dsbgst( int matrix_layout, char vect, char uplo, lapack_int n,
3397                            lapack_int ka, lapack_int kb, double* ab,
3398                            lapack_int ldab, const double* bb, lapack_int ldbb,
3399                            double* x, lapack_int ldx );
3400
3401 lapack_int LAPACKE_ssbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
3402                           lapack_int ka, lapack_int kb, float* ab,
3403                           lapack_int ldab, float* bb, lapack_int ldbb, float* w,
3404                           float* z, lapack_int ldz );
3405 lapack_int LAPACKE_dsbgv( int matrix_layout, char jobz, char uplo, lapack_int n,
3406                           lapack_int ka, lapack_int kb, double* ab,
3407                           lapack_int ldab, double* bb, lapack_int ldbb,
3408                           double* w, double* z, lapack_int ldz );
3409
3410 lapack_int LAPACKE_ssbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
3411                            lapack_int ka, lapack_int kb, float* ab,
3412                            lapack_int ldab, float* bb, lapack_int ldbb,
3413                            float* w, float* z, lapack_int ldz );
3414 lapack_int LAPACKE_dsbgvd( int matrix_layout, char jobz, char uplo, lapack_int n,
3415                            lapack_int ka, lapack_int kb, double* ab,
3416                            lapack_int ldab, double* bb, lapack_int ldbb,
3417                            double* w, double* z, lapack_int ldz );
3418
3419 lapack_int LAPACKE_ssbgvx( int matrix_layout, char jobz, char range, char uplo,
3420                            lapack_int n, lapack_int ka, lapack_int kb,
3421                            float* ab, lapack_int ldab, float* bb,
3422                            lapack_int ldbb, float* q, lapack_int ldq, float vl,
3423                            float vu, lapack_int il, lapack_int iu, float abstol,
3424                            lapack_int* m, float* w, float* z, lapack_int ldz,
3425                            lapack_int* ifail );
3426 lapack_int LAPACKE_dsbgvx( int matrix_layout, char jobz, char range, char uplo,
3427                            lapack_int n, lapack_int ka, lapack_int kb,
3428                            double* ab, lapack_int ldab, double* bb,
3429                            lapack_int ldbb, double* q, lapack_int ldq,
3430                            double vl, double vu, lapack_int il, lapack_int iu,
3431                            double abstol, lapack_int* m, double* w, double* z,
3432                            lapack_int ldz, lapack_int* ifail );
3433
3434 lapack_int LAPACKE_ssbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
3435                            lapack_int kd, float* ab, lapack_int ldab, float* d,
3436                            float* e, float* q, lapack_int ldq );
3437 lapack_int LAPACKE_dsbtrd( int matrix_layout, char vect, char uplo, lapack_int n,
3438                            lapack_int kd, double* ab, lapack_int ldab,
3439                            double* d, double* e, double* q, lapack_int ldq );
3440
3441 lapack_int LAPACKE_ssfrk( int matrix_layout, char transr, char uplo, char trans,
3442                           lapack_int n, lapack_int k, float alpha,
3443                           const float* a, lapack_int lda, float beta,
3444                           float* c );
3445 lapack_int LAPACKE_dsfrk( int matrix_layout, char transr, char uplo, char trans,
3446                           lapack_int n, lapack_int k, double alpha,
3447                           const double* a, lapack_int lda, double beta,
3448                           double* c );
3449
3450 lapack_int LAPACKE_sspcon( int matrix_layout, char uplo, lapack_int n,
3451                            const float* ap, const lapack_int* ipiv, float anorm,
3452                            float* rcond );
3453 lapack_int LAPACKE_dspcon( int matrix_layout, char uplo, lapack_int n,
3454                            const double* ap, const lapack_int* ipiv,
3455                            double anorm, double* rcond );
3456 lapack_int LAPACKE_cspcon( int matrix_layout, char uplo, lapack_int n,
3457                            const lapack_complex_float* ap,
3458                            const lapack_int* ipiv, float anorm, float* rcond );
3459 lapack_int LAPACKE_zspcon( int matrix_layout, char uplo, lapack_int n,
3460                            const lapack_complex_double* ap,
3461                            const lapack_int* ipiv, double anorm,
3462                            double* rcond );
3463
3464 lapack_int LAPACKE_sspev( int matrix_layout, char jobz, char uplo, lapack_int n,
3465                           float* ap, float* w, float* z, lapack_int ldz );
3466 lapack_int LAPACKE_dspev( int matrix_layout, char jobz, char uplo, lapack_int n,
3467                           double* ap, double* w, double* z, lapack_int ldz );
3468
3469 lapack_int LAPACKE_sspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3470                            float* ap, float* w, float* z, lapack_int ldz );
3471 lapack_int LAPACKE_dspevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3472                            double* ap, double* w, double* z, lapack_int ldz );
3473
3474 lapack_int LAPACKE_sspevx( int matrix_layout, char jobz, char range, char uplo,
3475                            lapack_int n, float* ap, float vl, float vu,
3476                            lapack_int il, lapack_int iu, float abstol,
3477                            lapack_int* m, float* w, float* z, lapack_int ldz,
3478                            lapack_int* ifail );
3479 lapack_int LAPACKE_dspevx( int matrix_layout, char jobz, char range, char uplo,
3480                            lapack_int n, double* ap, double vl, double vu,
3481                            lapack_int il, lapack_int iu, double abstol,
3482                            lapack_int* m, double* w, double* z, lapack_int ldz,
3483                            lapack_int* ifail );
3484
3485 lapack_int LAPACKE_sspgst( int matrix_layout, lapack_int itype, char uplo,
3486                            lapack_int n, float* ap, const float* bp );
3487 lapack_int LAPACKE_dspgst( int matrix_layout, lapack_int itype, char uplo,
3488                            lapack_int n, double* ap, const double* bp );
3489
3490 lapack_int LAPACKE_sspgv( int matrix_layout, lapack_int itype, char jobz,
3491                           char uplo, lapack_int n, float* ap, float* bp,
3492                           float* w, float* z, lapack_int ldz );
3493 lapack_int LAPACKE_dspgv( int matrix_layout, lapack_int itype, char jobz,
3494                           char uplo, lapack_int n, double* ap, double* bp,
3495                           double* w, double* z, lapack_int ldz );
3496
3497 lapack_int LAPACKE_sspgvd( int matrix_layout, lapack_int itype, char jobz,
3498                            char uplo, lapack_int n, float* ap, float* bp,
3499                            float* w, float* z, lapack_int ldz );
3500 lapack_int LAPACKE_dspgvd( int matrix_layout, lapack_int itype, char jobz,
3501                            char uplo, lapack_int n, double* ap, double* bp,
3502                            double* w, double* z, lapack_int ldz );
3503
3504 lapack_int LAPACKE_sspgvx( int matrix_layout, lapack_int itype, char jobz,
3505                            char range, char uplo, lapack_int n, float* ap,
3506                            float* bp, float vl, float vu, lapack_int il,
3507                            lapack_int iu, float abstol, lapack_int* m, float* w,
3508                            float* z, lapack_int ldz, lapack_int* ifail );
3509 lapack_int LAPACKE_dspgvx( int matrix_layout, lapack_int itype, char jobz,
3510                            char range, char uplo, lapack_int n, double* ap,
3511                            double* bp, double vl, double vu, lapack_int il,
3512                            lapack_int iu, double abstol, lapack_int* m,
3513                            double* w, double* z, lapack_int ldz,
3514                            lapack_int* ifail );
3515
3516 lapack_int LAPACKE_ssprfs( int matrix_layout, char uplo, lapack_int n,
3517                            lapack_int nrhs, const float* ap, const float* afp,
3518                            const lapack_int* ipiv, const float* b,
3519                            lapack_int ldb, float* x, lapack_int ldx,
3520                            float* ferr, float* berr );
3521 lapack_int LAPACKE_dsprfs( int matrix_layout, char uplo, lapack_int n,
3522                            lapack_int nrhs, const double* ap, const double* afp,
3523                            const lapack_int* ipiv, const double* b,
3524                            lapack_int ldb, double* x, lapack_int ldx,
3525                            double* ferr, double* berr );
3526 lapack_int LAPACKE_csprfs( int matrix_layout, char uplo, lapack_int n,
3527                            lapack_int nrhs, const lapack_complex_float* ap,
3528                            const lapack_complex_float* afp,
3529                            const lapack_int* ipiv,
3530                            const lapack_complex_float* b, lapack_int ldb,
3531                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3532                            float* berr );
3533 lapack_int LAPACKE_zsprfs( int matrix_layout, char uplo, lapack_int n,
3534                            lapack_int nrhs, const lapack_complex_double* ap,
3535                            const lapack_complex_double* afp,
3536                            const lapack_int* ipiv,
3537                            const lapack_complex_double* b, lapack_int ldb,
3538                            lapack_complex_double* x, lapack_int ldx,
3539                            double* ferr, double* berr );
3540
3541 lapack_int LAPACKE_sspsv( int matrix_layout, char uplo, lapack_int n,
3542                           lapack_int nrhs, float* ap, lapack_int* ipiv,
3543                           float* b, lapack_int ldb );
3544 lapack_int LAPACKE_dspsv( int matrix_layout, char uplo, lapack_int n,
3545                           lapack_int nrhs, double* ap, lapack_int* ipiv,
3546                           double* b, lapack_int ldb );
3547 lapack_int LAPACKE_cspsv( int matrix_layout, char uplo, lapack_int n,
3548                           lapack_int nrhs, lapack_complex_float* ap,
3549                           lapack_int* ipiv, lapack_complex_float* b,
3550                           lapack_int ldb );
3551 lapack_int LAPACKE_zspsv( int matrix_layout, char uplo, lapack_int n,
3552                           lapack_int nrhs, lapack_complex_double* ap,
3553                           lapack_int* ipiv, lapack_complex_double* b,
3554                           lapack_int ldb );
3555
3556 lapack_int LAPACKE_sspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3557                            lapack_int nrhs, const float* ap, float* afp,
3558                            lapack_int* ipiv, const float* b, lapack_int ldb,
3559                            float* x, lapack_int ldx, float* rcond, float* ferr,
3560                            float* berr );
3561 lapack_int LAPACKE_dspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3562                            lapack_int nrhs, const double* ap, double* afp,
3563                            lapack_int* ipiv, const double* b, lapack_int ldb,
3564                            double* x, lapack_int ldx, double* rcond,
3565                            double* ferr, double* berr );
3566 lapack_int LAPACKE_cspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3567                            lapack_int nrhs, const lapack_complex_float* ap,
3568                            lapack_complex_float* afp, lapack_int* ipiv,
3569                            const lapack_complex_float* b, lapack_int ldb,
3570                            lapack_complex_float* x, lapack_int ldx,
3571                            float* rcond, float* ferr, float* berr );
3572 lapack_int LAPACKE_zspsvx( int matrix_layout, char fact, char uplo, lapack_int n,
3573                            lapack_int nrhs, const lapack_complex_double* ap,
3574                            lapack_complex_double* afp, lapack_int* ipiv,
3575                            const lapack_complex_double* b, lapack_int ldb,
3576                            lapack_complex_double* x, lapack_int ldx,
3577                            double* rcond, double* ferr, double* berr );
3578
3579 lapack_int LAPACKE_ssptrd( int matrix_layout, char uplo, lapack_int n, float* ap,
3580                            float* d, float* e, float* tau );
3581 lapack_int LAPACKE_dsptrd( int matrix_layout, char uplo, lapack_int n,
3582                            double* ap, double* d, double* e, double* tau );
3583
3584 lapack_int LAPACKE_ssptrf( int matrix_layout, char uplo, lapack_int n, float* ap,
3585                            lapack_int* ipiv );
3586 lapack_int LAPACKE_dsptrf( int matrix_layout, char uplo, lapack_int n,
3587                            double* ap, lapack_int* ipiv );
3588 lapack_int LAPACKE_csptrf( int matrix_layout, char uplo, lapack_int n,
3589                            lapack_complex_float* ap, lapack_int* ipiv );
3590 lapack_int LAPACKE_zsptrf( int matrix_layout, char uplo, lapack_int n,
3591                            lapack_complex_double* ap, lapack_int* ipiv );
3592
3593 lapack_int LAPACKE_ssptri( int matrix_layout, char uplo, lapack_int n, float* ap,
3594                            const lapack_int* ipiv );
3595 lapack_int LAPACKE_dsptri( int matrix_layout, char uplo, lapack_int n,
3596                            double* ap, const lapack_int* ipiv );
3597 lapack_int LAPACKE_csptri( int matrix_layout, char uplo, lapack_int n,
3598                            lapack_complex_float* ap, const lapack_int* ipiv );
3599 lapack_int LAPACKE_zsptri( int matrix_layout, char uplo, lapack_int n,
3600                            lapack_complex_double* ap, const lapack_int* ipiv );
3601
3602 lapack_int LAPACKE_ssptrs( int matrix_layout, char uplo, lapack_int n,
3603                            lapack_int nrhs, const float* ap,
3604                            const lapack_int* ipiv, float* b, lapack_int ldb );
3605 lapack_int LAPACKE_dsptrs( int matrix_layout, char uplo, lapack_int n,
3606                            lapack_int nrhs, const double* ap,
3607                            const lapack_int* ipiv, double* b, lapack_int ldb );
3608 lapack_int LAPACKE_csptrs( int matrix_layout, char uplo, lapack_int n,
3609                            lapack_int nrhs, const lapack_complex_float* ap,
3610                            const lapack_int* ipiv, lapack_complex_float* b,
3611                            lapack_int ldb );
3612 lapack_int LAPACKE_zsptrs( int matrix_layout, char uplo, lapack_int n,
3613                            lapack_int nrhs, const lapack_complex_double* ap,
3614                            const lapack_int* ipiv, lapack_complex_double* b,
3615                            lapack_int ldb );
3616
3617 lapack_int LAPACKE_sstebz( char range, char order, lapack_int n, float vl,
3618                            float vu, lapack_int il, lapack_int iu, float abstol,
3619                            const float* d, const float* e, lapack_int* m,
3620                            lapack_int* nsplit, float* w, lapack_int* iblock,
3621                            lapack_int* isplit );
3622 lapack_int LAPACKE_dstebz( char range, char order, lapack_int n, double vl,
3623                            double vu, lapack_int il, lapack_int iu,
3624                            double abstol, const double* d, const double* e,
3625                            lapack_int* m, lapack_int* nsplit, double* w,
3626                            lapack_int* iblock, lapack_int* isplit );
3627
3628 lapack_int LAPACKE_sstedc( int matrix_layout, char compz, lapack_int n, float* d,
3629                            float* e, float* z, lapack_int ldz );
3630 lapack_int LAPACKE_dstedc( int matrix_layout, char compz, lapack_int n,
3631                            double* d, double* e, double* z, lapack_int ldz );
3632 lapack_int LAPACKE_cstedc( int matrix_layout, char compz, lapack_int n, float* d,
3633                            float* e, lapack_complex_float* z, lapack_int ldz );
3634 lapack_int LAPACKE_zstedc( int matrix_layout, char compz, lapack_int n,
3635                            double* d, double* e, lapack_complex_double* z,
3636                            lapack_int ldz );
3637
3638 lapack_int LAPACKE_sstegr( int matrix_layout, char jobz, char range,
3639                            lapack_int n, float* d, float* e, float vl, float vu,
3640                            lapack_int il, lapack_int iu, float abstol,
3641                            lapack_int* m, float* w, float* z, lapack_int ldz,
3642                            lapack_int* isuppz );
3643 lapack_int LAPACKE_dstegr( int matrix_layout, char jobz, char range,
3644                            lapack_int n, double* d, double* e, double vl,
3645                            double vu, lapack_int il, lapack_int iu,
3646                            double abstol, lapack_int* m, double* w, double* z,
3647                            lapack_int ldz, lapack_int* isuppz );
3648 lapack_int LAPACKE_cstegr( int matrix_layout, char jobz, char range,
3649                            lapack_int n, float* d, float* e, float vl, float vu,
3650                            lapack_int il, lapack_int iu, float abstol,
3651                            lapack_int* m, float* w, lapack_complex_float* z,
3652                            lapack_int ldz, lapack_int* isuppz );
3653 lapack_int LAPACKE_zstegr( int matrix_layout, char jobz, char range,
3654                            lapack_int n, double* d, double* e, double vl,
3655                            double vu, lapack_int il, lapack_int iu,
3656                            double abstol, lapack_int* m, double* w,
3657                            lapack_complex_double* z, lapack_int ldz,
3658                            lapack_int* isuppz );
3659
3660 lapack_int LAPACKE_sstein( int matrix_layout, lapack_int n, const float* d,
3661                            const float* e, lapack_int m, const float* w,
3662                            const lapack_int* iblock, const lapack_int* isplit,
3663                            float* z, lapack_int ldz, lapack_int* ifailv );
3664 lapack_int LAPACKE_dstein( int matrix_layout, lapack_int n, const double* d,
3665                            const double* e, lapack_int m, const double* w,
3666                            const lapack_int* iblock, const lapack_int* isplit,
3667                            double* z, lapack_int ldz, lapack_int* ifailv );
3668 lapack_int LAPACKE_cstein( int matrix_layout, lapack_int n, const float* d,
3669                            const float* e, lapack_int m, const float* w,
3670                            const lapack_int* iblock, const lapack_int* isplit,
3671                            lapack_complex_float* z, lapack_int ldz,
3672                            lapack_int* ifailv );
3673 lapack_int LAPACKE_zstein( int matrix_layout, lapack_int n, const double* d,
3674                            const double* e, lapack_int m, const double* w,
3675                            const lapack_int* iblock, const lapack_int* isplit,
3676                            lapack_complex_double* z, lapack_int ldz,
3677                            lapack_int* ifailv );
3678
3679 lapack_int LAPACKE_sstemr( int matrix_layout, char jobz, char range,
3680                            lapack_int n, float* d, float* e, float vl, float vu,
3681                            lapack_int il, lapack_int iu, lapack_int* m,
3682                            float* w, float* z, lapack_int ldz, lapack_int nzc,
3683                            lapack_int* isuppz, lapack_logical* tryrac );
3684 lapack_int LAPACKE_dstemr( int matrix_layout, char jobz, char range,
3685                            lapack_int n, double* d, double* e, double vl,
3686                            double vu, lapack_int il, lapack_int iu,
3687                            lapack_int* m, double* w, double* z, lapack_int ldz,
3688                            lapack_int nzc, lapack_int* isuppz,
3689                            lapack_logical* tryrac );
3690 lapack_int LAPACKE_cstemr( int matrix_layout, char jobz, char range,
3691                            lapack_int n, float* d, float* e, float vl, float vu,
3692                            lapack_int il, lapack_int iu, lapack_int* m,
3693                            float* w, lapack_complex_float* z, lapack_int ldz,
3694                            lapack_int nzc, lapack_int* isuppz,
3695                            lapack_logical* tryrac );
3696 lapack_int LAPACKE_zstemr( int matrix_layout, char jobz, char range,
3697                            lapack_int n, double* d, double* e, double vl,
3698                            double vu, lapack_int il, lapack_int iu,
3699                            lapack_int* m, double* w, lapack_complex_double* z,
3700                            lapack_int ldz, lapack_int nzc, lapack_int* isuppz,
3701                            lapack_logical* tryrac );
3702
3703 lapack_int LAPACKE_ssteqr( int matrix_layout, char compz, lapack_int n, float* d,
3704                            float* e, float* z, lapack_int ldz );
3705 lapack_int LAPACKE_dsteqr( int matrix_layout, char compz, lapack_int n,
3706                            double* d, double* e, double* z, lapack_int ldz );
3707 lapack_int LAPACKE_csteqr( int matrix_layout, char compz, lapack_int n, float* d,
3708                            float* e, lapack_complex_float* z, lapack_int ldz );
3709 lapack_int LAPACKE_zsteqr( int matrix_layout, char compz, lapack_int n,
3710                            double* d, double* e, lapack_complex_double* z,
3711                            lapack_int ldz );
3712
3713 lapack_int LAPACKE_ssterf( lapack_int n, float* d, float* e );
3714 lapack_int LAPACKE_dsterf( lapack_int n, double* d, double* e );
3715
3716 lapack_int LAPACKE_sstev( int matrix_layout, char jobz, lapack_int n, float* d,
3717                           float* e, float* z, lapack_int ldz );
3718 lapack_int LAPACKE_dstev( int matrix_layout, char jobz, lapack_int n, double* d,
3719                           double* e, double* z, lapack_int ldz );
3720
3721 lapack_int LAPACKE_sstevd( int matrix_layout, char jobz, lapack_int n, float* d,
3722                            float* e, float* z, lapack_int ldz );
3723 lapack_int LAPACKE_dstevd( int matrix_layout, char jobz, lapack_int n, double* d,
3724                            double* e, double* z, lapack_int ldz );
3725
3726 lapack_int LAPACKE_sstevr( int matrix_layout, char jobz, char range,
3727                            lapack_int n, float* d, float* e, float vl, float vu,
3728                            lapack_int il, lapack_int iu, float abstol,
3729                            lapack_int* m, float* w, float* z, lapack_int ldz,
3730                            lapack_int* isuppz );
3731 lapack_int LAPACKE_dstevr( int matrix_layout, char jobz, char range,
3732                            lapack_int n, double* d, double* e, double vl,
3733                            double vu, lapack_int il, lapack_int iu,
3734                            double abstol, lapack_int* m, double* w, double* z,
3735                            lapack_int ldz, lapack_int* isuppz );
3736
3737 lapack_int LAPACKE_sstevx( int matrix_layout, char jobz, char range,
3738                            lapack_int n, float* d, float* e, float vl, float vu,
3739                            lapack_int il, lapack_int iu, float abstol,
3740                            lapack_int* m, float* w, float* z, lapack_int ldz,
3741                            lapack_int* ifail );
3742 lapack_int LAPACKE_dstevx( int matrix_layout, char jobz, char range,
3743                            lapack_int n, double* d, double* e, double vl,
3744                            double vu, lapack_int il, lapack_int iu,
3745                            double abstol, lapack_int* m, double* w, double* z,
3746                            lapack_int ldz, lapack_int* ifail );
3747
3748 lapack_int LAPACKE_ssycon( int matrix_layout, char uplo, lapack_int n,
3749                            const float* a, lapack_int lda,
3750                            const lapack_int* ipiv, float anorm, float* rcond );
3751 lapack_int LAPACKE_dsycon( int matrix_layout, char uplo, lapack_int n,
3752                            const double* a, lapack_int lda,
3753                            const lapack_int* ipiv, double anorm,
3754                            double* rcond );
3755 lapack_int LAPACKE_csycon( int matrix_layout, char uplo, lapack_int n,
3756                            const lapack_complex_float* a, lapack_int lda,
3757                            const lapack_int* ipiv, float anorm, float* rcond );
3758 lapack_int LAPACKE_zsycon( int matrix_layout, char uplo, lapack_int n,
3759                            const lapack_complex_double* a, lapack_int lda,
3760                            const lapack_int* ipiv, double anorm,
3761                            double* rcond );
3762
3763 lapack_int LAPACKE_ssyequb( int matrix_layout, char uplo, lapack_int n,
3764                             const float* a, lapack_int lda, float* s,
3765                             float* scond, float* amax );
3766 lapack_int LAPACKE_dsyequb( int matrix_layout, char uplo, lapack_int n,
3767                             const double* a, lapack_int lda, double* s,
3768                             double* scond, double* amax );
3769 lapack_int LAPACKE_csyequb( int matrix_layout, char uplo, lapack_int n,
3770                             const lapack_complex_float* a, lapack_int lda,
3771                             float* s, float* scond, float* amax );
3772 lapack_int LAPACKE_zsyequb( int matrix_layout, char uplo, lapack_int n,
3773                             const lapack_complex_double* a, lapack_int lda,
3774                             double* s, double* scond, double* amax );
3775
3776 lapack_int LAPACKE_ssyev( int matrix_layout, char jobz, char uplo, lapack_int n,
3777                           float* a, lapack_int lda, float* w );
3778 lapack_int LAPACKE_dsyev( int matrix_layout, char jobz, char uplo, lapack_int n,
3779                           double* a, lapack_int lda, double* w );
3780
3781 lapack_int LAPACKE_ssyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3782                            float* a, lapack_int lda, float* w );
3783 lapack_int LAPACKE_dsyevd( int matrix_layout, char jobz, char uplo, lapack_int n,
3784                            double* a, lapack_int lda, double* w );
3785
3786 lapack_int LAPACKE_ssyevr( int matrix_layout, char jobz, char range, char uplo,
3787                            lapack_int n, float* a, lapack_int lda, float vl,
3788                            float vu, lapack_int il, lapack_int iu, float abstol,
3789                            lapack_int* m, float* w, float* z, lapack_int ldz,
3790                            lapack_int* isuppz );
3791 lapack_int LAPACKE_dsyevr( int matrix_layout, char jobz, char range, char uplo,
3792                            lapack_int n, double* a, lapack_int lda, double vl,
3793                            double vu, lapack_int il, lapack_int iu,
3794                            double abstol, lapack_int* m, double* w, double* z,
3795                            lapack_int ldz, lapack_int* isuppz );
3796
3797 lapack_int LAPACKE_ssyevx( int matrix_layout, char jobz, char range, char uplo,
3798                            lapack_int n, float* a, lapack_int lda, float vl,
3799                            float vu, lapack_int il, lapack_int iu, float abstol,
3800                            lapack_int* m, float* w, float* z, lapack_int ldz,
3801                            lapack_int* ifail );
3802 lapack_int LAPACKE_dsyevx( int matrix_layout, char jobz, char range, char uplo,
3803                            lapack_int n, double* a, lapack_int lda, double vl,
3804                            double vu, lapack_int il, lapack_int iu,
3805                            double abstol, lapack_int* m, double* w, double* z,
3806                            lapack_int ldz, lapack_int* ifail );
3807
3808 lapack_int LAPACKE_ssygst( int matrix_layout, lapack_int itype, char uplo,
3809                            lapack_int n, float* a, lapack_int lda,
3810                            const float* b, lapack_int ldb );
3811 lapack_int LAPACKE_dsygst( int matrix_layout, lapack_int itype, char uplo,
3812                            lapack_int n, double* a, lapack_int lda,
3813                            const double* b, lapack_int ldb );
3814
3815 lapack_int LAPACKE_ssygv( int matrix_layout, lapack_int itype, char jobz,
3816                           char uplo, lapack_int n, float* a, lapack_int lda,
3817                           float* b, lapack_int ldb, float* w );
3818 lapack_int LAPACKE_dsygv( int matrix_layout, lapack_int itype, char jobz,
3819                           char uplo, lapack_int n, double* a, lapack_int lda,
3820                           double* b, lapack_int ldb, double* w );
3821
3822 lapack_int LAPACKE_ssygvd( int matrix_layout, lapack_int itype, char jobz,
3823                            char uplo, lapack_int n, float* a, lapack_int lda,
3824                            float* b, lapack_int ldb, float* w );
3825 lapack_int LAPACKE_dsygvd( int matrix_layout, lapack_int itype, char jobz,
3826                            char uplo, lapack_int n, double* a, lapack_int lda,
3827                            double* b, lapack_int ldb, double* w );
3828
3829 lapack_int LAPACKE_ssygvx( int matrix_layout, lapack_int itype, char jobz,
3830                            char range, char uplo, lapack_int n, float* a,
3831                            lapack_int lda, float* b, lapack_int ldb, float vl,
3832                            float vu, lapack_int il, lapack_int iu, float abstol,
3833                            lapack_int* m, float* w, float* z, lapack_int ldz,
3834                            lapack_int* ifail );
3835 lapack_int LAPACKE_dsygvx( int matrix_layout, lapack_int itype, char jobz,
3836                            char range, char uplo, lapack_int n, double* a,
3837                            lapack_int lda, double* b, lapack_int ldb, double vl,
3838                            double vu, lapack_int il, lapack_int iu,
3839                            double abstol, lapack_int* m, double* w, double* z,
3840                            lapack_int ldz, lapack_int* ifail );
3841
3842 lapack_int LAPACKE_ssyrfs( int matrix_layout, char uplo, lapack_int n,
3843                            lapack_int nrhs, const float* a, lapack_int lda,
3844                            const float* af, lapack_int ldaf,
3845                            const lapack_int* ipiv, const float* b,
3846                            lapack_int ldb, float* x, lapack_int ldx,
3847                            float* ferr, float* berr );
3848 lapack_int LAPACKE_dsyrfs( int matrix_layout, char uplo, lapack_int n,
3849                            lapack_int nrhs, const double* a, lapack_int lda,
3850                            const double* af, lapack_int ldaf,
3851                            const lapack_int* ipiv, const double* b,
3852                            lapack_int ldb, double* x, lapack_int ldx,
3853                            double* ferr, double* berr );
3854 lapack_int LAPACKE_csyrfs( int matrix_layout, char uplo, lapack_int n,
3855                            lapack_int nrhs, const lapack_complex_float* a,
3856                            lapack_int lda, const lapack_complex_float* af,
3857                            lapack_int ldaf, const lapack_int* ipiv,
3858                            const lapack_complex_float* b, lapack_int ldb,
3859                            lapack_complex_float* x, lapack_int ldx, float* ferr,
3860                            float* berr );
3861 lapack_int LAPACKE_zsyrfs( int matrix_layout, char uplo, lapack_int n,
3862                            lapack_int nrhs, const lapack_complex_double* a,
3863                            lapack_int lda, const lapack_complex_double* af,
3864                            lapack_int ldaf, const lapack_int* ipiv,
3865                            const lapack_complex_double* b, lapack_int ldb,
3866                            lapack_complex_double* x, lapack_int ldx,
3867                            double* ferr, double* berr );
3868
3869 lapack_int LAPACKE_ssyrfsx( int matrix_layout, char uplo, char equed,
3870                             lapack_int n, lapack_int nrhs, const float* a,
3871                             lapack_int lda, const float* af, lapack_int ldaf,
3872                             const lapack_int* ipiv, const float* s,
3873                             const float* b, lapack_int ldb, float* x,
3874                             lapack_int ldx, float* rcond, float* berr,
3875                             lapack_int n_err_bnds, float* err_bnds_norm,
3876                             float* err_bnds_comp, lapack_int nparams,
3877                             float* params );
3878 lapack_int LAPACKE_dsyrfsx( int matrix_layout, char uplo, char equed,
3879                             lapack_int n, lapack_int nrhs, const double* a,
3880                             lapack_int lda, const double* af, lapack_int ldaf,
3881                             const lapack_int* ipiv, const double* s,
3882                             const double* b, lapack_int ldb, double* x,
3883                             lapack_int ldx, double* rcond, double* berr,
3884                             lapack_int n_err_bnds, double* err_bnds_norm,
3885                             double* err_bnds_comp, lapack_int nparams,
3886                             double* params );
3887 lapack_int LAPACKE_csyrfsx( int matrix_layout, char uplo, char equed,
3888                             lapack_int n, lapack_int nrhs,
3889                             const lapack_complex_float* a, lapack_int lda,
3890                             const lapack_complex_float* af, lapack_int ldaf,
3891                             const lapack_int* ipiv, const float* s,
3892                             const lapack_complex_float* b, lapack_int ldb,
3893                             lapack_complex_float* x, lapack_int ldx,
3894                             float* rcond, float* berr, lapack_int n_err_bnds,
3895                             float* err_bnds_norm, float* err_bnds_comp,
3896                             lapack_int nparams, float* params );
3897 lapack_int LAPACKE_zsyrfsx( int matrix_layout, char uplo, char equed,
3898                             lapack_int n, lapack_int nrhs,
3899                             const lapack_complex_double* a, lapack_int lda,
3900                             const lapack_complex_double* af, lapack_int ldaf,
3901                             const lapack_int* ipiv, const double* s,
3902                             const lapack_complex_double* b, lapack_int ldb,
3903                             lapack_complex_double* x, lapack_int ldx,
3904                             double* rcond, double* berr, lapack_int n_err_bnds,
3905                             double* err_bnds_norm, double* err_bnds_comp,
3906                             lapack_int nparams, double* params );
3907
3908 lapack_int LAPACKE_ssysv( int matrix_layout, char uplo, lapack_int n,
3909                           lapack_int nrhs, float* a, lapack_int lda,
3910                           lapack_int* ipiv, float* b, lapack_int ldb );
3911 lapack_int LAPACKE_dsysv( int matrix_layout, char uplo, lapack_int n,
3912                           lapack_int nrhs, double* a, lapack_int lda,
3913                           lapack_int* ipiv, double* b, lapack_int ldb );
3914 lapack_int LAPACKE_csysv( int matrix_layout, char uplo, lapack_int n,
3915                           lapack_int nrhs, lapack_complex_float* a,
3916                           lapack_int lda, lapack_int* ipiv,
3917                           lapack_complex_float* b, lapack_int ldb );
3918 lapack_int LAPACKE_zsysv( int matrix_layout, char uplo, lapack_int n,
3919                           lapack_int nrhs, lapack_complex_double* a,
3920                           lapack_int lda, lapack_int* ipiv,
3921                           lapack_complex_double* b, lapack_int ldb );
3922
3923 lapack_int LAPACKE_ssysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3924                            lapack_int nrhs, const float* a, lapack_int lda,
3925                            float* af, lapack_int ldaf, lapack_int* ipiv,
3926                            const float* b, lapack_int ldb, float* x,
3927                            lapack_int ldx, float* rcond, float* ferr,
3928                            float* berr );
3929 lapack_int LAPACKE_dsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3930                            lapack_int nrhs, const double* a, lapack_int lda,
3931                            double* af, lapack_int ldaf, lapack_int* ipiv,
3932                            const double* b, lapack_int ldb, double* x,
3933                            lapack_int ldx, double* rcond, double* ferr,
3934                            double* berr );
3935 lapack_int LAPACKE_csysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3936                            lapack_int nrhs, const lapack_complex_float* a,
3937                            lapack_int lda, lapack_complex_float* af,
3938                            lapack_int ldaf, lapack_int* ipiv,
3939                            const lapack_complex_float* b, lapack_int ldb,
3940                            lapack_complex_float* x, lapack_int ldx,
3941                            float* rcond, float* ferr, float* berr );
3942 lapack_int LAPACKE_zsysvx( int matrix_layout, char fact, char uplo, lapack_int n,
3943                            lapack_int nrhs, const lapack_complex_double* a,
3944                            lapack_int lda, lapack_complex_double* af,
3945                            lapack_int ldaf, lapack_int* ipiv,
3946                            const lapack_complex_double* b, lapack_int ldb,
3947                            lapack_complex_double* x, lapack_int ldx,
3948                            double* rcond, double* ferr, double* berr );
3949
3950 lapack_int LAPACKE_ssysvxx( int matrix_layout, char fact, char uplo,
3951                             lapack_int n, lapack_int nrhs, float* a,
3952                             lapack_int lda, float* af, lapack_int ldaf,
3953                             lapack_int* ipiv, char* equed, float* s, float* b,
3954                             lapack_int ldb, float* x, lapack_int ldx,
3955                             float* rcond, float* rpvgrw, float* berr,
3956                             lapack_int n_err_bnds, float* err_bnds_norm,
3957                             float* err_bnds_comp, lapack_int nparams,
3958                             float* params );
3959 lapack_int LAPACKE_dsysvxx( int matrix_layout, char fact, char uplo,
3960                             lapack_int n, lapack_int nrhs, double* a,
3961                             lapack_int lda, double* af, lapack_int ldaf,
3962                             lapack_int* ipiv, char* equed, double* s, double* b,
3963                             lapack_int ldb, double* x, lapack_int ldx,
3964                             double* rcond, double* rpvgrw, double* berr,
3965                             lapack_int n_err_bnds, double* err_bnds_norm,
3966                             double* err_bnds_comp, lapack_int nparams,
3967                             double* params );
3968 lapack_int LAPACKE_csysvxx( int matrix_layout, char fact, char uplo,
3969                             lapack_int n, lapack_int nrhs,
3970                             lapack_complex_float* a, lapack_int lda,
3971                             lapack_complex_float* af, lapack_int ldaf,
3972                             lapack_int* ipiv, char* equed, float* s,
3973                             lapack_complex_float* b, lapack_int ldb,
3974                             lapack_complex_float* x, lapack_int ldx,
3975                             float* rcond, float* rpvgrw, float* berr,
3976                             lapack_int n_err_bnds, float* err_bnds_norm,
3977                             float* err_bnds_comp, lapack_int nparams,
3978                             float* params );
3979 lapack_int LAPACKE_zsysvxx( int matrix_layout, char fact, char uplo,
3980                             lapack_int n, lapack_int nrhs,
3981                             lapack_complex_double* a, lapack_int lda,
3982                             lapack_complex_double* af, lapack_int ldaf,
3983                             lapack_int* ipiv, char* equed, double* s,
3984                             lapack_complex_double* b, lapack_int ldb,
3985                             lapack_complex_double* x, lapack_int ldx,
3986                             double* rcond, double* rpvgrw, double* berr,
3987                             lapack_int n_err_bnds, double* err_bnds_norm,
3988                             double* err_bnds_comp, lapack_int nparams,
3989                             double* params );
3990
3991 lapack_int LAPACKE_ssytrd( int matrix_layout, char uplo, lapack_int n, float* a,
3992                            lapack_int lda, float* d, float* e, float* tau );
3993 lapack_int LAPACKE_dsytrd( int matrix_layout, char uplo, lapack_int n, double* a,
3994                            lapack_int lda, double* d, double* e, double* tau );
3995
3996 lapack_int LAPACKE_ssytrf( int matrix_layout, char uplo, lapack_int n, float* a,
3997                            lapack_int lda, lapack_int* ipiv );
3998 lapack_int LAPACKE_dsytrf( int matrix_layout, char uplo, lapack_int n, double* a,
3999                            lapack_int lda, lapack_int* ipiv );
4000 lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n,
4001                            lapack_complex_float* a, lapack_int lda,
4002                            lapack_int* ipiv );
4003 lapack_int LAPACKE_zsytrf( int matrix_layout, char uplo, lapack_int n,
4004                            lapack_complex_double* a, lapack_int lda,
4005                            lapack_int* ipiv );
4006
4007 lapack_int LAPACKE_ssytri( int matrix_layout, char uplo, lapack_int n, float* a,
4008                            lapack_int lda, const lapack_int* ipiv );
4009 lapack_int LAPACKE_dsytri( int matrix_layout, char uplo, lapack_int n, double* a,
4010                            lapack_int lda, const lapack_int* ipiv );
4011 lapack_int LAPACKE_csytri( int matrix_layout, char uplo, lapack_int n,
4012                            lapack_complex_float* a, lapack_int lda,
4013                            const lapack_int* ipiv );
4014 lapack_int LAPACKE_zsytri( int matrix_layout, char uplo, lapack_int n,
4015                            lapack_complex_double* a, lapack_int lda,
4016                            const lapack_int* ipiv );
4017
4018 lapack_int LAPACKE_ssytrs( int matrix_layout, char uplo, lapack_int n,
4019                            lapack_int nrhs, const float* a, lapack_int lda,
4020                            const lapack_int* ipiv, float* b, lapack_int ldb );
4021 lapack_int LAPACKE_dsytrs( int matrix_layout, char uplo, lapack_int n,
4022                            lapack_int nrhs, const double* a, lapack_int lda,
4023                            const lapack_int* ipiv, double* b, lapack_int ldb );
4024 lapack_int LAPACKE_csytrs( int matrix_layout, char uplo, lapack_int n,
4025                            lapack_int nrhs, const lapack_complex_float* a,
4026                            lapack_int lda, const lapack_int* ipiv,
4027                            lapack_complex_float* b, lapack_int ldb );
4028 lapack_int LAPACKE_zsytrs( int matrix_layout, char uplo, lapack_int n,
4029                            lapack_int nrhs, const lapack_complex_double* a,
4030                            lapack_int lda, const lapack_int* ipiv,
4031                            lapack_complex_double* b, lapack_int ldb );
4032
4033 lapack_int LAPACKE_stbcon( int matrix_layout, char norm, char uplo, char diag,
4034                            lapack_int n, lapack_int kd, const float* ab,
4035                            lapack_int ldab, float* rcond );
4036 lapack_int LAPACKE_dtbcon( int matrix_layout, char norm, char uplo, char diag,
4037                            lapack_int n, lapack_int kd, const double* ab,
4038                            lapack_int ldab, double* rcond );
4039 lapack_int LAPACKE_ctbcon( int matrix_layout, char norm, char uplo, char diag,
4040                            lapack_int n, lapack_int kd,
4041                            const lapack_complex_float* ab, lapack_int ldab,
4042                            float* rcond );
4043 lapack_int LAPACKE_ztbcon( int matrix_layout, char norm, char uplo, char diag,
4044                            lapack_int n, lapack_int kd,
4045                            const lapack_complex_double* ab, lapack_int ldab,
4046                            double* rcond );
4047
4048 lapack_int LAPACKE_stbrfs( int matrix_layout, char uplo, char trans, char diag,
4049                            lapack_int n, lapack_int kd, lapack_int nrhs,
4050                            const float* ab, lapack_int ldab, const float* b,
4051                            lapack_int ldb, const float* x, lapack_int ldx,
4052                            float* ferr, float* berr );
4053 lapack_int LAPACKE_dtbrfs( int matrix_layout, char uplo, char trans, char diag,
4054                            lapack_int n, lapack_int kd, lapack_int nrhs,
4055                            const double* ab, lapack_int ldab, const double* b,
4056                            lapack_int ldb, const double* x, lapack_int ldx,
4057                            double* ferr, double* berr );
4058 lapack_int LAPACKE_ctbrfs( int matrix_layout, char uplo, char trans, char diag,
4059                            lapack_int n, lapack_int kd, lapack_int nrhs,
4060                            const lapack_complex_float* ab, lapack_int ldab,
4061                            const lapack_complex_float* b, lapack_int ldb,
4062                            const lapack_complex_float* x, lapack_int ldx,
4063                            float* ferr, float* berr );
4064 lapack_int LAPACKE_ztbrfs( int matrix_layout, char uplo, char trans, char diag,
4065                            lapack_int n, lapack_int kd, lapack_int nrhs,
4066                            const lapack_complex_double* ab, lapack_int ldab,
4067                            const lapack_complex_double* b, lapack_int ldb,
4068                            const lapack_complex_double* x, lapack_int ldx,
4069                            double* ferr, double* berr );
4070
4071 lapack_int LAPACKE_stbtrs( int matrix_layout, char uplo, char trans, char diag,
4072                            lapack_int n, lapack_int kd, lapack_int nrhs,
4073                            const float* ab, lapack_int ldab, float* b,
4074                            lapack_int ldb );
4075 lapack_int LAPACKE_dtbtrs( int matrix_layout, char uplo, char trans, char diag,
4076                            lapack_int n, lapack_int kd, lapack_int nrhs,
4077                            const double* ab, lapack_int ldab, double* b,
4078                            lapack_int ldb );
4079 lapack_int LAPACKE_ctbtrs( int matrix_layout, char uplo, char trans, char diag,
4080                            lapack_int n, lapack_int kd, lapack_int nrhs,
4081                            const lapack_complex_float* ab, lapack_int ldab,
4082                            lapack_complex_float* b, lapack_int ldb );
4083 lapack_int LAPACKE_ztbtrs( int matrix_layout, char uplo, char trans, char diag,
4084                            lapack_int n, lapack_int kd, lapack_int nrhs,
4085                            const lapack_complex_double* ab, lapack_int ldab,
4086                            lapack_complex_double* b, lapack_int ldb );
4087
4088 lapack_int LAPACKE_stfsm( int matrix_layout, char transr, char side, char uplo,
4089                           char trans, char diag, lapack_int m, lapack_int n,
4090                           float alpha, const float* a, float* b,
4091                           lapack_int ldb );
4092 lapack_int LAPACKE_dtfsm( int matrix_layout, char transr, char side, char uplo,
4093                           char trans, char diag, lapack_int m, lapack_int n,
4094                           double alpha, const double* a, double* b,
4095                           lapack_int ldb );
4096 lapack_int LAPACKE_ctfsm( int matrix_layout, char transr, char side, char uplo,
4097                           char trans, char diag, lapack_int m, lapack_int n,
4098                           lapack_complex_float alpha,
4099                           const lapack_complex_float* a,
4100                           lapack_complex_float* b, lapack_int ldb );
4101 lapack_int LAPACKE_ztfsm( int matrix_layout, char transr, char side, char uplo,
4102                           char trans, char diag, lapack_int m, lapack_int n,
4103                           lapack_complex_double alpha,
4104                           const lapack_complex_double* a,
4105                           lapack_complex_double* b, lapack_int ldb );
4106
4107 lapack_int LAPACKE_stftri( int matrix_layout, char transr, char uplo, char diag,
4108                            lapack_int n, float* a );
4109 lapack_int LAPACKE_dtftri( int matrix_layout, char transr, char uplo, char diag,
4110                            lapack_int n, double* a );
4111 lapack_int LAPACKE_ctftri( int matrix_layout, char transr, char uplo, char diag,
4112                            lapack_int n, lapack_complex_float* a );
4113 lapack_int LAPACKE_ztftri( int matrix_layout, char transr, char uplo, char diag,
4114                            lapack_int n, lapack_complex_double* a );
4115
4116 lapack_int LAPACKE_stfttp( int matrix_layout, char transr, char uplo,
4117                            lapack_int n, const float* arf, float* ap );
4118 lapack_int LAPACKE_dtfttp( int matrix_layout, char transr, char uplo,
4119                            lapack_int n, const double* arf, double* ap );
4120 lapack_int LAPACKE_ctfttp( int matrix_layout, char transr, char uplo,
4121                            lapack_int n, const lapack_complex_float* arf,
4122                            lapack_complex_float* ap );
4123 lapack_int LAPACKE_ztfttp( int matrix_layout, char transr, char uplo,
4124                            lapack_int n, const lapack_complex_double* arf,
4125                            lapack_complex_double* ap );
4126
4127 lapack_int LAPACKE_stfttr( int matrix_layout, char transr, char uplo,
4128                            lapack_int n, const float* arf, float* a,
4129                            lapack_int lda );
4130 lapack_int LAPACKE_dtfttr( int matrix_layout, char transr, char uplo,
4131                            lapack_int n, const double* arf, double* a,
4132                            lapack_int lda );
4133 lapack_int LAPACKE_ctfttr( int matrix_layout, char transr, char uplo,
4134                            lapack_int n, const lapack_complex_float* arf,
4135                            lapack_complex_float* a, lapack_int lda );
4136 lapack_int LAPACKE_ztfttr( int matrix_layout, char transr, char uplo,
4137                            lapack_int n, const lapack_complex_double* arf,
4138                            lapack_complex_double* a, lapack_int lda );
4139
4140 lapack_int LAPACKE_stgevc( int matrix_layout, char side, char howmny,
4141                            const lapack_logical* select, lapack_int n,
4142                            const float* s, lapack_int lds, const float* p,
4143                            lapack_int ldp, float* vl, lapack_int ldvl,
4144                            float* vr, lapack_int ldvr, lapack_int mm,
4145                            lapack_int* m );
4146 lapack_int LAPACKE_dtgevc( int matrix_layout, char side, char howmny,
4147                            const lapack_logical* select, lapack_int n,
4148                            const double* s, lapack_int lds, const double* p,
4149                            lapack_int ldp, double* vl, lapack_int ldvl,
4150                            double* vr, lapack_int ldvr, lapack_int mm,
4151                            lapack_int* m );
4152 lapack_int LAPACKE_ctgevc( int matrix_layout, char side, char howmny,
4153                            const lapack_logical* select, lapack_int n,
4154                            const lapack_complex_float* s, lapack_int lds,
4155                            const lapack_complex_float* p, lapack_int ldp,
4156                            lapack_complex_float* vl, lapack_int ldvl,
4157                            lapack_complex_float* vr, lapack_int ldvr,
4158                            lapack_int mm, lapack_int* m );
4159 lapack_int LAPACKE_ztgevc( int matrix_layout, char side, char howmny,
4160                            const lapack_logical* select, lapack_int n,
4161                            const lapack_complex_double* s, lapack_int lds,
4162                            const lapack_complex_double* p, lapack_int ldp,
4163                            lapack_complex_double* vl, lapack_int ldvl,
4164                            lapack_complex_double* vr, lapack_int ldvr,
4165                            lapack_int mm, lapack_int* m );
4166
4167 lapack_int LAPACKE_stgexc( int matrix_layout, lapack_logical wantq,
4168                            lapack_logical wantz, lapack_int n, float* a,
4169                            lapack_int lda, float* b, lapack_int ldb, float* q,
4170                            lapack_int ldq, float* z, lapack_int ldz,
4171                            lapack_int* ifst, lapack_int* ilst );
4172 lapack_int LAPACKE_dtgexc( int matrix_layout, lapack_logical wantq,
4173                            lapack_logical wantz, lapack_int n, double* a,
4174                            lapack_int lda, double* b, lapack_int ldb, double* q,
4175                            lapack_int ldq, double* z, lapack_int ldz,
4176                            lapack_int* ifst, lapack_int* ilst );
4177 lapack_int LAPACKE_ctgexc( int matrix_layout, lapack_logical wantq,
4178                            lapack_logical wantz, lapack_int n,
4179                            lapack_complex_float* a, lapack_int lda,
4180                            lapack_complex_float* b, lapack_int ldb,
4181                            lapack_complex_float* q, lapack_int ldq,
4182                            lapack_complex_float* z, lapack_int ldz,
4183                            lapack_int ifst, lapack_int ilst );
4184 lapack_int LAPACKE_ztgexc( int matrix_layout, lapack_logical wantq,
4185                            lapack_logical wantz, lapack_int n,
4186                            lapack_complex_double* a, lapack_int lda,
4187                            lapack_complex_double* b, lapack_int ldb,
4188                            lapack_complex_double* q, lapack_int ldq,
4189                            lapack_complex_double* z, lapack_int ldz,
4190                            lapack_int ifst, lapack_int ilst );
4191
4192 lapack_int LAPACKE_stgsen( int matrix_layout, lapack_int ijob,
4193                            lapack_logical wantq, lapack_logical wantz,
4194                            const lapack_logical* select, lapack_int n, float* a,
4195                            lapack_int lda, float* b, lapack_int ldb,
4196                            float* alphar, float* alphai, float* beta, float* q,
4197                            lapack_int ldq, float* z, lapack_int ldz,
4198                            lapack_int* m, float* pl, float* pr, float* dif );
4199 lapack_int LAPACKE_dtgsen( int matrix_layout, lapack_int ijob,
4200                            lapack_logical wantq, lapack_logical wantz,
4201                            const lapack_logical* select, lapack_int n,
4202                            double* a, lapack_int lda, double* b, lapack_int ldb,
4203                            double* alphar, double* alphai, double* beta,
4204                            double* q, lapack_int ldq, double* z, lapack_int ldz,
4205                            lapack_int* m, double* pl, double* pr, double* dif );
4206 lapack_int LAPACKE_ctgsen( int matrix_layout, lapack_int ijob,
4207                            lapack_logical wantq, lapack_logical wantz,
4208                            const lapack_logical* select, lapack_int n,
4209                            lapack_complex_float* a, lapack_int lda,
4210                            lapack_complex_float* b, lapack_int ldb,
4211                            lapack_complex_float* alpha,
4212                            lapack_complex_float* beta, lapack_complex_float* q,
4213                            lapack_int ldq, lapack_complex_float* z,
4214                            lapack_int ldz, lapack_int* m, float* pl, float* pr,
4215                            float* dif );
4216 lapack_int LAPACKE_ztgsen( int matrix_layout, lapack_int ijob,
4217                            lapack_logical wantq, lapack_logical wantz,
4218                            const lapack_logical* select, lapack_int n,
4219                            lapack_complex_double* a, lapack_int lda,
4220                            lapack_complex_double* b, lapack_int ldb,
4221                            lapack_complex_double* alpha,
4222                            lapack_complex_double* beta,
4223                            lapack_complex_double* q, lapack_int ldq,
4224                            lapack_complex_double* z, lapack_int ldz,
4225                            lapack_int* m, double* pl, double* pr, double* dif );
4226
4227 lapack_int LAPACKE_stgsja( int matrix_layout, char jobu, char jobv, char jobq,
4228                            lapack_int m, lapack_int p, lapack_int n,
4229                            lapack_int k, lapack_int l, float* a, lapack_int lda,
4230                            float* b, lapack_int ldb, float tola, float tolb,
4231                            float* alpha, float* beta, float* u, lapack_int ldu,
4232                            float* v, lapack_int ldv, float* q, lapack_int ldq,
4233                            lapack_int* ncycle );
4234 lapack_int LAPACKE_dtgsja( int matrix_layout, char jobu, char jobv, char jobq,
4235                            lapack_int m, lapack_int p, lapack_int n,
4236                            lapack_int k, lapack_int l, double* a,
4237                            lapack_int lda, double* b, lapack_int ldb,
4238                            double tola, double tolb, double* alpha,
4239                            double* beta, double* u, lapack_int ldu, double* v,
4240                            lapack_int ldv, double* q, lapack_int ldq,
4241                            lapack_int* ncycle );
4242 lapack_int LAPACKE_ctgsja( int matrix_layout, char jobu, char jobv, char jobq,
4243                            lapack_int m, lapack_int p, lapack_int n,
4244                            lapack_int k, lapack_int l, lapack_complex_float* a,
4245                            lapack_int lda, lapack_complex_float* b,
4246                            lapack_int ldb, float tola, float tolb, float* alpha,
4247                            float* beta, lapack_complex_float* u, lapack_int ldu,
4248                            lapack_complex_float* v, lapack_int ldv,
4249                            lapack_complex_float* q, lapack_int ldq,
4250                            lapack_int* ncycle );
4251 lapack_int LAPACKE_ztgsja( int matrix_layout, char jobu, char jobv, char jobq,
4252                            lapack_int m, lapack_int p, lapack_int n,
4253                            lapack_int k, lapack_int l, lapack_complex_double* a,
4254                            lapack_int lda, lapack_complex_double* b,
4255                            lapack_int ldb, double tola, double tolb,
4256                            double* alpha, double* beta,
4257                            lapack_complex_double* u, lapack_int ldu,
4258                            lapack_complex_double* v, lapack_int ldv,
4259                            lapack_complex_double* q, lapack_int ldq,
4260                            lapack_int* ncycle );
4261
4262 lapack_int LAPACKE_stgsna( int matrix_layout, char job, char howmny,
4263                            const lapack_logical* select, lapack_int n,
4264                            const float* a, lapack_int lda, const float* b,
4265                            lapack_int ldb, const float* vl, lapack_int ldvl,
4266                            const float* vr, lapack_int ldvr, float* s,
4267                            float* dif, lapack_int mm, lapack_int* m );
4268 lapack_int LAPACKE_dtgsna( int matrix_layout, char job, char howmny,
4269                            const lapack_logical* select, lapack_int n,
4270                            const double* a, lapack_int lda, const double* b,
4271                            lapack_int ldb, const double* vl, lapack_int ldvl,
4272                            const double* vr, lapack_int ldvr, double* s,
4273                            double* dif, lapack_int mm, lapack_int* m );
4274 lapack_int LAPACKE_ctgsna( int matrix_layout, char job, char howmny,
4275                            const lapack_logical* select, lapack_int n,
4276                            const lapack_complex_float* a, lapack_int lda,
4277                            const lapack_complex_float* b, lapack_int ldb,
4278                            const lapack_complex_float* vl, lapack_int ldvl,
4279                            const lapack_complex_float* vr, lapack_int ldvr,
4280                            float* s, float* dif, lapack_int mm, lapack_int* m );
4281 lapack_int LAPACKE_ztgsna( int matrix_layout, char job, char howmny,
4282                            const lapack_logical* select, lapack_int n,
4283                            const lapack_complex_double* a, lapack_int lda,
4284                            const lapack_complex_double* b, lapack_int ldb,
4285                            const lapack_complex_double* vl, lapack_int ldvl,
4286                            const lapack_complex_double* vr, lapack_int ldvr,
4287                            double* s, double* dif, lapack_int mm,
4288                            lapack_int* m );
4289
4290 lapack_int LAPACKE_stgsyl( int matrix_layout, char trans, lapack_int ijob,
4291                            lapack_int m, lapack_int n, const float* a,
4292                            lapack_int lda, const float* b, lapack_int ldb,
4293                            float* c, lapack_int ldc, const float* d,
4294                            lapack_int ldd, const float* e, lapack_int lde,
4295                            float* f, lapack_int ldf, float* scale, float* dif );
4296 lapack_int LAPACKE_dtgsyl( int matrix_layout, char trans, lapack_int ijob,
4297                            lapack_int m, lapack_int n, const double* a,
4298                            lapack_int lda, const double* b, lapack_int ldb,
4299                            double* c, lapack_int ldc, const double* d,
4300                            lapack_int ldd, const double* e, lapack_int lde,
4301                            double* f, lapack_int ldf, double* scale,
4302                            double* dif );
4303 lapack_int LAPACKE_ctgsyl( int matrix_layout, char trans, lapack_int ijob,
4304                            lapack_int m, lapack_int n,
4305                            const lapack_complex_float* a, lapack_int lda,
4306                            const lapack_complex_float* b, lapack_int ldb,
4307                            lapack_complex_float* c, lapack_int ldc,
4308                            const lapack_complex_float* d, lapack_int ldd,
4309                            const lapack_complex_float* e, lapack_int lde,
4310                            lapack_complex_float* f, lapack_int ldf,
4311                            float* scale, float* dif );
4312 lapack_int LAPACKE_ztgsyl( int matrix_layout, char trans, lapack_int ijob,
4313                            lapack_int m, lapack_int n,
4314                            const lapack_complex_double* a, lapack_int lda,
4315                            const lapack_complex_double* b, lapack_int ldb,
4316                            lapack_complex_double* c, lapack_int ldc,
4317                            const lapack_complex_double* d, lapack_int ldd,
4318                            const lapack_complex_double* e, lapack_int lde,
4319                            lapack_complex_double* f, lapack_int ldf,
4320                            double* scale, double* dif );
4321
4322 lapack_int LAPACKE_stpcon( int matrix_layout, char norm, char uplo, char diag,
4323                            lapack_int n, const float* ap, float* rcond );
4324 lapack_int LAPACKE_dtpcon( int matrix_layout, char norm, char uplo, char diag,
4325                            lapack_int n, const double* ap, double* rcond );
4326 lapack_int LAPACKE_ctpcon( int matrix_layout, char norm, char uplo, char diag,
4327                            lapack_int n, const lapack_complex_float* ap,
4328                            float* rcond );
4329 lapack_int LAPACKE_ztpcon( int matrix_layout, char norm, char uplo, char diag,
4330                            lapack_int n, const lapack_complex_double* ap,
4331                            double* rcond );
4332
4333 lapack_int LAPACKE_stprfs( int matrix_layout, char uplo, char trans, char diag,
4334                            lapack_int n, lapack_int nrhs, const float* ap,
4335                            const float* b, lapack_int ldb, const float* x,
4336                            lapack_int ldx, float* ferr, float* berr );
4337 lapack_int LAPACKE_dtprfs( int matrix_layout, char uplo, char trans, char diag,
4338                            lapack_int n, lapack_int nrhs, const double* ap,
4339                            const double* b, lapack_int ldb, const double* x,
4340                            lapack_int ldx, double* ferr, double* berr );
4341 lapack_int LAPACKE_ctprfs( int matrix_layout, char uplo, char trans, char diag,
4342                            lapack_int n, lapack_int nrhs,
4343                            const lapack_complex_float* ap,
4344                            const lapack_complex_float* b, lapack_int ldb,
4345                            const lapack_complex_float* x, lapack_int ldx,
4346                            float* ferr, float* berr );
4347 lapack_int LAPACKE_ztprfs( int matrix_layout, char uplo, char trans, char diag,
4348                            lapack_int n, lapack_int nrhs,
4349                            const lapack_complex_double* ap,
4350                            const lapack_complex_double* b, lapack_int ldb,
4351                            const lapack_complex_double* x, lapack_int ldx,
4352                            double* ferr, double* berr );
4353
4354 lapack_int LAPACKE_stptri( int matrix_layout, char uplo, char diag, lapack_int n,
4355                            float* ap );
4356 lapack_int LAPACKE_dtptri( int matrix_layout, char uplo, char diag, lapack_int n,
4357                            double* ap );
4358 lapack_int LAPACKE_ctptri( int matrix_layout, char uplo, char diag, lapack_int n,
4359                            lapack_complex_float* ap );
4360 lapack_int LAPACKE_ztptri( int matrix_layout, char uplo, char diag, lapack_int n,
4361                            lapack_complex_double* ap );
4362
4363 lapack_int LAPACKE_stptrs( int matrix_layout, char uplo, char trans, char diag,
4364                            lapack_int n, lapack_int nrhs, const float* ap,
4365                            float* b, lapack_int ldb );
4366 lapack_int LAPACKE_dtptrs( int matrix_layout, char uplo, char trans, char diag,
4367                            lapack_int n, lapack_int nrhs, const double* ap,
4368                            double* b, lapack_int ldb );
4369 lapack_int LAPACKE_ctptrs( int matrix_layout, char uplo, char trans, char diag,
4370                            lapack_int n, lapack_int nrhs,
4371                            const lapack_complex_float* ap,
4372                            lapack_complex_float* b, lapack_int ldb );
4373 lapack_int LAPACKE_ztptrs( int matrix_layout, char uplo, char trans, char diag,
4374                            lapack_int n, lapack_int nrhs,
4375                            const lapack_complex_double* ap,
4376                            lapack_complex_double* b, lapack_int ldb );
4377
4378 lapack_int LAPACKE_stpttf( int matrix_layout, char transr, char uplo,
4379                            lapack_int n, const float* ap, float* arf );
4380 lapack_int LAPACKE_dtpttf( int matrix_layout, char transr, char uplo,
4381                            lapack_int n, const double* ap, double* arf );
4382 lapack_int LAPACKE_ctpttf( int matrix_layout, char transr, char uplo,
4383                            lapack_int n, const lapack_complex_float* ap,
4384                            lapack_complex_float* arf );
4385 lapack_int LAPACKE_ztpttf( int matrix_layout, char transr, char uplo,
4386                            lapack_int n, const lapack_complex_double* ap,
4387                            lapack_complex_double* arf );
4388
4389 lapack_int LAPACKE_stpttr( int matrix_layout, char uplo, lapack_int n,
4390                            const float* ap, float* a, lapack_int lda );
4391 lapack_int LAPACKE_dtpttr( int matrix_layout, char uplo, lapack_int n,
4392                            const double* ap, double* a, lapack_int lda );
4393 lapack_int LAPACKE_ctpttr( int matrix_layout, char uplo, lapack_int n,
4394                            const lapack_complex_float* ap,
4395                            lapack_complex_float* a, lapack_int lda );
4396 lapack_int LAPACKE_ztpttr( int matrix_layout, char uplo, lapack_int n,
4397                            const lapack_complex_double* ap,
4398                            lapack_complex_double* a, lapack_int lda );
4399
4400 lapack_int LAPACKE_strcon( int matrix_layout, char norm, char uplo, char diag,
4401                            lapack_int n, const float* a, lapack_int lda,
4402                            float* rcond );
4403 lapack_int LAPACKE_dtrcon( int matrix_layout, char norm, char uplo, char diag,
4404                            lapack_int n, const double* a, lapack_int lda,
4405                            double* rcond );
4406 lapack_int LAPACKE_ctrcon( int matrix_layout, char norm, char uplo, char diag,
4407                            lapack_int n, const lapack_complex_float* a,
4408                            lapack_int lda, float* rcond );
4409 lapack_int LAPACKE_ztrcon( int matrix_layout, char norm, char uplo, char diag,
4410                            lapack_int n, const lapack_complex_double* a,
4411                            lapack_int lda, double* rcond );
4412
4413 lapack_int LAPACKE_strevc( int matrix_layout, char side, char howmny,
4414                            lapack_logical* select, lapack_int n, const float* t,
4415                            lapack_int ldt, float* vl, lapack_int ldvl,
4416                            float* vr, lapack_int ldvr, lapack_int mm,
4417                            lapack_int* m );
4418 lapack_int LAPACKE_dtrevc( int matrix_layout, char side, char howmny,
4419                            lapack_logical* select, lapack_int n,
4420                            const double* t, lapack_int ldt, double* vl,
4421                            lapack_int ldvl, double* vr, lapack_int ldvr,
4422                            lapack_int mm, lapack_int* m );
4423 lapack_int LAPACKE_ctrevc( int matrix_layout, char side, char howmny,
4424                            const lapack_logical* select, lapack_int n,
4425                            lapack_complex_float* t, lapack_int ldt,
4426                            lapack_complex_float* vl, lapack_int ldvl,
4427                            lapack_complex_float* vr, lapack_int ldvr,
4428                            lapack_int mm, lapack_int* m );
4429 lapack_int LAPACKE_ztrevc( int matrix_layout, char side, char howmny,
4430                            const lapack_logical* select, lapack_int n,
4431                            lapack_complex_double* t, lapack_int ldt,
4432                            lapack_complex_double* vl, lapack_int ldvl,
4433                            lapack_complex_double* vr, lapack_int ldvr,
4434                            lapack_int mm, lapack_int* m );
4435
4436 lapack_int LAPACKE_strexc( int matrix_layout, char compq, lapack_int n, float* t,
4437                            lapack_int ldt, float* q, lapack_int ldq,
4438                            lapack_int* ifst, lapack_int* ilst );
4439 lapack_int LAPACKE_dtrexc( int matrix_layout, char compq, lapack_int n,
4440                            double* t, lapack_int ldt, double* q, lapack_int ldq,
4441                            lapack_int* ifst, lapack_int* ilst );
4442 lapack_int LAPACKE_ctrexc( int matrix_layout, char compq, lapack_int n,
4443                            lapack_complex_float* t, lapack_int ldt,
4444                            lapack_complex_float* q, lapack_int ldq,
4445                            lapack_int ifst, lapack_int ilst );
4446 lapack_int LAPACKE_ztrexc( int matrix_layout, char compq, lapack_int n,
4447                            lapack_complex_double* t, lapack_int ldt,
4448                            lapack_complex_double* q, lapack_int ldq,
4449                            lapack_int ifst, lapack_int ilst );
4450
4451 lapack_int LAPACKE_strrfs( int matrix_layout, char uplo, char trans, char diag,
4452                            lapack_int n, lapack_int nrhs, const float* a,
4453                            lapack_int lda, const float* b, lapack_int ldb,
4454                            const float* x, lapack_int ldx, float* ferr,
4455                            float* berr );
4456 lapack_int LAPACKE_dtrrfs( int matrix_layout, char uplo, char trans, char diag,
4457                            lapack_int n, lapack_int nrhs, const double* a,
4458                            lapack_int lda, const double* b, lapack_int ldb,
4459                            const double* x, lapack_int ldx, double* ferr,
4460                            double* berr );
4461 lapack_int LAPACKE_ctrrfs( int matrix_layout, char uplo, char trans, char diag,
4462                            lapack_int n, lapack_int nrhs,
4463                            const lapack_complex_float* a, lapack_int lda,
4464                            const lapack_complex_float* b, lapack_int ldb,
4465                            const lapack_complex_float* x, lapack_int ldx,
4466                            float* ferr, float* berr );
4467 lapack_int LAPACKE_ztrrfs( int matrix_layout, char uplo, char trans, char diag,
4468                            lapack_int n, lapack_int nrhs,
4469                            const lapack_complex_double* a, lapack_int lda,
4470                            const lapack_complex_double* b, lapack_int ldb,
4471                            const lapack_complex_double* x, lapack_int ldx,
4472                            double* ferr, double* berr );
4473
4474 lapack_int LAPACKE_strsen( int matrix_layout, char job, char compq,
4475                            const lapack_logical* select, lapack_int n, float* t,
4476                            lapack_int ldt, float* q, lapack_int ldq, float* wr,
4477                            float* wi, lapack_int* m, float* s, float* sep );
4478 lapack_int LAPACKE_dtrsen( int matrix_layout, char job, char compq,
4479                            const lapack_logical* select, lapack_int n,
4480                            double* t, lapack_int ldt, double* q, lapack_int ldq,
4481                            double* wr, double* wi, lapack_int* m, double* s,
4482                            double* sep );
4483 lapack_int LAPACKE_ctrsen( int matrix_layout, char job, char compq,
4484                            const lapack_logical* select, lapack_int n,
4485                            lapack_complex_float* t, lapack_int ldt,
4486                            lapack_complex_float* q, lapack_int ldq,
4487                            lapack_complex_float* w, lapack_int* m, float* s,
4488                            float* sep );
4489 lapack_int LAPACKE_ztrsen( int matrix_layout, char job, char compq,
4490                            const lapack_logical* select, lapack_int n,
4491                            lapack_complex_double* t, lapack_int ldt,
4492                            lapack_complex_double* q, lapack_int ldq,
4493                            lapack_complex_double* w, lapack_int* m, double* s,
4494                            double* sep );
4495
4496 lapack_int LAPACKE_strsna( int matrix_layout, char job, char howmny,
4497                            const lapack_logical* select, lapack_int n,
4498                            const float* t, lapack_int ldt, const float* vl,
4499                            lapack_int ldvl, const float* vr, lapack_int ldvr,
4500                            float* s, float* sep, lapack_int mm, lapack_int* m );
4501 lapack_int LAPACKE_dtrsna( int matrix_layout, char job, char howmny,
4502                            const lapack_logical* select, lapack_int n,
4503                            const double* t, lapack_int ldt, const double* vl,
4504                            lapack_int ldvl, const double* vr, lapack_int ldvr,
4505                            double* s, double* sep, lapack_int mm,
4506                            lapack_int* m );
4507 lapack_int LAPACKE_ctrsna( int matrix_layout, char job, char howmny,
4508                            const lapack_logical* select, lapack_int n,
4509                            const lapack_complex_float* t, lapack_int ldt,
4510                            const lapack_complex_float* vl, lapack_int ldvl,
4511                            const lapack_complex_float* vr, lapack_int ldvr,
4512                            float* s, float* sep, lapack_int mm, lapack_int* m );
4513 lapack_int LAPACKE_ztrsna( int matrix_layout, char job, char howmny,
4514                            const lapack_logical* select, lapack_int n,
4515                            const lapack_complex_double* t, lapack_int ldt,
4516                            const lapack_complex_double* vl, lapack_int ldvl,
4517                            const lapack_complex_double* vr, lapack_int ldvr,
4518                            double* s, double* sep, lapack_int mm,
4519                            lapack_int* m );
4520
4521 lapack_int LAPACKE_strsyl( int matrix_layout, char trana, char tranb,
4522                            lapack_int isgn, lapack_int m, lapack_int n,
4523                            const float* a, lapack_int lda, const float* b,
4524                            lapack_int ldb, float* c, lapack_int ldc,
4525                            float* scale );
4526 lapack_int LAPACKE_dtrsyl( int matrix_layout, char trana, char tranb,
4527                            lapack_int isgn, lapack_int m, lapack_int n,
4528                            const double* a, lapack_int lda, const double* b,
4529                            lapack_int ldb, double* c, lapack_int ldc,
4530                            double* scale );
4531 lapack_int LAPACKE_ctrsyl( int matrix_layout, char trana, char tranb,
4532                            lapack_int isgn, lapack_int m, lapack_int n,
4533                            const lapack_complex_float* a, lapack_int lda,
4534                            const lapack_complex_float* b, lapack_int ldb,
4535                            lapack_complex_float* c, lapack_int ldc,
4536                            float* scale );
4537 lapack_int LAPACKE_ztrsyl( int matrix_layout, char trana, char tranb,
4538                            lapack_int isgn, lapack_int m, lapack_int n,
4539                            const lapack_complex_double* a, lapack_int lda,
4540                            const lapack_complex_double* b, lapack_int ldb,
4541                            lapack_complex_double* c, lapack_int ldc,
4542                            double* scale );
4543
4544 lapack_int LAPACKE_strtri( int matrix_layout, char uplo, char diag, lapack_int n,
4545                            float* a, lapack_int lda );
4546 lapack_int LAPACKE_dtrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4547                            double* a, lapack_int lda );
4548 lapack_int LAPACKE_ctrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4549                            lapack_complex_float* a, lapack_int lda );
4550 lapack_int LAPACKE_ztrtri( int matrix_layout, char uplo, char diag, lapack_int n,
4551                            lapack_complex_double* a, lapack_int lda );
4552
4553 lapack_int LAPACKE_strtrs( int matrix_layout, char uplo, char trans, char diag,
4554                            lapack_int n, lapack_int nrhs, const float* a,
4555                            lapack_int lda, float* b, lapack_int ldb );
4556 lapack_int LAPACKE_dtrtrs( int matrix_layout, char uplo, char trans, char diag,
4557                            lapack_int n, lapack_int nrhs, const double* a,
4558                            lapack_int lda, double* b, lapack_int ldb );
4559 lapack_int LAPACKE_ctrtrs( int matrix_layout, char uplo, char trans, char diag,
4560                            lapack_int n, lapack_int nrhs,
4561                            const lapack_complex_float* a, lapack_int lda,
4562                            lapack_complex_float* b, lapack_int ldb );
4563 lapack_int LAPACKE_ztrtrs( int matrix_layout, char uplo, char trans, char diag,
4564                            lapack_int n, lapack_int nrhs,
4565                            const lapack_complex_double* a, lapack_int lda,
4566                            lapack_complex_double* b, lapack_int ldb );
4567
4568 lapack_int LAPACKE_strttf( int matrix_layout, char transr, char uplo,
4569                            lapack_int n, const float* a, lapack_int lda,
4570                            float* arf );
4571 lapack_int LAPACKE_dtrttf( int matrix_layout, char transr, char uplo,
4572                            lapack_int n, const double* a, lapack_int lda,
4573                            double* arf );
4574 lapack_int LAPACKE_ctrttf( int matrix_layout, char transr, char uplo,
4575                            lapack_int n, const lapack_complex_float* a,
4576                            lapack_int lda, lapack_complex_float* arf );
4577 lapack_int LAPACKE_ztrttf( int matrix_layout, char transr, char uplo,
4578                            lapack_int n, const lapack_complex_double* a,
4579                            lapack_int lda, lapack_complex_double* arf );
4580
4581 lapack_int LAPACKE_strttp( int matrix_layout, char uplo, lapack_int n,
4582                            const float* a, lapack_int lda, float* ap );
4583 lapack_int LAPACKE_dtrttp( int matrix_layout, char uplo, lapack_int n,
4584                            const double* a, lapack_int lda, double* ap );
4585 lapack_int LAPACKE_ctrttp( int matrix_layout, char uplo, lapack_int n,
4586                            const lapack_complex_float* a, lapack_int lda,
4587                            lapack_complex_float* ap );
4588 lapack_int LAPACKE_ztrttp( int matrix_layout, char uplo, lapack_int n,
4589                            const lapack_complex_double* a, lapack_int lda,
4590                            lapack_complex_double* ap );
4591
4592 lapack_int LAPACKE_stzrzf( int matrix_layout, lapack_int m, lapack_int n,
4593                            float* a, lapack_int lda, float* tau );
4594 lapack_int LAPACKE_dtzrzf( int matrix_layout, lapack_int m, lapack_int n,
4595                            double* a, lapack_int lda, double* tau );
4596 lapack_int LAPACKE_ctzrzf( int matrix_layout, lapack_int m, lapack_int n,
4597                            lapack_complex_float* a, lapack_int lda,
4598                            lapack_complex_float* tau );
4599 lapack_int LAPACKE_ztzrzf( int matrix_layout, lapack_int m, lapack_int n,
4600                            lapack_complex_double* a, lapack_int lda,
4601                            lapack_complex_double* tau );
4602
4603 lapack_int LAPACKE_cungbr( int matrix_layout, char vect, lapack_int m,
4604                            lapack_int n, lapack_int k, lapack_complex_float* a,
4605                            lapack_int lda, const lapack_complex_float* tau );
4606 lapack_int LAPACKE_zungbr( int matrix_layout, char vect, lapack_int m,
4607                            lapack_int n, lapack_int k, lapack_complex_double* a,
4608                            lapack_int lda, const lapack_complex_double* tau );
4609
4610 lapack_int LAPACKE_cunghr( int matrix_layout, lapack_int n, lapack_int ilo,
4611                            lapack_int ihi, lapack_complex_float* a,
4612                            lapack_int lda, const lapack_complex_float* tau );
4613 lapack_int LAPACKE_zunghr( int matrix_layout, lapack_int n, lapack_int ilo,
4614                            lapack_int ihi, lapack_complex_double* a,
4615                            lapack_int lda, const lapack_complex_double* tau );
4616
4617 lapack_int LAPACKE_cunglq( int matrix_layout, lapack_int m, lapack_int n,
4618                            lapack_int k, lapack_complex_float* a,
4619                            lapack_int lda, const lapack_complex_float* tau );
4620 lapack_int LAPACKE_zunglq( int matrix_layout, lapack_int m, lapack_int n,
4621                            lapack_int k, lapack_complex_double* a,
4622                            lapack_int lda, const lapack_complex_double* tau );
4623
4624 lapack_int LAPACKE_cungql( int matrix_layout, lapack_int m, lapack_int n,
4625                            lapack_int k, lapack_complex_float* a,
4626                            lapack_int lda, const lapack_complex_float* tau );
4627 lapack_int LAPACKE_zungql( int matrix_layout, lapack_int m, lapack_int n,
4628                            lapack_int k, lapack_complex_double* a,
4629                            lapack_int lda, const lapack_complex_double* tau );
4630
4631 lapack_int LAPACKE_cungqr( int matrix_layout, lapack_int m, lapack_int n,
4632                            lapack_int k, lapack_complex_float* a,
4633                            lapack_int lda, const lapack_complex_float* tau );
4634 lapack_int LAPACKE_zungqr( int matrix_layout, lapack_int m, lapack_int n,
4635                            lapack_int k, lapack_complex_double* a,
4636                            lapack_int lda, const lapack_complex_double* tau );
4637
4638 lapack_int LAPACKE_cungrq( int matrix_layout, lapack_int m, lapack_int n,
4639                            lapack_int k, lapack_complex_float* a,
4640                            lapack_int lda, const lapack_complex_float* tau );
4641 lapack_int LAPACKE_zungrq( int matrix_layout, lapack_int m, lapack_int n,
4642                            lapack_int k, lapack_complex_double* a,
4643                            lapack_int lda, const lapack_complex_double* tau );
4644
4645 lapack_int LAPACKE_cungtr( int matrix_layout, char uplo, lapack_int n,
4646                            lapack_complex_float* a, lapack_int lda,
4647                            const lapack_complex_float* tau );
4648 lapack_int LAPACKE_zungtr( int matrix_layout, char uplo, lapack_int n,
4649                            lapack_complex_double* a, lapack_int lda,
4650                            const lapack_complex_double* tau );
4651
4652 lapack_int LAPACKE_cunmbr( int matrix_layout, char vect, char side, char trans,
4653                            lapack_int m, lapack_int n, lapack_int k,
4654                            const lapack_complex_float* a, lapack_int lda,
4655                            const lapack_complex_float* tau,
4656                            lapack_complex_float* c, lapack_int ldc );
4657 lapack_int LAPACKE_zunmbr( int matrix_layout, char vect, char side, char trans,
4658                            lapack_int m, lapack_int n, lapack_int k,
4659                            const lapack_complex_double* a, lapack_int lda,
4660                            const lapack_complex_double* tau,
4661                            lapack_complex_double* c, lapack_int ldc );
4662
4663 lapack_int LAPACKE_cunmhr( int matrix_layout, char side, char trans,
4664                            lapack_int m, lapack_int n, lapack_int ilo,
4665                            lapack_int ihi, const lapack_complex_float* a,
4666                            lapack_int lda, const lapack_complex_float* tau,
4667                            lapack_complex_float* c, lapack_int ldc );
4668 lapack_int LAPACKE_zunmhr( int matrix_layout, char side, char trans,
4669                            lapack_int m, lapack_int n, lapack_int ilo,
4670                            lapack_int ihi, const lapack_complex_double* a,
4671                            lapack_int lda, const lapack_complex_double* tau,
4672                            lapack_complex_double* c, lapack_int ldc );
4673
4674 lapack_int LAPACKE_cunmlq( int matrix_layout, char side, char trans,
4675                            lapack_int m, lapack_int n, lapack_int k,
4676                            const lapack_complex_float* a, lapack_int lda,
4677                            const lapack_complex_float* tau,
4678                            lapack_complex_float* c, lapack_int ldc );
4679 lapack_int LAPACKE_zunmlq( int matrix_layout, char side, char trans,
4680                            lapack_int m, lapack_int n, lapack_int k,
4681                            const lapack_complex_double* a, lapack_int lda,
4682                            const lapack_complex_double* tau,
4683                            lapack_complex_double* c, lapack_int ldc );
4684
4685 lapack_int LAPACKE_cunmql( int matrix_layout, char side, char trans,
4686                            lapack_int m, lapack_int n, lapack_int k,
4687                            const lapack_complex_float* a, lapack_int lda,
4688                            const lapack_complex_float* tau,
4689                            lapack_complex_float* c, lapack_int ldc );
4690 lapack_int LAPACKE_zunmql( int matrix_layout, char side, char trans,
4691                            lapack_int m, lapack_int n, lapack_int k,
4692                            const lapack_complex_double* a, lapack_int lda,
4693                            const lapack_complex_double* tau,
4694                            lapack_complex_double* c, lapack_int ldc );
4695
4696 lapack_int LAPACKE_cunmqr( int matrix_layout, char side, char trans,
4697                            lapack_int m, lapack_int n, lapack_int k,
4698                            const lapack_complex_float* a, lapack_int lda,
4699                            const lapack_complex_float* tau,
4700                            lapack_complex_float* c, lapack_int ldc );
4701 lapack_int LAPACKE_zunmqr( int matrix_layout, char side, char trans,
4702                            lapack_int m, lapack_int n, lapack_int k,
4703                            const lapack_complex_double* a, lapack_int lda,
4704                            const lapack_complex_double* tau,
4705                            lapack_complex_double* c, lapack_int ldc );
4706
4707 lapack_int LAPACKE_cunmrq( int matrix_layout, char side, char trans,
4708                            lapack_int m, lapack_int n, lapack_int k,
4709                            const lapack_complex_float* a, lapack_int lda,
4710                            const lapack_complex_float* tau,
4711                            lapack_complex_float* c, lapack_int ldc );
4712 lapack_int LAPACKE_zunmrq( int matrix_layout, char side, char trans,
4713                            lapack_int m, lapack_int n, lapack_int k,
4714                            const lapack_complex_double* a, lapack_int lda,
4715                            const lapack_complex_double* tau,
4716                            lapack_complex_double* c, lapack_int ldc );
4717
4718 lapack_int LAPACKE_cunmrz( int matrix_layout, char side, char trans,
4719                            lapack_int m, lapack_int n, lapack_int k,
4720                            lapack_int l, const lapack_complex_float* a,
4721                            lapack_int lda, const lapack_complex_float* tau,
4722                            lapack_complex_float* c, lapack_int ldc );
4723 lapack_int LAPACKE_zunmrz( int matrix_layout, char side, char trans,
4724                            lapack_int m, lapack_int n, lapack_int k,
4725                            lapack_int l, const lapack_complex_double* a,
4726                            lapack_int lda, const lapack_complex_double* tau,
4727                            lapack_complex_double* c, lapack_int ldc );
4728
4729 lapack_int LAPACKE_cunmtr( int matrix_layout, char side, char uplo, char trans,
4730                            lapack_int m, lapack_int n,
4731                            const lapack_complex_float* a, lapack_int lda,
4732                            const lapack_complex_float* tau,
4733                            lapack_complex_float* c, lapack_int ldc );
4734 lapack_int LAPACKE_zunmtr( int matrix_layout, char side, char uplo, char trans,
4735                            lapack_int m, lapack_int n,
4736                            const lapack_complex_double* a, lapack_int lda,
4737                            const lapack_complex_double* tau,
4738                            lapack_complex_double* c, lapack_int ldc );
4739
4740 lapack_int LAPACKE_cupgtr( int matrix_layout, char uplo, lapack_int n,
4741                            const lapack_complex_float* ap,
4742                            const lapack_complex_float* tau,
4743                            lapack_complex_float* q, lapack_int ldq );
4744 lapack_int LAPACKE_zupgtr( int matrix_layout, char uplo, lapack_int n,
4745                            const lapack_complex_double* ap,
4746                            const lapack_complex_double* tau,
4747                            lapack_complex_double* q, lapack_int ldq );
4748
4749 lapack_int LAPACKE_cupmtr( int matrix_layout, char side, char uplo, char trans,
4750                            lapack_int m, lapack_int n,
4751                            const lapack_complex_float* ap,
4752                            const lapack_complex_float* tau,
4753                            lapack_complex_float* c, lapack_int ldc );
4754 lapack_int LAPACKE_zupmtr( int matrix_layout, char side, char uplo, char trans,
4755                            lapack_int m, lapack_int n,
4756                            const lapack_complex_double* ap,
4757                            const lapack_complex_double* tau,
4758                            lapack_complex_double* c, lapack_int ldc );
4759
4760 lapack_int LAPACKE_sbdsdc_work( int matrix_layout, char uplo, char compq,
4761                                 lapack_int n, float* d, float* e, float* u,
4762                                 lapack_int ldu, float* vt, lapack_int ldvt,
4763                                 float* q, lapack_int* iq, float* work,
4764                                 lapack_int* iwork );
4765 lapack_int LAPACKE_dbdsdc_work( int matrix_layout, char uplo, char compq,
4766                                 lapack_int n, double* d, double* e, double* u,
4767                                 lapack_int ldu, double* vt, lapack_int ldvt,
4768                                 double* q, lapack_int* iq, double* work,
4769                                 lapack_int* iwork );
4770
4771 lapack_int LAPACKE_sbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
4772                                  lapack_int n, float* d, float* e,
4773                                  float vl, float vu,
4774                                  lapack_int il, lapack_int iu, lapack_int* ns,
4775                                  float* s, float* z, lapack_int ldz,
4776                                  float* work, lapack_int* iwork );
4777 lapack_int LAPACKE_dbdsvdx_work( int matrix_layout, char uplo, char jobz, char range,
4778                                  lapack_int n, double* d, double* e,
4779                                  double vl, double vu,
4780                                  lapack_int il, lapack_int iu, lapack_int* ns,
4781                                  double* s, double* z, lapack_int ldz,
4782                                  double* work, lapack_int* iwork );
4783
4784 lapack_int LAPACKE_sbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4785                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4786                                 float* d, float* e, float* vt, lapack_int ldvt,
4787                                 float* u, lapack_int ldu, float* c,
4788                                 lapack_int ldc, float* work );
4789 lapack_int LAPACKE_dbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4790                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4791                                 double* d, double* e, double* vt,
4792                                 lapack_int ldvt, double* u, lapack_int ldu,
4793                                 double* c, lapack_int ldc, double* work );
4794 lapack_int LAPACKE_cbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4795                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4796                                 float* d, float* e, lapack_complex_float* vt,
4797                                 lapack_int ldvt, lapack_complex_float* u,
4798                                 lapack_int ldu, lapack_complex_float* c,
4799                                 lapack_int ldc, float* work );
4800 lapack_int LAPACKE_zbdsqr_work( int matrix_layout, char uplo, lapack_int n,
4801                                 lapack_int ncvt, lapack_int nru, lapack_int ncc,
4802                                 double* d, double* e, lapack_complex_double* vt,
4803                                 lapack_int ldvt, lapack_complex_double* u,
4804                                 lapack_int ldu, lapack_complex_double* c,
4805                                 lapack_int ldc, double* work );
4806
4807 lapack_int LAPACKE_sdisna_work( char job, lapack_int m, lapack_int n,
4808                                 const float* d, float* sep );
4809 lapack_int LAPACKE_ddisna_work( char job, lapack_int m, lapack_int n,
4810                                 const double* d, double* sep );
4811
4812 lapack_int LAPACKE_sgbbrd_work( int matrix_layout, char vect, lapack_int m,
4813                                 lapack_int n, lapack_int ncc, lapack_int kl,
4814                                 lapack_int ku, float* ab, lapack_int ldab,
4815                                 float* d, float* e, float* q, lapack_int ldq,
4816                                 float* pt, lapack_int ldpt, float* c,
4817                                 lapack_int ldc, float* work );
4818 lapack_int LAPACKE_dgbbrd_work( int matrix_layout, char vect, lapack_int m,
4819                                 lapack_int n, lapack_int ncc, lapack_int kl,
4820                                 lapack_int ku, double* ab, lapack_int ldab,
4821                                 double* d, double* e, double* q, lapack_int ldq,
4822                                 double* pt, lapack_int ldpt, double* c,
4823                                 lapack_int ldc, double* work );
4824 lapack_int LAPACKE_cgbbrd_work( int matrix_layout, char vect, lapack_int m,
4825                                 lapack_int n, lapack_int ncc, lapack_int kl,
4826                                 lapack_int ku, lapack_complex_float* ab,
4827                                 lapack_int ldab, float* d, float* e,
4828                                 lapack_complex_float* q, lapack_int ldq,
4829                                 lapack_complex_float* pt, lapack_int ldpt,
4830                                 lapack_complex_float* c, lapack_int ldc,
4831                                 lapack_complex_float* work, float* rwork );
4832 lapack_int LAPACKE_zgbbrd_work( int matrix_layout, char vect, lapack_int m,
4833                                 lapack_int n, lapack_int ncc, lapack_int kl,
4834                                 lapack_int ku, lapack_complex_double* ab,
4835                                 lapack_int ldab, double* d, double* e,
4836                                 lapack_complex_double* q, lapack_int ldq,
4837                                 lapack_complex_double* pt, lapack_int ldpt,
4838                                 lapack_complex_double* c, lapack_int ldc,
4839                                 lapack_complex_double* work, double* rwork );
4840
4841 lapack_int LAPACKE_sgbcon_work( int matrix_layout, char norm, lapack_int n,
4842                                 lapack_int kl, lapack_int ku, const float* ab,
4843                                 lapack_int ldab, const lapack_int* ipiv,
4844                                 float anorm, float* rcond, float* work,
4845                                 lapack_int* iwork );
4846 lapack_int LAPACKE_dgbcon_work( int matrix_layout, char norm, lapack_int n,
4847                                 lapack_int kl, lapack_int ku, const double* ab,
4848                                 lapack_int ldab, const lapack_int* ipiv,
4849                                 double anorm, double* rcond, double* work,
4850                                 lapack_int* iwork );
4851 lapack_int LAPACKE_cgbcon_work( int matrix_layout, char norm, lapack_int n,
4852                                 lapack_int kl, lapack_int ku,
4853                                 const lapack_complex_float* ab, lapack_int ldab,
4854                                 const lapack_int* ipiv, float anorm,
4855                                 float* rcond, lapack_complex_float* work,
4856                                 float* rwork );
4857 lapack_int LAPACKE_zgbcon_work( int matrix_layout, char norm, lapack_int n,
4858                                 lapack_int kl, lapack_int ku,
4859                                 const lapack_complex_double* ab,
4860                                 lapack_int ldab, const lapack_int* ipiv,
4861                                 double anorm, double* rcond,
4862                                 lapack_complex_double* work, double* rwork );
4863
4864 lapack_int LAPACKE_sgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4865                                 lapack_int kl, lapack_int ku, const float* ab,
4866                                 lapack_int ldab, float* r, float* c,
4867                                 float* rowcnd, float* colcnd, float* amax );
4868 lapack_int LAPACKE_dgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4869                                 lapack_int kl, lapack_int ku, const double* ab,
4870                                 lapack_int ldab, double* r, double* c,
4871                                 double* rowcnd, double* colcnd, double* amax );
4872 lapack_int LAPACKE_cgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4873                                 lapack_int kl, lapack_int ku,
4874                                 const lapack_complex_float* ab, lapack_int ldab,
4875                                 float* r, float* c, float* rowcnd,
4876                                 float* colcnd, float* amax );
4877 lapack_int LAPACKE_zgbequ_work( int matrix_layout, lapack_int m, lapack_int n,
4878                                 lapack_int kl, lapack_int ku,
4879                                 const lapack_complex_double* ab,
4880                                 lapack_int ldab, double* r, double* c,
4881                                 double* rowcnd, double* colcnd, double* amax );
4882
4883 lapack_int LAPACKE_sgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4884                                  lapack_int kl, lapack_int ku, const float* ab,
4885                                  lapack_int ldab, float* r, float* c,
4886                                  float* rowcnd, float* colcnd, float* amax );
4887 lapack_int LAPACKE_dgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4888                                  lapack_int kl, lapack_int ku, const double* ab,
4889                                  lapack_int ldab, double* r, double* c,
4890                                  double* rowcnd, double* colcnd, double* amax );
4891 lapack_int LAPACKE_cgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4892                                  lapack_int kl, lapack_int ku,
4893                                  const lapack_complex_float* ab,
4894                                  lapack_int ldab, float* r, float* c,
4895                                  float* rowcnd, float* colcnd, float* amax );
4896 lapack_int LAPACKE_zgbequb_work( int matrix_layout, lapack_int m, lapack_int n,
4897                                  lapack_int kl, lapack_int ku,
4898                                  const lapack_complex_double* ab,
4899                                  lapack_int ldab, double* r, double* c,
4900                                  double* rowcnd, double* colcnd, double* amax );
4901
4902 lapack_int LAPACKE_sgbrfs_work( int matrix_layout, char trans, lapack_int n,
4903                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4904                                 const float* ab, lapack_int ldab,
4905                                 const float* afb, lapack_int ldafb,
4906                                 const lapack_int* ipiv, const float* b,
4907                                 lapack_int ldb, float* x, lapack_int ldx,
4908                                 float* ferr, float* berr, float* work,
4909                                 lapack_int* iwork );
4910 lapack_int LAPACKE_dgbrfs_work( int matrix_layout, char trans, lapack_int n,
4911                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4912                                 const double* ab, lapack_int ldab,
4913                                 const double* afb, lapack_int ldafb,
4914                                 const lapack_int* ipiv, const double* b,
4915                                 lapack_int ldb, double* x, lapack_int ldx,
4916                                 double* ferr, double* berr, double* work,
4917                                 lapack_int* iwork );
4918 lapack_int LAPACKE_cgbrfs_work( int matrix_layout, char trans, lapack_int n,
4919                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4920                                 const lapack_complex_float* ab, lapack_int ldab,
4921                                 const lapack_complex_float* afb,
4922                                 lapack_int ldafb, const lapack_int* ipiv,
4923                                 const lapack_complex_float* b, lapack_int ldb,
4924                                 lapack_complex_float* x, lapack_int ldx,
4925                                 float* ferr, float* berr,
4926                                 lapack_complex_float* work, float* rwork );
4927 lapack_int LAPACKE_zgbrfs_work( int matrix_layout, char trans, lapack_int n,
4928                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
4929                                 const lapack_complex_double* ab,
4930                                 lapack_int ldab,
4931                                 const lapack_complex_double* afb,
4932                                 lapack_int ldafb, const lapack_int* ipiv,
4933                                 const lapack_complex_double* b, lapack_int ldb,
4934                                 lapack_complex_double* x, lapack_int ldx,
4935                                 double* ferr, double* berr,
4936                                 lapack_complex_double* work, double* rwork );
4937
4938 lapack_int LAPACKE_sgbrfsx_work( int matrix_layout, char trans, char equed,
4939                                  lapack_int n, lapack_int kl, lapack_int ku,
4940                                  lapack_int nrhs, const float* ab,
4941                                  lapack_int ldab, const float* afb,
4942                                  lapack_int ldafb, const lapack_int* ipiv,
4943                                  const float* r, const float* c, const float* b,
4944                                  lapack_int ldb, float* x, lapack_int ldx,
4945                                  float* rcond, float* berr,
4946                                  lapack_int n_err_bnds, float* err_bnds_norm,
4947                                  float* err_bnds_comp, lapack_int nparams,
4948                                  float* params, float* work,
4949                                  lapack_int* iwork );
4950 lapack_int LAPACKE_dgbrfsx_work( int matrix_layout, char trans, char equed,
4951                                  lapack_int n, lapack_int kl, lapack_int ku,
4952                                  lapack_int nrhs, const double* ab,
4953                                  lapack_int ldab, const double* afb,
4954                                  lapack_int ldafb, const lapack_int* ipiv,
4955                                  const double* r, const double* c,
4956                                  const double* b, lapack_int ldb, double* x,
4957                                  lapack_int ldx, double* rcond, double* berr,
4958                                  lapack_int n_err_bnds, double* err_bnds_norm,
4959                                  double* err_bnds_comp, lapack_int nparams,
4960                                  double* params, double* work,
4961                                  lapack_int* iwork );
4962 lapack_int LAPACKE_cgbrfsx_work( int matrix_layout, char trans, char equed,
4963                                  lapack_int n, lapack_int kl, lapack_int ku,
4964                                  lapack_int nrhs,
4965                                  const lapack_complex_float* ab,
4966                                  lapack_int ldab,
4967                                  const lapack_complex_float* afb,
4968                                  lapack_int ldafb, const lapack_int* ipiv,
4969                                  const float* r, const float* c,
4970                                  const lapack_complex_float* b, lapack_int ldb,
4971                                  lapack_complex_float* x, lapack_int ldx,
4972                                  float* rcond, float* berr,
4973                                  lapack_int n_err_bnds, float* err_bnds_norm,
4974                                  float* err_bnds_comp, lapack_int nparams,
4975                                  float* params, lapack_complex_float* work,
4976                                  float* rwork );
4977 lapack_int LAPACKE_zgbrfsx_work( int matrix_layout, char trans, char equed,
4978                                  lapack_int n, lapack_int kl, lapack_int ku,
4979                                  lapack_int nrhs,
4980                                  const lapack_complex_double* ab,
4981                                  lapack_int ldab,
4982                                  const lapack_complex_double* afb,
4983                                  lapack_int ldafb, const lapack_int* ipiv,
4984                                  const double* r, const double* c,
4985                                  const lapack_complex_double* b, lapack_int ldb,
4986                                  lapack_complex_double* x, lapack_int ldx,
4987                                  double* rcond, double* berr,
4988                                  lapack_int n_err_bnds, double* err_bnds_norm,
4989                                  double* err_bnds_comp, lapack_int nparams,
4990                                  double* params, lapack_complex_double* work,
4991                                  double* rwork );
4992
4993 lapack_int LAPACKE_sgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
4994                                lapack_int ku, lapack_int nrhs, float* ab,
4995                                lapack_int ldab, lapack_int* ipiv, float* b,
4996                                lapack_int ldb );
4997 lapack_int LAPACKE_dgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
4998                                lapack_int ku, lapack_int nrhs, double* ab,
4999                                lapack_int ldab, lapack_int* ipiv, double* b,
5000                                lapack_int ldb );
5001 lapack_int LAPACKE_cgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
5002                                lapack_int ku, lapack_int nrhs,
5003                                lapack_complex_float* ab, lapack_int ldab,
5004                                lapack_int* ipiv, lapack_complex_float* b,
5005                                lapack_int ldb );
5006 lapack_int LAPACKE_zgbsv_work( int matrix_layout, lapack_int n, lapack_int kl,
5007                                lapack_int ku, lapack_int nrhs,
5008                                lapack_complex_double* ab, lapack_int ldab,
5009                                lapack_int* ipiv, lapack_complex_double* b,
5010                                lapack_int ldb );
5011
5012 lapack_int LAPACKE_sgbsvx_work( int matrix_layout, char fact, char trans,
5013                                 lapack_int n, lapack_int kl, lapack_int ku,
5014                                 lapack_int nrhs, float* ab, lapack_int ldab,
5015                                 float* afb, lapack_int ldafb, lapack_int* ipiv,
5016                                 char* equed, float* r, float* c, float* b,
5017                                 lapack_int ldb, float* x, lapack_int ldx,
5018                                 float* rcond, float* ferr, float* berr,
5019                                 float* work, lapack_int* iwork );
5020 lapack_int LAPACKE_dgbsvx_work( int matrix_layout, char fact, char trans,
5021                                 lapack_int n, lapack_int kl, lapack_int ku,
5022                                 lapack_int nrhs, double* ab, lapack_int ldab,
5023                                 double* afb, lapack_int ldafb, lapack_int* ipiv,
5024                                 char* equed, double* r, double* c, double* b,
5025                                 lapack_int ldb, double* x, lapack_int ldx,
5026                                 double* rcond, double* ferr, double* berr,
5027                                 double* work, lapack_int* iwork );
5028 lapack_int LAPACKE_cgbsvx_work( int matrix_layout, char fact, char trans,
5029                                 lapack_int n, lapack_int kl, lapack_int ku,
5030                                 lapack_int nrhs, lapack_complex_float* ab,
5031                                 lapack_int ldab, lapack_complex_float* afb,
5032                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
5033                                 float* r, float* c, lapack_complex_float* b,
5034                                 lapack_int ldb, lapack_complex_float* x,
5035                                 lapack_int ldx, float* rcond, float* ferr,
5036                                 float* berr, lapack_complex_float* work,
5037                                 float* rwork );
5038 lapack_int LAPACKE_zgbsvx_work( int matrix_layout, char fact, char trans,
5039                                 lapack_int n, lapack_int kl, lapack_int ku,
5040                                 lapack_int nrhs, lapack_complex_double* ab,
5041                                 lapack_int ldab, lapack_complex_double* afb,
5042                                 lapack_int ldafb, lapack_int* ipiv, char* equed,
5043                                 double* r, double* c, lapack_complex_double* b,
5044                                 lapack_int ldb, lapack_complex_double* x,
5045                                 lapack_int ldx, double* rcond, double* ferr,
5046                                 double* berr, lapack_complex_double* work,
5047                                 double* rwork );
5048
5049 lapack_int LAPACKE_sgbsvxx_work( int matrix_layout, char fact, char trans,
5050                                  lapack_int n, lapack_int kl, lapack_int ku,
5051                                  lapack_int nrhs, float* ab, lapack_int ldab,
5052                                  float* afb, lapack_int ldafb, lapack_int* ipiv,
5053                                  char* equed, float* r, float* c, float* b,
5054                                  lapack_int ldb, float* x, lapack_int ldx,
5055                                  float* rcond, float* rpvgrw, float* berr,
5056                                  lapack_int n_err_bnds, float* err_bnds_norm,
5057                                  float* err_bnds_comp, lapack_int nparams,
5058                                  float* params, float* work,
5059                                  lapack_int* iwork );
5060 lapack_int LAPACKE_dgbsvxx_work( int matrix_layout, char fact, char trans,
5061                                  lapack_int n, lapack_int kl, lapack_int ku,
5062                                  lapack_int nrhs, double* ab, lapack_int ldab,
5063                                  double* afb, lapack_int ldafb,
5064                                  lapack_int* ipiv, char* equed, double* r,
5065                                  double* c, double* b, lapack_int ldb,
5066                                  double* x, lapack_int ldx, double* rcond,
5067                                  double* rpvgrw, double* berr,
5068                                  lapack_int n_err_bnds, double* err_bnds_norm,
5069                                  double* err_bnds_comp, lapack_int nparams,
5070                                  double* params, double* work,
5071                                  lapack_int* iwork );
5072 lapack_int LAPACKE_cgbsvxx_work( int matrix_layout, char fact, char trans,
5073                                  lapack_int n, lapack_int kl, lapack_int ku,
5074                                  lapack_int nrhs, lapack_complex_float* ab,
5075                                  lapack_int ldab, lapack_complex_float* afb,
5076                                  lapack_int ldafb, lapack_int* ipiv,
5077                                  char* equed, float* r, float* c,
5078                                  lapack_complex_float* b, lapack_int ldb,
5079                                  lapack_complex_float* x, lapack_int ldx,
5080                                  float* rcond, float* rpvgrw, float* berr,
5081                                  lapack_int n_err_bnds, float* err_bnds_norm,
5082                                  float* err_bnds_comp, lapack_int nparams,
5083                                  float* params, lapack_complex_float* work,
5084                                  float* rwork );
5085 lapack_int LAPACKE_zgbsvxx_work( int matrix_layout, char fact, char trans,
5086                                  lapack_int n, lapack_int kl, lapack_int ku,
5087                                  lapack_int nrhs, lapack_complex_double* ab,
5088                                  lapack_int ldab, lapack_complex_double* afb,
5089                                  lapack_int ldafb, lapack_int* ipiv,
5090                                  char* equed, double* r, double* c,
5091                                  lapack_complex_double* b, lapack_int ldb,
5092                                  lapack_complex_double* x, lapack_int ldx,
5093                                  double* rcond, double* rpvgrw, double* berr,
5094                                  lapack_int n_err_bnds, double* err_bnds_norm,
5095                                  double* err_bnds_comp, lapack_int nparams,
5096                                  double* params, lapack_complex_double* work,
5097                                  double* rwork );
5098
5099 lapack_int LAPACKE_sgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5100                                 lapack_int kl, lapack_int ku, float* ab,
5101                                 lapack_int ldab, lapack_int* ipiv );
5102 lapack_int LAPACKE_dgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5103                                 lapack_int kl, lapack_int ku, double* ab,
5104                                 lapack_int ldab, lapack_int* ipiv );
5105 lapack_int LAPACKE_cgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5106                                 lapack_int kl, lapack_int ku,
5107                                 lapack_complex_float* ab, lapack_int ldab,
5108                                 lapack_int* ipiv );
5109 lapack_int LAPACKE_zgbtrf_work( int matrix_layout, lapack_int m, lapack_int n,
5110                                 lapack_int kl, lapack_int ku,
5111                                 lapack_complex_double* ab, lapack_int ldab,
5112                                 lapack_int* ipiv );
5113
5114 lapack_int LAPACKE_sgbtrs_work( int matrix_layout, char trans, lapack_int n,
5115                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5116                                 const float* ab, lapack_int ldab,
5117                                 const lapack_int* ipiv, float* b,
5118                                 lapack_int ldb );
5119 lapack_int LAPACKE_dgbtrs_work( int matrix_layout, char trans, lapack_int n,
5120                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5121                                 const double* ab, lapack_int ldab,
5122                                 const lapack_int* ipiv, double* b,
5123                                 lapack_int ldb );
5124 lapack_int LAPACKE_cgbtrs_work( int matrix_layout, char trans, lapack_int n,
5125                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5126                                 const lapack_complex_float* ab, lapack_int ldab,
5127                                 const lapack_int* ipiv, lapack_complex_float* b,
5128                                 lapack_int ldb );
5129 lapack_int LAPACKE_zgbtrs_work( int matrix_layout, char trans, lapack_int n,
5130                                 lapack_int kl, lapack_int ku, lapack_int nrhs,
5131                                 const lapack_complex_double* ab,
5132                                 lapack_int ldab, const lapack_int* ipiv,
5133                                 lapack_complex_double* b, lapack_int ldb );
5134
5135 lapack_int LAPACKE_sgebak_work( int matrix_layout, char job, char side,
5136                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5137                                 const float* scale, lapack_int m, float* v,
5138                                 lapack_int ldv );
5139 lapack_int LAPACKE_dgebak_work( int matrix_layout, char job, char side,
5140                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5141                                 const double* scale, lapack_int m, double* v,
5142                                 lapack_int ldv );
5143 lapack_int LAPACKE_cgebak_work( int matrix_layout, char job, char side,
5144                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5145                                 const float* scale, lapack_int m,
5146                                 lapack_complex_float* v, lapack_int ldv );
5147 lapack_int LAPACKE_zgebak_work( int matrix_layout, char job, char side,
5148                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5149                                 const double* scale, lapack_int m,
5150                                 lapack_complex_double* v, lapack_int ldv );
5151
5152 lapack_int LAPACKE_sgebal_work( int matrix_layout, char job, lapack_int n,
5153                                 float* a, lapack_int lda, lapack_int* ilo,
5154                                 lapack_int* ihi, float* scale );
5155 lapack_int LAPACKE_dgebal_work( int matrix_layout, char job, lapack_int n,
5156                                 double* a, lapack_int lda, lapack_int* ilo,
5157                                 lapack_int* ihi, double* scale );
5158 lapack_int LAPACKE_cgebal_work( int matrix_layout, char job, lapack_int n,
5159                                 lapack_complex_float* a, lapack_int lda,
5160                                 lapack_int* ilo, lapack_int* ihi,
5161                                 float* scale );
5162 lapack_int LAPACKE_zgebal_work( int matrix_layout, char job, lapack_int n,
5163                                 lapack_complex_double* a, lapack_int lda,
5164                                 lapack_int* ilo, lapack_int* ihi,
5165                                 double* scale );
5166
5167 lapack_int LAPACKE_sgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5168                                 float* a, lapack_int lda, float* d, float* e,
5169                                 float* tauq, float* taup, float* work,
5170                                 lapack_int lwork );
5171 lapack_int LAPACKE_dgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5172                                 double* a, lapack_int lda, double* d, double* e,
5173                                 double* tauq, double* taup, double* work,
5174                                 lapack_int lwork );
5175 lapack_int LAPACKE_cgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5176                                 lapack_complex_float* a, lapack_int lda,
5177                                 float* d, float* e, lapack_complex_float* tauq,
5178                                 lapack_complex_float* taup,
5179                                 lapack_complex_float* work, lapack_int lwork );
5180 lapack_int LAPACKE_zgebrd_work( int matrix_layout, lapack_int m, lapack_int n,
5181                                 lapack_complex_double* a, lapack_int lda,
5182                                 double* d, double* e,
5183                                 lapack_complex_double* tauq,
5184                                 lapack_complex_double* taup,
5185                                 lapack_complex_double* work, lapack_int lwork );
5186
5187 lapack_int LAPACKE_sgecon_work( int matrix_layout, char norm, lapack_int n,
5188                                 const float* a, lapack_int lda, float anorm,
5189                                 float* rcond, float* work, lapack_int* iwork );
5190 lapack_int LAPACKE_dgecon_work( int matrix_layout, char norm, lapack_int n,
5191                                 const double* a, lapack_int lda, double anorm,
5192                                 double* rcond, double* work,
5193                                 lapack_int* iwork );
5194 lapack_int LAPACKE_cgecon_work( int matrix_layout, char norm, lapack_int n,
5195                                 const lapack_complex_float* a, lapack_int lda,
5196                                 float anorm, float* rcond,
5197                                 lapack_complex_float* work, float* rwork );
5198 lapack_int LAPACKE_zgecon_work( int matrix_layout, char norm, lapack_int n,
5199                                 const lapack_complex_double* a, lapack_int lda,
5200                                 double anorm, double* rcond,
5201                                 lapack_complex_double* work, double* rwork );
5202
5203 lapack_int LAPACKE_sgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5204                                 const float* a, lapack_int lda, float* r,
5205                                 float* c, float* rowcnd, float* colcnd,
5206                                 float* amax );
5207 lapack_int LAPACKE_dgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5208                                 const double* a, lapack_int lda, double* r,
5209                                 double* c, double* rowcnd, double* colcnd,
5210                                 double* amax );
5211 lapack_int LAPACKE_cgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5212                                 const lapack_complex_float* a, lapack_int lda,
5213                                 float* r, float* c, float* rowcnd,
5214                                 float* colcnd, float* amax );
5215 lapack_int LAPACKE_zgeequ_work( int matrix_layout, lapack_int m, lapack_int n,
5216                                 const lapack_complex_double* a, lapack_int lda,
5217                                 double* r, double* c, double* rowcnd,
5218                                 double* colcnd, double* amax );
5219
5220 lapack_int LAPACKE_sgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5221                                  const float* a, lapack_int lda, float* r,
5222                                  float* c, float* rowcnd, float* colcnd,
5223                                  float* amax );
5224 lapack_int LAPACKE_dgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5225                                  const double* a, lapack_int lda, double* r,
5226                                  double* c, double* rowcnd, double* colcnd,
5227                                  double* amax );
5228 lapack_int LAPACKE_cgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5229                                  const lapack_complex_float* a, lapack_int lda,
5230                                  float* r, float* c, float* rowcnd,
5231                                  float* colcnd, float* amax );
5232 lapack_int LAPACKE_zgeequb_work( int matrix_layout, lapack_int m, lapack_int n,
5233                                  const lapack_complex_double* a, lapack_int lda,
5234                                  double* r, double* c, double* rowcnd,
5235                                  double* colcnd, double* amax );
5236
5237 lapack_int LAPACKE_sgees_work( int matrix_layout, char jobvs, char sort,
5238                                LAPACK_S_SELECT2 select, lapack_int n, float* a,
5239                                lapack_int lda, lapack_int* sdim, float* wr,
5240                                float* wi, float* vs, lapack_int ldvs,
5241                                float* work, lapack_int lwork,
5242                                lapack_logical* bwork );
5243 lapack_int LAPACKE_dgees_work( int matrix_layout, char jobvs, char sort,
5244                                LAPACK_D_SELECT2 select, lapack_int n, double* a,
5245                                lapack_int lda, lapack_int* sdim, double* wr,
5246                                double* wi, double* vs, lapack_int ldvs,
5247                                double* work, lapack_int lwork,
5248                                lapack_logical* bwork );
5249 lapack_int LAPACKE_cgees_work( int matrix_layout, char jobvs, char sort,
5250                                LAPACK_C_SELECT1 select, lapack_int n,
5251                                lapack_complex_float* a, lapack_int lda,
5252                                lapack_int* sdim, lapack_complex_float* w,
5253                                lapack_complex_float* vs, lapack_int ldvs,
5254                                lapack_complex_float* work, lapack_int lwork,
5255                                float* rwork, lapack_logical* bwork );
5256 lapack_int LAPACKE_zgees_work( int matrix_layout, char jobvs, char sort,
5257                                LAPACK_Z_SELECT1 select, lapack_int n,
5258                                lapack_complex_double* a, lapack_int lda,
5259                                lapack_int* sdim, lapack_complex_double* w,
5260                                lapack_complex_double* vs, lapack_int ldvs,
5261                                lapack_complex_double* work, lapack_int lwork,
5262                                double* rwork, lapack_logical* bwork );
5263
5264 lapack_int LAPACKE_sgeesx_work( int matrix_layout, char jobvs, char sort,
5265                                 LAPACK_S_SELECT2 select, char sense,
5266                                 lapack_int n, float* a, lapack_int lda,
5267                                 lapack_int* sdim, float* wr, float* wi,
5268                                 float* vs, lapack_int ldvs, float* rconde,
5269                                 float* rcondv, float* work, lapack_int lwork,
5270                                 lapack_int* iwork, lapack_int liwork,
5271                                 lapack_logical* bwork );
5272 lapack_int LAPACKE_dgeesx_work( int matrix_layout, char jobvs, char sort,
5273                                 LAPACK_D_SELECT2 select, char sense,
5274                                 lapack_int n, double* a, lapack_int lda,
5275                                 lapack_int* sdim, double* wr, double* wi,
5276                                 double* vs, lapack_int ldvs, double* rconde,
5277                                 double* rcondv, double* work, lapack_int lwork,
5278                                 lapack_int* iwork, lapack_int liwork,
5279                                 lapack_logical* bwork );
5280 lapack_int LAPACKE_cgeesx_work( int matrix_layout, char jobvs, char sort,
5281                                 LAPACK_C_SELECT1 select, char sense,
5282                                 lapack_int n, lapack_complex_float* a,
5283                                 lapack_int lda, lapack_int* sdim,
5284                                 lapack_complex_float* w,
5285                                 lapack_complex_float* vs, lapack_int ldvs,
5286                                 float* rconde, float* rcondv,
5287                                 lapack_complex_float* work, lapack_int lwork,
5288                                 float* rwork, lapack_logical* bwork );
5289 lapack_int LAPACKE_zgeesx_work( int matrix_layout, char jobvs, char sort,
5290                                 LAPACK_Z_SELECT1 select, char sense,
5291                                 lapack_int n, lapack_complex_double* a,
5292                                 lapack_int lda, lapack_int* sdim,
5293                                 lapack_complex_double* w,
5294                                 lapack_complex_double* vs, lapack_int ldvs,
5295                                 double* rconde, double* rcondv,
5296                                 lapack_complex_double* work, lapack_int lwork,
5297                                 double* rwork, lapack_logical* bwork );
5298
5299 lapack_int LAPACKE_sgeev_work( int matrix_layout, char jobvl, char jobvr,
5300                                lapack_int n, float* a, lapack_int lda,
5301                                float* wr, float* wi, float* vl, lapack_int ldvl,
5302                                float* vr, lapack_int ldvr, float* work,
5303                                lapack_int lwork );
5304 lapack_int LAPACKE_dgeev_work( int matrix_layout, char jobvl, char jobvr,
5305                                lapack_int n, double* a, lapack_int lda,
5306                                double* wr, double* wi, double* vl,
5307                                lapack_int ldvl, double* vr, lapack_int ldvr,
5308                                double* work, lapack_int lwork );
5309 lapack_int LAPACKE_cgeev_work( int matrix_layout, char jobvl, char jobvr,
5310                                lapack_int n, lapack_complex_float* a,
5311                                lapack_int lda, lapack_complex_float* w,
5312                                lapack_complex_float* vl, lapack_int ldvl,
5313                                lapack_complex_float* vr, lapack_int ldvr,
5314                                lapack_complex_float* work, lapack_int lwork,
5315                                float* rwork );
5316 lapack_int LAPACKE_zgeev_work( int matrix_layout, char jobvl, char jobvr,
5317                                lapack_int n, lapack_complex_double* a,
5318                                lapack_int lda, lapack_complex_double* w,
5319                                lapack_complex_double* vl, lapack_int ldvl,
5320                                lapack_complex_double* vr, lapack_int ldvr,
5321                                lapack_complex_double* work, lapack_int lwork,
5322                                double* rwork );
5323
5324 lapack_int LAPACKE_sgeevx_work( int matrix_layout, char balanc, char jobvl,
5325                                 char jobvr, char sense, lapack_int n, float* a,
5326                                 lapack_int lda, float* wr, float* wi, float* vl,
5327                                 lapack_int ldvl, float* vr, lapack_int ldvr,
5328                                 lapack_int* ilo, lapack_int* ihi, float* scale,
5329                                 float* abnrm, float* rconde, float* rcondv,
5330                                 float* work, lapack_int lwork,
5331                                 lapack_int* iwork );
5332 lapack_int LAPACKE_dgeevx_work( int matrix_layout, char balanc, char jobvl,
5333                                 char jobvr, char sense, lapack_int n, double* a,
5334                                 lapack_int lda, double* wr, double* wi,
5335                                 double* vl, lapack_int ldvl, double* vr,
5336                                 lapack_int ldvr, lapack_int* ilo,
5337                                 lapack_int* ihi, double* scale, double* abnrm,
5338                                 double* rconde, double* rcondv, double* work,
5339                                 lapack_int lwork, lapack_int* iwork );
5340 lapack_int LAPACKE_cgeevx_work( int matrix_layout, char balanc, char jobvl,
5341                                 char jobvr, char sense, lapack_int n,
5342                                 lapack_complex_float* a, lapack_int lda,
5343                                 lapack_complex_float* w,
5344                                 lapack_complex_float* vl, lapack_int ldvl,
5345                                 lapack_complex_float* vr, lapack_int ldvr,
5346                                 lapack_int* ilo, lapack_int* ihi, float* scale,
5347                                 float* abnrm, float* rconde, float* rcondv,
5348                                 lapack_complex_float* work, lapack_int lwork,
5349                                 float* rwork );
5350 lapack_int LAPACKE_zgeevx_work( int matrix_layout, char balanc, char jobvl,
5351                                 char jobvr, char sense, lapack_int n,
5352                                 lapack_complex_double* a, lapack_int lda,
5353                                 lapack_complex_double* w,
5354                                 lapack_complex_double* vl, lapack_int ldvl,
5355                                 lapack_complex_double* vr, lapack_int ldvr,
5356                                 lapack_int* ilo, lapack_int* ihi, double* scale,
5357                                 double* abnrm, double* rconde, double* rcondv,
5358                                 lapack_complex_double* work, lapack_int lwork,
5359                                 double* rwork );
5360
5361 lapack_int LAPACKE_sgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5362                                 lapack_int ihi, float* a, lapack_int lda,
5363                                 float* tau, float* work, lapack_int lwork );
5364 lapack_int LAPACKE_dgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5365                                 lapack_int ihi, double* a, lapack_int lda,
5366                                 double* tau, double* work, lapack_int lwork );
5367 lapack_int LAPACKE_cgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5368                                 lapack_int ihi, lapack_complex_float* a,
5369                                 lapack_int lda, lapack_complex_float* tau,
5370                                 lapack_complex_float* work, lapack_int lwork );
5371 lapack_int LAPACKE_zgehrd_work( int matrix_layout, lapack_int n, lapack_int ilo,
5372                                 lapack_int ihi, lapack_complex_double* a,
5373                                 lapack_int lda, lapack_complex_double* tau,
5374                                 lapack_complex_double* work, lapack_int lwork );
5375
5376 lapack_int LAPACKE_sgejsv_work( int matrix_layout, char joba, char jobu,
5377                                 char jobv, char jobr, char jobt, char jobp,
5378                                 lapack_int m, lapack_int n, float* a,
5379                                 lapack_int lda, float* sva, float* u,
5380                                 lapack_int ldu, float* v, lapack_int ldv,
5381                                 float* work, lapack_int lwork,
5382                                 lapack_int* iwork );
5383 lapack_int LAPACKE_dgejsv_work( int matrix_layout, char joba, char jobu,
5384                                 char jobv, char jobr, char jobt, char jobp,
5385                                 lapack_int m, lapack_int n, double* a,
5386                                 lapack_int lda, double* sva, double* u,
5387                                 lapack_int ldu, double* v, lapack_int ldv,
5388                                 double* work, lapack_int lwork,
5389                                 lapack_int* iwork );
5390 lapack_int LAPACKE_cgejsv_work( int matrix_layout, char joba, char jobu,
5391                                 char jobv, char jobr, char jobt, char jobp,
5392                                 lapack_int m, lapack_int n, lapack_complex_float* a,
5393                                 lapack_int lda, float* sva, lapack_complex_float* u,
5394                                 lapack_int ldu, lapack_complex_float* v, lapack_int ldv,
5395                                 lapack_complex_float* cwork, lapack_int lwork,
5396                                 float* work, lapack_int lrwork,
5397                                 lapack_int* iwork );
5398 lapack_int LAPACKE_zgejsv_work( int matrix_layout, char joba, char jobu,
5399                                 char jobv, char jobr, char jobt, char jobp,
5400                                 lapack_int m, lapack_int n, lapack_complex_double* a,
5401                                 lapack_int lda, double* sva, lapack_complex_double* u,
5402                                 lapack_int ldu, lapack_complex_double* v, lapack_int ldv,
5403                                 lapack_complex_double* cwork, lapack_int lwork,
5404                                 double* work, lapack_int lrwork,
5405                                 lapack_int* iwork );
5406
5407 lapack_int LAPACKE_sgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5408                                 float* a, lapack_int lda, float* tau,
5409                                 float* work );
5410 lapack_int LAPACKE_dgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5411                                 double* a, lapack_int lda, double* tau,
5412                                 double* work );
5413 lapack_int LAPACKE_cgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5414                                 lapack_complex_float* a, lapack_int lda,
5415                                 lapack_complex_float* tau,
5416                                 lapack_complex_float* work );
5417 lapack_int LAPACKE_zgelq2_work( int matrix_layout, lapack_int m, lapack_int n,
5418                                 lapack_complex_double* a, lapack_int lda,
5419                                 lapack_complex_double* tau,
5420                                 lapack_complex_double* work );
5421
5422 lapack_int LAPACKE_sgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5423                                 float* a, lapack_int lda, float* tau,
5424                                 float* work, lapack_int lwork );
5425 lapack_int LAPACKE_dgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5426                                 double* a, lapack_int lda, double* tau,
5427                                 double* work, lapack_int lwork );
5428 lapack_int LAPACKE_cgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5429                                 lapack_complex_float* a, lapack_int lda,
5430                                 lapack_complex_float* tau,
5431                                 lapack_complex_float* work, lapack_int lwork );
5432 lapack_int LAPACKE_zgelqf_work( int matrix_layout, lapack_int m, lapack_int n,
5433                                 lapack_complex_double* a, lapack_int lda,
5434                                 lapack_complex_double* tau,
5435                                 lapack_complex_double* work, lapack_int lwork );
5436
5437 lapack_int LAPACKE_sgels_work( int matrix_layout, char trans, lapack_int m,
5438                                lapack_int n, lapack_int nrhs, float* a,
5439                                lapack_int lda, float* b, lapack_int ldb,
5440                                float* work, lapack_int lwork );
5441 lapack_int LAPACKE_dgels_work( int matrix_layout, char trans, lapack_int m,
5442                                lapack_int n, lapack_int nrhs, double* a,
5443                                lapack_int lda, double* b, lapack_int ldb,
5444                                double* work, lapack_int lwork );
5445 lapack_int LAPACKE_cgels_work( int matrix_layout, char trans, lapack_int m,
5446                                lapack_int n, lapack_int nrhs,
5447                                lapack_complex_float* a, lapack_int lda,
5448                                lapack_complex_float* b, lapack_int ldb,
5449                                lapack_complex_float* work, lapack_int lwork );
5450 lapack_int LAPACKE_zgels_work( int matrix_layout, char trans, lapack_int m,
5451                                lapack_int n, lapack_int nrhs,
5452                                lapack_complex_double* a, lapack_int lda,
5453                                lapack_complex_double* b, lapack_int ldb,
5454                                lapack_complex_double* work, lapack_int lwork );
5455
5456 lapack_int LAPACKE_sgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5457                                 lapack_int nrhs, float* a, lapack_int lda,
5458                                 float* b, lapack_int ldb, float* s, float rcond,
5459                                 lapack_int* rank, float* work, lapack_int lwork,
5460                                 lapack_int* iwork );
5461 lapack_int LAPACKE_dgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5462                                 lapack_int nrhs, double* a, lapack_int lda,
5463                                 double* b, lapack_int ldb, double* s,
5464                                 double rcond, lapack_int* rank, double* work,
5465                                 lapack_int lwork, lapack_int* iwork );
5466 lapack_int LAPACKE_cgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5467                                 lapack_int nrhs, lapack_complex_float* a,
5468                                 lapack_int lda, lapack_complex_float* b,
5469                                 lapack_int ldb, float* s, float rcond,
5470                                 lapack_int* rank, lapack_complex_float* work,
5471                                 lapack_int lwork, float* rwork,
5472                                 lapack_int* iwork );
5473 lapack_int LAPACKE_zgelsd_work( int matrix_layout, lapack_int m, lapack_int n,
5474                                 lapack_int nrhs, lapack_complex_double* a,
5475                                 lapack_int lda, lapack_complex_double* b,
5476                                 lapack_int ldb, double* s, double rcond,
5477                                 lapack_int* rank, lapack_complex_double* work,
5478                                 lapack_int lwork, double* rwork,
5479                                 lapack_int* iwork );
5480
5481 lapack_int LAPACKE_sgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5482                                 lapack_int nrhs, float* a, lapack_int lda,
5483                                 float* b, lapack_int ldb, float* s, float rcond,
5484                                 lapack_int* rank, float* work,
5485                                 lapack_int lwork );
5486 lapack_int LAPACKE_dgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5487                                 lapack_int nrhs, double* a, lapack_int lda,
5488                                 double* b, lapack_int ldb, double* s,
5489                                 double rcond, lapack_int* rank, double* work,
5490                                 lapack_int lwork );
5491 lapack_int LAPACKE_cgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5492                                 lapack_int nrhs, lapack_complex_float* a,
5493                                 lapack_int lda, lapack_complex_float* b,
5494                                 lapack_int ldb, float* s, float rcond,
5495                                 lapack_int* rank, lapack_complex_float* work,
5496                                 lapack_int lwork, float* rwork );
5497 lapack_int LAPACKE_zgelss_work( int matrix_layout, lapack_int m, lapack_int n,
5498                                 lapack_int nrhs, lapack_complex_double* a,
5499                                 lapack_int lda, lapack_complex_double* b,
5500                                 lapack_int ldb, double* s, double rcond,
5501                                 lapack_int* rank, lapack_complex_double* work,
5502                                 lapack_int lwork, double* rwork );
5503
5504 lapack_int LAPACKE_sgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5505                                 lapack_int nrhs, float* a, lapack_int lda,
5506                                 float* b, lapack_int ldb, lapack_int* jpvt,
5507                                 float rcond, lapack_int* rank, float* work,
5508                                 lapack_int lwork );
5509 lapack_int LAPACKE_dgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5510                                 lapack_int nrhs, double* a, lapack_int lda,
5511                                 double* b, lapack_int ldb, lapack_int* jpvt,
5512                                 double rcond, lapack_int* rank, double* work,
5513                                 lapack_int lwork );
5514 lapack_int LAPACKE_cgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5515                                 lapack_int nrhs, lapack_complex_float* a,
5516                                 lapack_int lda, lapack_complex_float* b,
5517                                 lapack_int ldb, lapack_int* jpvt, float rcond,
5518                                 lapack_int* rank, lapack_complex_float* work,
5519                                 lapack_int lwork, float* rwork );
5520 lapack_int LAPACKE_zgelsy_work( int matrix_layout, lapack_int m, lapack_int n,
5521                                 lapack_int nrhs, lapack_complex_double* a,
5522                                 lapack_int lda, lapack_complex_double* b,
5523                                 lapack_int ldb, lapack_int* jpvt, double rcond,
5524                                 lapack_int* rank, lapack_complex_double* work,
5525                                 lapack_int lwork, double* rwork );
5526
5527 lapack_int LAPACKE_sgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5528                                 float* a, lapack_int lda, float* tau,
5529                                 float* work, lapack_int lwork );
5530 lapack_int LAPACKE_dgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5531                                 double* a, lapack_int lda, double* tau,
5532                                 double* work, lapack_int lwork );
5533 lapack_int LAPACKE_cgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5534                                 lapack_complex_float* a, lapack_int lda,
5535                                 lapack_complex_float* tau,
5536                                 lapack_complex_float* work, lapack_int lwork );
5537 lapack_int LAPACKE_zgeqlf_work( int matrix_layout, lapack_int m, lapack_int n,
5538                                 lapack_complex_double* a, lapack_int lda,
5539                                 lapack_complex_double* tau,
5540                                 lapack_complex_double* work, lapack_int lwork );
5541
5542 lapack_int LAPACKE_sgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5543                                 float* a, lapack_int lda, lapack_int* jpvt,
5544                                 float* tau, float* work, lapack_int lwork );
5545 lapack_int LAPACKE_dgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5546                                 double* a, lapack_int lda, lapack_int* jpvt,
5547                                 double* tau, double* work, lapack_int lwork );
5548 lapack_int LAPACKE_cgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5549                                 lapack_complex_float* a, lapack_int lda,
5550                                 lapack_int* jpvt, lapack_complex_float* tau,
5551                                 lapack_complex_float* work, lapack_int lwork,
5552                                 float* rwork );
5553 lapack_int LAPACKE_zgeqp3_work( int matrix_layout, lapack_int m, lapack_int n,
5554                                 lapack_complex_double* a, lapack_int lda,
5555                                 lapack_int* jpvt, lapack_complex_double* tau,
5556                                 lapack_complex_double* work, lapack_int lwork,
5557                                 double* rwork );
5558
5559 lapack_int LAPACKE_sgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5560                                 float* a, lapack_int lda, lapack_int* jpvt,
5561                                 float* tau, float* work );
5562 lapack_int LAPACKE_dgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5563                                 double* a, lapack_int lda, lapack_int* jpvt,
5564                                 double* tau, double* work );
5565 lapack_int LAPACKE_cgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5566                                 lapack_complex_float* a, lapack_int lda,
5567                                 lapack_int* jpvt, lapack_complex_float* tau,
5568                                 lapack_complex_float* work, float* rwork );
5569 lapack_int LAPACKE_zgeqpf_work( int matrix_layout, lapack_int m, lapack_int n,
5570                                 lapack_complex_double* a, lapack_int lda,
5571                                 lapack_int* jpvt, lapack_complex_double* tau,
5572                                 lapack_complex_double* work, double* rwork );
5573
5574 lapack_int LAPACKE_sgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5575                                 float* a, lapack_int lda, float* tau,
5576                                 float* work );
5577 lapack_int LAPACKE_dgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5578                                 double* a, lapack_int lda, double* tau,
5579                                 double* work );
5580 lapack_int LAPACKE_cgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5581                                 lapack_complex_float* a, lapack_int lda,
5582                                 lapack_complex_float* tau,
5583                                 lapack_complex_float* work );
5584 lapack_int LAPACKE_zgeqr2_work( int matrix_layout, lapack_int m, lapack_int n,
5585                                 lapack_complex_double* a, lapack_int lda,
5586                                 lapack_complex_double* tau,
5587                                 lapack_complex_double* work );
5588
5589 lapack_int LAPACKE_sgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5590                                 float* a, lapack_int lda, float* tau,
5591                                 float* work, lapack_int lwork );
5592 lapack_int LAPACKE_dgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5593                                 double* a, lapack_int lda, double* tau,
5594                                 double* work, lapack_int lwork );
5595 lapack_int LAPACKE_cgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5596                                 lapack_complex_float* a, lapack_int lda,
5597                                 lapack_complex_float* tau,
5598                                 lapack_complex_float* work, lapack_int lwork );
5599 lapack_int LAPACKE_zgeqrf_work( int matrix_layout, lapack_int m, lapack_int n,
5600                                 lapack_complex_double* a, lapack_int lda,
5601                                 lapack_complex_double* tau,
5602                                 lapack_complex_double* work, lapack_int lwork );
5603
5604 lapack_int LAPACKE_sgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5605                                  float* a, lapack_int lda, float* tau,
5606                                  float* work, lapack_int lwork );
5607 lapack_int LAPACKE_dgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5608                                  double* a, lapack_int lda, double* tau,
5609                                  double* work, lapack_int lwork );
5610 lapack_int LAPACKE_cgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5611                                  lapack_complex_float* a, lapack_int lda,
5612                                  lapack_complex_float* tau,
5613                                  lapack_complex_float* work, lapack_int lwork );
5614 lapack_int LAPACKE_zgeqrfp_work( int matrix_layout, lapack_int m, lapack_int n,
5615                                  lapack_complex_double* a, lapack_int lda,
5616                                  lapack_complex_double* tau,
5617                                  lapack_complex_double* work,
5618                                  lapack_int lwork );
5619
5620 lapack_int LAPACKE_sgerfs_work( int matrix_layout, char trans, lapack_int n,
5621                                 lapack_int nrhs, const float* a, lapack_int lda,
5622                                 const float* af, lapack_int ldaf,
5623                                 const lapack_int* ipiv, const float* b,
5624                                 lapack_int ldb, float* x, lapack_int ldx,
5625                                 float* ferr, float* berr, float* work,
5626                                 lapack_int* iwork );
5627 lapack_int LAPACKE_dgerfs_work( int matrix_layout, char trans, lapack_int n,
5628                                 lapack_int nrhs, const double* a,
5629                                 lapack_int lda, const double* af,
5630                                 lapack_int ldaf, const lapack_int* ipiv,
5631                                 const double* b, lapack_int ldb, double* x,
5632                                 lapack_int ldx, double* ferr, double* berr,
5633                                 double* work, lapack_int* iwork );
5634 lapack_int LAPACKE_cgerfs_work( int matrix_layout, char trans, lapack_int n,
5635                                 lapack_int nrhs, const lapack_complex_float* a,
5636                                 lapack_int lda, const lapack_complex_float* af,
5637                                 lapack_int ldaf, const lapack_int* ipiv,
5638                                 const lapack_complex_float* b, lapack_int ldb,
5639                                 lapack_complex_float* x, lapack_int ldx,
5640                                 float* ferr, float* berr,
5641                                 lapack_complex_float* work, float* rwork );
5642 lapack_int LAPACKE_zgerfs_work( int matrix_layout, char trans, lapack_int n,
5643                                 lapack_int nrhs, const lapack_complex_double* a,
5644                                 lapack_int lda, const lapack_complex_double* af,
5645                                 lapack_int ldaf, const lapack_int* ipiv,
5646                                 const lapack_complex_double* b, lapack_int ldb,
5647                                 lapack_complex_double* x, lapack_int ldx,
5648                                 double* ferr, double* berr,
5649                                 lapack_complex_double* work, double* rwork );
5650
5651 lapack_int LAPACKE_sgerfsx_work( int matrix_layout, char trans, char equed,
5652                                  lapack_int n, lapack_int nrhs, const float* a,
5653                                  lapack_int lda, const float* af,
5654                                  lapack_int ldaf, const lapack_int* ipiv,
5655                                  const float* r, const float* c, const float* b,
5656                                  lapack_int ldb, float* x, lapack_int ldx,
5657                                  float* rcond, float* berr,
5658                                  lapack_int n_err_bnds, float* err_bnds_norm,
5659                                  float* err_bnds_comp, lapack_int nparams,
5660                                  float* params, float* work,
5661                                  lapack_int* iwork );
5662 lapack_int LAPACKE_dgerfsx_work( int matrix_layout, char trans, char equed,
5663                                  lapack_int n, lapack_int nrhs, const double* a,
5664                                  lapack_int lda, const double* af,
5665                                  lapack_int ldaf, const lapack_int* ipiv,
5666                                  const double* r, const double* c,
5667                                  const double* b, lapack_int ldb, double* x,
5668                                  lapack_int ldx, double* rcond, double* berr,
5669                                  lapack_int n_err_bnds, double* err_bnds_norm,
5670                                  double* err_bnds_comp, lapack_int nparams,
5671                                  double* params, double* work,
5672                                  lapack_int* iwork );
5673 lapack_int LAPACKE_cgerfsx_work( int matrix_layout, char trans, char equed,
5674                                  lapack_int n, lapack_int nrhs,
5675                                  const lapack_complex_float* a, lapack_int lda,
5676                                  const lapack_complex_float* af,
5677                                  lapack_int ldaf, const lapack_int* ipiv,
5678                                  const float* r, const float* c,
5679                                  const lapack_complex_float* b, lapack_int ldb,
5680                                  lapack_complex_float* x, lapack_int ldx,
5681                                  float* rcond, float* berr,
5682                                  lapack_int n_err_bnds, float* err_bnds_norm,
5683                                  float* err_bnds_comp, lapack_int nparams,
5684                                  float* params, lapack_complex_float* work,
5685                                  float* rwork );
5686 lapack_int LAPACKE_zgerfsx_work( int matrix_layout, char trans, char equed,
5687                                  lapack_int n, lapack_int nrhs,
5688                                  const lapack_complex_double* a, lapack_int lda,
5689                                  const lapack_complex_double* af,
5690                                  lapack_int ldaf, const lapack_int* ipiv,
5691                                  const double* r, const double* c,
5692                                  const lapack_complex_double* b, lapack_int ldb,
5693                                  lapack_complex_double* x, lapack_int ldx,
5694                                  double* rcond, double* berr,
5695                                  lapack_int n_err_bnds, double* err_bnds_norm,
5696                                  double* err_bnds_comp, lapack_int nparams,
5697                                  double* params, lapack_complex_double* work,
5698                                  double* rwork );
5699
5700 lapack_int LAPACKE_sgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5701                                 float* a, lapack_int lda, float* tau,
5702                                 float* work, lapack_int lwork );
5703 lapack_int LAPACKE_dgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5704                                 double* a, lapack_int lda, double* tau,
5705                                 double* work, lapack_int lwork );
5706 lapack_int LAPACKE_cgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5707                                 lapack_complex_float* a, lapack_int lda,
5708                                 lapack_complex_float* tau,
5709                                 lapack_complex_float* work, lapack_int lwork );
5710 lapack_int LAPACKE_zgerqf_work( int matrix_layout, lapack_int m, lapack_int n,
5711                                 lapack_complex_double* a, lapack_int lda,
5712                                 lapack_complex_double* tau,
5713                                 lapack_complex_double* work, lapack_int lwork );
5714
5715 lapack_int LAPACKE_sgesdd_work( int matrix_layout, char jobz, lapack_int m,
5716                                 lapack_int n, float* a, lapack_int lda,
5717                                 float* s, float* u, lapack_int ldu, float* vt,
5718                                 lapack_int ldvt, float* work, lapack_int lwork,
5719                                 lapack_int* iwork );
5720 lapack_int LAPACKE_dgesdd_work( int matrix_layout, char jobz, lapack_int m,
5721                                 lapack_int n, double* a, lapack_int lda,
5722                                 double* s, double* u, lapack_int ldu,
5723                                 double* vt, lapack_int ldvt, double* work,
5724                                 lapack_int lwork, lapack_int* iwork );
5725 lapack_int LAPACKE_cgesdd_work( int matrix_layout, char jobz, lapack_int m,
5726                                 lapack_int n, lapack_complex_float* a,
5727                                 lapack_int lda, float* s,
5728                                 lapack_complex_float* u, lapack_int ldu,
5729                                 lapack_complex_float* vt, lapack_int ldvt,
5730                                 lapack_complex_float* work, lapack_int lwork,
5731                                 float* rwork, lapack_int* iwork );
5732 lapack_int LAPACKE_zgesdd_work( int matrix_layout, char jobz, lapack_int m,
5733                                 lapack_int n, lapack_complex_double* a,
5734                                 lapack_int lda, double* s,
5735                                 lapack_complex_double* u, lapack_int ldu,
5736                                 lapack_complex_double* vt, lapack_int ldvt,
5737                                 lapack_complex_double* work, lapack_int lwork,
5738                                 double* rwork, lapack_int* iwork );
5739
5740 lapack_int LAPACKE_sgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5741                                float* a, lapack_int lda, lapack_int* ipiv,
5742                                float* b, lapack_int ldb );
5743 lapack_int LAPACKE_dgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5744                                double* a, lapack_int lda, lapack_int* ipiv,
5745                                double* b, lapack_int ldb );
5746 lapack_int LAPACKE_cgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5747                                lapack_complex_float* a, lapack_int lda,
5748                                lapack_int* ipiv, lapack_complex_float* b,
5749                                lapack_int ldb );
5750 lapack_int LAPACKE_zgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5751                                lapack_complex_double* a, lapack_int lda,
5752                                lapack_int* ipiv, lapack_complex_double* b,
5753                                lapack_int ldb );
5754 lapack_int LAPACKE_dsgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5755                                 double* a, lapack_int lda, lapack_int* ipiv,
5756                                 double* b, lapack_int ldb, double* x,
5757                                 lapack_int ldx, double* work, float* swork,
5758                                 lapack_int* iter );
5759 lapack_int LAPACKE_zcgesv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
5760                                 lapack_complex_double* a, lapack_int lda,
5761                                 lapack_int* ipiv, lapack_complex_double* b,
5762                                 lapack_int ldb, lapack_complex_double* x,
5763                                 lapack_int ldx, lapack_complex_double* work,
5764                                 lapack_complex_float* swork, double* rwork,
5765                                 lapack_int* iter );
5766
5767 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt,
5768                                 lapack_int m, lapack_int n, float* a,
5769                                 lapack_int lda, float* s, float* u,
5770                                 lapack_int ldu, float* vt, lapack_int ldvt,
5771                                 float* work, lapack_int lwork );
5772 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt,
5773                                 lapack_int m, lapack_int n, double* a,
5774                                 lapack_int lda, double* s, double* u,
5775                                 lapack_int ldu, double* vt, lapack_int ldvt,
5776                                 double* work, lapack_int lwork );
5777 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt,
5778                                 lapack_int m, lapack_int n,
5779                                 lapack_complex_float* a, lapack_int lda,
5780                                 float* s, lapack_complex_float* u,
5781                                 lapack_int ldu, lapack_complex_float* vt,
5782                                 lapack_int ldvt, lapack_complex_float* work,
5783                                 lapack_int lwork, float* rwork );
5784 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt,
5785                                 lapack_int m, lapack_int n,
5786                                 lapack_complex_double* a, lapack_int lda,
5787                                 double* s, lapack_complex_double* u,
5788                                 lapack_int ldu, lapack_complex_double* vt,
5789                                 lapack_int ldvt, lapack_complex_double* work,
5790                                 lapack_int lwork, double* rwork );
5791
5792 lapack_int LAPACKE_sgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5793                                  lapack_int m, lapack_int n, float* a,
5794                                  lapack_int lda, float vl, float vu,
5795                                  lapack_int il, lapack_int iu, lapack_int* ns,
5796                                  float* s, float* u, lapack_int ldu,
5797                                  float* vt, lapack_int ldvt,
5798                                  float* work, lapack_int lwork, lapack_int* iwork );
5799 lapack_int LAPACKE_dgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5800                                  lapack_int m, lapack_int n, double* a,
5801                                  lapack_int lda, double vl, double vu,
5802                                  lapack_int il, lapack_int iu, lapack_int* ns,
5803                                  double* s, double* u, lapack_int ldu,
5804                                  double* vt, lapack_int ldvt,
5805                                  double* work, lapack_int lwork, lapack_int* iwork );
5806 lapack_int LAPACKE_cgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5807                                  lapack_int m, lapack_int n, lapack_complex_float* a,
5808                                  lapack_int lda, float vl, float vu,
5809                                  lapack_int il, lapack_int iu, lapack_int* ns,
5810                                  float* s, lapack_complex_float* u, lapack_int ldu,
5811                                  lapack_complex_float* vt, lapack_int ldvt,
5812                                  lapack_complex_float* work, lapack_int lwork,
5813                                  float* rwork, lapack_int* iwork );
5814 lapack_int LAPACKE_zgesvdx_work( int matrix_layout, char jobu, char jobvt, char range,
5815                                  lapack_int m, lapack_int n, lapack_complex_double* a,
5816                                  lapack_int lda, double vl, double vu,
5817                                  lapack_int il, lapack_int iu, lapack_int* ns,
5818                                  double* s, lapack_complex_double* u, lapack_int ldu,
5819                                  lapack_complex_double* vt, lapack_int ldvt,
5820                                  lapack_complex_double* work, lapack_int lwork,
5821                                  double* rwork, lapack_int* iwork );
5822
5823 lapack_int LAPACKE_sgesvj_work( int matrix_layout, char joba, char jobu,
5824                                 char jobv, lapack_int m, lapack_int n, float* a,
5825                                 lapack_int lda, float* sva, lapack_int mv,
5826                                 float* v, lapack_int ldv, float* work,
5827                                 lapack_int lwork );
5828 lapack_int LAPACKE_dgesvj_work( int matrix_layout, char joba, char jobu,
5829                                 char jobv, lapack_int m, lapack_int n,
5830                                 double* a, lapack_int lda, double* sva,
5831                                 lapack_int mv, double* v, lapack_int ldv,
5832                                 double* work, lapack_int lwork );
5833 lapack_int LAPACKE_cgesvj_work( int matrix_layout, char joba, char jobu,
5834                                 char jobv, lapack_int m, lapack_int n, lapack_complex_float* a,
5835                                 lapack_int lda, float* sva, lapack_int mv,
5836                                 lapack_complex_float* v, lapack_int ldv,
5837                                 lapack_complex_float* cwork, lapack_int lwork,
5838                                 float* rwork,lapack_int lrwork );
5839 lapack_int LAPACKE_zgesvj_work( int matrix_layout, char joba, char jobu,
5840                                 char jobv, lapack_int m, lapack_int n,
5841                                 lapack_complex_double* a, lapack_int lda, double* sva,
5842                                 lapack_int mv, lapack_complex_double* v, lapack_int ldv,
5843                                 lapack_complex_double* cwork, lapack_int lwork,
5844                                 double* rwork, lapack_int lrwork );
5845
5846 lapack_int LAPACKE_sgesvx_work( int matrix_layout, char fact, char trans,
5847                                 lapack_int n, lapack_int nrhs, float* a,
5848                                 lapack_int lda, float* af, lapack_int ldaf,
5849                                 lapack_int* ipiv, char* equed, float* r,
5850                                 float* c, float* b, lapack_int ldb, float* x,
5851                                 lapack_int ldx, float* rcond, float* ferr,
5852                                 float* berr, float* work, lapack_int* iwork );
5853 lapack_int LAPACKE_dgesvx_work( int matrix_layout, char fact, char trans,
5854                                 lapack_int n, lapack_int nrhs, double* a,
5855                                 lapack_int lda, double* af, lapack_int ldaf,
5856                                 lapack_int* ipiv, char* equed, double* r,
5857                                 double* c, double* b, lapack_int ldb, double* x,
5858                                 lapack_int ldx, double* rcond, double* ferr,
5859                                 double* berr, double* work, lapack_int* iwork );
5860 lapack_int LAPACKE_cgesvx_work( int matrix_layout, char fact, char trans,
5861                                 lapack_int n, lapack_int nrhs,
5862                                 lapack_complex_float* a, lapack_int lda,
5863                                 lapack_complex_float* af, lapack_int ldaf,
5864                                 lapack_int* ipiv, char* equed, float* r,
5865                                 float* c, lapack_complex_float* b,
5866                                 lapack_int ldb, lapack_complex_float* x,
5867                                 lapack_int ldx, float* rcond, float* ferr,
5868                                 float* berr, lapack_complex_float* work,
5869                                 float* rwork );
5870 lapack_int LAPACKE_zgesvx_work( int matrix_layout, char fact, char trans,
5871                                 lapack_int n, lapack_int nrhs,
5872                                 lapack_complex_double* a, lapack_int lda,
5873                                 lapack_complex_double* af, lapack_int ldaf,
5874                                 lapack_int* ipiv, char* equed, double* r,
5875                                 double* c, lapack_complex_double* b,
5876                                 lapack_int ldb, lapack_complex_double* x,
5877                                 lapack_int ldx, double* rcond, double* ferr,
5878                                 double* berr, lapack_complex_double* work,
5879                                 double* rwork );
5880
5881 lapack_int LAPACKE_sgesvxx_work( int matrix_layout, char fact, char trans,
5882                                  lapack_int n, lapack_int nrhs, float* a,
5883                                  lapack_int lda, float* af, lapack_int ldaf,
5884                                  lapack_int* ipiv, char* equed, float* r,
5885                                  float* c, float* b, lapack_int ldb, float* x,
5886                                  lapack_int ldx, float* rcond, float* rpvgrw,
5887                                  float* berr, lapack_int n_err_bnds,
5888                                  float* err_bnds_norm, float* err_bnds_comp,
5889                                  lapack_int nparams, float* params, float* work,
5890                                  lapack_int* iwork );
5891 lapack_int LAPACKE_dgesvxx_work( int matrix_layout, char fact, char trans,
5892                                  lapack_int n, lapack_int nrhs, double* a,
5893                                  lapack_int lda, double* af, lapack_int ldaf,
5894                                  lapack_int* ipiv, char* equed, double* r,
5895                                  double* c, double* b, lapack_int ldb,
5896                                  double* x, lapack_int ldx, double* rcond,
5897                                  double* rpvgrw, double* berr,
5898                                  lapack_int n_err_bnds, double* err_bnds_norm,
5899                                  double* err_bnds_comp, lapack_int nparams,
5900                                  double* params, double* work,
5901                                  lapack_int* iwork );
5902 lapack_int LAPACKE_cgesvxx_work( int matrix_layout, char fact, char trans,
5903                                  lapack_int n, lapack_int nrhs,
5904                                  lapack_complex_float* a, lapack_int lda,
5905                                  lapack_complex_float* af, lapack_int ldaf,
5906                                  lapack_int* ipiv, char* equed, float* r,
5907                                  float* c, lapack_complex_float* b,
5908                                  lapack_int ldb, lapack_complex_float* x,
5909                                  lapack_int ldx, float* rcond, float* rpvgrw,
5910                                  float* berr, lapack_int n_err_bnds,
5911                                  float* err_bnds_norm, float* err_bnds_comp,
5912                                  lapack_int nparams, float* params,
5913                                  lapack_complex_float* work, float* rwork );
5914 lapack_int LAPACKE_zgesvxx_work( int matrix_layout, char fact, char trans,
5915                                  lapack_int n, lapack_int nrhs,
5916                                  lapack_complex_double* a, lapack_int lda,
5917                                  lapack_complex_double* af, lapack_int ldaf,
5918                                  lapack_int* ipiv, char* equed, double* r,
5919                                  double* c, lapack_complex_double* b,
5920                                  lapack_int ldb, lapack_complex_double* x,
5921                                  lapack_int ldx, double* rcond, double* rpvgrw,
5922                                  double* berr, lapack_int n_err_bnds,
5923                                  double* err_bnds_norm, double* err_bnds_comp,
5924                                  lapack_int nparams, double* params,
5925                                  lapack_complex_double* work, double* rwork );
5926
5927 lapack_int LAPACKE_sgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5928                                 float* a, lapack_int lda, lapack_int* ipiv );
5929 lapack_int LAPACKE_dgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5930                                 double* a, lapack_int lda, lapack_int* ipiv );
5931 lapack_int LAPACKE_cgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5932                                 lapack_complex_float* a, lapack_int lda,
5933                                 lapack_int* ipiv );
5934 lapack_int LAPACKE_zgetf2_work( int matrix_layout, lapack_int m, lapack_int n,
5935                                 lapack_complex_double* a, lapack_int lda,
5936                                 lapack_int* ipiv );
5937
5938 lapack_int LAPACKE_sgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5939                                 float* a, lapack_int lda, lapack_int* ipiv );
5940 lapack_int LAPACKE_dgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5941                                 double* a, lapack_int lda, lapack_int* ipiv );
5942 lapack_int LAPACKE_cgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5943                                 lapack_complex_float* a, lapack_int lda,
5944                                 lapack_int* ipiv );
5945 lapack_int LAPACKE_zgetrf_work( int matrix_layout, lapack_int m, lapack_int n,
5946                                 lapack_complex_double* a, lapack_int lda,
5947                                 lapack_int* ipiv );
5948
5949 lapack_int LAPACKE_sgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5950                                 float* a, lapack_int lda, lapack_int* ipiv );
5951 lapack_int LAPACKE_dgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5952                                 double* a, lapack_int lda, lapack_int* ipiv );
5953 lapack_int LAPACKE_cgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5954                                 lapack_complex_float* a, lapack_int lda,
5955                                 lapack_int* ipiv );
5956 lapack_int LAPACKE_zgetrf2_work( int matrix_layout, lapack_int m, lapack_int n,
5957                                 lapack_complex_double* a, lapack_int lda,
5958                                 lapack_int* ipiv );
5959
5960 lapack_int LAPACKE_sgetri_work( int matrix_layout, lapack_int n, float* a,
5961                                 lapack_int lda, const lapack_int* ipiv,
5962                                 float* work, lapack_int lwork );
5963 lapack_int LAPACKE_dgetri_work( int matrix_layout, lapack_int n, double* a,
5964                                 lapack_int lda, const lapack_int* ipiv,
5965                                 double* work, lapack_int lwork );
5966 lapack_int LAPACKE_cgetri_work( int matrix_layout, lapack_int n,
5967                                 lapack_complex_float* a, lapack_int lda,
5968                                 const lapack_int* ipiv,
5969                                 lapack_complex_float* work, lapack_int lwork );
5970 lapack_int LAPACKE_zgetri_work( int matrix_layout, lapack_int n,
5971                                 lapack_complex_double* a, lapack_int lda,
5972                                 const lapack_int* ipiv,
5973                                 lapack_complex_double* work, lapack_int lwork );
5974
5975 lapack_int LAPACKE_sgetrs_work( int matrix_layout, char trans, lapack_int n,
5976                                 lapack_int nrhs, const float* a, lapack_int lda,
5977                                 const lapack_int* ipiv, float* b,
5978                                 lapack_int ldb );
5979 lapack_int LAPACKE_dgetrs_work( int matrix_layout, char trans, lapack_int n,
5980                                 lapack_int nrhs, const double* a,
5981                                 lapack_int lda, const lapack_int* ipiv,
5982                                 double* b, lapack_int ldb );
5983 lapack_int LAPACKE_cgetrs_work( int matrix_layout, char trans, lapack_int n,
5984                                 lapack_int nrhs, const lapack_complex_float* a,
5985                                 lapack_int lda, const lapack_int* ipiv,
5986                                 lapack_complex_float* b, lapack_int ldb );
5987 lapack_int LAPACKE_zgetrs_work( int matrix_layout, char trans, lapack_int n,
5988                                 lapack_int nrhs, const lapack_complex_double* a,
5989                                 lapack_int lda, const lapack_int* ipiv,
5990                                 lapack_complex_double* b, lapack_int ldb );
5991
5992 lapack_int LAPACKE_sggbak_work( int matrix_layout, char job, char side,
5993                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5994                                 const float* lscale, const float* rscale,
5995                                 lapack_int m, float* v, lapack_int ldv );
5996 lapack_int LAPACKE_dggbak_work( int matrix_layout, char job, char side,
5997                                 lapack_int n, lapack_int ilo, lapack_int ihi,
5998                                 const double* lscale, const double* rscale,
5999                                 lapack_int m, double* v, lapack_int ldv );
6000 lapack_int LAPACKE_cggbak_work( int matrix_layout, char job, char side,
6001                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6002                                 const float* lscale, const float* rscale,
6003                                 lapack_int m, lapack_complex_float* v,
6004                                 lapack_int ldv );
6005 lapack_int LAPACKE_zggbak_work( int matrix_layout, char job, char side,
6006                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6007                                 const double* lscale, const double* rscale,
6008                                 lapack_int m, lapack_complex_double* v,
6009                                 lapack_int ldv );
6010
6011 lapack_int LAPACKE_sggbal_work( int matrix_layout, char job, lapack_int n,
6012                                 float* a, lapack_int lda, float* b,
6013                                 lapack_int ldb, lapack_int* ilo,
6014                                 lapack_int* ihi, float* lscale, float* rscale,
6015                                 float* work );
6016 lapack_int LAPACKE_dggbal_work( int matrix_layout, char job, lapack_int n,
6017                                 double* a, lapack_int lda, double* b,
6018                                 lapack_int ldb, lapack_int* ilo,
6019                                 lapack_int* ihi, double* lscale, double* rscale,
6020                                 double* work );
6021 lapack_int LAPACKE_cggbal_work( int matrix_layout, char job, lapack_int n,
6022                                 lapack_complex_float* a, lapack_int lda,
6023                                 lapack_complex_float* b, lapack_int ldb,
6024                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
6025                                 float* rscale, float* work );
6026 lapack_int LAPACKE_zggbal_work( int matrix_layout, char job, lapack_int n,
6027                                 lapack_complex_double* a, lapack_int lda,
6028                                 lapack_complex_double* b, lapack_int ldb,
6029                                 lapack_int* ilo, lapack_int* ihi,
6030                                 double* lscale, double* rscale, double* work );
6031
6032 lapack_int LAPACKE_sgges_work( int matrix_layout, char jobvsl, char jobvsr,
6033                                char sort, LAPACK_S_SELECT3 selctg, lapack_int n,
6034                                float* a, lapack_int lda, float* b,
6035                                lapack_int ldb, lapack_int* sdim, float* alphar,
6036                                float* alphai, float* beta, float* vsl,
6037                                lapack_int ldvsl, float* vsr, lapack_int ldvsr,
6038                                float* work, lapack_int lwork,
6039                                lapack_logical* bwork );
6040 lapack_int LAPACKE_dgges_work( int matrix_layout, char jobvsl, char jobvsr,
6041                                char sort, LAPACK_D_SELECT3 selctg, lapack_int n,
6042                                double* a, lapack_int lda, double* b,
6043                                lapack_int ldb, lapack_int* sdim, double* alphar,
6044                                double* alphai, double* beta, double* vsl,
6045                                lapack_int ldvsl, double* vsr, lapack_int ldvsr,
6046                                double* work, lapack_int lwork,
6047                                lapack_logical* bwork );
6048 lapack_int LAPACKE_cgges_work( int matrix_layout, char jobvsl, char jobvsr,
6049                                char sort, LAPACK_C_SELECT2 selctg, lapack_int n,
6050                                lapack_complex_float* a, lapack_int lda,
6051                                lapack_complex_float* b, lapack_int ldb,
6052                                lapack_int* sdim, lapack_complex_float* alpha,
6053                                lapack_complex_float* beta,
6054                                lapack_complex_float* vsl, lapack_int ldvsl,
6055                                lapack_complex_float* vsr, lapack_int ldvsr,
6056                                lapack_complex_float* work, lapack_int lwork,
6057                                float* rwork, lapack_logical* bwork );
6058 lapack_int LAPACKE_zgges_work( int matrix_layout, char jobvsl, char jobvsr,
6059                                char sort, LAPACK_Z_SELECT2 selctg, lapack_int n,
6060                                lapack_complex_double* a, lapack_int lda,
6061                                lapack_complex_double* b, lapack_int ldb,
6062                                lapack_int* sdim, lapack_complex_double* alpha,
6063                                lapack_complex_double* beta,
6064                                lapack_complex_double* vsl, lapack_int ldvsl,
6065                                lapack_complex_double* vsr, lapack_int ldvsr,
6066                                lapack_complex_double* work, lapack_int lwork,
6067                                double* rwork, lapack_logical* bwork );
6068
6069 lapack_int LAPACKE_sgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6070                                 char sort, LAPACK_S_SELECT3 selctg,
6071                                 lapack_int n,
6072                                 float* a, lapack_int lda,
6073                                 float* b, lapack_int ldb, lapack_int* sdim,
6074                                 float* alphar, float* alphai, float* beta,
6075                                 float* vsl, lapack_int ldvsl,
6076                                 float* vsr, lapack_int ldvsr,
6077                                 float* work, lapack_int lwork,
6078                                 lapack_logical* bwork );
6079 lapack_int LAPACKE_dgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6080                                 char sort, LAPACK_D_SELECT3 selctg,
6081                                 lapack_int n,
6082                                 double* a, lapack_int lda,
6083                                 double* b, lapack_int ldb, lapack_int* sdim,
6084                                 double* alphar, double* alphai, double* beta,
6085                                 double* vsl, lapack_int ldvsl,
6086                                 double* vsr, lapack_int ldvsr,
6087                                 double* work, lapack_int lwork,
6088                                 lapack_logical* bwork );
6089 lapack_int LAPACKE_cgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6090                                 char sort, LAPACK_C_SELECT2 selctg,
6091                                 lapack_int n,
6092                                 lapack_complex_float* a, lapack_int lda,
6093                                 lapack_complex_float* b, lapack_int ldb,
6094                                 lapack_int* sdim, lapack_complex_float* alpha,
6095                                 lapack_complex_float* beta,
6096                                 lapack_complex_float* vsl, lapack_int ldvsl,
6097                                 lapack_complex_float* vsr, lapack_int ldvsr,
6098                                 lapack_complex_float* work, lapack_int lwork,
6099                                 float* rwork, lapack_logical* bwork );
6100 lapack_int LAPACKE_zgges3_work( int matrix_layout, char jobvsl, char jobvsr,
6101                                 char sort, LAPACK_Z_SELECT2 selctg,
6102                                 lapack_int n,
6103                                 lapack_complex_double* a, lapack_int lda,
6104                                 lapack_complex_double* b, lapack_int ldb,
6105                                 lapack_int* sdim, lapack_complex_double* alpha,
6106                                 lapack_complex_double* beta,
6107                                 lapack_complex_double* vsl, lapack_int ldvsl,
6108                                 lapack_complex_double* vsr, lapack_int ldvsr,
6109                                 lapack_complex_double* work, lapack_int lwork,
6110                                 double* rwork, lapack_logical* bwork );
6111
6112 lapack_int LAPACKE_sggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6113                                 char sort, LAPACK_S_SELECT3 selctg, char sense,
6114                                 lapack_int n, float* a, lapack_int lda,
6115                                 float* b, lapack_int ldb, lapack_int* sdim,
6116                                 float* alphar, float* alphai, float* beta,
6117                                 float* vsl, lapack_int ldvsl, float* vsr,
6118                                 lapack_int ldvsr, float* rconde, float* rcondv,
6119                                 float* work, lapack_int lwork,
6120                                 lapack_int* iwork, lapack_int liwork,
6121                                 lapack_logical* bwork );
6122 lapack_int LAPACKE_dggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6123                                 char sort, LAPACK_D_SELECT3 selctg, char sense,
6124                                 lapack_int n, double* a, lapack_int lda,
6125                                 double* b, lapack_int ldb, lapack_int* sdim,
6126                                 double* alphar, double* alphai, double* beta,
6127                                 double* vsl, lapack_int ldvsl, double* vsr,
6128                                 lapack_int ldvsr, double* rconde,
6129                                 double* rcondv, double* work, lapack_int lwork,
6130                                 lapack_int* iwork, lapack_int liwork,
6131                                 lapack_logical* bwork );
6132 lapack_int LAPACKE_cggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6133                                 char sort, LAPACK_C_SELECT2 selctg, char sense,
6134                                 lapack_int n, lapack_complex_float* a,
6135                                 lapack_int lda, lapack_complex_float* b,
6136                                 lapack_int ldb, lapack_int* sdim,
6137                                 lapack_complex_float* alpha,
6138                                 lapack_complex_float* beta,
6139                                 lapack_complex_float* vsl, lapack_int ldvsl,
6140                                 lapack_complex_float* vsr, lapack_int ldvsr,
6141                                 float* rconde, float* rcondv,
6142                                 lapack_complex_float* work, lapack_int lwork,
6143                                 float* rwork, lapack_int* iwork,
6144                                 lapack_int liwork, lapack_logical* bwork );
6145 lapack_int LAPACKE_zggesx_work( int matrix_layout, char jobvsl, char jobvsr,
6146                                 char sort, LAPACK_Z_SELECT2 selctg, char sense,
6147                                 lapack_int n, lapack_complex_double* a,
6148                                 lapack_int lda, lapack_complex_double* b,
6149                                 lapack_int ldb, lapack_int* sdim,
6150                                 lapack_complex_double* alpha,
6151                                 lapack_complex_double* beta,
6152                                 lapack_complex_double* vsl, lapack_int ldvsl,
6153                                 lapack_complex_double* vsr, lapack_int ldvsr,
6154                                 double* rconde, double* rcondv,
6155                                 lapack_complex_double* work, lapack_int lwork,
6156                                 double* rwork, lapack_int* iwork,
6157                                 lapack_int liwork, lapack_logical* bwork );
6158
6159 lapack_int LAPACKE_sggev_work( int matrix_layout, char jobvl, char jobvr,
6160                                lapack_int n, float* a, lapack_int lda, float* b,
6161                                lapack_int ldb, float* alphar, float* alphai,
6162                                float* beta, float* vl, lapack_int ldvl,
6163                                float* vr, lapack_int ldvr, float* work,
6164                                lapack_int lwork );
6165 lapack_int LAPACKE_dggev_work( int matrix_layout, char jobvl, char jobvr,
6166                                lapack_int n, double* a, lapack_int lda,
6167                                double* b, lapack_int ldb, double* alphar,
6168                                double* alphai, double* beta, double* vl,
6169                                lapack_int ldvl, double* vr, lapack_int ldvr,
6170                                double* work, lapack_int lwork );
6171 lapack_int LAPACKE_cggev_work( int matrix_layout, char jobvl, char jobvr,
6172                                lapack_int n, lapack_complex_float* a,
6173                                lapack_int lda, lapack_complex_float* b,
6174                                lapack_int ldb, lapack_complex_float* alpha,
6175                                lapack_complex_float* beta,
6176                                lapack_complex_float* vl, lapack_int ldvl,
6177                                lapack_complex_float* vr, lapack_int ldvr,
6178                                lapack_complex_float* work, lapack_int lwork,
6179                                float* rwork );
6180 lapack_int LAPACKE_zggev_work( int matrix_layout, char jobvl, char jobvr,
6181                                lapack_int n, lapack_complex_double* a,
6182                                lapack_int lda, lapack_complex_double* b,
6183                                lapack_int ldb, lapack_complex_double* alpha,
6184                                lapack_complex_double* beta,
6185                                lapack_complex_double* vl, lapack_int ldvl,
6186                                lapack_complex_double* vr, lapack_int ldvr,
6187                                lapack_complex_double* work, lapack_int lwork,
6188                                double* rwork );
6189
6190 lapack_int LAPACKE_sggev3_work( int matrix_layout, char jobvl, char jobvr,
6191                                 lapack_int n,
6192                                 float* a, lapack_int lda,
6193                                 float* b, lapack_int ldb,
6194                                 float* alphar, float* alphai, float* beta,
6195                                 float* vl, lapack_int ldvl,
6196                                 float* vr, lapack_int ldvr,
6197                                 float* work, lapack_int lwork );
6198 lapack_int LAPACKE_dggev3_work( int matrix_layout, char jobvl, char jobvr,
6199                                 lapack_int n,
6200                                 double* a, lapack_int lda,
6201                                 double* b, lapack_int ldb,
6202                                 double* alphar, double* alphai, double* beta,
6203                                 double* vl, lapack_int ldvl,
6204                                 double* vr, lapack_int ldvr,
6205                                 double* work, lapack_int lwork );
6206 lapack_int LAPACKE_cggev3_work( int matrix_layout, char jobvl, char jobvr,
6207                                 lapack_int n,
6208                                 lapack_complex_float* a, lapack_int lda,
6209                                 lapack_complex_float* b, lapack_int ldb,
6210                                 lapack_complex_float* alpha,
6211                                 lapack_complex_float* beta,
6212                                 lapack_complex_float* vl, lapack_int ldvl,
6213                                 lapack_complex_float* vr, lapack_int ldvr,
6214                                 lapack_complex_float* work, lapack_int lwork,
6215                                 float* rwork );
6216 lapack_int LAPACKE_zggev3_work( int matrix_layout, char jobvl, char jobvr,
6217                                 lapack_int n,
6218                                 lapack_complex_double* a, lapack_int lda,
6219                                 lapack_complex_double* b, lapack_int ldb,
6220                                 lapack_complex_double* alpha,
6221                                 lapack_complex_double* beta,
6222                                 lapack_complex_double* vl, lapack_int ldvl,
6223                                 lapack_complex_double* vr, lapack_int ldvr,
6224                                 lapack_complex_double* work, lapack_int lwork,
6225                                 double* rwork );
6226
6227 lapack_int LAPACKE_sggevx_work( int matrix_layout, char balanc, char jobvl,
6228                                 char jobvr, char sense, lapack_int n, float* a,
6229                                 lapack_int lda, float* b, lapack_int ldb,
6230                                 float* alphar, float* alphai, float* beta,
6231                                 float* vl, lapack_int ldvl, float* vr,
6232                                 lapack_int ldvr, lapack_int* ilo,
6233                                 lapack_int* ihi, float* lscale, float* rscale,
6234                                 float* abnrm, float* bbnrm, float* rconde,
6235                                 float* rcondv, float* work, lapack_int lwork,
6236                                 lapack_int* iwork, lapack_logical* bwork );
6237 lapack_int LAPACKE_dggevx_work( int matrix_layout, char balanc, char jobvl,
6238                                 char jobvr, char sense, lapack_int n, double* a,
6239                                 lapack_int lda, double* b, lapack_int ldb,
6240                                 double* alphar, double* alphai, double* beta,
6241                                 double* vl, lapack_int ldvl, double* vr,
6242                                 lapack_int ldvr, lapack_int* ilo,
6243                                 lapack_int* ihi, double* lscale, double* rscale,
6244                                 double* abnrm, double* bbnrm, double* rconde,
6245                                 double* rcondv, double* work, lapack_int lwork,
6246                                 lapack_int* iwork, lapack_logical* bwork );
6247 lapack_int LAPACKE_cggevx_work( int matrix_layout, char balanc, char jobvl,
6248                                 char jobvr, char sense, lapack_int n,
6249                                 lapack_complex_float* a, lapack_int lda,
6250                                 lapack_complex_float* b, lapack_int ldb,
6251                                 lapack_complex_float* alpha,
6252                                 lapack_complex_float* beta,
6253                                 lapack_complex_float* vl, lapack_int ldvl,
6254                                 lapack_complex_float* vr, lapack_int ldvr,
6255                                 lapack_int* ilo, lapack_int* ihi, float* lscale,
6256                                 float* rscale, float* abnrm, float* bbnrm,
6257                                 float* rconde, float* rcondv,
6258                                 lapack_complex_float* work, lapack_int lwork,
6259                                 float* rwork, lapack_int* iwork,
6260                                 lapack_logical* bwork );
6261 lapack_int LAPACKE_zggevx_work( int matrix_layout, char balanc, char jobvl,
6262                                 char jobvr, char sense, lapack_int n,
6263                                 lapack_complex_double* a, lapack_int lda,
6264                                 lapack_complex_double* b, lapack_int ldb,
6265                                 lapack_complex_double* alpha,
6266                                 lapack_complex_double* beta,
6267                                 lapack_complex_double* vl, lapack_int ldvl,
6268                                 lapack_complex_double* vr, lapack_int ldvr,
6269                                 lapack_int* ilo, lapack_int* ihi,
6270                                 double* lscale, double* rscale, double* abnrm,
6271                                 double* bbnrm, double* rconde, double* rcondv,
6272                                 lapack_complex_double* work, lapack_int lwork,
6273                                 double* rwork, lapack_int* iwork,
6274                                 lapack_logical* bwork );
6275
6276 lapack_int LAPACKE_sggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6277                                 lapack_int p, float* a, lapack_int lda,
6278                                 float* b, lapack_int ldb, float* d, float* x,
6279                                 float* y, float* work, lapack_int lwork );
6280 lapack_int LAPACKE_dggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6281                                 lapack_int p, double* a, lapack_int lda,
6282                                 double* b, lapack_int ldb, double* d, double* x,
6283                                 double* y, double* work, lapack_int lwork );
6284 lapack_int LAPACKE_cggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6285                                 lapack_int p, lapack_complex_float* a,
6286                                 lapack_int lda, lapack_complex_float* b,
6287                                 lapack_int ldb, lapack_complex_float* d,
6288                                 lapack_complex_float* x,
6289                                 lapack_complex_float* y,
6290                                 lapack_complex_float* work, lapack_int lwork );
6291 lapack_int LAPACKE_zggglm_work( int matrix_layout, lapack_int n, lapack_int m,
6292                                 lapack_int p, lapack_complex_double* a,
6293                                 lapack_int lda, lapack_complex_double* b,
6294                                 lapack_int ldb, lapack_complex_double* d,
6295                                 lapack_complex_double* x,
6296                                 lapack_complex_double* y,
6297                                 lapack_complex_double* work, lapack_int lwork );
6298
6299 lapack_int LAPACKE_sgghrd_work( int matrix_layout, char compq, char compz,
6300                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6301                                 float* a, lapack_int lda, float* b,
6302                                 lapack_int ldb, float* q, lapack_int ldq,
6303                                 float* z, lapack_int ldz );
6304 lapack_int LAPACKE_dgghrd_work( int matrix_layout, char compq, char compz,
6305                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6306                                 double* a, lapack_int lda, double* b,
6307                                 lapack_int ldb, double* q, lapack_int ldq,
6308                                 double* z, lapack_int ldz );
6309 lapack_int LAPACKE_cgghrd_work( int matrix_layout, char compq, char compz,
6310                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6311                                 lapack_complex_float* a, lapack_int lda,
6312                                 lapack_complex_float* b, lapack_int ldb,
6313                                 lapack_complex_float* q, lapack_int ldq,
6314                                 lapack_complex_float* z, lapack_int ldz );
6315 lapack_int LAPACKE_zgghrd_work( int matrix_layout, char compq, char compz,
6316                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6317                                 lapack_complex_double* a, lapack_int lda,
6318                                 lapack_complex_double* b, lapack_int ldb,
6319                                 lapack_complex_double* q, lapack_int ldq,
6320                                 lapack_complex_double* z, lapack_int ldz );
6321
6322 lapack_int LAPACKE_sgghd3_work( int matrix_layout, char compq, char compz,
6323                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6324                                 float* a, lapack_int lda,
6325                                 float* b, lapack_int ldb,
6326                                 float* q, lapack_int ldq,
6327                                 float* z, lapack_int ldz,
6328                                 float* work, lapack_int lwork );
6329 lapack_int LAPACKE_dgghd3_work( int matrix_layout, char compq, char compz,
6330                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6331                                 double* a, lapack_int lda,
6332                                 double* b, lapack_int ldb,
6333                                 double* q, lapack_int ldq,
6334                                 double* z, lapack_int ldz,
6335                                 double* work, lapack_int lwork );
6336 lapack_int LAPACKE_cgghd3_work( int matrix_layout, char compq, char compz,
6337                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6338                                 lapack_complex_float* a, lapack_int lda,
6339                                 lapack_complex_float* b, lapack_int ldb,
6340                                 lapack_complex_float* q, lapack_int ldq,
6341                                 lapack_complex_float* z, lapack_int ldz,
6342                                 lapack_complex_float* work, lapack_int lwork );
6343 lapack_int LAPACKE_zgghd3_work( int matrix_layout, char compq, char compz,
6344                                 lapack_int n, lapack_int ilo, lapack_int ihi,
6345                                 lapack_complex_double* a, lapack_int lda,
6346                                 lapack_complex_double* b, lapack_int ldb,
6347                                 lapack_complex_double* q, lapack_int ldq,
6348                                 lapack_complex_double* z, lapack_int ldz,
6349                                 lapack_complex_double* work,
6350                                 lapack_int lwork );
6351
6352 lapack_int LAPACKE_sgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6353                                 lapack_int p, float* a, lapack_int lda,
6354                                 float* b, lapack_int ldb, float* c, float* d,
6355                                 float* x, float* work, lapack_int lwork );
6356 lapack_int LAPACKE_dgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6357                                 lapack_int p, double* a, lapack_int lda,
6358                                 double* b, lapack_int ldb, double* c, double* d,
6359                                 double* x, double* work, lapack_int lwork );
6360 lapack_int LAPACKE_cgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6361                                 lapack_int p, lapack_complex_float* a,
6362                                 lapack_int lda, lapack_complex_float* b,
6363                                 lapack_int ldb, lapack_complex_float* c,
6364                                 lapack_complex_float* d,
6365                                 lapack_complex_float* x,
6366                                 lapack_complex_float* work, lapack_int lwork );
6367 lapack_int LAPACKE_zgglse_work( int matrix_layout, lapack_int m, lapack_int n,
6368                                 lapack_int p, lapack_complex_double* a,
6369                                 lapack_int lda, lapack_complex_double* b,
6370                                 lapack_int ldb, lapack_complex_double* c,
6371                                 lapack_complex_double* d,
6372                                 lapack_complex_double* x,
6373                                 lapack_complex_double* work, lapack_int lwork );
6374
6375 lapack_int LAPACKE_sggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6376                                 lapack_int p, float* a, lapack_int lda,
6377                                 float* taua, float* b, lapack_int ldb,
6378                                 float* taub, float* work, lapack_int lwork );
6379 lapack_int LAPACKE_dggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6380                                 lapack_int p, double* a, lapack_int lda,
6381                                 double* taua, double* b, lapack_int ldb,
6382                                 double* taub, double* work, lapack_int lwork );
6383 lapack_int LAPACKE_cggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6384                                 lapack_int p, lapack_complex_float* a,
6385                                 lapack_int lda, lapack_complex_float* taua,
6386                                 lapack_complex_float* b, lapack_int ldb,
6387                                 lapack_complex_float* taub,
6388                                 lapack_complex_float* work, lapack_int lwork );
6389 lapack_int LAPACKE_zggqrf_work( int matrix_layout, lapack_int n, lapack_int m,
6390                                 lapack_int p, lapack_complex_double* a,
6391                                 lapack_int lda, lapack_complex_double* taua,
6392                                 lapack_complex_double* b, lapack_int ldb,
6393                                 lapack_complex_double* taub,
6394                                 lapack_complex_double* work, lapack_int lwork );
6395
6396 lapack_int LAPACKE_sggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6397                                 lapack_int n, float* a, lapack_int lda,
6398                                 float* taua, float* b, lapack_int ldb,
6399                                 float* taub, float* work, lapack_int lwork );
6400 lapack_int LAPACKE_dggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6401                                 lapack_int n, double* a, lapack_int lda,
6402                                 double* taua, double* b, lapack_int ldb,
6403                                 double* taub, double* work, lapack_int lwork );
6404 lapack_int LAPACKE_cggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6405                                 lapack_int n, lapack_complex_float* a,
6406                                 lapack_int lda, lapack_complex_float* taua,
6407                                 lapack_complex_float* b, lapack_int ldb,
6408                                 lapack_complex_float* taub,
6409                                 lapack_complex_float* work, lapack_int lwork );
6410 lapack_int LAPACKE_zggrqf_work( int matrix_layout, lapack_int m, lapack_int p,
6411                                 lapack_int n, lapack_complex_double* a,
6412                                 lapack_int lda, lapack_complex_double* taua,
6413                                 lapack_complex_double* b, lapack_int ldb,
6414                                 lapack_complex_double* taub,
6415                                 lapack_complex_double* work, lapack_int lwork );
6416
6417 lapack_int LAPACKE_sggsvd_work( int matrix_layout, char jobu, char jobv,
6418                                 char jobq, lapack_int m, lapack_int n,
6419                                 lapack_int p, lapack_int* k, lapack_int* l,
6420                                 float* a, lapack_int lda, float* b,
6421                                 lapack_int ldb, float* alpha, float* beta,
6422                                 float* u, lapack_int ldu, float* v,
6423                                 lapack_int ldv, float* q, lapack_int ldq,
6424                                 float* work, lapack_int* iwork );
6425 lapack_int LAPACKE_dggsvd_work( int matrix_layout, char jobu, char jobv,
6426                                 char jobq, lapack_int m, lapack_int n,
6427                                 lapack_int p, lapack_int* k, lapack_int* l,
6428                                 double* a, lapack_int lda, double* b,
6429                                 lapack_int ldb, double* alpha, double* beta,
6430                                 double* u, lapack_int ldu, double* v,
6431                                 lapack_int ldv, double* q, lapack_int ldq,
6432                                 double* work, lapack_int* iwork );
6433 lapack_int LAPACKE_cggsvd_work( int matrix_layout, char jobu, char jobv,
6434                                 char jobq, lapack_int m, lapack_int n,
6435                                 lapack_int p, lapack_int* k, lapack_int* l,
6436                                 lapack_complex_float* a, lapack_int lda,
6437                                 lapack_complex_float* b, lapack_int ldb,
6438                                 float* alpha, float* beta,
6439                                 lapack_complex_float* u, lapack_int ldu,
6440                                 lapack_complex_float* v, lapack_int ldv,
6441                                 lapack_complex_float* q, lapack_int ldq,
6442                                 lapack_complex_float* work, float* rwork,
6443                                 lapack_int* iwork );
6444 lapack_int LAPACKE_zggsvd_work( int matrix_layout, char jobu, char jobv,
6445                                 char jobq, lapack_int m, lapack_int n,
6446                                 lapack_int p, lapack_int* k, lapack_int* l,
6447                                 lapack_complex_double* a, lapack_int lda,
6448                                 lapack_complex_double* b, lapack_int ldb,
6449                                 double* alpha, double* beta,
6450                                 lapack_complex_double* u, lapack_int ldu,
6451                                 lapack_complex_double* v, lapack_int ldv,
6452                                 lapack_complex_double* q, lapack_int ldq,
6453                                 lapack_complex_double* work, double* rwork,
6454                                 lapack_int* iwork );
6455
6456 lapack_int LAPACKE_sggsvd3_work( int matrix_layout, char jobu, char jobv,
6457                                  char jobq, lapack_int m, lapack_int n,
6458                                  lapack_int p, lapack_int* k, lapack_int* l,
6459                                  float* a, lapack_int lda, float* b,
6460                                  lapack_int ldb, float* alpha, float* beta,
6461                                  float* u, lapack_int ldu, float* v,
6462                                  lapack_int ldv, float* q, lapack_int ldq,
6463                                  float* work, lapack_int lwork,
6464                                  lapack_int* iwork );
6465 lapack_int LAPACKE_dggsvd3_work( int matrix_layout, char jobu, char jobv,
6466                                  char jobq, lapack_int m, lapack_int n,
6467                                  lapack_int p, lapack_int* k, lapack_int* l,
6468                                  double* a, lapack_int lda, double* b,
6469                                  lapack_int ldb, double* alpha, double* beta,
6470                                  double* u, lapack_int ldu, double* v,
6471                                  lapack_int ldv, double* q, lapack_int ldq,
6472                                  double* work, lapack_int lwork,
6473                                  lapack_int* iwork );
6474 lapack_int LAPACKE_cggsvd3_work( int matrix_layout, char jobu, char jobv,
6475                                  char jobq, lapack_int m, lapack_int n,
6476                                  lapack_int p, lapack_int* k, lapack_int* l,
6477                                  lapack_complex_float* a, lapack_int lda,
6478                                  lapack_complex_float* b, lapack_int ldb,
6479                                  float* alpha, float* beta,
6480                                  lapack_complex_float* u, lapack_int ldu,
6481                                  lapack_complex_float* v, lapack_int ldv,
6482                                  lapack_complex_float* q, lapack_int ldq,
6483                                  lapack_complex_float* work, lapack_int lwork,
6484                                  float* rwork, lapack_int* iwork );
6485 lapack_int LAPACKE_zggsvd3_work( int matrix_layout, char jobu, char jobv,
6486                                  char jobq, lapack_int m, lapack_int n,
6487                                  lapack_int p, lapack_int* k, lapack_int* l,
6488                                  lapack_complex_double* a, lapack_int lda,
6489                                  lapack_complex_double* b, lapack_int ldb,
6490                                  double* alpha, double* beta,
6491                                  lapack_complex_double* u, lapack_int ldu,
6492                                  lapack_complex_double* v, lapack_int ldv,
6493                                  lapack_complex_double* q, lapack_int ldq,
6494                                  lapack_complex_double* work, lapack_int lwork,
6495                                  double* rwork, lapack_int* iwork );
6496
6497 lapack_int LAPACKE_sggsvp_work( int matrix_layout, char jobu, char jobv,
6498                                 char jobq, lapack_int m, lapack_int p,
6499                                 lapack_int n, float* a, lapack_int lda,
6500                                 float* b, lapack_int ldb, float tola,
6501                                 float tolb, lapack_int* k, lapack_int* l,
6502                                 float* u, lapack_int ldu, float* v,
6503                                 lapack_int ldv, float* q, lapack_int ldq,
6504                                 lapack_int* iwork, float* tau, float* work );
6505 lapack_int LAPACKE_dggsvp_work( int matrix_layout, char jobu, char jobv,
6506                                 char jobq, lapack_int m, lapack_int p,
6507                                 lapack_int n, double* a, lapack_int lda,
6508                                 double* b, lapack_int ldb, double tola,
6509                                 double tolb, lapack_int* k, lapack_int* l,
6510                                 double* u, lapack_int ldu, double* v,
6511                                 lapack_int ldv, double* q, lapack_int ldq,
6512                                 lapack_int* iwork, double* tau, double* work );
6513 lapack_int LAPACKE_cggsvp_work( int matrix_layout, char jobu, char jobv,
6514                                 char jobq, lapack_int m, lapack_int p,
6515                                 lapack_int n, lapack_complex_float* a,
6516                                 lapack_int lda, lapack_complex_float* b,
6517                                 lapack_int ldb, float tola, float tolb,
6518                                 lapack_int* k, lapack_int* l,
6519                                 lapack_complex_float* u, lapack_int ldu,
6520                                 lapack_complex_float* v, lapack_int ldv,
6521                                 lapack_complex_float* q, lapack_int ldq,
6522                                 lapack_int* iwork, float* rwork,
6523                                 lapack_complex_float* tau,
6524                                 lapack_complex_float* work );
6525 lapack_int LAPACKE_zggsvp_work( int matrix_layout, char jobu, char jobv,
6526                                 char jobq, lapack_int m, lapack_int p,
6527                                 lapack_int n, lapack_complex_double* a,
6528                                 lapack_int lda, lapack_complex_double* b,
6529                                 lapack_int ldb, double tola, double tolb,
6530                                 lapack_int* k, lapack_int* l,
6531                                 lapack_complex_double* u, lapack_int ldu,
6532                                 lapack_complex_double* v, lapack_int ldv,
6533                                 lapack_complex_double* q, lapack_int ldq,
6534                                 lapack_int* iwork, double* rwork,
6535                                 lapack_complex_double* tau,
6536                                 lapack_complex_double* work );
6537
6538 lapack_int LAPACKE_sggsvp3_work( int matrix_layout, char jobu, char jobv,
6539                                  char jobq, lapack_int m, lapack_int p,
6540                                  lapack_int n, float* a, lapack_int lda,
6541                                  float* b, lapack_int ldb, float tola,
6542                                  float tolb, lapack_int* k, lapack_int* l,
6543                                  float* u, lapack_int ldu, float* v,
6544                                  lapack_int ldv, float* q, lapack_int ldq,
6545                                  lapack_int* iwork, float* tau,
6546                                  float* work, lapack_int lwork );
6547 lapack_int LAPACKE_dggsvp3_work( int matrix_layout, char jobu, char jobv,
6548                                  char jobq, lapack_int m, lapack_int p,
6549                                  lapack_int n, double* a, lapack_int lda,
6550                                  double* b, lapack_int ldb, double tola,
6551                                  double tolb, lapack_int* k, lapack_int* l,
6552                                  double* u, lapack_int ldu, double* v,
6553                                  lapack_int ldv, double* q, lapack_int ldq,
6554                                  lapack_int* iwork, double* tau, double* work,
6555                                  lapack_int lwork );
6556 lapack_int LAPACKE_cggsvp3_work( int matrix_layout, char jobu, char jobv,
6557                                  char jobq, lapack_int m, lapack_int p,
6558                                  lapack_int n, lapack_complex_float* a,
6559                                  lapack_int lda, lapack_complex_float* b,
6560                                  lapack_int ldb, float tola, float tolb,
6561                                  lapack_int* k, lapack_int* l,
6562                                  lapack_complex_float* u, lapack_int ldu,
6563                                  lapack_complex_float* v, lapack_int ldv,
6564                                  lapack_complex_float* q, lapack_int ldq,
6565                                  lapack_int* iwork, float* rwork,
6566                                  lapack_complex_float* tau,
6567                                  lapack_complex_float* work, lapack_int lwork );
6568 lapack_int LAPACKE_zggsvp3_work( int matrix_layout, char jobu, char jobv,
6569                                  char jobq, lapack_int m, lapack_int p,
6570                                  lapack_int n, lapack_complex_double* a,
6571                                  lapack_int lda, lapack_complex_double* b,
6572                                  lapack_int ldb, double tola, double tolb,
6573                                  lapack_int* k, lapack_int* l,
6574                                  lapack_complex_double* u, lapack_int ldu,
6575                                  lapack_complex_double* v, lapack_int ldv,
6576                                  lapack_complex_double* q, lapack_int ldq,
6577                                  lapack_int* iwork, double* rwork,
6578                                  lapack_complex_double* tau,
6579                                  lapack_complex_double* work, lapack_int lwork );
6580
6581 lapack_int LAPACKE_sgtcon_work( char norm, lapack_int n, const float* dl,
6582                                 const float* d, const float* du,
6583                                 const float* du2, const lapack_int* ipiv,
6584                                 float anorm, float* rcond, float* work,
6585                                 lapack_int* iwork );
6586 lapack_int LAPACKE_dgtcon_work( char norm, lapack_int n, const double* dl,
6587                                 const double* d, const double* du,
6588                                 const double* du2, const lapack_int* ipiv,
6589                                 double anorm, double* rcond, double* work,
6590                                 lapack_int* iwork );
6591 lapack_int LAPACKE_cgtcon_work( char norm, lapack_int n,
6592                                 const lapack_complex_float* dl,
6593                                 const lapack_complex_float* d,
6594                                 const lapack_complex_float* du,
6595                                 const lapack_complex_float* du2,
6596                                 const lapack_int* ipiv, float anorm,
6597                                 float* rcond, lapack_complex_float* work );
6598 lapack_int LAPACKE_zgtcon_work( char norm, lapack_int n,
6599                                 const lapack_complex_double* dl,
6600                                 const lapack_complex_double* d,
6601                                 const lapack_complex_double* du,
6602                                 const lapack_complex_double* du2,
6603                                 const lapack_int* ipiv, double anorm,
6604                                 double* rcond, lapack_complex_double* work );
6605
6606 lapack_int LAPACKE_sgtrfs_work( int matrix_layout, char trans, lapack_int n,
6607                                 lapack_int nrhs, const float* dl,
6608                                 const float* d, const float* du,
6609                                 const float* dlf, const float* df,
6610                                 const float* duf, const float* du2,
6611                                 const lapack_int* ipiv, const float* b,
6612                                 lapack_int ldb, float* x, lapack_int ldx,
6613                                 float* ferr, float* berr, float* work,
6614                                 lapack_int* iwork );
6615 lapack_int LAPACKE_dgtrfs_work( int matrix_layout, char trans, lapack_int n,
6616                                 lapack_int nrhs, const double* dl,
6617                                 const double* d, const double* du,
6618                                 const double* dlf, const double* df,
6619                                 const double* duf, const double* du2,
6620                                 const lapack_int* ipiv, const double* b,
6621                                 lapack_int ldb, double* x, lapack_int ldx,
6622                                 double* ferr, double* berr, double* work,
6623                                 lapack_int* iwork );
6624 lapack_int LAPACKE_cgtrfs_work( int matrix_layout, char trans, lapack_int n,
6625                                 lapack_int nrhs, const lapack_complex_float* dl,
6626                                 const lapack_complex_float* d,
6627                                 const lapack_complex_float* du,
6628                                 const lapack_complex_float* dlf,
6629                                 const lapack_complex_float* df,
6630                                 const lapack_complex_float* duf,
6631                                 const lapack_complex_float* du2,
6632                                 const lapack_int* ipiv,
6633                                 const lapack_complex_float* b, lapack_int ldb,
6634                                 lapack_complex_float* x, lapack_int ldx,
6635                                 float* ferr, float* berr,
6636                                 lapack_complex_float* work, float* rwork );
6637 lapack_int LAPACKE_zgtrfs_work( int matrix_layout, char trans, lapack_int n,
6638                                 lapack_int nrhs,
6639                                 const lapack_complex_double* dl,
6640                                 const lapack_complex_double* d,
6641                                 const lapack_complex_double* du,
6642                                 const lapack_complex_double* dlf,
6643                                 const lapack_complex_double* df,
6644                                 const lapack_complex_double* duf,
6645                                 const lapack_complex_double* du2,
6646                                 const lapack_int* ipiv,
6647                                 const lapack_complex_double* b, lapack_int ldb,
6648                                 lapack_complex_double* x, lapack_int ldx,
6649                                 double* ferr, double* berr,
6650                                 lapack_complex_double* work, double* rwork );
6651
6652 lapack_int LAPACKE_sgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6653                                float* dl, float* d, float* du, float* b,
6654                                lapack_int ldb );
6655 lapack_int LAPACKE_dgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6656                                double* dl, double* d, double* du, double* b,
6657                                lapack_int ldb );
6658 lapack_int LAPACKE_cgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6659                                lapack_complex_float* dl,
6660                                lapack_complex_float* d,
6661                                lapack_complex_float* du,
6662                                lapack_complex_float* b, lapack_int ldb );
6663 lapack_int LAPACKE_zgtsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
6664                                lapack_complex_double* dl,
6665                                lapack_complex_double* d,
6666                                lapack_complex_double* du,
6667                                lapack_complex_double* b, lapack_int ldb );
6668
6669 lapack_int LAPACKE_sgtsvx_work( int matrix_layout, char fact, char trans,
6670                                 lapack_int n, lapack_int nrhs, const float* dl,
6671                                 const float* d, const float* du, float* dlf,
6672                                 float* df, float* duf, float* du2,
6673                                 lapack_int* ipiv, const float* b,
6674                                 lapack_int ldb, float* x, lapack_int ldx,
6675                                 float* rcond, float* ferr, float* berr,
6676                                 float* work, lapack_int* iwork );
6677 lapack_int LAPACKE_dgtsvx_work( int matrix_layout, char fact, char trans,
6678                                 lapack_int n, lapack_int nrhs, const double* dl,
6679                                 const double* d, const double* du, double* dlf,
6680                                 double* df, double* duf, double* du2,
6681                                 lapack_int* ipiv, const double* b,
6682                                 lapack_int ldb, double* x, lapack_int ldx,
6683                                 double* rcond, double* ferr, double* berr,
6684                                 double* work, lapack_int* iwork );
6685 lapack_int LAPACKE_cgtsvx_work( int matrix_layout, char fact, char trans,
6686                                 lapack_int n, lapack_int nrhs,
6687                                 const lapack_complex_float* dl,
6688                                 const lapack_complex_float* d,
6689                                 const lapack_complex_float* du,
6690                                 lapack_complex_float* dlf,
6691                                 lapack_complex_float* df,
6692                                 lapack_complex_float* duf,
6693                                 lapack_complex_float* du2, lapack_int* ipiv,
6694                                 const lapack_complex_float* b, lapack_int ldb,
6695                                 lapack_complex_float* x, lapack_int ldx,
6696                                 float* rcond, float* ferr, float* berr,
6697                                 lapack_complex_float* work, float* rwork );
6698 lapack_int LAPACKE_zgtsvx_work( int matrix_layout, char fact, char trans,
6699                                 lapack_int n, lapack_int nrhs,
6700                                 const lapack_complex_double* dl,
6701                                 const lapack_complex_double* d,
6702                                 const lapack_complex_double* du,
6703                                 lapack_complex_double* dlf,
6704                                 lapack_complex_double* df,
6705                                 lapack_complex_double* duf,
6706                                 lapack_complex_double* du2, lapack_int* ipiv,
6707                                 const lapack_complex_double* b, lapack_int ldb,
6708                                 lapack_complex_double* x, lapack_int ldx,
6709                                 double* rcond, double* ferr, double* berr,
6710                                 lapack_complex_double* work, double* rwork );
6711
6712 lapack_int LAPACKE_sgttrf_work( lapack_int n, float* dl, float* d, float* du,
6713                                 float* du2, lapack_int* ipiv );
6714 lapack_int LAPACKE_dgttrf_work( lapack_int n, double* dl, double* d, double* du,
6715                                 double* du2, lapack_int* ipiv );
6716 lapack_int LAPACKE_cgttrf_work( lapack_int n, lapack_complex_float* dl,
6717                                 lapack_complex_float* d,
6718                                 lapack_complex_float* du,
6719                                 lapack_complex_float* du2, lapack_int* ipiv );
6720 lapack_int LAPACKE_zgttrf_work( lapack_int n, lapack_complex_double* dl,
6721                                 lapack_complex_double* d,
6722                                 lapack_complex_double* du,
6723                                 lapack_complex_double* du2, lapack_int* ipiv );
6724
6725 lapack_int LAPACKE_sgttrs_work( int matrix_layout, char trans, lapack_int n,
6726                                 lapack_int nrhs, const float* dl,
6727                                 const float* d, const float* du,
6728                                 const float* du2, const lapack_int* ipiv,
6729                                 float* b, lapack_int ldb );
6730 lapack_int LAPACKE_dgttrs_work( int matrix_layout, char trans, lapack_int n,
6731                                 lapack_int nrhs, const double* dl,
6732                                 const double* d, const double* du,
6733                                 const double* du2, const lapack_int* ipiv,
6734                                 double* b, lapack_int ldb );
6735 lapack_int LAPACKE_cgttrs_work( int matrix_layout, char trans, lapack_int n,
6736                                 lapack_int nrhs, const lapack_complex_float* dl,
6737                                 const lapack_complex_float* d,
6738                                 const lapack_complex_float* du,
6739                                 const lapack_complex_float* du2,
6740                                 const lapack_int* ipiv, lapack_complex_float* b,
6741                                 lapack_int ldb );
6742 lapack_int LAPACKE_zgttrs_work( int matrix_layout, char trans, lapack_int n,
6743                                 lapack_int nrhs,
6744                                 const lapack_complex_double* dl,
6745                                 const lapack_complex_double* d,
6746                                 const lapack_complex_double* du,
6747                                 const lapack_complex_double* du2,
6748                                 const lapack_int* ipiv,
6749                                 lapack_complex_double* b, lapack_int ldb );
6750
6751 lapack_int LAPACKE_chbev_work( int matrix_layout, char jobz, char uplo,
6752                                lapack_int n, lapack_int kd,
6753                                lapack_complex_float* ab, lapack_int ldab,
6754                                float* w, lapack_complex_float* z,
6755                                lapack_int ldz, lapack_complex_float* work,
6756                                float* rwork );
6757 lapack_int LAPACKE_zhbev_work( int matrix_layout, char jobz, char uplo,
6758                                lapack_int n, lapack_int kd,
6759                                lapack_complex_double* ab, lapack_int ldab,
6760                                double* w, lapack_complex_double* z,
6761                                lapack_int ldz, lapack_complex_double* work,
6762                                double* rwork );
6763
6764 lapack_int LAPACKE_chbevd_work( int matrix_layout, char jobz, char uplo,
6765                                 lapack_int n, lapack_int kd,
6766                                 lapack_complex_float* ab, lapack_int ldab,
6767                                 float* w, lapack_complex_float* z,
6768                                 lapack_int ldz, lapack_complex_float* work,
6769                                 lapack_int lwork, float* rwork,
6770                                 lapack_int lrwork, lapack_int* iwork,
6771                                 lapack_int liwork );
6772 lapack_int LAPACKE_zhbevd_work( int matrix_layout, char jobz, char uplo,
6773                                 lapack_int n, lapack_int kd,
6774                                 lapack_complex_double* ab, lapack_int ldab,
6775                                 double* w, lapack_complex_double* z,
6776                                 lapack_int ldz, lapack_complex_double* work,
6777                                 lapack_int lwork, double* rwork,
6778                                 lapack_int lrwork, lapack_int* iwork,
6779                                 lapack_int liwork );
6780
6781 lapack_int LAPACKE_chbevx_work( int matrix_layout, char jobz, char range,
6782                                 char uplo, lapack_int n, lapack_int kd,
6783                                 lapack_complex_float* ab, lapack_int ldab,
6784                                 lapack_complex_float* q, lapack_int ldq,
6785                                 float vl, float vu, lapack_int il,
6786                                 lapack_int iu, float abstol, lapack_int* m,
6787                                 float* w, lapack_complex_float* z,
6788                                 lapack_int ldz, lapack_complex_float* work,
6789                                 float* rwork, lapack_int* iwork,
6790                                 lapack_int* ifail );
6791 lapack_int LAPACKE_zhbevx_work( int matrix_layout, char jobz, char range,
6792                                 char uplo, lapack_int n, lapack_int kd,
6793                                 lapack_complex_double* ab, lapack_int ldab,
6794                                 lapack_complex_double* q, lapack_int ldq,
6795                                 double vl, double vu, lapack_int il,
6796                                 lapack_int iu, double abstol, lapack_int* m,
6797                                 double* w, lapack_complex_double* z,
6798                                 lapack_int ldz, lapack_complex_double* work,
6799                                 double* rwork, lapack_int* iwork,
6800                                 lapack_int* ifail );
6801
6802 lapack_int LAPACKE_chbgst_work( int matrix_layout, char vect, char uplo,
6803                                 lapack_int n, lapack_int ka, lapack_int kb,
6804                                 lapack_complex_float* ab, lapack_int ldab,
6805                                 const lapack_complex_float* bb, lapack_int ldbb,
6806                                 lapack_complex_float* x, lapack_int ldx,
6807                                 lapack_complex_float* work, float* rwork );
6808 lapack_int LAPACKE_zhbgst_work( int matrix_layout, char vect, char uplo,
6809                                 lapack_int n, lapack_int ka, lapack_int kb,
6810                                 lapack_complex_double* ab, lapack_int ldab,
6811                                 const lapack_complex_double* bb,
6812                                 lapack_int ldbb, lapack_complex_double* x,
6813                                 lapack_int ldx, lapack_complex_double* work,
6814                                 double* rwork );
6815
6816 lapack_int LAPACKE_chbgv_work( int matrix_layout, char jobz, char uplo,
6817                                lapack_int n, lapack_int ka, lapack_int kb,
6818                                lapack_complex_float* ab, lapack_int ldab,
6819                                lapack_complex_float* bb, lapack_int ldbb,
6820                                float* w, lapack_complex_float* z,
6821                                lapack_int ldz, lapack_complex_float* work,
6822                                float* rwork );
6823 lapack_int LAPACKE_zhbgv_work( int matrix_layout, char jobz, char uplo,
6824                                lapack_int n, lapack_int ka, lapack_int kb,
6825                                lapack_complex_double* ab, lapack_int ldab,
6826                                lapack_complex_double* bb, lapack_int ldbb,
6827                                double* w, lapack_complex_double* z,
6828                                lapack_int ldz, lapack_complex_double* work,
6829                                double* rwork );
6830
6831 lapack_int LAPACKE_chbgvd_work( int matrix_layout, char jobz, char uplo,
6832                                 lapack_int n, lapack_int ka, lapack_int kb,
6833                                 lapack_complex_float* ab, lapack_int ldab,
6834                                 lapack_complex_float* bb, lapack_int ldbb,
6835                                 float* w, lapack_complex_float* z,
6836                                 lapack_int ldz, lapack_complex_float* work,
6837                                 lapack_int lwork, float* rwork,
6838                                 lapack_int lrwork, lapack_int* iwork,
6839                                 lapack_int liwork );
6840 lapack_int LAPACKE_zhbgvd_work( int matrix_layout, char jobz, char uplo,
6841                                 lapack_int n, lapack_int ka, lapack_int kb,
6842                                 lapack_complex_double* ab, lapack_int ldab,
6843                                 lapack_complex_double* bb, lapack_int ldbb,
6844                                 double* w, lapack_complex_double* z,
6845                                 lapack_int ldz, lapack_complex_double* work,
6846                                 lapack_int lwork, double* rwork,
6847                                 lapack_int lrwork, lapack_int* iwork,
6848                                 lapack_int liwork );
6849
6850 lapack_int LAPACKE_chbgvx_work( int matrix_layout, char jobz, char range,
6851                                 char uplo, lapack_int n, lapack_int ka,
6852                                 lapack_int kb, lapack_complex_float* ab,
6853                                 lapack_int ldab, lapack_complex_float* bb,
6854                                 lapack_int ldbb, lapack_complex_float* q,
6855                                 lapack_int ldq, float vl, float vu,
6856                                 lapack_int il, lapack_int iu, float abstol,
6857                                 lapack_int* m, float* w,
6858                                 lapack_complex_float* z, lapack_int ldz,
6859                                 lapack_complex_float* work, float* rwork,
6860                                 lapack_int* iwork, lapack_int* ifail );
6861 lapack_int LAPACKE_zhbgvx_work( int matrix_layout, char jobz, char range,
6862                                 char uplo, lapack_int n, lapack_int ka,
6863                                 lapack_int kb, lapack_complex_double* ab,
6864                                 lapack_int ldab, lapack_complex_double* bb,
6865                                 lapack_int ldbb, lapack_complex_double* q,
6866                                 lapack_int ldq, double vl, double vu,
6867                                 lapack_int il, lapack_int iu, double abstol,
6868                                 lapack_int* m, double* w,
6869                                 lapack_complex_double* z, lapack_int ldz,
6870                                 lapack_complex_double* work, double* rwork,
6871                                 lapack_int* iwork, lapack_int* ifail );
6872
6873 lapack_int LAPACKE_chbtrd_work( int matrix_layout, char vect, char uplo,
6874                                 lapack_int n, lapack_int kd,
6875                                 lapack_complex_float* ab, lapack_int ldab,
6876                                 float* d, float* e, lapack_complex_float* q,
6877                                 lapack_int ldq, lapack_complex_float* work );
6878 lapack_int LAPACKE_zhbtrd_work( int matrix_layout, char vect, char uplo,
6879                                 lapack_int n, lapack_int kd,
6880                                 lapack_complex_double* ab, lapack_int ldab,
6881                                 double* d, double* e, lapack_complex_double* q,
6882                                 lapack_int ldq, lapack_complex_double* work );
6883
6884 lapack_int LAPACKE_checon_work( int matrix_layout, char uplo, lapack_int n,
6885                                 const lapack_complex_float* a, lapack_int lda,
6886                                 const lapack_int* ipiv, float anorm,
6887                                 float* rcond, lapack_complex_float* work );
6888 lapack_int LAPACKE_zhecon_work( int matrix_layout, char uplo, lapack_int n,
6889                                 const lapack_complex_double* a, lapack_int lda,
6890                                 const lapack_int* ipiv, double anorm,
6891                                 double* rcond, lapack_complex_double* work );
6892
6893 lapack_int LAPACKE_cheequb_work( int matrix_layout, char uplo, lapack_int n,
6894                                  const lapack_complex_float* a, lapack_int lda,
6895                                  float* s, float* scond, float* amax,
6896                                  lapack_complex_float* work );
6897 lapack_int LAPACKE_zheequb_work( int matrix_layout, char uplo, lapack_int n,
6898                                  const lapack_complex_double* a, lapack_int lda,
6899                                  double* s, double* scond, double* amax,
6900                                  lapack_complex_double* work );
6901
6902 lapack_int LAPACKE_cheev_work( int matrix_layout, char jobz, char uplo,
6903                                lapack_int n, lapack_complex_float* a,
6904                                lapack_int lda, float* w,
6905                                lapack_complex_float* work, lapack_int lwork,
6906                                float* rwork );
6907 lapack_int LAPACKE_zheev_work( int matrix_layout, char jobz, char uplo,
6908                                lapack_int n, lapack_complex_double* a,
6909                                lapack_int lda, double* w,
6910                                lapack_complex_double* work, lapack_int lwork,
6911                                double* rwork );
6912
6913 lapack_int LAPACKE_cheevd_work( int matrix_layout, char jobz, char uplo,
6914                                 lapack_int n, lapack_complex_float* a,
6915                                 lapack_int lda, float* w,
6916                                 lapack_complex_float* work, lapack_int lwork,
6917                                 float* rwork, lapack_int lrwork,
6918                                 lapack_int* iwork, lapack_int liwork );
6919 lapack_int LAPACKE_zheevd_work( int matrix_layout, char jobz, char uplo,
6920                                 lapack_int n, lapack_complex_double* a,
6921                                 lapack_int lda, double* w,
6922                                 lapack_complex_double* work, lapack_int lwork,
6923                                 double* rwork, lapack_int lrwork,
6924                                 lapack_int* iwork, lapack_int liwork );
6925
6926 lapack_int LAPACKE_cheevr_work( int matrix_layout, char jobz, char range,
6927                                 char uplo, lapack_int n,
6928                                 lapack_complex_float* a, lapack_int lda,
6929                                 float vl, float vu, lapack_int il,
6930                                 lapack_int iu, float abstol, lapack_int* m,
6931                                 float* w, lapack_complex_float* z,
6932                                 lapack_int ldz, lapack_int* isuppz,
6933                                 lapack_complex_float* work, lapack_int lwork,
6934                                 float* rwork, lapack_int lrwork,
6935                                 lapack_int* iwork, lapack_int liwork );
6936 lapack_int LAPACKE_zheevr_work( int matrix_layout, char jobz, char range,
6937                                 char uplo, lapack_int n,
6938                                 lapack_complex_double* a, lapack_int lda,
6939                                 double vl, double vu, lapack_int il,
6940                                 lapack_int iu, double abstol, lapack_int* m,
6941                                 double* w, lapack_complex_double* z,
6942                                 lapack_int ldz, lapack_int* isuppz,
6943                                 lapack_complex_double* work, lapack_int lwork,
6944                                 double* rwork, lapack_int lrwork,
6945                                 lapack_int* iwork, lapack_int liwork );
6946
6947 lapack_int LAPACKE_cheevx_work( int matrix_layout, char jobz, char range,
6948                                 char uplo, lapack_int n,
6949                                 lapack_complex_float* a, lapack_int lda,
6950                                 float vl, float vu, lapack_int il,
6951                                 lapack_int iu, float abstol, lapack_int* m,
6952                                 float* w, lapack_complex_float* z,
6953                                 lapack_int ldz, lapack_complex_float* work,
6954                                 lapack_int lwork, float* rwork,
6955                                 lapack_int* iwork, lapack_int* ifail );
6956 lapack_int LAPACKE_zheevx_work( int matrix_layout, char jobz, char range,
6957                                 char uplo, lapack_int n,
6958                                 lapack_complex_double* a, lapack_int lda,
6959                                 double vl, double vu, lapack_int il,
6960                                 lapack_int iu, double abstol, lapack_int* m,
6961                                 double* w, lapack_complex_double* z,
6962                                 lapack_int ldz, lapack_complex_double* work,
6963                                 lapack_int lwork, double* rwork,
6964                                 lapack_int* iwork, lapack_int* ifail );
6965
6966 lapack_int LAPACKE_chegst_work( int matrix_layout, lapack_int itype, char uplo,
6967                                 lapack_int n, lapack_complex_float* a,
6968                                 lapack_int lda, const lapack_complex_float* b,
6969                                 lapack_int ldb );
6970 lapack_int LAPACKE_zhegst_work( int matrix_layout, lapack_int itype, char uplo,
6971                                 lapack_int n, lapack_complex_double* a,
6972                                 lapack_int lda, const lapack_complex_double* b,
6973                                 lapack_int ldb );
6974
6975 lapack_int LAPACKE_chegv_work( int matrix_layout, lapack_int itype, char jobz,
6976                                char uplo, lapack_int n, lapack_complex_float* a,
6977                                lapack_int lda, lapack_complex_float* b,
6978                                lapack_int ldb, float* w,
6979                                lapack_complex_float* work, lapack_int lwork,
6980                                float* rwork );
6981 lapack_int LAPACKE_zhegv_work( int matrix_layout, lapack_int itype, char jobz,
6982                                char uplo, lapack_int n,
6983                                lapack_complex_double* a, lapack_int lda,
6984                                lapack_complex_double* b, lapack_int ldb,
6985                                double* w, lapack_complex_double* work,
6986                                lapack_int lwork, double* rwork );
6987
6988 lapack_int LAPACKE_chegvd_work( int matrix_layout, lapack_int itype, char jobz,
6989                                 char uplo, lapack_int n,
6990                                 lapack_complex_float* a, lapack_int lda,
6991                                 lapack_complex_float* b, lapack_int ldb,
6992                                 float* w, lapack_complex_float* work,
6993                                 lapack_int lwork, float* rwork,
6994                                 lapack_int lrwork, lapack_int* iwork,
6995                                 lapack_int liwork );
6996 lapack_int LAPACKE_zhegvd_work( int matrix_layout, lapack_int itype, char jobz,
6997                                 char uplo, lapack_int n,
6998                                 lapack_complex_double* a, lapack_int lda,
6999                                 lapack_complex_double* b, lapack_int ldb,
7000                                 double* w, lapack_complex_double* work,
7001                                 lapack_int lwork, double* rwork,
7002                                 lapack_int lrwork, lapack_int* iwork,
7003                                 lapack_int liwork );
7004
7005 lapack_int LAPACKE_chegvx_work( int matrix_layout, lapack_int itype, char jobz,
7006                                 char range, char uplo, lapack_int n,
7007                                 lapack_complex_float* a, lapack_int lda,
7008                                 lapack_complex_float* b, lapack_int ldb,
7009                                 float vl, float vu, lapack_int il,
7010                                 lapack_int iu, float abstol, lapack_int* m,
7011                                 float* w, lapack_complex_float* z,
7012                                 lapack_int ldz, lapack_complex_float* work,
7013                                 lapack_int lwork, float* rwork,
7014                                 lapack_int* iwork, lapack_int* ifail );
7015 lapack_int LAPACKE_zhegvx_work( int matrix_layout, lapack_int itype, char jobz,
7016                                 char range, char uplo, lapack_int n,
7017                                 lapack_complex_double* a, lapack_int lda,
7018                                 lapack_complex_double* b, lapack_int ldb,
7019                                 double vl, double vu, lapack_int il,
7020                                 lapack_int iu, double abstol, lapack_int* m,
7021                                 double* w, lapack_complex_double* z,
7022                                 lapack_int ldz, lapack_complex_double* work,
7023                                 lapack_int lwork, double* rwork,
7024                                 lapack_int* iwork, lapack_int* ifail );
7025
7026 lapack_int LAPACKE_cherfs_work( int matrix_layout, char uplo, lapack_int n,
7027                                 lapack_int nrhs, const lapack_complex_float* a,
7028                                 lapack_int lda, const lapack_complex_float* af,
7029                                 lapack_int ldaf, const lapack_int* ipiv,
7030                                 const lapack_complex_float* b, lapack_int ldb,
7031                                 lapack_complex_float* x, lapack_int ldx,
7032                                 float* ferr, float* berr,
7033                                 lapack_complex_float* work, float* rwork );
7034 lapack_int LAPACKE_zherfs_work( int matrix_layout, char uplo, lapack_int n,
7035                                 lapack_int nrhs, const lapack_complex_double* a,
7036                                 lapack_int lda, const lapack_complex_double* af,
7037                                 lapack_int ldaf, const lapack_int* ipiv,
7038                                 const lapack_complex_double* b, lapack_int ldb,
7039                                 lapack_complex_double* x, lapack_int ldx,
7040                                 double* ferr, double* berr,
7041                                 lapack_complex_double* work, double* rwork );
7042
7043 lapack_int LAPACKE_cherfsx_work( int matrix_layout, char uplo, char equed,
7044                                  lapack_int n, lapack_int nrhs,
7045                                  const lapack_complex_float* a, lapack_int lda,
7046                                  const lapack_complex_float* af,
7047                                  lapack_int ldaf, const lapack_int* ipiv,
7048                                  const float* s, const lapack_complex_float* b,
7049                                  lapack_int ldb, lapack_complex_float* x,
7050                                  lapack_int ldx, float* rcond, float* berr,
7051                                  lapack_int n_err_bnds, float* err_bnds_norm,
7052                                  float* err_bnds_comp, lapack_int nparams,
7053                                  float* params, lapack_complex_float* work,
7054                                  float* rwork );
7055 lapack_int LAPACKE_zherfsx_work( int matrix_layout, char uplo, char equed,
7056                                  lapack_int n, lapack_int nrhs,
7057                                  const lapack_complex_double* a, lapack_int lda,
7058                                  const lapack_complex_double* af,
7059                                  lapack_int ldaf, const lapack_int* ipiv,
7060                                  const double* s,
7061                                  const lapack_complex_double* b, lapack_int ldb,
7062                                  lapack_complex_double* x, lapack_int ldx,
7063                                  double* rcond, double* berr,
7064                                  lapack_int n_err_bnds, double* err_bnds_norm,
7065                                  double* err_bnds_comp, lapack_int nparams,
7066                                  double* params, lapack_complex_double* work,
7067                                  double* rwork );
7068
7069 lapack_int LAPACKE_chesv_work( int matrix_layout, char uplo, lapack_int n,
7070                                lapack_int nrhs, lapack_complex_float* a,
7071                                lapack_int lda, lapack_int* ipiv,
7072                                lapack_complex_float* b, lapack_int ldb,
7073                                lapack_complex_float* work, lapack_int lwork );
7074 lapack_int LAPACKE_zhesv_work( int matrix_layout, char uplo, lapack_int n,
7075                                lapack_int nrhs, lapack_complex_double* a,
7076                                lapack_int lda, lapack_int* ipiv,
7077                                lapack_complex_double* b, lapack_int ldb,
7078                                lapack_complex_double* work, lapack_int lwork );
7079
7080 lapack_int LAPACKE_chesvx_work( int matrix_layout, char fact, char uplo,
7081                                 lapack_int n, lapack_int nrhs,
7082                                 const lapack_complex_float* a, lapack_int lda,
7083                                 lapack_complex_float* af, lapack_int ldaf,
7084                                 lapack_int* ipiv, const lapack_complex_float* b,
7085                                 lapack_int ldb, lapack_complex_float* x,
7086                                 lapack_int ldx, float* rcond, float* ferr,
7087                                 float* berr, lapack_complex_float* work,
7088                                 lapack_int lwork, float* rwork );
7089 lapack_int LAPACKE_zhesvx_work( int matrix_layout, char fact, char uplo,
7090                                 lapack_int n, lapack_int nrhs,
7091                                 const lapack_complex_double* a, lapack_int lda,
7092                                 lapack_complex_double* af, lapack_int ldaf,
7093                                 lapack_int* ipiv,
7094                                 const lapack_complex_double* b, lapack_int ldb,
7095                                 lapack_complex_double* x, lapack_int ldx,
7096                                 double* rcond, double* ferr, double* berr,
7097                                 lapack_complex_double* work, lapack_int lwork,
7098                                 double* rwork );
7099
7100 lapack_int LAPACKE_chesvxx_work( int matrix_layout, char fact, char uplo,
7101                                  lapack_int n, lapack_int nrhs,
7102                                  lapack_complex_float* a, lapack_int lda,
7103                                  lapack_complex_float* af, lapack_int ldaf,
7104                                  lapack_int* ipiv, char* equed, float* s,
7105                                  lapack_complex_float* b, lapack_int ldb,
7106                                  lapack_complex_float* x, lapack_int ldx,
7107                                  float* rcond, float* rpvgrw, float* berr,
7108                                  lapack_int n_err_bnds, float* err_bnds_norm,
7109                                  float* err_bnds_comp, lapack_int nparams,
7110                                  float* params, lapack_complex_float* work,
7111                                  float* rwork );
7112 lapack_int LAPACKE_zhesvxx_work( int matrix_layout, char fact, char uplo,
7113                                  lapack_int n, lapack_int nrhs,
7114                                  lapack_complex_double* a, lapack_int lda,
7115                                  lapack_complex_double* af, lapack_int ldaf,
7116                                  lapack_int* ipiv, char* equed, double* s,
7117                                  lapack_complex_double* b, lapack_int ldb,
7118                                  lapack_complex_double* x, lapack_int ldx,
7119                                  double* rcond, double* rpvgrw, double* berr,
7120                                  lapack_int n_err_bnds, double* err_bnds_norm,
7121                                  double* err_bnds_comp, lapack_int nparams,
7122                                  double* params, lapack_complex_double* work,
7123                                  double* rwork );
7124
7125 lapack_int LAPACKE_chetrd_work( int matrix_layout, char uplo, lapack_int n,
7126                                 lapack_complex_float* a, lapack_int lda,
7127                                 float* d, float* e, lapack_complex_float* tau,
7128                                 lapack_complex_float* work, lapack_int lwork );
7129 lapack_int LAPACKE_zhetrd_work( int matrix_layout, char uplo, lapack_int n,
7130                                 lapack_complex_double* a, lapack_int lda,
7131                                 double* d, double* e,
7132                                 lapack_complex_double* tau,
7133                                 lapack_complex_double* work, lapack_int lwork );
7134
7135 lapack_int LAPACKE_chetrf_work( int matrix_layout, char uplo, lapack_int n,
7136                                 lapack_complex_float* a, lapack_int lda,
7137                                 lapack_int* ipiv, lapack_complex_float* work,
7138                                 lapack_int lwork );
7139 lapack_int LAPACKE_zhetrf_work( int matrix_layout, char uplo, lapack_int n,
7140                                 lapack_complex_double* a, lapack_int lda,
7141                                 lapack_int* ipiv, lapack_complex_double* work,
7142                                 lapack_int lwork );
7143
7144 lapack_int LAPACKE_chetri_work( int matrix_layout, char uplo, lapack_int n,
7145                                 lapack_complex_float* a, lapack_int lda,
7146                                 const lapack_int* ipiv,
7147                                 lapack_complex_float* work );
7148 lapack_int LAPACKE_zhetri_work( int matrix_layout, char uplo, lapack_int n,
7149                                 lapack_complex_double* a, lapack_int lda,
7150                                 const lapack_int* ipiv,
7151                                 lapack_complex_double* work );
7152
7153 lapack_int LAPACKE_chetrs_work( int matrix_layout, char uplo, lapack_int n,
7154                                 lapack_int nrhs, const lapack_complex_float* a,
7155                                 lapack_int lda, const lapack_int* ipiv,
7156                                 lapack_complex_float* b, lapack_int ldb );
7157 lapack_int LAPACKE_zhetrs_work( int matrix_layout, char uplo, lapack_int n,
7158                                 lapack_int nrhs, const lapack_complex_double* a,
7159                                 lapack_int lda, const lapack_int* ipiv,
7160                                 lapack_complex_double* b, lapack_int ldb );
7161
7162 lapack_int LAPACKE_chfrk_work( int matrix_layout, char transr, char uplo,
7163                                char trans, lapack_int n, lapack_int k,
7164                                float alpha, const lapack_complex_float* a,
7165                                lapack_int lda, float beta,
7166                                lapack_complex_float* c );
7167 lapack_int LAPACKE_zhfrk_work( int matrix_layout, char transr, char uplo,
7168                                char trans, lapack_int n, lapack_int k,
7169                                double alpha, const lapack_complex_double* a,
7170                                lapack_int lda, double beta,
7171                                lapack_complex_double* c );
7172
7173 lapack_int LAPACKE_shgeqz_work( int matrix_layout, char job, char compq,
7174                                 char compz, lapack_int n, lapack_int ilo,
7175                                 lapack_int ihi, float* h, lapack_int ldh,
7176                                 float* t, lapack_int ldt, float* alphar,
7177                                 float* alphai, float* beta, float* q,
7178                                 lapack_int ldq, float* z, lapack_int ldz,
7179                                 float* work, lapack_int lwork );
7180 lapack_int LAPACKE_dhgeqz_work( int matrix_layout, char job, char compq,
7181                                 char compz, lapack_int n, lapack_int ilo,
7182                                 lapack_int ihi, double* h, lapack_int ldh,
7183                                 double* t, lapack_int ldt, double* alphar,
7184                                 double* alphai, double* beta, double* q,
7185                                 lapack_int ldq, double* z, lapack_int ldz,
7186                                 double* work, lapack_int lwork );
7187 lapack_int LAPACKE_chgeqz_work( int matrix_layout, char job, char compq,
7188                                 char compz, lapack_int n, lapack_int ilo,
7189                                 lapack_int ihi, lapack_complex_float* h,
7190                                 lapack_int ldh, lapack_complex_float* t,
7191                                 lapack_int ldt, lapack_complex_float* alpha,
7192                                 lapack_complex_float* beta,
7193                                 lapack_complex_float* q, lapack_int ldq,
7194                                 lapack_complex_float* z, lapack_int ldz,
7195                                 lapack_complex_float* work, lapack_int lwork,
7196                                 float* rwork );
7197 lapack_int LAPACKE_zhgeqz_work( int matrix_layout, char job, char compq,
7198                                 char compz, lapack_int n, lapack_int ilo,
7199                                 lapack_int ihi, lapack_complex_double* h,
7200                                 lapack_int ldh, lapack_complex_double* t,
7201                                 lapack_int ldt, lapack_complex_double* alpha,
7202                                 lapack_complex_double* beta,
7203                                 lapack_complex_double* q, lapack_int ldq,
7204                                 lapack_complex_double* z, lapack_int ldz,
7205                                 lapack_complex_double* work, lapack_int lwork,
7206                                 double* rwork );
7207
7208 lapack_int LAPACKE_chpcon_work( int matrix_layout, char uplo, lapack_int n,
7209                                 const lapack_complex_float* ap,
7210                                 const lapack_int* ipiv, float anorm,
7211                                 float* rcond, lapack_complex_float* work );
7212 lapack_int LAPACKE_zhpcon_work( int matrix_layout, char uplo, lapack_int n,
7213                                 const lapack_complex_double* ap,
7214                                 const lapack_int* ipiv, double anorm,
7215                                 double* rcond, lapack_complex_double* work );
7216
7217 lapack_int LAPACKE_chpev_work( int matrix_layout, char jobz, char uplo,
7218                                lapack_int n, lapack_complex_float* ap, float* w,
7219                                lapack_complex_float* z, lapack_int ldz,
7220                                lapack_complex_float* work, float* rwork );
7221 lapack_int LAPACKE_zhpev_work( int matrix_layout, char jobz, char uplo,
7222                                lapack_int n, lapack_complex_double* ap,
7223                                double* w, lapack_complex_double* z,
7224                                lapack_int ldz, lapack_complex_double* work,
7225                                double* rwork );
7226
7227 lapack_int LAPACKE_chpevd_work( int matrix_layout, char jobz, char uplo,
7228                                 lapack_int n, lapack_complex_float* ap,
7229                                 float* w, lapack_complex_float* z,
7230                                 lapack_int ldz, lapack_complex_float* work,
7231                                 lapack_int lwork, float* rwork,
7232                                 lapack_int lrwork, lapack_int* iwork,
7233                                 lapack_int liwork );
7234 lapack_int LAPACKE_zhpevd_work( int matrix_layout, char jobz, char uplo,
7235                                 lapack_int n, lapack_complex_double* ap,
7236                                 double* w, lapack_complex_double* z,
7237                                 lapack_int ldz, lapack_complex_double* work,
7238                                 lapack_int lwork, double* rwork,
7239                                 lapack_int lrwork, lapack_int* iwork,
7240                                 lapack_int liwork );
7241
7242 lapack_int LAPACKE_chpevx_work( int matrix_layout, char jobz, char range,
7243                                 char uplo, lapack_int n,
7244                                 lapack_complex_float* ap, float vl, float vu,
7245                                 lapack_int il, lapack_int iu, float abstol,
7246                                 lapack_int* m, float* w,
7247                                 lapack_complex_float* z, lapack_int ldz,
7248                                 lapack_complex_float* work, float* rwork,
7249                                 lapack_int* iwork, lapack_int* ifail );
7250 lapack_int LAPACKE_zhpevx_work( int matrix_layout, char jobz, char range,
7251                                 char uplo, lapack_int n,
7252                                 lapack_complex_double* ap, double vl, double vu,
7253                                 lapack_int il, lapack_int iu, double abstol,
7254                                 lapack_int* m, double* w,
7255                                 lapack_complex_double* z, lapack_int ldz,
7256                                 lapack_complex_double* work, double* rwork,
7257                                 lapack_int* iwork, lapack_int* ifail );
7258
7259 lapack_int LAPACKE_chpgst_work( int matrix_layout, lapack_int itype, char uplo,
7260                                 lapack_int n, lapack_complex_float* ap,
7261                                 const lapack_complex_float* bp );
7262 lapack_int LAPACKE_zhpgst_work( int matrix_layout, lapack_int itype, char uplo,
7263                                 lapack_int n, lapack_complex_double* ap,
7264                                 const lapack_complex_double* bp );
7265
7266 lapack_int LAPACKE_chpgv_work( int matrix_layout, lapack_int itype, char jobz,
7267                                char uplo, lapack_int n,
7268                                lapack_complex_float* ap,
7269                                lapack_complex_float* bp, float* w,
7270                                lapack_complex_float* z, lapack_int ldz,
7271                                lapack_complex_float* work, float* rwork );
7272 lapack_int LAPACKE_zhpgv_work( int matrix_layout, lapack_int itype, char jobz,
7273                                char uplo, lapack_int n,
7274                                lapack_complex_double* ap,
7275                                lapack_complex_double* bp, double* w,
7276                                lapack_complex_double* z, lapack_int ldz,
7277                                lapack_complex_double* work, double* rwork );
7278
7279 lapack_int LAPACKE_chpgvd_work( int matrix_layout, lapack_int itype, char jobz,
7280                                 char uplo, lapack_int n,
7281                                 lapack_complex_float* ap,
7282                                 lapack_complex_float* bp, float* w,
7283                                 lapack_complex_float* z, lapack_int ldz,
7284                                 lapack_complex_float* work, lapack_int lwork,
7285                                 float* rwork, lapack_int lrwork,
7286                                 lapack_int* iwork, lapack_int liwork );
7287 lapack_int LAPACKE_zhpgvd_work( int matrix_layout, lapack_int itype, char jobz,
7288                                 char uplo, lapack_int n,
7289                                 lapack_complex_double* ap,
7290                                 lapack_complex_double* bp, double* w,
7291                                 lapack_complex_double* z, lapack_int ldz,
7292                                 lapack_complex_double* work, lapack_int lwork,
7293                                 double* rwork, lapack_int lrwork,
7294                                 lapack_int* iwork, lapack_int liwork );
7295
7296 lapack_int LAPACKE_chpgvx_work( int matrix_layout, lapack_int itype, char jobz,
7297                                 char range, char uplo, lapack_int n,
7298                                 lapack_complex_float* ap,
7299                                 lapack_complex_float* bp, float vl, float vu,
7300                                 lapack_int il, lapack_int iu, float abstol,
7301                                 lapack_int* m, float* w,
7302                                 lapack_complex_float* z, lapack_int ldz,
7303                                 lapack_complex_float* work, float* rwork,
7304                                 lapack_int* iwork, lapack_int* ifail );
7305 lapack_int LAPACKE_zhpgvx_work( int matrix_layout, lapack_int itype, char jobz,
7306                                 char range, char uplo, lapack_int n,
7307                                 lapack_complex_double* ap,
7308                                 lapack_complex_double* bp, double vl, double vu,
7309                                 lapack_int il, lapack_int iu, double abstol,
7310                                 lapack_int* m, double* w,
7311                                 lapack_complex_double* z, lapack_int ldz,
7312                                 lapack_complex_double* work, double* rwork,
7313                                 lapack_int* iwork, lapack_int* ifail );
7314
7315 lapack_int LAPACKE_chprfs_work( int matrix_layout, char uplo, lapack_int n,
7316                                 lapack_int nrhs, const lapack_complex_float* ap,
7317                                 const lapack_complex_float* afp,
7318                                 const lapack_int* ipiv,
7319                                 const lapack_complex_float* b, lapack_int ldb,
7320                                 lapack_complex_float* x, lapack_int ldx,
7321                                 float* ferr, float* berr,
7322                                 lapack_complex_float* work, float* rwork );
7323 lapack_int LAPACKE_zhprfs_work( int matrix_layout, char uplo, lapack_int n,
7324                                 lapack_int nrhs,
7325                                 const lapack_complex_double* ap,
7326                                 const lapack_complex_double* afp,
7327                                 const lapack_int* ipiv,
7328                                 const lapack_complex_double* b, lapack_int ldb,
7329                                 lapack_complex_double* x, lapack_int ldx,
7330                                 double* ferr, double* berr,
7331                                 lapack_complex_double* work, double* rwork );
7332
7333 lapack_int LAPACKE_chpsv_work( int matrix_layout, char uplo, lapack_int n,
7334                                lapack_int nrhs, lapack_complex_float* ap,
7335                                lapack_int* ipiv, lapack_complex_float* b,
7336                                lapack_int ldb );
7337 lapack_int LAPACKE_zhpsv_work( int matrix_layout, char uplo, lapack_int n,
7338                                lapack_int nrhs, lapack_complex_double* ap,
7339                                lapack_int* ipiv, lapack_complex_double* b,
7340                                lapack_int ldb );
7341
7342 lapack_int LAPACKE_chpsvx_work( int matrix_layout, char fact, char uplo,
7343                                 lapack_int n, lapack_int nrhs,
7344                                 const lapack_complex_float* ap,
7345                                 lapack_complex_float* afp, lapack_int* ipiv,
7346                                 const lapack_complex_float* b, lapack_int ldb,
7347                                 lapack_complex_float* x, lapack_int ldx,
7348                                 float* rcond, float* ferr, float* berr,
7349                                 lapack_complex_float* work, float* rwork );
7350 lapack_int LAPACKE_zhpsvx_work( int matrix_layout, char fact, char uplo,
7351                                 lapack_int n, lapack_int nrhs,
7352                                 const lapack_complex_double* ap,
7353                                 lapack_complex_double* afp, lapack_int* ipiv,
7354                                 const lapack_complex_double* b, lapack_int ldb,
7355                                 lapack_complex_double* x, lapack_int ldx,
7356                                 double* rcond, double* ferr, double* berr,
7357                                 lapack_complex_double* work, double* rwork );
7358
7359 lapack_int LAPACKE_chptrd_work( int matrix_layout, char uplo, lapack_int n,
7360                                 lapack_complex_float* ap, float* d, float* e,
7361                                 lapack_complex_float* tau );
7362 lapack_int LAPACKE_zhptrd_work( int matrix_layout, char uplo, lapack_int n,
7363                                 lapack_complex_double* ap, double* d, double* e,
7364                                 lapack_complex_double* tau );
7365
7366 lapack_int LAPACKE_chptrf_work( int matrix_layout, char uplo, lapack_int n,
7367                                 lapack_complex_float* ap, lapack_int* ipiv );
7368 lapack_int LAPACKE_zhptrf_work( int matrix_layout, char uplo, lapack_int n,
7369                                 lapack_complex_double* ap, lapack_int* ipiv );
7370
7371 lapack_int LAPACKE_chptri_work( int matrix_layout, char uplo, lapack_int n,
7372                                 lapack_complex_float* ap,
7373                                 const lapack_int* ipiv,
7374                                 lapack_complex_float* work );
7375 lapack_int LAPACKE_zhptri_work( int matrix_layout, char uplo, lapack_int n,
7376                                 lapack_complex_double* ap,
7377                                 const lapack_int* ipiv,
7378                                 lapack_complex_double* work );
7379
7380 lapack_int LAPACKE_chptrs_work( int matrix_layout, char uplo, lapack_int n,
7381                                 lapack_int nrhs, const lapack_complex_float* ap,
7382                                 const lapack_int* ipiv, lapack_complex_float* b,
7383                                 lapack_int ldb );
7384 lapack_int LAPACKE_zhptrs_work( int matrix_layout, char uplo, lapack_int n,
7385                                 lapack_int nrhs,
7386                                 const lapack_complex_double* ap,
7387                                 const lapack_int* ipiv,
7388                                 lapack_complex_double* b, lapack_int ldb );
7389
7390 lapack_int LAPACKE_shsein_work( int matrix_layout, char job, char eigsrc,
7391                                 char initv, lapack_logical* select,
7392                                 lapack_int n, const float* h, lapack_int ldh,
7393                                 float* wr, const float* wi, float* vl,
7394                                 lapack_int ldvl, float* vr, lapack_int ldvr,
7395                                 lapack_int mm, lapack_int* m, float* work,
7396                                 lapack_int* ifaill, lapack_int* ifailr );
7397 lapack_int LAPACKE_dhsein_work( int matrix_layout, char job, char eigsrc,
7398                                 char initv, lapack_logical* select,
7399                                 lapack_int n, const double* h, lapack_int ldh,
7400                                 double* wr, const double* wi, double* vl,
7401                                 lapack_int ldvl, double* vr, lapack_int ldvr,
7402                                 lapack_int mm, lapack_int* m, double* work,
7403                                 lapack_int* ifaill, lapack_int* ifailr );
7404 lapack_int LAPACKE_chsein_work( int matrix_layout, char job, char eigsrc,
7405                                 char initv, const lapack_logical* select,
7406                                 lapack_int n, const lapack_complex_float* h,
7407                                 lapack_int ldh, lapack_complex_float* w,
7408                                 lapack_complex_float* vl, lapack_int ldvl,
7409                                 lapack_complex_float* vr, lapack_int ldvr,
7410                                 lapack_int mm, lapack_int* m,
7411                                 lapack_complex_float* work, float* rwork,
7412                                 lapack_int* ifaill, lapack_int* ifailr );
7413 lapack_int LAPACKE_zhsein_work( int matrix_layout, char job, char eigsrc,
7414                                 char initv, const lapack_logical* select,
7415                                 lapack_int n, const lapack_complex_double* h,
7416                                 lapack_int ldh, lapack_complex_double* w,
7417                                 lapack_complex_double* vl, lapack_int ldvl,
7418                                 lapack_complex_double* vr, lapack_int ldvr,
7419                                 lapack_int mm, lapack_int* m,
7420                                 lapack_complex_double* work, double* rwork,
7421                                 lapack_int* ifaill, lapack_int* ifailr );
7422
7423 lapack_int LAPACKE_shseqr_work( int matrix_layout, char job, char compz,
7424                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7425                                 float* h, lapack_int ldh, float* wr, float* wi,
7426                                 float* z, lapack_int ldz, float* work,
7427                                 lapack_int lwork );
7428 lapack_int LAPACKE_dhseqr_work( int matrix_layout, char job, char compz,
7429                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7430                                 double* h, lapack_int ldh, double* wr,
7431                                 double* wi, double* z, lapack_int ldz,
7432                                 double* work, lapack_int lwork );
7433 lapack_int LAPACKE_chseqr_work( int matrix_layout, char job, char compz,
7434                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7435                                 lapack_complex_float* h, lapack_int ldh,
7436                                 lapack_complex_float* w,
7437                                 lapack_complex_float* z, lapack_int ldz,
7438                                 lapack_complex_float* work, lapack_int lwork );
7439 lapack_int LAPACKE_zhseqr_work( int matrix_layout, char job, char compz,
7440                                 lapack_int n, lapack_int ilo, lapack_int ihi,
7441                                 lapack_complex_double* h, lapack_int ldh,
7442                                 lapack_complex_double* w,
7443                                 lapack_complex_double* z, lapack_int ldz,
7444                                 lapack_complex_double* work, lapack_int lwork );
7445
7446 lapack_int LAPACKE_clacgv_work( lapack_int n, lapack_complex_float* x,
7447                                 lapack_int incx );
7448 lapack_int LAPACKE_zlacgv_work( lapack_int n, lapack_complex_double* x,
7449                                 lapack_int incx );
7450
7451 lapack_int LAPACKE_slacn2_work( lapack_int n, float* v, float* x,
7452                                 lapack_int* isgn, float* est, lapack_int* kase,
7453                                 lapack_int* isave );
7454 lapack_int LAPACKE_dlacn2_work( lapack_int n, double* v, double* x,
7455                                 lapack_int* isgn, double* est, lapack_int* kase,
7456                                 lapack_int* isave );
7457 lapack_int LAPACKE_clacn2_work( lapack_int n, lapack_complex_float* v,
7458                                 lapack_complex_float* x,
7459                                 float* est, lapack_int* kase,
7460                                 lapack_int* isave );
7461 lapack_int LAPACKE_zlacn2_work( lapack_int n, lapack_complex_double* v,
7462                                 lapack_complex_double* x,
7463                                 double* est, lapack_int* kase,
7464                                 lapack_int* isave );
7465
7466 lapack_int LAPACKE_slacpy_work( int matrix_layout, char uplo, lapack_int m,
7467                                 lapack_int n, const float* a, lapack_int lda,
7468                                 float* b, lapack_int ldb );
7469 lapack_int LAPACKE_dlacpy_work( int matrix_layout, char uplo, lapack_int m,
7470                                 lapack_int n, const double* a, lapack_int lda,
7471                                 double* b, lapack_int ldb );
7472 lapack_int LAPACKE_clacpy_work( int matrix_layout, char uplo, lapack_int m,
7473                                 lapack_int n, const lapack_complex_float* a,
7474                                 lapack_int lda, lapack_complex_float* b,
7475                                 lapack_int ldb );
7476 lapack_int LAPACKE_zlacpy_work( int matrix_layout, char uplo, lapack_int m,
7477                                 lapack_int n, const lapack_complex_double* a,
7478                                 lapack_int lda, lapack_complex_double* b,
7479                                 lapack_int ldb );
7480
7481 lapack_int LAPACKE_clacp2_work( int matrix_layout, char uplo, lapack_int m,
7482                                 lapack_int n, const float* a, lapack_int lda,
7483                                 lapack_complex_float* b, lapack_int ldb );
7484 lapack_int LAPACKE_zlacp2_work( int matrix_layout, char uplo, lapack_int m,
7485                                 lapack_int n, const double* a, lapack_int lda,
7486                                 lapack_complex_double* b, lapack_int ldb );
7487
7488 lapack_int LAPACKE_zlag2c_work( int matrix_layout, lapack_int m, lapack_int n,
7489                                 const lapack_complex_double* a, lapack_int lda,
7490                                 lapack_complex_float* sa, lapack_int ldsa );
7491
7492 lapack_int LAPACKE_slag2d_work( int matrix_layout, lapack_int m, lapack_int n,
7493                                 const float* sa, lapack_int ldsa, double* a,
7494                                 lapack_int lda );
7495
7496 lapack_int LAPACKE_dlag2s_work( int matrix_layout, lapack_int m, lapack_int n,
7497                                 const double* a, lapack_int lda, float* sa,
7498                                 lapack_int ldsa );
7499
7500 lapack_int LAPACKE_clag2z_work( int matrix_layout, lapack_int m, lapack_int n,
7501                                 const lapack_complex_float* sa, lapack_int ldsa,
7502                                 lapack_complex_double* a, lapack_int lda );
7503
7504 lapack_int LAPACKE_slagge_work( int matrix_layout, lapack_int m, lapack_int n,
7505                                 lapack_int kl, lapack_int ku, const float* d,
7506                                 float* a, lapack_int lda, lapack_int* iseed,
7507                                 float* work );
7508 lapack_int LAPACKE_dlagge_work( int matrix_layout, lapack_int m, lapack_int n,
7509                                 lapack_int kl, lapack_int ku, const double* d,
7510                                 double* a, lapack_int lda, lapack_int* iseed,
7511                                 double* work );
7512 lapack_int LAPACKE_clagge_work( int matrix_layout, lapack_int m, lapack_int n,
7513                                 lapack_int kl, lapack_int ku, const float* d,
7514                                 lapack_complex_float* a, lapack_int lda,
7515                                 lapack_int* iseed, lapack_complex_float* work );
7516 lapack_int LAPACKE_zlagge_work( int matrix_layout, lapack_int m, lapack_int n,
7517                                 lapack_int kl, lapack_int ku, const double* d,
7518                                 lapack_complex_double* a, lapack_int lda,
7519                                 lapack_int* iseed,
7520                                 lapack_complex_double* work );
7521
7522 lapack_int LAPACKE_claghe_work( int matrix_layout, lapack_int n, lapack_int k,
7523                                 const float* d, lapack_complex_float* a,
7524                                 lapack_int lda, lapack_int* iseed,
7525                                 lapack_complex_float* work );
7526 lapack_int LAPACKE_zlaghe_work( int matrix_layout, lapack_int n, lapack_int k,
7527                                 const double* d, lapack_complex_double* a,
7528                                 lapack_int lda, lapack_int* iseed,
7529                                 lapack_complex_double* work );
7530
7531 lapack_int LAPACKE_slagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7532                                 const float* d, float* a, lapack_int lda,
7533                                 lapack_int* iseed, float* work );
7534 lapack_int LAPACKE_dlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7535                                 const double* d, double* a, lapack_int lda,
7536                                 lapack_int* iseed, double* work );
7537 lapack_int LAPACKE_clagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7538                                 const float* d, lapack_complex_float* a,
7539                                 lapack_int lda, lapack_int* iseed,
7540                                 lapack_complex_float* work );
7541 lapack_int LAPACKE_zlagsy_work( int matrix_layout, lapack_int n, lapack_int k,
7542                                 const double* d, lapack_complex_double* a,
7543                                 lapack_int lda, lapack_int* iseed,
7544                                 lapack_complex_double* work );
7545
7546 lapack_int LAPACKE_slapmr_work( int matrix_layout, lapack_logical forwrd,
7547                                 lapack_int m, lapack_int n, float* x,
7548                                 lapack_int ldx, lapack_int* k );
7549 lapack_int LAPACKE_dlapmr_work( int matrix_layout, lapack_logical forwrd,
7550                                 lapack_int m, lapack_int n, double* x,
7551                                 lapack_int ldx, lapack_int* k );
7552 lapack_int LAPACKE_clapmr_work( int matrix_layout, lapack_logical forwrd,
7553                                 lapack_int m, lapack_int n,
7554                                 lapack_complex_float* x, lapack_int ldx,
7555                                 lapack_int* k );
7556 lapack_int LAPACKE_zlapmr_work( int matrix_layout, lapack_logical forwrd,
7557                                 lapack_int m, lapack_int n,
7558                                 lapack_complex_double* x, lapack_int ldx,
7559                                 lapack_int* k );
7560
7561 lapack_int LAPACKE_slapmt_work( int matrix_layout, lapack_logical forwrd,
7562                                 lapack_int m, lapack_int n, float* x,
7563                                 lapack_int ldx, lapack_int* k );
7564 lapack_int LAPACKE_dlapmt_work( int matrix_layout, lapack_logical forwrd,
7565                                 lapack_int m, lapack_int n, double* x,
7566                                 lapack_int ldx, lapack_int* k );
7567 lapack_int LAPACKE_clapmt_work( int matrix_layout, lapack_logical forwrd,
7568                                 lapack_int m, lapack_int n,
7569                                 lapack_complex_float* x, lapack_int ldx,
7570                                 lapack_int* k );
7571 lapack_int LAPACKE_zlapmt_work( int matrix_layout, lapack_logical forwrd,
7572                                 lapack_int m, lapack_int n,
7573                                 lapack_complex_double* x, lapack_int ldx,
7574                                 lapack_int* k );
7575
7576 lapack_int LAPACKE_slartgp_work( float f, float g, float* cs, float* sn,
7577                                  float* r );
7578 lapack_int LAPACKE_dlartgp_work( double f, double g, double* cs, double* sn,
7579                                  double* r );
7580
7581 lapack_int LAPACKE_slartgs_work( float x, float y, float sigma, float* cs,
7582                                  float* sn );
7583 lapack_int LAPACKE_dlartgs_work( double x, double y, double sigma, double* cs,
7584                                  double* sn );
7585
7586 float LAPACKE_slapy2_work( float x, float y );
7587 double LAPACKE_dlapy2_work( double x, double y );
7588
7589 float LAPACKE_slapy3_work( float x, float y, float z );
7590 double LAPACKE_dlapy3_work( double x, double y, double z );
7591
7592 float LAPACKE_slamch_work( char cmach );
7593 double LAPACKE_dlamch_work( char cmach );
7594
7595 float LAPACKE_slange_work( int matrix_layout, char norm, lapack_int m,
7596                                 lapack_int n, const float* a, lapack_int lda,
7597                                 float* work );
7598 double LAPACKE_dlange_work( int matrix_layout, char norm, lapack_int m,
7599                                 lapack_int n, const double* a, lapack_int lda,
7600                                 double* work );
7601 float LAPACKE_clange_work( int matrix_layout, char norm, lapack_int m,
7602                                 lapack_int n, const lapack_complex_float* a,
7603                                 lapack_int lda, float* work );
7604 double LAPACKE_zlange_work( int matrix_layout, char norm, lapack_int m,
7605                                 lapack_int n, const lapack_complex_double* a,
7606                                 lapack_int lda, double* work );
7607
7608 float LAPACKE_clanhe_work( int matrix_layout, char norm, char uplo,
7609                                 lapack_int n, const lapack_complex_float* a,
7610                                 lapack_int lda, float* work );
7611 double LAPACKE_zlanhe_work( int matrix_layout, char norm, char uplo,
7612                                 lapack_int n, const lapack_complex_double* a,
7613                                 lapack_int lda, double* work );
7614
7615 lapack_int LAPACKE_clacrm_work( int matrix_layout, lapack_int m, lapack_int n,
7616                                 const lapack_complex_float* a,
7617                                 lapack_int lda, const float* b,
7618                                 lapack_int ldb, lapack_complex_float* c,
7619                                 lapack_int ldc, float* work );
7620 lapack_int LAPACKE_zlacrm_work( int matrix_layout, lapack_int m, lapack_int n,
7621                                 const lapack_complex_double* a,
7622                                 lapack_int lda, const double* b,
7623                                 lapack_int ldb, lapack_complex_double* c,
7624                                 lapack_int ldc, double* work );
7625
7626 lapack_int LAPACKE_clarcm_work( int matrix_layout, lapack_int m, lapack_int n,
7627                                 const float* a, lapack_int lda,
7628                                 const lapack_complex_float* b,
7629                                 lapack_int ldb, lapack_complex_float* c,
7630                                 lapack_int ldc, float* work );
7631 lapack_int LAPACKE_zlarcm_work( int matrix_layout, lapack_int m, lapack_int n,
7632                                 const double* a, lapack_int lda,
7633                                 const lapack_complex_double* b,
7634                                 lapack_int ldb, lapack_complex_double* c,
7635                                 lapack_int ldc, double* work );
7636
7637 float LAPACKE_slansy_work( int matrix_layout, char norm, char uplo,
7638                                 lapack_int n, const float* a, lapack_int lda,
7639                                 float* work );
7640 double LAPACKE_dlansy_work( int matrix_layout, char norm, char uplo,
7641                                 lapack_int n, const double* a, lapack_int lda,
7642                                 double* work );
7643 float LAPACKE_clansy_work( int matrix_layout, char norm, char uplo,
7644                                 lapack_int n, const lapack_complex_float* a,
7645                                 lapack_int lda, float* work );
7646 double LAPACKE_zlansy_work( int matrix_layout, char norm, char uplo,
7647                                 lapack_int n, const lapack_complex_double* a,
7648                                 lapack_int lda, double* work );
7649
7650 float LAPACKE_slantr_work( int matrix_layout, char norm, char uplo,
7651                                 char diag, lapack_int m, lapack_int n, const float* a,
7652                                 lapack_int lda, float* work );
7653 double LAPACKE_dlantr_work( int matrix_layout, char norm, char uplo,
7654                                 char diag, lapack_int m, lapack_int n,
7655                                 const double* a, lapack_int lda, double* work );
7656 float LAPACKE_clantr_work( int matrix_layout, char norm, char uplo,
7657                                 char diag, lapack_int m, lapack_int n,
7658                                 const lapack_complex_float* a, lapack_int lda,
7659                                 float* work );
7660 double LAPACKE_zlantr_work( int matrix_layout, char norm, char uplo,
7661                                 char diag, lapack_int m, lapack_int n,
7662                                 const lapack_complex_double* a, lapack_int lda,
7663                                 double* work );
7664
7665 lapack_int LAPACKE_slarfb_work( int matrix_layout, char side, char trans,
7666                                 char direct, char storev, lapack_int m,
7667                                 lapack_int n, lapack_int k, const float* v,
7668                                 lapack_int ldv, const float* t, lapack_int ldt,
7669                                 float* c, lapack_int ldc, float* work,
7670                                 lapack_int ldwork );
7671 lapack_int LAPACKE_dlarfb_work( int matrix_layout, char side, char trans,
7672                                 char direct, char storev, lapack_int m,
7673                                 lapack_int n, lapack_int k, const double* v,
7674                                 lapack_int ldv, const double* t, lapack_int ldt,
7675                                 double* c, lapack_int ldc, double* work,
7676                                 lapack_int ldwork );
7677 lapack_int LAPACKE_clarfb_work( int matrix_layout, char side, char trans,
7678                                 char direct, char storev, lapack_int m,
7679                                 lapack_int n, lapack_int k,
7680                                 const lapack_complex_float* v, lapack_int ldv,
7681                                 const lapack_complex_float* t, lapack_int ldt,
7682                                 lapack_complex_float* c, lapack_int ldc,
7683                                 lapack_complex_float* work, lapack_int ldwork );
7684 lapack_int LAPACKE_zlarfb_work( int matrix_layout, char side, char trans,
7685                                 char direct, char storev, lapack_int m,
7686                                 lapack_int n, lapack_int k,
7687                                 const lapack_complex_double* v, lapack_int ldv,
7688                                 const lapack_complex_double* t, lapack_int ldt,
7689                                 lapack_complex_double* c, lapack_int ldc,
7690                                 lapack_complex_double* work,
7691                                 lapack_int ldwork );
7692
7693 lapack_int LAPACKE_slarfg_work( lapack_int n, float* alpha, float* x,
7694                                 lapack_int incx, float* tau );
7695 lapack_int LAPACKE_dlarfg_work( lapack_int n, double* alpha, double* x,
7696                                 lapack_int incx, double* tau );
7697 lapack_int LAPACKE_clarfg_work( lapack_int n, lapack_complex_float* alpha,
7698                                 lapack_complex_float* x, lapack_int incx,
7699                                 lapack_complex_float* tau );
7700 lapack_int LAPACKE_zlarfg_work( lapack_int n, lapack_complex_double* alpha,
7701                                 lapack_complex_double* x, lapack_int incx,
7702                                 lapack_complex_double* tau );
7703
7704 lapack_int LAPACKE_slarft_work( int matrix_layout, char direct, char storev,
7705                                 lapack_int n, lapack_int k, const float* v,
7706                                 lapack_int ldv, const float* tau, float* t,
7707                                 lapack_int ldt );
7708 lapack_int LAPACKE_dlarft_work( int matrix_layout, char direct, char storev,
7709                                 lapack_int n, lapack_int k, const double* v,
7710                                 lapack_int ldv, const double* tau, double* t,
7711                                 lapack_int ldt );
7712 lapack_int LAPACKE_clarft_work( int matrix_layout, char direct, char storev,
7713                                 lapack_int n, lapack_int k,
7714                                 const lapack_complex_float* v, lapack_int ldv,
7715                                 const lapack_complex_float* tau,
7716                                 lapack_complex_float* t, lapack_int ldt );
7717 lapack_int LAPACKE_zlarft_work( int matrix_layout, char direct, char storev,
7718                                 lapack_int n, lapack_int k,
7719                                 const lapack_complex_double* v, lapack_int ldv,
7720                                 const lapack_complex_double* tau,
7721                                 lapack_complex_double* t, lapack_int ldt );
7722
7723 lapack_int LAPACKE_slarfx_work( int matrix_layout, char side, lapack_int m,
7724                                 lapack_int n, const float* v, float tau,
7725                                 float* c, lapack_int ldc, float* work );
7726 lapack_int LAPACKE_dlarfx_work( int matrix_layout, char side, lapack_int m,
7727                                 lapack_int n, const double* v, double tau,
7728                                 double* c, lapack_int ldc, double* work );
7729 lapack_int LAPACKE_clarfx_work( int matrix_layout, char side, lapack_int m,
7730                                 lapack_int n, const lapack_complex_float* v,
7731                                 lapack_complex_float tau,
7732                                 lapack_complex_float* c, lapack_int ldc,
7733                                 lapack_complex_float* work );
7734 lapack_int LAPACKE_zlarfx_work( int matrix_layout, char side, lapack_int m,
7735                                 lapack_int n, const lapack_complex_double* v,
7736                                 lapack_complex_double tau,
7737                                 lapack_complex_double* c, lapack_int ldc,
7738                                 lapack_complex_double* work );
7739
7740 lapack_int LAPACKE_slarnv_work( lapack_int idist, lapack_int* iseed,
7741                                 lapack_int n, float* x );
7742 lapack_int LAPACKE_dlarnv_work( lapack_int idist, lapack_int* iseed,
7743                                 lapack_int n, double* x );
7744 lapack_int LAPACKE_clarnv_work( lapack_int idist, lapack_int* iseed,
7745                                 lapack_int n, lapack_complex_float* x );
7746 lapack_int LAPACKE_zlarnv_work( lapack_int idist, lapack_int* iseed,
7747                                 lapack_int n, lapack_complex_double* x );
7748
7749
7750 lapack_int LAPACKE_slascl_work( int matrix_layout, char type, lapack_int kl,
7751                            lapack_int ku, float cfrom, float cto,
7752                            lapack_int m, lapack_int n, float* a,
7753                            lapack_int lda );
7754 lapack_int LAPACKE_dlascl_work( int matrix_layout, char type, lapack_int kl,
7755                            lapack_int ku, double cfrom, double cto,
7756                            lapack_int m, lapack_int n, double* a,
7757                            lapack_int lda );
7758 lapack_int LAPACKE_clascl_work( int matrix_layout, char type, lapack_int kl,
7759                            lapack_int ku, float cfrom, float cto,
7760                            lapack_int m, lapack_int n, lapack_complex_float* a,
7761                            lapack_int lda );
7762 lapack_int LAPACKE_zlascl_work( int matrix_layout, char type, lapack_int kl,
7763                            lapack_int ku, double cfrom, double cto,
7764                            lapack_int m, lapack_int n, lapack_complex_double* a,
7765                            lapack_int lda );
7766
7767 lapack_int LAPACKE_slaset_work( int matrix_layout, char uplo, lapack_int m,
7768                                 lapack_int n, float alpha, float beta, float* a,
7769                                 lapack_int lda );
7770 lapack_int LAPACKE_dlaset_work( int matrix_layout, char uplo, lapack_int m,
7771                                 lapack_int n, double alpha, double beta,
7772                                 double* a, lapack_int lda );
7773 lapack_int LAPACKE_claset_work( int matrix_layout, char uplo, lapack_int m,
7774                                 lapack_int n, lapack_complex_float alpha,
7775                                 lapack_complex_float beta,
7776                                 lapack_complex_float* a, lapack_int lda );
7777 lapack_int LAPACKE_zlaset_work( int matrix_layout, char uplo, lapack_int m,
7778                                 lapack_int n, lapack_complex_double alpha,
7779                                 lapack_complex_double beta,
7780                                 lapack_complex_double* a, lapack_int lda );
7781
7782 lapack_int LAPACKE_slasrt_work( char id, lapack_int n, float* d );
7783 lapack_int LAPACKE_dlasrt_work( char id, lapack_int n, double* d );
7784
7785 lapack_int LAPACKE_slassq_work( lapack_int n,                 float* x, lapack_int incx,  float* scale,  float* sumsq );
7786 lapack_int LAPACKE_dlassq_work( lapack_int n,                double* x, lapack_int incx, double* scale, double* sumsq );
7787 lapack_int LAPACKE_classq_work( lapack_int n,  lapack_complex_float* x, lapack_int incx,  float* scale,  float* sumsq );
7788 lapack_int LAPACKE_zlassq_work( lapack_int n, lapack_complex_double* x, lapack_int incx, double* scale, double* sumsq );
7789
7790 lapack_int LAPACKE_slaswp_work( int matrix_layout, lapack_int n, float* a,
7791                                 lapack_int lda, lapack_int k1, lapack_int k2,
7792                                 const lapack_int* ipiv, lapack_int incx );
7793 lapack_int LAPACKE_dlaswp_work( int matrix_layout, lapack_int n, double* a,
7794                                 lapack_int lda, lapack_int k1, lapack_int k2,
7795                                 const lapack_int* ipiv, lapack_int incx );
7796 lapack_int LAPACKE_claswp_work( int matrix_layout, lapack_int n,
7797                                 lapack_complex_float* a, lapack_int lda,
7798                                 lapack_int k1, lapack_int k2,
7799                                 const lapack_int* ipiv, lapack_int incx );
7800 lapack_int LAPACKE_zlaswp_work( int matrix_layout, lapack_int n,
7801                                 lapack_complex_double* a, lapack_int lda,
7802                                 lapack_int k1, lapack_int k2,
7803                                 const lapack_int* ipiv, lapack_int incx );
7804
7805 lapack_int LAPACKE_slatms_work( int matrix_layout, lapack_int m, lapack_int n,
7806                                 char dist, lapack_int* iseed, char sym,
7807                                 float* d, lapack_int mode, float cond,
7808                                 float dmax, lapack_int kl, lapack_int ku,
7809                                 char pack, float* a, lapack_int lda,
7810                                 float* work );
7811 lapack_int LAPACKE_dlatms_work( int matrix_layout, lapack_int m, lapack_int n,
7812                                 char dist, lapack_int* iseed, char sym,
7813                                 double* d, lapack_int mode, double cond,
7814                                 double dmax, lapack_int kl, lapack_int ku,
7815                                 char pack, double* a, lapack_int lda,
7816                                 double* work );
7817 lapack_int LAPACKE_clatms_work( int matrix_layout, lapack_int m, lapack_int n,
7818                                 char dist, lapack_int* iseed, char sym,
7819                                 float* d, lapack_int mode, float cond,
7820                                 float dmax, lapack_int kl, lapack_int ku,
7821                                 char pack, lapack_complex_float* a,
7822                                 lapack_int lda, lapack_complex_float* work );
7823 lapack_int LAPACKE_zlatms_work( int matrix_layout, lapack_int m, lapack_int n,
7824                                 char dist, lapack_int* iseed, char sym,
7825                                 double* d, lapack_int mode, double cond,
7826                                 double dmax, lapack_int kl, lapack_int ku,
7827                                 char pack, lapack_complex_double* a,
7828                                 lapack_int lda, lapack_complex_double* work );
7829
7830 lapack_int LAPACKE_slauum_work( int matrix_layout, char uplo, lapack_int n,
7831                                 float* a, lapack_int lda );
7832 lapack_int LAPACKE_dlauum_work( int matrix_layout, char uplo, lapack_int n,
7833                                 double* a, lapack_int lda );
7834 lapack_int LAPACKE_clauum_work( int matrix_layout, char uplo, lapack_int n,
7835                                 lapack_complex_float* a, lapack_int lda );
7836 lapack_int LAPACKE_zlauum_work( int matrix_layout, char uplo, lapack_int n,
7837                                 lapack_complex_double* a, lapack_int lda );
7838
7839 lapack_int LAPACKE_sopgtr_work( int matrix_layout, char uplo, lapack_int n,
7840                                 const float* ap, const float* tau, float* q,
7841                                 lapack_int ldq, float* work );
7842 lapack_int LAPACKE_dopgtr_work( int matrix_layout, char uplo, lapack_int n,
7843                                 const double* ap, const double* tau, double* q,
7844                                 lapack_int ldq, double* work );
7845
7846 lapack_int LAPACKE_sopmtr_work( int matrix_layout, char side, char uplo,
7847                                 char trans, lapack_int m, lapack_int n,
7848                                 const float* ap, const float* tau, float* c,
7849                                 lapack_int ldc, float* work );
7850 lapack_int LAPACKE_dopmtr_work( int matrix_layout, char side, char uplo,
7851                                 char trans, lapack_int m, lapack_int n,
7852                                 const double* ap, const double* tau, double* c,
7853                                 lapack_int ldc, double* work );
7854
7855 lapack_int LAPACKE_sorgbr_work( int matrix_layout, char vect, lapack_int m,
7856                                 lapack_int n, lapack_int k, float* a,
7857                                 lapack_int lda, const float* tau, float* work,
7858                                 lapack_int lwork );
7859 lapack_int LAPACKE_dorgbr_work( int matrix_layout, char vect, lapack_int m,
7860                                 lapack_int n, lapack_int k, double* a,
7861                                 lapack_int lda, const double* tau, double* work,
7862                                 lapack_int lwork );
7863
7864 lapack_int LAPACKE_sorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
7865                                 lapack_int ihi, float* a, lapack_int lda,
7866                                 const float* tau, float* work,
7867                                 lapack_int lwork );
7868 lapack_int LAPACKE_dorghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
7869                                 lapack_int ihi, double* a, lapack_int lda,
7870                                 const double* tau, double* work,
7871                                 lapack_int lwork );
7872
7873 lapack_int LAPACKE_sorglq_work( int matrix_layout, lapack_int m, lapack_int n,
7874                                 lapack_int k, float* a, lapack_int lda,
7875                                 const float* tau, float* work,
7876                                 lapack_int lwork );
7877 lapack_int LAPACKE_dorglq_work( int matrix_layout, lapack_int m, lapack_int n,
7878                                 lapack_int k, double* a, lapack_int lda,
7879                                 const double* tau, double* work,
7880                                 lapack_int lwork );
7881
7882 lapack_int LAPACKE_sorgql_work( int matrix_layout, lapack_int m, lapack_int n,
7883                                 lapack_int k, float* a, lapack_int lda,
7884                                 const float* tau, float* work,
7885                                 lapack_int lwork );
7886 lapack_int LAPACKE_dorgql_work( int matrix_layout, lapack_int m, lapack_int n,
7887                                 lapack_int k, double* a, lapack_int lda,
7888                                 const double* tau, double* work,
7889                                 lapack_int lwork );
7890
7891 lapack_int LAPACKE_sorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
7892                                 lapack_int k, float* a, lapack_int lda,
7893                                 const float* tau, float* work,
7894                                 lapack_int lwork );
7895 lapack_int LAPACKE_dorgqr_work( int matrix_layout, lapack_int m, lapack_int n,
7896                                 lapack_int k, double* a, lapack_int lda,
7897                                 const double* tau, double* work,
7898                                 lapack_int lwork );
7899
7900 lapack_int LAPACKE_sorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
7901                                 lapack_int k, float* a, lapack_int lda,
7902                                 const float* tau, float* work,
7903                                 lapack_int lwork );
7904 lapack_int LAPACKE_dorgrq_work( int matrix_layout, lapack_int m, lapack_int n,
7905                                 lapack_int k, double* a, lapack_int lda,
7906                                 const double* tau, double* work,
7907                                 lapack_int lwork );
7908
7909 lapack_int LAPACKE_sorgtr_work( int matrix_layout, char uplo, lapack_int n,
7910                                 float* a, lapack_int lda, const float* tau,
7911                                 float* work, lapack_int lwork );
7912 lapack_int LAPACKE_dorgtr_work( int matrix_layout, char uplo, lapack_int n,
7913                                 double* a, lapack_int lda, const double* tau,
7914                                 double* work, lapack_int lwork );
7915
7916 lapack_int LAPACKE_sormbr_work( int matrix_layout, char vect, char side,
7917                                 char trans, lapack_int m, lapack_int n,
7918                                 lapack_int k, const float* a, lapack_int lda,
7919                                 const float* tau, float* c, lapack_int ldc,
7920                                 float* work, lapack_int lwork );
7921 lapack_int LAPACKE_dormbr_work( int matrix_layout, char vect, char side,
7922                                 char trans, lapack_int m, lapack_int n,
7923                                 lapack_int k, const double* a, lapack_int lda,
7924                                 const double* tau, double* c, lapack_int ldc,
7925                                 double* work, lapack_int lwork );
7926
7927 lapack_int LAPACKE_sormhr_work( int matrix_layout, char side, char trans,
7928                                 lapack_int m, lapack_int n, lapack_int ilo,
7929                                 lapack_int ihi, const float* a, lapack_int lda,
7930                                 const float* tau, float* c, lapack_int ldc,
7931                                 float* work, lapack_int lwork );
7932 lapack_int LAPACKE_dormhr_work( int matrix_layout, char side, char trans,
7933                                 lapack_int m, lapack_int n, lapack_int ilo,
7934                                 lapack_int ihi, const double* a, lapack_int lda,
7935                                 const double* tau, double* c, lapack_int ldc,
7936                                 double* work, lapack_int lwork );
7937
7938 lapack_int LAPACKE_sormlq_work( int matrix_layout, char side, char trans,
7939                                 lapack_int m, lapack_int n, lapack_int k,
7940                                 const float* a, lapack_int lda,
7941                                 const float* tau, float* c, lapack_int ldc,
7942                                 float* work, lapack_int lwork );
7943 lapack_int LAPACKE_dormlq_work( int matrix_layout, char side, char trans,
7944                                 lapack_int m, lapack_int n, lapack_int k,
7945                                 const double* a, lapack_int lda,
7946                                 const double* tau, double* c, lapack_int ldc,
7947                                 double* work, lapack_int lwork );
7948
7949 lapack_int LAPACKE_sormql_work( int matrix_layout, char side, char trans,
7950                                 lapack_int m, lapack_int n, lapack_int k,
7951                                 const float* a, lapack_int lda,
7952                                 const float* tau, float* c, lapack_int ldc,
7953                                 float* work, lapack_int lwork );
7954 lapack_int LAPACKE_dormql_work( int matrix_layout, char side, char trans,
7955                                 lapack_int m, lapack_int n, lapack_int k,
7956                                 const double* a, lapack_int lda,
7957                                 const double* tau, double* c, lapack_int ldc,
7958                                 double* work, lapack_int lwork );
7959
7960 lapack_int LAPACKE_sormqr_work( int matrix_layout, char side, char trans,
7961                                 lapack_int m, lapack_int n, lapack_int k,
7962                                 const float* a, lapack_int lda,
7963                                 const float* tau, float* c, lapack_int ldc,
7964                                 float* work, lapack_int lwork );
7965 lapack_int LAPACKE_dormqr_work( int matrix_layout, char side, char trans,
7966                                 lapack_int m, lapack_int n, lapack_int k,
7967                                 const double* a, lapack_int lda,
7968                                 const double* tau, double* c, lapack_int ldc,
7969                                 double* work, lapack_int lwork );
7970
7971 lapack_int LAPACKE_sormrq_work( int matrix_layout, char side, char trans,
7972                                 lapack_int m, lapack_int n, lapack_int k,
7973                                 const float* a, lapack_int lda,
7974                                 const float* tau, float* c, lapack_int ldc,
7975                                 float* work, lapack_int lwork );
7976 lapack_int LAPACKE_dormrq_work( int matrix_layout, char side, char trans,
7977                                 lapack_int m, lapack_int n, lapack_int k,
7978                                 const double* a, lapack_int lda,
7979                                 const double* tau, double* c, lapack_int ldc,
7980                                 double* work, lapack_int lwork );
7981
7982 lapack_int LAPACKE_sormrz_work( int matrix_layout, char side, char trans,
7983                                 lapack_int m, lapack_int n, lapack_int k,
7984                                 lapack_int l, const float* a, lapack_int lda,
7985                                 const float* tau, float* c, lapack_int ldc,
7986                                 float* work, lapack_int lwork );
7987 lapack_int LAPACKE_dormrz_work( int matrix_layout, char side, char trans,
7988                                 lapack_int m, lapack_int n, lapack_int k,
7989                                 lapack_int l, const double* a, lapack_int lda,
7990                                 const double* tau, double* c, lapack_int ldc,
7991                                 double* work, lapack_int lwork );
7992
7993 lapack_int LAPACKE_sormtr_work( int matrix_layout, char side, char uplo,
7994                                 char trans, lapack_int m, lapack_int n,
7995                                 const float* a, lapack_int lda,
7996                                 const float* tau, float* c, lapack_int ldc,
7997                                 float* work, lapack_int lwork );
7998 lapack_int LAPACKE_dormtr_work( int matrix_layout, char side, char uplo,
7999                                 char trans, lapack_int m, lapack_int n,
8000                                 const double* a, lapack_int lda,
8001                                 const double* tau, double* c, lapack_int ldc,
8002                                 double* work, lapack_int lwork );
8003
8004 lapack_int LAPACKE_spbcon_work( int matrix_layout, char uplo, lapack_int n,
8005                                 lapack_int kd, const float* ab, lapack_int ldab,
8006                                 float anorm, float* rcond, float* work,
8007                                 lapack_int* iwork );
8008 lapack_int LAPACKE_dpbcon_work( int matrix_layout, char uplo, lapack_int n,
8009                                 lapack_int kd, const double* ab,
8010                                 lapack_int ldab, double anorm, double* rcond,
8011                                 double* work, lapack_int* iwork );
8012 lapack_int LAPACKE_cpbcon_work( int matrix_layout, char uplo, lapack_int n,
8013                                 lapack_int kd, const lapack_complex_float* ab,
8014                                 lapack_int ldab, float anorm, float* rcond,
8015                                 lapack_complex_float* work, float* rwork );
8016 lapack_int LAPACKE_zpbcon_work( int matrix_layout, char uplo, lapack_int n,
8017                                 lapack_int kd, const lapack_complex_double* ab,
8018                                 lapack_int ldab, double anorm, double* rcond,
8019                                 lapack_complex_double* work, double* rwork );
8020
8021 lapack_int LAPACKE_spbequ_work( int matrix_layout, char uplo, lapack_int n,
8022                                 lapack_int kd, const float* ab, lapack_int ldab,
8023                                 float* s, float* scond, float* amax );
8024 lapack_int LAPACKE_dpbequ_work( int matrix_layout, char uplo, lapack_int n,
8025                                 lapack_int kd, const double* ab,
8026                                 lapack_int ldab, double* s, double* scond,
8027                                 double* amax );
8028 lapack_int LAPACKE_cpbequ_work( int matrix_layout, char uplo, lapack_int n,
8029                                 lapack_int kd, const lapack_complex_float* ab,
8030                                 lapack_int ldab, float* s, float* scond,
8031                                 float* amax );
8032 lapack_int LAPACKE_zpbequ_work( int matrix_layout, char uplo, lapack_int n,
8033                                 lapack_int kd, const lapack_complex_double* ab,
8034                                 lapack_int ldab, double* s, double* scond,
8035                                 double* amax );
8036
8037 lapack_int LAPACKE_spbrfs_work( int matrix_layout, char uplo, lapack_int n,
8038                                 lapack_int kd, lapack_int nrhs, const float* ab,
8039                                 lapack_int ldab, const float* afb,
8040                                 lapack_int ldafb, const float* b,
8041                                 lapack_int ldb, float* x, lapack_int ldx,
8042                                 float* ferr, float* berr, float* work,
8043                                 lapack_int* iwork );
8044 lapack_int LAPACKE_dpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8045                                 lapack_int kd, lapack_int nrhs,
8046                                 const double* ab, lapack_int ldab,
8047                                 const double* afb, lapack_int ldafb,
8048                                 const double* b, lapack_int ldb, double* x,
8049                                 lapack_int ldx, double* ferr, double* berr,
8050                                 double* work, lapack_int* iwork );
8051 lapack_int LAPACKE_cpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8052                                 lapack_int kd, lapack_int nrhs,
8053                                 const lapack_complex_float* ab, lapack_int ldab,
8054                                 const lapack_complex_float* afb,
8055                                 lapack_int ldafb, const lapack_complex_float* b,
8056                                 lapack_int ldb, lapack_complex_float* x,
8057                                 lapack_int ldx, float* ferr, float* berr,
8058                                 lapack_complex_float* work, float* rwork );
8059 lapack_int LAPACKE_zpbrfs_work( int matrix_layout, char uplo, lapack_int n,
8060                                 lapack_int kd, lapack_int nrhs,
8061                                 const lapack_complex_double* ab,
8062                                 lapack_int ldab,
8063                                 const lapack_complex_double* afb,
8064                                 lapack_int ldafb,
8065                                 const lapack_complex_double* b, lapack_int ldb,
8066                                 lapack_complex_double* x, lapack_int ldx,
8067                                 double* ferr, double* berr,
8068                                 lapack_complex_double* work, double* rwork );
8069
8070 lapack_int LAPACKE_spbstf_work( int matrix_layout, char uplo, lapack_int n,
8071                                 lapack_int kb, float* bb, lapack_int ldbb );
8072 lapack_int LAPACKE_dpbstf_work( int matrix_layout, char uplo, lapack_int n,
8073                                 lapack_int kb, double* bb, lapack_int ldbb );
8074 lapack_int LAPACKE_cpbstf_work( int matrix_layout, char uplo, lapack_int n,
8075                                 lapack_int kb, lapack_complex_float* bb,
8076                                 lapack_int ldbb );
8077 lapack_int LAPACKE_zpbstf_work( int matrix_layout, char uplo, lapack_int n,
8078                                 lapack_int kb, lapack_complex_double* bb,
8079                                 lapack_int ldbb );
8080
8081 lapack_int LAPACKE_spbsv_work( int matrix_layout, char uplo, lapack_int n,
8082                                lapack_int kd, lapack_int nrhs, float* ab,
8083                                lapack_int ldab, float* b, lapack_int ldb );
8084 lapack_int LAPACKE_dpbsv_work( int matrix_layout, char uplo, lapack_int n,
8085                                lapack_int kd, lapack_int nrhs, double* ab,
8086                                lapack_int ldab, double* b, lapack_int ldb );
8087 lapack_int LAPACKE_cpbsv_work( int matrix_layout, char uplo, lapack_int n,
8088                                lapack_int kd, lapack_int nrhs,
8089                                lapack_complex_float* ab, lapack_int ldab,
8090                                lapack_complex_float* b, lapack_int ldb );
8091 lapack_int LAPACKE_zpbsv_work( int matrix_layout, char uplo, lapack_int n,
8092                                lapack_int kd, lapack_int nrhs,
8093                                lapack_complex_double* ab, lapack_int ldab,
8094                                lapack_complex_double* b, lapack_int ldb );
8095
8096 lapack_int LAPACKE_spbsvx_work( int matrix_layout, char fact, char uplo,
8097                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8098                                 float* ab, lapack_int ldab, float* afb,
8099                                 lapack_int ldafb, char* equed, float* s,
8100                                 float* b, lapack_int ldb, float* x,
8101                                 lapack_int ldx, float* rcond, float* ferr,
8102                                 float* berr, float* work, lapack_int* iwork );
8103 lapack_int LAPACKE_dpbsvx_work( int matrix_layout, char fact, char uplo,
8104                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8105                                 double* ab, lapack_int ldab, double* afb,
8106                                 lapack_int ldafb, char* equed, double* s,
8107                                 double* b, lapack_int ldb, double* x,
8108                                 lapack_int ldx, double* rcond, double* ferr,
8109                                 double* berr, double* work, lapack_int* iwork );
8110 lapack_int LAPACKE_cpbsvx_work( int matrix_layout, char fact, char uplo,
8111                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8112                                 lapack_complex_float* ab, lapack_int ldab,
8113                                 lapack_complex_float* afb, lapack_int ldafb,
8114                                 char* equed, float* s, lapack_complex_float* b,
8115                                 lapack_int ldb, lapack_complex_float* x,
8116                                 lapack_int ldx, float* rcond, float* ferr,
8117                                 float* berr, lapack_complex_float* work,
8118                                 float* rwork );
8119 lapack_int LAPACKE_zpbsvx_work( int matrix_layout, char fact, char uplo,
8120                                 lapack_int n, lapack_int kd, lapack_int nrhs,
8121                                 lapack_complex_double* ab, lapack_int ldab,
8122                                 lapack_complex_double* afb, lapack_int ldafb,
8123                                 char* equed, double* s,
8124                                 lapack_complex_double* b, lapack_int ldb,
8125                                 lapack_complex_double* x, lapack_int ldx,
8126                                 double* rcond, double* ferr, double* berr,
8127                                 lapack_complex_double* work, double* rwork );
8128
8129 lapack_int LAPACKE_spbtrf_work( int matrix_layout, char uplo, lapack_int n,
8130                                 lapack_int kd, float* ab, lapack_int ldab );
8131 lapack_int LAPACKE_dpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8132                                 lapack_int kd, double* ab, lapack_int ldab );
8133 lapack_int LAPACKE_cpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8134                                 lapack_int kd, lapack_complex_float* ab,
8135                                 lapack_int ldab );
8136 lapack_int LAPACKE_zpbtrf_work( int matrix_layout, char uplo, lapack_int n,
8137                                 lapack_int kd, lapack_complex_double* ab,
8138                                 lapack_int ldab );
8139
8140 lapack_int LAPACKE_spbtrs_work( int matrix_layout, char uplo, lapack_int n,
8141                                 lapack_int kd, lapack_int nrhs, const float* ab,
8142                                 lapack_int ldab, float* b, lapack_int ldb );
8143 lapack_int LAPACKE_dpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8144                                 lapack_int kd, lapack_int nrhs,
8145                                 const double* ab, lapack_int ldab, double* b,
8146                                 lapack_int ldb );
8147 lapack_int LAPACKE_cpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8148                                 lapack_int kd, lapack_int nrhs,
8149                                 const lapack_complex_float* ab, lapack_int ldab,
8150                                 lapack_complex_float* b, lapack_int ldb );
8151 lapack_int LAPACKE_zpbtrs_work( int matrix_layout, char uplo, lapack_int n,
8152                                 lapack_int kd, lapack_int nrhs,
8153                                 const lapack_complex_double* ab,
8154                                 lapack_int ldab, lapack_complex_double* b,
8155                                 lapack_int ldb );
8156
8157 lapack_int LAPACKE_spftrf_work( int matrix_layout, char transr, char uplo,
8158                                 lapack_int n, float* a );
8159 lapack_int LAPACKE_dpftrf_work( int matrix_layout, char transr, char uplo,
8160                                 lapack_int n, double* a );
8161 lapack_int LAPACKE_cpftrf_work( int matrix_layout, char transr, char uplo,
8162                                 lapack_int n, lapack_complex_float* a );
8163 lapack_int LAPACKE_zpftrf_work( int matrix_layout, char transr, char uplo,
8164                                 lapack_int n, lapack_complex_double* a );
8165
8166 lapack_int LAPACKE_spftri_work( int matrix_layout, char transr, char uplo,
8167                                 lapack_int n, float* a );
8168 lapack_int LAPACKE_dpftri_work( int matrix_layout, char transr, char uplo,
8169                                 lapack_int n, double* a );
8170 lapack_int LAPACKE_cpftri_work( int matrix_layout, char transr, char uplo,
8171                                 lapack_int n, lapack_complex_float* a );
8172 lapack_int LAPACKE_zpftri_work( int matrix_layout, char transr, char uplo,
8173                                 lapack_int n, lapack_complex_double* a );
8174
8175 lapack_int LAPACKE_spftrs_work( int matrix_layout, char transr, char uplo,
8176                                 lapack_int n, lapack_int nrhs, const float* a,
8177                                 float* b, lapack_int ldb );
8178 lapack_int LAPACKE_dpftrs_work( int matrix_layout, char transr, char uplo,
8179                                 lapack_int n, lapack_int nrhs, const double* a,
8180                                 double* b, lapack_int ldb );
8181 lapack_int LAPACKE_cpftrs_work( int matrix_layout, char transr, char uplo,
8182                                 lapack_int n, lapack_int nrhs,
8183                                 const lapack_complex_float* a,
8184                                 lapack_complex_float* b, lapack_int ldb );
8185 lapack_int LAPACKE_zpftrs_work( int matrix_layout, char transr, char uplo,
8186                                 lapack_int n, lapack_int nrhs,
8187                                 const lapack_complex_double* a,
8188                                 lapack_complex_double* b, lapack_int ldb );
8189
8190 lapack_int LAPACKE_spocon_work( int matrix_layout, char uplo, lapack_int n,
8191                                 const float* a, lapack_int lda, float anorm,
8192                                 float* rcond, float* work, lapack_int* iwork );
8193 lapack_int LAPACKE_dpocon_work( int matrix_layout, char uplo, lapack_int n,
8194                                 const double* a, lapack_int lda, double anorm,
8195                                 double* rcond, double* work,
8196                                 lapack_int* iwork );
8197 lapack_int LAPACKE_cpocon_work( int matrix_layout, char uplo, lapack_int n,
8198                                 const lapack_complex_float* a, lapack_int lda,
8199                                 float anorm, float* rcond,
8200                                 lapack_complex_float* work, float* rwork );
8201 lapack_int LAPACKE_zpocon_work( int matrix_layout, char uplo, lapack_int n,
8202                                 const lapack_complex_double* a, lapack_int lda,
8203                                 double anorm, double* rcond,
8204                                 lapack_complex_double* work, double* rwork );
8205
8206 lapack_int LAPACKE_spoequ_work( int matrix_layout, lapack_int n, const float* a,
8207                                 lapack_int lda, float* s, float* scond,
8208                                 float* amax );
8209 lapack_int LAPACKE_dpoequ_work( int matrix_layout, lapack_int n, const double* a,
8210                                 lapack_int lda, double* s, double* scond,
8211                                 double* amax );
8212 lapack_int LAPACKE_cpoequ_work( int matrix_layout, lapack_int n,
8213                                 const lapack_complex_float* a, lapack_int lda,
8214                                 float* s, float* scond, float* amax );
8215 lapack_int LAPACKE_zpoequ_work( int matrix_layout, lapack_int n,
8216                                 const lapack_complex_double* a, lapack_int lda,
8217                                 double* s, double* scond, double* amax );
8218
8219 lapack_int LAPACKE_spoequb_work( int matrix_layout, lapack_int n, const float* a,
8220                                  lapack_int lda, float* s, float* scond,
8221                                  float* amax );
8222 lapack_int LAPACKE_dpoequb_work( int matrix_layout, lapack_int n,
8223                                  const double* a, lapack_int lda, double* s,
8224                                  double* scond, double* amax );
8225 lapack_int LAPACKE_cpoequb_work( int matrix_layout, lapack_int n,
8226                                  const lapack_complex_float* a, lapack_int lda,
8227                                  float* s, float* scond, float* amax );
8228 lapack_int LAPACKE_zpoequb_work( int matrix_layout, lapack_int n,
8229                                  const lapack_complex_double* a, lapack_int lda,
8230                                  double* s, double* scond, double* amax );
8231
8232 lapack_int LAPACKE_sporfs_work( int matrix_layout, char uplo, lapack_int n,
8233                                 lapack_int nrhs, const float* a, lapack_int lda,
8234                                 const float* af, lapack_int ldaf,
8235                                 const float* b, lapack_int ldb, float* x,
8236                                 lapack_int ldx, float* ferr, float* berr,
8237                                 float* work, lapack_int* iwork );
8238 lapack_int LAPACKE_dporfs_work( int matrix_layout, char uplo, lapack_int n,
8239                                 lapack_int nrhs, const double* a,
8240                                 lapack_int lda, const double* af,
8241                                 lapack_int ldaf, const double* b,
8242                                 lapack_int ldb, double* x, lapack_int ldx,
8243                                 double* ferr, double* berr, double* work,
8244                                 lapack_int* iwork );
8245 lapack_int LAPACKE_cporfs_work( int matrix_layout, char uplo, lapack_int n,
8246                                 lapack_int nrhs, const lapack_complex_float* a,
8247                                 lapack_int lda, const lapack_complex_float* af,
8248                                 lapack_int ldaf, const lapack_complex_float* b,
8249                                 lapack_int ldb, lapack_complex_float* x,
8250                                 lapack_int ldx, float* ferr, float* berr,
8251                                 lapack_complex_float* work, float* rwork );
8252 lapack_int LAPACKE_zporfs_work( int matrix_layout, char uplo, lapack_int n,
8253                                 lapack_int nrhs, const lapack_complex_double* a,
8254                                 lapack_int lda, const lapack_complex_double* af,
8255                                 lapack_int ldaf, const lapack_complex_double* b,
8256                                 lapack_int ldb, lapack_complex_double* x,
8257                                 lapack_int ldx, double* ferr, double* berr,
8258                                 lapack_complex_double* work, double* rwork );
8259
8260 lapack_int LAPACKE_sporfsx_work( int matrix_layout, char uplo, char equed,
8261                                  lapack_int n, lapack_int nrhs, const float* a,
8262                                  lapack_int lda, const float* af,
8263                                  lapack_int ldaf, const float* s,
8264                                  const float* b, lapack_int ldb, float* x,
8265                                  lapack_int ldx, float* rcond, float* berr,
8266                                  lapack_int n_err_bnds, float* err_bnds_norm,
8267                                  float* err_bnds_comp, lapack_int nparams,
8268                                  float* params, float* work,
8269                                  lapack_int* iwork );
8270 lapack_int LAPACKE_dporfsx_work( int matrix_layout, char uplo, char equed,
8271                                  lapack_int n, lapack_int nrhs, const double* a,
8272                                  lapack_int lda, const double* af,
8273                                  lapack_int ldaf, const double* s,
8274                                  const double* b, lapack_int ldb, double* x,
8275                                  lapack_int ldx, double* rcond, double* berr,
8276                                  lapack_int n_err_bnds, double* err_bnds_norm,
8277                                  double* err_bnds_comp, lapack_int nparams,
8278                                  double* params, double* work,
8279                                  lapack_int* iwork );
8280 lapack_int LAPACKE_cporfsx_work( int matrix_layout, char uplo, char equed,
8281                                  lapack_int n, lapack_int nrhs,
8282                                  const lapack_complex_float* a, lapack_int lda,
8283                                  const lapack_complex_float* af,
8284                                  lapack_int ldaf, const float* s,
8285                                  const lapack_complex_float* b, lapack_int ldb,
8286                                  lapack_complex_float* x, lapack_int ldx,
8287                                  float* rcond, float* berr,
8288                                  lapack_int n_err_bnds, float* err_bnds_norm,
8289                                  float* err_bnds_comp, lapack_int nparams,
8290                                  float* params, lapack_complex_float* work,
8291                                  float* rwork );
8292 lapack_int LAPACKE_zporfsx_work( int matrix_layout, char uplo, char equed,
8293                                  lapack_int n, lapack_int nrhs,
8294                                  const lapack_complex_double* a, lapack_int lda,
8295                                  const lapack_complex_double* af,
8296                                  lapack_int ldaf, const double* s,
8297                                  const lapack_complex_double* b, lapack_int ldb,
8298                                  lapack_complex_double* x, lapack_int ldx,
8299                                  double* rcond, double* berr,
8300                                  lapack_int n_err_bnds, double* err_bnds_norm,
8301                                  double* err_bnds_comp, lapack_int nparams,
8302                                  double* params, lapack_complex_double* work,
8303                                  double* rwork );
8304
8305 lapack_int LAPACKE_sposv_work( int matrix_layout, char uplo, lapack_int n,
8306                                lapack_int nrhs, float* a, lapack_int lda,
8307                                float* b, lapack_int ldb );
8308 lapack_int LAPACKE_dposv_work( int matrix_layout, char uplo, lapack_int n,
8309                                lapack_int nrhs, double* a, lapack_int lda,
8310                                double* b, lapack_int ldb );
8311 lapack_int LAPACKE_cposv_work( int matrix_layout, char uplo, lapack_int n,
8312                                lapack_int nrhs, lapack_complex_float* a,
8313                                lapack_int lda, lapack_complex_float* b,
8314                                lapack_int ldb );
8315 lapack_int LAPACKE_zposv_work( int matrix_layout, char uplo, lapack_int n,
8316                                lapack_int nrhs, lapack_complex_double* a,
8317                                lapack_int lda, lapack_complex_double* b,
8318                                lapack_int ldb );
8319 lapack_int LAPACKE_dsposv_work( int matrix_layout, char uplo, lapack_int n,
8320                                 lapack_int nrhs, double* a, lapack_int lda,
8321                                 double* b, lapack_int ldb, double* x,
8322                                 lapack_int ldx, double* work, float* swork,
8323                                 lapack_int* iter );
8324 lapack_int LAPACKE_zcposv_work( int matrix_layout, char uplo, lapack_int n,
8325                                 lapack_int nrhs, lapack_complex_double* a,
8326                                 lapack_int lda, lapack_complex_double* b,
8327                                 lapack_int ldb, lapack_complex_double* x,
8328                                 lapack_int ldx, lapack_complex_double* work,
8329                                 lapack_complex_float* swork, double* rwork,
8330                                 lapack_int* iter );
8331
8332 lapack_int LAPACKE_sposvx_work( int matrix_layout, char fact, char uplo,
8333                                 lapack_int n, lapack_int nrhs, float* a,
8334                                 lapack_int lda, float* af, lapack_int ldaf,
8335                                 char* equed, float* s, float* b, lapack_int ldb,
8336                                 float* x, lapack_int ldx, float* rcond,
8337                                 float* ferr, float* berr, float* work,
8338                                 lapack_int* iwork );
8339 lapack_int LAPACKE_dposvx_work( int matrix_layout, char fact, char uplo,
8340                                 lapack_int n, lapack_int nrhs, double* a,
8341                                 lapack_int lda, double* af, lapack_int ldaf,
8342                                 char* equed, double* s, double* b,
8343                                 lapack_int ldb, double* x, lapack_int ldx,
8344                                 double* rcond, double* ferr, double* berr,
8345                                 double* work, lapack_int* iwork );
8346 lapack_int LAPACKE_cposvx_work( int matrix_layout, char fact, char uplo,
8347                                 lapack_int n, lapack_int nrhs,
8348                                 lapack_complex_float* a, lapack_int lda,
8349                                 lapack_complex_float* af, lapack_int ldaf,
8350                                 char* equed, float* s, lapack_complex_float* b,
8351                                 lapack_int ldb, lapack_complex_float* x,
8352                                 lapack_int ldx, float* rcond, float* ferr,
8353                                 float* berr, lapack_complex_float* work,
8354                                 float* rwork );
8355 lapack_int LAPACKE_zposvx_work( int matrix_layout, char fact, char uplo,
8356                                 lapack_int n, lapack_int nrhs,
8357                                 lapack_complex_double* a, lapack_int lda,
8358                                 lapack_complex_double* af, lapack_int ldaf,
8359                                 char* equed, double* s,
8360                                 lapack_complex_double* b, lapack_int ldb,
8361                                 lapack_complex_double* x, lapack_int ldx,
8362                                 double* rcond, double* ferr, double* berr,
8363                                 lapack_complex_double* work, double* rwork );
8364
8365 lapack_int LAPACKE_sposvxx_work( int matrix_layout, char fact, char uplo,
8366                                  lapack_int n, lapack_int nrhs, float* a,
8367                                  lapack_int lda, float* af, lapack_int ldaf,
8368                                  char* equed, float* s, float* b,
8369                                  lapack_int ldb, float* x, lapack_int ldx,
8370                                  float* rcond, float* rpvgrw, float* berr,
8371                                  lapack_int n_err_bnds, float* err_bnds_norm,
8372                                  float* err_bnds_comp, lapack_int nparams,
8373                                  float* params, float* work,
8374                                  lapack_int* iwork );
8375 lapack_int LAPACKE_dposvxx_work( int matrix_layout, char fact, char uplo,
8376                                  lapack_int n, lapack_int nrhs, double* a,
8377                                  lapack_int lda, double* af, lapack_int ldaf,
8378                                  char* equed, double* s, double* b,
8379                                  lapack_int ldb, double* x, lapack_int ldx,
8380                                  double* rcond, double* rpvgrw, double* berr,
8381                                  lapack_int n_err_bnds, double* err_bnds_norm,
8382                                  double* err_bnds_comp, lapack_int nparams,
8383                                  double* params, double* work,
8384                                  lapack_int* iwork );
8385 lapack_int LAPACKE_cposvxx_work( int matrix_layout, char fact, char uplo,
8386                                  lapack_int n, lapack_int nrhs,
8387                                  lapack_complex_float* a, lapack_int lda,
8388                                  lapack_complex_float* af, lapack_int ldaf,
8389                                  char* equed, float* s, lapack_complex_float* b,
8390                                  lapack_int ldb, lapack_complex_float* x,
8391                                  lapack_int ldx, float* rcond, float* rpvgrw,
8392                                  float* berr, lapack_int n_err_bnds,
8393                                  float* err_bnds_norm, float* err_bnds_comp,
8394                                  lapack_int nparams, float* params,
8395                                  lapack_complex_float* work, float* rwork );
8396 lapack_int LAPACKE_zposvxx_work( int matrix_layout, char fact, char uplo,
8397                                  lapack_int n, lapack_int nrhs,
8398                                  lapack_complex_double* a, lapack_int lda,
8399                                  lapack_complex_double* af, lapack_int ldaf,
8400                                  char* equed, double* s,
8401                                  lapack_complex_double* b, lapack_int ldb,
8402                                  lapack_complex_double* x, lapack_int ldx,
8403                                  double* rcond, double* rpvgrw, double* berr,
8404                                  lapack_int n_err_bnds, double* err_bnds_norm,
8405                                  double* err_bnds_comp, lapack_int nparams,
8406                                  double* params, lapack_complex_double* work,
8407                                  double* rwork );
8408
8409 lapack_int LAPACKE_spotrf2_work( int matrix_layout, char uplo, lapack_int n,
8410                                 float* a, lapack_int lda );
8411 lapack_int LAPACKE_dpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8412                                 double* a, lapack_int lda );
8413 lapack_int LAPACKE_cpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8414                                 lapack_complex_float* a, lapack_int lda );
8415 lapack_int LAPACKE_zpotrf2_work( int matrix_layout, char uplo, lapack_int n,
8416                                 lapack_complex_double* a, lapack_int lda );
8417
8418 lapack_int LAPACKE_spotrf_work( int matrix_layout, char uplo, lapack_int n,
8419                                 float* a, lapack_int lda );
8420 lapack_int LAPACKE_dpotrf_work( int matrix_layout, char uplo, lapack_int n,
8421                                 double* a, lapack_int lda );
8422 lapack_int LAPACKE_cpotrf_work( int matrix_layout, char uplo, lapack_int n,
8423                                 lapack_complex_float* a, lapack_int lda );
8424 lapack_int LAPACKE_zpotrf_work( int matrix_layout, char uplo, lapack_int n,
8425                                 lapack_complex_double* a, lapack_int lda );
8426
8427 lapack_int LAPACKE_spotri_work( int matrix_layout, char uplo, lapack_int n,
8428                                 float* a, lapack_int lda );
8429 lapack_int LAPACKE_dpotri_work( int matrix_layout, char uplo, lapack_int n,
8430                                 double* a, lapack_int lda );
8431 lapack_int LAPACKE_cpotri_work( int matrix_layout, char uplo, lapack_int n,
8432                                 lapack_complex_float* a, lapack_int lda );
8433 lapack_int LAPACKE_zpotri_work( int matrix_layout, char uplo, lapack_int n,
8434                                 lapack_complex_double* a, lapack_int lda );
8435
8436 lapack_int LAPACKE_spotrs_work( int matrix_layout, char uplo, lapack_int n,
8437                                 lapack_int nrhs, const float* a, lapack_int lda,
8438                                 float* b, lapack_int ldb );
8439 lapack_int LAPACKE_dpotrs_work( int matrix_layout, char uplo, lapack_int n,
8440                                 lapack_int nrhs, const double* a,
8441                                 lapack_int lda, double* b, lapack_int ldb );
8442 lapack_int LAPACKE_cpotrs_work( int matrix_layout, char uplo, lapack_int n,
8443                                 lapack_int nrhs, const lapack_complex_float* a,
8444                                 lapack_int lda, lapack_complex_float* b,
8445                                 lapack_int ldb );
8446 lapack_int LAPACKE_zpotrs_work( int matrix_layout, char uplo, lapack_int n,
8447                                 lapack_int nrhs, const lapack_complex_double* a,
8448                                 lapack_int lda, lapack_complex_double* b,
8449                                 lapack_int ldb );
8450
8451 lapack_int LAPACKE_sppcon_work( int matrix_layout, char uplo, lapack_int n,
8452                                 const float* ap, float anorm, float* rcond,
8453                                 float* work, lapack_int* iwork );
8454 lapack_int LAPACKE_dppcon_work( int matrix_layout, char uplo, lapack_int n,
8455                                 const double* ap, double anorm, double* rcond,
8456                                 double* work, lapack_int* iwork );
8457 lapack_int LAPACKE_cppcon_work( int matrix_layout, char uplo, lapack_int n,
8458                                 const lapack_complex_float* ap, float anorm,
8459                                 float* rcond, lapack_complex_float* work,
8460                                 float* rwork );
8461 lapack_int LAPACKE_zppcon_work( int matrix_layout, char uplo, lapack_int n,
8462                                 const lapack_complex_double* ap, double anorm,
8463                                 double* rcond, lapack_complex_double* work,
8464                                 double* rwork );
8465
8466 lapack_int LAPACKE_sppequ_work( int matrix_layout, char uplo, lapack_int n,
8467                                 const float* ap, float* s, float* scond,
8468                                 float* amax );
8469 lapack_int LAPACKE_dppequ_work( int matrix_layout, char uplo, lapack_int n,
8470                                 const double* ap, double* s, double* scond,
8471                                 double* amax );
8472 lapack_int LAPACKE_cppequ_work( int matrix_layout, char uplo, lapack_int n,
8473                                 const lapack_complex_float* ap, float* s,
8474                                 float* scond, float* amax );
8475 lapack_int LAPACKE_zppequ_work( int matrix_layout, char uplo, lapack_int n,
8476                                 const lapack_complex_double* ap, double* s,
8477                                 double* scond, double* amax );
8478
8479 lapack_int LAPACKE_spprfs_work( int matrix_layout, char uplo, lapack_int n,
8480                                 lapack_int nrhs, const float* ap,
8481                                 const float* afp, const float* b,
8482                                 lapack_int ldb, float* x, lapack_int ldx,
8483                                 float* ferr, float* berr, float* work,
8484                                 lapack_int* iwork );
8485 lapack_int LAPACKE_dpprfs_work( int matrix_layout, char uplo, lapack_int n,
8486                                 lapack_int nrhs, const double* ap,
8487                                 const double* afp, const double* b,
8488                                 lapack_int ldb, double* x, lapack_int ldx,
8489                                 double* ferr, double* berr, double* work,
8490                                 lapack_int* iwork );
8491 lapack_int LAPACKE_cpprfs_work( int matrix_layout, char uplo, lapack_int n,
8492                                 lapack_int nrhs, const lapack_complex_float* ap,
8493                                 const lapack_complex_float* afp,
8494                                 const lapack_complex_float* b, lapack_int ldb,
8495                                 lapack_complex_float* x, lapack_int ldx,
8496                                 float* ferr, float* berr,
8497                                 lapack_complex_float* work, float* rwork );
8498 lapack_int LAPACKE_zpprfs_work( int matrix_layout, char uplo, lapack_int n,
8499                                 lapack_int nrhs,
8500                                 const lapack_complex_double* ap,
8501                                 const lapack_complex_double* afp,
8502                                 const lapack_complex_double* b, lapack_int ldb,
8503                                 lapack_complex_double* x, lapack_int ldx,
8504                                 double* ferr, double* berr,
8505                                 lapack_complex_double* work, double* rwork );
8506
8507 lapack_int LAPACKE_sppsv_work( int matrix_layout, char uplo, lapack_int n,
8508                                lapack_int nrhs, float* ap, float* b,
8509                                lapack_int ldb );
8510 lapack_int LAPACKE_dppsv_work( int matrix_layout, char uplo, lapack_int n,
8511                                lapack_int nrhs, double* ap, double* b,
8512                                lapack_int ldb );
8513 lapack_int LAPACKE_cppsv_work( int matrix_layout, char uplo, lapack_int n,
8514                                lapack_int nrhs, lapack_complex_float* ap,
8515                                lapack_complex_float* b, lapack_int ldb );
8516 lapack_int LAPACKE_zppsv_work( int matrix_layout, char uplo, lapack_int n,
8517                                lapack_int nrhs, lapack_complex_double* ap,
8518                                lapack_complex_double* b, lapack_int ldb );
8519
8520 lapack_int LAPACKE_sppsvx_work( int matrix_layout, char fact, char uplo,
8521                                 lapack_int n, lapack_int nrhs, float* ap,
8522                                 float* afp, char* equed, float* s, float* b,
8523                                 lapack_int ldb, float* x, lapack_int ldx,
8524                                 float* rcond, float* ferr, float* berr,
8525                                 float* work, lapack_int* iwork );
8526 lapack_int LAPACKE_dppsvx_work( int matrix_layout, char fact, char uplo,
8527                                 lapack_int n, lapack_int nrhs, double* ap,
8528                                 double* afp, char* equed, double* s, double* b,
8529                                 lapack_int ldb, double* x, lapack_int ldx,
8530                                 double* rcond, double* ferr, double* berr,
8531                                 double* work, lapack_int* iwork );
8532 lapack_int LAPACKE_cppsvx_work( int matrix_layout, char fact, char uplo,
8533                                 lapack_int n, lapack_int nrhs,
8534                                 lapack_complex_float* ap,
8535                                 lapack_complex_float* afp, char* equed,
8536                                 float* s, lapack_complex_float* b,
8537                                 lapack_int ldb, lapack_complex_float* x,
8538                                 lapack_int ldx, float* rcond, float* ferr,
8539                                 float* berr, lapack_complex_float* work,
8540                                 float* rwork );
8541 lapack_int LAPACKE_zppsvx_work( int matrix_layout, char fact, char uplo,
8542                                 lapack_int n, lapack_int nrhs,
8543                                 lapack_complex_double* ap,
8544                                 lapack_complex_double* afp, char* equed,
8545                                 double* s, lapack_complex_double* b,
8546                                 lapack_int ldb, lapack_complex_double* x,
8547                                 lapack_int ldx, double* rcond, double* ferr,
8548                                 double* berr, lapack_complex_double* work,
8549                                 double* rwork );
8550
8551 lapack_int LAPACKE_spptrf_work( int matrix_layout, char uplo, lapack_int n,
8552                                 float* ap );
8553 lapack_int LAPACKE_dpptrf_work( int matrix_layout, char uplo, lapack_int n,
8554                                 double* ap );
8555 lapack_int LAPACKE_cpptrf_work( int matrix_layout, char uplo, lapack_int n,
8556                                 lapack_complex_float* ap );
8557 lapack_int LAPACKE_zpptrf_work( int matrix_layout, char uplo, lapack_int n,
8558                                 lapack_complex_double* ap );
8559
8560 lapack_int LAPACKE_spptri_work( int matrix_layout, char uplo, lapack_int n,
8561                                 float* ap );
8562 lapack_int LAPACKE_dpptri_work( int matrix_layout, char uplo, lapack_int n,
8563                                 double* ap );
8564 lapack_int LAPACKE_cpptri_work( int matrix_layout, char uplo, lapack_int n,
8565                                 lapack_complex_float* ap );
8566 lapack_int LAPACKE_zpptri_work( int matrix_layout, char uplo, lapack_int n,
8567                                 lapack_complex_double* ap );
8568
8569 lapack_int LAPACKE_spptrs_work( int matrix_layout, char uplo, lapack_int n,
8570                                 lapack_int nrhs, const float* ap, float* b,
8571                                 lapack_int ldb );
8572 lapack_int LAPACKE_dpptrs_work( int matrix_layout, char uplo, lapack_int n,
8573                                 lapack_int nrhs, const double* ap, double* b,
8574                                 lapack_int ldb );
8575 lapack_int LAPACKE_cpptrs_work( int matrix_layout, char uplo, lapack_int n,
8576                                 lapack_int nrhs, const lapack_complex_float* ap,
8577                                 lapack_complex_float* b, lapack_int ldb );
8578 lapack_int LAPACKE_zpptrs_work( int matrix_layout, char uplo, lapack_int n,
8579                                 lapack_int nrhs,
8580                                 const lapack_complex_double* ap,
8581                                 lapack_complex_double* b, lapack_int ldb );
8582
8583 lapack_int LAPACKE_spstrf_work( int matrix_layout, char uplo, lapack_int n,
8584                                 float* a, lapack_int lda, lapack_int* piv,
8585                                 lapack_int* rank, float tol, float* work );
8586 lapack_int LAPACKE_dpstrf_work( int matrix_layout, char uplo, lapack_int n,
8587                                 double* a, lapack_int lda, lapack_int* piv,
8588                                 lapack_int* rank, double tol, double* work );
8589 lapack_int LAPACKE_cpstrf_work( int matrix_layout, char uplo, lapack_int n,
8590                                 lapack_complex_float* a, lapack_int lda,
8591                                 lapack_int* piv, lapack_int* rank, float tol,
8592                                 float* work );
8593 lapack_int LAPACKE_zpstrf_work( int matrix_layout, char uplo, lapack_int n,
8594                                 lapack_complex_double* a, lapack_int lda,
8595                                 lapack_int* piv, lapack_int* rank, double tol,
8596                                 double* work );
8597
8598 lapack_int LAPACKE_sptcon_work( lapack_int n, const float* d, const float* e,
8599                                 float anorm, float* rcond, float* work );
8600 lapack_int LAPACKE_dptcon_work( lapack_int n, const double* d, const double* e,
8601                                 double anorm, double* rcond, double* work );
8602 lapack_int LAPACKE_cptcon_work( lapack_int n, const float* d,
8603                                 const lapack_complex_float* e, float anorm,
8604                                 float* rcond, float* work );
8605 lapack_int LAPACKE_zptcon_work( lapack_int n, const double* d,
8606                                 const lapack_complex_double* e, double anorm,
8607                                 double* rcond, double* work );
8608
8609 lapack_int LAPACKE_spteqr_work( int matrix_layout, char compz, lapack_int n,
8610                                 float* d, float* e, float* z, lapack_int ldz,
8611                                 float* work );
8612 lapack_int LAPACKE_dpteqr_work( int matrix_layout, char compz, lapack_int n,
8613                                 double* d, double* e, double* z, lapack_int ldz,
8614                                 double* work );
8615 lapack_int LAPACKE_cpteqr_work( int matrix_layout, char compz, lapack_int n,
8616                                 float* d, float* e, lapack_complex_float* z,
8617                                 lapack_int ldz, float* work );
8618 lapack_int LAPACKE_zpteqr_work( int matrix_layout, char compz, lapack_int n,
8619                                 double* d, double* e, lapack_complex_double* z,
8620                                 lapack_int ldz, double* work );
8621
8622 lapack_int LAPACKE_sptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8623                                 const float* d, const float* e, const float* df,
8624                                 const float* ef, const float* b, lapack_int ldb,
8625                                 float* x, lapack_int ldx, float* ferr,
8626                                 float* berr, float* work );
8627 lapack_int LAPACKE_dptrfs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8628                                 const double* d, const double* e,
8629                                 const double* df, const double* ef,
8630                                 const double* b, lapack_int ldb, double* x,
8631                                 lapack_int ldx, double* ferr, double* berr,
8632                                 double* work );
8633 lapack_int LAPACKE_cptrfs_work( int matrix_layout, char uplo, lapack_int n,
8634                                 lapack_int nrhs, const float* d,
8635                                 const lapack_complex_float* e, const float* df,
8636                                 const lapack_complex_float* ef,
8637                                 const lapack_complex_float* b, lapack_int ldb,
8638                                 lapack_complex_float* x, lapack_int ldx,
8639                                 float* ferr, float* berr,
8640                                 lapack_complex_float* work, float* rwork );
8641 lapack_int LAPACKE_zptrfs_work( int matrix_layout, char uplo, lapack_int n,
8642                                 lapack_int nrhs, const double* d,
8643                                 const lapack_complex_double* e,
8644                                 const double* df,
8645                                 const lapack_complex_double* ef,
8646                                 const lapack_complex_double* b, lapack_int ldb,
8647                                 lapack_complex_double* x, lapack_int ldx,
8648                                 double* ferr, double* berr,
8649                                 lapack_complex_double* work, double* rwork );
8650
8651 lapack_int LAPACKE_sptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8652                                float* d, float* e, float* b, lapack_int ldb );
8653 lapack_int LAPACKE_dptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8654                                double* d, double* e, double* b,
8655                                lapack_int ldb );
8656 lapack_int LAPACKE_cptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8657                                float* d, lapack_complex_float* e,
8658                                lapack_complex_float* b, lapack_int ldb );
8659 lapack_int LAPACKE_zptsv_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8660                                double* d, lapack_complex_double* e,
8661                                lapack_complex_double* b, lapack_int ldb );
8662
8663 lapack_int LAPACKE_sptsvx_work( int matrix_layout, char fact, lapack_int n,
8664                                 lapack_int nrhs, const float* d, const float* e,
8665                                 float* df, float* ef, const float* b,
8666                                 lapack_int ldb, float* x, lapack_int ldx,
8667                                 float* rcond, float* ferr, float* berr,
8668                                 float* work );
8669 lapack_int LAPACKE_dptsvx_work( int matrix_layout, char fact, lapack_int n,
8670                                 lapack_int nrhs, const double* d,
8671                                 const double* e, double* df, double* ef,
8672                                 const double* b, lapack_int ldb, double* x,
8673                                 lapack_int ldx, double* rcond, double* ferr,
8674                                 double* berr, double* work );
8675 lapack_int LAPACKE_cptsvx_work( int matrix_layout, char fact, lapack_int n,
8676                                 lapack_int nrhs, const float* d,
8677                                 const lapack_complex_float* e, float* df,
8678                                 lapack_complex_float* ef,
8679                                 const lapack_complex_float* b, lapack_int ldb,
8680                                 lapack_complex_float* x, lapack_int ldx,
8681                                 float* rcond, float* ferr, float* berr,
8682                                 lapack_complex_float* work, float* rwork );
8683 lapack_int LAPACKE_zptsvx_work( int matrix_layout, char fact, lapack_int n,
8684                                 lapack_int nrhs, const double* d,
8685                                 const lapack_complex_double* e, double* df,
8686                                 lapack_complex_double* ef,
8687                                 const lapack_complex_double* b, lapack_int ldb,
8688                                 lapack_complex_double* x, lapack_int ldx,
8689                                 double* rcond, double* ferr, double* berr,
8690                                 lapack_complex_double* work, double* rwork );
8691
8692 lapack_int LAPACKE_spttrf_work( lapack_int n, float* d, float* e );
8693 lapack_int LAPACKE_dpttrf_work( lapack_int n, double* d, double* e );
8694 lapack_int LAPACKE_cpttrf_work( lapack_int n, float* d,
8695                                 lapack_complex_float* e );
8696 lapack_int LAPACKE_zpttrf_work( lapack_int n, double* d,
8697                                 lapack_complex_double* e );
8698
8699 lapack_int LAPACKE_spttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8700                                 const float* d, const float* e, float* b,
8701                                 lapack_int ldb );
8702 lapack_int LAPACKE_dpttrs_work( int matrix_layout, lapack_int n, lapack_int nrhs,
8703                                 const double* d, const double* e, double* b,
8704                                 lapack_int ldb );
8705 lapack_int LAPACKE_cpttrs_work( int matrix_layout, char uplo, lapack_int n,
8706                                 lapack_int nrhs, const float* d,
8707                                 const lapack_complex_float* e,
8708                                 lapack_complex_float* b, lapack_int ldb );
8709 lapack_int LAPACKE_zpttrs_work( int matrix_layout, char uplo, lapack_int n,
8710                                 lapack_int nrhs, const double* d,
8711                                 const lapack_complex_double* e,
8712                                 lapack_complex_double* b, lapack_int ldb );
8713
8714 lapack_int LAPACKE_ssbev_work( int matrix_layout, char jobz, char uplo,
8715                                lapack_int n, lapack_int kd, float* ab,
8716                                lapack_int ldab, float* w, float* z,
8717                                lapack_int ldz, float* work );
8718 lapack_int LAPACKE_dsbev_work( int matrix_layout, char jobz, char uplo,
8719                                lapack_int n, lapack_int kd, double* ab,
8720                                lapack_int ldab, double* w, double* z,
8721                                lapack_int ldz, double* work );
8722
8723 lapack_int LAPACKE_ssbevd_work( int matrix_layout, char jobz, char uplo,
8724                                 lapack_int n, lapack_int kd, float* ab,
8725                                 lapack_int ldab, float* w, float* z,
8726                                 lapack_int ldz, float* work, lapack_int lwork,
8727                                 lapack_int* iwork, lapack_int liwork );
8728 lapack_int LAPACKE_dsbevd_work( int matrix_layout, char jobz, char uplo,
8729                                 lapack_int n, lapack_int kd, double* ab,
8730                                 lapack_int ldab, double* w, double* z,
8731                                 lapack_int ldz, double* work, lapack_int lwork,
8732                                 lapack_int* iwork, lapack_int liwork );
8733
8734 lapack_int LAPACKE_ssbevx_work( int matrix_layout, char jobz, char range,
8735                                 char uplo, lapack_int n, lapack_int kd,
8736                                 float* ab, lapack_int ldab, float* q,
8737                                 lapack_int ldq, float vl, float vu,
8738                                 lapack_int il, lapack_int iu, float abstol,
8739                                 lapack_int* m, float* w, float* z,
8740                                 lapack_int ldz, float* work,
8741                                 lapack_int* iwork, lapack_int* ifail );
8742 lapack_int LAPACKE_dsbevx_work( int matrix_layout, char jobz, char range,
8743                                 char uplo, lapack_int n, lapack_int kd,
8744                                 double* ab, lapack_int ldab, double* q,
8745                                 lapack_int ldq, double vl, double vu,
8746                                 lapack_int il, lapack_int iu, double abstol,
8747                                 lapack_int* m, double* w, double* z,
8748                                 lapack_int ldz, double* work,
8749                                 lapack_int* iwork, lapack_int* ifail );
8750
8751 lapack_int LAPACKE_ssbgst_work( int matrix_layout, char vect, char uplo,
8752                                 lapack_int n, lapack_int ka, lapack_int kb,
8753                                 float* ab, lapack_int ldab, const float* bb,
8754                                 lapack_int ldbb, float* x, lapack_int ldx,
8755                                 float* work );
8756 lapack_int LAPACKE_dsbgst_work( int matrix_layout, char vect, char uplo,
8757                                 lapack_int n, lapack_int ka, lapack_int kb,
8758                                 double* ab, lapack_int ldab, const double* bb,
8759                                 lapack_int ldbb, double* x, lapack_int ldx,
8760                                 double* work );
8761
8762 lapack_int LAPACKE_ssbgv_work( int matrix_layout, char jobz, char uplo,
8763                                lapack_int n, lapack_int ka, lapack_int kb,
8764                                float* ab, lapack_int ldab, float* bb,
8765                                lapack_int ldbb, float* w, float* z,
8766                                lapack_int ldz, float* work );
8767 lapack_int LAPACKE_dsbgv_work( int matrix_layout, char jobz, char uplo,
8768                                lapack_int n, lapack_int ka, lapack_int kb,
8769                                double* ab, lapack_int ldab, double* bb,
8770                                lapack_int ldbb, double* w, double* z,
8771                                lapack_int ldz, double* work );
8772
8773 lapack_int LAPACKE_ssbgvd_work( int matrix_layout, char jobz, char uplo,
8774                                 lapack_int n, lapack_int ka, lapack_int kb,
8775                                 float* ab, lapack_int ldab, float* bb,
8776                                 lapack_int ldbb, float* w, float* z,
8777                                 lapack_int ldz, float* work, lapack_int lwork,
8778                                 lapack_int* iwork, lapack_int liwork );
8779 lapack_int LAPACKE_dsbgvd_work( int matrix_layout, char jobz, char uplo,
8780                                 lapack_int n, lapack_int ka, lapack_int kb,
8781                                 double* ab, lapack_int ldab, double* bb,
8782                                 lapack_int ldbb, double* w, double* z,
8783                                 lapack_int ldz, double* work, lapack_int lwork,
8784                                 lapack_int* iwork, lapack_int liwork );
8785
8786 lapack_int LAPACKE_ssbgvx_work( int matrix_layout, char jobz, char range,
8787                                 char uplo, lapack_int n, lapack_int ka,
8788                                 lapack_int kb, float* ab, lapack_int ldab,
8789                                 float* bb, lapack_int ldbb, float* q,
8790                                 lapack_int ldq, float vl, float vu,
8791                                 lapack_int il, lapack_int iu, float abstol,
8792                                 lapack_int* m, float* w, float* z,
8793                                 lapack_int ldz, float* work, lapack_int* iwork,
8794                                 lapack_int* ifail );
8795 lapack_int LAPACKE_dsbgvx_work( int matrix_layout, char jobz, char range,
8796                                 char uplo, lapack_int n, lapack_int ka,
8797                                 lapack_int kb, double* ab, lapack_int ldab,
8798                                 double* bb, lapack_int ldbb, double* q,
8799                                 lapack_int ldq, double vl, double vu,
8800                                 lapack_int il, lapack_int iu, double abstol,
8801                                 lapack_int* m, double* w, double* z,
8802                                 lapack_int ldz, double* work, lapack_int* iwork,
8803                                 lapack_int* ifail );
8804
8805 lapack_int LAPACKE_ssbtrd_work( int matrix_layout, char vect, char uplo,
8806                                 lapack_int n, lapack_int kd, float* ab,
8807                                 lapack_int ldab, float* d, float* e, float* q,
8808                                 lapack_int ldq, float* work );
8809 lapack_int LAPACKE_dsbtrd_work( int matrix_layout, char vect, char uplo,
8810                                 lapack_int n, lapack_int kd, double* ab,
8811                                 lapack_int ldab, double* d, double* e,
8812                                 double* q, lapack_int ldq, double* work );
8813
8814 lapack_int LAPACKE_ssfrk_work( int matrix_layout, char transr, char uplo,
8815                                char trans, lapack_int n, lapack_int k,
8816                                float alpha, const float* a, lapack_int lda,
8817                                float beta, float* c );
8818 lapack_int LAPACKE_dsfrk_work( int matrix_layout, char transr, char uplo,
8819                                char trans, lapack_int n, lapack_int k,
8820                                double alpha, const double* a, lapack_int lda,
8821                                double beta, double* c );
8822
8823 lapack_int LAPACKE_sspcon_work( int matrix_layout, char uplo, lapack_int n,
8824                                 const float* ap, const lapack_int* ipiv,
8825                                 float anorm, float* rcond, float* work,
8826                                 lapack_int* iwork );
8827 lapack_int LAPACKE_dspcon_work( int matrix_layout, char uplo, lapack_int n,
8828                                 const double* ap, const lapack_int* ipiv,
8829                                 double anorm, double* rcond, double* work,
8830                                 lapack_int* iwork );
8831 lapack_int LAPACKE_cspcon_work( int matrix_layout, char uplo, lapack_int n,
8832                                 const lapack_complex_float* ap,
8833                                 const lapack_int* ipiv, float anorm,
8834                                 float* rcond, lapack_complex_float* work );
8835 lapack_int LAPACKE_zspcon_work( int matrix_layout, char uplo, lapack_int n,
8836                                 const lapack_complex_double* ap,
8837                                 const lapack_int* ipiv, double anorm,
8838                                 double* rcond, lapack_complex_double* work );
8839
8840 lapack_int LAPACKE_sspev_work( int matrix_layout, char jobz, char uplo,
8841                                lapack_int n, float* ap, float* w, float* z,
8842                                lapack_int ldz, float* work );
8843 lapack_int LAPACKE_dspev_work( int matrix_layout, char jobz, char uplo,
8844                                lapack_int n, double* ap, double* w, double* z,
8845                                lapack_int ldz, double* work );
8846
8847 lapack_int LAPACKE_sspevd_work( int matrix_layout, char jobz, char uplo,
8848                                 lapack_int n, float* ap, float* w, float* z,
8849                                 lapack_int ldz, float* work, lapack_int lwork,
8850                                 lapack_int* iwork, lapack_int liwork );
8851 lapack_int LAPACKE_dspevd_work( int matrix_layout, char jobz, char uplo,
8852                                 lapack_int n, double* ap, double* w, double* z,
8853                                 lapack_int ldz, double* work, lapack_int lwork,
8854                                 lapack_int* iwork, lapack_int liwork );
8855
8856 lapack_int LAPACKE_sspevx_work( int matrix_layout, char jobz, char range,
8857                                 char uplo, lapack_int n, float* ap, float vl,
8858                                 float vu, lapack_int il, lapack_int iu,
8859                                 float abstol, lapack_int* m, float* w, float* z,
8860                                 lapack_int ldz, float* work, lapack_int* iwork,
8861                                 lapack_int* ifail );
8862 lapack_int LAPACKE_dspevx_work( int matrix_layout, char jobz, char range,
8863                                 char uplo, lapack_int n, double* ap, double vl,
8864                                 double vu, lapack_int il, lapack_int iu,
8865                                 double abstol, lapack_int* m, double* w,
8866                                 double* z, lapack_int ldz, double* work,
8867                                 lapack_int* iwork, lapack_int* ifail );
8868
8869 lapack_int LAPACKE_sspgst_work( int matrix_layout, lapack_int itype, char uplo,
8870                                 lapack_int n, float* ap, const float* bp );
8871 lapack_int LAPACKE_dspgst_work( int matrix_layout, lapack_int itype, char uplo,
8872                                 lapack_int n, double* ap, const double* bp );
8873
8874 lapack_int LAPACKE_sspgv_work( int matrix_layout, lapack_int itype, char jobz,
8875                                char uplo, lapack_int n, float* ap, float* bp,
8876                                float* w, float* z, lapack_int ldz,
8877                                float* work );
8878 lapack_int LAPACKE_dspgv_work( int matrix_layout, lapack_int itype, char jobz,
8879                                char uplo, lapack_int n, double* ap, double* bp,
8880                                double* w, double* z, lapack_int ldz,
8881                                double* work );
8882
8883 lapack_int LAPACKE_sspgvd_work( int matrix_layout, lapack_int itype, char jobz,
8884                                 char uplo, lapack_int n, float* ap, float* bp,
8885                                 float* w, float* z, lapack_int ldz, float* work,
8886                                 lapack_int lwork, lapack_int* iwork,
8887                                 lapack_int liwork );
8888 lapack_int LAPACKE_dspgvd_work( int matrix_layout, lapack_int itype, char jobz,
8889                                 char uplo, lapack_int n, double* ap, double* bp,
8890                                 double* w, double* z, lapack_int ldz,
8891                                 double* work, lapack_int lwork,
8892                                 lapack_int* iwork, lapack_int liwork );
8893
8894 lapack_int LAPACKE_sspgvx_work( int matrix_layout, lapack_int itype, char jobz,
8895                                 char range, char uplo, lapack_int n, float* ap,
8896                                 float* bp, float vl, float vu, lapack_int il,
8897                                 lapack_int iu, float abstol, lapack_int* m,
8898                                 float* w, float* z, lapack_int ldz, float* work,
8899                                 lapack_int* iwork, lapack_int* ifail );
8900 lapack_int LAPACKE_dspgvx_work( int matrix_layout, lapack_int itype, char jobz,
8901                                 char range, char uplo, lapack_int n, double* ap,
8902                                 double* bp, double vl, double vu, lapack_int il,
8903                                 lapack_int iu, double abstol, lapack_int* m,
8904                                 double* w, double* z, lapack_int ldz,
8905                                 double* work, lapack_int* iwork,
8906                                 lapack_int* ifail );
8907
8908 lapack_int LAPACKE_ssprfs_work( int matrix_layout, char uplo, lapack_int n,
8909                                 lapack_int nrhs, const float* ap,
8910                                 const float* afp, const lapack_int* ipiv,
8911                                 const float* b, lapack_int ldb, float* x,
8912                                 lapack_int ldx, float* ferr, float* berr,
8913                                 float* work, lapack_int* iwork );
8914 lapack_int LAPACKE_dsprfs_work( int matrix_layout, char uplo, lapack_int n,
8915                                 lapack_int nrhs, const double* ap,
8916                                 const double* afp, const lapack_int* ipiv,
8917                                 const double* b, lapack_int ldb, double* x,
8918                                 lapack_int ldx, double* ferr, double* berr,
8919                                 double* work, lapack_int* iwork );
8920 lapack_int LAPACKE_csprfs_work( int matrix_layout, char uplo, lapack_int n,
8921                                 lapack_int nrhs, const lapack_complex_float* ap,
8922                                 const lapack_complex_float* afp,
8923                                 const lapack_int* ipiv,
8924                                 const lapack_complex_float* b, lapack_int ldb,
8925                                 lapack_complex_float* x, lapack_int ldx,
8926                                 float* ferr, float* berr,
8927                                 lapack_complex_float* work, float* rwork );
8928 lapack_int LAPACKE_zsprfs_work( int matrix_layout, char uplo, lapack_int n,
8929                                 lapack_int nrhs,
8930                                 const lapack_complex_double* ap,
8931                                 const lapack_complex_double* afp,
8932                                 const lapack_int* ipiv,
8933                                 const lapack_complex_double* b, lapack_int ldb,
8934                                 lapack_complex_double* x, lapack_int ldx,
8935                                 double* ferr, double* berr,
8936                                 lapack_complex_double* work, double* rwork );
8937
8938 lapack_int LAPACKE_sspsv_work( int matrix_layout, char uplo, lapack_int n,
8939                                lapack_int nrhs, float* ap, lapack_int* ipiv,
8940                                float* b, lapack_int ldb );
8941 lapack_int LAPACKE_dspsv_work( int matrix_layout, char uplo, lapack_int n,
8942                                lapack_int nrhs, double* ap, lapack_int* ipiv,
8943                                double* b, lapack_int ldb );
8944 lapack_int LAPACKE_cspsv_work( int matrix_layout, char uplo, lapack_int n,
8945                                lapack_int nrhs, lapack_complex_float* ap,
8946                                lapack_int* ipiv, lapack_complex_float* b,
8947                                lapack_int ldb );
8948 lapack_int LAPACKE_zspsv_work( int matrix_layout, char uplo, lapack_int n,
8949                                lapack_int nrhs, lapack_complex_double* ap,
8950                                lapack_int* ipiv, lapack_complex_double* b,
8951                                lapack_int ldb );
8952
8953 lapack_int LAPACKE_sspsvx_work( int matrix_layout, char fact, char uplo,
8954                                 lapack_int n, lapack_int nrhs, const float* ap,
8955                                 float* afp, lapack_int* ipiv, const float* b,
8956                                 lapack_int ldb, float* x, lapack_int ldx,
8957                                 float* rcond, float* ferr, float* berr,
8958                                 float* work, lapack_int* iwork );
8959 lapack_int LAPACKE_dspsvx_work( int matrix_layout, char fact, char uplo,
8960                                 lapack_int n, lapack_int nrhs, const double* ap,
8961                                 double* afp, lapack_int* ipiv, const double* b,
8962                                 lapack_int ldb, double* x, lapack_int ldx,
8963                                 double* rcond, double* ferr, double* berr,
8964                                 double* work, lapack_int* iwork );
8965 lapack_int LAPACKE_cspsvx_work( int matrix_layout, char fact, char uplo,
8966                                 lapack_int n, lapack_int nrhs,
8967                                 const lapack_complex_float* ap,
8968                                 lapack_complex_float* afp, lapack_int* ipiv,
8969                                 const lapack_complex_float* b, lapack_int ldb,
8970                                 lapack_complex_float* x, lapack_int ldx,
8971                                 float* rcond, float* ferr, float* berr,
8972                                 lapack_complex_float* work, float* rwork );
8973 lapack_int LAPACKE_zspsvx_work( int matrix_layout, char fact, char uplo,
8974                                 lapack_int n, lapack_int nrhs,
8975                                 const lapack_complex_double* ap,
8976                                 lapack_complex_double* afp, lapack_int* ipiv,
8977                                 const lapack_complex_double* b, lapack_int ldb,
8978                                 lapack_complex_double* x, lapack_int ldx,
8979                                 double* rcond, double* ferr, double* berr,
8980                                 lapack_complex_double* work, double* rwork );
8981
8982 lapack_int LAPACKE_ssptrd_work( int matrix_layout, char uplo, lapack_int n,
8983                                 float* ap, float* d, float* e, float* tau );
8984 lapack_int LAPACKE_dsptrd_work( int matrix_layout, char uplo, lapack_int n,
8985                                 double* ap, double* d, double* e, double* tau );
8986
8987 lapack_int LAPACKE_ssptrf_work( int matrix_layout, char uplo, lapack_int n,
8988                                 float* ap, lapack_int* ipiv );
8989 lapack_int LAPACKE_dsptrf_work( int matrix_layout, char uplo, lapack_int n,
8990                                 double* ap, lapack_int* ipiv );
8991 lapack_int LAPACKE_csptrf_work( int matrix_layout, char uplo, lapack_int n,
8992                                 lapack_complex_float* ap, lapack_int* ipiv );
8993 lapack_int LAPACKE_zsptrf_work( int matrix_layout, char uplo, lapack_int n,
8994                                 lapack_complex_double* ap, lapack_int* ipiv );
8995
8996 lapack_int LAPACKE_ssptri_work( int matrix_layout, char uplo, lapack_int n,
8997                                 float* ap, const lapack_int* ipiv,
8998                                 float* work );
8999 lapack_int LAPACKE_dsptri_work( int matrix_layout, char uplo, lapack_int n,
9000                                 double* ap, const lapack_int* ipiv,
9001                                 double* work );
9002 lapack_int LAPACKE_csptri_work( int matrix_layout, char uplo, lapack_int n,
9003                                 lapack_complex_float* ap,
9004                                 const lapack_int* ipiv,
9005                                 lapack_complex_float* work );
9006 lapack_int LAPACKE_zsptri_work( int matrix_layout, char uplo, lapack_int n,
9007                                 lapack_complex_double* ap,
9008                                 const lapack_int* ipiv,
9009                                 lapack_complex_double* work );
9010
9011 lapack_int LAPACKE_ssptrs_work( int matrix_layout, char uplo, lapack_int n,
9012                                 lapack_int nrhs, const float* ap,
9013                                 const lapack_int* ipiv, float* b,
9014                                 lapack_int ldb );
9015 lapack_int LAPACKE_dsptrs_work( int matrix_layout, char uplo, lapack_int n,
9016                                 lapack_int nrhs, const double* ap,
9017                                 const lapack_int* ipiv, double* b,
9018                                 lapack_int ldb );
9019 lapack_int LAPACKE_csptrs_work( int matrix_layout, char uplo, lapack_int n,
9020                                 lapack_int nrhs, const lapack_complex_float* ap,
9021                                 const lapack_int* ipiv, lapack_complex_float* b,
9022                                 lapack_int ldb );
9023 lapack_int LAPACKE_zsptrs_work( int matrix_layout, char uplo, lapack_int n,
9024                                 lapack_int nrhs,
9025                                 const lapack_complex_double* ap,
9026                                 const lapack_int* ipiv,
9027                                 lapack_complex_double* b, lapack_int ldb );
9028
9029 lapack_int LAPACKE_sstebz_work( char range, char order, lapack_int n, float vl,
9030                                 float vu, lapack_int il, lapack_int iu,
9031                                 float abstol, const float* d, const float* e,
9032                                 lapack_int* m, lapack_int* nsplit, float* w,
9033                                 lapack_int* iblock, lapack_int* isplit,
9034                                 float* work, lapack_int* iwork );
9035 lapack_int LAPACKE_dstebz_work( char range, char order, lapack_int n, double vl,
9036                                 double vu, lapack_int il, lapack_int iu,
9037                                 double abstol, const double* d, const double* e,
9038                                 lapack_int* m, lapack_int* nsplit, double* w,
9039                                 lapack_int* iblock, lapack_int* isplit,
9040                                 double* work, lapack_int* iwork );
9041
9042 lapack_int LAPACKE_sstedc_work( int matrix_layout, char compz, lapack_int n,
9043                                 float* d, float* e, float* z, lapack_int ldz,
9044                                 float* work, lapack_int lwork,
9045                                 lapack_int* iwork, lapack_int liwork );
9046 lapack_int LAPACKE_dstedc_work( int matrix_layout, char compz, lapack_int n,
9047                                 double* d, double* e, double* z, lapack_int ldz,
9048                                 double* work, lapack_int lwork,
9049                                 lapack_int* iwork, lapack_int liwork );
9050 lapack_int LAPACKE_cstedc_work( int matrix_layout, char compz, lapack_int n,
9051                                 float* d, float* e, lapack_complex_float* z,
9052                                 lapack_int ldz, lapack_complex_float* work,
9053                                 lapack_int lwork, float* rwork,
9054                                 lapack_int lrwork, lapack_int* iwork,
9055                                 lapack_int liwork );
9056 lapack_int LAPACKE_zstedc_work( int matrix_layout, char compz, lapack_int n,
9057                                 double* d, double* e, lapack_complex_double* z,
9058                                 lapack_int ldz, lapack_complex_double* work,
9059                                 lapack_int lwork, double* rwork,
9060                                 lapack_int lrwork, lapack_int* iwork,
9061                                 lapack_int liwork );
9062
9063 lapack_int LAPACKE_sstegr_work( int matrix_layout, char jobz, char range,
9064                                 lapack_int n, float* d, float* e, float vl,
9065                                 float vu, lapack_int il, lapack_int iu,
9066                                 float abstol, lapack_int* m, float* w, float* z,
9067                                 lapack_int ldz, lapack_int* isuppz, float* work,
9068                                 lapack_int lwork, lapack_int* iwork,
9069                                 lapack_int liwork );
9070 lapack_int LAPACKE_dstegr_work( int matrix_layout, char jobz, char range,
9071                                 lapack_int n, double* d, double* e, double vl,
9072                                 double vu, lapack_int il, lapack_int iu,
9073                                 double abstol, lapack_int* m, double* w,
9074                                 double* z, lapack_int ldz, lapack_int* isuppz,
9075                                 double* work, lapack_int lwork,
9076                                 lapack_int* iwork, lapack_int liwork );
9077 lapack_int LAPACKE_cstegr_work( int matrix_layout, char jobz, char range,
9078                                 lapack_int n, float* d, float* e, float vl,
9079                                 float vu, lapack_int il, lapack_int iu,
9080                                 float abstol, lapack_int* m, float* w,
9081                                 lapack_complex_float* z, lapack_int ldz,
9082                                 lapack_int* isuppz, float* work,
9083                                 lapack_int lwork, lapack_int* iwork,
9084                                 lapack_int liwork );
9085 lapack_int LAPACKE_zstegr_work( int matrix_layout, char jobz, char range,
9086                                 lapack_int n, double* d, double* e, double vl,
9087                                 double vu, lapack_int il, lapack_int iu,
9088                                 double abstol, lapack_int* m, double* w,
9089                                 lapack_complex_double* z, lapack_int ldz,
9090                                 lapack_int* isuppz, double* work,
9091                                 lapack_int lwork, lapack_int* iwork,
9092                                 lapack_int liwork );
9093
9094 lapack_int LAPACKE_sstein_work( int matrix_layout, lapack_int n, const float* d,
9095                                 const float* e, lapack_int m, const float* w,
9096                                 const lapack_int* iblock,
9097                                 const lapack_int* isplit, float* z,
9098                                 lapack_int ldz, float* work, lapack_int* iwork,
9099                                 lapack_int* ifailv );
9100 lapack_int LAPACKE_dstein_work( int matrix_layout, lapack_int n, const double* d,
9101                                 const double* e, lapack_int m, const double* w,
9102                                 const lapack_int* iblock,
9103                                 const lapack_int* isplit, double* z,
9104                                 lapack_int ldz, double* work, lapack_int* iwork,
9105                                 lapack_int* ifailv );
9106 lapack_int LAPACKE_cstein_work( int matrix_layout, lapack_int n, const float* d,
9107                                 const float* e, lapack_int m, const float* w,
9108                                 const lapack_int* iblock,
9109                                 const lapack_int* isplit,
9110                                 lapack_complex_float* z, lapack_int ldz,
9111                                 float* work, lapack_int* iwork,
9112                                 lapack_int* ifailv );
9113 lapack_int LAPACKE_zstein_work( int matrix_layout, lapack_int n, const double* d,
9114                                 const double* e, lapack_int m, const double* w,
9115                                 const lapack_int* iblock,
9116                                 const lapack_int* isplit,
9117                                 lapack_complex_double* z, lapack_int ldz,
9118                                 double* work, lapack_int* iwork,
9119                                 lapack_int* ifailv );
9120
9121 lapack_int LAPACKE_sstemr_work( int matrix_layout, char jobz, char range,
9122                                 lapack_int n, float* d, float* e, float vl,
9123                                 float vu, lapack_int il, lapack_int iu,
9124                                 lapack_int* m, float* w, float* z,
9125                                 lapack_int ldz, lapack_int nzc,
9126                                 lapack_int* isuppz, lapack_logical* tryrac,
9127                                 float* work, lapack_int lwork,
9128                                 lapack_int* iwork, lapack_int liwork );
9129 lapack_int LAPACKE_dstemr_work( int matrix_layout, char jobz, char range,
9130                                 lapack_int n, double* d, double* e, double vl,
9131                                 double vu, lapack_int il, lapack_int iu,
9132                                 lapack_int* m, double* w, double* z,
9133                                 lapack_int ldz, lapack_int nzc,
9134                                 lapack_int* isuppz, lapack_logical* tryrac,
9135                                 double* work, lapack_int lwork,
9136                                 lapack_int* iwork, lapack_int liwork );
9137 lapack_int LAPACKE_cstemr_work( int matrix_layout, char jobz, char range,
9138                                 lapack_int n, float* d, float* e, float vl,
9139                                 float vu, lapack_int il, lapack_int iu,
9140                                 lapack_int* m, float* w,
9141                                 lapack_complex_float* z, lapack_int ldz,
9142                                 lapack_int nzc, lapack_int* isuppz,
9143                                 lapack_logical* tryrac, float* work,
9144                                 lapack_int lwork, lapack_int* iwork,
9145                                 lapack_int liwork );
9146 lapack_int LAPACKE_zstemr_work( int matrix_layout, char jobz, char range,
9147                                 lapack_int n, double* d, double* e, double vl,
9148                                 double vu, lapack_int il, lapack_int iu,
9149                                 lapack_int* m, double* w,
9150                                 lapack_complex_double* z, lapack_int ldz,
9151                                 lapack_int nzc, lapack_int* isuppz,
9152                                 lapack_logical* tryrac, double* work,
9153                                 lapack_int lwork, lapack_int* iwork,
9154                                 lapack_int liwork );
9155
9156 lapack_int LAPACKE_ssteqr_work( int matrix_layout, char compz, lapack_int n,
9157                                 float* d, float* e, float* z, lapack_int ldz,
9158                                 float* work );
9159 lapack_int LAPACKE_dsteqr_work( int matrix_layout, char compz, lapack_int n,
9160                                 double* d, double* e, double* z, lapack_int ldz,
9161                                 double* work );
9162 lapack_int LAPACKE_csteqr_work( int matrix_layout, char compz, lapack_int n,
9163                                 float* d, float* e, lapack_complex_float* z,
9164                                 lapack_int ldz, float* work );
9165 lapack_int LAPACKE_zsteqr_work( int matrix_layout, char compz, lapack_int n,
9166                                 double* d, double* e, lapack_complex_double* z,
9167                                 lapack_int ldz, double* work );
9168
9169 lapack_int LAPACKE_ssterf_work( lapack_int n, float* d, float* e );
9170 lapack_int LAPACKE_dsterf_work( lapack_int n, double* d, double* e );
9171
9172 lapack_int LAPACKE_sstev_work( int matrix_layout, char jobz, lapack_int n,
9173                                float* d, float* e, float* z, lapack_int ldz,
9174                                float* work );
9175 lapack_int LAPACKE_dstev_work( int matrix_layout, char jobz, lapack_int n,
9176                                double* d, double* e, double* z, lapack_int ldz,
9177                                double* work );
9178
9179 lapack_int LAPACKE_sstevd_work( int matrix_layout, char jobz, lapack_int n,
9180                                 float* d, float* e, float* z, lapack_int ldz,
9181                                 float* work, lapack_int lwork,
9182                                 lapack_int* iwork, lapack_int liwork );
9183 lapack_int LAPACKE_dstevd_work( int matrix_layout, char jobz, lapack_int n,
9184                                 double* d, double* e, double* z, lapack_int ldz,
9185                                 double* work, lapack_int lwork,
9186                                 lapack_int* iwork, lapack_int liwork );
9187
9188 lapack_int LAPACKE_sstevr_work( int matrix_layout, char jobz, char range,
9189                                 lapack_int n, float* d, float* e, float vl,
9190                                 float vu, lapack_int il, lapack_int iu,
9191                                 float abstol, lapack_int* m, float* w, float* z,
9192                                 lapack_int ldz, lapack_int* isuppz, float* work,
9193                                 lapack_int lwork, lapack_int* iwork,
9194                                 lapack_int liwork );
9195 lapack_int LAPACKE_dstevr_work( int matrix_layout, char jobz, char range,
9196                                 lapack_int n, double* d, double* e, double vl,
9197                                 double vu, lapack_int il, lapack_int iu,
9198                                 double abstol, lapack_int* m, double* w,
9199                                 double* z, lapack_int ldz, lapack_int* isuppz,
9200                                 double* work, lapack_int lwork,
9201                                 lapack_int* iwork, lapack_int liwork );
9202
9203 lapack_int LAPACKE_sstevx_work( int matrix_layout, char jobz, char range,
9204                                 lapack_int n, float* d, float* e, float vl,
9205                                 float vu, lapack_int il, lapack_int iu,
9206                                 float abstol, lapack_int* m, float* w, float* z,
9207                                 lapack_int ldz, float* work, lapack_int* iwork,
9208                                 lapack_int* ifail );
9209 lapack_int LAPACKE_dstevx_work( int matrix_layout, char jobz, char range,
9210                                 lapack_int n, double* d, double* e, double vl,
9211                                 double vu, lapack_int il, lapack_int iu,
9212                                 double abstol, lapack_int* m, double* w,
9213                                 double* z, lapack_int ldz, double* work,
9214                                 lapack_int* iwork, lapack_int* ifail );
9215
9216 lapack_int LAPACKE_ssycon_work( int matrix_layout, char uplo, lapack_int n,
9217                                 const float* a, lapack_int lda,
9218                                 const lapack_int* ipiv, float anorm,
9219                                 float* rcond, float* work, lapack_int* iwork );
9220 lapack_int LAPACKE_dsycon_work( int matrix_layout, char uplo, lapack_int n,
9221                                 const double* a, lapack_int lda,
9222                                 const lapack_int* ipiv, double anorm,
9223                                 double* rcond, double* work,
9224                                 lapack_int* iwork );
9225 lapack_int LAPACKE_csycon_work( int matrix_layout, char uplo, lapack_int n,
9226                                 const lapack_complex_float* a, lapack_int lda,
9227                                 const lapack_int* ipiv, float anorm,
9228                                 float* rcond, lapack_complex_float* work );
9229 lapack_int LAPACKE_zsycon_work( int matrix_layout, char uplo, lapack_int n,
9230                                 const lapack_complex_double* a, lapack_int lda,
9231                                 const lapack_int* ipiv, double anorm,
9232                                 double* rcond, lapack_complex_double* work );
9233
9234 lapack_int LAPACKE_ssyequb_work( int matrix_layout, char uplo, lapack_int n,
9235                                  const float* a, lapack_int lda, float* s,
9236                                  float* scond, float* amax, float* work );
9237 lapack_int LAPACKE_dsyequb_work( int matrix_layout, char uplo, lapack_int n,
9238                                  const double* a, lapack_int lda, double* s,
9239                                  double* scond, double* amax, double* work );
9240 lapack_int LAPACKE_csyequb_work( int matrix_layout, char uplo, lapack_int n,
9241                                  const lapack_complex_float* a, lapack_int lda,
9242                                  float* s, float* scond, float* amax,
9243                                  lapack_complex_float* work );
9244 lapack_int LAPACKE_zsyequb_work( int matrix_layout, char uplo, lapack_int n,
9245                                  const lapack_complex_double* a, lapack_int lda,
9246                                  double* s, double* scond, double* amax,
9247                                  lapack_complex_double* work );
9248
9249 lapack_int LAPACKE_ssyev_work( int matrix_layout, char jobz, char uplo,
9250                                lapack_int n, float* a, lapack_int lda, float* w,
9251                                float* work, lapack_int lwork );
9252 lapack_int LAPACKE_dsyev_work( int matrix_layout, char jobz, char uplo,
9253                                lapack_int n, double* a, lapack_int lda,
9254                                double* w, double* work, lapack_int lwork );
9255
9256 lapack_int LAPACKE_ssyevd_work( int matrix_layout, char jobz, char uplo,
9257                                 lapack_int n, float* a, lapack_int lda,
9258                                 float* w, float* work, lapack_int lwork,
9259                                 lapack_int* iwork, lapack_int liwork );
9260 lapack_int LAPACKE_dsyevd_work( int matrix_layout, char jobz, char uplo,
9261                                 lapack_int n, double* a, lapack_int lda,
9262                                 double* w, double* work, lapack_int lwork,
9263                                 lapack_int* iwork, lapack_int liwork );
9264
9265 lapack_int LAPACKE_ssyevr_work( int matrix_layout, char jobz, char range,
9266                                 char uplo, lapack_int n, float* a,
9267                                 lapack_int lda, float vl, float vu,
9268                                 lapack_int il, lapack_int iu, float abstol,
9269                                 lapack_int* m, float* w, float* z,
9270                                 lapack_int ldz, lapack_int* isuppz, float* work,
9271                                 lapack_int lwork, lapack_int* iwork,
9272                                 lapack_int liwork );
9273 lapack_int LAPACKE_dsyevr_work( int matrix_layout, char jobz, char range,
9274                                 char uplo, lapack_int n, double* a,
9275                                 lapack_int lda, double vl, double vu,
9276                                 lapack_int il, lapack_int iu, double abstol,
9277                                 lapack_int* m, double* w, double* z,
9278                                 lapack_int ldz, lapack_int* isuppz,
9279                                 double* work, lapack_int lwork,
9280                                 lapack_int* iwork, lapack_int liwork );
9281
9282 lapack_int LAPACKE_ssyevx_work( int matrix_layout, char jobz, char range,
9283                                 char uplo, lapack_int n, float* a,
9284                                 lapack_int lda, float vl, float vu,
9285                                 lapack_int il, lapack_int iu, float abstol,
9286                                 lapack_int* m, float* w, float* z,
9287                                 lapack_int ldz, float* work, lapack_int lwork,
9288                                 lapack_int* iwork, lapack_int* ifail );
9289 lapack_int LAPACKE_dsyevx_work( int matrix_layout, char jobz, char range,
9290                                 char uplo, lapack_int n, double* a,
9291                                 lapack_int lda, double vl, double vu,
9292                                 lapack_int il, lapack_int iu, double abstol,
9293                                 lapack_int* m, double* w, double* z,
9294                                 lapack_int ldz, double* work, lapack_int lwork,
9295                                 lapack_int* iwork, lapack_int* ifail );
9296
9297 lapack_int LAPACKE_ssygst_work( int matrix_layout, lapack_int itype, char uplo,
9298                                 lapack_int n, float* a, lapack_int lda,
9299                                 const float* b, lapack_int ldb );
9300 lapack_int LAPACKE_dsygst_work( int matrix_layout, lapack_int itype, char uplo,
9301                                 lapack_int n, double* a, lapack_int lda,
9302                                 const double* b, lapack_int ldb );
9303
9304 lapack_int LAPACKE_ssygv_work( int matrix_layout, lapack_int itype, char jobz,
9305                                char uplo, lapack_int n, float* a,
9306                                lapack_int lda, float* b, lapack_int ldb,
9307                                float* w, float* work, lapack_int lwork );
9308 lapack_int LAPACKE_dsygv_work( int matrix_layout, lapack_int itype, char jobz,
9309                                char uplo, lapack_int n, double* a,
9310                                lapack_int lda, double* b, lapack_int ldb,
9311                                double* w, double* work, lapack_int lwork );
9312
9313 lapack_int LAPACKE_ssygvd_work( int matrix_layout, lapack_int itype, char jobz,
9314                                 char uplo, lapack_int n, float* a,
9315                                 lapack_int lda, float* b, lapack_int ldb,
9316                                 float* w, float* work, lapack_int lwork,
9317                                 lapack_int* iwork, lapack_int liwork );
9318 lapack_int LAPACKE_dsygvd_work( int matrix_layout, lapack_int itype, char jobz,
9319                                 char uplo, lapack_int n, double* a,
9320                                 lapack_int lda, double* b, lapack_int ldb,
9321                                 double* w, double* work, lapack_int lwork,
9322                                 lapack_int* iwork, lapack_int liwork );
9323
9324 lapack_int LAPACKE_ssygvx_work( int matrix_layout, lapack_int itype, char jobz,
9325                                 char range, char uplo, lapack_int n, float* a,
9326                                 lapack_int lda, float* b, lapack_int ldb,
9327                                 float vl, float vu, lapack_int il,
9328                                 lapack_int iu, float abstol, lapack_int* m,
9329                                 float* w, float* z, lapack_int ldz, float* work,
9330                                 lapack_int lwork, lapack_int* iwork,
9331                                 lapack_int* ifail );
9332 lapack_int LAPACKE_dsygvx_work( int matrix_layout, lapack_int itype, char jobz,
9333                                 char range, char uplo, lapack_int n, double* a,
9334                                 lapack_int lda, double* b, lapack_int ldb,
9335                                 double vl, double vu, lapack_int il,
9336                                 lapack_int iu, double abstol, lapack_int* m,
9337                                 double* w, double* z, lapack_int ldz,
9338                                 double* work, lapack_int lwork,
9339                                 lapack_int* iwork, lapack_int* ifail );
9340
9341 lapack_int LAPACKE_ssyrfs_work( int matrix_layout, char uplo, lapack_int n,
9342                                 lapack_int nrhs, const float* a, lapack_int lda,
9343                                 const float* af, lapack_int ldaf,
9344                                 const lapack_int* ipiv, const float* b,
9345                                 lapack_int ldb, float* x, lapack_int ldx,
9346                                 float* ferr, float* berr, float* work,
9347                                 lapack_int* iwork );
9348 lapack_int LAPACKE_dsyrfs_work( int matrix_layout, char uplo, lapack_int n,
9349                                 lapack_int nrhs, const double* a,
9350                                 lapack_int lda, const double* af,
9351                                 lapack_int ldaf, const lapack_int* ipiv,
9352                                 const double* b, lapack_int ldb, double* x,
9353                                 lapack_int ldx, double* ferr, double* berr,
9354                                 double* work, lapack_int* iwork );
9355 lapack_int LAPACKE_csyrfs_work( int matrix_layout, char uplo, lapack_int n,
9356                                 lapack_int nrhs, const lapack_complex_float* a,
9357                                 lapack_int lda, const lapack_complex_float* af,
9358                                 lapack_int ldaf, const lapack_int* ipiv,
9359                                 const lapack_complex_float* b, lapack_int ldb,
9360                                 lapack_complex_float* x, lapack_int ldx,
9361                                 float* ferr, float* berr,
9362                                 lapack_complex_float* work, float* rwork );
9363 lapack_int LAPACKE_zsyrfs_work( int matrix_layout, char uplo, lapack_int n,
9364                                 lapack_int nrhs, const lapack_complex_double* a,
9365                                 lapack_int lda, const lapack_complex_double* af,
9366                                 lapack_int ldaf, const lapack_int* ipiv,
9367                                 const lapack_complex_double* b, lapack_int ldb,
9368                                 lapack_complex_double* x, lapack_int ldx,
9369                                 double* ferr, double* berr,
9370                                 lapack_complex_double* work, double* rwork );
9371
9372 lapack_int LAPACKE_ssyrfsx_work( int matrix_layout, char uplo, char equed,
9373                                  lapack_int n, lapack_int nrhs, const float* a,
9374                                  lapack_int lda, const float* af,
9375                                  lapack_int ldaf, const lapack_int* ipiv,
9376                                  const float* s, const float* b, lapack_int ldb,
9377                                  float* x, lapack_int ldx, float* rcond,
9378                                  float* berr, lapack_int n_err_bnds,
9379                                  float* err_bnds_norm, float* err_bnds_comp,
9380                                  lapack_int nparams, float* params, float* work,
9381                                  lapack_int* iwork );
9382 lapack_int LAPACKE_dsyrfsx_work( int matrix_layout, char uplo, char equed,
9383                                  lapack_int n, lapack_int nrhs, const double* a,
9384                                  lapack_int lda, const double* af,
9385                                  lapack_int ldaf, const lapack_int* ipiv,
9386                                  const double* s, const double* b,
9387                                  lapack_int ldb, double* x, lapack_int ldx,
9388                                  double* rcond, double* berr,
9389                                  lapack_int n_err_bnds, double* err_bnds_norm,
9390                                  double* err_bnds_comp, lapack_int nparams,
9391                                  double* params, double* work,
9392                                  lapack_int* iwork );
9393 lapack_int LAPACKE_csyrfsx_work( int matrix_layout, char uplo, char equed,
9394                                  lapack_int n, lapack_int nrhs,
9395                                  const lapack_complex_float* a, lapack_int lda,
9396                                  const lapack_complex_float* af,
9397                                  lapack_int ldaf, const lapack_int* ipiv,
9398                                  const float* s, const lapack_complex_float* b,
9399                                  lapack_int ldb, lapack_complex_float* x,
9400                                  lapack_int ldx, float* rcond, float* berr,
9401                                  lapack_int n_err_bnds, float* err_bnds_norm,
9402                                  float* err_bnds_comp, lapack_int nparams,
9403                                  float* params, lapack_complex_float* work,
9404                                  float* rwork );
9405 lapack_int LAPACKE_zsyrfsx_work( int matrix_layout, char uplo, char equed,
9406                                  lapack_int n, lapack_int nrhs,
9407                                  const lapack_complex_double* a, lapack_int lda,
9408                                  const lapack_complex_double* af,
9409                                  lapack_int ldaf, const lapack_int* ipiv,
9410                                  const double* s,
9411                                  const lapack_complex_double* b, lapack_int ldb,
9412                                  lapack_complex_double* x, lapack_int ldx,
9413                                  double* rcond, double* berr,
9414                                  lapack_int n_err_bnds, double* err_bnds_norm,
9415                                  double* err_bnds_comp, lapack_int nparams,
9416                                  double* params, lapack_complex_double* work,
9417                                  double* rwork );
9418
9419 lapack_int LAPACKE_ssysv_work( int matrix_layout, char uplo, lapack_int n,
9420                                lapack_int nrhs, float* a, lapack_int lda,
9421                                lapack_int* ipiv, float* b, lapack_int ldb,
9422                                float* work, lapack_int lwork );
9423 lapack_int LAPACKE_dsysv_work( int matrix_layout, char uplo, lapack_int n,
9424                                lapack_int nrhs, double* a, lapack_int lda,
9425                                lapack_int* ipiv, double* b, lapack_int ldb,
9426                                double* work, lapack_int lwork );
9427 lapack_int LAPACKE_csysv_work( int matrix_layout, char uplo, lapack_int n,
9428                                lapack_int nrhs, lapack_complex_float* a,
9429                                lapack_int lda, lapack_int* ipiv,
9430                                lapack_complex_float* b, lapack_int ldb,
9431                                lapack_complex_float* work, lapack_int lwork );
9432 lapack_int LAPACKE_zsysv_work( int matrix_layout, char uplo, lapack_int n,
9433                                lapack_int nrhs, lapack_complex_double* a,
9434                                lapack_int lda, lapack_int* ipiv,
9435                                lapack_complex_double* b, lapack_int ldb,
9436                                lapack_complex_double* work, lapack_int lwork );
9437
9438 lapack_int LAPACKE_ssysvx_work( int matrix_layout, char fact, char uplo,
9439                                 lapack_int n, lapack_int nrhs, const float* a,
9440                                 lapack_int lda, float* af, lapack_int ldaf,
9441                                 lapack_int* ipiv, const float* b,
9442                                 lapack_int ldb, float* x, lapack_int ldx,
9443                                 float* rcond, float* ferr, float* berr,
9444                                 float* work, lapack_int lwork,
9445                                 lapack_int* iwork );
9446 lapack_int LAPACKE_dsysvx_work( int matrix_layout, char fact, char uplo,
9447                                 lapack_int n, lapack_int nrhs, const double* a,
9448                                 lapack_int lda, double* af, lapack_int ldaf,
9449                                 lapack_int* ipiv, const double* b,
9450                                 lapack_int ldb, double* x, lapack_int ldx,
9451                                 double* rcond, double* ferr, double* berr,
9452                                 double* work, lapack_int lwork,
9453                                 lapack_int* iwork );
9454 lapack_int LAPACKE_csysvx_work( int matrix_layout, char fact, char uplo,
9455                                 lapack_int n, lapack_int nrhs,
9456                                 const lapack_complex_float* a, lapack_int lda,
9457                                 lapack_complex_float* af, lapack_int ldaf,
9458                                 lapack_int* ipiv, const lapack_complex_float* b,
9459                                 lapack_int ldb, lapack_complex_float* x,
9460                                 lapack_int ldx, float* rcond, float* ferr,
9461                                 float* berr, lapack_complex_float* work,
9462                                 lapack_int lwork, float* rwork );
9463 lapack_int LAPACKE_zsysvx_work( int matrix_layout, char fact, char uplo,
9464                                 lapack_int n, lapack_int nrhs,
9465                                 const lapack_complex_double* a, lapack_int lda,
9466                                 lapack_complex_double* af, lapack_int ldaf,
9467                                 lapack_int* ipiv,
9468                                 const lapack_complex_double* b, lapack_int ldb,
9469                                 lapack_complex_double* x, lapack_int ldx,
9470                                 double* rcond, double* ferr, double* berr,
9471                                 lapack_complex_double* work, lapack_int lwork,
9472                                 double* rwork );
9473
9474 lapack_int LAPACKE_ssysvxx_work( int matrix_layout, char fact, char uplo,
9475                                  lapack_int n, lapack_int nrhs, float* a,
9476                                  lapack_int lda, float* af, lapack_int ldaf,
9477                                  lapack_int* ipiv, char* equed, float* s,
9478                                  float* b, lapack_int ldb, float* x,
9479                                  lapack_int ldx, float* rcond, float* rpvgrw,
9480                                  float* berr, lapack_int n_err_bnds,
9481                                  float* err_bnds_norm, float* err_bnds_comp,
9482                                  lapack_int nparams, float* params, float* work,
9483                                  lapack_int* iwork );
9484 lapack_int LAPACKE_dsysvxx_work( int matrix_layout, char fact, char uplo,
9485                                  lapack_int n, lapack_int nrhs, double* a,
9486                                  lapack_int lda, double* af, lapack_int ldaf,
9487                                  lapack_int* ipiv, char* equed, double* s,
9488                                  double* b, lapack_int ldb, double* x,
9489                                  lapack_int ldx, double* rcond, double* rpvgrw,
9490                                  double* berr, lapack_int n_err_bnds,
9491                                  double* err_bnds_norm, double* err_bnds_comp,
9492                                  lapack_int nparams, double* params,
9493                                  double* work, lapack_int* iwork );
9494 lapack_int LAPACKE_csysvxx_work( int matrix_layout, char fact, char uplo,
9495                                  lapack_int n, lapack_int nrhs,
9496                                  lapack_complex_float* a, lapack_int lda,
9497                                  lapack_complex_float* af, lapack_int ldaf,
9498                                  lapack_int* ipiv, char* equed, float* s,
9499                                  lapack_complex_float* b, lapack_int ldb,
9500                                  lapack_complex_float* x, lapack_int ldx,
9501                                  float* rcond, float* rpvgrw, float* berr,
9502                                  lapack_int n_err_bnds, float* err_bnds_norm,
9503                                  float* err_bnds_comp, lapack_int nparams,
9504                                  float* params, lapack_complex_float* work,
9505                                  float* rwork );
9506 lapack_int LAPACKE_zsysvxx_work( int matrix_layout, char fact, char uplo,
9507                                  lapack_int n, lapack_int nrhs,
9508                                  lapack_complex_double* a, lapack_int lda,
9509                                  lapack_complex_double* af, lapack_int ldaf,
9510                                  lapack_int* ipiv, char* equed, double* s,
9511                                  lapack_complex_double* b, lapack_int ldb,
9512                                  lapack_complex_double* x, lapack_int ldx,
9513                                  double* rcond, double* rpvgrw, double* berr,
9514                                  lapack_int n_err_bnds, double* err_bnds_norm,
9515                                  double* err_bnds_comp, lapack_int nparams,
9516                                  double* params, lapack_complex_double* work,
9517                                  double* rwork );
9518
9519 lapack_int LAPACKE_ssytrd_work( int matrix_layout, char uplo, lapack_int n,
9520                                 float* a, lapack_int lda, float* d, float* e,
9521                                 float* tau, float* work, lapack_int lwork );
9522 lapack_int LAPACKE_dsytrd_work( int matrix_layout, char uplo, lapack_int n,
9523                                 double* a, lapack_int lda, double* d, double* e,
9524                                 double* tau, double* work, lapack_int lwork );
9525
9526 lapack_int LAPACKE_ssytrf_work( int matrix_layout, char uplo, lapack_int n,
9527                                 float* a, lapack_int lda, lapack_int* ipiv,
9528                                 float* work, lapack_int lwork );
9529 lapack_int LAPACKE_dsytrf_work( int matrix_layout, char uplo, lapack_int n,
9530                                 double* a, lapack_int lda, lapack_int* ipiv,
9531                                 double* work, lapack_int lwork );
9532 lapack_int LAPACKE_csytrf_work( int matrix_layout, char uplo, lapack_int n,
9533                                 lapack_complex_float* a, lapack_int lda,
9534                                 lapack_int* ipiv, lapack_complex_float* work,
9535                                 lapack_int lwork );
9536 lapack_int LAPACKE_zsytrf_work( int matrix_layout, char uplo, lapack_int n,
9537                                 lapack_complex_double* a, lapack_int lda,
9538                                 lapack_int* ipiv, lapack_complex_double* work,
9539                                 lapack_int lwork );
9540
9541 lapack_int LAPACKE_ssytri_work( int matrix_layout, char uplo, lapack_int n,
9542                                 float* a, lapack_int lda,
9543                                 const lapack_int* ipiv, float* work );
9544 lapack_int LAPACKE_dsytri_work( int matrix_layout, char uplo, lapack_int n,
9545                                 double* a, lapack_int lda,
9546                                 const lapack_int* ipiv, double* work );
9547 lapack_int LAPACKE_csytri_work( int matrix_layout, char uplo, lapack_int n,
9548                                 lapack_complex_float* a, lapack_int lda,
9549                                 const lapack_int* ipiv,
9550                                 lapack_complex_float* work );
9551 lapack_int LAPACKE_zsytri_work( int matrix_layout, char uplo, lapack_int n,
9552                                 lapack_complex_double* a, lapack_int lda,
9553                                 const lapack_int* ipiv,
9554                                 lapack_complex_double* work );
9555
9556 lapack_int LAPACKE_ssytrs_work( int matrix_layout, char uplo, lapack_int n,
9557                                 lapack_int nrhs, const float* a, lapack_int lda,
9558                                 const lapack_int* ipiv, float* b,
9559                                 lapack_int ldb );
9560 lapack_int LAPACKE_dsytrs_work( int matrix_layout, char uplo, lapack_int n,
9561                                 lapack_int nrhs, const double* a,
9562                                 lapack_int lda, const lapack_int* ipiv,
9563                                 double* b, lapack_int ldb );
9564 lapack_int LAPACKE_csytrs_work( int matrix_layout, char uplo, lapack_int n,
9565                                 lapack_int nrhs, const lapack_complex_float* a,
9566                                 lapack_int lda, const lapack_int* ipiv,
9567                                 lapack_complex_float* b, lapack_int ldb );
9568 lapack_int LAPACKE_zsytrs_work( int matrix_layout, char uplo, lapack_int n,
9569                                 lapack_int nrhs, const lapack_complex_double* a,
9570                                 lapack_int lda, const lapack_int* ipiv,
9571                                 lapack_complex_double* b, lapack_int ldb );
9572
9573 lapack_int LAPACKE_stbcon_work( int matrix_layout, char norm, char uplo,
9574                                 char diag, lapack_int n, lapack_int kd,
9575                                 const float* ab, lapack_int ldab, float* rcond,
9576                                 float* work, lapack_int* iwork );
9577 lapack_int LAPACKE_dtbcon_work( int matrix_layout, char norm, char uplo,
9578                                 char diag, lapack_int n, lapack_int kd,
9579                                 const double* ab, lapack_int ldab,
9580                                 double* rcond, double* work,
9581                                 lapack_int* iwork );
9582 lapack_int LAPACKE_ctbcon_work( int matrix_layout, char norm, char uplo,
9583                                 char diag, lapack_int n, lapack_int kd,
9584                                 const lapack_complex_float* ab, lapack_int ldab,
9585                                 float* rcond, lapack_complex_float* work,
9586                                 float* rwork );
9587 lapack_int LAPACKE_ztbcon_work( int matrix_layout, char norm, char uplo,
9588                                 char diag, lapack_int n, lapack_int kd,
9589                                 const lapack_complex_double* ab,
9590                                 lapack_int ldab, double* rcond,
9591                                 lapack_complex_double* work, double* rwork );
9592
9593 lapack_int LAPACKE_stbrfs_work( int matrix_layout, char uplo, char trans,
9594                                 char diag, lapack_int n, lapack_int kd,
9595                                 lapack_int nrhs, const float* ab,
9596                                 lapack_int ldab, const float* b, lapack_int ldb,
9597                                 const float* x, lapack_int ldx, float* ferr,
9598                                 float* berr, float* work, lapack_int* iwork );
9599 lapack_int LAPACKE_dtbrfs_work( int matrix_layout, char uplo, char trans,
9600                                 char diag, lapack_int n, lapack_int kd,
9601                                 lapack_int nrhs, const double* ab,
9602                                 lapack_int ldab, const double* b,
9603                                 lapack_int ldb, const double* x, lapack_int ldx,
9604                                 double* ferr, double* berr, double* work,
9605                                 lapack_int* iwork );
9606 lapack_int LAPACKE_ctbrfs_work( int matrix_layout, char uplo, char trans,
9607                                 char diag, lapack_int n, lapack_int kd,
9608                                 lapack_int nrhs, const lapack_complex_float* ab,
9609                                 lapack_int ldab, const lapack_complex_float* b,
9610                                 lapack_int ldb, const lapack_complex_float* x,
9611                                 lapack_int ldx, float* ferr, float* berr,
9612                                 lapack_complex_float* work, float* rwork );
9613 lapack_int LAPACKE_ztbrfs_work( int matrix_layout, char uplo, char trans,
9614                                 char diag, lapack_int n, lapack_int kd,
9615                                 lapack_int nrhs,
9616                                 const lapack_complex_double* ab,
9617                                 lapack_int ldab, const lapack_complex_double* b,
9618                                 lapack_int ldb, const lapack_complex_double* x,
9619                                 lapack_int ldx, double* ferr, double* berr,
9620                                 lapack_complex_double* work, double* rwork );
9621
9622 lapack_int LAPACKE_stbtrs_work( int matrix_layout, char uplo, char trans,
9623                                 char diag, lapack_int n, lapack_int kd,
9624                                 lapack_int nrhs, const float* ab,
9625                                 lapack_int ldab, float* b, lapack_int ldb );
9626 lapack_int LAPACKE_dtbtrs_work( int matrix_layout, char uplo, char trans,
9627                                 char diag, lapack_int n, lapack_int kd,
9628                                 lapack_int nrhs, const double* ab,
9629                                 lapack_int ldab, double* b, lapack_int ldb );
9630 lapack_int LAPACKE_ctbtrs_work( int matrix_layout, char uplo, char trans,
9631                                 char diag, lapack_int n, lapack_int kd,
9632                                 lapack_int nrhs, const lapack_complex_float* ab,
9633                                 lapack_int ldab, lapack_complex_float* b,
9634                                 lapack_int ldb );
9635 lapack_int LAPACKE_ztbtrs_work( int matrix_layout, char uplo, char trans,
9636                                 char diag, lapack_int n, lapack_int kd,
9637                                 lapack_int nrhs,
9638                                 const lapack_complex_double* ab,
9639                                 lapack_int ldab, lapack_complex_double* b,
9640                                 lapack_int ldb );
9641
9642 lapack_int LAPACKE_stfsm_work( int matrix_layout, char transr, char side,
9643                                char uplo, char trans, char diag, lapack_int m,
9644                                lapack_int n, float alpha, const float* a,
9645                                float* b, lapack_int ldb );
9646 lapack_int LAPACKE_dtfsm_work( int matrix_layout, char transr, char side,
9647                                char uplo, char trans, char diag, lapack_int m,
9648                                lapack_int n, double alpha, const double* a,
9649                                double* b, lapack_int ldb );
9650 lapack_int LAPACKE_ctfsm_work( int matrix_layout, char transr, char side,
9651                                char uplo, char trans, char diag, lapack_int m,
9652                                lapack_int n, lapack_complex_float alpha,
9653                                const lapack_complex_float* a,
9654                                lapack_complex_float* b, lapack_int ldb );
9655 lapack_int LAPACKE_ztfsm_work( int matrix_layout, char transr, char side,
9656                                char uplo, char trans, char diag, lapack_int m,
9657                                lapack_int n, lapack_complex_double alpha,
9658                                const lapack_complex_double* a,
9659                                lapack_complex_double* b, lapack_int ldb );
9660
9661 lapack_int LAPACKE_stftri_work( int matrix_layout, char transr, char uplo,
9662                                 char diag, lapack_int n, float* a );
9663 lapack_int LAPACKE_dtftri_work( int matrix_layout, char transr, char uplo,
9664                                 char diag, lapack_int n, double* a );
9665 lapack_int LAPACKE_ctftri_work( int matrix_layout, char transr, char uplo,
9666                                 char diag, lapack_int n,
9667                                 lapack_complex_float* a );
9668 lapack_int LAPACKE_ztftri_work( int matrix_layout, char transr, char uplo,
9669                                 char diag, lapack_int n,
9670                                 lapack_complex_double* a );
9671
9672 lapack_int LAPACKE_stfttp_work( int matrix_layout, char transr, char uplo,
9673                                 lapack_int n, const float* arf, float* ap );
9674 lapack_int LAPACKE_dtfttp_work( int matrix_layout, char transr, char uplo,
9675                                 lapack_int n, const double* arf, double* ap );
9676 lapack_int LAPACKE_ctfttp_work( int matrix_layout, char transr, char uplo,
9677                                 lapack_int n, const lapack_complex_float* arf,
9678                                 lapack_complex_float* ap );
9679 lapack_int LAPACKE_ztfttp_work( int matrix_layout, char transr, char uplo,
9680                                 lapack_int n, const lapack_complex_double* arf,
9681                                 lapack_complex_double* ap );
9682
9683 lapack_int LAPACKE_stfttr_work( int matrix_layout, char transr, char uplo,
9684                                 lapack_int n, const float* arf, float* a,
9685                                 lapack_int lda );
9686 lapack_int LAPACKE_dtfttr_work( int matrix_layout, char transr, char uplo,
9687                                 lapack_int n, const double* arf, double* a,
9688                                 lapack_int lda );
9689 lapack_int LAPACKE_ctfttr_work( int matrix_layout, char transr, char uplo,
9690                                 lapack_int n, const lapack_complex_float* arf,
9691                                 lapack_complex_float* a, lapack_int lda );
9692 lapack_int LAPACKE_ztfttr_work( int matrix_layout, char transr, char uplo,
9693                                 lapack_int n, const lapack_complex_double* arf,
9694                                 lapack_complex_double* a, lapack_int lda );
9695
9696 lapack_int LAPACKE_stgevc_work( int matrix_layout, char side, char howmny,
9697                                 const lapack_logical* select, lapack_int n,
9698                                 const float* s, lapack_int lds, const float* p,
9699                                 lapack_int ldp, float* vl, lapack_int ldvl,
9700                                 float* vr, lapack_int ldvr, lapack_int mm,
9701                                 lapack_int* m, float* work );
9702 lapack_int LAPACKE_dtgevc_work( int matrix_layout, char side, char howmny,
9703                                 const lapack_logical* select, lapack_int n,
9704                                 const double* s, lapack_int lds,
9705                                 const double* p, lapack_int ldp, double* vl,
9706                                 lapack_int ldvl, double* vr, lapack_int ldvr,
9707                                 lapack_int mm, lapack_int* m, double* work );
9708 lapack_int LAPACKE_ctgevc_work( int matrix_layout, char side, char howmny,
9709                                 const lapack_logical* select, lapack_int n,
9710                                 const lapack_complex_float* s, lapack_int lds,
9711                                 const lapack_complex_float* p, lapack_int ldp,
9712                                 lapack_complex_float* vl, lapack_int ldvl,
9713                                 lapack_complex_float* vr, lapack_int ldvr,
9714                                 lapack_int mm, lapack_int* m,
9715                                 lapack_complex_float* work, float* rwork );
9716 lapack_int LAPACKE_ztgevc_work( int matrix_layout, char side, char howmny,
9717                                 const lapack_logical* select, lapack_int n,
9718                                 const lapack_complex_double* s, lapack_int lds,
9719                                 const lapack_complex_double* p, lapack_int ldp,
9720                                 lapack_complex_double* vl, lapack_int ldvl,
9721                                 lapack_complex_double* vr, lapack_int ldvr,
9722                                 lapack_int mm, lapack_int* m,
9723                                 lapack_complex_double* work, double* rwork );
9724
9725 lapack_int LAPACKE_stgexc_work( int matrix_layout, lapack_logical wantq,
9726                                 lapack_logical wantz, lapack_int n, float* a,
9727                                 lapack_int lda, float* b, lapack_int ldb,
9728                                 float* q, lapack_int ldq, float* z,
9729                                 lapack_int ldz, lapack_int* ifst,
9730                                 lapack_int* ilst, float* work,
9731                                 lapack_int lwork );
9732 lapack_int LAPACKE_dtgexc_work( int matrix_layout, lapack_logical wantq,
9733                                 lapack_logical wantz, lapack_int n, double* a,
9734                                 lapack_int lda, double* b, lapack_int ldb,
9735                                 double* q, lapack_int ldq, double* z,
9736                                 lapack_int ldz, lapack_int* ifst,
9737                                 lapack_int* ilst, double* work,
9738                                 lapack_int lwork );
9739 lapack_int LAPACKE_ctgexc_work( int matrix_layout, lapack_logical wantq,
9740                                 lapack_logical wantz, lapack_int n,
9741                                 lapack_complex_float* a, lapack_int lda,
9742                                 lapack_complex_float* b, lapack_int ldb,
9743                                 lapack_complex_float* q, lapack_int ldq,
9744                                 lapack_complex_float* z, lapack_int ldz,
9745                                 lapack_int ifst, lapack_int ilst );
9746 lapack_int LAPACKE_ztgexc_work( int matrix_layout, lapack_logical wantq,
9747                                 lapack_logical wantz, lapack_int n,
9748                                 lapack_complex_double* a, lapack_int lda,
9749                                 lapack_complex_double* b, lapack_int ldb,
9750                                 lapack_complex_double* q, lapack_int ldq,
9751                                 lapack_complex_double* z, lapack_int ldz,
9752                                 lapack_int ifst, lapack_int ilst );
9753
9754 lapack_int LAPACKE_stgsen_work( int matrix_layout, lapack_int ijob,
9755                                 lapack_logical wantq, lapack_logical wantz,
9756                                 const lapack_logical* select, lapack_int n,
9757                                 float* a, lapack_int lda, float* b,
9758                                 lapack_int ldb, float* alphar, float* alphai,
9759                                 float* beta, float* q, lapack_int ldq, float* z,
9760                                 lapack_int ldz, lapack_int* m, float* pl,
9761                                 float* pr, float* dif, float* work,
9762                                 lapack_int lwork, lapack_int* iwork,
9763                                 lapack_int liwork );
9764 lapack_int LAPACKE_dtgsen_work( int matrix_layout, lapack_int ijob,
9765                                 lapack_logical wantq, lapack_logical wantz,
9766                                 const lapack_logical* select, lapack_int n,
9767                                 double* a, lapack_int lda, double* b,
9768                                 lapack_int ldb, double* alphar, double* alphai,
9769                                 double* beta, double* q, lapack_int ldq,
9770                                 double* z, lapack_int ldz, lapack_int* m,
9771                                 double* pl, double* pr, double* dif,
9772                                 double* work, lapack_int lwork,
9773                                 lapack_int* iwork, lapack_int liwork );
9774 lapack_int LAPACKE_ctgsen_work( int matrix_layout, lapack_int ijob,
9775                                 lapack_logical wantq, lapack_logical wantz,
9776                                 const lapack_logical* select, lapack_int n,
9777                                 lapack_complex_float* a, lapack_int lda,
9778                                 lapack_complex_float* b, lapack_int ldb,
9779                                 lapack_complex_float* alpha,
9780                                 lapack_complex_float* beta,
9781                                 lapack_complex_float* q, lapack_int ldq,
9782                                 lapack_complex_float* z, lapack_int ldz,
9783                                 lapack_int* m, float* pl, float* pr, float* dif,
9784                                 lapack_complex_float* work, lapack_int lwork,
9785                                 lapack_int* iwork, lapack_int liwork );
9786 lapack_int LAPACKE_ztgsen_work( int matrix_layout, lapack_int ijob,
9787                                 lapack_logical wantq, lapack_logical wantz,
9788                                 const lapack_logical* select, lapack_int n,
9789                                 lapack_complex_double* a, lapack_int lda,
9790                                 lapack_complex_double* b, lapack_int ldb,
9791                                 lapack_complex_double* alpha,
9792                                 lapack_complex_double* beta,
9793                                 lapack_complex_double* q, lapack_int ldq,
9794                                 lapack_complex_double* z, lapack_int ldz,
9795                                 lapack_int* m, double* pl, double* pr,
9796                                 double* dif, lapack_complex_double* work,
9797                                 lapack_int lwork, lapack_int* iwork,
9798                                 lapack_int liwork );
9799
9800 lapack_int LAPACKE_stgsja_work( int matrix_layout, char jobu, char jobv,
9801                                 char jobq, lapack_int m, lapack_int p,
9802                                 lapack_int n, lapack_int k, lapack_int l,
9803                                 float* a, lapack_int lda, float* b,
9804                                 lapack_int ldb, float tola, float tolb,
9805                                 float* alpha, float* beta, float* u,
9806                                 lapack_int ldu, float* v, lapack_int ldv,
9807                                 float* q, lapack_int ldq, float* work,
9808                                 lapack_int* ncycle );
9809 lapack_int LAPACKE_dtgsja_work( int matrix_layout, char jobu, char jobv,
9810                                 char jobq, lapack_int m, lapack_int p,
9811                                 lapack_int n, lapack_int k, lapack_int l,
9812                                 double* a, lapack_int lda, double* b,
9813                                 lapack_int ldb, double tola, double tolb,
9814                                 double* alpha, double* beta, double* u,
9815                                 lapack_int ldu, double* v, lapack_int ldv,
9816                                 double* q, lapack_int ldq, double* work,
9817                                 lapack_int* ncycle );
9818 lapack_int LAPACKE_ctgsja_work( int matrix_layout, char jobu, char jobv,
9819                                 char jobq, lapack_int m, lapack_int p,
9820                                 lapack_int n, lapack_int k, lapack_int l,
9821                                 lapack_complex_float* a, lapack_int lda,
9822                                 lapack_complex_float* b, lapack_int ldb,
9823                                 float tola, float tolb, float* alpha,
9824                                 float* beta, lapack_complex_float* u,
9825                                 lapack_int ldu, lapack_complex_float* v,
9826                                 lapack_int ldv, lapack_complex_float* q,
9827                                 lapack_int ldq, lapack_complex_float* work,
9828                                 lapack_int* ncycle );
9829 lapack_int LAPACKE_ztgsja_work( int matrix_layout, char jobu, char jobv,
9830                                 char jobq, lapack_int m, lapack_int p,
9831                                 lapack_int n, lapack_int k, lapack_int l,
9832                                 lapack_complex_double* a, lapack_int lda,
9833                                 lapack_complex_double* b, lapack_int ldb,
9834                                 double tola, double tolb, double* alpha,
9835                                 double* beta, lapack_complex_double* u,
9836                                 lapack_int ldu, lapack_complex_double* v,
9837                                 lapack_int ldv, lapack_complex_double* q,
9838                                 lapack_int ldq, lapack_complex_double* work,
9839                                 lapack_int* ncycle );
9840
9841 lapack_int LAPACKE_stgsna_work( int matrix_layout, char job, char howmny,
9842                                 const lapack_logical* select, lapack_int n,
9843                                 const float* a, lapack_int lda, const float* b,
9844                                 lapack_int ldb, const float* vl,
9845                                 lapack_int ldvl, const float* vr,
9846                                 lapack_int ldvr, float* s, float* dif,
9847                                 lapack_int mm, lapack_int* m, float* work,
9848                                 lapack_int lwork, lapack_int* iwork );
9849 lapack_int LAPACKE_dtgsna_work( int matrix_layout, char job, char howmny,
9850                                 const lapack_logical* select, lapack_int n,
9851                                 const double* a, lapack_int lda,
9852                                 const double* b, lapack_int ldb,
9853                                 const double* vl, lapack_int ldvl,
9854                                 const double* vr, lapack_int ldvr, double* s,
9855                                 double* dif, lapack_int mm, lapack_int* m,
9856                                 double* work, lapack_int lwork,
9857                                 lapack_int* iwork );
9858 lapack_int LAPACKE_ctgsna_work( int matrix_layout, char job, char howmny,
9859                                 const lapack_logical* select, lapack_int n,
9860                                 const lapack_complex_float* a, lapack_int lda,
9861                                 const lapack_complex_float* b, lapack_int ldb,
9862                                 const lapack_complex_float* vl, lapack_int ldvl,
9863                                 const lapack_complex_float* vr, lapack_int ldvr,
9864                                 float* s, float* dif, lapack_int mm,
9865                                 lapack_int* m, lapack_complex_float* work,
9866                                 lapack_int lwork, lapack_int* iwork );
9867 lapack_int LAPACKE_ztgsna_work( int matrix_layout, char job, char howmny,
9868                                 const lapack_logical* select, lapack_int n,
9869                                 const lapack_complex_double* a, lapack_int lda,
9870                                 const lapack_complex_double* b, lapack_int ldb,
9871                                 const lapack_complex_double* vl,
9872                                 lapack_int ldvl,
9873                                 const lapack_complex_double* vr,
9874                                 lapack_int ldvr, double* s, double* dif,
9875                                 lapack_int mm, lapack_int* m,
9876                                 lapack_complex_double* work, lapack_int lwork,
9877                                 lapack_int* iwork );
9878
9879 lapack_int LAPACKE_stgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9880                                 lapack_int m, lapack_int n, const float* a,
9881                                 lapack_int lda, const float* b, lapack_int ldb,
9882                                 float* c, lapack_int ldc, const float* d,
9883                                 lapack_int ldd, const float* e, lapack_int lde,
9884                                 float* f, lapack_int ldf, float* scale,
9885                                 float* dif, float* work, lapack_int lwork,
9886                                 lapack_int* iwork );
9887 lapack_int LAPACKE_dtgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9888                                 lapack_int m, lapack_int n, const double* a,
9889                                 lapack_int lda, const double* b, lapack_int ldb,
9890                                 double* c, lapack_int ldc, const double* d,
9891                                 lapack_int ldd, const double* e, lapack_int lde,
9892                                 double* f, lapack_int ldf, double* scale,
9893                                 double* dif, double* work, lapack_int lwork,
9894                                 lapack_int* iwork );
9895 lapack_int LAPACKE_ctgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9896                                 lapack_int m, lapack_int n,
9897                                 const lapack_complex_float* a, lapack_int lda,
9898                                 const lapack_complex_float* b, lapack_int ldb,
9899                                 lapack_complex_float* c, lapack_int ldc,
9900                                 const lapack_complex_float* d, lapack_int ldd,
9901                                 const lapack_complex_float* e, lapack_int lde,
9902                                 lapack_complex_float* f, lapack_int ldf,
9903                                 float* scale, float* dif,
9904                                 lapack_complex_float* work, lapack_int lwork,
9905                                 lapack_int* iwork );
9906 lapack_int LAPACKE_ztgsyl_work( int matrix_layout, char trans, lapack_int ijob,
9907                                 lapack_int m, lapack_int n,
9908                                 const lapack_complex_double* a, lapack_int lda,
9909                                 const lapack_complex_double* b, lapack_int ldb,
9910                                 lapack_complex_double* c, lapack_int ldc,
9911                                 const lapack_complex_double* d, lapack_int ldd,
9912                                 const lapack_complex_double* e, lapack_int lde,
9913                                 lapack_complex_double* f, lapack_int ldf,
9914                                 double* scale, double* dif,
9915                                 lapack_complex_double* work, lapack_int lwork,
9916                                 lapack_int* iwork );
9917
9918 lapack_int LAPACKE_stpcon_work( int matrix_layout, char norm, char uplo,
9919                                 char diag, lapack_int n, const float* ap,
9920                                 float* rcond, float* work, lapack_int* iwork );
9921 lapack_int LAPACKE_dtpcon_work( int matrix_layout, char norm, char uplo,
9922                                 char diag, lapack_int n, const double* ap,
9923                                 double* rcond, double* work,
9924                                 lapack_int* iwork );
9925 lapack_int LAPACKE_ctpcon_work( int matrix_layout, char norm, char uplo,
9926                                 char diag, lapack_int n,
9927                                 const lapack_complex_float* ap, float* rcond,
9928                                 lapack_complex_float* work, float* rwork );
9929 lapack_int LAPACKE_ztpcon_work( int matrix_layout, char norm, char uplo,
9930                                 char diag, lapack_int n,
9931                                 const lapack_complex_double* ap, double* rcond,
9932                                 lapack_complex_double* work, double* rwork );
9933
9934 lapack_int LAPACKE_stprfs_work( int matrix_layout, char uplo, char trans,
9935                                 char diag, lapack_int n, lapack_int nrhs,
9936                                 const float* ap, const float* b, lapack_int ldb,
9937                                 const float* x, lapack_int ldx, float* ferr,
9938                                 float* berr, float* work, lapack_int* iwork );
9939 lapack_int LAPACKE_dtprfs_work( int matrix_layout, char uplo, char trans,
9940                                 char diag, lapack_int n, lapack_int nrhs,
9941                                 const double* ap, const double* b,
9942                                 lapack_int ldb, const double* x, lapack_int ldx,
9943                                 double* ferr, double* berr, double* work,
9944                                 lapack_int* iwork );
9945 lapack_int LAPACKE_ctprfs_work( int matrix_layout, char uplo, char trans,
9946                                 char diag, lapack_int n, lapack_int nrhs,
9947                                 const lapack_complex_float* ap,
9948                                 const lapack_complex_float* b, lapack_int ldb,
9949                                 const lapack_complex_float* x, lapack_int ldx,
9950                                 float* ferr, float* berr,
9951                                 lapack_complex_float* work, float* rwork );
9952 lapack_int LAPACKE_ztprfs_work( int matrix_layout, char uplo, char trans,
9953                                 char diag, lapack_int n, lapack_int nrhs,
9954                                 const lapack_complex_double* ap,
9955                                 const lapack_complex_double* b, lapack_int ldb,
9956                                 const lapack_complex_double* x, lapack_int ldx,
9957                                 double* ferr, double* berr,
9958                                 lapack_complex_double* work, double* rwork );
9959
9960 lapack_int LAPACKE_stptri_work( int matrix_layout, char uplo, char diag,
9961                                 lapack_int n, float* ap );
9962 lapack_int LAPACKE_dtptri_work( int matrix_layout, char uplo, char diag,
9963                                 lapack_int n, double* ap );
9964 lapack_int LAPACKE_ctptri_work( int matrix_layout, char uplo, char diag,
9965                                 lapack_int n, lapack_complex_float* ap );
9966 lapack_int LAPACKE_ztptri_work( int matrix_layout, char uplo, char diag,
9967                                 lapack_int n, lapack_complex_double* ap );
9968
9969 lapack_int LAPACKE_stptrs_work( int matrix_layout, char uplo, char trans,
9970                                 char diag, lapack_int n, lapack_int nrhs,
9971                                 const float* ap, float* b, lapack_int ldb );
9972 lapack_int LAPACKE_dtptrs_work( int matrix_layout, char uplo, char trans,
9973                                 char diag, lapack_int n, lapack_int nrhs,
9974                                 const double* ap, double* b, lapack_int ldb );
9975 lapack_int LAPACKE_ctptrs_work( int matrix_layout, char uplo, char trans,
9976                                 char diag, lapack_int n, lapack_int nrhs,
9977                                 const lapack_complex_float* ap,
9978                                 lapack_complex_float* b, lapack_int ldb );
9979 lapack_int LAPACKE_ztptrs_work( int matrix_layout, char uplo, char trans,
9980                                 char diag, lapack_int n, lapack_int nrhs,
9981                                 const lapack_complex_double* ap,
9982                                 lapack_complex_double* b, lapack_int ldb );
9983
9984 lapack_int LAPACKE_stpttf_work( int matrix_layout, char transr, char uplo,
9985                                 lapack_int n, const float* ap, float* arf );
9986 lapack_int LAPACKE_dtpttf_work( int matrix_layout, char transr, char uplo,
9987                                 lapack_int n, const double* ap, double* arf );
9988 lapack_int LAPACKE_ctpttf_work( int matrix_layout, char transr, char uplo,
9989                                 lapack_int n, const lapack_complex_float* ap,
9990                                 lapack_complex_float* arf );
9991 lapack_int LAPACKE_ztpttf_work( int matrix_layout, char transr, char uplo,
9992                                 lapack_int n, const lapack_complex_double* ap,
9993                                 lapack_complex_double* arf );
9994
9995 lapack_int LAPACKE_stpttr_work( int matrix_layout, char uplo, lapack_int n,
9996                                 const float* ap, float* a, lapack_int lda );
9997 lapack_int LAPACKE_dtpttr_work( int matrix_layout, char uplo, lapack_int n,
9998                                 const double* ap, double* a, lapack_int lda );
9999 lapack_int LAPACKE_ctpttr_work( int matrix_layout, char uplo, lapack_int n,
10000                                 const lapack_complex_float* ap,
10001                                 lapack_complex_float* a, lapack_int lda );
10002 lapack_int LAPACKE_ztpttr_work( int matrix_layout, char uplo, lapack_int n,
10003                                 const lapack_complex_double* ap,
10004                                 lapack_complex_double* a, lapack_int lda );
10005
10006 lapack_int LAPACKE_strcon_work( int matrix_layout, char norm, char uplo,
10007                                 char diag, lapack_int n, const float* a,
10008                                 lapack_int lda, float* rcond, float* work,
10009                                 lapack_int* iwork );
10010 lapack_int LAPACKE_dtrcon_work( int matrix_layout, char norm, char uplo,
10011                                 char diag, lapack_int n, const double* a,
10012                                 lapack_int lda, double* rcond, double* work,
10013                                 lapack_int* iwork );
10014 lapack_int LAPACKE_ctrcon_work( int matrix_layout, char norm, char uplo,
10015                                 char diag, lapack_int n,
10016                                 const lapack_complex_float* a, lapack_int lda,
10017                                 float* rcond, lapack_complex_float* work,
10018                                 float* rwork );
10019 lapack_int LAPACKE_ztrcon_work( int matrix_layout, char norm, char uplo,
10020                                 char diag, lapack_int n,
10021                                 const lapack_complex_double* a, lapack_int lda,
10022                                 double* rcond, lapack_complex_double* work,
10023                                 double* rwork );
10024
10025 lapack_int LAPACKE_strevc_work( int matrix_layout, char side, char howmny,
10026                                 lapack_logical* select, lapack_int n,
10027                                 const float* t, lapack_int ldt, float* vl,
10028                                 lapack_int ldvl, float* vr, lapack_int ldvr,
10029                                 lapack_int mm, lapack_int* m, float* work );
10030 lapack_int LAPACKE_dtrevc_work( int matrix_layout, char side, char howmny,
10031                                 lapack_logical* select, lapack_int n,
10032                                 const double* t, lapack_int ldt, double* vl,
10033                                 lapack_int ldvl, double* vr, lapack_int ldvr,
10034                                 lapack_int mm, lapack_int* m, double* work );
10035 lapack_int LAPACKE_ctrevc_work( int matrix_layout, char side, char howmny,
10036                                 const lapack_logical* select, lapack_int n,
10037                                 lapack_complex_float* t, lapack_int ldt,
10038                                 lapack_complex_float* vl, lapack_int ldvl,
10039                                 lapack_complex_float* vr, lapack_int ldvr,
10040                                 lapack_int mm, lapack_int* m,
10041                                 lapack_complex_float* work, float* rwork );
10042 lapack_int LAPACKE_ztrevc_work( int matrix_layout, char side, char howmny,
10043                                 const lapack_logical* select, lapack_int n,
10044                                 lapack_complex_double* t, lapack_int ldt,
10045                                 lapack_complex_double* vl, lapack_int ldvl,
10046                                 lapack_complex_double* vr, lapack_int ldvr,
10047                                 lapack_int mm, lapack_int* m,
10048                                 lapack_complex_double* work, double* rwork );
10049
10050 lapack_int LAPACKE_strexc_work( int matrix_layout, char compq, lapack_int n,
10051                                 float* t, lapack_int ldt, float* q,
10052                                 lapack_int ldq, lapack_int* ifst,
10053                                 lapack_int* ilst, float* work );
10054 lapack_int LAPACKE_dtrexc_work( int matrix_layout, char compq, lapack_int n,
10055                                 double* t, lapack_int ldt, double* q,
10056                                 lapack_int ldq, lapack_int* ifst,
10057                                 lapack_int* ilst, double* work );
10058 lapack_int LAPACKE_ctrexc_work( int matrix_layout, char compq, lapack_int n,
10059                                 lapack_complex_float* t, lapack_int ldt,
10060                                 lapack_complex_float* q, lapack_int ldq,
10061                                 lapack_int ifst, lapack_int ilst );
10062 lapack_int LAPACKE_ztrexc_work( int matrix_layout, char compq, lapack_int n,
10063                                 lapack_complex_double* t, lapack_int ldt,
10064                                 lapack_complex_double* q, lapack_int ldq,
10065                                 lapack_int ifst, lapack_int ilst );
10066
10067 lapack_int LAPACKE_strrfs_work( int matrix_layout, char uplo, char trans,
10068                                 char diag, lapack_int n, lapack_int nrhs,
10069                                 const float* a, lapack_int lda, const float* b,
10070                                 lapack_int ldb, const float* x, lapack_int ldx,
10071                                 float* ferr, float* berr, float* work,
10072                                 lapack_int* iwork );
10073 lapack_int LAPACKE_dtrrfs_work( int matrix_layout, char uplo, char trans,
10074                                 char diag, lapack_int n, lapack_int nrhs,
10075                                 const double* a, lapack_int lda,
10076                                 const double* b, lapack_int ldb,
10077                                 const double* x, lapack_int ldx, double* ferr,
10078                                 double* berr, double* work, lapack_int* iwork );
10079 lapack_int LAPACKE_ctrrfs_work( int matrix_layout, char uplo, char trans,
10080                                 char diag, lapack_int n, lapack_int nrhs,
10081                                 const lapack_complex_float* a, lapack_int lda,
10082                                 const lapack_complex_float* b, lapack_int ldb,
10083                                 const lapack_complex_float* x, lapack_int ldx,
10084                                 float* ferr, float* berr,
10085                                 lapack_complex_float* work, float* rwork );
10086 lapack_int LAPACKE_ztrrfs_work( int matrix_layout, char uplo, char trans,
10087                                 char diag, lapack_int n, lapack_int nrhs,
10088                                 const lapack_complex_double* a, lapack_int lda,
10089                                 const lapack_complex_double* b, lapack_int ldb,
10090                                 const lapack_complex_double* x, lapack_int ldx,
10091                                 double* ferr, double* berr,
10092                                 lapack_complex_double* work, double* rwork );
10093
10094 lapack_int LAPACKE_strsen_work( int matrix_layout, char job, char compq,
10095                                 const lapack_logical* select, lapack_int n,
10096                                 float* t, lapack_int ldt, float* q,
10097                                 lapack_int ldq, float* wr, float* wi,
10098                                 lapack_int* m, float* s, float* sep,
10099                                 float* work, lapack_int lwork,
10100                                 lapack_int* iwork, lapack_int liwork );
10101 lapack_int LAPACKE_dtrsen_work( int matrix_layout, char job, char compq,
10102                                 const lapack_logical* select, lapack_int n,
10103                                 double* t, lapack_int ldt, double* q,
10104                                 lapack_int ldq, double* wr, double* wi,
10105                                 lapack_int* m, double* s, double* sep,
10106                                 double* work, lapack_int lwork,
10107                                 lapack_int* iwork, lapack_int liwork );
10108 lapack_int LAPACKE_ctrsen_work( int matrix_layout, char job, char compq,
10109                                 const lapack_logical* select, lapack_int n,
10110                                 lapack_complex_float* t, lapack_int ldt,
10111                                 lapack_complex_float* q, lapack_int ldq,
10112                                 lapack_complex_float* w, lapack_int* m,
10113                                 float* s, float* sep,
10114                                 lapack_complex_float* work, lapack_int lwork );
10115 lapack_int LAPACKE_ztrsen_work( int matrix_layout, char job, char compq,
10116                                 const lapack_logical* select, lapack_int n,
10117                                 lapack_complex_double* t, lapack_int ldt,
10118                                 lapack_complex_double* q, lapack_int ldq,
10119                                 lapack_complex_double* w, lapack_int* m,
10120                                 double* s, double* sep,
10121                                 lapack_complex_double* work, lapack_int lwork );
10122
10123 lapack_int LAPACKE_strsna_work( int matrix_layout, char job, char howmny,
10124                                 const lapack_logical* select, lapack_int n,
10125                                 const float* t, lapack_int ldt, const float* vl,
10126                                 lapack_int ldvl, const float* vr,
10127                                 lapack_int ldvr, float* s, float* sep,
10128                                 lapack_int mm, lapack_int* m, float* work,
10129                                 lapack_int ldwork, lapack_int* iwork );
10130 lapack_int LAPACKE_dtrsna_work( int matrix_layout, char job, char howmny,
10131                                 const lapack_logical* select, lapack_int n,
10132                                 const double* t, lapack_int ldt,
10133                                 const double* vl, lapack_int ldvl,
10134                                 const double* vr, lapack_int ldvr, double* s,
10135                                 double* sep, lapack_int mm, lapack_int* m,
10136                                 double* work, lapack_int ldwork,
10137                                 lapack_int* iwork );
10138 lapack_int LAPACKE_ctrsna_work( int matrix_layout, char job, char howmny,
10139                                 const lapack_logical* select, lapack_int n,
10140                                 const lapack_complex_float* t, lapack_int ldt,
10141                                 const lapack_complex_float* vl, lapack_int ldvl,
10142                                 const lapack_complex_float* vr, lapack_int ldvr,
10143                                 float* s, float* sep, lapack_int mm,
10144                                 lapack_int* m, lapack_complex_float* work,
10145                                 lapack_int ldwork, float* rwork );
10146 lapack_int LAPACKE_ztrsna_work( int matrix_layout, char job, char howmny,
10147                                 const lapack_logical* select, lapack_int n,
10148                                 const lapack_complex_double* t, lapack_int ldt,
10149                                 const lapack_complex_double* vl,
10150                                 lapack_int ldvl,
10151                                 const lapack_complex_double* vr,
10152                                 lapack_int ldvr, double* s, double* sep,
10153                                 lapack_int mm, lapack_int* m,
10154                                 lapack_complex_double* work, lapack_int ldwork,
10155                                 double* rwork );
10156
10157 lapack_int LAPACKE_strsyl_work( int matrix_layout, char trana, char tranb,
10158                                 lapack_int isgn, lapack_int m, lapack_int n,
10159                                 const float* a, lapack_int lda, const float* b,
10160                                 lapack_int ldb, float* c, lapack_int ldc,
10161                                 float* scale );
10162 lapack_int LAPACKE_dtrsyl_work( int matrix_layout, char trana, char tranb,
10163                                 lapack_int isgn, lapack_int m, lapack_int n,
10164                                 const double* a, lapack_int lda,
10165                                 const double* b, lapack_int ldb, double* c,
10166                                 lapack_int ldc, double* scale );
10167 lapack_int LAPACKE_ctrsyl_work( int matrix_layout, char trana, char tranb,
10168                                 lapack_int isgn, lapack_int m, lapack_int n,
10169                                 const lapack_complex_float* a, lapack_int lda,
10170                                 const lapack_complex_float* b, lapack_int ldb,
10171                                 lapack_complex_float* c, lapack_int ldc,
10172                                 float* scale );
10173 lapack_int LAPACKE_ztrsyl_work( int matrix_layout, char trana, char tranb,
10174                                 lapack_int isgn, lapack_int m, lapack_int n,
10175                                 const lapack_complex_double* a, lapack_int lda,
10176                                 const lapack_complex_double* b, lapack_int ldb,
10177                                 lapack_complex_double* c, lapack_int ldc,
10178                                 double* scale );
10179
10180 lapack_int LAPACKE_strtri_work( int matrix_layout, char uplo, char diag,
10181                                 lapack_int n, float* a, lapack_int lda );
10182 lapack_int LAPACKE_dtrtri_work( int matrix_layout, char uplo, char diag,
10183                                 lapack_int n, double* a, lapack_int lda );
10184 lapack_int LAPACKE_ctrtri_work( int matrix_layout, char uplo, char diag,
10185                                 lapack_int n, lapack_complex_float* a,
10186                                 lapack_int lda );
10187 lapack_int LAPACKE_ztrtri_work( int matrix_layout, char uplo, char diag,
10188                                 lapack_int n, lapack_complex_double* a,
10189                                 lapack_int lda );
10190
10191 lapack_int LAPACKE_strtrs_work( int matrix_layout, char uplo, char trans,
10192                                 char diag, lapack_int n, lapack_int nrhs,
10193                                 const float* a, lapack_int lda, float* b,
10194                                 lapack_int ldb );
10195 lapack_int LAPACKE_dtrtrs_work( int matrix_layout, char uplo, char trans,
10196                                 char diag, lapack_int n, lapack_int nrhs,
10197                                 const double* a, lapack_int lda, double* b,
10198                                 lapack_int ldb );
10199 lapack_int LAPACKE_ctrtrs_work( int matrix_layout, char uplo, char trans,
10200                                 char diag, lapack_int n, lapack_int nrhs,
10201                                 const lapack_complex_float* a, lapack_int lda,
10202                                 lapack_complex_float* b, lapack_int ldb );
10203 lapack_int LAPACKE_ztrtrs_work( int matrix_layout, char uplo, char trans,
10204                                 char diag, lapack_int n, lapack_int nrhs,
10205                                 const lapack_complex_double* a, lapack_int lda,
10206                                 lapack_complex_double* b, lapack_int ldb );
10207
10208 lapack_int LAPACKE_strttf_work( int matrix_layout, char transr, char uplo,
10209                                 lapack_int n, const float* a, lapack_int lda,
10210                                 float* arf );
10211 lapack_int LAPACKE_dtrttf_work( int matrix_layout, char transr, char uplo,
10212                                 lapack_int n, const double* a, lapack_int lda,
10213                                 double* arf );
10214 lapack_int LAPACKE_ctrttf_work( int matrix_layout, char transr, char uplo,
10215                                 lapack_int n, const lapack_complex_float* a,
10216                                 lapack_int lda, lapack_complex_float* arf );
10217 lapack_int LAPACKE_ztrttf_work( int matrix_layout, char transr, char uplo,
10218                                 lapack_int n, const lapack_complex_double* a,
10219                                 lapack_int lda, lapack_complex_double* arf );
10220
10221 lapack_int LAPACKE_strttp_work( int matrix_layout, char uplo, lapack_int n,
10222                                 const float* a, lapack_int lda, float* ap );
10223 lapack_int LAPACKE_dtrttp_work( int matrix_layout, char uplo, lapack_int n,
10224                                 const double* a, lapack_int lda, double* ap );
10225 lapack_int LAPACKE_ctrttp_work( int matrix_layout, char uplo, lapack_int n,
10226                                 const lapack_complex_float* a, lapack_int lda,
10227                                 lapack_complex_float* ap );
10228 lapack_int LAPACKE_ztrttp_work( int matrix_layout, char uplo, lapack_int n,
10229                                 const lapack_complex_double* a, lapack_int lda,
10230                                 lapack_complex_double* ap );
10231
10232 lapack_int LAPACKE_stzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10233                                 float* a, lapack_int lda, float* tau,
10234                                 float* work, lapack_int lwork );
10235 lapack_int LAPACKE_dtzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10236                                 double* a, lapack_int lda, double* tau,
10237                                 double* work, lapack_int lwork );
10238 lapack_int LAPACKE_ctzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10239                                 lapack_complex_float* a, lapack_int lda,
10240                                 lapack_complex_float* tau,
10241                                 lapack_complex_float* work, lapack_int lwork );
10242 lapack_int LAPACKE_ztzrzf_work( int matrix_layout, lapack_int m, lapack_int n,
10243                                 lapack_complex_double* a, lapack_int lda,
10244                                 lapack_complex_double* tau,
10245                                 lapack_complex_double* work, lapack_int lwork );
10246
10247 lapack_int LAPACKE_cungbr_work( int matrix_layout, char vect, lapack_int m,
10248                                 lapack_int n, lapack_int k,
10249                                 lapack_complex_float* a, lapack_int lda,
10250                                 const lapack_complex_float* tau,
10251                                 lapack_complex_float* work, lapack_int lwork );
10252 lapack_int LAPACKE_zungbr_work( int matrix_layout, char vect, lapack_int m,
10253                                 lapack_int n, lapack_int k,
10254                                 lapack_complex_double* a, lapack_int lda,
10255                                 const lapack_complex_double* tau,
10256                                 lapack_complex_double* work, lapack_int lwork );
10257
10258 lapack_int LAPACKE_cunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
10259                                 lapack_int ihi, lapack_complex_float* a,
10260                                 lapack_int lda, const lapack_complex_float* tau,
10261                                 lapack_complex_float* work, lapack_int lwork );
10262 lapack_int LAPACKE_zunghr_work( int matrix_layout, lapack_int n, lapack_int ilo,
10263                                 lapack_int ihi, lapack_complex_double* a,
10264                                 lapack_int lda,
10265                                 const lapack_complex_double* tau,
10266                                 lapack_complex_double* work, lapack_int lwork );
10267
10268 lapack_int LAPACKE_cunglq_work( int matrix_layout, lapack_int m, lapack_int n,
10269                                 lapack_int k, lapack_complex_float* a,
10270                                 lapack_int lda, const lapack_complex_float* tau,
10271                                 lapack_complex_float* work, lapack_int lwork );
10272 lapack_int LAPACKE_zunglq_work( int matrix_layout, lapack_int m, lapack_int n,
10273                                 lapack_int k, lapack_complex_double* a,
10274                                 lapack_int lda,
10275                                 const lapack_complex_double* tau,
10276                                 lapack_complex_double* work, lapack_int lwork );
10277
10278 lapack_int LAPACKE_cungql_work( int matrix_layout, lapack_int m, lapack_int n,
10279                                 lapack_int k, lapack_complex_float* a,
10280                                 lapack_int lda, const lapack_complex_float* tau,
10281                                 lapack_complex_float* work, lapack_int lwork );
10282 lapack_int LAPACKE_zungql_work( int matrix_layout, lapack_int m, lapack_int n,
10283                                 lapack_int k, lapack_complex_double* a,
10284                                 lapack_int lda,
10285                                 const lapack_complex_double* tau,
10286                                 lapack_complex_double* work, lapack_int lwork );
10287
10288 lapack_int LAPACKE_cungqr_work( int matrix_layout, lapack_int m, lapack_int n,
10289                                 lapack_int k, lapack_complex_float* a,
10290                                 lapack_int lda, const lapack_complex_float* tau,
10291                                 lapack_complex_float* work, lapack_int lwork );
10292 lapack_int LAPACKE_zungqr_work( int matrix_layout, lapack_int m, lapack_int n,
10293                                 lapack_int k, lapack_complex_double* a,
10294                                 lapack_int lda,
10295                                 const lapack_complex_double* tau,
10296                                 lapack_complex_double* work, lapack_int lwork );
10297
10298 lapack_int LAPACKE_cungrq_work( int matrix_layout, lapack_int m, lapack_int n,
10299                                 lapack_int k, lapack_complex_float* a,
10300                                 lapack_int lda, const lapack_complex_float* tau,
10301                                 lapack_complex_float* work, lapack_int lwork );
10302 lapack_int LAPACKE_zungrq_work( int matrix_layout, lapack_int m, lapack_int n,
10303                                 lapack_int k, lapack_complex_double* a,
10304                                 lapack_int lda,
10305                                 const lapack_complex_double* tau,
10306                                 lapack_complex_double* work, lapack_int lwork );
10307
10308 lapack_int LAPACKE_cungtr_work( int matrix_layout, char uplo, lapack_int n,
10309                                 lapack_complex_float* a, lapack_int lda,
10310                                 const lapack_complex_float* tau,
10311                                 lapack_complex_float* work, lapack_int lwork );
10312 lapack_int LAPACKE_zungtr_work( int matrix_layout, char uplo, lapack_int n,
10313                                 lapack_complex_double* a, lapack_int lda,
10314                                 const lapack_complex_double* tau,
10315                                 lapack_complex_double* work, lapack_int lwork );
10316
10317 lapack_int LAPACKE_cunmbr_work( int matrix_layout, char vect, char side,
10318                                 char trans, lapack_int m, lapack_int n,
10319                                 lapack_int k, const lapack_complex_float* a,
10320                                 lapack_int lda, const lapack_complex_float* tau,
10321                                 lapack_complex_float* c, lapack_int ldc,
10322                                 lapack_complex_float* work, lapack_int lwork );
10323 lapack_int LAPACKE_zunmbr_work( int matrix_layout, char vect, char side,
10324                                 char trans, lapack_int m, lapack_int n,
10325                                 lapack_int k, const lapack_complex_double* a,
10326                                 lapack_int lda,
10327                                 const lapack_complex_double* tau,
10328                                 lapack_complex_double* c, lapack_int ldc,
10329                                 lapack_complex_double* work, lapack_int lwork );
10330
10331 lapack_int LAPACKE_cunmhr_work( int matrix_layout, char side, char trans,
10332                                 lapack_int m, lapack_int n, lapack_int ilo,
10333                                 lapack_int ihi, const lapack_complex_float* a,
10334                                 lapack_int lda, const lapack_complex_float* tau,
10335                                 lapack_complex_float* c, lapack_int ldc,
10336                                 lapack_complex_float* work, lapack_int lwork );
10337 lapack_int LAPACKE_zunmhr_work( int matrix_layout, char side, char trans,
10338                                 lapack_int m, lapack_int n, lapack_int ilo,
10339                                 lapack_int ihi, const lapack_complex_double* a,
10340                                 lapack_int lda,
10341                                 const lapack_complex_double* tau,
10342                                 lapack_complex_double* c, lapack_int ldc,
10343                                 lapack_complex_double* work, lapack_int lwork );
10344
10345 lapack_int LAPACKE_cunmlq_work( int matrix_layout, char side, char trans,
10346                                 lapack_int m, lapack_int n, lapack_int k,
10347                                 const lapack_complex_float* a, lapack_int lda,
10348                                 const lapack_complex_float* tau,
10349                                 lapack_complex_float* c, lapack_int ldc,
10350                                 lapack_complex_float* work, lapack_int lwork );
10351 lapack_int LAPACKE_zunmlq_work( int matrix_layout, char side, char trans,
10352                                 lapack_int m, lapack_int n, lapack_int k,
10353                                 const lapack_complex_double* a, lapack_int lda,
10354                                 const lapack_complex_double* tau,
10355                                 lapack_complex_double* c, lapack_int ldc,
10356                                 lapack_complex_double* work, lapack_int lwork );
10357
10358 lapack_int LAPACKE_cunmql_work( int matrix_layout, char side, char trans,
10359                                 lapack_int m, lapack_int n, lapack_int k,
10360                                 const lapack_complex_float* a, lapack_int lda,
10361                                 const lapack_complex_float* tau,
10362                                 lapack_complex_float* c, lapack_int ldc,
10363                                 lapack_complex_float* work, lapack_int lwork );
10364 lapack_int LAPACKE_zunmql_work( int matrix_layout, char side, char trans,
10365                                 lapack_int m, lapack_int n, lapack_int k,
10366                                 const lapack_complex_double* a, lapack_int lda,
10367                                 const lapack_complex_double* tau,
10368                                 lapack_complex_double* c, lapack_int ldc,
10369                                 lapack_complex_double* work, lapack_int lwork );
10370
10371 lapack_int LAPACKE_cunmqr_work( int matrix_layout, char side, char trans,
10372                                 lapack_int m, lapack_int n, lapack_int k,
10373                                 const lapack_complex_float* a, lapack_int lda,
10374                                 const lapack_complex_float* tau,
10375                                 lapack_complex_float* c, lapack_int ldc,
10376                                 lapack_complex_float* work, lapack_int lwork );
10377 lapack_int LAPACKE_zunmqr_work( int matrix_layout, char side, char trans,
10378                                 lapack_int m, lapack_int n, lapack_int k,
10379                                 const lapack_complex_double* a, lapack_int lda,
10380                                 const lapack_complex_double* tau,
10381                                 lapack_complex_double* c, lapack_int ldc,
10382                                 lapack_complex_double* work, lapack_int lwork );
10383
10384 lapack_int LAPACKE_cunmrq_work( int matrix_layout, char side, char trans,
10385                                 lapack_int m, lapack_int n, lapack_int k,
10386                                 const lapack_complex_float* a, lapack_int lda,
10387                                 const lapack_complex_float* tau,
10388                                 lapack_complex_float* c, lapack_int ldc,
10389                                 lapack_complex_float* work, lapack_int lwork );
10390 lapack_int LAPACKE_zunmrq_work( int matrix_layout, char side, char trans,
10391                                 lapack_int m, lapack_int n, lapack_int k,
10392                                 const lapack_complex_double* a, lapack_int lda,
10393                                 const lapack_complex_double* tau,
10394                                 lapack_complex_double* c, lapack_int ldc,
10395                                 lapack_complex_double* work, lapack_int lwork );
10396
10397 lapack_int LAPACKE_cunmrz_work( int matrix_layout, char side, char trans,
10398                                 lapack_int m, lapack_int n, lapack_int k,
10399                                 lapack_int l, const lapack_complex_float* a,
10400                                 lapack_int lda, const lapack_complex_float* tau,
10401                                 lapack_complex_float* c, lapack_int ldc,
10402                                 lapack_complex_float* work, lapack_int lwork );
10403 lapack_int LAPACKE_zunmrz_work( int matrix_layout, char side, char trans,
10404                                 lapack_int m, lapack_int n, lapack_int k,
10405                                 lapack_int l, const lapack_complex_double* a,
10406                                 lapack_int lda,
10407                                 const lapack_complex_double* tau,
10408                                 lapack_complex_double* c, lapack_int ldc,
10409                                 lapack_complex_double* work, lapack_int lwork );
10410
10411 lapack_int LAPACKE_cunmtr_work( int matrix_layout, char side, char uplo,
10412                                 char trans, lapack_int m, lapack_int n,
10413                                 const lapack_complex_float* a, lapack_int lda,
10414                                 const lapack_complex_float* tau,
10415                                 lapack_complex_float* c, lapack_int ldc,
10416                                 lapack_complex_float* work, lapack_int lwork );
10417 lapack_int LAPACKE_zunmtr_work( int matrix_layout, char side, char uplo,
10418                                 char trans, lapack_int m, lapack_int n,
10419                                 const lapack_complex_double* a, lapack_int lda,
10420                                 const lapack_complex_double* tau,
10421                                 lapack_complex_double* c, lapack_int ldc,
10422                                 lapack_complex_double* work, lapack_int lwork );
10423
10424 lapack_int LAPACKE_cupgtr_work( int matrix_layout, char uplo, lapack_int n,
10425                                 const lapack_complex_float* ap,
10426                                 const lapack_complex_float* tau,
10427                                 lapack_complex_float* q, lapack_int ldq,
10428                                 lapack_complex_float* work );
10429 lapack_int LAPACKE_zupgtr_work( int matrix_layout, char uplo, lapack_int n,
10430                                 const lapack_complex_double* ap,
10431                                 const lapack_complex_double* tau,
10432                                 lapack_complex_double* q, lapack_int ldq,
10433                                 lapack_complex_double* work );
10434
10435 lapack_int LAPACKE_cupmtr_work( int matrix_layout, char side, char uplo,
10436                                 char trans, lapack_int m, lapack_int n,
10437                                 const lapack_complex_float* ap,
10438                                 const lapack_complex_float* tau,
10439                                 lapack_complex_float* c, lapack_int ldc,
10440                                 lapack_complex_float* work );
10441 lapack_int LAPACKE_zupmtr_work( int matrix_layout, char side, char uplo,
10442                                 char trans, lapack_int m, lapack_int n,
10443                                 const lapack_complex_double* ap,
10444                                 const lapack_complex_double* tau,
10445                                 lapack_complex_double* c, lapack_int ldc,
10446                                 lapack_complex_double* work );
10447
10448 lapack_int LAPACKE_claghe( int matrix_layout, lapack_int n, lapack_int k,
10449                            const float* d, lapack_complex_float* a,
10450                            lapack_int lda, lapack_int* iseed );
10451 lapack_int LAPACKE_zlaghe( int matrix_layout, lapack_int n, lapack_int k,
10452                            const double* d, lapack_complex_double* a,
10453                            lapack_int lda, lapack_int* iseed );
10454
10455 lapack_int LAPACKE_slagsy( int matrix_layout, lapack_int n, lapack_int k,
10456                            const float* d, float* a, lapack_int lda,
10457                            lapack_int* iseed );
10458 lapack_int LAPACKE_dlagsy( int matrix_layout, lapack_int n, lapack_int k,
10459                            const double* d, double* a, lapack_int lda,
10460                            lapack_int* iseed );
10461 lapack_int LAPACKE_clagsy( int matrix_layout, lapack_int n, lapack_int k,
10462                            const float* d, lapack_complex_float* a,
10463                            lapack_int lda, lapack_int* iseed );
10464 lapack_int LAPACKE_zlagsy( int matrix_layout, lapack_int n, lapack_int k,
10465                            const double* d, lapack_complex_double* a,
10466                            lapack_int lda, lapack_int* iseed );
10467
10468 lapack_int LAPACKE_slapmr( int matrix_layout, lapack_logical forwrd,
10469                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
10470                            lapack_int* k );
10471 lapack_int LAPACKE_dlapmr( int matrix_layout, lapack_logical forwrd,
10472                            lapack_int m, lapack_int n, double* x,
10473                            lapack_int ldx, lapack_int* k );
10474 lapack_int LAPACKE_clapmr( int matrix_layout, lapack_logical forwrd,
10475                            lapack_int m, lapack_int n, lapack_complex_float* x,
10476                            lapack_int ldx, lapack_int* k );
10477 lapack_int LAPACKE_zlapmr( int matrix_layout, lapack_logical forwrd,
10478                            lapack_int m, lapack_int n, lapack_complex_double* x,
10479                            lapack_int ldx, lapack_int* k );
10480
10481 lapack_int LAPACKE_slapmt( int matrix_layout, lapack_logical forwrd,
10482                            lapack_int m, lapack_int n, float* x, lapack_int ldx,
10483                            lapack_int* k );
10484 lapack_int LAPACKE_dlapmt( int matrix_layout, lapack_logical forwrd,
10485                            lapack_int m, lapack_int n, double* x,
10486                            lapack_int ldx, lapack_int* k );
10487 lapack_int LAPACKE_clapmt( int matrix_layout, lapack_logical forwrd,
10488                            lapack_int m, lapack_int n, lapack_complex_float* x,
10489                            lapack_int ldx, lapack_int* k );
10490 lapack_int LAPACKE_zlapmt( int matrix_layout, lapack_logical forwrd,
10491                            lapack_int m, lapack_int n, lapack_complex_double* x,
10492                            lapack_int ldx, lapack_int* k );
10493
10494 float LAPACKE_slapy2( float x, float y );
10495 double LAPACKE_dlapy2( double x, double y );
10496
10497 float LAPACKE_slapy3( float x, float y, float z );
10498 double LAPACKE_dlapy3( double x, double y, double z );
10499
10500 lapack_int LAPACKE_slartgp( float f, float g, float* cs, float* sn, float* r );
10501 lapack_int LAPACKE_dlartgp( double f, double g, double* cs, double* sn,
10502                             double* r );
10503
10504 lapack_int LAPACKE_slartgs( float x, float y, float sigma, float* cs,
10505                             float* sn );
10506 lapack_int LAPACKE_dlartgs( double x, double y, double sigma, double* cs,
10507                             double* sn );
10508
10509
10510 //LAPACK 3.3.0
10511 lapack_int LAPACKE_cbbcsd( int matrix_layout, char jobu1, char jobu2,
10512                            char jobv1t, char jobv2t, char trans, lapack_int m,
10513                            lapack_int p, lapack_int q, float* theta, float* phi,
10514                            lapack_complex_float* u1, lapack_int ldu1,
10515                            lapack_complex_float* u2, lapack_int ldu2,
10516                            lapack_complex_float* v1t, lapack_int ldv1t,
10517                            lapack_complex_float* v2t, lapack_int ldv2t,
10518                            float* b11d, float* b11e, float* b12d, float* b12e,
10519                            float* b21d, float* b21e, float* b22d, float* b22e );
10520 lapack_int LAPACKE_cbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10521                                 char jobv1t, char jobv2t, char trans,
10522                                 lapack_int m, lapack_int p, lapack_int q,
10523                                 float* theta, float* phi,
10524                                 lapack_complex_float* u1, lapack_int ldu1,
10525                                 lapack_complex_float* u2, lapack_int ldu2,
10526                                 lapack_complex_float* v1t, lapack_int ldv1t,
10527                                 lapack_complex_float* v2t, lapack_int ldv2t,
10528                                 float* b11d, float* b11e, float* b12d,
10529                                 float* b12e, float* b21d, float* b21e,
10530                                 float* b22d, float* b22e, float* rwork,
10531                                 lapack_int lrwork );
10532 lapack_int LAPACKE_cheswapr( int matrix_layout, char uplo, lapack_int n,
10533                              lapack_complex_float* a, lapack_int lda,
10534                              lapack_int i1, lapack_int i2 );
10535 lapack_int LAPACKE_cheswapr_work( int matrix_layout, char uplo, lapack_int n,
10536                                   lapack_complex_float* a, lapack_int lda,
10537                                   lapack_int i1, lapack_int i2 );
10538 lapack_int LAPACKE_chetri2( int matrix_layout, char uplo, lapack_int n,
10539                             lapack_complex_float* a, lapack_int lda,
10540                             const lapack_int* ipiv );
10541 lapack_int LAPACKE_chetri2_work( int matrix_layout, char uplo, lapack_int n,
10542                                  lapack_complex_float* a, lapack_int lda,
10543                                  const lapack_int* ipiv,
10544                                  lapack_complex_float* work, lapack_int lwork );
10545 lapack_int LAPACKE_chetri2x( int matrix_layout, char uplo, lapack_int n,
10546                              lapack_complex_float* a, lapack_int lda,
10547                              const lapack_int* ipiv, lapack_int nb );
10548 lapack_int LAPACKE_chetri2x_work( int matrix_layout, char uplo, lapack_int n,
10549                                   lapack_complex_float* a, lapack_int lda,
10550                                   const lapack_int* ipiv,
10551                                   lapack_complex_float* work, lapack_int nb );
10552 lapack_int LAPACKE_chetrs2( 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_int LAPACKE_chetrs2_work( int matrix_layout, char uplo, lapack_int n,
10557                                  lapack_int nrhs, const lapack_complex_float* a,
10558                                  lapack_int lda, const lapack_int* ipiv,
10559                                  lapack_complex_float* b, lapack_int ldb,
10560                                  lapack_complex_float* work );
10561 lapack_int LAPACKE_csyconv( int matrix_layout, char uplo, char way, lapack_int n,
10562                             lapack_complex_float* a, lapack_int lda,
10563                             const lapack_int* ipiv, lapack_complex_float* e  );
10564 lapack_int LAPACKE_csyconv_work( int matrix_layout, char uplo, char way,
10565                                  lapack_int n, lapack_complex_float* a,
10566                                  lapack_int lda, const lapack_int* ipiv,
10567                                  lapack_complex_float* e );
10568 lapack_int LAPACKE_csyswapr( int matrix_layout, char uplo, lapack_int n,
10569                              lapack_complex_float* a, lapack_int lda,
10570                              lapack_int i1, lapack_int i2 );
10571 lapack_int LAPACKE_csyswapr_work( int matrix_layout, char uplo, lapack_int n,
10572                                   lapack_complex_float* a, lapack_int lda,
10573                                   lapack_int i1, lapack_int i2 );
10574 lapack_int LAPACKE_csytri2( int matrix_layout, char uplo, lapack_int n,
10575                             lapack_complex_float* a, lapack_int lda,
10576                             const lapack_int* ipiv );
10577 lapack_int LAPACKE_csytri2_work( int matrix_layout, char uplo, lapack_int n,
10578                                  lapack_complex_float* a, lapack_int lda,
10579                                  const lapack_int* ipiv,
10580                                  lapack_complex_float* work, lapack_int lwork );
10581 lapack_int LAPACKE_csytri2x( int matrix_layout, char uplo, lapack_int n,
10582                              lapack_complex_float* a, lapack_int lda,
10583                              const lapack_int* ipiv, lapack_int nb );
10584 lapack_int LAPACKE_csytri2x_work( int matrix_layout, char uplo, lapack_int n,
10585                                   lapack_complex_float* a, lapack_int lda,
10586                                   const lapack_int* ipiv,
10587                                   lapack_complex_float* work, lapack_int nb );
10588 lapack_int LAPACKE_csytrs2( 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_int LAPACKE_csytrs2_work( int matrix_layout, char uplo, lapack_int n,
10593                                  lapack_int nrhs, const lapack_complex_float* a,
10594                                  lapack_int lda, const lapack_int* ipiv,
10595                                  lapack_complex_float* b, lapack_int ldb,
10596                                  lapack_complex_float* work );
10597 lapack_int LAPACKE_cunbdb( int matrix_layout, char trans, char signs,
10598                            lapack_int m, lapack_int p, lapack_int q,
10599                            lapack_complex_float* x11, lapack_int ldx11,
10600                            lapack_complex_float* x12, lapack_int ldx12,
10601                            lapack_complex_float* x21, lapack_int ldx21,
10602                            lapack_complex_float* x22, lapack_int ldx22,
10603                            float* theta, float* phi,
10604                            lapack_complex_float* taup1,
10605                            lapack_complex_float* taup2,
10606                            lapack_complex_float* tauq1,
10607                            lapack_complex_float* tauq2 );
10608 lapack_int LAPACKE_cunbdb_work( int matrix_layout, char trans, char signs,
10609                                 lapack_int m, lapack_int p, lapack_int q,
10610                                 lapack_complex_float* x11, lapack_int ldx11,
10611                                 lapack_complex_float* x12, lapack_int ldx12,
10612                                 lapack_complex_float* x21, lapack_int ldx21,
10613                                 lapack_complex_float* x22, lapack_int ldx22,
10614                                 float* theta, float* phi,
10615                                 lapack_complex_float* taup1,
10616                                 lapack_complex_float* taup2,
10617                                 lapack_complex_float* tauq1,
10618                                 lapack_complex_float* tauq2,
10619                                 lapack_complex_float* work, lapack_int lwork );
10620 lapack_int LAPACKE_cuncsd( int matrix_layout, char jobu1, char jobu2,
10621                            char jobv1t, char jobv2t, char trans, char signs,
10622                            lapack_int m, lapack_int p, lapack_int q,
10623                            lapack_complex_float* x11, lapack_int ldx11,
10624                            lapack_complex_float* x12, lapack_int ldx12,
10625                            lapack_complex_float* x21, lapack_int ldx21,
10626                            lapack_complex_float* x22, lapack_int ldx22,
10627                            float* theta, lapack_complex_float* u1,
10628                            lapack_int ldu1, lapack_complex_float* u2,
10629                            lapack_int ldu2, lapack_complex_float* v1t,
10630                            lapack_int ldv1t, lapack_complex_float* v2t,
10631                            lapack_int ldv2t );
10632 lapack_int LAPACKE_cuncsd_work( int matrix_layout, char jobu1, char jobu2,
10633                                 char jobv1t, char jobv2t, char trans,
10634                                 char signs, lapack_int m, lapack_int p,
10635                                 lapack_int q, lapack_complex_float* x11,
10636                                 lapack_int ldx11, lapack_complex_float* x12,
10637                                 lapack_int ldx12, lapack_complex_float* x21,
10638                                 lapack_int ldx21, lapack_complex_float* x22,
10639                                 lapack_int ldx22, float* theta,
10640                                 lapack_complex_float* u1, lapack_int ldu1,
10641                                 lapack_complex_float* u2, lapack_int ldu2,
10642                                 lapack_complex_float* v1t, lapack_int ldv1t,
10643                                 lapack_complex_float* v2t, lapack_int ldv2t,
10644                                 lapack_complex_float* work, lapack_int lwork,
10645                                 float* rwork, lapack_int lrwork,
10646                                 lapack_int* iwork );
10647 lapack_int LAPACKE_cuncsd2by1( int matrix_layout, char jobu1, char jobu2,
10648                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10649                            lapack_complex_float* x11, lapack_int ldx11,
10650                            lapack_complex_float* x21, lapack_int ldx21,
10651                            float* theta, lapack_complex_float* u1,
10652                            lapack_int ldu1, lapack_complex_float* u2,
10653                            lapack_int ldu2, lapack_complex_float* v1t, lapack_int ldv1t );
10654 lapack_int LAPACKE_cuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10655                                 char jobv1t, lapack_int m, lapack_int p,
10656                                 lapack_int q, lapack_complex_float* x11, lapack_int ldx11,
10657                                 lapack_complex_float* x21, lapack_int ldx21,
10658                                 float* theta, lapack_complex_float* u1,
10659                                 lapack_int ldu1, lapack_complex_float* u2,
10660                                 lapack_int ldu2, lapack_complex_float* v1t,
10661                                 lapack_int ldv1t, lapack_complex_float* work,
10662                                 lapack_int lwork, float* rwork, lapack_int lrwork,
10663                                 lapack_int* iwork );
10664 lapack_int LAPACKE_dbbcsd( int matrix_layout, char jobu1, char jobu2,
10665                            char jobv1t, char jobv2t, char trans, lapack_int m,
10666                            lapack_int p, lapack_int q, double* theta,
10667                            double* phi, double* u1, lapack_int ldu1, double* u2,
10668                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10669                            double* v2t, lapack_int ldv2t, double* b11d,
10670                            double* b11e, double* b12d, double* b12e,
10671                            double* b21d, double* b21e, double* b22d,
10672                            double* b22e );
10673 lapack_int LAPACKE_dbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10674                                 char jobv1t, char jobv2t, char trans,
10675                                 lapack_int m, lapack_int p, lapack_int q,
10676                                 double* theta, double* phi, double* u1,
10677                                 lapack_int ldu1, double* u2, lapack_int ldu2,
10678                                 double* v1t, lapack_int ldv1t, double* v2t,
10679                                 lapack_int ldv2t, double* b11d, double* b11e,
10680                                 double* b12d, double* b12e, double* b21d,
10681                                 double* b21e, double* b22d, double* b22e,
10682                                 double* work, lapack_int lwork );
10683 lapack_int LAPACKE_dorbdb( int matrix_layout, char trans, char signs,
10684                            lapack_int m, lapack_int p, lapack_int q,
10685                            double* x11, lapack_int ldx11, double* x12,
10686                            lapack_int ldx12, double* x21, lapack_int ldx21,
10687                            double* x22, lapack_int ldx22, double* theta,
10688                            double* phi, double* taup1, double* taup2,
10689                            double* tauq1, double* tauq2 );
10690 lapack_int LAPACKE_dorbdb_work( int matrix_layout, char trans, char signs,
10691                                 lapack_int m, lapack_int p, lapack_int q,
10692                                 double* x11, lapack_int ldx11, double* x12,
10693                                 lapack_int ldx12, double* x21, lapack_int ldx21,
10694                                 double* x22, lapack_int ldx22, double* theta,
10695                                 double* phi, double* taup1, double* taup2,
10696                                 double* tauq1, double* tauq2, double* work,
10697                                 lapack_int lwork );
10698 lapack_int LAPACKE_dorcsd( int matrix_layout, char jobu1, char jobu2,
10699                            char jobv1t, char jobv2t, char trans, char signs,
10700                            lapack_int m, lapack_int p, lapack_int q,
10701                            double* x11, lapack_int ldx11, double* x12,
10702                            lapack_int ldx12, double* x21, lapack_int ldx21,
10703                            double* x22, lapack_int ldx22, double* theta,
10704                            double* u1, lapack_int ldu1, double* u2,
10705                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10706                            double* v2t, lapack_int ldv2t );
10707 lapack_int LAPACKE_dorcsd_work( int matrix_layout, char jobu1, char jobu2,
10708                                 char jobv1t, char jobv2t, char trans,
10709                                 char signs, lapack_int m, lapack_int p,
10710                                 lapack_int q, double* x11, lapack_int ldx11,
10711                                 double* x12, lapack_int ldx12, double* x21,
10712                                 lapack_int ldx21, double* x22, lapack_int ldx22,
10713                                 double* theta, double* u1, lapack_int ldu1,
10714                                 double* u2, lapack_int ldu2, double* v1t,
10715                                 lapack_int ldv1t, double* v2t, lapack_int ldv2t,
10716                                 double* work, lapack_int lwork,
10717                                 lapack_int* iwork );
10718 lapack_int LAPACKE_dorcsd2by1( int matrix_layout, char jobu1, char jobu2,
10719                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10720                            double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
10721                            double* theta, double* u1, lapack_int ldu1, double* u2,
10722                            lapack_int ldu2, double* v1t, lapack_int ldv1t);
10723 lapack_int LAPACKE_dorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10724                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10725                            double* x11, lapack_int ldx11, double* x21, lapack_int ldx21,
10726                            double* theta, double* u1, lapack_int ldu1, double* u2,
10727                            lapack_int ldu2, double* v1t, lapack_int ldv1t,
10728                            double* work, lapack_int lwork, lapack_int* iwork );
10729 lapack_int LAPACKE_dsyconv( int matrix_layout, char uplo, char way, lapack_int n,
10730                             double* a, lapack_int lda, const lapack_int* ipiv, double* e);
10731 lapack_int LAPACKE_dsyconv_work( int matrix_layout, char uplo, char way,
10732                                  lapack_int n, double* a, lapack_int lda,
10733                                  const lapack_int* ipiv, double* e );
10734 lapack_int LAPACKE_dsyswapr( int matrix_layout, char uplo, lapack_int n,
10735                              double* a, lapack_int lda, lapack_int i1,
10736                              lapack_int i2 );
10737 lapack_int LAPACKE_dsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10738                                   double* a, lapack_int lda, lapack_int i1,
10739                                   lapack_int i2 );
10740 lapack_int LAPACKE_dsytri2( int matrix_layout, char uplo, lapack_int n,
10741                             double* a, lapack_int lda, const lapack_int* ipiv );
10742 lapack_int LAPACKE_dsytri2_work( int matrix_layout, char uplo, lapack_int n,
10743                                  double* a, lapack_int lda,
10744                                  const lapack_int* ipiv,
10745                                  double* work, lapack_int lwork );
10746 lapack_int LAPACKE_dsytri2x( int matrix_layout, char uplo, lapack_int n,
10747                              double* a, lapack_int lda, const lapack_int* ipiv,
10748                              lapack_int nb );
10749 lapack_int LAPACKE_dsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10750                                   double* a, lapack_int lda,
10751                                   const lapack_int* ipiv, double* work,
10752                                   lapack_int nb );
10753 lapack_int LAPACKE_dsytrs2( int matrix_layout, char uplo, lapack_int n,
10754                             lapack_int nrhs, const double* a, lapack_int lda,
10755                             const lapack_int* ipiv, double* b, lapack_int ldb );
10756 lapack_int LAPACKE_dsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10757                                  lapack_int nrhs, const double* a,
10758                                  lapack_int lda, const lapack_int* ipiv,
10759                                  double* b, lapack_int ldb, double* work );
10760 lapack_int LAPACKE_sbbcsd( int matrix_layout, char jobu1, char jobu2,
10761                            char jobv1t, char jobv2t, char trans, lapack_int m,
10762                            lapack_int p, lapack_int q, float* theta, float* phi,
10763                            float* u1, lapack_int ldu1, float* u2,
10764                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10765                            float* v2t, lapack_int ldv2t, float* b11d,
10766                            float* b11e, float* b12d, float* b12e, float* b21d,
10767                            float* b21e, float* b22d, float* b22e );
10768 lapack_int LAPACKE_sbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10769                                 char jobv1t, char jobv2t, char trans,
10770                                 lapack_int m, lapack_int p, lapack_int q,
10771                                 float* theta, float* phi, float* u1,
10772                                 lapack_int ldu1, float* u2, lapack_int ldu2,
10773                                 float* v1t, lapack_int ldv1t, float* v2t,
10774                                 lapack_int ldv2t, float* b11d, float* b11e,
10775                                 float* b12d, float* b12e, float* b21d,
10776                                 float* b21e, float* b22d, float* b22e,
10777                                 float* work, lapack_int lwork );
10778 lapack_int LAPACKE_sorbdb( int matrix_layout, char trans, char signs,
10779                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10780                            lapack_int ldx11, float* x12, lapack_int ldx12,
10781                            float* x21, lapack_int ldx21, float* x22,
10782                            lapack_int ldx22, float* theta, float* phi,
10783                            float* taup1, float* taup2, float* tauq1,
10784                            float* tauq2 );
10785 lapack_int LAPACKE_sorbdb_work( int matrix_layout, char trans, char signs,
10786                                 lapack_int m, lapack_int p, lapack_int q,
10787                                 float* x11, lapack_int ldx11, float* x12,
10788                                 lapack_int ldx12, float* x21, lapack_int ldx21,
10789                                 float* x22, lapack_int ldx22, float* theta,
10790                                 float* phi, float* taup1, float* taup2,
10791                                 float* tauq1, float* tauq2, float* work,
10792                                 lapack_int lwork );
10793 lapack_int LAPACKE_sorcsd( int matrix_layout, char jobu1, char jobu2,
10794                            char jobv1t, char jobv2t, char trans, char signs,
10795                            lapack_int m, lapack_int p, lapack_int q, float* x11,
10796                            lapack_int ldx11, float* x12, lapack_int ldx12,
10797                            float* x21, lapack_int ldx21, float* x22,
10798                            lapack_int ldx22, float* theta, float* u1,
10799                            lapack_int ldu1, float* u2, lapack_int ldu2,
10800                            float* v1t, lapack_int ldv1t, float* v2t,
10801                            lapack_int ldv2t );
10802 lapack_int LAPACKE_sorcsd_work( int matrix_layout, char jobu1, char jobu2,
10803                                 char jobv1t, char jobv2t, char trans,
10804                                 char signs, lapack_int m, lapack_int p,
10805                                 lapack_int q, float* x11, lapack_int ldx11,
10806                                 float* x12, lapack_int ldx12, float* x21,
10807                                 lapack_int ldx21, float* x22, lapack_int ldx22,
10808                                 float* theta, float* u1, lapack_int ldu1,
10809                                 float* u2, lapack_int ldu2, float* v1t,
10810                                 lapack_int ldv1t, float* v2t, lapack_int ldv2t,
10811                                 float* work, lapack_int lwork,
10812                                 lapack_int* iwork );
10813 lapack_int LAPACKE_sorcsd2by1( int matrix_layout, char jobu1, char jobu2,
10814                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10815                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10816                            float* theta, float* u1, lapack_int ldu1, float* u2,
10817                            lapack_int ldu2, float* v1t, lapack_int ldv1t);
10818 lapack_int LAPACKE_sorcsd2by1_work( int matrix_layout, char jobu1, char jobu2,
10819                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10820                            float* x11, lapack_int ldx11, float* x21, lapack_int ldx21,
10821                            float* theta, float* u1, lapack_int ldu1, float* u2,
10822                            lapack_int ldu2, float* v1t, lapack_int ldv1t,
10823                            float* work, lapack_int lwork, lapack_int* iwork );
10824 lapack_int LAPACKE_ssyconv( int matrix_layout, char uplo, char way, lapack_int n,
10825                             float* a, lapack_int lda, const lapack_int* ipiv, float* e );
10826 lapack_int LAPACKE_ssyconv_work( int matrix_layout, char uplo, char way,
10827                                  lapack_int n, float* a, lapack_int lda,
10828                                  const lapack_int* ipiv, float* e );
10829 lapack_int LAPACKE_ssyswapr( int matrix_layout, char uplo, lapack_int n,
10830                              float* a, lapack_int lda, lapack_int i1,
10831                              lapack_int i2 );
10832 lapack_int LAPACKE_ssyswapr_work( int matrix_layout, char uplo, lapack_int n,
10833                                   float* a, lapack_int lda, lapack_int i1,
10834                                   lapack_int i2 );
10835 lapack_int LAPACKE_ssytri2( int matrix_layout, char uplo, lapack_int n, float* a,
10836                             lapack_int lda, const lapack_int* ipiv );
10837 lapack_int LAPACKE_ssytri2_work( int matrix_layout, char uplo, lapack_int n,
10838                                  float* a, lapack_int lda,
10839                                  const lapack_int* ipiv,
10840                                  float* work, lapack_int lwork );
10841 lapack_int LAPACKE_ssytri2x( int matrix_layout, char uplo, lapack_int n,
10842                              float* a, lapack_int lda, const lapack_int* ipiv,
10843                              lapack_int nb );
10844 lapack_int LAPACKE_ssytri2x_work( int matrix_layout, char uplo, lapack_int n,
10845                                   float* a, lapack_int lda,
10846                                   const lapack_int* ipiv, float* work,
10847                                   lapack_int nb );
10848 lapack_int LAPACKE_ssytrs2( int matrix_layout, char uplo, lapack_int n,
10849                             lapack_int nrhs, const float* a, lapack_int lda,
10850                             const lapack_int* ipiv, float* b, lapack_int ldb );
10851 lapack_int LAPACKE_ssytrs2_work( int matrix_layout, char uplo, lapack_int n,
10852                                  lapack_int nrhs, const float* a,
10853                                  lapack_int lda, const lapack_int* ipiv,
10854                                  float* b, lapack_int ldb, float* work );
10855 lapack_int LAPACKE_zbbcsd( int matrix_layout, char jobu1, char jobu2,
10856                            char jobv1t, char jobv2t, char trans, lapack_int m,
10857                            lapack_int p, lapack_int q, double* theta,
10858                            double* phi, lapack_complex_double* u1,
10859                            lapack_int ldu1, lapack_complex_double* u2,
10860                            lapack_int ldu2, lapack_complex_double* v1t,
10861                            lapack_int ldv1t, lapack_complex_double* v2t,
10862                            lapack_int ldv2t, double* b11d, double* b11e,
10863                            double* b12d, double* b12e, double* b21d,
10864                            double* b21e, double* b22d, double* b22e );
10865 lapack_int LAPACKE_zbbcsd_work( int matrix_layout, char jobu1, char jobu2,
10866                                 char jobv1t, char jobv2t, char trans,
10867                                 lapack_int m, lapack_int p, lapack_int q,
10868                                 double* theta, double* phi,
10869                                 lapack_complex_double* u1, lapack_int ldu1,
10870                                 lapack_complex_double* u2, lapack_int ldu2,
10871                                 lapack_complex_double* v1t, lapack_int ldv1t,
10872                                 lapack_complex_double* v2t, lapack_int ldv2t,
10873                                 double* b11d, double* b11e, double* b12d,
10874                                 double* b12e, double* b21d, double* b21e,
10875                                 double* b22d, double* b22e, double* rwork,
10876                                 lapack_int lrwork );
10877 lapack_int LAPACKE_zheswapr( int matrix_layout, char uplo, lapack_int n,
10878                              lapack_complex_double* a, lapack_int lda,
10879                              lapack_int i1, lapack_int i2 );
10880 lapack_int LAPACKE_zheswapr_work( int matrix_layout, char uplo, lapack_int n,
10881                                   lapack_complex_double* a, lapack_int lda,
10882                                   lapack_int i1, lapack_int i2 );
10883 lapack_int LAPACKE_zhetri2( int matrix_layout, char uplo, lapack_int n,
10884                             lapack_complex_double* a, lapack_int lda,
10885                             const lapack_int* ipiv );
10886 lapack_int LAPACKE_zhetri2_work( int matrix_layout, char uplo, lapack_int n,
10887                                  lapack_complex_double* a, lapack_int lda,
10888                                  const lapack_int* ipiv,
10889                                  lapack_complex_double* work, lapack_int lwork );
10890 lapack_int LAPACKE_zhetri2x( int matrix_layout, char uplo, lapack_int n,
10891                              lapack_complex_double* a, lapack_int lda,
10892                              const lapack_int* ipiv, lapack_int nb );
10893 lapack_int LAPACKE_zhetri2x_work( int matrix_layout, char uplo, lapack_int n,
10894                                   lapack_complex_double* a, lapack_int lda,
10895                                   const lapack_int* ipiv,
10896                                   lapack_complex_double* work, lapack_int nb );
10897 lapack_int LAPACKE_zhetrs2( 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_int LAPACKE_zhetrs2_work( int matrix_layout, char uplo, lapack_int n,
10902                                  lapack_int nrhs, const lapack_complex_double* a,
10903                                  lapack_int lda, const lapack_int* ipiv,
10904                                  lapack_complex_double* b, lapack_int ldb,
10905                                  lapack_complex_double* work );
10906 lapack_int LAPACKE_zsyconv( int matrix_layout, char uplo, char way, lapack_int n,
10907                             lapack_complex_double* a, lapack_int lda,
10908                             const lapack_int* ipiv, lapack_complex_double* e );
10909 lapack_int LAPACKE_zsyconv_work( int matrix_layout, char uplo, char way,
10910                                  lapack_int n, lapack_complex_double* a,
10911                                  lapack_int lda, const lapack_int* ipiv,
10912                                  lapack_complex_double* e );
10913 lapack_int LAPACKE_zsyswapr( int matrix_layout, char uplo, lapack_int n,
10914                              lapack_complex_double* a, lapack_int lda,
10915                              lapack_int i1, lapack_int i2 );
10916 lapack_int LAPACKE_zsyswapr_work( int matrix_layout, char uplo, lapack_int n,
10917                                   lapack_complex_double* a, lapack_int lda,
10918                                   lapack_int i1, lapack_int i2 );
10919 lapack_int LAPACKE_zsytri2( int matrix_layout, char uplo, lapack_int n,
10920                             lapack_complex_double* a, lapack_int lda,
10921                             const lapack_int* ipiv );
10922 lapack_int LAPACKE_zsytri2_work( int matrix_layout, char uplo, lapack_int n,
10923                                  lapack_complex_double* a, lapack_int lda,
10924                                  const lapack_int* ipiv,
10925                                  lapack_complex_double* work, lapack_int lwork );
10926 lapack_int LAPACKE_zsytri2x( int matrix_layout, char uplo, lapack_int n,
10927                              lapack_complex_double* a, lapack_int lda,
10928                              const lapack_int* ipiv, lapack_int nb );
10929 lapack_int LAPACKE_zsytri2x_work( int matrix_layout, char uplo, lapack_int n,
10930                                   lapack_complex_double* a, lapack_int lda,
10931                                   const lapack_int* ipiv,
10932                                   lapack_complex_double* work, lapack_int nb );
10933 lapack_int LAPACKE_zsytrs2( 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_int LAPACKE_zsytrs2_work( int matrix_layout, char uplo, lapack_int n,
10938                                  lapack_int nrhs, const lapack_complex_double* a,
10939                                  lapack_int lda, const lapack_int* ipiv,
10940                                  lapack_complex_double* b, lapack_int ldb,
10941                                  lapack_complex_double* work );
10942 lapack_int LAPACKE_zunbdb( int matrix_layout, char trans, char signs,
10943                            lapack_int m, lapack_int p, lapack_int q,
10944                            lapack_complex_double* x11, lapack_int ldx11,
10945                            lapack_complex_double* x12, lapack_int ldx12,
10946                            lapack_complex_double* x21, lapack_int ldx21,
10947                            lapack_complex_double* x22, lapack_int ldx22,
10948                            double* theta, double* phi,
10949                            lapack_complex_double* taup1,
10950                            lapack_complex_double* taup2,
10951                            lapack_complex_double* tauq1,
10952                            lapack_complex_double* tauq2 );
10953 lapack_int LAPACKE_zunbdb_work( int matrix_layout, char trans, char signs,
10954                                 lapack_int m, lapack_int p, lapack_int q,
10955                                 lapack_complex_double* x11, lapack_int ldx11,
10956                                 lapack_complex_double* x12, lapack_int ldx12,
10957                                 lapack_complex_double* x21, lapack_int ldx21,
10958                                 lapack_complex_double* x22, lapack_int ldx22,
10959                                 double* theta, double* phi,
10960                                 lapack_complex_double* taup1,
10961                                 lapack_complex_double* taup2,
10962                                 lapack_complex_double* tauq1,
10963                                 lapack_complex_double* tauq2,
10964                                 lapack_complex_double* work, lapack_int lwork );
10965 lapack_int LAPACKE_zuncsd( int matrix_layout, char jobu1, char jobu2,
10966                            char jobv1t, char jobv2t, char trans, char signs,
10967                            lapack_int m, lapack_int p, lapack_int q,
10968                            lapack_complex_double* x11, lapack_int ldx11,
10969                            lapack_complex_double* x12, lapack_int ldx12,
10970                            lapack_complex_double* x21, lapack_int ldx21,
10971                            lapack_complex_double* x22, lapack_int ldx22,
10972                            double* theta, lapack_complex_double* u1,
10973                            lapack_int ldu1, lapack_complex_double* u2,
10974                            lapack_int ldu2, lapack_complex_double* v1t,
10975                            lapack_int ldv1t, lapack_complex_double* v2t,
10976                            lapack_int ldv2t );
10977 lapack_int LAPACKE_zuncsd_work( int matrix_layout, char jobu1, char jobu2,
10978                                 char jobv1t, char jobv2t, char trans,
10979                                 char signs, lapack_int m, lapack_int p,
10980                                 lapack_int q, lapack_complex_double* x11,
10981                                 lapack_int ldx11, lapack_complex_double* x12,
10982                                 lapack_int ldx12, lapack_complex_double* x21,
10983                                 lapack_int ldx21, lapack_complex_double* x22,
10984                                 lapack_int ldx22, double* theta,
10985                                 lapack_complex_double* u1, lapack_int ldu1,
10986                                 lapack_complex_double* u2, lapack_int ldu2,
10987                                 lapack_complex_double* v1t, lapack_int ldv1t,
10988                                 lapack_complex_double* v2t, lapack_int ldv2t,
10989                                 lapack_complex_double* work, lapack_int lwork,
10990                                 double* rwork, lapack_int lrwork,
10991                                 lapack_int* iwork );
10992 lapack_int LAPACKE_zuncsd2by1( int matrix_layout, char jobu1, char jobu2,
10993                            char jobv1t, lapack_int m, lapack_int p, lapack_int q,
10994                            lapack_complex_double* x11, lapack_int ldx11,
10995                            lapack_complex_double* x21, lapack_int ldx21,
10996                            double* theta, lapack_complex_double* u1,
10997                            lapack_int ldu1, lapack_complex_double* u2,
10998                            lapack_int ldu2, lapack_complex_double* v1t, lapack_int ldv1t );
10999 lapack_int LAPACKE_zuncsd2by1_work( int matrix_layout, char jobu1, char jobu2,
11000                                 char jobv1t, lapack_int m, lapack_int p,
11001                                 lapack_int q, lapack_complex_double* x11, lapack_int ldx11,
11002                                 lapack_complex_double* x21, lapack_int ldx21,
11003                                 double* theta, lapack_complex_double* u1,
11004                                 lapack_int ldu1, lapack_complex_double* u2,
11005                                 lapack_int ldu2, lapack_complex_double* v1t,
11006                                 lapack_int ldv1t, lapack_complex_double* work,
11007                                 lapack_int lwork, double* rwork, lapack_int lrwork,
11008                                 lapack_int* iwork );
11009
11010 //LAPACK 3.4.0
11011 lapack_int LAPACKE_sgemqrt( int matrix_layout, char side, char trans,
11012                             lapack_int m, lapack_int n, lapack_int k,
11013                             lapack_int nb, const float* v, lapack_int ldv,
11014                             const float* t, lapack_int ldt, float* c,
11015                             lapack_int ldc );
11016 lapack_int LAPACKE_dgemqrt( int matrix_layout, char side, char trans,
11017                             lapack_int m, lapack_int n, lapack_int k,
11018                             lapack_int nb, const double* v, lapack_int ldv,
11019                             const double* t, lapack_int ldt, double* c,
11020                             lapack_int ldc );
11021 lapack_int LAPACKE_cgemqrt( int matrix_layout, char side, char trans,
11022                             lapack_int m, lapack_int n, lapack_int k,
11023                             lapack_int nb, const lapack_complex_float* v,
11024                             lapack_int ldv, const lapack_complex_float* t,
11025                             lapack_int ldt, lapack_complex_float* c,
11026                             lapack_int ldc );
11027 lapack_int LAPACKE_zgemqrt( int matrix_layout, char side, char trans,
11028                             lapack_int m, lapack_int n, lapack_int k,
11029                             lapack_int nb, const lapack_complex_double* v,
11030                             lapack_int ldv, const lapack_complex_double* t,
11031                             lapack_int ldt, lapack_complex_double* c,
11032                             lapack_int ldc );
11033
11034 lapack_int LAPACKE_sgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11035                            lapack_int nb, float* a, lapack_int lda, float* t,
11036                            lapack_int ldt );
11037 lapack_int LAPACKE_dgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11038                            lapack_int nb, double* a, lapack_int lda, double* t,
11039                            lapack_int ldt );
11040 lapack_int LAPACKE_cgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11041                            lapack_int nb, lapack_complex_float* a,
11042                            lapack_int lda, lapack_complex_float* t,
11043                            lapack_int ldt );
11044 lapack_int LAPACKE_zgeqrt( int matrix_layout, lapack_int m, lapack_int n,
11045                            lapack_int nb, lapack_complex_double* a,
11046                            lapack_int lda, lapack_complex_double* t,
11047                            lapack_int ldt );
11048
11049 lapack_int LAPACKE_sgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11050                             float* a, lapack_int lda, float* t,
11051                             lapack_int ldt );
11052 lapack_int LAPACKE_dgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11053                             double* a, lapack_int lda, double* t,
11054                             lapack_int ldt );
11055 lapack_int LAPACKE_cgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11056                             lapack_complex_float* a, lapack_int lda,
11057                             lapack_complex_float* t, lapack_int ldt );
11058 lapack_int LAPACKE_zgeqrt2( int matrix_layout, lapack_int m, lapack_int n,
11059                             lapack_complex_double* a, lapack_int lda,
11060                             lapack_complex_double* t, lapack_int ldt );
11061
11062 lapack_int LAPACKE_sgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11063                             float* a, lapack_int lda, float* t,
11064                             lapack_int ldt );
11065 lapack_int LAPACKE_dgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11066                             double* a, lapack_int lda, double* t,
11067                             lapack_int ldt );
11068 lapack_int LAPACKE_cgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11069                             lapack_complex_float* a, lapack_int lda,
11070                             lapack_complex_float* t, lapack_int ldt );
11071 lapack_int LAPACKE_zgeqrt3( int matrix_layout, lapack_int m, lapack_int n,
11072                             lapack_complex_double* a, lapack_int lda,
11073                             lapack_complex_double* t, lapack_int ldt );
11074
11075 lapack_int LAPACKE_stpmqrt( int matrix_layout, char side, char trans,
11076                             lapack_int m, lapack_int n, lapack_int k,
11077                             lapack_int l, lapack_int nb, const float* v,
11078                             lapack_int ldv, const float* t, lapack_int ldt,
11079                             float* a, lapack_int lda, float* b,
11080                             lapack_int ldb );
11081 lapack_int LAPACKE_dtpmqrt( int matrix_layout, char side, char trans,
11082                             lapack_int m, lapack_int n, lapack_int k,
11083                             lapack_int l, lapack_int nb, const double* v,
11084                             lapack_int ldv, const double* t, lapack_int ldt,
11085                             double* a, lapack_int lda, double* b,
11086                             lapack_int ldb );
11087 lapack_int LAPACKE_ctpmqrt( int matrix_layout, char side, char trans,
11088                             lapack_int m, lapack_int n, lapack_int k,
11089                             lapack_int l, lapack_int nb,
11090                             const lapack_complex_float* v, lapack_int ldv,
11091                             const lapack_complex_float* t, lapack_int ldt,
11092                             lapack_complex_float* a, lapack_int lda,
11093                             lapack_complex_float* b, lapack_int ldb );
11094 lapack_int LAPACKE_ztpmqrt( int matrix_layout, char side, char trans,
11095                             lapack_int m, lapack_int n, lapack_int k,
11096                             lapack_int l, lapack_int nb,
11097                             const lapack_complex_double* v, lapack_int ldv,
11098                             const lapack_complex_double* t, lapack_int ldt,
11099                             lapack_complex_double* a, lapack_int lda,
11100                             lapack_complex_double* b, lapack_int ldb );
11101
11102 lapack_int LAPACKE_stpqrt( int matrix_layout, lapack_int m, lapack_int n,
11103                            lapack_int l, lapack_int nb, float* a,
11104                            lapack_int lda, float* b, lapack_int ldb, float* t,
11105                            lapack_int ldt );
11106
11107 lapack_int LAPACKE_dtpqrt( int matrix_layout, lapack_int m, lapack_int n,
11108                            lapack_int l, lapack_int nb, double* a,
11109                            lapack_int lda, double* b, lapack_int ldb, double* t,
11110                            lapack_int ldt );
11111 lapack_int LAPACKE_ctpqrt( int matrix_layout, lapack_int m, lapack_int n,
11112                            lapack_int l, lapack_int nb,
11113                            lapack_complex_float* a, lapack_int lda,
11114                            lapack_complex_float* b, lapack_int ldb,
11115                            lapack_complex_float* t, lapack_int ldt );
11116 lapack_int LAPACKE_ztpqrt( int matrix_layout, lapack_int m, lapack_int n,
11117                            lapack_int l, lapack_int nb,
11118                            lapack_complex_double* a, lapack_int lda,
11119                            lapack_complex_double* b, lapack_int ldb,
11120                            lapack_complex_double* t, lapack_int ldt );
11121
11122 lapack_int LAPACKE_stpqrt2( int matrix_layout,
11123                             lapack_int m, lapack_int n, lapack_int l,
11124                             float* a, lapack_int lda,
11125                             float* b, lapack_int ldb,
11126                             float* t, lapack_int ldt );
11127 lapack_int LAPACKE_dtpqrt2( int matrix_layout,
11128                             lapack_int m, lapack_int n, lapack_int l,
11129                             double* a, lapack_int lda,
11130                             double* b, lapack_int ldb,
11131                             double* t, lapack_int ldt );
11132 lapack_int LAPACKE_ctpqrt2( int matrix_layout,
11133                             lapack_int m, lapack_int n, lapack_int l,
11134                             lapack_complex_float* a, lapack_int lda,
11135                             lapack_complex_float* b, lapack_int ldb,
11136                             lapack_complex_float* t, lapack_int ldt );
11137 lapack_int LAPACKE_ztpqrt2( int matrix_layout,
11138                             lapack_int m, lapack_int n, lapack_int l,
11139                             lapack_complex_double* a, lapack_int lda,
11140                             lapack_complex_double* b, lapack_int ldb,
11141                             lapack_complex_double* t, lapack_int ldt );
11142
11143 lapack_int LAPACKE_stprfb( int matrix_layout, char side, char trans, char direct,
11144                            char storev, lapack_int m, lapack_int n,
11145                            lapack_int k, lapack_int l, const float* v,
11146                            lapack_int ldv, const float* t, lapack_int ldt,
11147                            float* a, lapack_int lda, float* b, lapack_int ldb );
11148 lapack_int LAPACKE_dtprfb( int matrix_layout, char side, char trans, char direct,
11149                            char storev, lapack_int m, lapack_int n,
11150                            lapack_int k, lapack_int l, const double* v,
11151                            lapack_int ldv, const double* t, lapack_int ldt,
11152                            double* a, lapack_int lda, double* b, lapack_int ldb );
11153 lapack_int LAPACKE_ctprfb( int matrix_layout, char side, char trans, char direct,
11154                            char storev, lapack_int m, lapack_int n,
11155                            lapack_int k, lapack_int l,
11156                            const lapack_complex_float* v, lapack_int ldv,
11157                            const lapack_complex_float* t, lapack_int ldt,
11158                            lapack_complex_float* a, lapack_int lda,
11159                            lapack_complex_float* b, lapack_int ldb );
11160 lapack_int LAPACKE_ztprfb( int matrix_layout, char side, char trans, char direct,
11161                            char storev, lapack_int m, lapack_int n,
11162                            lapack_int k, lapack_int l,
11163                            const lapack_complex_double* v, lapack_int ldv,
11164                            const lapack_complex_double* t, lapack_int ldt,
11165                            lapack_complex_double* a, lapack_int lda,
11166                            lapack_complex_double* b, lapack_int ldb );
11167
11168 lapack_int LAPACKE_sgemqrt_work( int matrix_layout, char side, char trans,
11169                                  lapack_int m, lapack_int n, lapack_int k,
11170                                  lapack_int nb, const float* v, lapack_int ldv,
11171                                  const float* t, lapack_int ldt, float* c,
11172                                  lapack_int ldc, float* work );
11173 lapack_int LAPACKE_dgemqrt_work( int matrix_layout, char side, char trans,
11174                                  lapack_int m, lapack_int n, lapack_int k,
11175                                  lapack_int nb, const double* v, lapack_int ldv,
11176                                  const double* t, lapack_int ldt, double* c,
11177                                  lapack_int ldc, double* work );
11178 lapack_int LAPACKE_cgemqrt_work( int matrix_layout, char side, char trans,
11179                                  lapack_int m, lapack_int n, lapack_int k,
11180                                  lapack_int nb, const lapack_complex_float* v,
11181                                  lapack_int ldv, const lapack_complex_float* t,
11182                                  lapack_int ldt, lapack_complex_float* c,
11183                                  lapack_int ldc, lapack_complex_float* work );
11184 lapack_int LAPACKE_zgemqrt_work( int matrix_layout, char side, char trans,
11185                                  lapack_int m, lapack_int n, lapack_int k,
11186                                  lapack_int nb, const lapack_complex_double* v,
11187                                  lapack_int ldv, const lapack_complex_double* t,
11188                                  lapack_int ldt, lapack_complex_double* c,
11189                                  lapack_int ldc, lapack_complex_double* work );
11190
11191 lapack_int LAPACKE_sgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11192                                 lapack_int nb, float* a, lapack_int lda,
11193                                 float* t, lapack_int ldt, float* work );
11194 lapack_int LAPACKE_dgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11195                                 lapack_int nb, double* a, lapack_int lda,
11196                                 double* t, lapack_int ldt, double* work );
11197 lapack_int LAPACKE_cgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11198                                 lapack_int nb, lapack_complex_float* a,
11199                                 lapack_int lda, lapack_complex_float* t,
11200                                 lapack_int ldt, lapack_complex_float* work );
11201 lapack_int LAPACKE_zgeqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11202                                 lapack_int nb, lapack_complex_double* a,
11203                                 lapack_int lda, lapack_complex_double* t,
11204                                 lapack_int ldt, lapack_complex_double* work );
11205
11206 lapack_int LAPACKE_sgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11207                                  float* a, lapack_int lda, float* t,
11208                                  lapack_int ldt );
11209 lapack_int LAPACKE_dgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11210                                  double* a, lapack_int lda, double* t,
11211                                  lapack_int ldt );
11212 lapack_int LAPACKE_cgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11213                                  lapack_complex_float* a, lapack_int lda,
11214                                  lapack_complex_float* t, lapack_int ldt );
11215 lapack_int LAPACKE_zgeqrt2_work( int matrix_layout, lapack_int m, lapack_int n,
11216                                  lapack_complex_double* a, lapack_int lda,
11217                                  lapack_complex_double* t, lapack_int ldt );
11218
11219 lapack_int LAPACKE_sgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11220                                  float* a, lapack_int lda, float* t,
11221                                  lapack_int ldt );
11222 lapack_int LAPACKE_dgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11223                                  double* a, lapack_int lda, double* t,
11224                                  lapack_int ldt );
11225 lapack_int LAPACKE_cgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11226                                  lapack_complex_float* a, lapack_int lda,
11227                                  lapack_complex_float* t, lapack_int ldt );
11228 lapack_int LAPACKE_zgeqrt3_work( int matrix_layout, lapack_int m, lapack_int n,
11229                                  lapack_complex_double* a, lapack_int lda,
11230                                  lapack_complex_double* t, lapack_int ldt );
11231
11232 lapack_int LAPACKE_stpmqrt_work( int matrix_layout, char side, char trans,
11233                                  lapack_int m, lapack_int n, lapack_int k,
11234                                  lapack_int l, lapack_int nb, const float* v,
11235                                  lapack_int ldv, const float* t, lapack_int ldt,
11236                                  float* a, lapack_int lda, float* b,
11237                                  lapack_int ldb, float* work );
11238 lapack_int LAPACKE_dtpmqrt_work( int matrix_layout, char side, char trans,
11239                                  lapack_int m, lapack_int n, lapack_int k,
11240                                  lapack_int l, lapack_int nb, const double* v,
11241                                  lapack_int ldv, const double* t,
11242                                  lapack_int ldt, double* a, lapack_int lda,
11243                                  double* b, lapack_int ldb, double* work );
11244 lapack_int LAPACKE_ctpmqrt_work( int matrix_layout, char side, char trans,
11245                                  lapack_int m, lapack_int n, lapack_int k,
11246                                  lapack_int l, lapack_int nb,
11247                                  const lapack_complex_float* v, lapack_int ldv,
11248                                  const lapack_complex_float* t, lapack_int ldt,
11249                                  lapack_complex_float* a, lapack_int lda,
11250                                  lapack_complex_float* b, lapack_int ldb,
11251                                  lapack_complex_float* work );
11252 lapack_int LAPACKE_ztpmqrt_work( int matrix_layout, char side, char trans,
11253                                  lapack_int m, lapack_int n, lapack_int k,
11254                                  lapack_int l, lapack_int nb,
11255                                  const lapack_complex_double* v, lapack_int ldv,
11256                                  const lapack_complex_double* t, lapack_int ldt,
11257                                  lapack_complex_double* a, lapack_int lda,
11258                                  lapack_complex_double* b, lapack_int ldb,
11259                                  lapack_complex_double* work );
11260
11261 lapack_int LAPACKE_stpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11262                                 lapack_int l, lapack_int nb, float* a,
11263                                 lapack_int lda, float* b, lapack_int ldb,
11264                                 float* t, lapack_int ldt, float* work );
11265 lapack_int LAPACKE_dtpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11266                                 lapack_int l, lapack_int nb, double* a,
11267                                 lapack_int lda, double* b, lapack_int ldb,
11268                                 double* t, lapack_int ldt, double* work );
11269 lapack_int LAPACKE_ctpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11270                                 lapack_int l, lapack_int nb,
11271                                 lapack_complex_float* a, lapack_int lda,
11272                                 lapack_complex_float* b, lapack_int ldb,
11273                                 lapack_complex_float* t, lapack_int ldt,
11274                                 lapack_complex_float* work );
11275 lapack_int LAPACKE_ztpqrt_work( int matrix_layout, lapack_int m, lapack_int n,
11276                                 lapack_int l, lapack_int nb,
11277                                 lapack_complex_double* a, lapack_int lda,
11278                                 lapack_complex_double* b, lapack_int ldb,
11279                                 lapack_complex_double* t, lapack_int ldt,
11280                                 lapack_complex_double* work );
11281
11282 lapack_int LAPACKE_stpqrt2_work( int matrix_layout,
11283                                  lapack_int m, lapack_int n, lapack_int l,
11284                                  float* a, lapack_int lda,
11285                                  float* b, lapack_int ldb,
11286                                  float* t, lapack_int ldt );
11287 lapack_int LAPACKE_dtpqrt2_work( int matrix_layout,
11288                                  lapack_int m, lapack_int n, lapack_int l,
11289                                  double* a, lapack_int lda,
11290                                  double* b, lapack_int ldb,
11291                                  double* t, lapack_int ldt );
11292 lapack_int LAPACKE_ctpqrt2_work( int matrix_layout,
11293                                  lapack_int m, lapack_int n, lapack_int l,
11294                                  lapack_complex_float* a, lapack_int lda,
11295                                  lapack_complex_float* b, lapack_int ldb,
11296                                  lapack_complex_float* t, lapack_int ldt );
11297 lapack_int LAPACKE_ztpqrt2_work( int matrix_layout,
11298                                  lapack_int m, lapack_int n, lapack_int l,
11299                                  lapack_complex_double* a, lapack_int lda,
11300                                  lapack_complex_double* b, lapack_int ldb,
11301                                  lapack_complex_double* t, lapack_int ldt );
11302
11303 lapack_int LAPACKE_stprfb_work( int matrix_layout, char side, char trans,
11304                                 char direct, char storev, lapack_int m,
11305                                 lapack_int n, lapack_int k, lapack_int l,
11306                                 const float* v, lapack_int ldv, const float* t,
11307                                 lapack_int ldt, float* a, lapack_int lda,
11308                                 float* b, lapack_int ldb, float* work,
11309                                 lapack_int ldwork );
11310 lapack_int LAPACKE_dtprfb_work( int matrix_layout, char side, char trans,
11311                                 char direct, char storev, lapack_int m,
11312                                 lapack_int n, lapack_int k, lapack_int l,
11313                                 const double* v, lapack_int ldv,
11314                                 const double* t, lapack_int ldt, double* a,
11315                                 lapack_int lda, double* b, lapack_int ldb,
11316                                 double* work, lapack_int ldwork );
11317 lapack_int LAPACKE_ctprfb_work( int matrix_layout, char side, char trans,
11318                                 char direct, char storev, lapack_int m,
11319                                 lapack_int n, lapack_int k, lapack_int l,
11320                                 const lapack_complex_float* v, lapack_int ldv,
11321                                 const lapack_complex_float* t, lapack_int ldt,
11322                                 lapack_complex_float* a, lapack_int lda,
11323                                 lapack_complex_float* b, lapack_int ldb,
11324                                 lapack_complex_float* work, lapack_int ldwork );
11325 lapack_int LAPACKE_ztprfb_work( int matrix_layout, char side, char trans,
11326                                 char direct, char storev, lapack_int m,
11327                                 lapack_int n, lapack_int k, lapack_int l,
11328                                 const lapack_complex_double* v, lapack_int ldv,
11329                                 const lapack_complex_double* t, lapack_int ldt,
11330                                 lapack_complex_double* a, lapack_int lda,
11331                                 lapack_complex_double* b, lapack_int ldb,
11332                                 lapack_complex_double* work, lapack_int ldwork );
11333 //LAPACK 3.X.X
11334 lapack_int LAPACKE_ssysv_rook( int matrix_layout, char uplo, lapack_int n,
11335                                lapack_int nrhs, float* a, lapack_int lda,
11336                                lapack_int* ipiv, float* b, lapack_int ldb );
11337 lapack_int LAPACKE_dsysv_rook( int matrix_layout, char uplo, lapack_int n,
11338                                lapack_int nrhs, double* a, lapack_int lda,
11339                                lapack_int* ipiv, double* b, lapack_int ldb );
11340 lapack_int LAPACKE_csysv_rook( int matrix_layout, char uplo, lapack_int n,
11341                                lapack_int nrhs, lapack_complex_float* a,
11342                                lapack_int lda, lapack_int* ipiv,
11343                                lapack_complex_float* b, lapack_int ldb );
11344 lapack_int LAPACKE_zsysv_rook( int matrix_layout, char uplo, lapack_int n,
11345                                lapack_int nrhs, lapack_complex_double* a,
11346                                lapack_int lda, lapack_int* ipiv,
11347                                lapack_complex_double* b, lapack_int ldb );
11348
11349 lapack_int LAPACKE_ssytrf_rook( int matrix_layout, char uplo, lapack_int n, float* a,
11350                            lapack_int lda, lapack_int* ipiv );
11351 lapack_int LAPACKE_dsytrf_rook( int matrix_layout, char uplo, lapack_int n, double* a,
11352                            lapack_int lda, lapack_int* ipiv );
11353 lapack_int LAPACKE_csytrf_rook( int matrix_layout, char uplo, lapack_int n,
11354                            lapack_complex_float* a, lapack_int lda,
11355                            lapack_int* ipiv );
11356 lapack_int LAPACKE_zsytrf_rook( int matrix_layout, char uplo, lapack_int n,
11357                            lapack_complex_double* a, lapack_int lda,
11358                            lapack_int* ipiv );
11359
11360 lapack_int LAPACKE_ssytrs_rook( int matrix_layout, char uplo, lapack_int n,
11361                            lapack_int nrhs, const float* a, lapack_int lda,
11362                            const lapack_int* ipiv, float* b, lapack_int ldb );
11363 lapack_int LAPACKE_dsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11364                            lapack_int nrhs, const double* a, lapack_int lda,
11365                            const lapack_int* ipiv, double* b, lapack_int ldb );
11366 lapack_int LAPACKE_csytrs_rook( int matrix_layout, char uplo, lapack_int n,
11367                            lapack_int nrhs, const lapack_complex_float* a,
11368                            lapack_int lda, const lapack_int* ipiv,
11369                            lapack_complex_float* b, lapack_int ldb );
11370 lapack_int LAPACKE_zsytrs_rook( int matrix_layout, char uplo, lapack_int n,
11371                            lapack_int nrhs, const lapack_complex_double* a,
11372                            lapack_int lda, const lapack_int* ipiv,
11373                            lapack_complex_double* b, lapack_int ldb );
11374
11375 lapack_int LAPACKE_chetrf_rook( int matrix_layout, char uplo, lapack_int n,
11376                            lapack_complex_float* a, lapack_int lda,
11377                            lapack_int* ipiv );
11378 lapack_int LAPACKE_zhetrf_rook( int matrix_layout, char uplo, lapack_int n,
11379                            lapack_complex_double* a, lapack_int lda,
11380                            lapack_int* ipiv );
11381
11382 lapack_int LAPACKE_chetrs_rook( int matrix_layout, char uplo, lapack_int n,
11383                            lapack_int nrhs, const lapack_complex_float* a,
11384                            lapack_int lda, const lapack_int* ipiv,
11385                            lapack_complex_float* b, lapack_int ldb );
11386 lapack_int LAPACKE_zhetrs_rook( int matrix_layout, char uplo, lapack_int n,
11387                            lapack_int nrhs, const lapack_complex_double* a,
11388                            lapack_int lda, const lapack_int* ipiv,
11389                            lapack_complex_double* b, lapack_int ldb );
11390
11391 lapack_int LAPACKE_csyr( int matrix_layout, char uplo, lapack_int n,
11392                              lapack_complex_float alpha,
11393                              const lapack_complex_float* x, lapack_int incx,
11394                              lapack_complex_float* a, lapack_int lda );
11395 lapack_int LAPACKE_zsyr( int matrix_layout, char uplo, lapack_int n,
11396                              lapack_complex_double alpha,
11397                              const lapack_complex_double* x, lapack_int incx,
11398                              lapack_complex_double* a, lapack_int lda );
11399
11400 lapack_int LAPACKE_ssysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11401                                     lapack_int nrhs, float* a, lapack_int lda,
11402                                     lapack_int* ipiv, float* b, lapack_int ldb,
11403                                     float* work, lapack_int lwork );
11404 lapack_int LAPACKE_dsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11405                                     lapack_int nrhs, double* a, lapack_int lda,
11406                                     lapack_int* ipiv, double* b, lapack_int ldb,
11407                                     double* work, lapack_int lwork );
11408 lapack_int LAPACKE_csysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11409                                     lapack_int nrhs, lapack_complex_float* a,
11410                                     lapack_int lda, lapack_int* ipiv,
11411                                     lapack_complex_float* b, lapack_int ldb,
11412                                     lapack_complex_float* work,
11413                                     lapack_int lwork );
11414 lapack_int LAPACKE_zsysv_rook_work( int matrix_layout, char uplo, lapack_int n,
11415                                     lapack_int nrhs, lapack_complex_double* a,
11416                                     lapack_int lda, lapack_int* ipiv,
11417                                     lapack_complex_double* b, lapack_int ldb,
11418                                     lapack_complex_double* work,
11419                                     lapack_int lwork );
11420
11421 lapack_int LAPACKE_ssytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11422                                 float* a, lapack_int lda, lapack_int* ipiv,
11423                                 float* work, lapack_int lwork );
11424 lapack_int LAPACKE_dsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11425                                 double* a, lapack_int lda, lapack_int* ipiv,
11426                                 double* work, lapack_int lwork );
11427 lapack_int LAPACKE_csytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11428                                 lapack_complex_float* a, lapack_int lda,
11429                                 lapack_int* ipiv, lapack_complex_float* work,
11430                                 lapack_int lwork );
11431 lapack_int LAPACKE_zsytrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11432                                 lapack_complex_double* a, lapack_int lda,
11433                                 lapack_int* ipiv, lapack_complex_double* work,
11434                                 lapack_int lwork );
11435
11436 lapack_int LAPACKE_ssytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11437                                 lapack_int nrhs, const float* a, lapack_int lda,
11438                                 const lapack_int* ipiv, float* b,
11439                                 lapack_int ldb );
11440 lapack_int LAPACKE_dsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11441                                 lapack_int nrhs, const double* a,
11442                                 lapack_int lda, const lapack_int* ipiv,
11443                                 double* b, lapack_int ldb );
11444 lapack_int LAPACKE_csytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11445                                 lapack_int nrhs, const lapack_complex_float* a,
11446                                 lapack_int lda, const lapack_int* ipiv,
11447                                 lapack_complex_float* b, lapack_int ldb );
11448 lapack_int LAPACKE_zsytrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11449                                 lapack_int nrhs, const lapack_complex_double* a,
11450                                 lapack_int lda, const lapack_int* ipiv,
11451                                 lapack_complex_double* b, lapack_int ldb );
11452
11453 lapack_int LAPACKE_chetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11454                                 lapack_complex_float* a, lapack_int lda,
11455                                 lapack_int* ipiv, lapack_complex_float* work,
11456                                 lapack_int lwork );
11457 lapack_int LAPACKE_zhetrf_rook_work( int matrix_layout, char uplo, lapack_int n,
11458                                 lapack_complex_double* a, lapack_int lda,
11459                                 lapack_int* ipiv, lapack_complex_double* work,
11460                                 lapack_int lwork );
11461
11462 lapack_int LAPACKE_chetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11463                                 lapack_int nrhs, const lapack_complex_float* a,
11464                                 lapack_int lda, const lapack_int* ipiv,
11465                                 lapack_complex_float* b, lapack_int ldb );
11466 lapack_int LAPACKE_zhetrs_rook_work( int matrix_layout, char uplo, lapack_int n,
11467                                 lapack_int nrhs, const lapack_complex_double* a,
11468                                 lapack_int lda, const lapack_int* ipiv,
11469                                 lapack_complex_double* b, lapack_int ldb );
11470
11471
11472 lapack_int LAPACKE_csyr_work( int matrix_layout, char uplo, lapack_int n,
11473                                   lapack_complex_float alpha,
11474                                   const lapack_complex_float* x,
11475                                   lapack_int incx, lapack_complex_float* a,
11476                                   lapack_int lda );
11477 lapack_int LAPACKE_zsyr_work( int matrix_layout, char uplo, lapack_int n,
11478                                   lapack_complex_double alpha,
11479                                   const lapack_complex_double* x,
11480                                   lapack_int incx, lapack_complex_double* a,
11481                                   lapack_int lda );
11482 void LAPACKE_ilaver( lapack_int* vers_major,
11483                      lapack_int* vers_minor,
11484                      lapack_int* vers_patch );
11485 // LAPACK 3.7.0
11486 lapack_int LAPACKE_ssysv_aa( int matrix_layout, char uplo, lapack_int n,
11487                           lapack_int nrhs, float* a, lapack_int lda,
11488                           lapack_int* ipiv, float* b, lapack_int ldb );
11489 lapack_int LAPACKE_ssysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11490                                lapack_int nrhs, float* a, lapack_int lda,
11491                                lapack_int* ipiv, float* b, lapack_int ldb,
11492                                float* work, lapack_int lwork );
11493 lapack_int LAPACKE_dsysv_aa( int matrix_layout, char uplo, lapack_int n,
11494                           lapack_int nrhs, double* a, lapack_int lda,
11495                           lapack_int* ipiv, double* b, lapack_int ldb );
11496 lapack_int LAPACKE_dsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11497                                lapack_int nrhs, double* a, lapack_int lda,
11498                                lapack_int* ipiv, double* b, lapack_int ldb,
11499                                double* work, lapack_int lwork );
11500 lapack_int LAPACKE_csysv_aa( 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_int LAPACKE_csysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11505                                lapack_int nrhs, lapack_complex_float* a,
11506                                lapack_int lda, lapack_int* ipiv,
11507                                lapack_complex_float* b, lapack_int ldb,
11508                                lapack_complex_float* work, lapack_int lwork );
11509 lapack_int LAPACKE_zsysv_aa( 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_int LAPACKE_zsysv_aa_work( int matrix_layout, char uplo, lapack_int n,
11514                                lapack_int nrhs, lapack_complex_double* a,
11515                                lapack_int lda, lapack_int* ipiv,
11516                                lapack_complex_double* b, lapack_int ldb,
11517                                lapack_complex_double* work, lapack_int lwork );
11518 lapack_int LAPACKE_chesv_aa( 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_int LAPACKE_chesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11523                                lapack_int nrhs, lapack_complex_float* a,
11524                                lapack_int lda, lapack_int* ipiv,
11525                                lapack_complex_float* b, lapack_int ldb,
11526                                lapack_complex_float* work, lapack_int lwork );
11527 lapack_int LAPACKE_zhesv_aa( 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_int LAPACKE_zhesv_aa_work( int matrix_layout, char uplo, lapack_int n,
11532                                lapack_int nrhs, lapack_complex_double* a,
11533                                lapack_int lda, lapack_int* ipiv,
11534                                lapack_complex_double* b, lapack_int ldb,
11535                                lapack_complex_double* work, lapack_int lwork );
11536
11537 lapack_int LAPACKE_ssytrf_aa( int matrix_layout, char uplo, lapack_int n, float* a,
11538                            lapack_int lda, lapack_int* ipiv );
11539 lapack_int LAPACKE_dsytrf_aa( int matrix_layout, char uplo, lapack_int n, double* a,
11540                            lapack_int lda, lapack_int* ipiv );
11541 lapack_int LAPACKE_csytrf_aa( int matrix_layout, char uplo, lapack_int n,
11542                            lapack_complex_float* a, lapack_int lda,
11543                            lapack_int* ipiv );
11544 lapack_int LAPACKE_zsytrf_aa( int matrix_layout, char uplo, lapack_int n,
11545                            lapack_complex_double* a, lapack_int lda,
11546                            lapack_int* ipiv );
11547 lapack_int LAPACKE_chetrf_aa( int matrix_layout, char uplo, lapack_int n,
11548                            lapack_complex_float* a, lapack_int lda,
11549                            lapack_int* ipiv );
11550 lapack_int LAPACKE_zhetrf_aa( int matrix_layout, char uplo, lapack_int n,
11551                            lapack_complex_double* a, lapack_int lda,
11552                            lapack_int* ipiv );
11553
11554 lapack_int LAPACKE_ssytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11555                                 float* a, lapack_int lda, lapack_int* ipiv,
11556                                 float* work, lapack_int lwork );
11557 lapack_int LAPACKE_dsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11558                                 double* a, lapack_int lda, lapack_int* ipiv,
11559                                 double* work, lapack_int lwork );
11560 lapack_int LAPACKE_csytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11561                                 lapack_complex_float* a, lapack_int lda,
11562                                 lapack_int* ipiv, lapack_complex_float* work,
11563                                 lapack_int lwork );
11564 lapack_int LAPACKE_zsytrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11565                                 lapack_complex_double* a, lapack_int lda,
11566                                 lapack_int* ipiv, lapack_complex_double* work,
11567                                 lapack_int lwork );
11568 lapack_int LAPACKE_chetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11569                                 lapack_complex_float* a, lapack_int lda,
11570                                 lapack_int* ipiv, lapack_complex_float* work,
11571                                 lapack_int lwork );
11572 lapack_int LAPACKE_zhetrf_aa_work( int matrix_layout, char uplo, lapack_int n,
11573                                 lapack_complex_double* a, lapack_int lda,
11574                                 lapack_int* ipiv, lapack_complex_double* work,
11575                                 lapack_int lwork );
11576
11577
11578 lapack_int LAPACKE_csytrs_aa( 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_int LAPACKE_csytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11583                                  lapack_int nrhs, const lapack_complex_float* a,
11584                                  lapack_int lda, const lapack_int* ipiv,
11585                                  lapack_complex_float* b, lapack_int ldb,
11586                                  lapack_complex_float* work, lapack_int lwork );
11587 lapack_int LAPACKE_chetrs_aa( 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_int LAPACKE_chetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11592                                  lapack_int nrhs, const lapack_complex_float* a,
11593                                  lapack_int lda, const lapack_int* ipiv,
11594                                  lapack_complex_float* b, lapack_int ldb,
11595                                  lapack_complex_float* work, lapack_int lwork );
11596 lapack_int LAPACKE_dsytrs_aa( int matrix_layout, char uplo, lapack_int n,
11597                             lapack_int nrhs, const double* a, lapack_int lda,
11598                             const lapack_int* ipiv, double* b, lapack_int ldb );
11599 lapack_int LAPACKE_dsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11600                                  lapack_int nrhs, const double* a,
11601                                  lapack_int lda, const lapack_int* ipiv,
11602                                  double* b, lapack_int ldb, double* work, lapack_int lwork );
11603 lapack_int LAPACKE_ssytrs_aa( int matrix_layout, char uplo, lapack_int n,
11604                            lapack_int nrhs, const float* a, lapack_int lda,
11605                            const lapack_int* ipiv, float* b, lapack_int ldb );
11606 lapack_int LAPACKE_ssytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11607                                 lapack_int nrhs, const float* a, lapack_int lda,
11608                                 const lapack_int* ipiv, float* b,
11609                                 lapack_int ldb, float* work, lapack_int lwork );
11610 lapack_int LAPACKE_zsytrs_aa( 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_int LAPACKE_zsytrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11615                                  lapack_int nrhs, const lapack_complex_double* a,
11616                                  lapack_int lda, const lapack_int* ipiv,
11617                                  lapack_complex_double* b, lapack_int ldb,
11618                                  lapack_complex_double* work,  lapack_int lwork);
11619 lapack_int LAPACKE_zhetrs_aa( 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_int LAPACKE_zhetrs_aa_work( int matrix_layout, char uplo, lapack_int n,
11624                                  lapack_int nrhs, const lapack_complex_double* a,
11625                                  lapack_int lda, const lapack_int* ipiv,
11626                                  lapack_complex_double* b, lapack_int ldb,
11627                                  lapack_complex_double* work,  lapack_int lwork);
11628
11629
11630 lapack_int LAPACKE_ssysv_rk( int matrix_layout, char uplo, lapack_int n,
11631                           lapack_int nrhs, float* a, lapack_int lda,
11632                           float* e, lapack_int* ipiv, float* b, lapack_int ldb );
11633 lapack_int LAPACKE_ssysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11634                                lapack_int nrhs, float* a, lapack_int lda,
11635                                float* e, lapack_int* ipiv, float* b, lapack_int ldb,
11636                                float* work, lapack_int lwork );
11637 lapack_int LAPACKE_dsysv_rk( int matrix_layout, char uplo, lapack_int n,
11638                           lapack_int nrhs, double* a, lapack_int lda,
11639                           double* e, lapack_int* ipiv, double* b, lapack_int ldb );
11640 lapack_int LAPACKE_dsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11641                                lapack_int nrhs, double* a, lapack_int lda,
11642                                double* e, lapack_int* ipiv, double* b, lapack_int ldb,
11643                                double* work, lapack_int lwork );
11644 lapack_int LAPACKE_csysv_rk( 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_int LAPACKE_csysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11649                                lapack_int nrhs, lapack_complex_float* a,
11650                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11651                                lapack_complex_float* b, lapack_int ldb,
11652                                lapack_complex_float* work, lapack_int lwork );
11653 lapack_int LAPACKE_zsysv_rk( 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_int LAPACKE_zsysv_rk_work( int matrix_layout, char uplo, lapack_int n,
11658                                lapack_int nrhs, lapack_complex_double* a,
11659                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11660                                lapack_complex_double* b, lapack_int ldb,
11661                                lapack_complex_double* work, lapack_int lwork );
11662 lapack_int LAPACKE_chesv_rk( 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_int LAPACKE_chesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11667                                lapack_int nrhs, lapack_complex_float* a,
11668                                lapack_int lda, lapack_complex_float* e, lapack_int* ipiv,
11669                                lapack_complex_float* b, lapack_int ldb,
11670                                lapack_complex_float* work, lapack_int lwork );
11671 lapack_int LAPACKE_zhesv_rk( 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_int LAPACKE_zhesv_rk_work( int matrix_layout, char uplo, lapack_int n,
11676                                lapack_int nrhs, lapack_complex_double* a,
11677                                lapack_int lda, lapack_complex_double* e, lapack_int* ipiv,
11678                                lapack_complex_double* b, lapack_int ldb,
11679                                lapack_complex_double* work, lapack_int lwork );
11680
11681 lapack_int LAPACKE_ssytrf_rk( int matrix_layout, char uplo, lapack_int n, float* a,
11682                            lapack_int lda, float* e, lapack_int* ipiv );
11683 lapack_int LAPACKE_dsytrf_rk( int matrix_layout, char uplo, lapack_int n, double* a,
11684                            lapack_int lda, double* e, lapack_int* ipiv );
11685 lapack_int LAPACKE_csytrf_rk( int matrix_layout, char uplo, lapack_int n,
11686                            lapack_complex_float* a, lapack_int lda,
11687                            lapack_complex_float* e, lapack_int* ipiv );
11688 lapack_int LAPACKE_zsytrf_rk( int matrix_layout, char uplo, lapack_int n,
11689                            lapack_complex_double* a, lapack_int lda,
11690                            lapack_complex_double* e, lapack_int* ipiv );
11691 lapack_int LAPACKE_chetrf_rk( int matrix_layout, char uplo, lapack_int n,
11692                            lapack_complex_float* a, lapack_int lda,
11693                            lapack_complex_float* e, lapack_int* ipiv );
11694 lapack_int LAPACKE_zhetrf_rk( int matrix_layout, char uplo, lapack_int n,
11695                            lapack_complex_double* a, lapack_int lda,
11696                            lapack_complex_double* e, lapack_int* ipiv );
11697 lapack_int LAPACKE_ssytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11698                                 float* a, lapack_int lda, float* e, lapack_int* ipiv,
11699                                 float* work, lapack_int lwork );
11700 lapack_int LAPACKE_dsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11701                                 double* a, lapack_int lda, double* e, lapack_int* ipiv,
11702                                 double* work, lapack_int lwork );
11703 lapack_int LAPACKE_csytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11704                                 lapack_complex_float* a, lapack_int lda,
11705                                 lapack_complex_float* e,
11706                                 lapack_int* ipiv, lapack_complex_float* work,
11707                                 lapack_int lwork );
11708 lapack_int LAPACKE_zsytrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11709                                 lapack_complex_double* a, lapack_int lda,
11710                                 lapack_complex_double* e,
11711                                 lapack_int* ipiv, lapack_complex_double* work,
11712                                 lapack_int lwork );
11713 lapack_int LAPACKE_chetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11714                                 lapack_complex_float* a, lapack_int lda,
11715                                 lapack_complex_float* e,
11716                                 lapack_int* ipiv, lapack_complex_float* work,
11717                                 lapack_int lwork );
11718 lapack_int LAPACKE_zhetrf_rk_work( int matrix_layout, char uplo, lapack_int n,
11719                                 lapack_complex_double* a, lapack_int lda,
11720                                 lapack_complex_double* e,
11721                                 lapack_int* ipiv, lapack_complex_double* work,
11722                                 lapack_int lwork );
11723
11724 lapack_int LAPACKE_csytrs_3( int matrix_layout, char uplo, lapack_int n,
11725                             lapack_int nrhs, const lapack_complex_float* a,
11726                             lapack_int lda, const lapack_complex_float* e,
11727                             const lapack_int* ipiv,
11728                             lapack_complex_float* b, lapack_int ldb );
11729 lapack_int LAPACKE_csytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11730                                  lapack_int nrhs, const lapack_complex_float* a,
11731                                  lapack_int lda, const lapack_complex_float* e,
11732                                  const lapack_int* ipiv,
11733                                  lapack_complex_float* b, lapack_int ldb);
11734 lapack_int LAPACKE_chetrs_3( int matrix_layout, char uplo, lapack_int n,
11735                             lapack_int nrhs, const lapack_complex_float* a,
11736                             lapack_int lda, const lapack_complex_float* e,
11737                             const lapack_int* ipiv,
11738                             lapack_complex_float* b, lapack_int ldb );
11739 lapack_int LAPACKE_chetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11740                                  lapack_int nrhs, const lapack_complex_float* a,
11741                                  lapack_int lda, const lapack_complex_float* e,
11742                                  const lapack_int* ipiv,
11743                                  lapack_complex_float* b, lapack_int ldb);
11744 lapack_int LAPACKE_dsytrs_3( int matrix_layout, char uplo, lapack_int n,
11745                             lapack_int nrhs, const double* a, lapack_int lda,
11746                             const double* e,
11747                             const lapack_int* ipiv, double* b, lapack_int ldb );
11748 lapack_int LAPACKE_dsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11749                                  lapack_int nrhs, const double* a,
11750                                  lapack_int lda, const double* e,
11751                                  const lapack_int* ipiv,
11752                                  double* b, lapack_int ldb);
11753 lapack_int LAPACKE_ssytrs_3( int matrix_layout, char uplo, lapack_int n,
11754                            lapack_int nrhs, const float* a, lapack_int lda,
11755                            const float* e,
11756                            const lapack_int* ipiv, float* b, lapack_int ldb );
11757 lapack_int LAPACKE_ssytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11758                                 lapack_int nrhs, const float* a, lapack_int lda,
11759                                 const float* e, const lapack_int* ipiv, float* b,
11760                                 lapack_int ldb);
11761 lapack_int LAPACKE_zsytrs_3( int matrix_layout, char uplo, lapack_int n,
11762                             lapack_int nrhs, const lapack_complex_double* a,
11763                             lapack_int lda, const lapack_complex_double* e,
11764                             const lapack_int* ipiv,
11765                             lapack_complex_double* b, lapack_int ldb );
11766 lapack_int LAPACKE_zsytrs_3_work( int matrix_layout, char uplo, lapack_int n,
11767                                  lapack_int nrhs, const lapack_complex_double* a,
11768                                  lapack_int lda, const lapack_complex_double* e,
11769                                  const lapack_int* ipiv,
11770                                  lapack_complex_double* b, lapack_int ldb);
11771 lapack_int LAPACKE_zhetrs_3( int matrix_layout, char uplo, lapack_int n,
11772                             lapack_int nrhs, const lapack_complex_double* a,
11773                             lapack_int lda, const lapack_complex_double* e,
11774                             const lapack_int* ipiv,
11775                             lapack_complex_double* b, lapack_int ldb );
11776 lapack_int LAPACKE_zhetrs_3_work( int matrix_layout, char uplo, lapack_int n,
11777                                  lapack_int nrhs, const lapack_complex_double* a,
11778                                  lapack_int lda, const lapack_complex_double* e,
11779                                  const lapack_int* ipiv,
11780                                  lapack_complex_double* b, lapack_int ldb);
11781
11782 lapack_int LAPACKE_ssytri_3( int matrix_layout, char uplo, lapack_int n, float* a,
11783                            lapack_int lda, const float* e, const lapack_int* ipiv );
11784 lapack_int LAPACKE_dsytri_3( int matrix_layout, char uplo, lapack_int n, double* a,
11785                            lapack_int lda, const double* e, const lapack_int* ipiv );
11786 lapack_int LAPACKE_csytri_3( int matrix_layout, char uplo, lapack_int n,
11787                            lapack_complex_float* a, lapack_int lda,
11788                            const lapack_complex_float* e, const lapack_int* ipiv );
11789 lapack_int LAPACKE_zsytri_3( int matrix_layout, char uplo, lapack_int n,
11790                            lapack_complex_double* a, lapack_int lda,
11791                            const lapack_complex_double* e, const lapack_int* ipiv );
11792 lapack_int LAPACKE_chetri_3( int matrix_layout, char uplo, lapack_int n,
11793                            lapack_complex_float* a, lapack_int lda,
11794                            const lapack_complex_float* e, const lapack_int* ipiv );
11795 lapack_int LAPACKE_zhetri_3( int matrix_layout, char uplo, lapack_int n,
11796                            lapack_complex_double* a, lapack_int lda,
11797                            const lapack_complex_double* e, const lapack_int* ipiv );
11798 lapack_int LAPACKE_ssytri_3_work( int matrix_layout, char uplo, lapack_int n, float* a,
11799                            lapack_int lda, const float* e, const lapack_int* ipiv,
11800                            float* work, lapack_int lwork  );
11801 lapack_int LAPACKE_dsytri_3_work( int matrix_layout, char uplo, lapack_int n, double* a,
11802                            lapack_int lda, const double* e, const lapack_int* ipiv,
11803                            double* work, lapack_int lwork  );
11804 lapack_int LAPACKE_csytri_3_work( int matrix_layout, char uplo, lapack_int n,
11805                            lapack_complex_float* a, lapack_int lda,
11806                            const lapack_complex_float* e, const lapack_int* ipiv,
11807                            lapack_complex_float* work, lapack_int lwork  );
11808 lapack_int LAPACKE_zsytri_3_work( int matrix_layout, char uplo, lapack_int n,
11809                            lapack_complex_double* a, lapack_int lda,
11810                            const lapack_complex_double* e, const lapack_int* ipiv,
11811                            lapack_complex_double* work, lapack_int lwork  );
11812 lapack_int LAPACKE_chetri_3_work( int matrix_layout, char uplo, lapack_int n,
11813                            lapack_complex_float* a, lapack_int lda,
11814                            const lapack_complex_float* e, const lapack_int* ipiv,
11815                            lapack_complex_float* work, lapack_int lwork  );
11816 lapack_int LAPACKE_zhetri_3_work( int matrix_layout, char uplo, lapack_int n,
11817                            lapack_complex_double* a, lapack_int lda,
11818                            const lapack_complex_double* e, const lapack_int* ipiv,
11819                            lapack_complex_double* work, lapack_int lwork );
11820
11821 lapack_int LAPACKE_ssycon_3( int matrix_layout, char uplo, lapack_int n,
11822                            const float* a, lapack_int lda, const float* e,
11823                            const lapack_int* ipiv, float anorm, float* rcond );
11824 lapack_int LAPACKE_dsycon_3( int matrix_layout, char uplo, lapack_int n,
11825                            const double* a, lapack_int lda, const double* e,
11826                            const lapack_int* ipiv, double anorm,
11827                            double* rcond );
11828 lapack_int LAPACKE_csycon_3( int matrix_layout, char uplo, lapack_int n,
11829                            const lapack_complex_float* a, lapack_int lda,
11830                            const lapack_complex_float* e,
11831                            const lapack_int* ipiv, float anorm, float* rcond );
11832 lapack_int LAPACKE_zsycon_3( int matrix_layout, char uplo, lapack_int n,
11833                            const lapack_complex_double* a, lapack_int lda,
11834                            const lapack_complex_double* e,
11835                            const lapack_int* ipiv, double anorm,
11836                            double* rcond );
11837 lapack_int LAPACKE_checon_3( int matrix_layout, char uplo, lapack_int n,
11838                            const lapack_complex_float* a, lapack_int lda,
11839                            const lapack_complex_float* e,
11840                            const lapack_int* ipiv, float anorm, float* rcond );
11841 lapack_int LAPACKE_zhecon_3( int matrix_layout, char uplo, lapack_int n,
11842                            const lapack_complex_double* a, lapack_int lda,
11843                            const lapack_complex_double* e,
11844                            const lapack_int* ipiv, double anorm,
11845                            double* rcond );
11846 lapack_int LAPACKE_ssycon_3_work( int matrix_layout, char uplo, lapack_int n,
11847                                 const float* a, lapack_int lda, const float* e,
11848                                 const lapack_int* ipiv, float anorm,
11849                                 float* rcond, float* work, lapack_int* iwork );
11850 lapack_int LAPACKE_dsycon_3_work( int matrix_layout, char uplo, lapack_int n,
11851                                 const double* a, lapack_int lda, const double* e,
11852                                 const lapack_int* ipiv, double anorm,
11853                                 double* rcond, double* work,
11854                                 lapack_int* iwork );
11855 lapack_int LAPACKE_csycon_3_work( int matrix_layout, char uplo, lapack_int n,
11856                                 const lapack_complex_float* a, lapack_int lda,
11857                                 const lapack_complex_float* e,
11858                                 const lapack_int* ipiv, float anorm,
11859                                 float* rcond, lapack_complex_float* work );
11860 lapack_int LAPACKE_zsycon_3_work( int matrix_layout, char uplo, lapack_int n,
11861                                 const lapack_complex_double* a, lapack_int lda,
11862                                 const lapack_complex_double* e,
11863                                 const lapack_int* ipiv, double anorm,
11864                                 double* rcond, lapack_complex_double* work );
11865 lapack_int LAPACKE_checon_3_work( int matrix_layout, char uplo, lapack_int n,
11866                                 const lapack_complex_float* a, lapack_int lda,
11867                                 const lapack_complex_float* e,
11868                                 const lapack_int* ipiv, float anorm,
11869                                 float* rcond, lapack_complex_float* work );
11870 lapack_int LAPACKE_zhecon_3_work( int matrix_layout, char uplo, lapack_int n,
11871                                 const lapack_complex_double* a, lapack_int lda,
11872                                 const lapack_complex_double* e,
11873                                 const lapack_int* ipiv, double anorm,
11874                                 double* rcond, lapack_complex_double* work );
11875
11876 lapack_int LAPACKE_sgelq( int matrix_layout, lapack_int m, lapack_int n,
11877                           float* a, lapack_int lda,
11878                           float* t, lapack_int tsize );
11879 lapack_int LAPACKE_dgelq( int matrix_layout, lapack_int m, lapack_int n,
11880                           double* a, lapack_int lda,
11881                           double* t, lapack_int tsize );
11882 lapack_int LAPACKE_cgelq( int matrix_layout, lapack_int m, lapack_int n,
11883                           lapack_complex_float* a, lapack_int lda,
11884                           lapack_complex_float* t, lapack_int tsize );
11885 lapack_int LAPACKE_zgelq( int matrix_layout, lapack_int m, lapack_int n,
11886                           lapack_complex_double* a, lapack_int lda,
11887                           lapack_complex_double* t, lapack_int tsize );
11888
11889 lapack_int LAPACKE_sgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11890                                float* a, lapack_int lda,
11891                                float* t, lapack_int tsize,
11892                                float* work, lapack_int lwork );
11893 lapack_int LAPACKE_dgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11894                                double* a, lapack_int lda,
11895                                double* t, lapack_int tsize,
11896                                double* work, lapack_int lwork );
11897 lapack_int LAPACKE_cgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11898                                lapack_complex_float* a, lapack_int lda,
11899                                lapack_complex_float* t, lapack_int tsize,
11900                                lapack_complex_float* work, lapack_int lwork );
11901 lapack_int LAPACKE_zgelq_work( int matrix_layout, lapack_int m, lapack_int n,
11902                                lapack_complex_double* a, lapack_int lda,
11903                                lapack_complex_double* t, lapack_int tsize,
11904                                lapack_complex_double* work, lapack_int lwork );
11905
11906 lapack_int LAPACKE_sgemlq( int matrix_layout, char side, char trans,
11907                            lapack_int m, lapack_int n, lapack_int k,
11908                            const float* a, lapack_int lda,
11909                            const float* t, lapack_int tsize,
11910                            float* c, lapack_int ldc );
11911 lapack_int LAPACKE_dgemlq( int matrix_layout, char side, char trans,
11912                            lapack_int m, lapack_int n, lapack_int k,
11913                            const double* a, lapack_int lda,
11914                            const double* t, lapack_int tsize,
11915                            double* c, lapack_int ldc );
11916 lapack_int LAPACKE_cgemlq( int matrix_layout, char side, char trans,
11917                            lapack_int m, lapack_int n, lapack_int k,
11918                            const lapack_complex_float* a, lapack_int lda,
11919                            const lapack_complex_float* t, lapack_int tsize,
11920                            lapack_complex_float* c, lapack_int ldc );
11921 lapack_int LAPACKE_zgemlq( int matrix_layout, char side, char trans,
11922                            lapack_int m, lapack_int n, lapack_int k,
11923                            const lapack_complex_double* a, lapack_int lda,
11924                            const lapack_complex_double* t, lapack_int tsize,
11925                            lapack_complex_double* c, lapack_int ldc );
11926
11927 lapack_int LAPACKE_sgemlq_work( int matrix_layout, char side, char trans,
11928                                 lapack_int m, lapack_int n, lapack_int k,
11929                                 const float* a, lapack_int lda,
11930                                 const float* t, lapack_int tsize,
11931                                 float* c, lapack_int ldc,
11932                                 float* work, lapack_int lwork );
11933 lapack_int LAPACKE_dgemlq_work( int matrix_layout, char side, char trans,
11934                                 lapack_int m, lapack_int n, lapack_int k,
11935                                 const double* a, lapack_int lda,
11936                                 const double* t, lapack_int tsize,
11937                                 double* c, lapack_int ldc,
11938                                 double* work, lapack_int lwork );
11939 lapack_int LAPACKE_cgemlq_work( int matrix_layout, char side, char trans,
11940                                 lapack_int m, lapack_int n, lapack_int k,
11941                                 const lapack_complex_float* a, lapack_int lda,
11942                                 const lapack_complex_float* t, lapack_int tsize,
11943                                 lapack_complex_float* c, lapack_int ldc,
11944                                 lapack_complex_float* work, lapack_int lwork );
11945 lapack_int LAPACKE_zgemlq_work( int matrix_layout, char side, char trans,
11946                                 lapack_int m, lapack_int n, lapack_int k,
11947                                 const lapack_complex_double* a, lapack_int lda,
11948                                 const lapack_complex_double* t, lapack_int tsize,
11949                                 lapack_complex_double* c, lapack_int ldc,
11950                                 lapack_complex_double* work, lapack_int lwork );
11951
11952 lapack_int LAPACKE_sgeqr( int matrix_layout, lapack_int m, lapack_int n,
11953                           float* a, lapack_int lda,
11954                           float* t, lapack_int tsize );
11955 lapack_int LAPACKE_dgeqr( int matrix_layout, lapack_int m, lapack_int n,
11956                           double* a, lapack_int lda,
11957                           double* t, lapack_int tsize );
11958 lapack_int LAPACKE_cgeqr( int matrix_layout, lapack_int m, lapack_int n,
11959                           lapack_complex_float* a, lapack_int lda,
11960                           lapack_complex_float* t, lapack_int tsize );
11961 lapack_int LAPACKE_zgeqr( int matrix_layout, lapack_int m, lapack_int n,
11962                           lapack_complex_double* a, lapack_int lda,
11963                           lapack_complex_double* t, lapack_int tsize );
11964
11965 lapack_int LAPACKE_sgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11966                                float* a, lapack_int lda,
11967                                float* t, lapack_int tsize,
11968                                float* work, lapack_int lwork );
11969 lapack_int LAPACKE_dgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11970                                double* a, lapack_int lda,
11971                                double* t, lapack_int tsize,
11972                                double* work, lapack_int lwork );
11973 lapack_int LAPACKE_cgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11974                                lapack_complex_float* a, lapack_int lda,
11975                                lapack_complex_float* t, lapack_int tsize,
11976                                lapack_complex_float* work, lapack_int lwork );
11977 lapack_int LAPACKE_zgeqr_work( int matrix_layout, lapack_int m, lapack_int n,
11978                                lapack_complex_double* a, lapack_int lda,
11979                                lapack_complex_double* t, lapack_int tsize,
11980                                lapack_complex_double* work, lapack_int lwork );
11981
11982 lapack_int LAPACKE_sgemqr( int matrix_layout, char side, char trans,
11983                            lapack_int m, lapack_int n, lapack_int k,
11984                            const float* a, lapack_int lda,
11985                            const float* t, lapack_int tsize,
11986                            float* c, lapack_int ldc );
11987 lapack_int LAPACKE_dgemqr( int matrix_layout, char side, char trans,
11988                            lapack_int m, lapack_int n, lapack_int k,
11989                            const double* a, lapack_int lda,
11990                            const double* t, lapack_int tsize,
11991                            double* c, lapack_int ldc );
11992 lapack_int LAPACKE_cgemqr( int matrix_layout, char side, char trans,
11993                            lapack_int m, lapack_int n, lapack_int k,
11994                            const lapack_complex_float* a, lapack_int lda,
11995                            const lapack_complex_float* t, lapack_int tsize,
11996                            lapack_complex_float* c, lapack_int ldc );
11997 lapack_int LAPACKE_zgemqr( int matrix_layout, char side, char trans,
11998                            lapack_int m, lapack_int n, lapack_int k,
11999                            const lapack_complex_double* a, lapack_int lda,
12000                            const lapack_complex_double* t, lapack_int tsize,
12001                            lapack_complex_double* c, lapack_int ldc );
12002
12003 lapack_int LAPACKE_sgemqr_work( int matrix_layout, char side, char trans,
12004                                 lapack_int m, lapack_int n, lapack_int k,
12005                                 const float* a, lapack_int lda,
12006                                 const float* t, lapack_int tsize,
12007                                 float* c, lapack_int ldc,
12008                                 float* work, lapack_int lwork );
12009 lapack_int LAPACKE_dgemqr_work( int matrix_layout, char side, char trans,
12010                                 lapack_int m, lapack_int n, lapack_int k,
12011                                 const double* a, lapack_int lda,
12012                                 const double* t, lapack_int tsize,
12013                                 double* c, lapack_int ldc,
12014                                 double* work, lapack_int lwork );
12015 lapack_int LAPACKE_cgemqr_work( int matrix_layout, char side, char trans,
12016                                 lapack_int m, lapack_int n, lapack_int k,
12017                                 const lapack_complex_float* a, lapack_int lda,
12018                                 const lapack_complex_float* t, lapack_int tsize,
12019                                 lapack_complex_float* c, lapack_int ldc,
12020                                 lapack_complex_float* work, lapack_int lwork );
12021 lapack_int LAPACKE_zgemqr_work( int matrix_layout, char side, char trans,
12022                                 lapack_int m, lapack_int n, lapack_int k,
12023                                 const lapack_complex_double* a, lapack_int lda,
12024                                 const lapack_complex_double* t, lapack_int tsize,
12025                                 lapack_complex_double* c, lapack_int ldc,
12026                                 lapack_complex_double* work, lapack_int lwork );
12027
12028 lapack_int LAPACKE_sgetsls( int matrix_layout, char trans, lapack_int m,
12029                             lapack_int n, lapack_int nrhs, float* a,
12030                             lapack_int lda, float* b, lapack_int ldb );
12031 lapack_int LAPACKE_dgetsls( int matrix_layout, char trans, lapack_int m,
12032                             lapack_int n, lapack_int nrhs, double* a,
12033                             lapack_int lda, double* b, lapack_int ldb );
12034 lapack_int LAPACKE_cgetsls( int matrix_layout, char trans, lapack_int m,
12035                             lapack_int n, lapack_int nrhs,
12036                             lapack_complex_float* a, lapack_int lda,
12037                             lapack_complex_float* b, lapack_int ldb );
12038 lapack_int LAPACKE_zgetsls( int matrix_layout, char trans, lapack_int m,
12039                             lapack_int n, lapack_int nrhs,
12040                             lapack_complex_double* a, lapack_int lda,
12041                             lapack_complex_double* b, lapack_int ldb );
12042
12043 lapack_int LAPACKE_sgetsls_work( int matrix_layout, char trans, lapack_int m,
12044                                  lapack_int n, lapack_int nrhs, float* a,
12045                                  lapack_int lda, float* b, lapack_int ldb,
12046                                  float* work, lapack_int lwork );
12047 lapack_int LAPACKE_dgetsls_work( int matrix_layout, char trans, lapack_int m,
12048                                  lapack_int n, lapack_int nrhs, double* a,
12049                                  lapack_int lda, double* b, lapack_int ldb,
12050                                  double* work, lapack_int lwork );
12051 lapack_int LAPACKE_cgetsls_work( int matrix_layout, char trans, lapack_int m,
12052                                  lapack_int n, lapack_int nrhs,
12053                                  lapack_complex_float* a, lapack_int lda,
12054                                  lapack_complex_float* b, lapack_int ldb,
12055                                  lapack_complex_float* work, lapack_int lwork );
12056 lapack_int LAPACKE_zgetsls_work( int matrix_layout, char trans, lapack_int m,
12057                                  lapack_int n, lapack_int nrhs,
12058                                  lapack_complex_double* a, lapack_int lda,
12059                                  lapack_complex_double* b, lapack_int ldb,
12060                                  lapack_complex_double* work, lapack_int lwork );
12061
12062 lapack_int LAPACKE_ssyev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12063                           float* a, lapack_int lda, float* w );
12064 lapack_int LAPACKE_dsyev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12065                           double* a, lapack_int lda, double* w );
12066
12067 lapack_int LAPACKE_ssyevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12068                            float* a, lapack_int lda, float* w );
12069 lapack_int LAPACKE_dsyevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12070                            double* a, lapack_int lda, double* w );
12071
12072 lapack_int LAPACKE_ssyevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12073                            lapack_int n, float* a, lapack_int lda, float vl,
12074                            float vu, lapack_int il, lapack_int iu, float abstol,
12075                            lapack_int* m, float* w, float* z, lapack_int ldz,
12076                            lapack_int* isuppz );
12077 lapack_int LAPACKE_dsyevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12078                            lapack_int n, double* a, lapack_int lda, double vl,
12079                            double vu, lapack_int il, lapack_int iu,
12080                            double abstol, lapack_int* m, double* w, double* z,
12081                            lapack_int ldz, lapack_int* isuppz );
12082
12083 lapack_int LAPACKE_ssyevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12084                            lapack_int n, float* a, lapack_int lda, float vl,
12085                            float vu, lapack_int il, lapack_int iu, float abstol,
12086                            lapack_int* m, float* w, float* z, lapack_int ldz,
12087                            lapack_int* ifail );
12088 lapack_int LAPACKE_dsyevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12089                            lapack_int n, double* a, lapack_int lda, double vl,
12090                            double vu, lapack_int il, lapack_int iu,
12091                            double abstol, lapack_int* m, double* w, double* z,
12092                            lapack_int ldz, lapack_int* ifail );
12093
12094 lapack_int LAPACKE_ssyev_2stage_work( int matrix_layout, char jobz, char uplo,
12095                                lapack_int n, float* a, lapack_int lda, float* w,
12096                                float* work, lapack_int lwork );
12097 lapack_int LAPACKE_dsyev_2stage_work( int matrix_layout, char jobz, char uplo,
12098                                lapack_int n, double* a, lapack_int lda,
12099                                double* w, double* work, lapack_int lwork );
12100
12101 lapack_int LAPACKE_ssyevd_2stage_work( int matrix_layout, char jobz, char uplo,
12102                                 lapack_int n, float* a, lapack_int lda,
12103                                 float* w, float* work, lapack_int lwork,
12104                                 lapack_int* iwork, lapack_int liwork );
12105 lapack_int LAPACKE_dsyevd_2stage_work( int matrix_layout, char jobz, char uplo,
12106                                 lapack_int n, double* a, lapack_int lda,
12107                                 double* w, double* work, lapack_int lwork,
12108                                 lapack_int* iwork, lapack_int liwork );
12109
12110 lapack_int LAPACKE_ssyevr_2stage_work( int matrix_layout, char jobz, char range,
12111                                 char uplo, lapack_int n, float* a,
12112                                 lapack_int lda, float vl, float vu,
12113                                 lapack_int il, lapack_int iu, float abstol,
12114                                 lapack_int* m, float* w, float* z,
12115                                 lapack_int ldz, lapack_int* isuppz, float* work,
12116                                 lapack_int lwork, lapack_int* iwork,
12117                                 lapack_int liwork );
12118 lapack_int LAPACKE_dsyevr_2stage_work( int matrix_layout, char jobz, char range,
12119                                 char uplo, lapack_int n, double* a,
12120                                 lapack_int lda, double vl, double vu,
12121                                 lapack_int il, lapack_int iu, double abstol,
12122                                 lapack_int* m, double* w, double* z,
12123                                 lapack_int ldz, lapack_int* isuppz,
12124                                 double* work, lapack_int lwork,
12125                                 lapack_int* iwork, lapack_int liwork );
12126
12127 lapack_int LAPACKE_ssyevx_2stage_work( int matrix_layout, char jobz, char range,
12128                                 char uplo, lapack_int n, float* a,
12129                                 lapack_int lda, float vl, float vu,
12130                                 lapack_int il, lapack_int iu, float abstol,
12131                                 lapack_int* m, float* w, float* z,
12132                                 lapack_int ldz, float* work, lapack_int lwork,
12133                                 lapack_int* iwork, lapack_int* ifail );
12134 lapack_int LAPACKE_dsyevx_2stage_work( int matrix_layout, char jobz, char range,
12135                                 char uplo, lapack_int n, double* a,
12136                                 lapack_int lda, double vl, double vu,
12137                                 lapack_int il, lapack_int iu, double abstol,
12138                                 lapack_int* m, double* w, double* z,
12139                                 lapack_int ldz, double* work, lapack_int lwork,
12140                                 lapack_int* iwork, lapack_int* ifail );
12141
12142 lapack_int LAPACKE_cheev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12143                           lapack_complex_float* a, lapack_int lda, float* w );
12144 lapack_int LAPACKE_zheev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12145                           lapack_complex_double* a, lapack_int lda, double* w );
12146
12147 lapack_int LAPACKE_cheevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12148                            lapack_complex_float* a, lapack_int lda, float* w );
12149 lapack_int LAPACKE_zheevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12150                            lapack_complex_double* a, lapack_int lda,
12151                            double* w );
12152
12153 lapack_int LAPACKE_cheevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12154                            lapack_int n, lapack_complex_float* a,
12155                            lapack_int lda, float vl, float vu, lapack_int il,
12156                            lapack_int iu, float abstol, lapack_int* m, float* w,
12157                            lapack_complex_float* z, lapack_int ldz,
12158                            lapack_int* isuppz );
12159 lapack_int LAPACKE_zheevr_2stage( int matrix_layout, char jobz, char range, char uplo,
12160                            lapack_int n, lapack_complex_double* a,
12161                            lapack_int lda, double vl, double vu, lapack_int il,
12162                            lapack_int iu, double abstol, lapack_int* m,
12163                            double* w, lapack_complex_double* z, lapack_int ldz,
12164                            lapack_int* isuppz );
12165
12166 lapack_int LAPACKE_cheevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12167                            lapack_int n, lapack_complex_float* a,
12168                            lapack_int lda, float vl, float vu, lapack_int il,
12169                            lapack_int iu, float abstol, lapack_int* m, float* w,
12170                            lapack_complex_float* z, lapack_int ldz,
12171                            lapack_int* ifail );
12172 lapack_int LAPACKE_zheevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12173                            lapack_int n, lapack_complex_double* a,
12174                            lapack_int lda, double vl, double vu, lapack_int il,
12175                            lapack_int iu, double abstol, lapack_int* m,
12176                            double* w, lapack_complex_double* z, lapack_int ldz,
12177                            lapack_int* ifail );
12178
12179 lapack_int LAPACKE_cheev_2stage_work( int matrix_layout, char jobz, char uplo,
12180                                lapack_int n, lapack_complex_float* a,
12181                                lapack_int lda, float* w,
12182                                lapack_complex_float* work, lapack_int lwork,
12183                                float* rwork );
12184 lapack_int LAPACKE_zheev_2stage_work( int matrix_layout, char jobz, char uplo,
12185                                lapack_int n, lapack_complex_double* a,
12186                                lapack_int lda, double* w,
12187                                lapack_complex_double* work, lapack_int lwork,
12188                                double* rwork );
12189
12190 lapack_int LAPACKE_cheevd_2stage_work( int matrix_layout, char jobz, char uplo,
12191                                 lapack_int n, lapack_complex_float* a,
12192                                 lapack_int lda, float* w,
12193                                 lapack_complex_float* work, lapack_int lwork,
12194                                 float* rwork, lapack_int lrwork,
12195                                 lapack_int* iwork, lapack_int liwork );
12196 lapack_int LAPACKE_zheevd_2stage_work( int matrix_layout, char jobz, char uplo,
12197                                 lapack_int n, lapack_complex_double* a,
12198                                 lapack_int lda, double* w,
12199                                 lapack_complex_double* work, lapack_int lwork,
12200                                 double* rwork, lapack_int lrwork,
12201                                 lapack_int* iwork, lapack_int liwork );
12202
12203 lapack_int LAPACKE_cheevr_2stage_work( int matrix_layout, char jobz, char range,
12204                                 char uplo, lapack_int n,
12205                                 lapack_complex_float* a, lapack_int lda,
12206                                 float vl, float vu, lapack_int il,
12207                                 lapack_int iu, float abstol, lapack_int* m,
12208                                 float* w, lapack_complex_float* z,
12209                                 lapack_int ldz, lapack_int* isuppz,
12210                                 lapack_complex_float* work, lapack_int lwork,
12211                                 float* rwork, lapack_int lrwork,
12212                                 lapack_int* iwork, lapack_int liwork );
12213 lapack_int LAPACKE_zheevr_2stage_work( int matrix_layout, char jobz, char range,
12214                                 char uplo, lapack_int n,
12215                                 lapack_complex_double* a, lapack_int lda,
12216                                 double vl, double vu, lapack_int il,
12217                                 lapack_int iu, double abstol, lapack_int* m,
12218                                 double* w, lapack_complex_double* z,
12219                                 lapack_int ldz, lapack_int* isuppz,
12220                                 lapack_complex_double* work, lapack_int lwork,
12221                                 double* rwork, lapack_int lrwork,
12222                                 lapack_int* iwork, lapack_int liwork );
12223
12224 lapack_int LAPACKE_cheevx_2stage_work( int matrix_layout, char jobz, char range,
12225                                 char uplo, lapack_int n,
12226                                 lapack_complex_float* a, lapack_int lda,
12227                                 float vl, float vu, lapack_int il,
12228                                 lapack_int iu, float abstol, lapack_int* m,
12229                                 float* w, lapack_complex_float* z,
12230                                 lapack_int ldz, lapack_complex_float* work,
12231                                 lapack_int lwork, float* rwork,
12232                                 lapack_int* iwork, lapack_int* ifail );
12233 lapack_int LAPACKE_zheevx_2stage_work( int matrix_layout, char jobz, char range,
12234                                 char uplo, lapack_int n,
12235                                 lapack_complex_double* a, lapack_int lda,
12236                                 double vl, double vu, lapack_int il,
12237                                 lapack_int iu, double abstol, lapack_int* m,
12238                                 double* w, lapack_complex_double* z,
12239                                 lapack_int ldz, lapack_complex_double* work,
12240                                 lapack_int lwork, double* rwork,
12241                                 lapack_int* iwork, lapack_int* ifail );
12242
12243 lapack_int LAPACKE_ssbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12244                           lapack_int kd, float* ab, lapack_int ldab, float* w,
12245                           float* z, lapack_int ldz );
12246 lapack_int LAPACKE_dsbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12247                           lapack_int kd, double* ab, lapack_int ldab, double* w,
12248                           double* z, lapack_int ldz );
12249
12250 lapack_int LAPACKE_ssbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12251                            lapack_int kd, float* ab, lapack_int ldab, float* w,
12252                            float* z, lapack_int ldz );
12253 lapack_int LAPACKE_dsbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12254                            lapack_int kd, double* ab, lapack_int ldab,
12255                            double* w, double* z, lapack_int ldz );
12256
12257 lapack_int LAPACKE_ssbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12258                            lapack_int n, lapack_int kd, float* ab,
12259                            lapack_int ldab, float* q, lapack_int ldq, float vl,
12260                            float vu, lapack_int il, lapack_int iu, float abstol,
12261                            lapack_int* m, float* w, float* z, lapack_int ldz,
12262                            lapack_int* ifail );
12263 lapack_int LAPACKE_dsbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12264                            lapack_int n, lapack_int kd, double* ab,
12265                            lapack_int ldab, double* q, lapack_int ldq,
12266                            double vl, double vu, lapack_int il, lapack_int iu,
12267                            double abstol, lapack_int* m, double* w, double* z,
12268                            lapack_int ldz, lapack_int* ifail );
12269
12270 lapack_int LAPACKE_ssbev_2stage_work( int matrix_layout, char jobz, char uplo,
12271                                lapack_int n, lapack_int kd, float* ab,
12272                                lapack_int ldab, float* w, float* z,
12273                                lapack_int ldz, float* work, lapack_int lwork );
12274 lapack_int LAPACKE_dsbev_2stage_work( int matrix_layout, char jobz, char uplo,
12275                                lapack_int n, lapack_int kd, double* ab,
12276                                lapack_int ldab, double* w, double* z,
12277                                lapack_int ldz, double* work, lapack_int lwork );
12278
12279 lapack_int LAPACKE_ssbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12280                                 lapack_int n, lapack_int kd, float* ab,
12281                                 lapack_int ldab, float* w, float* z,
12282                                 lapack_int ldz, float* work, lapack_int lwork,
12283                                 lapack_int* iwork, lapack_int liwork );
12284 lapack_int LAPACKE_dsbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12285                                 lapack_int n, lapack_int kd, double* ab,
12286                                 lapack_int ldab, double* w, double* z,
12287                                 lapack_int ldz, double* work, lapack_int lwork,
12288                                 lapack_int* iwork, lapack_int liwork );
12289
12290 lapack_int LAPACKE_ssbevx_2stage_work( int matrix_layout, char jobz, char range,
12291                                 char uplo, lapack_int n, lapack_int kd,
12292                                 float* ab, lapack_int ldab, float* q,
12293                                 lapack_int ldq, float vl, float vu,
12294                                 lapack_int il, lapack_int iu, float abstol,
12295                                 lapack_int* m, float* w, float* z,
12296                                 lapack_int ldz, float* work, lapack_int lwork, lapack_int* iwork,
12297                                 lapack_int* ifail );
12298 lapack_int LAPACKE_dsbevx_2stage_work( int matrix_layout, char jobz, char range,
12299                                 char uplo, lapack_int n, lapack_int kd,
12300                                 double* ab, lapack_int ldab, double* q,
12301                                 lapack_int ldq, double vl, double vu,
12302                                 lapack_int il, lapack_int iu, double abstol,
12303                                 lapack_int* m, double* w, double* z,
12304                                 lapack_int ldz, double* work, lapack_int lwork, lapack_int* iwork,
12305                                 lapack_int* ifail );
12306
12307 lapack_int LAPACKE_chbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12308                           lapack_int kd, lapack_complex_float* ab,
12309                           lapack_int ldab, float* w, lapack_complex_float* z,
12310                           lapack_int ldz );
12311 lapack_int LAPACKE_zhbev_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12312                           lapack_int kd, lapack_complex_double* ab,
12313                           lapack_int ldab, double* w, lapack_complex_double* z,
12314                           lapack_int ldz );
12315
12316 lapack_int LAPACKE_chbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12317                            lapack_int kd, lapack_complex_float* ab,
12318                            lapack_int ldab, float* w, lapack_complex_float* z,
12319                            lapack_int ldz );
12320 lapack_int LAPACKE_zhbevd_2stage( int matrix_layout, char jobz, char uplo, lapack_int n,
12321                            lapack_int kd, lapack_complex_double* ab,
12322                            lapack_int ldab, double* w, lapack_complex_double* z,
12323                            lapack_int ldz );
12324
12325 lapack_int LAPACKE_chbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12326                            lapack_int n, lapack_int kd,
12327                            lapack_complex_float* ab, lapack_int ldab,
12328                            lapack_complex_float* q, lapack_int ldq, float vl,
12329                            float vu, lapack_int il, lapack_int iu, float abstol,
12330                            lapack_int* m, float* w, lapack_complex_float* z,
12331                            lapack_int ldz, lapack_int* ifail );
12332 lapack_int LAPACKE_zhbevx_2stage( int matrix_layout, char jobz, char range, char uplo,
12333                            lapack_int n, lapack_int kd,
12334                            lapack_complex_double* ab, lapack_int ldab,
12335                            lapack_complex_double* q, lapack_int ldq, double vl,
12336                            double vu, lapack_int il, lapack_int iu,
12337                            double abstol, lapack_int* m, double* w,
12338                            lapack_complex_double* z, lapack_int ldz,
12339                            lapack_int* ifail );
12340
12341 lapack_int LAPACKE_chbev_2stage_work( int matrix_layout, char jobz, char uplo,
12342                                lapack_int n, lapack_int kd,
12343                                lapack_complex_float* ab, lapack_int ldab,
12344                                float* w, lapack_complex_float* z,
12345                                lapack_int ldz, lapack_complex_float* work,
12346                                lapack_int lwork, float* rwork );
12347 lapack_int LAPACKE_zhbev_2stage_work( int matrix_layout, char jobz, char uplo,
12348                                lapack_int n, lapack_int kd,
12349                                lapack_complex_double* ab, lapack_int ldab,
12350                                double* w, lapack_complex_double* z,
12351                                lapack_int ldz, lapack_complex_double* work,
12352                                lapack_int lwork, double* rwork );
12353
12354 lapack_int LAPACKE_chbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12355                                 lapack_int n, lapack_int kd,
12356                                 lapack_complex_float* ab, lapack_int ldab,
12357                                 float* w, lapack_complex_float* z,
12358                                 lapack_int ldz, lapack_complex_float* work,
12359                                 lapack_int lwork, float* rwork,
12360                                 lapack_int lrwork, lapack_int* iwork,
12361                                 lapack_int liwork );
12362 lapack_int LAPACKE_zhbevd_2stage_work( int matrix_layout, char jobz, char uplo,
12363                                 lapack_int n, lapack_int kd,
12364                                 lapack_complex_double* ab, lapack_int ldab,
12365                                 double* w, lapack_complex_double* z,
12366                                 lapack_int ldz, lapack_complex_double* work,
12367                                 lapack_int lwork, double* rwork,
12368                                 lapack_int lrwork, lapack_int* iwork,
12369                                 lapack_int liwork );
12370
12371 lapack_int LAPACKE_chbevx_2stage_work( int matrix_layout, char jobz, char range,
12372                                 char uplo, lapack_int n, lapack_int kd,
12373                                 lapack_complex_float* ab, lapack_int ldab,
12374                                 lapack_complex_float* q, lapack_int ldq,
12375                                 float vl, float vu, lapack_int il,
12376                                 lapack_int iu, float abstol, lapack_int* m,
12377                                 float* w, lapack_complex_float* z,
12378                                 lapack_int ldz, lapack_complex_float* work,
12379                                 lapack_int lwork, float* rwork, lapack_int* iwork,
12380                                 lapack_int* ifail );
12381 lapack_int LAPACKE_zhbevx_2stage_work( int matrix_layout, char jobz, char range,
12382                                 char uplo, lapack_int n, lapack_int kd,
12383                                 lapack_complex_double* ab, lapack_int ldab,
12384                                 lapack_complex_double* q, lapack_int ldq,
12385                                 double vl, double vu, lapack_int il,
12386                                 lapack_int iu, double abstol, lapack_int* m,
12387                                 double* w, lapack_complex_double* z,
12388                                 lapack_int ldz, lapack_complex_double* work,
12389                                 lapack_int lwork, double* rwork, lapack_int* iwork,
12390                                 lapack_int* ifail );
12391
12392 lapack_int LAPACKE_ssygv_2stage( int matrix_layout, lapack_int itype, char jobz,
12393                           char uplo, lapack_int n, float* a, lapack_int lda,
12394                           float* b, lapack_int ldb, float* w );
12395 lapack_int LAPACKE_dsygv_2stage( int matrix_layout, lapack_int itype, char jobz,
12396                           char uplo, lapack_int n, double* a, lapack_int lda,
12397                           double* b, lapack_int ldb, double* w );
12398 lapack_int LAPACKE_ssygv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12399                                char uplo, lapack_int n, float* a,
12400                                lapack_int lda, float* b, lapack_int ldb,
12401                                float* w, float* work, lapack_int lwork );
12402 lapack_int LAPACKE_dsygv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12403                                char uplo, lapack_int n, double* a,
12404                                lapack_int lda, double* b, lapack_int ldb,
12405                                double* w, double* work, lapack_int lwork );
12406
12407 lapack_int LAPACKE_chegv_2stage( int matrix_layout, lapack_int itype, char jobz,
12408                           char uplo, lapack_int n, lapack_complex_float* a,
12409                           lapack_int lda, lapack_complex_float* b,
12410                           lapack_int ldb, float* w );
12411 lapack_int LAPACKE_zhegv_2stage( int matrix_layout, lapack_int itype, char jobz,
12412                           char uplo, lapack_int n, lapack_complex_double* a,
12413                           lapack_int lda, lapack_complex_double* b,
12414                           lapack_int ldb, double* w );
12415 lapack_int LAPACKE_chegv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12416                                char uplo, lapack_int n, lapack_complex_float* a,
12417                                lapack_int lda, lapack_complex_float* b,
12418                                lapack_int ldb, float* w,
12419                                lapack_complex_float* work, lapack_int lwork,
12420                                float* rwork );
12421 lapack_int LAPACKE_zhegv_2stage_work( int matrix_layout, lapack_int itype, char jobz,
12422                                char uplo, lapack_int n,
12423                                lapack_complex_double* a, lapack_int lda,
12424                                lapack_complex_double* b, lapack_int ldb,
12425                                double* w, lapack_complex_double* work,
12426                                lapack_int lwork, double* rwork );
12427
12428 //LAPACK 3.8.0
12429 lapack_int LAPACKE_ssysv_aa_2stage( 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 lapack_int LAPACKE_ssysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12434                                lapack_int nrhs, float* a, lapack_int lda,
12435                                float* tb, lapack_int ltb, lapack_int* ipiv,
12436                                lapack_int* ipiv2, float* b, lapack_int ldb,
12437                                float* work, lapack_int lwork );
12438 lapack_int LAPACKE_dsysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12439                           lapack_int nrhs, double* a, lapack_int lda,
12440                           double* tb, lapack_int ltb,
12441                           lapack_int* ipiv, lapack_int* ipiv2,
12442                           double* b, lapack_int ldb );
12443 lapack_int LAPACKE_dsysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12444                                lapack_int nrhs, double* a, lapack_int lda,
12445                                double* tb, lapack_int ltb,
12446                                lapack_int* ipiv, lapack_int* ipiv2,
12447                                double* b, lapack_int ldb,
12448                                double* work, lapack_int lwork );
12449 lapack_int LAPACKE_csysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12450                           lapack_int nrhs, lapack_complex_float* a,
12451                           lapack_int lda, lapack_complex_float* tb,
12452                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12453                           lapack_complex_float* b, lapack_int ldb );
12454 lapack_int LAPACKE_csysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12455                                lapack_int nrhs, lapack_complex_float* a,
12456                                lapack_int lda, lapack_complex_float* tb,
12457                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12458                                lapack_complex_float* b, lapack_int ldb,
12459                                lapack_complex_float* work, lapack_int lwork );
12460 lapack_int LAPACKE_zsysv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12461                           lapack_int nrhs, lapack_complex_double* a,
12462                           lapack_int lda, lapack_complex_double* tb,
12463                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12464                           lapack_complex_double* b, lapack_int ldb );
12465 lapack_int LAPACKE_zsysv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12466                                lapack_int nrhs, lapack_complex_double* a,
12467                                lapack_int lda, lapack_complex_double* tb,
12468                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12469                                lapack_complex_double* b, lapack_int ldb,
12470                                lapack_complex_double* work, lapack_int lwork );
12471 lapack_int LAPACKE_chesv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12472                           lapack_int nrhs, lapack_complex_float* a,
12473                           lapack_int lda, lapack_complex_float* tb,
12474                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12475                           lapack_complex_float* b, lapack_int ldb );
12476 lapack_int LAPACKE_chesv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12477                                lapack_int nrhs, lapack_complex_float* a,
12478                                lapack_int lda, lapack_complex_float* tb,
12479                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12480                                lapack_complex_float* b, lapack_int ldb,
12481                                lapack_complex_float* work, lapack_int lwork );
12482 lapack_int LAPACKE_zhesv_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12483                           lapack_int nrhs, lapack_complex_double* a,
12484                           lapack_int lda, lapack_complex_double* tb,
12485                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12486                           lapack_complex_double* b, lapack_int ldb );
12487 lapack_int LAPACKE_zhesv_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12488                                lapack_int nrhs, lapack_complex_double* a,
12489                                lapack_int lda, lapack_complex_double* tb,
12490                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12491                                lapack_complex_double* b, lapack_int ldb,
12492                                lapack_complex_double* work, lapack_int lwork );
12493
12494 lapack_int LAPACKE_ssytrf_aa_2stage( 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 lapack_int LAPACKE_ssytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12499                                float* a, lapack_int lda,
12500                                float* tb, lapack_int ltb, lapack_int* ipiv,
12501                                lapack_int* ipiv2,
12502                                float* work, lapack_int lwork );
12503 lapack_int LAPACKE_dsytrf_aa_2stage( 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 lapack_int LAPACKE_dsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12508                                double* a, lapack_int lda,
12509                                double* tb, lapack_int ltb,
12510                                lapack_int* ipiv, lapack_int* ipiv2,
12511                                double* work, lapack_int lwork );
12512 lapack_int LAPACKE_csytrf_aa_2stage( 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_int LAPACKE_csytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12517                                lapack_complex_float* a,
12518                                lapack_int lda, lapack_complex_float* tb,
12519                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12520                                lapack_complex_float* work, lapack_int lwork );
12521 lapack_int LAPACKE_zsytrf_aa_2stage( 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_int LAPACKE_zsytrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12526                                lapack_complex_double* a,
12527                                lapack_int lda, lapack_complex_double* tb,
12528                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12529                                lapack_complex_double* work, lapack_int lwork );
12530 lapack_int LAPACKE_chetrf_aa_2stage( 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_int LAPACKE_chetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12535                                lapack_complex_float* a,
12536                                lapack_int lda, lapack_complex_float* tb,
12537                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12538                                lapack_complex_float* work, lapack_int lwork );
12539 lapack_int LAPACKE_zhetrf_aa_2stage( 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_int LAPACKE_zhetrf_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12544                                lapack_complex_double* a,
12545                                lapack_int lda, lapack_complex_double* tb,
12546                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12547                                lapack_complex_double* work, lapack_int lwork );
12548
12549
12550 lapack_int LAPACKE_ssytrs_aa_2stage( 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_ssytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12555                                lapack_int nrhs, float* a, lapack_int lda,
12556                                float* tb, lapack_int ltb, lapack_int* ipiv,
12557                                lapack_int* ipiv2, float* b, lapack_int ldb );
12558 lapack_int LAPACKE_dsytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12559                           lapack_int nrhs, double* a, lapack_int lda,
12560                           double* tb, lapack_int ltb,
12561                           lapack_int* ipiv, lapack_int* ipiv2,
12562                           double* b, lapack_int ldb );
12563 lapack_int LAPACKE_dsytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12564                                lapack_int nrhs, double* a, lapack_int lda,
12565                                double* tb, lapack_int ltb,
12566                                lapack_int* ipiv, lapack_int* ipiv2,
12567                                double* b, lapack_int ldb );
12568 lapack_int LAPACKE_csytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12569                           lapack_int nrhs, lapack_complex_float* a,
12570                           lapack_int lda, lapack_complex_float* tb,
12571                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12572                           lapack_complex_float* b, lapack_int ldb );
12573 lapack_int LAPACKE_csytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12574                                lapack_int nrhs, lapack_complex_float* a,
12575                                lapack_int lda, lapack_complex_float* tb,
12576                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12577                                lapack_complex_float* b, lapack_int ldb );
12578 lapack_int LAPACKE_zsytrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12579                           lapack_int nrhs, lapack_complex_double* a,
12580                           lapack_int lda, lapack_complex_double* tb,
12581                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12582                           lapack_complex_double* b, lapack_int ldb );
12583 lapack_int LAPACKE_zsytrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12584                                lapack_int nrhs, lapack_complex_double* a,
12585                                lapack_int lda, lapack_complex_double* tb,
12586                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12587                                lapack_complex_double* b, lapack_int ldb );
12588 lapack_int LAPACKE_chetrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12589                           lapack_int nrhs, lapack_complex_float* a,
12590                           lapack_int lda, lapack_complex_float* tb,
12591                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12592                           lapack_complex_float* b, lapack_int ldb );
12593 lapack_int LAPACKE_chetrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12594                                lapack_int nrhs, lapack_complex_float* a,
12595                                lapack_int lda, lapack_complex_float* tb,
12596                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12597                                lapack_complex_float* b, lapack_int ldb );
12598 lapack_int LAPACKE_zhetrs_aa_2stage( int matrix_layout, char uplo, lapack_int n,
12599                           lapack_int nrhs, lapack_complex_double* a,
12600                           lapack_int lda, lapack_complex_double* tb,
12601                           lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12602                           lapack_complex_double* b, lapack_int ldb );
12603 lapack_int LAPACKE_zhetrs_aa_2stage_work( int matrix_layout, char uplo, lapack_int n,
12604                                lapack_int nrhs, lapack_complex_double* a,
12605                                lapack_int lda, lapack_complex_double* tb,
12606                                lapack_int ltb, lapack_int* ipiv, lapack_int* ipiv2,
12607                                lapack_complex_double* b, lapack_int ldb );
12608
12609 #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
12610 #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
12611 #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
12612 #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
12613 #define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2,SGETRF2)
12614 #define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2,DGETRF2)
12615 #define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2,CGETRF2)
12616 #define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2,ZGETRF2)
12617 #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
12618 #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
12619 #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
12620 #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
12621 #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
12622 #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
12623 #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
12624 #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
12625 #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
12626 #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
12627 #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
12628 #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
12629 #define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2,SPOTRF2)
12630 #define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2,DPOTRF2)
12631 #define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2,CPOTRF2)
12632 #define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2,ZPOTRF2)
12633 #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
12634 #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
12635 #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
12636 #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
12637 #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
12638 #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
12639 #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
12640 #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
12641 #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
12642 #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
12643 #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
12644 #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
12645 #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
12646 #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
12647 #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
12648 #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
12649 #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
12650 #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
12651 #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
12652 #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
12653 #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
12654 #define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook,SSYTRF_ROOK)
12655 #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
12656 #define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook,DSYTRF_ROOK)
12657 #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
12658 #define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook,CSYTRF_ROOK)
12659 #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
12660 #define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook,ZSYTRF_ROOK)
12661 #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
12662 #define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook,CHETRF_ROOK)
12663 #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
12664 #define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook,ZHETRF_ROOK)
12665 #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
12666 #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
12667 #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
12668 #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
12669 #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
12670 #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
12671 #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
12672 #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
12673 #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
12674 #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
12675 #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
12676 #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
12677 #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
12678 #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
12679 #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
12680 #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
12681 #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
12682 #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
12683 #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
12684 #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
12685 #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
12686 #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
12687 #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
12688 #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
12689 #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
12690 #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
12691 #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
12692 #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
12693 #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
12694 #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
12695 #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
12696 #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
12697 #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
12698 #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
12699 #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
12700 #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
12701 #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
12702 #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
12703 #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
12704 #define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook,SSYTRS_ROOK)
12705 #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
12706 #define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook,DSYTRS_ROOK)
12707 #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
12708 #define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook,CSYTRS_ROOK)
12709 #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
12710 #define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook,ZSYTRS_ROOK)
12711 #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
12712 #define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook,CHETRS_ROOK)
12713 #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
12714 #define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook,ZHETRS_ROOK)
12715 #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
12716 #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
12717 #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
12718 #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
12719 #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
12720 #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
12721 #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
12722 #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
12723 #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
12724 #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
12725 #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
12726 #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
12727 #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
12728 #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
12729 #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
12730 #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
12731 #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
12732 #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
12733 #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
12734 #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
12735 #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
12736 #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
12737 #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
12738 #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
12739 #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
12740 #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
12741 #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
12742 #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
12743 #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
12744 #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
12745 #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
12746 #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
12747 #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
12748 #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
12749 #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
12750 #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
12751 #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
12752 #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
12753 #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
12754 #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
12755 #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
12756 #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
12757 #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
12758 #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
12759 #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
12760 #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
12761 #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
12762 #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
12763 #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
12764 #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
12765 #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
12766 #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
12767 #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
12768 #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
12769 #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
12770 #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
12771 #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
12772 #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
12773 #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
12774 #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
12775 #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
12776 #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
12777 #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
12778 #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
12779 #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
12780 #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
12781 #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
12782 #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
12783 #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
12784 #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
12785 #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
12786 #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
12787 #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
12788 #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
12789 #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
12790 #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
12791 #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
12792 #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
12793 #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
12794 #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
12795 #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
12796 #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
12797 #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
12798 #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
12799 #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
12800 #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
12801 #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
12802 #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
12803 #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
12804 #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
12805 #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
12806 #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
12807 #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
12808 #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
12809 #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
12810 #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
12811 #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
12812 #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
12813 #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
12814 #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
12815 #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
12816 #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
12817 #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
12818 #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
12819 #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
12820 #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
12821 #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
12822 #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
12823 #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
12824 #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
12825 #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
12826 #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
12827 #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
12828 #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
12829 #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
12830 #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
12831 #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
12832 #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
12833 #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
12834 #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
12835 #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
12836 #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
12837 #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
12838 #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
12839 #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
12840 #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
12841 #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
12842 #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
12843 #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
12844 #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
12845 #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
12846 #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
12847 #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
12848 #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
12849 #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
12850 #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
12851 #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
12852 #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
12853 #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
12854 #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
12855 #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
12856 #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
12857 #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
12858 #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
12859 #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
12860 #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
12861 #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
12862 #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
12863 #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
12864 #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
12865 #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
12866 #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
12867 #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
12868 #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
12869 #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
12870 #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
12871 #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
12872 #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
12873 #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
12874 #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
12875 #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
12876 #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
12877 #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
12878 #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
12879 #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
12880 #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
12881 #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
12882 #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
12883 #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
12884 #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
12885 #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
12886 #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
12887 #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
12888 #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
12889 #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
12890 #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
12891 #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
12892 #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
12893 #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
12894 #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
12895 #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
12896 #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
12897 #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
12898 #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
12899 #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
12900 #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
12901 #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
12902 #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
12903 #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
12904 #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
12905 #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
12906 #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
12907 #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
12908 #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
12909 #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
12910 #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
12911 #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
12912 #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
12913 #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
12914 #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
12915 #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
12916 #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
12917 #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
12918 #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
12919 #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
12920 #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
12921 #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
12922 #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
12923 #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
12924 #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
12925 #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
12926 #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
12927 #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
12928 #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
12929 #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
12930 #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
12931 #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
12932 #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
12933 #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
12934 #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
12935 #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
12936 #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
12937 #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
12938 #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
12939 #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
12940 #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
12941 #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
12942 #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
12943 #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
12944 #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
12945 #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
12946 #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
12947 #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
12948 #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
12949 #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
12950 #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
12951 #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
12952 #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
12953 #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
12954 #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
12955 #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
12956 #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
12957 #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
12958 #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
12959 #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
12960 #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
12961 #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
12962 #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
12963 #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
12964 #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
12965 #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
12966 #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
12967 #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
12968 #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
12969 #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
12970 #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
12971 #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
12972 #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
12973 #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
12974 #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
12975 #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
12976 #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
12977 #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
12978 #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
12979 #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
12980 #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
12981 #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
12982 #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
12983 #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
12984 #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
12985 #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
12986 #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
12987 #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
12988 #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
12989 #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
12990 #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
12991 #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
12992 #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
12993 #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
12994 #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
12995 #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
12996 #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
12997 #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
12998 #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
12999 #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
13000 #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
13001 #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
13002 #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
13003 #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
13004 #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
13005 #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
13006 #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
13007 #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
13008 #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
13009 #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
13010 #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
13011 #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
13012 #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
13013 #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
13014 #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
13015 #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
13016 #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
13017 #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
13018 #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
13019 #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
13020 #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
13021 #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
13022 #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
13023 #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
13024 #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
13025 #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
13026 #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
13027 #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
13028 #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
13029 #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
13030 #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
13031 #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
13032 #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
13033 #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
13034 #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
13035 #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
13036 #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
13037 #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
13038 #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
13039 #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
13040 #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
13041 #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
13042 #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
13043 #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
13044 #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
13045 #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
13046 #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
13047 #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
13048 #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
13049 #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
13050 #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
13051 #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
13052 #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
13053 #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
13054 #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
13055 #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
13056 #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
13057 #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
13058 #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
13059 #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
13060 #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
13061 #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
13062 #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
13063 #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
13064 #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
13065 #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
13066 #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
13067 #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
13068 #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
13069 #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
13070 #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
13071 #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
13072 #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
13073 #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
13074 #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
13075 #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
13076 #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
13077 #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
13078 #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
13079 #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
13080 #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
13081 #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
13082 #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
13083 #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
13084 #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
13085 #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
13086 #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
13087 #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
13088 #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
13089 #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
13090 #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
13091 #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
13092 #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
13093 #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
13094 #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
13095 #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
13096 #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
13097 #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
13098 #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
13099 #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
13100 #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
13101 #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
13102 #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
13103 #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
13104 #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
13105 #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
13106 #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
13107 #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
13108 #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
13109 #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
13110 #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
13111 #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
13112 #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
13113 #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
13114 #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
13115 #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
13116 #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
13117 #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
13118 #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
13119 #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
13120 #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
13121 #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
13122 #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
13123 #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
13124 #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
13125 #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
13126 #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
13127 #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
13128 #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
13129 #define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx,SBDSVDX)
13130 #define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx,DBDSVDX)
13131 #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
13132 #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
13133 #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
13134 #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
13135 #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
13136 #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
13137 #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
13138 #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
13139 #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
13140 #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
13141 #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
13142 #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
13143 #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
13144 #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
13145 #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
13146 #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
13147 #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
13148 #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
13149 #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
13150 #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
13151 #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
13152 #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
13153 #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
13154 #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
13155 #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
13156 #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
13157 #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
13158 #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
13159 #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
13160 #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
13161 #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
13162 #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
13163 #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
13164 #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
13165 #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
13166 #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
13167 #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
13168 #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
13169 #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
13170 #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
13171 #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
13172 #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
13173 #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
13174 #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
13175 #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
13176 #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
13177 #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
13178 #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
13179 #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
13180 #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
13181 #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
13182 #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
13183 #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
13184 #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
13185 #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
13186 #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
13187 #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
13188 #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
13189 #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
13190 #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
13191 #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
13192 #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
13193 #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
13194 #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
13195 #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
13196 #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
13197 #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
13198 #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
13199 #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
13200 #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
13201 #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
13202 #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
13203 #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
13204 #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
13205 #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
13206 #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
13207 #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
13208 #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
13209 #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
13210 #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
13211 #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
13212 #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
13213 #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
13214 #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
13215 #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
13216 #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
13217 #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
13218 #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
13219 #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
13220 #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
13221 #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
13222 #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
13223 #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
13224 #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
13225 #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
13226 #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
13227 #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
13228 #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
13229 #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
13230 #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
13231 #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
13232 #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
13233 #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
13234 #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
13235 #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
13236 #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
13237 #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
13238 #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
13239 #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
13240 #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
13241 #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
13242 #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
13243 #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
13244 #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
13245 #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
13246 #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
13247 #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
13248 #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
13249 #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
13250 #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
13251 #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
13252 #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
13253 #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
13254 #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
13255 #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
13256 #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
13257 #define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3,SGGHD3)
13258 #define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3,DGGHD3)
13259 #define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3,CGGHD3)
13260 #define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3,ZGGHD3)
13261 #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
13262 #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
13263 #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
13264 #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
13265 #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
13266 #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
13267 #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
13268 #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
13269 #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
13270 #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
13271 #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
13272 #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
13273 #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
13274 #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
13275 #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
13276 #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
13277 #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
13278 #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
13279 #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
13280 #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
13281 #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
13282 #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
13283 #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
13284 #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
13285 #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
13286 #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
13287 #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
13288 #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
13289 #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
13290 #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
13291 #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
13292 #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
13293 #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
13294 #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
13295 #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
13296 #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
13297 #define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3,SGGSVP3)
13298 #define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3,DGGSVP3)
13299 #define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
13300 #define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3,ZGGSVP3)
13301 #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
13302 #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
13303 #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
13304 #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
13305 #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
13306 #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
13307 #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
13308 #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
13309 #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
13310 #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
13311 #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
13312 #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
13313 #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
13314 #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
13315 #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
13316 #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
13317 #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
13318 #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
13319 #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
13320 #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
13321 #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
13322 #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
13323 #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
13324 #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
13325 #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
13326 #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
13327 #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
13328 #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
13329 #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
13330 #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
13331 #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
13332 #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
13333 #define LAPACK_ssyev_2stage LAPACK_GLOBAL(ssyev_2stage,SSYEV_2STAGE)
13334 #define LAPACK_dsyev_2stage LAPACK_GLOBAL(dsyev_2stage,DSYEV_2STAGE)
13335 #define LAPACK_cheev_2stage LAPACK_GLOBAL(cheev_2stage,CHEEV_2STAGE)
13336 #define LAPACK_zheev_2stage LAPACK_GLOBAL(zheev_2stage,ZHEEV_2STAGE)
13337 #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
13338 #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
13339 #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
13340 #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
13341 #define LAPACK_ssyevd_2stage LAPACK_GLOBAL(ssyevd_2stage,SSYEVD_2STAGE)
13342 #define LAPACK_dsyevd_2stage LAPACK_GLOBAL(dsyevd_2stage,DSYEVD_2STAGE)
13343 #define LAPACK_cheevd_2stage LAPACK_GLOBAL(cheevd_2stage,CHEEVD_2STAGE)
13344 #define LAPACK_zheevd_2stage LAPACK_GLOBAL(zheevd_2stage,ZHEEVD_2STAGE)
13345 #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
13346 #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
13347 #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
13348 #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
13349 #define LAPACK_ssyevx_2stage LAPACK_GLOBAL(ssyevx_2stage,SSYEVX_2STAGE)
13350 #define LAPACK_dsyevx_2stage LAPACK_GLOBAL(dsyevx_2stage,DSYEVX_2STAGE)
13351 #define LAPACK_cheevx_2stage LAPACK_GLOBAL(cheevx_2stage,CHEEVX_2STAGE)
13352 #define LAPACK_zheevx_2stage LAPACK_GLOBAL(zheevx_2stage,ZHEEVX_2STAGE)
13353 #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
13354 #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
13355 #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
13356 #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
13357 #define LAPACK_ssyevr_2stage LAPACK_GLOBAL(ssyevr_2stage,SSYEVR_2STAGE)
13358 #define LAPACK_dsyevr_2stage LAPACK_GLOBAL(dsyevr_2stage,DSYEVR_2STAGE)
13359 #define LAPACK_cheevr_2stage LAPACK_GLOBAL(cheevr_2stage,CHEEVR_2STAGE)
13360 #define LAPACK_zheevr_2stage LAPACK_GLOBAL(zheevr_2stage,ZHEEVR_2STAGE)
13361 #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
13362 #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
13363 #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
13364 #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
13365 #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
13366 #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
13367 #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
13368 #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
13369 #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
13370 #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
13371 #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
13372 #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
13373 #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
13374 #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
13375 #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
13376 #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
13377 #define LAPACK_ssbev_2stage LAPACK_GLOBAL(ssbev_2stage,SSBEV_2STAGE)
13378 #define LAPACK_dsbev_2stage LAPACK_GLOBAL(dsbev_2stage,DSBEV_2STAGE)
13379 #define LAPACK_chbev_2stage LAPACK_GLOBAL(chbev_2stage,CHBEV_2STAGE)
13380 #define LAPACK_zhbev_2stage LAPACK_GLOBAL(zhbev_2stage,ZHBEV_2STAGE)
13381 #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
13382 #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
13383 #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
13384 #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
13385 #define LAPACK_ssbevd_2stage LAPACK_GLOBAL(ssbevd_2stage,SSBEVD_2STAGE)
13386 #define LAPACK_dsbevd_2stage LAPACK_GLOBAL(dsbevd_2stage,DSBEVD_2STAGE)
13387 #define LAPACK_chbevd_2stage LAPACK_GLOBAL(chbevd_2stage,CHBEVD_2STAGE)
13388 #define LAPACK_zhbevd_2stage LAPACK_GLOBAL(zhbevd_2stage,ZHBEVD_2STAGE)
13389 #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
13390 #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
13391 #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
13392 #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
13393 #define LAPACK_ssbevx_2stage LAPACK_GLOBAL(ssbevx_2stage,SSBEVX_2STAGE)
13394 #define LAPACK_dsbevx_2stage LAPACK_GLOBAL(dsbevx_2stage,DSBEVX_2STAGE)
13395 #define LAPACK_chbevx_2stage LAPACK_GLOBAL(chbevx_2stage,CHBEVX_2STAGE)
13396 #define LAPACK_zhbevx_2stage LAPACK_GLOBAL(zhbevx_2stage,ZHBEVX_2STAGE)
13397 #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
13398 #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
13399 #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
13400 #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
13401 #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
13402 #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
13403 #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
13404 #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
13405 #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
13406 #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
13407 #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
13408 #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
13409 #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
13410 #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
13411 #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
13412 #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
13413 #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
13414 #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
13415 #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
13416 #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
13417 #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
13418 #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
13419 #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
13420 #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
13421 #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
13422 #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
13423 #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
13424 #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
13425 #define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx,SGESVDX)
13426 #define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx,DGESVDX)
13427 #define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx,CGESVDX)
13428 #define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx,ZGESVDX)
13429 #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
13430 #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
13431 #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
13432 #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
13433 #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
13434 #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
13435 #define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv,CGEJSV)
13436 #define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv,ZGEJSV)
13437 #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
13438 #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
13439 #define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj,CGESVJ)
13440 #define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj,ZGESVJ)
13441 #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
13442 #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
13443 #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
13444 #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
13445 #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
13446 #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
13447 #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
13448 #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
13449 #define LAPACK_ssygv_2stage LAPACK_GLOBAL(ssygv_2stage,SSYGV_2STAGE)
13450 #define LAPACK_dsygv_2stage LAPACK_GLOBAL(dsygv_2stage,DSYGV_2STAGE)
13451 #define LAPACK_chegv_2stage LAPACK_GLOBAL(chegv_2stage,CHEGV_2STAGE)
13452 #define LAPACK_zhegv_2stage LAPACK_GLOBAL(zhegv_2stage,ZHEGV_2STAGE)
13453 #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
13454 #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
13455 #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
13456 #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
13457 #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
13458 #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
13459 #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
13460 #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
13461 #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
13462 #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
13463 #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
13464 #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
13465 #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
13466 #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
13467 #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
13468 #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
13469 #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
13470 #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
13471 #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
13472 #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
13473 #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
13474 #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
13475 #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
13476 #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
13477 #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
13478 #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
13479 #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
13480 #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
13481 #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
13482 #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
13483 #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
13484 #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
13485 #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
13486 #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
13487 #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
13488 #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
13489 #define LAPACK_sgges3 LAPACK_GLOBAL(sgges3,SGGES3)
13490 #define LAPACK_dgges3 LAPACK_GLOBAL(dgges3,DGGES3)
13491 #define LAPACK_cgges3 LAPACK_GLOBAL(cgges3,CGGES3)
13492 #define LAPACK_zgges3 LAPACK_GLOBAL(zgges3,ZGGES3)
13493 #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
13494 #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
13495 #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
13496 #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
13497 #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
13498 #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
13499 #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
13500 #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
13501 #define LAPACK_sggev3 LAPACK_GLOBAL(sggev3,SGGEV3)
13502 #define LAPACK_dggev3 LAPACK_GLOBAL(dggev3,DGGEV3)
13503 #define LAPACK_cggev3 LAPACK_GLOBAL(cggev3,CGGEV3)
13504 #define LAPACK_zggev3 LAPACK_GLOBAL(zggev3,ZGGEV3)
13505 #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
13506 #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
13507 #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
13508 #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
13509 #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
13510 #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
13511 #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
13512 #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
13513 #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
13514 #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
13515 #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
13516 #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
13517 #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
13518 #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
13519 #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
13520 #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
13521 #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
13522 #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
13523 #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
13524 #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
13525 #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
13526 #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
13527 #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
13528 #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
13529 #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
13530 #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
13531 #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
13532 #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
13533 #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
13534 #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
13535 #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
13536 #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
13537 #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
13538 #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
13539 #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
13540 #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
13541 #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
13542 #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
13543 #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
13544 #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
13545 #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
13546 #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
13547 #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
13548 #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
13549 #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
13550 #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
13551 #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
13552 #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
13553 #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
13554 #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
13555 #define LAPACK_slacn2 LAPACK_GLOBAL(slacn2,SLACN2)
13556 #define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2,DLACN2)
13557 #define LAPACK_clacn2 LAPACK_GLOBAL(clacn2,CLACN2)
13558 #define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2,ZLACN2)
13559 #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
13560 #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
13561 #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
13562 #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
13563 #define LAPACK_clacp2 LAPACK_GLOBAL(clacp2,CLACP2)
13564 #define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2,ZLACP2)
13565 #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
13566 #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
13567 #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
13568 #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
13569 #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
13570 #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
13571 #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
13572 #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
13573 #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
13574 #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
13575 #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
13576 #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
13577 #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
13578 #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
13579 #define LAPACK_clarcm LAPACK_GLOBAL(clarcm,CLARCM)
13580 #define LAPACK_zlarcm LAPACK_GLOBAL(zlarcm,ZLARCM)
13581 #define LAPACK_clacrm LAPACK_GLOBAL(clacrm,CLACRM)
13582 #define LAPACK_zlacrm LAPACK_GLOBAL(zlacrm,ZLACRM)
13583 #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
13584 #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
13585 #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
13586 #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
13587 #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
13588 #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
13589 #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
13590 #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
13591 #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
13592 #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
13593 #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
13594 #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
13595 #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
13596 #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
13597 #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
13598 #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
13599 #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
13600 #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
13601 #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
13602 #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
13603 #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
13604 #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
13605 #define LAPACK_slassq LAPACK_GLOBAL(slassq,SLASSQ)
13606 #define LAPACK_dlassq LAPACK_GLOBAL(dlassq,DLASSQ)
13607 #define LAPACK_classq LAPACK_GLOBAL(classq,CLASSQ)
13608 #define LAPACK_zlassq LAPACK_GLOBAL(zlassq,ZLASSQ)
13609 #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
13610 #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
13611 #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
13612 #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
13613 #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
13614 #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
13615 #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
13616 #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
13617 #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
13618 #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
13619 #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
13620 #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
13621 #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
13622 #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
13623 #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
13624 #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
13625 #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
13626 #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
13627 #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
13628 #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
13629 #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
13630 #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
13631 #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
13632 #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
13633 #define LAPACK_slascl LAPACK_GLOBAL(slascl,SLASCL)
13634 #define LAPACK_dlascl LAPACK_GLOBAL(dlascl,DLASCL)
13635 #define LAPACK_clascl LAPACK_GLOBAL(clascl,CLASCL)
13636 #define LAPACK_zlascl LAPACK_GLOBAL(zlascl,ZLASCL)
13637 #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
13638 #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
13639 #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
13640 #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
13641 #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
13642 #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
13643 #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
13644 #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
13645 #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
13646 #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
13647 #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
13648 #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
13649 #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
13650 #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
13651 #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
13652 #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
13653 #define LAPACK_slapmt LAPACK_GLOBAL(slapmt,SLAPMT)
13654 #define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt,DLAPMT)
13655 #define LAPACK_clapmt LAPACK_GLOBAL(clapmt,CLAPMT)
13656 #define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt,ZLAPMT)
13657 #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
13658 #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
13659 #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
13660 #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
13661 #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
13662 #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
13663 #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
13664 #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
13665 // LAPACK 3.3.0
13666 #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
13667 #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
13668 #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
13669 #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
13670 #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
13671 #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
13672 #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
13673 #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
13674 #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
13675 #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
13676 #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
13677 #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
13678 #define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1,CUNCSD2BY1)
13679 #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
13680 #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
13681 #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
13682 #define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1,DORCSD2BY1)
13683 #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
13684 #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
13685 #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
13686 #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
13687 #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
13688 #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
13689 #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
13690 #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
13691 #define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1,SORCSD2BY1)
13692 #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
13693 #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
13694 #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
13695 #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
13696 #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
13697 #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
13698 #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
13699 #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
13700 #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
13701 #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
13702 #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
13703 #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
13704 #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
13705 #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
13706 #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
13707 #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
13708 #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
13709 #define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1,ZUNCSD2BY1)
13710 // LAPACK 3.4.0
13711 #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
13712 #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
13713 #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
13714 #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
13715 #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
13716 #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
13717 #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
13718 #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
13719 #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
13720 #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
13721 #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
13722 #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
13723 #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
13724 #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
13725 #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
13726 #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
13727 #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
13728 #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
13729 #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
13730 #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
13731 #define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt,STPQRT)
13732 #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
13733 #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
13734 #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
13735 #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
13736 #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
13737 #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
13738 #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
13739 #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
13740 #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
13741 #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
13742 #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
13743 // LAPACK 3.5.0
13744 #define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook,SSYSV_ROOK)
13745 #define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook,DSYSV_ROOK)
13746 #define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook,CSYSV_ROOK)
13747 #define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook,ZSYSV_ROOK)
13748 #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
13749 #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
13750 #define LAPACK_ilaver LAPACK_GLOBAL(ilaver,ILAVER)
13751 // LAPACK 3.6.0
13752 #define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3,SGGSVD3)
13753 #define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3,DGGSVD3)
13754 #define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
13755 #define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3,ZGGSVD3)
13756 // LAPACK 3.7.0
13757 #define LAPACK_ssysv_aa LAPACK_GLOBAL(ssysv_aa,SSYSV_AA)
13758 #define LAPACK_dsysv_aa LAPACK_GLOBAL(dsysv_aa,DSYSV_AA)
13759 #define LAPACK_chesv_aa LAPACK_GLOBAL(chesv_aa,CHESV_AA)
13760 #define LAPACK_zsysv_aa LAPACK_GLOBAL(zsysv_aa,ZSYSV_AA)
13761 #define LAPACK_csysv_aa LAPACK_GLOBAL(csysv_aa,CSYSV_AA)
13762 #define LAPACK_zhesv_aa LAPACK_GLOBAL(zhesv_aa,ZHESV_AA)
13763 #define LAPACK_ssytrs_aa LAPACK_GLOBAL(ssytrs_aa,SSYTRS_AA)
13764 #define LAPACK_dsytrs_aa LAPACK_GLOBAL(dsytrs_aa,DSYTRS_AA)
13765 #define LAPACK_csytrs_aa LAPACK_GLOBAL(csytrs_aa,CSYTRS_AA)
13766 #define LAPACK_zsytrs_aa LAPACK_GLOBAL(zsytrs_aa,ZSYTRS_AA)
13767 #define LAPACK_chetrs_aa LAPACK_GLOBAL(chetrs_aa,CHETRS_AA)
13768 #define LAPACK_zhetrs_aa LAPACK_GLOBAL(zhetrs_aa,ZHETRS_AA)
13769 #define LAPACK_ssytrf_aa LAPACK_GLOBAL(ssytrf_aa,SSYTRF_AA)
13770 #define LAPACK_dsytrf_aa LAPACK_GLOBAL(dsytrf_aa,DSYTRF_AA)
13771 #define LAPACK_csytrf_aa LAPACK_GLOBAL(csytrf_aa,CSYTRF_AA)
13772 #define LAPACK_zsytrf_aa LAPACK_GLOBAL(zsytrf_aa,ZSYTRF_AA)
13773 #define LAPACK_chetrf_aa LAPACK_GLOBAL(chetrf_aa,CHETRF_AA)
13774 #define LAPACK_zhetrf_aa LAPACK_GLOBAL(zhetrf_aa,ZHETRF_AA)
13775
13776 #define LAPACK_ssysv_rk LAPACK_GLOBAL(ssysv_rk,SSYSV_RK)
13777 #define LAPACK_dsysv_rk LAPACK_GLOBAL(dsysv_rk,DSYSV_RK)
13778 #define LAPACK_chesv_rk LAPACK_GLOBAL(chesv_rk,CHESV_RK)
13779 #define LAPACK_zsysv_rk LAPACK_GLOBAL(zsysv_rk,ZSYSV_RK)
13780 #define LAPACK_csysv_rk LAPACK_GLOBAL(csysv_rk,CSYSV_RK)
13781 #define LAPACK_zhesv_rk LAPACK_GLOBAL(zhesv_rk,ZHESV_RK)
13782 #define LAPACK_ssytrf_rk LAPACK_GLOBAL(ssytrf_rk,SSYTRF_RK)
13783 #define LAPACK_dsytrf_rk LAPACK_GLOBAL(dsytrf_rk,DSYTRF_RK)
13784 #define LAPACK_csytrf_rk LAPACK_GLOBAL(csytrf_rk,CSYTRF_RK)
13785 #define LAPACK_zsytrf_rk LAPACK_GLOBAL(zsytrf_rk,ZSYTRF_RK)
13786 #define LAPACK_chetrf_rk LAPACK_GLOBAL(chetrf_rk,CHETRF_RK)
13787 #define LAPACK_zhetrf_rk LAPACK_GLOBAL(zhetrf_rk,ZHETRF_RK)
13788 #define LAPACK_ssytrs_3 LAPACK_GLOBAL(ssytrs_3,SSYTRS_3)
13789 #define LAPACK_dsytrs_3 LAPACK_GLOBAL(dsytrs_3,DSYTRS_3)
13790 #define LAPACK_csytrs_3 LAPACK_GLOBAL(csytrs_3,CSYTRS_3)
13791 #define LAPACK_zsytrs_3 LAPACK_GLOBAL(zsytrs_3,ZSYTRS_3)
13792 #define LAPACK_chetrs_3 LAPACK_GLOBAL(chetrs_3,CHETRS_3)
13793 #define LAPACK_zhetrs_3 LAPACK_GLOBAL(zhetrs_3,ZHETRS_3)
13794 #define LAPACK_ssytri_3 LAPACK_GLOBAL(ssytri_3,SSYTRI_3)
13795 #define LAPACK_dsytri_3 LAPACK_GLOBAL(dsytri_3,DSYTRI_3)
13796 #define LAPACK_csytri_3 LAPACK_GLOBAL(csytri_3,CSYTRI_3)
13797 #define LAPACK_zsytri_3 LAPACK_GLOBAL(zsytri_3,ZSYTRI_3)
13798 #define LAPACK_chetri_3 LAPACK_GLOBAL(chetri_3,CHETRI_3)
13799 #define LAPACK_zhetri_3 LAPACK_GLOBAL(zhetri_3,ZHETRI_3)
13800 #define LAPACK_ssycon_3 LAPACK_GLOBAL(ssycon_3,SSYCON_3)
13801 #define LAPACK_dsycon_3 LAPACK_GLOBAL(dsycon_3,DSYCON_3)
13802 #define LAPACK_csycon_3 LAPACK_GLOBAL(csycon_3,CSYCON_3)
13803 #define LAPACK_zsycon_3 LAPACK_GLOBAL(zsycon_3,ZSYCON_3)
13804 #define LAPACK_checon_3 LAPACK_GLOBAL(checon_3,CHECON_3)
13805 #define LAPACK_zhecon_3 LAPACK_GLOBAL(zhecon_3,ZHECON_3)
13806 #define LAPACK_sgelq LAPACK_GLOBAL(sgelq,SGELQ)
13807 #define LAPACK_dgelq LAPACK_GLOBAL(dgelq,DGELQ)
13808 #define LAPACK_cgelq LAPACK_GLOBAL(cgelq,CGELQ)
13809 #define LAPACK_zgelq LAPACK_GLOBAL(zgelq,ZGELQ)
13810 #define LAPACK_sgemlq LAPACK_GLOBAL(sgemlq,SGEMLQ)
13811 #define LAPACK_dgemlq LAPACK_GLOBAL(dgemlq,DGEMLQ)
13812 #define LAPACK_cgemlq LAPACK_GLOBAL(cgemlq,CGEMLQ)
13813 #define LAPACK_zgemlq LAPACK_GLOBAL(zgemlq,ZGEMLQ)
13814 #define LAPACK_sgeqr LAPACK_GLOBAL(sgeqr,SGEQR)
13815 #define LAPACK_dgeqr LAPACK_GLOBAL(dgeqr,DGEQR)
13816 #define LAPACK_cgeqr LAPACK_GLOBAL(cgeqr,CGEQR)
13817 #define LAPACK_zgeqr LAPACK_GLOBAL(zgeqr,ZGEQR)
13818 #define LAPACK_sgemqr LAPACK_GLOBAL(sgemqr,SGEMQR)
13819 #define LAPACK_dgemqr LAPACK_GLOBAL(dgemqr,DGEMQR)
13820 #define LAPACK_cgemqr LAPACK_GLOBAL(cgemqr,CGEMQR)
13821 #define LAPACK_zgemqr LAPACK_GLOBAL(zgemqr,ZGEMQR)
13822 #define LAPACK_sgetsls LAPACK_GLOBAL(sgetsls,SGETSLS)
13823 #define LAPACK_dgetsls LAPACK_GLOBAL(dgetsls,DGETSLS)
13824 #define LAPACK_cgetsls LAPACK_GLOBAL(cgetsls,CGETSLS)
13825 #define LAPACK_zgetsls LAPACK_GLOBAL(zgetsls,ZGETSLS)
13826
13827 // LAPACK 3.8.0
13828 #define LAPACK_ssysv_aa_2stage LAPACK_GLOBAL(ssysv_aa_2stage,SSYSV_AA_2STAGE)
13829 #define LAPACK_dsysv_aa_2stage LAPACK_GLOBAL(dsysv_aa_2stage,DSYSV_AA_2STAGE)
13830 #define LAPACK_chesv_aa_2stage LAPACK_GLOBAL(chesv_aa_2stage,CHESV_AA_2STAGE)
13831 #define LAPACK_zsysv_aa_2stage LAPACK_GLOBAL(zsysv_aa_2stage,ZSYSV_AA_2STAGE)
13832 #define LAPACK_csysv_aa_2stage LAPACK_GLOBAL(csysv_aa_2stage,CSYSV_AA_2STAGE)
13833 #define LAPACK_zhesv_aa_2stage LAPACK_GLOBAL(zhesv_aa_2stage,ZHESV_AA_2STAGE)
13834 #define LAPACK_ssytrs_aa_2stage LAPACK_GLOBAL(ssytrs_aa_2stage,SSYTRS_AA_2STAGE)
13835 #define LAPACK_dsytrs_aa_2stage LAPACK_GLOBAL(dsytrs_aa_2stage,DSYTRS_AA_2STAGE)
13836 #define LAPACK_csytrs_aa_2stage LAPACK_GLOBAL(csytrs_aa_2stage,CSYTRS_AA_2STAGE)
13837 #define LAPACK_zsytrs_aa_2stage LAPACK_GLOBAL(zsytrs_aa_2stage,ZSYTRS_AA_2STAGE)
13838 #define LAPACK_chetrs_aa_2stage LAPACK_GLOBAL(chetrs_aa_2stage,CHETRS_AA_2STAGE)
13839 #define LAPACK_zhetrs_aa_2stage LAPACK_GLOBAL(zhetrs_aa_2stage,ZHETRS_AA_2STAGE)
13840 #define LAPACK_ssytrf_aa_2stage LAPACK_GLOBAL(ssytrf_aa_2stage,SSYTRF_AA_2STAGE)
13841 #define LAPACK_dsytrf_aa_2stage LAPACK_GLOBAL(dsytrf_aa_2stage,DSYTRF_AA_2STAGE)
13842 #define LAPACK_csytrf_aa_2stage LAPACK_GLOBAL(csytrf_aa_2stage,CSYTRF_AA_2STAGE)
13843 #define LAPACK_zsytrf_aa_2stage LAPACK_GLOBAL(zsytrf_aa_2stage,ZSYTRF_AA_2STAGE)
13844 #define LAPACK_chetrf_aa_2stage LAPACK_GLOBAL(chetrf_aa_2stage,CHETRF_AA_2STAGE)
13845 #define LAPACK_zhetrf_aa_2stage LAPACK_GLOBAL(zhetrf_aa_2stage,ZHETRF_AA_2STAGE)
13846
13847
13848 void LAPACK_sgetrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13849                     lapack_int* ipiv, lapack_int *info );
13850 void LAPACK_dgetrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13851                     lapack_int* ipiv, lapack_int *info );
13852 void LAPACK_cgetrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13853                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13854 void LAPACK_zgetrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13855                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13856 void LAPACK_sgetrf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
13857                     lapack_int* ipiv, lapack_int *info );
13858 void LAPACK_dgetrf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
13859                     lapack_int* ipiv, lapack_int *info );
13860 void LAPACK_cgetrf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
13861                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13862 void LAPACK_zgetrf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
13863                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
13864 void LAPACK_sgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13865                     lapack_int* ku, float* ab, lapack_int* ldab,
13866                     lapack_int* ipiv, lapack_int *info );
13867 void LAPACK_dgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13868                     lapack_int* ku, double* ab, lapack_int* ldab,
13869                     lapack_int* ipiv, lapack_int *info );
13870 void LAPACK_cgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13871                     lapack_int* ku, lapack_complex_float* ab, lapack_int* ldab,
13872                     lapack_int* ipiv, lapack_int *info );
13873 void LAPACK_zgbtrf( lapack_int* m, lapack_int* n, lapack_int* kl,
13874                     lapack_int* ku, lapack_complex_double* ab, lapack_int* ldab,
13875                     lapack_int* ipiv, lapack_int *info );
13876 void LAPACK_sgttrf( lapack_int* n, float* dl, float* d, float* du, float* du2,
13877                     lapack_int* ipiv, lapack_int *info );
13878 void LAPACK_dgttrf( lapack_int* n, double* dl, double* d, double* du,
13879                     double* du2, lapack_int* ipiv, lapack_int *info );
13880 void LAPACK_cgttrf( lapack_int* n, lapack_complex_float* dl,
13881                     lapack_complex_float* d, lapack_complex_float* du,
13882                     lapack_complex_float* du2, lapack_int* ipiv,
13883                     lapack_int *info );
13884 void LAPACK_zgttrf( lapack_int* n, lapack_complex_double* dl,
13885                     lapack_complex_double* d, lapack_complex_double* du,
13886                     lapack_complex_double* du2, lapack_int* ipiv,
13887                     lapack_int *info );
13888 void LAPACK_spotrf2( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13889                     lapack_int *info );
13890 void LAPACK_dpotrf2( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13891                     lapack_int *info );
13892 void LAPACK_cpotrf2( char* uplo, lapack_int* n, lapack_complex_float* a,
13893                     lapack_int* lda, lapack_int *info );
13894 void LAPACK_zpotrf2( char* uplo, lapack_int* n, lapack_complex_double* a,
13895                     lapack_int* lda, lapack_int *info );
13896 void LAPACK_spotrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13897                     lapack_int *info );
13898 void LAPACK_dpotrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13899                     lapack_int *info );
13900 void LAPACK_cpotrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13901                     lapack_int* lda, lapack_int *info );
13902 void LAPACK_zpotrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13903                     lapack_int* lda, lapack_int *info );
13904 void LAPACK_dpstrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13905                     lapack_int* piv, lapack_int* rank, double* tol,
13906                     double* work, lapack_int *info );
13907 void LAPACK_spstrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13908                     lapack_int* piv, lapack_int* rank, float* tol, float* work,
13909                     lapack_int *info );
13910 void LAPACK_zpstrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13911                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
13912                     double* tol, double* work, lapack_int *info );
13913 void LAPACK_cpstrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13914                     lapack_int* lda, lapack_int* piv, lapack_int* rank,
13915                     float* tol, float* work, lapack_int *info );
13916 void LAPACK_dpftrf( char* transr, char* uplo, lapack_int* n, double* a,
13917                     lapack_int *info );
13918 void LAPACK_spftrf( char* transr, char* uplo, lapack_int* n, float* a,
13919                     lapack_int *info );
13920 void LAPACK_zpftrf( char* transr, char* uplo, lapack_int* n,
13921                     lapack_complex_double* a, lapack_int *info );
13922 void LAPACK_cpftrf( char* transr, char* uplo, lapack_int* n,
13923                     lapack_complex_float* a, lapack_int *info );
13924 void LAPACK_spptrf( char* uplo, lapack_int* n, float* ap, lapack_int *info );
13925 void LAPACK_dpptrf( char* uplo, lapack_int* n, double* ap, lapack_int *info );
13926 void LAPACK_cpptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13927                     lapack_int *info );
13928 void LAPACK_zpptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13929                     lapack_int *info );
13930 void LAPACK_spbtrf( char* uplo, lapack_int* n, lapack_int* kd, float* ab,
13931                     lapack_int* ldab, lapack_int *info );
13932 void LAPACK_dpbtrf( char* uplo, lapack_int* n, lapack_int* kd, double* ab,
13933                     lapack_int* ldab, lapack_int *info );
13934 void LAPACK_cpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13935                     lapack_complex_float* ab, lapack_int* ldab,
13936                     lapack_int *info );
13937 void LAPACK_zpbtrf( char* uplo, lapack_int* n, lapack_int* kd,
13938                     lapack_complex_double* ab, lapack_int* ldab,
13939                     lapack_int *info );
13940 void LAPACK_spttrf( lapack_int* n, float* d, float* e, lapack_int *info );
13941 void LAPACK_dpttrf( lapack_int* n, double* d, double* e, lapack_int *info );
13942 void LAPACK_cpttrf( lapack_int* n, float* d, lapack_complex_float* e,
13943                     lapack_int *info );
13944 void LAPACK_zpttrf( lapack_int* n, double* d, lapack_complex_double* e,
13945                     lapack_int *info );
13946 void LAPACK_ssytrf( char* uplo, lapack_int* n, float* a, lapack_int* lda,
13947                     lapack_int* ipiv, float* work, lapack_int* lwork,
13948                     lapack_int *info );
13949 void LAPACK_dsytrf( char* uplo, lapack_int* n, double* a, lapack_int* lda,
13950                     lapack_int* ipiv, double* work, lapack_int* lwork,
13951                     lapack_int *info );
13952 void LAPACK_csytrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13953                     lapack_int* lda, lapack_int* ipiv,
13954                     lapack_complex_float* work, lapack_int* lwork,
13955                     lapack_int *info );
13956 void LAPACK_zsytrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13957                     lapack_int* lda, lapack_int* ipiv,
13958                     lapack_complex_double* work, lapack_int* lwork,
13959                     lapack_int *info );
13960 void LAPACK_chetrf( char* uplo, lapack_int* n, lapack_complex_float* a,
13961                     lapack_int* lda, lapack_int* ipiv,
13962                     lapack_complex_float* work, lapack_int* lwork,
13963                     lapack_int *info );
13964 void LAPACK_zhetrf( char* uplo, lapack_int* n, lapack_complex_double* a,
13965                     lapack_int* lda, lapack_int* ipiv,
13966                     lapack_complex_double* work, lapack_int* lwork,
13967                     lapack_int *info );
13968 void LAPACK_ssptrf( char* uplo, lapack_int* n, float* ap, lapack_int* ipiv,
13969                     lapack_int *info );
13970 void LAPACK_dsptrf( char* uplo, lapack_int* n, double* ap, lapack_int* ipiv,
13971                     lapack_int *info );
13972 void LAPACK_csptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13973                     lapack_int* ipiv, lapack_int *info );
13974 void LAPACK_zsptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13975                     lapack_int* ipiv, lapack_int *info );
13976 void LAPACK_chptrf( char* uplo, lapack_int* n, lapack_complex_float* ap,
13977                     lapack_int* ipiv, lapack_int *info );
13978 void LAPACK_zhptrf( char* uplo, lapack_int* n, lapack_complex_double* ap,
13979                     lapack_int* ipiv, lapack_int *info );
13980 void LAPACK_sgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13981                     const float* a, lapack_int* lda, const lapack_int* ipiv,
13982                     float* b, lapack_int* ldb, lapack_int *info );
13983 void LAPACK_dgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13984                     const double* a, lapack_int* lda, const lapack_int* ipiv,
13985                     double* b, lapack_int* ldb, lapack_int *info );
13986 void LAPACK_cgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13987                     const lapack_complex_float* a, lapack_int* lda,
13988                     const lapack_int* ipiv, lapack_complex_float* b,
13989                     lapack_int* ldb, lapack_int *info );
13990 void LAPACK_zgetrs( char* trans, lapack_int* n, lapack_int* nrhs,
13991                     const lapack_complex_double* a, lapack_int* lda,
13992                     const lapack_int* ipiv, lapack_complex_double* b,
13993                     lapack_int* ldb, lapack_int *info );
13994 void LAPACK_sgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13995                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
13996                     const lapack_int* ipiv, float* b, lapack_int* ldb,
13997                     lapack_int *info );
13998 void LAPACK_dgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
13999                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
14000                     const lapack_int* ipiv, double* b, lapack_int* ldb,
14001                     lapack_int *info );
14002 void LAPACK_cgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14003                     lapack_int* nrhs, const lapack_complex_float* ab,
14004                     lapack_int* ldab, const lapack_int* ipiv,
14005                     lapack_complex_float* b, lapack_int* ldb,
14006                     lapack_int *info );
14007 void LAPACK_zgbtrs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14008                     lapack_int* nrhs, const lapack_complex_double* ab,
14009                     lapack_int* ldab, const lapack_int* ipiv,
14010                     lapack_complex_double* b, lapack_int* ldb,
14011                     lapack_int *info );
14012 void LAPACK_sgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14013                     const float* dl, const float* d, const float* du,
14014                     const float* du2, const lapack_int* ipiv, float* b,
14015                     lapack_int* ldb, lapack_int *info );
14016 void LAPACK_dgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14017                     const double* dl, const double* d, const double* du,
14018                     const double* du2, const lapack_int* ipiv, double* b,
14019                     lapack_int* ldb, lapack_int *info );
14020 void LAPACK_cgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14021                     const lapack_complex_float* dl,
14022                     const lapack_complex_float* d,
14023                     const lapack_complex_float* du,
14024                     const lapack_complex_float* du2, const lapack_int* ipiv,
14025                     lapack_complex_float* b, lapack_int* ldb,
14026                     lapack_int *info );
14027 void LAPACK_zgttrs( char* trans, lapack_int* n, lapack_int* nrhs,
14028                     const lapack_complex_double* dl,
14029                     const lapack_complex_double* d,
14030                     const lapack_complex_double* du,
14031                     const lapack_complex_double* du2, const lapack_int* ipiv,
14032                     lapack_complex_double* b, lapack_int* ldb,
14033                     lapack_int *info );
14034 void LAPACK_spotrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14035                     lapack_int* lda, float* b, lapack_int* ldb,
14036                     lapack_int *info );
14037 void LAPACK_dpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14038                     const double* a, lapack_int* lda, double* b,
14039                     lapack_int* ldb, lapack_int *info );
14040 void LAPACK_cpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14041                     const lapack_complex_float* a, lapack_int* lda,
14042                     lapack_complex_float* b, lapack_int* ldb,
14043                     lapack_int *info );
14044 void LAPACK_zpotrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14045                     const lapack_complex_double* a, lapack_int* lda,
14046                     lapack_complex_double* b, lapack_int* ldb,
14047                     lapack_int *info );
14048 void LAPACK_dpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14049                     const double* a, double* b, lapack_int* ldb,
14050                     lapack_int *info );
14051 void LAPACK_spftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14052                     const float* a, float* b, lapack_int* ldb,
14053                     lapack_int *info );
14054 void LAPACK_zpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14055                     const lapack_complex_double* a, lapack_complex_double* b,
14056                     lapack_int* ldb, lapack_int *info );
14057 void LAPACK_cpftrs( char* transr, char* uplo, lapack_int* n, lapack_int* nrhs,
14058                     const lapack_complex_float* a, lapack_complex_float* b,
14059                     lapack_int* ldb, lapack_int *info );
14060 void LAPACK_spptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14061                     const float* ap, float* b, lapack_int* ldb,
14062                     lapack_int *info );
14063 void LAPACK_dpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14064                     const double* ap, double* b, lapack_int* ldb,
14065                     lapack_int *info );
14066 void LAPACK_cpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14067                     const lapack_complex_float* ap, lapack_complex_float* b,
14068                     lapack_int* ldb, lapack_int *info );
14069 void LAPACK_zpptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14070                     const lapack_complex_double* ap, lapack_complex_double* b,
14071                     lapack_int* ldb, lapack_int *info );
14072 void LAPACK_spbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14073                     const float* ab, lapack_int* ldab, float* b,
14074                     lapack_int* ldb, lapack_int *info );
14075 void LAPACK_dpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14076                     const double* ab, lapack_int* ldab, double* b,
14077                     lapack_int* ldb, lapack_int *info );
14078 void LAPACK_cpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14079                     const lapack_complex_float* ab, lapack_int* ldab,
14080                     lapack_complex_float* b, lapack_int* ldb,
14081                     lapack_int *info );
14082 void LAPACK_zpbtrs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14083                     const lapack_complex_double* ab, lapack_int* ldab,
14084                     lapack_complex_double* b, lapack_int* ldb,
14085                     lapack_int *info );
14086 void LAPACK_spttrs( lapack_int* n, lapack_int* nrhs, const float* d,
14087                     const float* e, float* b, lapack_int* ldb,
14088                     lapack_int *info );
14089 void LAPACK_dpttrs( lapack_int* n, lapack_int* nrhs, const double* d,
14090                     const double* e, double* b, lapack_int* ldb,
14091                     lapack_int *info );
14092 void LAPACK_cpttrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
14093                     const lapack_complex_float* e, lapack_complex_float* b,
14094                     lapack_int* ldb, lapack_int *info );
14095 void LAPACK_zpttrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14096                     const double* d, const lapack_complex_double* e,
14097                     lapack_complex_double* b, lapack_int* ldb,
14098                     lapack_int *info );
14099 void LAPACK_ssytrs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14100                     lapack_int* lda, const lapack_int* ipiv, float* b,
14101                     lapack_int* ldb, lapack_int *info );
14102 void LAPACK_dsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14103                     const double* a, lapack_int* lda, const lapack_int* ipiv,
14104                     double* b, lapack_int* ldb, lapack_int *info );
14105 void LAPACK_csytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14106                     const lapack_complex_float* a, lapack_int* lda,
14107                     const lapack_int* ipiv, lapack_complex_float* b,
14108                     lapack_int* ldb, lapack_int *info );
14109 void LAPACK_zsytrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14110                     const lapack_complex_double* a, lapack_int* lda,
14111                     const lapack_int* ipiv, lapack_complex_double* b,
14112                     lapack_int* ldb, lapack_int *info );
14113 void LAPACK_chetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14114                     const lapack_complex_float* a, lapack_int* lda,
14115                     const lapack_int* ipiv, lapack_complex_float* b,
14116                     lapack_int* ldb, lapack_int *info );
14117 void LAPACK_zhetrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14118                     const lapack_complex_double* a, lapack_int* lda,
14119                     const lapack_int* ipiv, lapack_complex_double* b,
14120                     lapack_int* ldb, lapack_int *info );
14121 void LAPACK_ssptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14122                     const float* ap, const lapack_int* ipiv, float* b,
14123                     lapack_int* ldb, lapack_int *info );
14124 void LAPACK_dsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14125                     const double* ap, const lapack_int* ipiv, double* b,
14126                     lapack_int* ldb, lapack_int *info );
14127 void LAPACK_csptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14128                     const lapack_complex_float* ap, const lapack_int* ipiv,
14129                     lapack_complex_float* b, lapack_int* ldb,
14130                     lapack_int *info );
14131 void LAPACK_zsptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14132                     const lapack_complex_double* ap, const lapack_int* ipiv,
14133                     lapack_complex_double* b, lapack_int* ldb,
14134                     lapack_int *info );
14135 void LAPACK_chptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14136                     const lapack_complex_float* ap, const lapack_int* ipiv,
14137                     lapack_complex_float* b, lapack_int* ldb,
14138                     lapack_int *info );
14139 void LAPACK_zhptrs( char* uplo, lapack_int* n, lapack_int* nrhs,
14140                     const lapack_complex_double* ap, const lapack_int* ipiv,
14141                     lapack_complex_double* b, lapack_int* ldb,
14142                     lapack_int *info );
14143 void LAPACK_strtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14144                     lapack_int* nrhs, const float* a, lapack_int* lda, float* b,
14145                     lapack_int* ldb, lapack_int *info );
14146 void LAPACK_dtrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14147                     lapack_int* nrhs, const double* a, lapack_int* lda,
14148                     double* b, lapack_int* ldb, lapack_int *info );
14149 void LAPACK_ctrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14150                     lapack_int* nrhs, const lapack_complex_float* a,
14151                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
14152                     lapack_int *info );
14153 void LAPACK_ztrtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14154                     lapack_int* nrhs, const lapack_complex_double* a,
14155                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
14156                     lapack_int *info );
14157 void LAPACK_stptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14158                     lapack_int* nrhs, const float* ap, float* b,
14159                     lapack_int* ldb, lapack_int *info );
14160 void LAPACK_dtptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14161                     lapack_int* nrhs, const double* ap, double* b,
14162                     lapack_int* ldb, lapack_int *info );
14163 void LAPACK_ctptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14164                     lapack_int* nrhs, const lapack_complex_float* ap,
14165                     lapack_complex_float* b, lapack_int* ldb,
14166                     lapack_int *info );
14167 void LAPACK_ztptrs( char* uplo, char* trans, char* diag, lapack_int* n,
14168                     lapack_int* nrhs, const lapack_complex_double* ap,
14169                     lapack_complex_double* b, lapack_int* ldb,
14170                     lapack_int *info );
14171 void LAPACK_stbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14172                     lapack_int* kd, lapack_int* nrhs, const float* ab,
14173                     lapack_int* ldab, float* b, lapack_int* ldb,
14174                     lapack_int *info );
14175 void LAPACK_dtbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14176                     lapack_int* kd, lapack_int* nrhs, const double* ab,
14177                     lapack_int* ldab, double* b, lapack_int* ldb,
14178                     lapack_int *info );
14179 void LAPACK_ctbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14180                     lapack_int* kd, lapack_int* nrhs,
14181                     const lapack_complex_float* ab, lapack_int* ldab,
14182                     lapack_complex_float* b, lapack_int* ldb,
14183                     lapack_int *info );
14184 void LAPACK_ztbtrs( char* uplo, char* trans, char* diag, lapack_int* n,
14185                     lapack_int* kd, lapack_int* nrhs,
14186                     const lapack_complex_double* ab, lapack_int* ldab,
14187                     lapack_complex_double* b, lapack_int* ldb,
14188                     lapack_int *info );
14189 void LAPACK_sgecon( char* norm, lapack_int* n, const float* a, lapack_int* lda,
14190                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14191                     lapack_int *info );
14192 void LAPACK_dgecon( char* norm, lapack_int* n, const double* a, lapack_int* lda,
14193                     double* anorm, double* rcond, double* work,
14194                     lapack_int* iwork, lapack_int *info );
14195 void LAPACK_cgecon( char* norm, lapack_int* n, const lapack_complex_float* a,
14196                     lapack_int* lda, float* anorm, float* rcond,
14197                     lapack_complex_float* work, float* rwork,
14198                     lapack_int *info );
14199 void LAPACK_zgecon( char* norm, lapack_int* n, const lapack_complex_double* a,
14200                     lapack_int* lda, double* anorm, double* rcond,
14201                     lapack_complex_double* work, double* rwork,
14202                     lapack_int *info );
14203 void LAPACK_sgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14204                     const float* ab, lapack_int* ldab, const lapack_int* ipiv,
14205                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14206                     lapack_int *info );
14207 void LAPACK_dgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14208                     const double* ab, lapack_int* ldab, const lapack_int* ipiv,
14209                     double* anorm, double* rcond, double* work,
14210                     lapack_int* iwork, lapack_int *info );
14211 void LAPACK_cgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14212                     const lapack_complex_float* ab, lapack_int* ldab,
14213                     const lapack_int* ipiv, float* anorm, float* rcond,
14214                     lapack_complex_float* work, float* rwork,
14215                     lapack_int *info );
14216 void LAPACK_zgbcon( char* norm, lapack_int* n, lapack_int* kl, lapack_int* ku,
14217                     const lapack_complex_double* ab, lapack_int* ldab,
14218                     const lapack_int* ipiv, double* anorm, double* rcond,
14219                     lapack_complex_double* work, double* rwork,
14220                     lapack_int *info );
14221 void LAPACK_sgtcon( char* norm, lapack_int* n, const float* dl, const float* d,
14222                     const float* du, const float* du2, const lapack_int* ipiv,
14223                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14224                     lapack_int *info );
14225 void LAPACK_dgtcon( char* norm, lapack_int* n, const double* dl,
14226                     const double* d, const double* du, const double* du2,
14227                     const lapack_int* ipiv, double* anorm, double* rcond,
14228                     double* work, lapack_int* iwork, lapack_int *info );
14229 void LAPACK_cgtcon( char* norm, lapack_int* n, const lapack_complex_float* dl,
14230                     const lapack_complex_float* d,
14231                     const lapack_complex_float* du,
14232                     const lapack_complex_float* du2, const lapack_int* ipiv,
14233                     float* anorm, float* rcond, lapack_complex_float* work,
14234                     lapack_int *info );
14235 void LAPACK_zgtcon( char* norm, lapack_int* n, const lapack_complex_double* dl,
14236                     const lapack_complex_double* d,
14237                     const lapack_complex_double* du,
14238                     const lapack_complex_double* du2, const lapack_int* ipiv,
14239                     double* anorm, double* rcond, lapack_complex_double* work,
14240                     lapack_int *info );
14241 void LAPACK_spocon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14242                     float* anorm, float* rcond, float* work, lapack_int* iwork,
14243                     lapack_int *info );
14244 void LAPACK_dpocon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
14245                     double* anorm, double* rcond, double* work,
14246                     lapack_int* iwork, lapack_int *info );
14247 void LAPACK_cpocon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14248                     lapack_int* lda, float* anorm, float* rcond,
14249                     lapack_complex_float* work, float* rwork,
14250                     lapack_int *info );
14251 void LAPACK_zpocon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14252                     lapack_int* lda, double* anorm, double* rcond,
14253                     lapack_complex_double* work, double* rwork,
14254                     lapack_int *info );
14255 void LAPACK_sppcon( char* uplo, lapack_int* n, const float* ap, float* anorm,
14256                     float* rcond, float* work, lapack_int* iwork,
14257                     lapack_int *info );
14258 void LAPACK_dppcon( char* uplo, lapack_int* n, const double* ap, double* anorm,
14259                     double* rcond, double* work, lapack_int* iwork,
14260                     lapack_int *info );
14261 void LAPACK_cppcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14262                     float* anorm, float* rcond, lapack_complex_float* work,
14263                     float* rwork, lapack_int *info );
14264 void LAPACK_zppcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14265                     double* anorm, double* rcond, lapack_complex_double* work,
14266                     double* rwork, lapack_int *info );
14267 void LAPACK_spbcon( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
14268                     lapack_int* ldab, float* anorm, float* rcond, float* work,
14269                     lapack_int* iwork, lapack_int *info );
14270 void LAPACK_dpbcon( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
14271                     lapack_int* ldab, double* anorm, double* rcond,
14272                     double* work, lapack_int* iwork, lapack_int *info );
14273 void LAPACK_cpbcon( char* uplo, lapack_int* n, lapack_int* kd,
14274                     const lapack_complex_float* ab, lapack_int* ldab,
14275                     float* anorm, float* rcond, lapack_complex_float* work,
14276                     float* rwork, lapack_int *info );
14277 void LAPACK_zpbcon( char* uplo, lapack_int* n, lapack_int* kd,
14278                     const lapack_complex_double* ab, lapack_int* ldab,
14279                     double* anorm, double* rcond, lapack_complex_double* work,
14280                     double* rwork, lapack_int *info );
14281 void LAPACK_sptcon( lapack_int* n, const float* d, const float* e, float* anorm,
14282                     float* rcond, float* work, lapack_int *info );
14283 void LAPACK_dptcon( lapack_int* n, const double* d, const double* e,
14284                     double* anorm, double* rcond, double* work,
14285                     lapack_int *info );
14286 void LAPACK_cptcon( lapack_int* n, const float* d,
14287                     const lapack_complex_float* e, float* anorm, float* rcond,
14288                     float* work, lapack_int *info );
14289 void LAPACK_zptcon( lapack_int* n, const double* d,
14290                     const lapack_complex_double* e, double* anorm,
14291                     double* rcond, double* work, lapack_int *info );
14292 void LAPACK_ssycon( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
14293                     const lapack_int* ipiv, float* anorm, float* rcond,
14294                     float* work, lapack_int* iwork, lapack_int *info );
14295 void LAPACK_dsycon( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
14296                     const lapack_int* ipiv, double* anorm, double* rcond,
14297                     double* work, lapack_int* iwork, lapack_int *info );
14298 void LAPACK_csycon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14299                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
14300                     float* rcond, lapack_complex_float* work,
14301                     lapack_int *info );
14302 void LAPACK_zsycon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14303                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
14304                     double* rcond, lapack_complex_double* work,
14305                     lapack_int *info );
14306 void LAPACK_checon( char* uplo, lapack_int* n, const lapack_complex_float* a,
14307                     lapack_int* lda, const lapack_int* ipiv, float* anorm,
14308                     float* rcond, lapack_complex_float* work,
14309                     lapack_int *info );
14310 void LAPACK_zhecon( char* uplo, lapack_int* n, const lapack_complex_double* a,
14311                     lapack_int* lda, const lapack_int* ipiv, double* anorm,
14312                     double* rcond, lapack_complex_double* work,
14313                     lapack_int *info );
14314 void LAPACK_sspcon( char* uplo, lapack_int* n, const float* ap,
14315                     const lapack_int* ipiv, float* anorm, float* rcond,
14316                     float* work, lapack_int* iwork, lapack_int *info );
14317 void LAPACK_dspcon( char* uplo, lapack_int* n, const double* ap,
14318                     const lapack_int* ipiv, double* anorm, double* rcond,
14319                     double* work, lapack_int* iwork, lapack_int *info );
14320 void LAPACK_cspcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14321                     const lapack_int* ipiv, float* anorm, float* rcond,
14322                     lapack_complex_float* work, lapack_int *info );
14323 void LAPACK_zspcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14324                     const lapack_int* ipiv, double* anorm, double* rcond,
14325                     lapack_complex_double* work, lapack_int *info );
14326 void LAPACK_chpcon( char* uplo, lapack_int* n, const lapack_complex_float* ap,
14327                     const lapack_int* ipiv, float* anorm, float* rcond,
14328                     lapack_complex_float* work, lapack_int *info );
14329 void LAPACK_zhpcon( char* uplo, lapack_int* n, const lapack_complex_double* ap,
14330                     const lapack_int* ipiv, double* anorm, double* rcond,
14331                     lapack_complex_double* work, lapack_int *info );
14332 void LAPACK_strcon( char* norm, char* uplo, char* diag, lapack_int* n,
14333                     const float* a, lapack_int* lda, float* rcond, float* work,
14334                     lapack_int* iwork, lapack_int *info );
14335 void LAPACK_dtrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14336                     const double* a, lapack_int* lda, double* rcond,
14337                     double* work, lapack_int* iwork, lapack_int *info );
14338 void LAPACK_ctrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14339                     const lapack_complex_float* a, lapack_int* lda,
14340                     float* rcond, lapack_complex_float* work, float* rwork,
14341                     lapack_int *info );
14342 void LAPACK_ztrcon( char* norm, char* uplo, char* diag, lapack_int* n,
14343                     const lapack_complex_double* a, lapack_int* lda,
14344                     double* rcond, lapack_complex_double* work, double* rwork,
14345                     lapack_int *info );
14346 void LAPACK_stpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14347                     const float* ap, float* rcond, float* work,
14348                     lapack_int* iwork, lapack_int *info );
14349 void LAPACK_dtpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14350                     const double* ap, double* rcond, double* work,
14351                     lapack_int* iwork, lapack_int *info );
14352 void LAPACK_ctpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14353                     const lapack_complex_float* ap, float* rcond,
14354                     lapack_complex_float* work, float* rwork,
14355                     lapack_int *info );
14356 void LAPACK_ztpcon( char* norm, char* uplo, char* diag, lapack_int* n,
14357                     const lapack_complex_double* ap, double* rcond,
14358                     lapack_complex_double* work, double* rwork,
14359                     lapack_int *info );
14360 void LAPACK_stbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14361                     lapack_int* kd, const float* ab, lapack_int* ldab,
14362                     float* rcond, float* work, lapack_int* iwork,
14363                     lapack_int *info );
14364 void LAPACK_dtbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14365                     lapack_int* kd, const double* ab, lapack_int* ldab,
14366                     double* rcond, double* work, lapack_int* iwork,
14367                     lapack_int *info );
14368 void LAPACK_ctbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14369                     lapack_int* kd, const lapack_complex_float* ab,
14370                     lapack_int* ldab, float* rcond, lapack_complex_float* work,
14371                     float* rwork, lapack_int *info );
14372 void LAPACK_ztbcon( char* norm, char* uplo, char* diag, lapack_int* n,
14373                     lapack_int* kd, const lapack_complex_double* ab,
14374                     lapack_int* ldab, double* rcond,
14375                     lapack_complex_double* work, double* rwork,
14376                     lapack_int *info );
14377 void LAPACK_sgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14378                     const float* a, lapack_int* lda, const float* af,
14379                     lapack_int* ldaf, const lapack_int* ipiv, const float* b,
14380                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14381                     float* berr, float* work, lapack_int* iwork,
14382                     lapack_int *info );
14383 void LAPACK_dgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14384                     const double* a, lapack_int* lda, const double* af,
14385                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
14386                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14387                     double* berr, double* work, lapack_int* iwork,
14388                     lapack_int *info );
14389 void LAPACK_cgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14390                     const lapack_complex_float* a, lapack_int* lda,
14391                     const lapack_complex_float* af, lapack_int* ldaf,
14392                     const lapack_int* ipiv, const lapack_complex_float* b,
14393                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14394                     float* ferr, float* berr, lapack_complex_float* work,
14395                     float* rwork, lapack_int *info );
14396 void LAPACK_zgerfs( char* trans, lapack_int* n, lapack_int* nrhs,
14397                     const lapack_complex_double* a, lapack_int* lda,
14398                     const lapack_complex_double* af, lapack_int* ldaf,
14399                     const lapack_int* ipiv, const lapack_complex_double* b,
14400                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14401                     double* ferr, double* berr, lapack_complex_double* work,
14402                     double* rwork, lapack_int *info );
14403 void LAPACK_dgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14404                      const double* a, lapack_int* lda, const double* af,
14405                      lapack_int* ldaf, const lapack_int* ipiv, const double* r,
14406                      const double* c, const double* b, lapack_int* ldb,
14407                      double* x, lapack_int* ldx, double* rcond, double* berr,
14408                      lapack_int* n_err_bnds, double* err_bnds_norm,
14409                      double* err_bnds_comp, lapack_int* nparams, double* params,
14410                      double* work, lapack_int* iwork, lapack_int *info );
14411 void LAPACK_sgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14412                      const float* a, lapack_int* lda, const float* af,
14413                      lapack_int* ldaf, const lapack_int* ipiv, const float* r,
14414                      const float* c, const float* b, lapack_int* ldb, float* x,
14415                      lapack_int* ldx, float* rcond, float* berr,
14416                      lapack_int* n_err_bnds, float* err_bnds_norm,
14417                      float* err_bnds_comp, lapack_int* nparams, float* params,
14418                      float* work, lapack_int* iwork, lapack_int *info );
14419 void LAPACK_zgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14420                      const lapack_complex_double* a, lapack_int* lda,
14421                      const lapack_complex_double* af, lapack_int* ldaf,
14422                      const lapack_int* ipiv, const double* r, const double* c,
14423                      const lapack_complex_double* b, lapack_int* ldb,
14424                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14425                      double* berr, lapack_int* n_err_bnds,
14426                      double* err_bnds_norm, double* err_bnds_comp,
14427                      lapack_int* nparams, double* params,
14428                      lapack_complex_double* work, double* rwork,
14429                      lapack_int *info );
14430 void LAPACK_cgerfsx( char* trans, char* equed, lapack_int* n, lapack_int* nrhs,
14431                      const lapack_complex_float* a, lapack_int* lda,
14432                      const lapack_complex_float* af, lapack_int* ldaf,
14433                      const lapack_int* ipiv, const float* r, const float* c,
14434                      const lapack_complex_float* b, lapack_int* ldb,
14435                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14436                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14437                      float* err_bnds_comp, lapack_int* nparams, float* params,
14438                      lapack_complex_float* work, float* rwork,
14439                      lapack_int *info );
14440 void LAPACK_sgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14441                     lapack_int* nrhs, const float* ab, lapack_int* ldab,
14442                     const float* afb, lapack_int* ldafb, const lapack_int* ipiv,
14443                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14444                     float* ferr, float* berr, float* work, lapack_int* iwork,
14445                     lapack_int *info );
14446 void LAPACK_dgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14447                     lapack_int* nrhs, const double* ab, lapack_int* ldab,
14448                     const double* afb, lapack_int* ldafb,
14449                     const lapack_int* ipiv, const double* b, lapack_int* ldb,
14450                     double* x, lapack_int* ldx, double* ferr, double* berr,
14451                     double* work, lapack_int* iwork, lapack_int *info );
14452 void LAPACK_cgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14453                     lapack_int* nrhs, const lapack_complex_float* ab,
14454                     lapack_int* ldab, const lapack_complex_float* afb,
14455                     lapack_int* ldafb, const lapack_int* ipiv,
14456                     const lapack_complex_float* b, lapack_int* ldb,
14457                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14458                     float* berr, lapack_complex_float* work, float* rwork,
14459                     lapack_int *info );
14460 void LAPACK_zgbrfs( char* trans, lapack_int* n, lapack_int* kl, lapack_int* ku,
14461                     lapack_int* nrhs, const lapack_complex_double* ab,
14462                     lapack_int* ldab, const lapack_complex_double* afb,
14463                     lapack_int* ldafb, const lapack_int* ipiv,
14464                     const lapack_complex_double* b, lapack_int* ldb,
14465                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14466                     double* berr, lapack_complex_double* work, double* rwork,
14467                     lapack_int *info );
14468 void LAPACK_dgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14469                      lapack_int* ku, lapack_int* nrhs, const double* ab,
14470                      lapack_int* ldab, const double* afb, lapack_int* ldafb,
14471                      const lapack_int* ipiv, const double* r, const double* c,
14472                      const double* b, lapack_int* ldb, double* x,
14473                      lapack_int* ldx, double* rcond, double* berr,
14474                      lapack_int* n_err_bnds, double* err_bnds_norm,
14475                      double* err_bnds_comp, lapack_int* nparams, double* params,
14476                      double* work, lapack_int* iwork, lapack_int *info );
14477 void LAPACK_sgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14478                      lapack_int* ku, lapack_int* nrhs, const float* ab,
14479                      lapack_int* ldab, const float* afb, lapack_int* ldafb,
14480                      const lapack_int* ipiv, const float* r, const float* c,
14481                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14482                      float* rcond, float* berr, lapack_int* n_err_bnds,
14483                      float* err_bnds_norm, float* err_bnds_comp,
14484                      lapack_int* nparams, float* params, float* work,
14485                      lapack_int* iwork, lapack_int *info );
14486 void LAPACK_zgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14487                      lapack_int* ku, lapack_int* nrhs,
14488                      const lapack_complex_double* ab, lapack_int* ldab,
14489                      const lapack_complex_double* afb, lapack_int* ldafb,
14490                      const lapack_int* ipiv, const double* r, const double* c,
14491                      const lapack_complex_double* b, lapack_int* ldb,
14492                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14493                      double* berr, lapack_int* n_err_bnds,
14494                      double* err_bnds_norm, double* err_bnds_comp,
14495                      lapack_int* nparams, double* params,
14496                      lapack_complex_double* work, double* rwork,
14497                      lapack_int *info );
14498 void LAPACK_cgbrfsx( char* trans, char* equed, lapack_int* n, lapack_int* kl,
14499                      lapack_int* ku, lapack_int* nrhs,
14500                      const lapack_complex_float* ab, lapack_int* ldab,
14501                      const lapack_complex_float* afb, lapack_int* ldafb,
14502                      const lapack_int* ipiv, const float* r, const float* c,
14503                      const lapack_complex_float* b, lapack_int* ldb,
14504                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14505                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14506                      float* err_bnds_comp, lapack_int* nparams, float* params,
14507                      lapack_complex_float* work, float* rwork,
14508                      lapack_int *info );
14509 void LAPACK_sgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14510                     const float* dl, const float* d, const float* du,
14511                     const float* dlf, const float* df, const float* duf,
14512                     const float* du2, const lapack_int* ipiv, const float* b,
14513                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14514                     float* berr, float* work, lapack_int* iwork,
14515                     lapack_int *info );
14516 void LAPACK_dgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14517                     const double* dl, const double* d, const double* du,
14518                     const double* dlf, const double* df, const double* duf,
14519                     const double* du2, const lapack_int* ipiv, const double* b,
14520                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14521                     double* berr, double* work, lapack_int* iwork,
14522                     lapack_int *info );
14523 void LAPACK_cgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14524                     const lapack_complex_float* dl,
14525                     const lapack_complex_float* d,
14526                     const lapack_complex_float* du,
14527                     const lapack_complex_float* dlf,
14528                     const lapack_complex_float* df,
14529                     const lapack_complex_float* duf,
14530                     const lapack_complex_float* du2, const lapack_int* ipiv,
14531                     const lapack_complex_float* b, lapack_int* ldb,
14532                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14533                     float* berr, lapack_complex_float* work, float* rwork,
14534                     lapack_int *info );
14535 void LAPACK_zgtrfs( char* trans, lapack_int* n, lapack_int* nrhs,
14536                     const lapack_complex_double* dl,
14537                     const lapack_complex_double* d,
14538                     const lapack_complex_double* du,
14539                     const lapack_complex_double* dlf,
14540                     const lapack_complex_double* df,
14541                     const lapack_complex_double* duf,
14542                     const lapack_complex_double* du2, const lapack_int* ipiv,
14543                     const lapack_complex_double* b, lapack_int* ldb,
14544                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14545                     double* berr, lapack_complex_double* work, double* rwork,
14546                     lapack_int *info );
14547 void LAPACK_sporfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14548                     lapack_int* lda, const float* af, lapack_int* ldaf,
14549                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14550                     float* ferr, float* berr, float* work, lapack_int* iwork,
14551                     lapack_int *info );
14552 void LAPACK_dporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14553                     const double* a, lapack_int* lda, const double* af,
14554                     lapack_int* ldaf, const double* b, lapack_int* ldb,
14555                     double* x, lapack_int* ldx, double* ferr, double* berr,
14556                     double* work, lapack_int* iwork, lapack_int *info );
14557 void LAPACK_cporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14558                     const lapack_complex_float* a, lapack_int* lda,
14559                     const lapack_complex_float* af, lapack_int* ldaf,
14560                     const lapack_complex_float* b, lapack_int* ldb,
14561                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14562                     float* berr, lapack_complex_float* work, float* rwork,
14563                     lapack_int *info );
14564 void LAPACK_zporfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14565                     const lapack_complex_double* a, lapack_int* lda,
14566                     const lapack_complex_double* af, lapack_int* ldaf,
14567                     const lapack_complex_double* b, lapack_int* ldb,
14568                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14569                     double* berr, lapack_complex_double* work, double* rwork,
14570                     lapack_int *info );
14571 void LAPACK_dporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14572                      const double* a, lapack_int* lda, const double* af,
14573                      lapack_int* ldaf, const double* s, const double* b,
14574                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
14575                      double* berr, lapack_int* n_err_bnds,
14576                      double* err_bnds_norm, double* err_bnds_comp,
14577                      lapack_int* nparams, double* params, double* work,
14578                      lapack_int* iwork, lapack_int *info );
14579 void LAPACK_sporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14580                      const float* a, lapack_int* lda, const float* af,
14581                      lapack_int* ldaf, const float* s, const float* b,
14582                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
14583                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14584                      float* err_bnds_comp, lapack_int* nparams, float* params,
14585                      float* work, lapack_int* iwork, lapack_int *info );
14586 void LAPACK_zporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14587                      const lapack_complex_double* a, lapack_int* lda,
14588                      const lapack_complex_double* af, lapack_int* ldaf,
14589                      const double* s, const lapack_complex_double* b,
14590                      lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14591                      double* rcond, double* berr, lapack_int* n_err_bnds,
14592                      double* err_bnds_norm, double* err_bnds_comp,
14593                      lapack_int* nparams, double* params,
14594                      lapack_complex_double* work, double* rwork,
14595                      lapack_int *info );
14596 void LAPACK_cporfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14597                      const lapack_complex_float* a, lapack_int* lda,
14598                      const lapack_complex_float* af, lapack_int* ldaf,
14599                      const float* s, const lapack_complex_float* b,
14600                      lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14601                      float* rcond, float* berr, lapack_int* n_err_bnds,
14602                      float* err_bnds_norm, float* err_bnds_comp,
14603                      lapack_int* nparams, float* params,
14604                      lapack_complex_float* work, float* rwork,
14605                      lapack_int *info );
14606 void LAPACK_spprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14607                     const float* ap, const float* afp, const float* b,
14608                     lapack_int* ldb, float* x, lapack_int* ldx, float* ferr,
14609                     float* berr, float* work, lapack_int* iwork,
14610                     lapack_int *info );
14611 void LAPACK_dpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14612                     const double* ap, const double* afp, const double* b,
14613                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14614                     double* berr, double* work, lapack_int* iwork,
14615                     lapack_int *info );
14616 void LAPACK_cpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14617                     const lapack_complex_float* ap,
14618                     const lapack_complex_float* afp,
14619                     const lapack_complex_float* b, lapack_int* ldb,
14620                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14621                     float* berr, lapack_complex_float* work, float* rwork,
14622                     lapack_int *info );
14623 void LAPACK_zpprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14624                     const lapack_complex_double* ap,
14625                     const lapack_complex_double* afp,
14626                     const lapack_complex_double* b, lapack_int* ldb,
14627                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14628                     double* berr, lapack_complex_double* work, double* rwork,
14629                     lapack_int *info );
14630 void LAPACK_spbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14631                     const float* ab, lapack_int* ldab, const float* afb,
14632                     lapack_int* ldafb, const float* b, lapack_int* ldb,
14633                     float* x, lapack_int* ldx, float* ferr, float* berr,
14634                     float* work, lapack_int* iwork, lapack_int *info );
14635 void LAPACK_dpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14636                     const double* ab, lapack_int* ldab, const double* afb,
14637                     lapack_int* ldafb, const double* b, lapack_int* ldb,
14638                     double* x, lapack_int* ldx, double* ferr, double* berr,
14639                     double* work, lapack_int* iwork, lapack_int *info );
14640 void LAPACK_cpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14641                     const lapack_complex_float* ab, lapack_int* ldab,
14642                     const lapack_complex_float* afb, lapack_int* ldafb,
14643                     const lapack_complex_float* b, lapack_int* ldb,
14644                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14645                     float* berr, lapack_complex_float* work, float* rwork,
14646                     lapack_int *info );
14647 void LAPACK_zpbrfs( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
14648                     const lapack_complex_double* ab, lapack_int* ldab,
14649                     const lapack_complex_double* afb, lapack_int* ldafb,
14650                     const lapack_complex_double* b, lapack_int* ldb,
14651                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14652                     double* berr, lapack_complex_double* work, double* rwork,
14653                     lapack_int *info );
14654 void LAPACK_sptrfs( lapack_int* n, lapack_int* nrhs, const float* d,
14655                     const float* e, const float* df, const float* ef,
14656                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14657                     float* ferr, float* berr, float* work, lapack_int *info );
14658 void LAPACK_dptrfs( lapack_int* n, lapack_int* nrhs, const double* d,
14659                     const double* e, const double* df, const double* ef,
14660                     const double* b, lapack_int* ldb, double* x,
14661                     lapack_int* ldx, double* ferr, double* berr, double* work,
14662                     lapack_int *info );
14663 void LAPACK_cptrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* d,
14664                     const lapack_complex_float* e, const float* df,
14665                     const lapack_complex_float* ef,
14666                     const lapack_complex_float* b, lapack_int* ldb,
14667                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14668                     float* berr, lapack_complex_float* work, float* rwork,
14669                     lapack_int *info );
14670 void LAPACK_zptrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14671                     const double* d, const lapack_complex_double* e,
14672                     const double* df, const lapack_complex_double* ef,
14673                     const lapack_complex_double* b, lapack_int* ldb,
14674                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14675                     double* berr, lapack_complex_double* work, double* rwork,
14676                     lapack_int *info );
14677 void LAPACK_ssyrfs( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
14678                     lapack_int* lda, const float* af, lapack_int* ldaf,
14679                     const lapack_int* ipiv, const float* b, lapack_int* ldb,
14680                     float* x, lapack_int* ldx, float* ferr, float* berr,
14681                     float* work, lapack_int* iwork, lapack_int *info );
14682 void LAPACK_dsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14683                     const double* a, lapack_int* lda, const double* af,
14684                     lapack_int* ldaf, const lapack_int* ipiv, const double* b,
14685                     lapack_int* ldb, double* x, lapack_int* ldx, double* ferr,
14686                     double* berr, double* work, lapack_int* iwork,
14687                     lapack_int *info );
14688 void LAPACK_csyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14689                     const lapack_complex_float* a, lapack_int* lda,
14690                     const lapack_complex_float* af, lapack_int* ldaf,
14691                     const lapack_int* ipiv, const lapack_complex_float* b,
14692                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14693                     float* ferr, float* berr, lapack_complex_float* work,
14694                     float* rwork, lapack_int *info );
14695 void LAPACK_zsyrfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14696                     const lapack_complex_double* a, lapack_int* lda,
14697                     const lapack_complex_double* af, lapack_int* ldaf,
14698                     const lapack_int* ipiv, const lapack_complex_double* b,
14699                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14700                     double* ferr, double* berr, lapack_complex_double* work,
14701                     double* rwork, lapack_int *info );
14702 void LAPACK_dsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14703                      const double* a, lapack_int* lda, const double* af,
14704                      lapack_int* ldaf, const lapack_int* ipiv, const double* s,
14705                      const double* b, lapack_int* ldb, double* x,
14706                      lapack_int* ldx, double* rcond, double* berr,
14707                      lapack_int* n_err_bnds, double* err_bnds_norm,
14708                      double* err_bnds_comp, lapack_int* nparams, double* params,
14709                      double* work, lapack_int* iwork, lapack_int *info );
14710 void LAPACK_ssyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14711                      const float* a, lapack_int* lda, const float* af,
14712                      lapack_int* ldaf, const lapack_int* ipiv, const float* s,
14713                      const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14714                      float* rcond, float* berr, lapack_int* n_err_bnds,
14715                      float* err_bnds_norm, float* err_bnds_comp,
14716                      lapack_int* nparams, float* params, float* work,
14717                      lapack_int* iwork, lapack_int *info );
14718 void LAPACK_zsyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14719                      const lapack_complex_double* a, lapack_int* lda,
14720                      const lapack_complex_double* af, lapack_int* ldaf,
14721                      const lapack_int* ipiv, const double* s,
14722                      const lapack_complex_double* b, lapack_int* ldb,
14723                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14724                      double* berr, lapack_int* n_err_bnds,
14725                      double* err_bnds_norm, double* err_bnds_comp,
14726                      lapack_int* nparams, double* params,
14727                      lapack_complex_double* work, double* rwork,
14728                      lapack_int *info );
14729 void LAPACK_csyrfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14730                      const lapack_complex_float* a, lapack_int* lda,
14731                      const lapack_complex_float* af, lapack_int* ldaf,
14732                      const lapack_int* ipiv, const float* s,
14733                      const lapack_complex_float* b, lapack_int* ldb,
14734                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14735                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14736                      float* err_bnds_comp, lapack_int* nparams, float* params,
14737                      lapack_complex_float* work, float* rwork,
14738                      lapack_int *info );
14739 void LAPACK_cherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14740                     const lapack_complex_float* a, lapack_int* lda,
14741                     const lapack_complex_float* af, lapack_int* ldaf,
14742                     const lapack_int* ipiv, const lapack_complex_float* b,
14743                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
14744                     float* ferr, float* berr, lapack_complex_float* work,
14745                     float* rwork, lapack_int *info );
14746 void LAPACK_zherfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14747                     const lapack_complex_double* a, lapack_int* lda,
14748                     const lapack_complex_double* af, lapack_int* ldaf,
14749                     const lapack_int* ipiv, const lapack_complex_double* b,
14750                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
14751                     double* ferr, double* berr, lapack_complex_double* work,
14752                     double* rwork, lapack_int *info );
14753 void LAPACK_zherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14754                      const lapack_complex_double* a, lapack_int* lda,
14755                      const lapack_complex_double* af, lapack_int* ldaf,
14756                      const lapack_int* ipiv, const double* s,
14757                      const lapack_complex_double* b, lapack_int* ldb,
14758                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
14759                      double* berr, lapack_int* n_err_bnds,
14760                      double* err_bnds_norm, double* err_bnds_comp,
14761                      lapack_int* nparams, double* params,
14762                      lapack_complex_double* work, double* rwork,
14763                      lapack_int *info );
14764 void LAPACK_cherfsx( char* uplo, char* equed, lapack_int* n, lapack_int* nrhs,
14765                      const lapack_complex_float* a, lapack_int* lda,
14766                      const lapack_complex_float* af, lapack_int* ldaf,
14767                      const lapack_int* ipiv, const float* s,
14768                      const lapack_complex_float* b, lapack_int* ldb,
14769                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
14770                      float* berr, lapack_int* n_err_bnds, float* err_bnds_norm,
14771                      float* err_bnds_comp, lapack_int* nparams, float* params,
14772                      lapack_complex_float* work, float* rwork,
14773                      lapack_int *info );
14774 void LAPACK_ssprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14775                     const float* ap, const float* afp, const lapack_int* ipiv,
14776                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
14777                     float* ferr, float* berr, float* work, lapack_int* iwork,
14778                     lapack_int *info );
14779 void LAPACK_dsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14780                     const double* ap, const double* afp, const lapack_int* ipiv,
14781                     const double* b, lapack_int* ldb, double* x,
14782                     lapack_int* ldx, double* ferr, double* berr, double* work,
14783                     lapack_int* iwork, lapack_int *info );
14784 void LAPACK_csprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14785                     const lapack_complex_float* ap,
14786                     const lapack_complex_float* afp, const lapack_int* ipiv,
14787                     const lapack_complex_float* b, lapack_int* ldb,
14788                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14789                     float* berr, lapack_complex_float* work, float* rwork,
14790                     lapack_int *info );
14791 void LAPACK_zsprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14792                     const lapack_complex_double* ap,
14793                     const lapack_complex_double* afp, const lapack_int* ipiv,
14794                     const lapack_complex_double* b, lapack_int* ldb,
14795                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14796                     double* berr, lapack_complex_double* work, double* rwork,
14797                     lapack_int *info );
14798 void LAPACK_chprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14799                     const lapack_complex_float* ap,
14800                     const lapack_complex_float* afp, const lapack_int* ipiv,
14801                     const lapack_complex_float* b, lapack_int* ldb,
14802                     lapack_complex_float* x, lapack_int* ldx, float* ferr,
14803                     float* berr, lapack_complex_float* work, float* rwork,
14804                     lapack_int *info );
14805 void LAPACK_zhprfs( char* uplo, lapack_int* n, lapack_int* nrhs,
14806                     const lapack_complex_double* ap,
14807                     const lapack_complex_double* afp, const lapack_int* ipiv,
14808                     const lapack_complex_double* b, lapack_int* ldb,
14809                     lapack_complex_double* x, lapack_int* ldx, double* ferr,
14810                     double* berr, lapack_complex_double* work, double* rwork,
14811                     lapack_int *info );
14812 void LAPACK_strrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14813                     lapack_int* nrhs, const float* a, lapack_int* lda,
14814                     const float* b, lapack_int* ldb, const float* x,
14815                     lapack_int* ldx, float* ferr, float* berr, float* work,
14816                     lapack_int* iwork, lapack_int *info );
14817 void LAPACK_dtrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14818                     lapack_int* nrhs, const double* a, lapack_int* lda,
14819                     const double* b, lapack_int* ldb, const double* x,
14820                     lapack_int* ldx, double* ferr, double* berr, double* work,
14821                     lapack_int* iwork, lapack_int *info );
14822 void LAPACK_ctrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14823                     lapack_int* nrhs, const lapack_complex_float* a,
14824                     lapack_int* lda, const lapack_complex_float* b,
14825                     lapack_int* ldb, const lapack_complex_float* x,
14826                     lapack_int* ldx, float* ferr, float* berr,
14827                     lapack_complex_float* work, float* rwork,
14828                     lapack_int *info );
14829 void LAPACK_ztrrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14830                     lapack_int* nrhs, const lapack_complex_double* a,
14831                     lapack_int* lda, const lapack_complex_double* b,
14832                     lapack_int* ldb, const lapack_complex_double* x,
14833                     lapack_int* ldx, double* ferr, double* berr,
14834                     lapack_complex_double* work, double* rwork,
14835                     lapack_int *info );
14836 void LAPACK_stprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14837                     lapack_int* nrhs, const float* ap, const float* b,
14838                     lapack_int* ldb, const float* x, lapack_int* ldx,
14839                     float* ferr, float* berr, float* work, lapack_int* iwork,
14840                     lapack_int *info );
14841 void LAPACK_dtprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14842                     lapack_int* nrhs, const double* ap, const double* b,
14843                     lapack_int* ldb, const double* x, lapack_int* ldx,
14844                     double* ferr, double* berr, double* work, lapack_int* iwork,
14845                     lapack_int *info );
14846 void LAPACK_ctprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14847                     lapack_int* nrhs, const lapack_complex_float* ap,
14848                     const lapack_complex_float* b, lapack_int* ldb,
14849                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
14850                     float* berr, lapack_complex_float* work, float* rwork,
14851                     lapack_int *info );
14852 void LAPACK_ztprfs( char* uplo, char* trans, char* diag, lapack_int* n,
14853                     lapack_int* nrhs, const lapack_complex_double* ap,
14854                     const lapack_complex_double* b, lapack_int* ldb,
14855                     const lapack_complex_double* x, lapack_int* ldx,
14856                     double* ferr, double* berr, lapack_complex_double* work,
14857                     double* rwork, lapack_int *info );
14858 void LAPACK_stbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14859                     lapack_int* kd, lapack_int* nrhs, const float* ab,
14860                     lapack_int* ldab, const float* b, lapack_int* ldb,
14861                     const float* x, lapack_int* ldx, float* ferr, float* berr,
14862                     float* work, lapack_int* iwork, lapack_int *info );
14863 void LAPACK_dtbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14864                     lapack_int* kd, lapack_int* nrhs, const double* ab,
14865                     lapack_int* ldab, const double* b, lapack_int* ldb,
14866                     const double* x, lapack_int* ldx, double* ferr,
14867                     double* berr, double* work, lapack_int* iwork,
14868                     lapack_int *info );
14869 void LAPACK_ctbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14870                     lapack_int* kd, lapack_int* nrhs,
14871                     const lapack_complex_float* ab, lapack_int* ldab,
14872                     const lapack_complex_float* b, lapack_int* ldb,
14873                     const lapack_complex_float* x, lapack_int* ldx, float* ferr,
14874                     float* berr, lapack_complex_float* work, float* rwork,
14875                     lapack_int *info );
14876 void LAPACK_ztbrfs( char* uplo, char* trans, char* diag, lapack_int* n,
14877                     lapack_int* kd, lapack_int* nrhs,
14878                     const lapack_complex_double* ab, lapack_int* ldab,
14879                     const lapack_complex_double* b, lapack_int* ldb,
14880                     const lapack_complex_double* x, lapack_int* ldx,
14881                     double* ferr, double* berr, lapack_complex_double* work,
14882                     double* rwork, lapack_int *info );
14883 void LAPACK_sgetri( lapack_int* n, float* a, lapack_int* lda,
14884                     const lapack_int* ipiv, float* work, lapack_int* lwork,
14885                     lapack_int *info );
14886 void LAPACK_dgetri( lapack_int* n, double* a, lapack_int* lda,
14887                     const lapack_int* ipiv, double* work, lapack_int* lwork,
14888                     lapack_int *info );
14889 void LAPACK_cgetri( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
14890                     const lapack_int* ipiv, lapack_complex_float* work,
14891                     lapack_int* lwork, lapack_int *info );
14892 void LAPACK_zgetri( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
14893                     const lapack_int* ipiv, lapack_complex_double* work,
14894                     lapack_int* lwork, lapack_int *info );
14895 void LAPACK_spotri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
14896                     lapack_int *info );
14897 void LAPACK_dpotri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
14898                     lapack_int *info );
14899 void LAPACK_cpotri( char* uplo, lapack_int* n, lapack_complex_float* a,
14900                     lapack_int* lda, lapack_int *info );
14901 void LAPACK_zpotri( char* uplo, lapack_int* n, lapack_complex_double* a,
14902                     lapack_int* lda, lapack_int *info );
14903 void LAPACK_dpftri( char* transr, char* uplo, lapack_int* n, double* a,
14904                     lapack_int *info );
14905 void LAPACK_spftri( char* transr, char* uplo, lapack_int* n, float* a,
14906                     lapack_int *info );
14907 void LAPACK_zpftri( char* transr, char* uplo, lapack_int* n,
14908                     lapack_complex_double* a, lapack_int *info );
14909 void LAPACK_cpftri( char* transr, char* uplo, lapack_int* n,
14910                     lapack_complex_float* a, lapack_int *info );
14911 void LAPACK_spptri( char* uplo, lapack_int* n, float* ap, lapack_int *info );
14912 void LAPACK_dpptri( char* uplo, lapack_int* n, double* ap, lapack_int *info );
14913 void LAPACK_cpptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14914                     lapack_int *info );
14915 void LAPACK_zpptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14916                     lapack_int *info );
14917 void LAPACK_ssytri( char* uplo, lapack_int* n, float* a, lapack_int* lda,
14918                     const lapack_int* ipiv, float* work, lapack_int *info );
14919 void LAPACK_dsytri( char* uplo, lapack_int* n, double* a, lapack_int* lda,
14920                     const lapack_int* ipiv, double* work, lapack_int *info );
14921 void LAPACK_csytri( char* uplo, lapack_int* n, lapack_complex_float* a,
14922                     lapack_int* lda, const lapack_int* ipiv,
14923                     lapack_complex_float* work, lapack_int *info );
14924 void LAPACK_zsytri( char* uplo, lapack_int* n, lapack_complex_double* a,
14925                     lapack_int* lda, const lapack_int* ipiv,
14926                     lapack_complex_double* work, lapack_int *info );
14927 void LAPACK_chetri( char* uplo, lapack_int* n, lapack_complex_float* a,
14928                     lapack_int* lda, const lapack_int* ipiv,
14929                     lapack_complex_float* work, lapack_int *info );
14930 void LAPACK_zhetri( char* uplo, lapack_int* n, lapack_complex_double* a,
14931                     lapack_int* lda, const lapack_int* ipiv,
14932                     lapack_complex_double* work, lapack_int *info );
14933 void LAPACK_ssptri( char* uplo, lapack_int* n, float* ap,
14934                     const lapack_int* ipiv, float* work, lapack_int *info );
14935 void LAPACK_dsptri( char* uplo, lapack_int* n, double* ap,
14936                     const lapack_int* ipiv, double* work, lapack_int *info );
14937 void LAPACK_csptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14938                     const lapack_int* ipiv, lapack_complex_float* work,
14939                     lapack_int *info );
14940 void LAPACK_zsptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14941                     const lapack_int* ipiv, lapack_complex_double* work,
14942                     lapack_int *info );
14943 void LAPACK_chptri( char* uplo, lapack_int* n, lapack_complex_float* ap,
14944                     const lapack_int* ipiv, lapack_complex_float* work,
14945                     lapack_int *info );
14946 void LAPACK_zhptri( char* uplo, lapack_int* n, lapack_complex_double* ap,
14947                     const lapack_int* ipiv, lapack_complex_double* work,
14948                     lapack_int *info );
14949 void LAPACK_strtri( char* uplo, char* diag, lapack_int* n, float* a,
14950                     lapack_int* lda, lapack_int *info );
14951 void LAPACK_dtrtri( char* uplo, char* diag, lapack_int* n, double* a,
14952                     lapack_int* lda, lapack_int *info );
14953 void LAPACK_ctrtri( char* uplo, char* diag, lapack_int* n,
14954                     lapack_complex_float* a, lapack_int* lda,
14955                     lapack_int *info );
14956 void LAPACK_ztrtri( char* uplo, char* diag, lapack_int* n,
14957                     lapack_complex_double* a, lapack_int* lda,
14958                     lapack_int *info );
14959 void LAPACK_dtftri( char* transr, char* uplo, char* diag, lapack_int* n,
14960                     double* a, lapack_int *info );
14961 void LAPACK_stftri( char* transr, char* uplo, char* diag, lapack_int* n,
14962                     float* a, lapack_int *info );
14963 void LAPACK_ztftri( char* transr, char* uplo, char* diag, lapack_int* n,
14964                     lapack_complex_double* a, lapack_int *info );
14965 void LAPACK_ctftri( char* transr, char* uplo, char* diag, lapack_int* n,
14966                     lapack_complex_float* a, lapack_int *info );
14967 void LAPACK_stptri( char* uplo, char* diag, lapack_int* n, float* ap,
14968                     lapack_int *info );
14969 void LAPACK_dtptri( char* uplo, char* diag, lapack_int* n, double* ap,
14970                     lapack_int *info );
14971 void LAPACK_ctptri( char* uplo, char* diag, lapack_int* n,
14972                     lapack_complex_float* ap, lapack_int *info );
14973 void LAPACK_ztptri( char* uplo, char* diag, lapack_int* n,
14974                     lapack_complex_double* ap, lapack_int *info );
14975 void LAPACK_sgeequ( lapack_int* m, lapack_int* n, const float* a,
14976                     lapack_int* lda, float* r, float* c, float* rowcnd,
14977                     float* colcnd, float* amax, lapack_int *info );
14978 void LAPACK_dgeequ( lapack_int* m, lapack_int* n, const double* a,
14979                     lapack_int* lda, double* r, double* c, double* rowcnd,
14980                     double* colcnd, double* amax, lapack_int *info );
14981 void LAPACK_cgeequ( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
14982                     lapack_int* lda, float* r, float* c, float* rowcnd,
14983                     float* colcnd, float* amax, lapack_int *info );
14984 void LAPACK_zgeequ( lapack_int* m, lapack_int* n,
14985                     const lapack_complex_double* a, lapack_int* lda, double* r,
14986                     double* c, double* rowcnd, double* colcnd, double* amax,
14987                     lapack_int *info );
14988 void LAPACK_dgeequb( lapack_int* m, lapack_int* n, const double* a,
14989                      lapack_int* lda, double* r, double* c, double* rowcnd,
14990                      double* colcnd, double* amax, lapack_int *info );
14991 void LAPACK_sgeequb( lapack_int* m, lapack_int* n, const float* a,
14992                      lapack_int* lda, float* r, float* c, float* rowcnd,
14993                      float* colcnd, float* amax, lapack_int *info );
14994 void LAPACK_zgeequb( lapack_int* m, lapack_int* n,
14995                      const lapack_complex_double* a, lapack_int* lda, double* r,
14996                      double* c, double* rowcnd, double* colcnd, double* amax,
14997                      lapack_int *info );
14998 void LAPACK_cgeequb( lapack_int* m, lapack_int* n,
14999                      const lapack_complex_float* a, lapack_int* lda, float* r,
15000                      float* c, float* rowcnd, float* colcnd, float* amax,
15001                      lapack_int *info );
15002 void LAPACK_sgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15003                     lapack_int* ku, const float* ab, lapack_int* ldab, float* r,
15004                     float* c, float* rowcnd, float* colcnd, float* amax,
15005                     lapack_int *info );
15006 void LAPACK_dgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15007                     lapack_int* ku, const double* ab, lapack_int* ldab,
15008                     double* r, double* c, double* rowcnd, double* colcnd,
15009                     double* amax, lapack_int *info );
15010 void LAPACK_cgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15011                     lapack_int* ku, const lapack_complex_float* ab,
15012                     lapack_int* ldab, float* r, float* c, float* rowcnd,
15013                     float* colcnd, float* amax, lapack_int *info );
15014 void LAPACK_zgbequ( lapack_int* m, lapack_int* n, lapack_int* kl,
15015                     lapack_int* ku, const lapack_complex_double* ab,
15016                     lapack_int* ldab, double* r, double* c, double* rowcnd,
15017                     double* colcnd, double* amax, lapack_int *info );
15018 void LAPACK_dgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15019                      lapack_int* ku, const double* ab, lapack_int* ldab,
15020                      double* r, double* c, double* rowcnd, double* colcnd,
15021                      double* amax, lapack_int *info );
15022 void LAPACK_sgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15023                      lapack_int* ku, const float* ab, lapack_int* ldab,
15024                      float* r, float* c, float* rowcnd, float* colcnd,
15025                      float* amax, lapack_int *info );
15026 void LAPACK_zgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15027                      lapack_int* ku, const lapack_complex_double* ab,
15028                      lapack_int* ldab, double* r, double* c, double* rowcnd,
15029                      double* colcnd, double* amax, lapack_int *info );
15030 void LAPACK_cgbequb( lapack_int* m, lapack_int* n, lapack_int* kl,
15031                      lapack_int* ku, const lapack_complex_float* ab,
15032                      lapack_int* ldab, float* r, float* c, float* rowcnd,
15033                      float* colcnd, float* amax, lapack_int *info );
15034 void LAPACK_spoequ( lapack_int* n, const float* a, lapack_int* lda, float* s,
15035                     float* scond, float* amax, lapack_int *info );
15036 void LAPACK_dpoequ( lapack_int* n, const double* a, lapack_int* lda, double* s,
15037                     double* scond, double* amax, lapack_int *info );
15038 void LAPACK_cpoequ( lapack_int* n, const lapack_complex_float* a,
15039                     lapack_int* lda, float* s, float* scond, float* amax,
15040                     lapack_int *info );
15041 void LAPACK_zpoequ( lapack_int* n, const lapack_complex_double* a,
15042                     lapack_int* lda, double* s, double* scond, double* amax,
15043                     lapack_int *info );
15044 void LAPACK_dpoequb( lapack_int* n, const double* a, lapack_int* lda, double* s,
15045                      double* scond, double* amax, lapack_int *info );
15046 void LAPACK_spoequb( lapack_int* n, const float* a, lapack_int* lda, float* s,
15047                      float* scond, float* amax, lapack_int *info );
15048 void LAPACK_zpoequb( lapack_int* n, const lapack_complex_double* a,
15049                      lapack_int* lda, double* s, double* scond, double* amax,
15050                      lapack_int *info );
15051 void LAPACK_cpoequb( lapack_int* n, const lapack_complex_float* a,
15052                      lapack_int* lda, float* s, float* scond, float* amax,
15053                      lapack_int *info );
15054 void LAPACK_sppequ( char* uplo, lapack_int* n, const float* ap, float* s,
15055                     float* scond, float* amax, lapack_int *info );
15056 void LAPACK_dppequ( char* uplo, lapack_int* n, const double* ap, double* s,
15057                     double* scond, double* amax, lapack_int *info );
15058 void LAPACK_cppequ( char* uplo, lapack_int* n, const lapack_complex_float* ap,
15059                     float* s, float* scond, float* amax, lapack_int *info );
15060 void LAPACK_zppequ( char* uplo, lapack_int* n, const lapack_complex_double* ap,
15061                     double* s, double* scond, double* amax, lapack_int *info );
15062 void LAPACK_spbequ( char* uplo, lapack_int* n, lapack_int* kd, const float* ab,
15063                     lapack_int* ldab, float* s, float* scond, float* amax,
15064                     lapack_int *info );
15065 void LAPACK_dpbequ( char* uplo, lapack_int* n, lapack_int* kd, const double* ab,
15066                     lapack_int* ldab, double* s, double* scond, double* amax,
15067                     lapack_int *info );
15068 void LAPACK_cpbequ( char* uplo, lapack_int* n, lapack_int* kd,
15069                     const lapack_complex_float* ab, lapack_int* ldab, float* s,
15070                     float* scond, float* amax, lapack_int *info );
15071 void LAPACK_zpbequ( char* uplo, lapack_int* n, lapack_int* kd,
15072                     const lapack_complex_double* ab, lapack_int* ldab,
15073                     double* s, double* scond, double* amax, lapack_int *info );
15074 void LAPACK_dsyequb( char* uplo, lapack_int* n, const double* a,
15075                      lapack_int* lda, double* s, double* scond, double* amax,
15076                      double* work, lapack_int *info );
15077 void LAPACK_ssyequb( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
15078                      float* s, float* scond, float* amax, float* work,
15079                      lapack_int *info );
15080 void LAPACK_zsyequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
15081                      lapack_int* lda, double* s, double* scond, double* amax,
15082                      lapack_complex_double* work, lapack_int *info );
15083 void LAPACK_csyequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
15084                      lapack_int* lda, float* s, float* scond, float* amax,
15085                      lapack_complex_float* work, lapack_int *info );
15086 void LAPACK_zheequb( char* uplo, lapack_int* n, const lapack_complex_double* a,
15087                      lapack_int* lda, double* s, double* scond, double* amax,
15088                      lapack_complex_double* work, lapack_int *info );
15089 void LAPACK_cheequb( char* uplo, lapack_int* n, const lapack_complex_float* a,
15090                      lapack_int* lda, float* s, float* scond, float* amax,
15091                      lapack_complex_float* work, lapack_int *info );
15092 void LAPACK_sgesv( lapack_int* n, lapack_int* nrhs, float* a, lapack_int* lda,
15093                    lapack_int* ipiv, float* b, lapack_int* ldb,
15094                    lapack_int *info );
15095 void LAPACK_dgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
15096                    lapack_int* ipiv, double* b, lapack_int* ldb,
15097                    lapack_int *info );
15098 void LAPACK_cgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* a,
15099                    lapack_int* lda, lapack_int* ipiv, lapack_complex_float* b,
15100                    lapack_int* ldb, lapack_int *info );
15101 void LAPACK_zgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
15102                    lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
15103                    lapack_int* ldb, lapack_int *info );
15104 void LAPACK_dsgesv( lapack_int* n, lapack_int* nrhs, double* a, lapack_int* lda,
15105                     lapack_int* ipiv, double* b, lapack_int* ldb, double* x,
15106                     lapack_int* ldx, double* work, float* swork,
15107                     lapack_int* iter, lapack_int *info );
15108 void LAPACK_zcgesv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* a,
15109                     lapack_int* lda, lapack_int* ipiv, lapack_complex_double* b,
15110                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15111                     lapack_complex_double* work, lapack_complex_float* swork,
15112                     double* rwork, lapack_int* iter, lapack_int *info );
15113 void LAPACK_sgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15114                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15115                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
15116                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15117                     float* ferr, float* berr, float* work, lapack_int* iwork,
15118                     lapack_int *info );
15119 void LAPACK_dgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15120                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15121                     lapack_int* ipiv, char* equed, double* r, double* c,
15122                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15123                     double* rcond, double* ferr, double* berr, double* work,
15124                     lapack_int* iwork, lapack_int *info );
15125 void LAPACK_cgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15126                     lapack_complex_float* a, lapack_int* lda,
15127                     lapack_complex_float* af, lapack_int* ldaf,
15128                     lapack_int* ipiv, char* equed, float* r, float* c,
15129                     lapack_complex_float* b, lapack_int* ldb,
15130                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15131                     float* ferr, float* berr, lapack_complex_float* work,
15132                     float* rwork, lapack_int *info );
15133 void LAPACK_zgesvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15134                     lapack_complex_double* a, lapack_int* lda,
15135                     lapack_complex_double* af, lapack_int* ldaf,
15136                     lapack_int* ipiv, char* equed, double* r, double* c,
15137                     lapack_complex_double* b, lapack_int* ldb,
15138                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15139                     double* ferr, double* berr, lapack_complex_double* work,
15140                     double* rwork, lapack_int *info );
15141 void LAPACK_dgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15142                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15143                      lapack_int* ipiv, char* equed, double* r, double* c,
15144                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15145                      double* rcond, double* rpvgrw, double* berr,
15146                      lapack_int* n_err_bnds, double* err_bnds_norm,
15147                      double* err_bnds_comp, lapack_int* nparams, double* params,
15148                      double* work, lapack_int* iwork, lapack_int *info );
15149 void LAPACK_sgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15150                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15151                      lapack_int* ipiv, char* equed, float* r, float* c,
15152                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15153                      float* rcond, float* rpvgrw, float* berr,
15154                      lapack_int* n_err_bnds, float* err_bnds_norm,
15155                      float* err_bnds_comp, lapack_int* nparams, float* params,
15156                      float* work, lapack_int* iwork, lapack_int *info );
15157 void LAPACK_zgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15158                      lapack_complex_double* a, lapack_int* lda,
15159                      lapack_complex_double* af, lapack_int* ldaf,
15160                      lapack_int* ipiv, char* equed, double* r, double* c,
15161                      lapack_complex_double* b, lapack_int* ldb,
15162                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15163                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15164                      double* err_bnds_norm, double* err_bnds_comp,
15165                      lapack_int* nparams, double* params,
15166                      lapack_complex_double* work, double* rwork,
15167                      lapack_int *info );
15168 void LAPACK_cgesvxx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15169                      lapack_complex_float* a, lapack_int* lda,
15170                      lapack_complex_float* af, lapack_int* ldaf,
15171                      lapack_int* ipiv, char* equed, float* r, float* c,
15172                      lapack_complex_float* b, lapack_int* ldb,
15173                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15174                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15175                      float* err_bnds_norm, float* err_bnds_comp,
15176                      lapack_int* nparams, float* params,
15177                      lapack_complex_float* work, float* rwork,
15178                      lapack_int *info );
15179 void LAPACK_sgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15180                    lapack_int* nrhs, float* ab, lapack_int* ldab,
15181                    lapack_int* ipiv, float* b, lapack_int* ldb,
15182                    lapack_int *info );
15183 void LAPACK_dgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15184                    lapack_int* nrhs, double* ab, lapack_int* ldab,
15185                    lapack_int* ipiv, double* b, lapack_int* ldb,
15186                    lapack_int *info );
15187 void LAPACK_cgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15188                    lapack_int* nrhs, lapack_complex_float* ab, lapack_int* ldab,
15189                    lapack_int* ipiv, lapack_complex_float* b, lapack_int* ldb,
15190                    lapack_int *info );
15191 void LAPACK_zgbsv( lapack_int* n, lapack_int* kl, lapack_int* ku,
15192                    lapack_int* nrhs, lapack_complex_double* ab,
15193                    lapack_int* ldab, lapack_int* ipiv, lapack_complex_double* b,
15194                    lapack_int* ldb, lapack_int *info );
15195 void LAPACK_sgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15196                     lapack_int* ku, lapack_int* nrhs, float* ab,
15197                     lapack_int* ldab, float* afb, lapack_int* ldafb,
15198                     lapack_int* ipiv, char* equed, float* r, float* c, float* b,
15199                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15200                     float* ferr, float* berr, float* work, lapack_int* iwork,
15201                     lapack_int *info );
15202 void LAPACK_dgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15203                     lapack_int* ku, lapack_int* nrhs, double* ab,
15204                     lapack_int* ldab, double* afb, lapack_int* ldafb,
15205                     lapack_int* ipiv, char* equed, double* r, double* c,
15206                     double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15207                     double* rcond, double* ferr, double* berr, double* work,
15208                     lapack_int* iwork, lapack_int *info );
15209 void LAPACK_cgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15210                     lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
15211                     lapack_int* ldab, lapack_complex_float* afb,
15212                     lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
15213                     float* c, lapack_complex_float* b, lapack_int* ldb,
15214                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15215                     float* ferr, float* berr, lapack_complex_float* work,
15216                     float* rwork, lapack_int *info );
15217 void LAPACK_zgbsvx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15218                     lapack_int* ku, lapack_int* nrhs, lapack_complex_double* ab,
15219                     lapack_int* ldab, lapack_complex_double* afb,
15220                     lapack_int* ldafb, lapack_int* ipiv, char* equed, double* r,
15221                     double* c, lapack_complex_double* b, lapack_int* ldb,
15222                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15223                     double* ferr, double* berr, lapack_complex_double* work,
15224                     double* rwork, lapack_int *info );
15225 void LAPACK_dgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15226                      lapack_int* ku, lapack_int* nrhs, double* ab,
15227                      lapack_int* ldab, double* afb, lapack_int* ldafb,
15228                      lapack_int* ipiv, char* equed, double* r, double* c,
15229                      double* b, lapack_int* ldb, double* x, lapack_int* ldx,
15230                      double* rcond, double* rpvgrw, double* berr,
15231                      lapack_int* n_err_bnds, double* err_bnds_norm,
15232                      double* err_bnds_comp, lapack_int* nparams, double* params,
15233                      double* work, lapack_int* iwork, lapack_int *info );
15234 void LAPACK_sgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15235                      lapack_int* ku, lapack_int* nrhs, float* ab,
15236                      lapack_int* ldab, float* afb, lapack_int* ldafb,
15237                      lapack_int* ipiv, char* equed, float* r, float* c,
15238                      float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15239                      float* rcond, float* rpvgrw, float* berr,
15240                      lapack_int* n_err_bnds, float* err_bnds_norm,
15241                      float* err_bnds_comp, lapack_int* nparams, float* params,
15242                      float* work, lapack_int* iwork, lapack_int *info );
15243 void LAPACK_zgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15244                      lapack_int* ku, lapack_int* nrhs,
15245                      lapack_complex_double* ab, lapack_int* ldab,
15246                      lapack_complex_double* afb, lapack_int* ldafb,
15247                      lapack_int* ipiv, char* equed, double* r, double* c,
15248                      lapack_complex_double* b, lapack_int* ldb,
15249                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15250                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15251                      double* err_bnds_norm, double* err_bnds_comp,
15252                      lapack_int* nparams, double* params,
15253                      lapack_complex_double* work, double* rwork,
15254                      lapack_int *info );
15255 void LAPACK_cgbsvxx( char* fact, char* trans, lapack_int* n, lapack_int* kl,
15256                      lapack_int* ku, lapack_int* nrhs, lapack_complex_float* ab,
15257                      lapack_int* ldab, lapack_complex_float* afb,
15258                      lapack_int* ldafb, lapack_int* ipiv, char* equed, float* r,
15259                      float* c, lapack_complex_float* b, lapack_int* ldb,
15260                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15261                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15262                      float* err_bnds_norm, float* err_bnds_comp,
15263                      lapack_int* nparams, float* params,
15264                      lapack_complex_float* work, float* rwork,
15265                      lapack_int *info );
15266 void LAPACK_sgtsv( lapack_int* n, lapack_int* nrhs, float* dl, float* d,
15267                    float* du, float* b, lapack_int* ldb, lapack_int *info );
15268 void LAPACK_dgtsv( lapack_int* n, lapack_int* nrhs, double* dl, double* d,
15269                    double* du, double* b, lapack_int* ldb, lapack_int *info );
15270 void LAPACK_cgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_float* dl,
15271                    lapack_complex_float* d, lapack_complex_float* du,
15272                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15273 void LAPACK_zgtsv( lapack_int* n, lapack_int* nrhs, lapack_complex_double* dl,
15274                    lapack_complex_double* d, lapack_complex_double* du,
15275                    lapack_complex_double* b, lapack_int* ldb,
15276                    lapack_int *info );
15277 void LAPACK_sgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15278                     const float* dl, const float* d, const float* du,
15279                     float* dlf, float* df, float* duf, float* du2,
15280                     lapack_int* ipiv, const float* b, lapack_int* ldb, float* x,
15281                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
15282                     float* work, lapack_int* iwork, lapack_int *info );
15283 void LAPACK_dgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15284                     const double* dl, const double* d, const double* du,
15285                     double* dlf, double* df, double* duf, double* du2,
15286                     lapack_int* ipiv, const double* b, lapack_int* ldb,
15287                     double* x, lapack_int* ldx, double* rcond, double* ferr,
15288                     double* berr, double* work, lapack_int* iwork,
15289                     lapack_int *info );
15290 void LAPACK_cgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15291                     const lapack_complex_float* dl,
15292                     const lapack_complex_float* d,
15293                     const lapack_complex_float* du, lapack_complex_float* dlf,
15294                     lapack_complex_float* df, lapack_complex_float* duf,
15295                     lapack_complex_float* du2, lapack_int* ipiv,
15296                     const lapack_complex_float* b, lapack_int* ldb,
15297                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15298                     float* ferr, float* berr, lapack_complex_float* work,
15299                     float* rwork, lapack_int *info );
15300 void LAPACK_zgtsvx( char* fact, char* trans, lapack_int* n, lapack_int* nrhs,
15301                     const lapack_complex_double* dl,
15302                     const lapack_complex_double* d,
15303                     const lapack_complex_double* du, lapack_complex_double* dlf,
15304                     lapack_complex_double* df, lapack_complex_double* duf,
15305                     lapack_complex_double* du2, lapack_int* ipiv,
15306                     const lapack_complex_double* b, lapack_int* ldb,
15307                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15308                     double* ferr, double* berr, lapack_complex_double* work,
15309                     double* rwork, lapack_int *info );
15310 void LAPACK_sposv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
15311                    lapack_int* lda, float* b, lapack_int* ldb,
15312                    lapack_int *info );
15313 void LAPACK_dposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15314                    lapack_int* lda, double* b, lapack_int* ldb,
15315                    lapack_int *info );
15316 void LAPACK_cposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15317                    lapack_complex_float* a, lapack_int* lda,
15318                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15319 void LAPACK_zposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15320                    lapack_complex_double* a, lapack_int* lda,
15321                    lapack_complex_double* b, lapack_int* ldb,
15322                    lapack_int *info );
15323 void LAPACK_dsposv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15324                     lapack_int* lda, double* b, lapack_int* ldb, double* x,
15325                     lapack_int* ldx, double* work, float* swork,
15326                     lapack_int* iter, lapack_int *info );
15327 void LAPACK_zcposv( char* uplo, lapack_int* n, lapack_int* nrhs,
15328                     lapack_complex_double* a, lapack_int* lda,
15329                     lapack_complex_double* b, lapack_int* ldb,
15330                     lapack_complex_double* x, lapack_int* ldx,
15331                     lapack_complex_double* work, lapack_complex_float* swork,
15332                     double* rwork, lapack_int* iter, lapack_int *info );
15333 void LAPACK_sposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15334                     float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15335                     char* equed, float* s, float* b, lapack_int* ldb, float* x,
15336                     lapack_int* ldx, float* rcond, float* ferr, float* berr,
15337                     float* work, lapack_int* iwork, lapack_int *info );
15338 void LAPACK_dposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15339                     double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15340                     char* equed, double* s, double* b, lapack_int* ldb,
15341                     double* x, lapack_int* ldx, double* rcond, double* ferr,
15342                     double* berr, double* work, lapack_int* iwork,
15343                     lapack_int *info );
15344 void LAPACK_cposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15345                     lapack_complex_float* a, lapack_int* lda,
15346                     lapack_complex_float* af, lapack_int* ldaf, char* equed,
15347                     float* s, lapack_complex_float* b, lapack_int* ldb,
15348                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15349                     float* ferr, float* berr, lapack_complex_float* work,
15350                     float* rwork, lapack_int *info );
15351 void LAPACK_zposvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15352                     lapack_complex_double* a, lapack_int* lda,
15353                     lapack_complex_double* af, lapack_int* ldaf, char* equed,
15354                     double* s, lapack_complex_double* b, lapack_int* ldb,
15355                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15356                     double* ferr, double* berr, lapack_complex_double* work,
15357                     double* rwork, lapack_int *info );
15358 void LAPACK_dposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15359                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15360                      char* equed, double* s, double* b, lapack_int* ldb,
15361                      double* x, lapack_int* ldx, double* rcond, double* rpvgrw,
15362                      double* berr, lapack_int* n_err_bnds,
15363                      double* err_bnds_norm, double* err_bnds_comp,
15364                      lapack_int* nparams, double* params, double* work,
15365                      lapack_int* iwork, lapack_int *info );
15366 void LAPACK_sposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15367                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15368                      char* equed, float* s, float* b, lapack_int* ldb, float* x,
15369                      lapack_int* ldx, float* rcond, float* rpvgrw, float* berr,
15370                      lapack_int* n_err_bnds, float* err_bnds_norm,
15371                      float* err_bnds_comp, lapack_int* nparams, float* params,
15372                      float* work, lapack_int* iwork, lapack_int *info );
15373 void LAPACK_zposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15374                      lapack_complex_double* a, lapack_int* lda,
15375                      lapack_complex_double* af, lapack_int* ldaf, char* equed,
15376                      double* s, lapack_complex_double* b, lapack_int* ldb,
15377                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15378                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15379                      double* err_bnds_norm, double* err_bnds_comp,
15380                      lapack_int* nparams, double* params,
15381                      lapack_complex_double* work, double* rwork,
15382                      lapack_int *info );
15383 void LAPACK_cposvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15384                      lapack_complex_float* a, lapack_int* lda,
15385                      lapack_complex_float* af, lapack_int* ldaf, char* equed,
15386                      float* s, lapack_complex_float* b, lapack_int* ldb,
15387                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15388                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15389                      float* err_bnds_norm, float* err_bnds_comp,
15390                      lapack_int* nparams, float* params,
15391                      lapack_complex_float* work, float* rwork,
15392                      lapack_int *info );
15393 void LAPACK_sppsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
15394                    float* b, lapack_int* ldb, lapack_int *info );
15395 void LAPACK_dppsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
15396                    double* b, lapack_int* ldb, lapack_int *info );
15397 void LAPACK_cppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15398                    lapack_complex_float* ap, lapack_complex_float* b,
15399                    lapack_int* ldb, lapack_int *info );
15400 void LAPACK_zppsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15401                    lapack_complex_double* ap, lapack_complex_double* b,
15402                    lapack_int* ldb, lapack_int *info );
15403 void LAPACK_sppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15404                     float* ap, float* afp, char* equed, float* s, float* b,
15405                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15406                     float* ferr, float* berr, float* work, lapack_int* iwork,
15407                     lapack_int *info );
15408 void LAPACK_dppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15409                     double* ap, double* afp, char* equed, double* s, double* b,
15410                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15411                     double* ferr, double* berr, double* work, lapack_int* iwork,
15412                     lapack_int *info );
15413 void LAPACK_cppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15414                     lapack_complex_float* ap, lapack_complex_float* afp,
15415                     char* equed, float* s, lapack_complex_float* b,
15416                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15417                     float* rcond, float* ferr, float* berr,
15418                     lapack_complex_float* work, float* rwork,
15419                     lapack_int *info );
15420 void LAPACK_zppsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15421                     lapack_complex_double* ap, lapack_complex_double* afp,
15422                     char* equed, double* s, lapack_complex_double* b,
15423                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15424                     double* rcond, double* ferr, double* berr,
15425                     lapack_complex_double* work, double* rwork,
15426                     lapack_int *info );
15427 void LAPACK_spbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15428                    float* ab, lapack_int* ldab, float* b, lapack_int* ldb,
15429                    lapack_int *info );
15430 void LAPACK_dpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15431                    double* ab, lapack_int* ldab, double* b, lapack_int* ldb,
15432                    lapack_int *info );
15433 void LAPACK_cpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15434                    lapack_complex_float* ab, lapack_int* ldab,
15435                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15436 void LAPACK_zpbsv( char* uplo, lapack_int* n, lapack_int* kd, lapack_int* nrhs,
15437                    lapack_complex_double* ab, lapack_int* ldab,
15438                    lapack_complex_double* b, lapack_int* ldb,
15439                    lapack_int *info );
15440 void LAPACK_spbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15441                     lapack_int* nrhs, float* ab, lapack_int* ldab, float* afb,
15442                     lapack_int* ldafb, char* equed, float* s, float* b,
15443                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15444                     float* ferr, float* berr, float* work, lapack_int* iwork,
15445                     lapack_int *info );
15446 void LAPACK_dpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15447                     lapack_int* nrhs, double* ab, lapack_int* ldab, double* afb,
15448                     lapack_int* ldafb, char* equed, double* s, double* b,
15449                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15450                     double* ferr, double* berr, double* work, lapack_int* iwork,
15451                     lapack_int *info );
15452 void LAPACK_cpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15453                     lapack_int* nrhs, lapack_complex_float* ab,
15454                     lapack_int* ldab, lapack_complex_float* afb,
15455                     lapack_int* ldafb, char* equed, float* s,
15456                     lapack_complex_float* b, lapack_int* ldb,
15457                     lapack_complex_float* x, lapack_int* ldx, float* rcond,
15458                     float* ferr, float* berr, lapack_complex_float* work,
15459                     float* rwork, lapack_int *info );
15460 void LAPACK_zpbsvx( char* fact, char* uplo, lapack_int* n, lapack_int* kd,
15461                     lapack_int* nrhs, lapack_complex_double* ab,
15462                     lapack_int* ldab, lapack_complex_double* afb,
15463                     lapack_int* ldafb, char* equed, double* s,
15464                     lapack_complex_double* b, lapack_int* ldb,
15465                     lapack_complex_double* x, lapack_int* ldx, double* rcond,
15466                     double* ferr, double* berr, lapack_complex_double* work,
15467                     double* rwork, lapack_int *info );
15468 void LAPACK_sptsv( lapack_int* n, lapack_int* nrhs, float* d, float* e,
15469                    float* b, lapack_int* ldb, lapack_int *info );
15470 void LAPACK_dptsv( lapack_int* n, lapack_int* nrhs, double* d, double* e,
15471                    double* b, lapack_int* ldb, lapack_int *info );
15472 void LAPACK_cptsv( lapack_int* n, lapack_int* nrhs, float* d,
15473                    lapack_complex_float* e, lapack_complex_float* b,
15474                    lapack_int* ldb, lapack_int *info );
15475 void LAPACK_zptsv( lapack_int* n, lapack_int* nrhs, double* d,
15476                    lapack_complex_double* e, lapack_complex_double* b,
15477                    lapack_int* ldb, lapack_int *info );
15478 void LAPACK_sptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
15479                     const float* e, float* df, float* ef, const float* b,
15480                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15481                     float* ferr, float* berr, float* work, lapack_int *info );
15482 void LAPACK_dptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
15483                     const double* d, const double* e, double* df, double* ef,
15484                     const double* b, lapack_int* ldb, double* x,
15485                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
15486                     double* work, lapack_int *info );
15487 void LAPACK_cptsvx( char* fact, lapack_int* n, lapack_int* nrhs, const float* d,
15488                     const lapack_complex_float* e, float* df,
15489                     lapack_complex_float* ef, const lapack_complex_float* b,
15490                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15491                     float* rcond, float* ferr, float* berr,
15492                     lapack_complex_float* work, float* rwork,
15493                     lapack_int *info );
15494 void LAPACK_zptsvx( char* fact, lapack_int* n, lapack_int* nrhs,
15495                     const double* d, const lapack_complex_double* e, double* df,
15496                     lapack_complex_double* ef, const lapack_complex_double* b,
15497                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15498                     double* rcond, double* ferr, double* berr,
15499                     lapack_complex_double* work, double* rwork,
15500                     lapack_int *info );
15501 void LAPACK_ssysv( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
15502                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
15503                    float* work, lapack_int* lwork, lapack_int *info );
15504 void LAPACK_dsysv( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
15505                    lapack_int* lda, lapack_int* ipiv, double* b,
15506                    lapack_int* ldb, double* work, lapack_int* lwork,
15507                    lapack_int *info );
15508 void LAPACK_csysv( char* uplo, lapack_int* n, lapack_int* nrhs,
15509                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
15510                    lapack_complex_float* b, lapack_int* ldb,
15511                    lapack_complex_float* work, lapack_int* lwork,
15512                    lapack_int *info );
15513 void LAPACK_zsysv( char* uplo, lapack_int* n, lapack_int* nrhs,
15514                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
15515                    lapack_complex_double* b, lapack_int* ldb,
15516                    lapack_complex_double* work, lapack_int* lwork,
15517                    lapack_int *info );
15518 void LAPACK_ssysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15519                     const float* a, lapack_int* lda, float* af,
15520                     lapack_int* ldaf, lapack_int* ipiv, const float* b,
15521                     lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15522                     float* ferr, float* berr, float* work, lapack_int* lwork,
15523                     lapack_int* iwork, lapack_int *info );
15524 void LAPACK_dsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15525                     const double* a, lapack_int* lda, double* af,
15526                     lapack_int* ldaf, lapack_int* ipiv, const double* b,
15527                     lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15528                     double* ferr, double* berr, double* work, lapack_int* lwork,
15529                     lapack_int* iwork, lapack_int *info );
15530 void LAPACK_csysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15531                     const lapack_complex_float* a, lapack_int* lda,
15532                     lapack_complex_float* af, lapack_int* ldaf,
15533                     lapack_int* ipiv, const lapack_complex_float* b,
15534                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15535                     float* rcond, float* ferr, float* berr,
15536                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15537                     lapack_int *info );
15538 void LAPACK_zsysvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15539                     const lapack_complex_double* a, lapack_int* lda,
15540                     lapack_complex_double* af, lapack_int* ldaf,
15541                     lapack_int* ipiv, const lapack_complex_double* b,
15542                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15543                     double* rcond, double* ferr, double* berr,
15544                     lapack_complex_double* work, lapack_int* lwork,
15545                     double* rwork, lapack_int *info );
15546 void LAPACK_dsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15547                      double* a, lapack_int* lda, double* af, lapack_int* ldaf,
15548                      lapack_int* ipiv, char* equed, double* s, double* b,
15549                      lapack_int* ldb, double* x, lapack_int* ldx, double* rcond,
15550                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15551                      double* err_bnds_norm, double* err_bnds_comp,
15552                      lapack_int* nparams, double* params, double* work,
15553                      lapack_int* iwork, lapack_int *info );
15554 void LAPACK_ssysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15555                      float* a, lapack_int* lda, float* af, lapack_int* ldaf,
15556                      lapack_int* ipiv, char* equed, float* s, float* b,
15557                      lapack_int* ldb, float* x, lapack_int* ldx, float* rcond,
15558                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15559                      float* err_bnds_norm, float* err_bnds_comp,
15560                      lapack_int* nparams, float* params, float* work,
15561                      lapack_int* iwork, lapack_int *info );
15562 void LAPACK_zsysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15563                      lapack_complex_double* a, lapack_int* lda,
15564                      lapack_complex_double* af, lapack_int* ldaf,
15565                      lapack_int* ipiv, char* equed, double* s,
15566                      lapack_complex_double* b, lapack_int* ldb,
15567                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15568                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15569                      double* err_bnds_norm, double* err_bnds_comp,
15570                      lapack_int* nparams, double* params,
15571                      lapack_complex_double* work, double* rwork,
15572                      lapack_int *info );
15573 void LAPACK_csysvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15574                      lapack_complex_float* a, lapack_int* lda,
15575                      lapack_complex_float* af, lapack_int* ldaf,
15576                      lapack_int* ipiv, char* equed, float* s,
15577                      lapack_complex_float* b, lapack_int* ldb,
15578                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15579                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15580                      float* err_bnds_norm, float* err_bnds_comp,
15581                      lapack_int* nparams, float* params,
15582                      lapack_complex_float* work, float* rwork,
15583                      lapack_int *info );
15584 void LAPACK_chesv( char* uplo, lapack_int* n, lapack_int* nrhs,
15585                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
15586                    lapack_complex_float* b, lapack_int* ldb,
15587                    lapack_complex_float* work, lapack_int* lwork,
15588                    lapack_int *info );
15589 void LAPACK_zhesv( char* uplo, lapack_int* n, lapack_int* nrhs,
15590                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
15591                    lapack_complex_double* b, lapack_int* ldb,
15592                    lapack_complex_double* work, lapack_int* lwork,
15593                    lapack_int *info );
15594 void LAPACK_chesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15595                     const lapack_complex_float* a, lapack_int* lda,
15596                     lapack_complex_float* af, lapack_int* ldaf,
15597                     lapack_int* ipiv, const lapack_complex_float* b,
15598                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15599                     float* rcond, float* ferr, float* berr,
15600                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
15601                     lapack_int *info );
15602 void LAPACK_zhesvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15603                     const lapack_complex_double* a, lapack_int* lda,
15604                     lapack_complex_double* af, lapack_int* ldaf,
15605                     lapack_int* ipiv, const lapack_complex_double* b,
15606                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15607                     double* rcond, double* ferr, double* berr,
15608                     lapack_complex_double* work, lapack_int* lwork,
15609                     double* rwork, lapack_int *info );
15610 void LAPACK_zhesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15611                      lapack_complex_double* a, lapack_int* lda,
15612                      lapack_complex_double* af, lapack_int* ldaf,
15613                      lapack_int* ipiv, char* equed, double* s,
15614                      lapack_complex_double* b, lapack_int* ldb,
15615                      lapack_complex_double* x, lapack_int* ldx, double* rcond,
15616                      double* rpvgrw, double* berr, lapack_int* n_err_bnds,
15617                      double* err_bnds_norm, double* err_bnds_comp,
15618                      lapack_int* nparams, double* params,
15619                      lapack_complex_double* work, double* rwork,
15620                      lapack_int *info );
15621 void LAPACK_chesvxx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15622                      lapack_complex_float* a, lapack_int* lda,
15623                      lapack_complex_float* af, lapack_int* ldaf,
15624                      lapack_int* ipiv, char* equed, float* s,
15625                      lapack_complex_float* b, lapack_int* ldb,
15626                      lapack_complex_float* x, lapack_int* ldx, float* rcond,
15627                      float* rpvgrw, float* berr, lapack_int* n_err_bnds,
15628                      float* err_bnds_norm, float* err_bnds_comp,
15629                      lapack_int* nparams, float* params,
15630                      lapack_complex_float* work, float* rwork,
15631                      lapack_int *info );
15632 void LAPACK_sspsv( char* uplo, lapack_int* n, lapack_int* nrhs, float* ap,
15633                    lapack_int* ipiv, float* b, lapack_int* ldb,
15634                    lapack_int *info );
15635 void LAPACK_dspsv( char* uplo, lapack_int* n, lapack_int* nrhs, double* ap,
15636                    lapack_int* ipiv, double* b, lapack_int* ldb,
15637                    lapack_int *info );
15638 void LAPACK_cspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15639                    lapack_complex_float* ap, lapack_int* ipiv,
15640                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15641 void LAPACK_zspsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15642                    lapack_complex_double* ap, lapack_int* ipiv,
15643                    lapack_complex_double* b, lapack_int* ldb,
15644                    lapack_int *info );
15645 void LAPACK_sspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15646                     const float* ap, float* afp, lapack_int* ipiv,
15647                     const float* b, lapack_int* ldb, float* x, lapack_int* ldx,
15648                     float* rcond, float* ferr, float* berr, float* work,
15649                     lapack_int* iwork, lapack_int *info );
15650 void LAPACK_dspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15651                     const double* ap, double* afp, lapack_int* ipiv,
15652                     const double* b, lapack_int* ldb, double* x,
15653                     lapack_int* ldx, double* rcond, double* ferr, double* berr,
15654                     double* work, lapack_int* iwork, lapack_int *info );
15655 void LAPACK_cspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15656                     const lapack_complex_float* ap, lapack_complex_float* afp,
15657                     lapack_int* ipiv, const lapack_complex_float* b,
15658                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15659                     float* rcond, float* ferr, float* berr,
15660                     lapack_complex_float* work, float* rwork,
15661                     lapack_int *info );
15662 void LAPACK_zspsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15663                     const lapack_complex_double* ap, lapack_complex_double* afp,
15664                     lapack_int* ipiv, const lapack_complex_double* b,
15665                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15666                     double* rcond, double* ferr, double* berr,
15667                     lapack_complex_double* work, double* rwork,
15668                     lapack_int *info );
15669 void LAPACK_chpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15670                    lapack_complex_float* ap, lapack_int* ipiv,
15671                    lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
15672 void LAPACK_zhpsv( char* uplo, lapack_int* n, lapack_int* nrhs,
15673                    lapack_complex_double* ap, lapack_int* ipiv,
15674                    lapack_complex_double* b, lapack_int* ldb,
15675                    lapack_int *info );
15676 void LAPACK_chpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15677                     const lapack_complex_float* ap, lapack_complex_float* afp,
15678                     lapack_int* ipiv, const lapack_complex_float* b,
15679                     lapack_int* ldb, lapack_complex_float* x, lapack_int* ldx,
15680                     float* rcond, float* ferr, float* berr,
15681                     lapack_complex_float* work, float* rwork,
15682                     lapack_int *info );
15683 void LAPACK_zhpsvx( char* fact, char* uplo, lapack_int* n, lapack_int* nrhs,
15684                     const lapack_complex_double* ap, lapack_complex_double* afp,
15685                     lapack_int* ipiv, const lapack_complex_double* b,
15686                     lapack_int* ldb, lapack_complex_double* x, lapack_int* ldx,
15687                     double* rcond, double* ferr, double* berr,
15688                     lapack_complex_double* work, double* rwork,
15689                     lapack_int *info );
15690 void LAPACK_sgeqrf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15691                     float* tau, float* work, lapack_int* lwork,
15692                     lapack_int *info );
15693 void LAPACK_dgeqrf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15694                     double* tau, double* work, lapack_int* lwork,
15695                     lapack_int *info );
15696 void LAPACK_cgeqrf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15697                     lapack_int* lda, lapack_complex_float* tau,
15698                     lapack_complex_float* work, lapack_int* lwork,
15699                     lapack_int *info );
15700 void LAPACK_zgeqrf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15701                     lapack_int* lda, lapack_complex_double* tau,
15702                     lapack_complex_double* work, lapack_int* lwork,
15703                     lapack_int *info );
15704 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15705                     lapack_int* jpvt, float* tau, float* work,
15706                     lapack_int *info );
15707 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15708                     lapack_int* jpvt, double* tau, double* work,
15709                     lapack_int *info );
15710 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15711                     lapack_int* lda, lapack_int* jpvt,
15712                     lapack_complex_float* tau, lapack_complex_float* work,
15713                     float* rwork, lapack_int *info );
15714 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15715                     lapack_int* lda, lapack_int* jpvt,
15716                     lapack_complex_double* tau, lapack_complex_double* work,
15717                     double* rwork, lapack_int *info );
15718 void LAPACK_sgeqp3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15719                     lapack_int* jpvt, float* tau, float* work,
15720                     lapack_int* lwork, lapack_int *info );
15721 void LAPACK_dgeqp3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15722                     lapack_int* jpvt, double* tau, double* work,
15723                     lapack_int* lwork, lapack_int *info );
15724 void LAPACK_cgeqp3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15725                     lapack_int* lda, lapack_int* jpvt,
15726                     lapack_complex_float* tau, lapack_complex_float* work,
15727                     lapack_int* lwork, float* rwork, lapack_int *info );
15728 void LAPACK_zgeqp3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15729                     lapack_int* lda, lapack_int* jpvt,
15730                     lapack_complex_double* tau, lapack_complex_double* work,
15731                     lapack_int* lwork, double* rwork, lapack_int *info );
15732 void LAPACK_sorgqr( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15733                     lapack_int* lda, const float* tau, float* work,
15734                     lapack_int* lwork, lapack_int *info );
15735 void LAPACK_dorgqr( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15736                     lapack_int* lda, const double* tau, double* work,
15737                     lapack_int* lwork, lapack_int *info );
15738 void LAPACK_sormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15739                     lapack_int* k, const float* a, lapack_int* lda,
15740                     const float* tau, float* c, lapack_int* ldc, float* work,
15741                     lapack_int* lwork, lapack_int *info );
15742 void LAPACK_dormqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15743                     lapack_int* k, const double* a, lapack_int* lda,
15744                     const double* tau, double* c, lapack_int* ldc, double* work,
15745                     lapack_int* lwork, lapack_int *info );
15746 void LAPACK_cungqr( lapack_int* m, lapack_int* n, lapack_int* k,
15747                     lapack_complex_float* a, lapack_int* lda,
15748                     const lapack_complex_float* tau, lapack_complex_float* work,
15749                     lapack_int* lwork, lapack_int *info );
15750 void LAPACK_zungqr( lapack_int* m, lapack_int* n, lapack_int* k,
15751                     lapack_complex_double* a, lapack_int* lda,
15752                     const lapack_complex_double* tau,
15753                     lapack_complex_double* work, lapack_int* lwork,
15754                     lapack_int *info );
15755 void LAPACK_cunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15756                     lapack_int* k, const lapack_complex_float* a,
15757                     lapack_int* lda, const lapack_complex_float* tau,
15758                     lapack_complex_float* c, lapack_int* ldc,
15759                     lapack_complex_float* work, lapack_int* lwork,
15760                     lapack_int *info );
15761 void LAPACK_zunmqr( char* side, char* trans, lapack_int* m, lapack_int* n,
15762                     lapack_int* k, const lapack_complex_double* a,
15763                     lapack_int* lda, const lapack_complex_double* tau,
15764                     lapack_complex_double* c, lapack_int* ldc,
15765                     lapack_complex_double* work, lapack_int* lwork,
15766                     lapack_int *info );
15767 void LAPACK_sgelqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15768                     float* tau, float* work, lapack_int* lwork,
15769                     lapack_int *info );
15770 void LAPACK_dgelqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15771                     double* tau, double* work, lapack_int* lwork,
15772                     lapack_int *info );
15773 void LAPACK_cgelqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15774                     lapack_int* lda, lapack_complex_float* tau,
15775                     lapack_complex_float* work, lapack_int* lwork,
15776                     lapack_int *info );
15777 void LAPACK_zgelqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15778                     lapack_int* lda, lapack_complex_double* tau,
15779                     lapack_complex_double* work, lapack_int* lwork,
15780                     lapack_int *info );
15781 void LAPACK_sorglq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15782                     lapack_int* lda, const float* tau, float* work,
15783                     lapack_int* lwork, lapack_int *info );
15784 void LAPACK_dorglq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15785                     lapack_int* lda, const double* tau, double* work,
15786                     lapack_int* lwork, lapack_int *info );
15787 void LAPACK_sormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15788                     lapack_int* k, const float* a, lapack_int* lda,
15789                     const float* tau, float* c, lapack_int* ldc, float* work,
15790                     lapack_int* lwork, lapack_int *info );
15791 void LAPACK_dormlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15792                     lapack_int* k, const double* a, lapack_int* lda,
15793                     const double* tau, double* c, lapack_int* ldc, double* work,
15794                     lapack_int* lwork, lapack_int *info );
15795 void LAPACK_cunglq( lapack_int* m, lapack_int* n, lapack_int* k,
15796                     lapack_complex_float* a, lapack_int* lda,
15797                     const lapack_complex_float* tau, lapack_complex_float* work,
15798                     lapack_int* lwork, lapack_int *info );
15799 void LAPACK_zunglq( lapack_int* m, lapack_int* n, lapack_int* k,
15800                     lapack_complex_double* a, lapack_int* lda,
15801                     const lapack_complex_double* tau,
15802                     lapack_complex_double* work, lapack_int* lwork,
15803                     lapack_int *info );
15804 void LAPACK_cunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15805                     lapack_int* k, const lapack_complex_float* a,
15806                     lapack_int* lda, const lapack_complex_float* tau,
15807                     lapack_complex_float* c, lapack_int* ldc,
15808                     lapack_complex_float* work, lapack_int* lwork,
15809                     lapack_int *info );
15810 void LAPACK_zunmlq( char* side, char* trans, lapack_int* m, lapack_int* n,
15811                     lapack_int* k, const lapack_complex_double* a,
15812                     lapack_int* lda, const lapack_complex_double* tau,
15813                     lapack_complex_double* c, lapack_int* ldc,
15814                     lapack_complex_double* work, lapack_int* lwork,
15815                     lapack_int *info );
15816 void LAPACK_sgeqlf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15817                     float* tau, float* work, lapack_int* lwork,
15818                     lapack_int *info );
15819 void LAPACK_dgeqlf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15820                     double* tau, double* work, lapack_int* lwork,
15821                     lapack_int *info );
15822 void LAPACK_cgeqlf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15823                     lapack_int* lda, lapack_complex_float* tau,
15824                     lapack_complex_float* work, lapack_int* lwork,
15825                     lapack_int *info );
15826 void LAPACK_zgeqlf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15827                     lapack_int* lda, lapack_complex_double* tau,
15828                     lapack_complex_double* work, lapack_int* lwork,
15829                     lapack_int *info );
15830 void LAPACK_sorgql( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15831                     lapack_int* lda, const float* tau, float* work,
15832                     lapack_int* lwork, lapack_int *info );
15833 void LAPACK_dorgql( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15834                     lapack_int* lda, const double* tau, double* work,
15835                     lapack_int* lwork, lapack_int *info );
15836 void LAPACK_cungql( lapack_int* m, lapack_int* n, lapack_int* k,
15837                     lapack_complex_float* a, lapack_int* lda,
15838                     const lapack_complex_float* tau, lapack_complex_float* work,
15839                     lapack_int* lwork, lapack_int *info );
15840 void LAPACK_zungql( lapack_int* m, lapack_int* n, lapack_int* k,
15841                     lapack_complex_double* a, lapack_int* lda,
15842                     const lapack_complex_double* tau,
15843                     lapack_complex_double* work, lapack_int* lwork,
15844                     lapack_int *info );
15845 void LAPACK_sormql( char* side, char* trans, lapack_int* m, lapack_int* n,
15846                     lapack_int* k, const float* a, lapack_int* lda,
15847                     const float* tau, float* c, lapack_int* ldc, float* work,
15848                     lapack_int* lwork, lapack_int *info );
15849 void LAPACK_dormql( char* side, char* trans, lapack_int* m, lapack_int* n,
15850                     lapack_int* k, const double* a, lapack_int* lda,
15851                     const double* tau, double* c, lapack_int* ldc, double* work,
15852                     lapack_int* lwork, lapack_int *info );
15853 void LAPACK_cunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
15854                     lapack_int* k, const lapack_complex_float* a,
15855                     lapack_int* lda, const lapack_complex_float* tau,
15856                     lapack_complex_float* c, lapack_int* ldc,
15857                     lapack_complex_float* work, lapack_int* lwork,
15858                     lapack_int *info );
15859 void LAPACK_zunmql( char* side, char* trans, lapack_int* m, lapack_int* n,
15860                     lapack_int* k, const lapack_complex_double* a,
15861                     lapack_int* lda, const lapack_complex_double* tau,
15862                     lapack_complex_double* c, lapack_int* ldc,
15863                     lapack_complex_double* work, lapack_int* lwork,
15864                     lapack_int *info );
15865 void LAPACK_sgerqf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15866                     float* tau, float* work, lapack_int* lwork,
15867                     lapack_int *info );
15868 void LAPACK_dgerqf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15869                     double* tau, double* work, lapack_int* lwork,
15870                     lapack_int *info );
15871 void LAPACK_cgerqf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15872                     lapack_int* lda, lapack_complex_float* tau,
15873                     lapack_complex_float* work, lapack_int* lwork,
15874                     lapack_int *info );
15875 void LAPACK_zgerqf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15876                     lapack_int* lda, lapack_complex_double* tau,
15877                     lapack_complex_double* work, lapack_int* lwork,
15878                     lapack_int *info );
15879 void LAPACK_sorgrq( lapack_int* m, lapack_int* n, lapack_int* k, float* a,
15880                     lapack_int* lda, const float* tau, float* work,
15881                     lapack_int* lwork, lapack_int *info );
15882 void LAPACK_dorgrq( lapack_int* m, lapack_int* n, lapack_int* k, double* a,
15883                     lapack_int* lda, const double* tau, double* work,
15884                     lapack_int* lwork, lapack_int *info );
15885 void LAPACK_cungrq( lapack_int* m, lapack_int* n, lapack_int* k,
15886                     lapack_complex_float* a, lapack_int* lda,
15887                     const lapack_complex_float* tau, lapack_complex_float* work,
15888                     lapack_int* lwork, lapack_int *info );
15889 void LAPACK_zungrq( lapack_int* m, lapack_int* n, lapack_int* k,
15890                     lapack_complex_double* a, lapack_int* lda,
15891                     const lapack_complex_double* tau,
15892                     lapack_complex_double* work, lapack_int* lwork,
15893                     lapack_int *info );
15894 void LAPACK_sormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15895                     lapack_int* k, const float* a, lapack_int* lda,
15896                     const float* tau, float* c, lapack_int* ldc, float* work,
15897                     lapack_int* lwork, lapack_int *info );
15898 void LAPACK_dormrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15899                     lapack_int* k, const double* a, lapack_int* lda,
15900                     const double* tau, double* c, lapack_int* ldc, double* work,
15901                     lapack_int* lwork, lapack_int *info );
15902 void LAPACK_cunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15903                     lapack_int* k, const lapack_complex_float* a,
15904                     lapack_int* lda, const lapack_complex_float* tau,
15905                     lapack_complex_float* c, lapack_int* ldc,
15906                     lapack_complex_float* work, lapack_int* lwork,
15907                     lapack_int *info );
15908 void LAPACK_zunmrq( char* side, char* trans, lapack_int* m, lapack_int* n,
15909                     lapack_int* k, const lapack_complex_double* a,
15910                     lapack_int* lda, const lapack_complex_double* tau,
15911                     lapack_complex_double* c, lapack_int* ldc,
15912                     lapack_complex_double* work, lapack_int* lwork,
15913                     lapack_int *info );
15914 void LAPACK_stzrzf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15915                     float* tau, float* work, lapack_int* lwork,
15916                     lapack_int *info );
15917 void LAPACK_dtzrzf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15918                     double* tau, double* work, lapack_int* lwork,
15919                     lapack_int *info );
15920 void LAPACK_ctzrzf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15921                     lapack_int* lda, lapack_complex_float* tau,
15922                     lapack_complex_float* work, lapack_int* lwork,
15923                     lapack_int *info );
15924 void LAPACK_ztzrzf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
15925                     lapack_int* lda, lapack_complex_double* tau,
15926                     lapack_complex_double* work, lapack_int* lwork,
15927                     lapack_int *info );
15928 void LAPACK_sormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15929                     lapack_int* k, lapack_int* l, const float* a,
15930                     lapack_int* lda, const float* tau, float* c,
15931                     lapack_int* ldc, float* work, lapack_int* lwork,
15932                     lapack_int *info );
15933 void LAPACK_dormrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15934                     lapack_int* k, lapack_int* l, const double* a,
15935                     lapack_int* lda, const double* tau, double* c,
15936                     lapack_int* ldc, double* work, lapack_int* lwork,
15937                     lapack_int *info );
15938 void LAPACK_cunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15939                     lapack_int* k, lapack_int* l, const lapack_complex_float* a,
15940                     lapack_int* lda, const lapack_complex_float* tau,
15941                     lapack_complex_float* c, lapack_int* ldc,
15942                     lapack_complex_float* work, lapack_int* lwork,
15943                     lapack_int *info );
15944 void LAPACK_zunmrz( char* side, char* trans, lapack_int* m, lapack_int* n,
15945                     lapack_int* k, lapack_int* l,
15946                     const lapack_complex_double* a, lapack_int* lda,
15947                     const lapack_complex_double* tau, lapack_complex_double* c,
15948                     lapack_int* ldc, lapack_complex_double* work,
15949                     lapack_int* lwork, lapack_int *info );
15950 void LAPACK_sggqrf( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
15951                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15952                     float* taub, float* work, lapack_int* lwork,
15953                     lapack_int *info );
15954 void LAPACK_dggqrf( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
15955                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15956                     double* taub, double* work, lapack_int* lwork,
15957                     lapack_int *info );
15958 void LAPACK_cggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15959                     lapack_complex_float* a, lapack_int* lda,
15960                     lapack_complex_float* taua, lapack_complex_float* b,
15961                     lapack_int* ldb, lapack_complex_float* taub,
15962                     lapack_complex_float* work, lapack_int* lwork,
15963                     lapack_int *info );
15964 void LAPACK_zggqrf( lapack_int* n, lapack_int* m, lapack_int* p,
15965                     lapack_complex_double* a, lapack_int* lda,
15966                     lapack_complex_double* taua, lapack_complex_double* b,
15967                     lapack_int* ldb, lapack_complex_double* taub,
15968                     lapack_complex_double* work, lapack_int* lwork,
15969                     lapack_int *info );
15970 void LAPACK_sggrqf( lapack_int* m, lapack_int* p, lapack_int* n, float* a,
15971                     lapack_int* lda, float* taua, float* b, lapack_int* ldb,
15972                     float* taub, float* work, lapack_int* lwork,
15973                     lapack_int *info );
15974 void LAPACK_dggrqf( lapack_int* m, lapack_int* p, lapack_int* n, double* a,
15975                     lapack_int* lda, double* taua, double* b, lapack_int* ldb,
15976                     double* taub, double* work, lapack_int* lwork,
15977                     lapack_int *info );
15978 void LAPACK_cggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15979                     lapack_complex_float* a, lapack_int* lda,
15980                     lapack_complex_float* taua, lapack_complex_float* b,
15981                     lapack_int* ldb, lapack_complex_float* taub,
15982                     lapack_complex_float* work, lapack_int* lwork,
15983                     lapack_int *info );
15984 void LAPACK_zggrqf( lapack_int* m, lapack_int* p, lapack_int* n,
15985                     lapack_complex_double* a, lapack_int* lda,
15986                     lapack_complex_double* taua, lapack_complex_double* b,
15987                     lapack_int* ldb, lapack_complex_double* taub,
15988                     lapack_complex_double* work, lapack_int* lwork,
15989                     lapack_int *info );
15990 void LAPACK_sgebrd( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
15991                     float* d, float* e, float* tauq, float* taup, float* work,
15992                     lapack_int* lwork, lapack_int *info );
15993 void LAPACK_dgebrd( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
15994                     double* d, double* e, double* tauq, double* taup,
15995                     double* work, lapack_int* lwork, lapack_int *info );
15996 void LAPACK_cgebrd( lapack_int* m, lapack_int* n, lapack_complex_float* a,
15997                     lapack_int* lda, float* d, float* e,
15998                     lapack_complex_float* tauq, lapack_complex_float* taup,
15999                     lapack_complex_float* work, lapack_int* lwork,
16000                     lapack_int *info );
16001 void LAPACK_zgebrd( lapack_int* m, lapack_int* n, lapack_complex_double* a,
16002                     lapack_int* lda, double* d, double* e,
16003                     lapack_complex_double* tauq, lapack_complex_double* taup,
16004                     lapack_complex_double* work, lapack_int* lwork,
16005                     lapack_int *info );
16006 void LAPACK_sgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16007                     lapack_int* kl, lapack_int* ku, float* ab, lapack_int* ldab,
16008                     float* d, float* e, float* q, lapack_int* ldq, float* pt,
16009                     lapack_int* ldpt, float* c, lapack_int* ldc, float* work,
16010                     lapack_int *info );
16011 void LAPACK_dgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16012                     lapack_int* kl, lapack_int* ku, double* ab,
16013                     lapack_int* ldab, double* d, double* e, double* q,
16014                     lapack_int* ldq, double* pt, lapack_int* ldpt, double* c,
16015                     lapack_int* ldc, double* work, lapack_int *info );
16016 void LAPACK_cgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16017                     lapack_int* kl, lapack_int* ku, lapack_complex_float* ab,
16018                     lapack_int* ldab, float* d, float* e,
16019                     lapack_complex_float* q, lapack_int* ldq,
16020                     lapack_complex_float* pt, lapack_int* ldpt,
16021                     lapack_complex_float* c, lapack_int* ldc,
16022                     lapack_complex_float* work, float* rwork,
16023                     lapack_int *info );
16024 void LAPACK_zgbbrd( char* vect, lapack_int* m, lapack_int* n, lapack_int* ncc,
16025                     lapack_int* kl, lapack_int* ku, lapack_complex_double* ab,
16026                     lapack_int* ldab, double* d, double* e,
16027                     lapack_complex_double* q, lapack_int* ldq,
16028                     lapack_complex_double* pt, lapack_int* ldpt,
16029                     lapack_complex_double* c, lapack_int* ldc,
16030                     lapack_complex_double* work, double* rwork,
16031                     lapack_int *info );
16032 void LAPACK_sorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16033                     float* a, lapack_int* lda, const float* tau, float* work,
16034                     lapack_int* lwork, lapack_int *info );
16035 void LAPACK_dorgbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16036                     double* a, lapack_int* lda, const double* tau, double* work,
16037                     lapack_int* lwork, lapack_int *info );
16038 void LAPACK_sormbr( char* vect, char* side, char* trans, lapack_int* m,
16039                     lapack_int* n, lapack_int* k, const float* a,
16040                     lapack_int* lda, const float* tau, float* c,
16041                     lapack_int* ldc, float* work, lapack_int* lwork,
16042                     lapack_int *info );
16043 void LAPACK_dormbr( char* vect, char* side, char* trans, lapack_int* m,
16044                     lapack_int* n, lapack_int* k, const double* a,
16045                     lapack_int* lda, const double* tau, double* c,
16046                     lapack_int* ldc, double* work, lapack_int* lwork,
16047                     lapack_int *info );
16048 void LAPACK_cungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16049                     lapack_complex_float* a, lapack_int* lda,
16050                     const lapack_complex_float* tau, lapack_complex_float* work,
16051                     lapack_int* lwork, lapack_int *info );
16052 void LAPACK_zungbr( char* vect, lapack_int* m, lapack_int* n, lapack_int* k,
16053                     lapack_complex_double* a, lapack_int* lda,
16054                     const lapack_complex_double* tau,
16055                     lapack_complex_double* work, lapack_int* lwork,
16056                     lapack_int *info );
16057 void LAPACK_cunmbr( char* vect, char* side, char* trans, lapack_int* m,
16058                     lapack_int* n, lapack_int* k, const lapack_complex_float* a,
16059                     lapack_int* lda, const lapack_complex_float* tau,
16060                     lapack_complex_float* c, lapack_int* ldc,
16061                     lapack_complex_float* work, lapack_int* lwork,
16062                     lapack_int *info );
16063 void LAPACK_zunmbr( char* vect, char* side, char* trans, lapack_int* m,
16064                     lapack_int* n, lapack_int* k,
16065                     const lapack_complex_double* a, lapack_int* lda,
16066                     const lapack_complex_double* tau, lapack_complex_double* c,
16067                     lapack_int* ldc, lapack_complex_double* work,
16068                     lapack_int* lwork, lapack_int *info );
16069 void LAPACK_sbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16070                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
16071                     float* vt, lapack_int* ldvt, float* u, lapack_int* ldu,
16072                     float* c, lapack_int* ldc, float* work, lapack_int *info );
16073 void LAPACK_dbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16074                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
16075                     double* vt, lapack_int* ldvt, double* u, lapack_int* ldu,
16076                     double* c, lapack_int* ldc, double* work,
16077                     lapack_int *info );
16078 void LAPACK_cbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16079                     lapack_int* nru, lapack_int* ncc, float* d, float* e,
16080                     lapack_complex_float* vt, lapack_int* ldvt,
16081                     lapack_complex_float* u, lapack_int* ldu,
16082                     lapack_complex_float* c, lapack_int* ldc, float* work,
16083                     lapack_int *info );
16084 void LAPACK_zbdsqr( char* uplo, lapack_int* n, lapack_int* ncvt,
16085                     lapack_int* nru, lapack_int* ncc, double* d, double* e,
16086                     lapack_complex_double* vt, lapack_int* ldvt,
16087                     lapack_complex_double* u, lapack_int* ldu,
16088                     lapack_complex_double* c, lapack_int* ldc, double* work,
16089                     lapack_int *info );
16090 void LAPACK_sbdsdc( char* uplo, char* compq, lapack_int* n, float* d, float* e,
16091                     float* u, lapack_int* ldu, float* vt, lapack_int* ldvt,
16092                     float* q, lapack_int* iq, float* work, lapack_int* iwork,
16093                     lapack_int *info );
16094 void LAPACK_dbdsdc( char* uplo, char* compq, lapack_int* n, double* d,
16095                     double* e, double* u, lapack_int* ldu, double* vt,
16096                     lapack_int* ldvt, double* q, lapack_int* iq, double* work,
16097                     lapack_int* iwork, lapack_int *info );
16098 void LAPACK_sbdsvdx( char* uplo, char* jobz, char* range,
16099                      lapack_int* n, float* d, float* e,
16100                      float* vl, float* vu,
16101                      lapack_int* il, lapack_int* iu, lapack_int* ns,
16102                      float* s, float* z, lapack_int* ldz,
16103                      float* work, lapack_int *iwork, lapack_int *info );
16104 void LAPACK_dbdsvdx( char* uplo, char* jobz, char* range,
16105                      lapack_int* n, double* d, double* e,
16106                      double* vl, double* vu,
16107                      lapack_int* il, lapack_int* iu, lapack_int* ns,
16108                      double* s, double* z, lapack_int* ldz,
16109                      double* work, lapack_int *iwork, lapack_int *info );
16110 void LAPACK_ssytrd( char* uplo, lapack_int* n, float* a, lapack_int* lda,
16111                     float* d, float* e, float* tau, float* work,
16112                     lapack_int* lwork, lapack_int *info );
16113 void LAPACK_dsytrd( char* uplo, lapack_int* n, double* a, lapack_int* lda,
16114                     double* d, double* e, double* tau, double* work,
16115                     lapack_int* lwork, lapack_int *info );
16116 void LAPACK_sorgtr( char* uplo, lapack_int* n, float* a, lapack_int* lda,
16117                     const float* tau, float* work, lapack_int* lwork,
16118                     lapack_int *info );
16119 void LAPACK_dorgtr( char* uplo, lapack_int* n, double* a, lapack_int* lda,
16120                     const double* tau, double* work, lapack_int* lwork,
16121                     lapack_int *info );
16122 void LAPACK_sormtr( char* side, char* uplo, char* trans, lapack_int* m,
16123                     lapack_int* n, const float* a, lapack_int* lda,
16124                     const float* tau, float* c, lapack_int* ldc, float* work,
16125                     lapack_int* lwork, lapack_int *info );
16126 void LAPACK_dormtr( char* side, char* uplo, char* trans, lapack_int* m,
16127                     lapack_int* n, const double* a, lapack_int* lda,
16128                     const double* tau, double* c, lapack_int* ldc, double* work,
16129                     lapack_int* lwork, lapack_int *info );
16130 void LAPACK_chetrd( char* uplo, lapack_int* n, lapack_complex_float* a,
16131                     lapack_int* lda, float* d, float* e,
16132                     lapack_complex_float* tau, lapack_complex_float* work,
16133                     lapack_int* lwork, lapack_int *info );
16134 void LAPACK_zhetrd( char* uplo, lapack_int* n, lapack_complex_double* a,
16135                     lapack_int* lda, double* d, double* e,
16136                     lapack_complex_double* tau, lapack_complex_double* work,
16137                     lapack_int* lwork, lapack_int *info );
16138 void LAPACK_cungtr( char* uplo, lapack_int* n, lapack_complex_float* a,
16139                     lapack_int* lda, const lapack_complex_float* tau,
16140                     lapack_complex_float* work, lapack_int* lwork,
16141                     lapack_int *info );
16142 void LAPACK_zungtr( char* uplo, lapack_int* n, lapack_complex_double* a,
16143                     lapack_int* lda, const lapack_complex_double* tau,
16144                     lapack_complex_double* work, lapack_int* lwork,
16145                     lapack_int *info );
16146 void LAPACK_cunmtr( char* side, char* uplo, char* trans, lapack_int* m,
16147                     lapack_int* n, const lapack_complex_float* a,
16148                     lapack_int* lda, const lapack_complex_float* tau,
16149                     lapack_complex_float* c, lapack_int* ldc,
16150                     lapack_complex_float* work, lapack_int* lwork,
16151                     lapack_int *info );
16152 void LAPACK_zunmtr( char* side, char* uplo, char* trans, lapack_int* m,
16153                     lapack_int* n, const lapack_complex_double* a,
16154                     lapack_int* lda, const lapack_complex_double* tau,
16155                     lapack_complex_double* c, lapack_int* ldc,
16156                     lapack_complex_double* work, lapack_int* lwork,
16157                     lapack_int *info );
16158 void LAPACK_ssptrd( char* uplo, lapack_int* n, float* ap, float* d, float* e,
16159                     float* tau, lapack_int *info );
16160 void LAPACK_dsptrd( char* uplo, lapack_int* n, double* ap, double* d, double* e,
16161                     double* tau, lapack_int *info );
16162 void LAPACK_sopgtr( char* uplo, lapack_int* n, const float* ap,
16163                     const float* tau, float* q, lapack_int* ldq, float* work,
16164                     lapack_int *info );
16165 void LAPACK_dopgtr( char* uplo, lapack_int* n, const double* ap,
16166                     const double* tau, double* q, lapack_int* ldq, double* work,
16167                     lapack_int *info );
16168 void LAPACK_sopmtr( char* side, char* uplo, char* trans, lapack_int* m,
16169                     lapack_int* n, const float* ap, const float* tau, float* c,
16170                     lapack_int* ldc, float* work, lapack_int *info );
16171 void LAPACK_dopmtr( char* side, char* uplo, char* trans, lapack_int* m,
16172                     lapack_int* n, const double* ap, const double* tau,
16173                     double* c, lapack_int* ldc, double* work,
16174                     lapack_int *info );
16175 void LAPACK_chptrd( char* uplo, lapack_int* n, lapack_complex_float* ap,
16176                     float* d, float* e, lapack_complex_float* tau,
16177                     lapack_int *info );
16178 void LAPACK_zhptrd( char* uplo, lapack_int* n, lapack_complex_double* ap,
16179                     double* d, double* e, lapack_complex_double* tau,
16180                     lapack_int *info );
16181 void LAPACK_cupgtr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
16182                     const lapack_complex_float* tau, lapack_complex_float* q,
16183                     lapack_int* ldq, lapack_complex_float* work,
16184                     lapack_int *info );
16185 void LAPACK_zupgtr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
16186                     const lapack_complex_double* tau, lapack_complex_double* q,
16187                     lapack_int* ldq, lapack_complex_double* work,
16188                     lapack_int *info );
16189 void LAPACK_cupmtr( char* side, char* uplo, char* trans, lapack_int* m,
16190                     lapack_int* n, const lapack_complex_float* ap,
16191                     const lapack_complex_float* tau, lapack_complex_float* c,
16192                     lapack_int* ldc, lapack_complex_float* work,
16193                     lapack_int *info );
16194 void LAPACK_zupmtr( char* side, char* uplo, char* trans, lapack_int* m,
16195                     lapack_int* n, const lapack_complex_double* ap,
16196                     const lapack_complex_double* tau, lapack_complex_double* c,
16197                     lapack_int* ldc, lapack_complex_double* work,
16198                     lapack_int *info );
16199 void LAPACK_ssbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16200                     float* ab, lapack_int* ldab, float* d, float* e, float* q,
16201                     lapack_int* ldq, float* work, lapack_int *info );
16202 void LAPACK_dsbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16203                     double* ab, lapack_int* ldab, double* d, double* e,
16204                     double* q, lapack_int* ldq, double* work,
16205                     lapack_int *info );
16206 void LAPACK_chbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16207                     lapack_complex_float* ab, lapack_int* ldab, float* d,
16208                     float* e, lapack_complex_float* q, lapack_int* ldq,
16209                     lapack_complex_float* work, lapack_int *info );
16210 void LAPACK_zhbtrd( char* vect, char* uplo, lapack_int* n, lapack_int* kd,
16211                     lapack_complex_double* ab, lapack_int* ldab, double* d,
16212                     double* e, lapack_complex_double* q, lapack_int* ldq,
16213                     lapack_complex_double* work, lapack_int *info );
16214 void LAPACK_ssterf( lapack_int* n, float* d, float* e, lapack_int *info );
16215 void LAPACK_dsterf( lapack_int* n, double* d, double* e, lapack_int *info );
16216 void LAPACK_ssteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
16217                     lapack_int* ldz, float* work, lapack_int *info );
16218 void LAPACK_dsteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
16219                     lapack_int* ldz, double* work, lapack_int *info );
16220 void LAPACK_csteqr( char* compz, lapack_int* n, float* d, float* e,
16221                     lapack_complex_float* z, lapack_int* ldz, float* work,
16222                     lapack_int *info );
16223 void LAPACK_zsteqr( char* compz, lapack_int* n, double* d, double* e,
16224                     lapack_complex_double* z, lapack_int* ldz, double* work,
16225                     lapack_int *info );
16226 void LAPACK_sstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16227                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16228                     lapack_int* m, float* w, float* z, lapack_int* ldz,
16229                     lapack_int* nzc, lapack_int* isuppz, lapack_logical* tryrac,
16230                     float* work, lapack_int* lwork, lapack_int* iwork,
16231                     lapack_int* liwork, lapack_int *info );
16232 void LAPACK_dstemr( char* jobz, char* range, lapack_int* n, double* d,
16233                     double* e, double* vl, double* vu, lapack_int* il,
16234                     lapack_int* iu, lapack_int* m, double* w, double* z,
16235                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
16236                     lapack_logical* tryrac, double* work, lapack_int* lwork,
16237                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16238 void LAPACK_cstemr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16239                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16240                     lapack_int* m, float* w, lapack_complex_float* z,
16241                     lapack_int* ldz, lapack_int* nzc, lapack_int* isuppz,
16242                     lapack_logical* tryrac, float* work, lapack_int* lwork,
16243                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16244 void LAPACK_zstemr( char* jobz, char* range, lapack_int* n, double* d,
16245                     double* e, double* vl, double* vu, lapack_int* il,
16246                     lapack_int* iu, lapack_int* m, double* w,
16247                     lapack_complex_double* z, lapack_int* ldz, lapack_int* nzc,
16248                     lapack_int* isuppz, lapack_logical* tryrac, double* work,
16249                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16250                     lapack_int *info );
16251 void LAPACK_sstedc( char* compz, lapack_int* n, float* d, float* e, float* z,
16252                     lapack_int* ldz, float* work, lapack_int* lwork,
16253                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16254 void LAPACK_dstedc( char* compz, lapack_int* n, double* d, double* e, double* z,
16255                     lapack_int* ldz, double* work, lapack_int* lwork,
16256                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16257 void LAPACK_cstedc( char* compz, lapack_int* n, float* d, float* e,
16258                     lapack_complex_float* z, lapack_int* ldz,
16259                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16260                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
16261                     lapack_int *info );
16262 void LAPACK_zstedc( char* compz, lapack_int* n, double* d, double* e,
16263                     lapack_complex_double* z, lapack_int* ldz,
16264                     lapack_complex_double* work, lapack_int* lwork,
16265                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
16266                     lapack_int* liwork, lapack_int *info );
16267 void LAPACK_sstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16268                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16269                     float* abstol, lapack_int* m, float* w, float* z,
16270                     lapack_int* ldz, lapack_int* isuppz, float* work,
16271                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
16272                     lapack_int *info );
16273 void LAPACK_dstegr( char* jobz, char* range, lapack_int* n, double* d,
16274                     double* e, double* vl, double* vu, lapack_int* il,
16275                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16276                     double* z, lapack_int* ldz, lapack_int* isuppz,
16277                     double* work, lapack_int* lwork, lapack_int* iwork,
16278                     lapack_int* liwork, lapack_int *info );
16279 void LAPACK_cstegr( char* jobz, char* range, lapack_int* n, float* d, float* e,
16280                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
16281                     float* abstol, lapack_int* m, float* w,
16282                     lapack_complex_float* z, lapack_int* ldz,
16283                     lapack_int* isuppz, float* work, lapack_int* lwork,
16284                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16285 void LAPACK_zstegr( char* jobz, char* range, lapack_int* n, double* d,
16286                     double* e, double* vl, double* vu, lapack_int* il,
16287                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
16288                     lapack_complex_double* z, lapack_int* ldz,
16289                     lapack_int* isuppz, double* work, lapack_int* lwork,
16290                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16291 void LAPACK_spteqr( char* compz, lapack_int* n, float* d, float* e, float* z,
16292                     lapack_int* ldz, float* work, lapack_int *info );
16293 void LAPACK_dpteqr( char* compz, lapack_int* n, double* d, double* e, double* z,
16294                     lapack_int* ldz, double* work, lapack_int *info );
16295 void LAPACK_cpteqr( char* compz, lapack_int* n, float* d, float* e,
16296                     lapack_complex_float* z, lapack_int* ldz, float* work,
16297                     lapack_int *info );
16298 void LAPACK_zpteqr( char* compz, lapack_int* n, double* d, double* e,
16299                     lapack_complex_double* z, lapack_int* ldz, double* work,
16300                     lapack_int *info );
16301 void LAPACK_sstebz( char* range, char* order, lapack_int* n, float* vl,
16302                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
16303                     const float* d, const float* e, lapack_int* m,
16304                     lapack_int* nsplit, float* w, lapack_int* iblock,
16305                     lapack_int* isplit, float* work, lapack_int* iwork,
16306                     lapack_int *info );
16307 void LAPACK_dstebz( char* range, char* order, lapack_int* n, double* vl,
16308                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
16309                     const double* d, const double* e, lapack_int* m,
16310                     lapack_int* nsplit, double* w, lapack_int* iblock,
16311                     lapack_int* isplit, double* work, lapack_int* iwork,
16312                     lapack_int *info );
16313 void LAPACK_sstein( lapack_int* n, const float* d, const float* e,
16314                     lapack_int* m, const float* w, const lapack_int* iblock,
16315                     const lapack_int* isplit, float* z, lapack_int* ldz,
16316                     float* work, lapack_int* iwork, lapack_int* ifailv,
16317                     lapack_int *info );
16318 void LAPACK_dstein( lapack_int* n, const double* d, const double* e,
16319                     lapack_int* m, const double* w, const lapack_int* iblock,
16320                     const lapack_int* isplit, double* z, lapack_int* ldz,
16321                     double* work, lapack_int* iwork, lapack_int* ifailv,
16322                     lapack_int *info );
16323 void LAPACK_cstein( lapack_int* n, const float* d, const float* e,
16324                     lapack_int* m, const float* w, const lapack_int* iblock,
16325                     const lapack_int* isplit, lapack_complex_float* z,
16326                     lapack_int* ldz, float* work, lapack_int* iwork,
16327                     lapack_int* ifailv, lapack_int *info );
16328 void LAPACK_zstein( lapack_int* n, const double* d, const double* e,
16329                     lapack_int* m, const double* w, const lapack_int* iblock,
16330                     const lapack_int* isplit, lapack_complex_double* z,
16331                     lapack_int* ldz, double* work, lapack_int* iwork,
16332                     lapack_int* ifailv, lapack_int *info );
16333 void LAPACK_sdisna( char* job, lapack_int* m, lapack_int* n, const float* d,
16334                     float* sep, lapack_int *info );
16335 void LAPACK_ddisna( char* job, lapack_int* m, lapack_int* n, const double* d,
16336                     double* sep, lapack_int *info );
16337 void LAPACK_ssygst( lapack_int* itype, char* uplo, lapack_int* n, float* a,
16338                     lapack_int* lda, const float* b, lapack_int* ldb,
16339                     lapack_int *info );
16340 void LAPACK_dsygst( lapack_int* itype, char* uplo, lapack_int* n, double* a,
16341                     lapack_int* lda, const double* b, lapack_int* ldb,
16342                     lapack_int *info );
16343 void LAPACK_chegst( lapack_int* itype, char* uplo, lapack_int* n,
16344                     lapack_complex_float* a, lapack_int* lda,
16345                     const lapack_complex_float* b, lapack_int* ldb,
16346                     lapack_int *info );
16347 void LAPACK_zhegst( lapack_int* itype, char* uplo, lapack_int* n,
16348                     lapack_complex_double* a, lapack_int* lda,
16349                     const lapack_complex_double* b, lapack_int* ldb,
16350                     lapack_int *info );
16351 void LAPACK_sspgst( lapack_int* itype, char* uplo, lapack_int* n, float* ap,
16352                     const float* bp, lapack_int *info );
16353 void LAPACK_dspgst( lapack_int* itype, char* uplo, lapack_int* n, double* ap,
16354                     const double* bp, lapack_int *info );
16355 void LAPACK_chpgst( lapack_int* itype, char* uplo, lapack_int* n,
16356                     lapack_complex_float* ap, const lapack_complex_float* bp,
16357                     lapack_int *info );
16358 void LAPACK_zhpgst( lapack_int* itype, char* uplo, lapack_int* n,
16359                     lapack_complex_double* ap, const lapack_complex_double* bp,
16360                     lapack_int *info );
16361 void LAPACK_ssbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16362                     lapack_int* kb, float* ab, lapack_int* ldab,
16363                     const float* bb, lapack_int* ldbb, float* x,
16364                     lapack_int* ldx, float* work, lapack_int *info );
16365 void LAPACK_dsbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16366                     lapack_int* kb, double* ab, lapack_int* ldab,
16367                     const double* bb, lapack_int* ldbb, double* x,
16368                     lapack_int* ldx, double* work, lapack_int *info );
16369 void LAPACK_chbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16370                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
16371                     const lapack_complex_float* bb, lapack_int* ldbb,
16372                     lapack_complex_float* x, lapack_int* ldx,
16373                     lapack_complex_float* work, float* rwork,
16374                     lapack_int *info );
16375 void LAPACK_zhbgst( char* vect, char* uplo, lapack_int* n, lapack_int* ka,
16376                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
16377                     const lapack_complex_double* bb, lapack_int* ldbb,
16378                     lapack_complex_double* x, lapack_int* ldx,
16379                     lapack_complex_double* work, double* rwork,
16380                     lapack_int *info );
16381 void LAPACK_spbstf( char* uplo, lapack_int* n, lapack_int* kb, float* bb,
16382                     lapack_int* ldbb, lapack_int *info );
16383 void LAPACK_dpbstf( char* uplo, lapack_int* n, lapack_int* kb, double* bb,
16384                     lapack_int* ldbb, lapack_int *info );
16385 void LAPACK_cpbstf( char* uplo, lapack_int* n, lapack_int* kb,
16386                     lapack_complex_float* bb, lapack_int* ldbb,
16387                     lapack_int *info );
16388 void LAPACK_zpbstf( char* uplo, lapack_int* n, lapack_int* kb,
16389                     lapack_complex_double* bb, lapack_int* ldbb,
16390                     lapack_int *info );
16391 void LAPACK_sgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
16392                     lapack_int* lda, float* tau, float* work, lapack_int* lwork,
16393                     lapack_int *info );
16394 void LAPACK_dgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
16395                     lapack_int* lda, double* tau, double* work,
16396                     lapack_int* lwork, lapack_int *info );
16397 void LAPACK_cgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16398                     lapack_complex_float* a, lapack_int* lda,
16399                     lapack_complex_float* tau, lapack_complex_float* work,
16400                     lapack_int* lwork, lapack_int *info );
16401 void LAPACK_zgehrd( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16402                     lapack_complex_double* a, lapack_int* lda,
16403                     lapack_complex_double* tau, lapack_complex_double* work,
16404                     lapack_int* lwork, lapack_int *info );
16405 void LAPACK_sorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, float* a,
16406                     lapack_int* lda, const float* tau, float* work,
16407                     lapack_int* lwork, lapack_int *info );
16408 void LAPACK_dorghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi, double* a,
16409                     lapack_int* lda, const double* tau, double* work,
16410                     lapack_int* lwork, lapack_int *info );
16411 void LAPACK_sormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16412                     lapack_int* ilo, lapack_int* ihi, const float* a,
16413                     lapack_int* lda, const float* tau, float* c,
16414                     lapack_int* ldc, float* work, lapack_int* lwork,
16415                     lapack_int *info );
16416 void LAPACK_dormhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16417                     lapack_int* ilo, lapack_int* ihi, const double* a,
16418                     lapack_int* lda, const double* tau, double* c,
16419                     lapack_int* ldc, double* work, lapack_int* lwork,
16420                     lapack_int *info );
16421 void LAPACK_cunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16422                     lapack_complex_float* a, lapack_int* lda,
16423                     const lapack_complex_float* tau, lapack_complex_float* work,
16424                     lapack_int* lwork, lapack_int *info );
16425 void LAPACK_zunghr( lapack_int* n, lapack_int* ilo, lapack_int* ihi,
16426                     lapack_complex_double* a, lapack_int* lda,
16427                     const lapack_complex_double* tau,
16428                     lapack_complex_double* work, lapack_int* lwork,
16429                     lapack_int *info );
16430 void LAPACK_cunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16431                     lapack_int* ilo, lapack_int* ihi,
16432                     const lapack_complex_float* a, lapack_int* lda,
16433                     const lapack_complex_float* tau, lapack_complex_float* c,
16434                     lapack_int* ldc, lapack_complex_float* work,
16435                     lapack_int* lwork, lapack_int *info );
16436 void LAPACK_zunmhr( char* side, char* trans, lapack_int* m, lapack_int* n,
16437                     lapack_int* ilo, lapack_int* ihi,
16438                     const lapack_complex_double* a, lapack_int* lda,
16439                     const lapack_complex_double* tau, lapack_complex_double* c,
16440                     lapack_int* ldc, lapack_complex_double* work,
16441                     lapack_int* lwork, lapack_int *info );
16442 void LAPACK_sgebal( char* job, lapack_int* n, float* a, lapack_int* lda,
16443                     lapack_int* ilo, lapack_int* ihi, float* scale,
16444                     lapack_int *info );
16445 void LAPACK_dgebal( char* job, lapack_int* n, double* a, lapack_int* lda,
16446                     lapack_int* ilo, lapack_int* ihi, double* scale,
16447                     lapack_int *info );
16448 void LAPACK_cgebal( char* job, lapack_int* n, lapack_complex_float* a,
16449                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
16450                     float* scale, lapack_int *info );
16451 void LAPACK_zgebal( char* job, lapack_int* n, lapack_complex_double* a,
16452                     lapack_int* lda, lapack_int* ilo, lapack_int* ihi,
16453                     double* scale, lapack_int *info );
16454 void LAPACK_sgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16455                     lapack_int* ihi, const float* scale, lapack_int* m,
16456                     float* v, lapack_int* ldv, lapack_int *info );
16457 void LAPACK_dgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16458                     lapack_int* ihi, const double* scale, lapack_int* m,
16459                     double* v, lapack_int* ldv, lapack_int *info );
16460 void LAPACK_cgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16461                     lapack_int* ihi, const float* scale, lapack_int* m,
16462                     lapack_complex_float* v, lapack_int* ldv,
16463                     lapack_int *info );
16464 void LAPACK_zgebak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16465                     lapack_int* ihi, const double* scale, lapack_int* m,
16466                     lapack_complex_double* v, lapack_int* ldv,
16467                     lapack_int *info );
16468 void LAPACK_shseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16469                     lapack_int* ihi, float* h, lapack_int* ldh, float* wr,
16470                     float* wi, float* z, lapack_int* ldz, float* work,
16471                     lapack_int* lwork, lapack_int *info );
16472 void LAPACK_dhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16473                     lapack_int* ihi, double* h, lapack_int* ldh, double* wr,
16474                     double* wi, double* z, lapack_int* ldz, double* work,
16475                     lapack_int* lwork, lapack_int *info );
16476 void LAPACK_chseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16477                     lapack_int* ihi, lapack_complex_float* h, lapack_int* ldh,
16478                     lapack_complex_float* w, lapack_complex_float* z,
16479                     lapack_int* ldz, lapack_complex_float* work,
16480                     lapack_int* lwork, lapack_int *info );
16481 void LAPACK_zhseqr( char* job, char* compz, lapack_int* n, lapack_int* ilo,
16482                     lapack_int* ihi, lapack_complex_double* h, lapack_int* ldh,
16483                     lapack_complex_double* w, lapack_complex_double* z,
16484                     lapack_int* ldz, lapack_complex_double* work,
16485                     lapack_int* lwork, lapack_int *info );
16486 void LAPACK_shsein( char* job, char* eigsrc, char* initv,
16487                     lapack_logical* select, lapack_int* n, const float* h,
16488                     lapack_int* ldh, float* wr, const float* wi, float* vl,
16489                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16490                     lapack_int* mm, lapack_int* m, float* work,
16491                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16492 void LAPACK_dhsein( char* job, char* eigsrc, char* initv,
16493                     lapack_logical* select, lapack_int* n, const double* h,
16494                     lapack_int* ldh, double* wr, const double* wi, double* vl,
16495                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16496                     lapack_int* mm, lapack_int* m, double* work,
16497                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16498 void LAPACK_chsein( char* job, char* eigsrc, char* initv,
16499                     const lapack_logical* select, lapack_int* n,
16500                     const lapack_complex_float* h, lapack_int* ldh,
16501                     lapack_complex_float* w, lapack_complex_float* vl,
16502                     lapack_int* ldvl, lapack_complex_float* vr,
16503                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16504                     lapack_complex_float* work, float* rwork,
16505                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16506 void LAPACK_zhsein( char* job, char* eigsrc, char* initv,
16507                     const lapack_logical* select, lapack_int* n,
16508                     const lapack_complex_double* h, lapack_int* ldh,
16509                     lapack_complex_double* w, lapack_complex_double* vl,
16510                     lapack_int* ldvl, lapack_complex_double* vr,
16511                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16512                     lapack_complex_double* work, double* rwork,
16513                     lapack_int* ifaill, lapack_int* ifailr, lapack_int *info );
16514 void LAPACK_strevc( char* side, char* howmny, lapack_logical* select,
16515                     lapack_int* n, const float* t, lapack_int* ldt, float* vl,
16516                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16517                     lapack_int* mm, lapack_int* m, float* work,
16518                     lapack_int *info );
16519 void LAPACK_dtrevc( char* side, char* howmny, lapack_logical* select,
16520                     lapack_int* n, const double* t, lapack_int* ldt, double* vl,
16521                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16522                     lapack_int* mm, lapack_int* m, double* work,
16523                     lapack_int *info );
16524 void LAPACK_ctrevc( char* side, char* howmny, const lapack_logical* select,
16525                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
16526                     lapack_complex_float* vl, lapack_int* ldvl,
16527                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
16528                     lapack_int* m, lapack_complex_float* work, float* rwork,
16529                     lapack_int *info );
16530 void LAPACK_ztrevc( char* side, char* howmny, const lapack_logical* select,
16531                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
16532                     lapack_complex_double* vl, lapack_int* ldvl,
16533                     lapack_complex_double* vr, lapack_int* ldvr, lapack_int* mm,
16534                     lapack_int* m, lapack_complex_double* work, double* rwork,
16535                     lapack_int *info );
16536 void LAPACK_strsna( char* job, char* howmny, const lapack_logical* select,
16537                     lapack_int* n, const float* t, lapack_int* ldt,
16538                     const float* vl, lapack_int* ldvl, const float* vr,
16539                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
16540                     lapack_int* m, float* work, lapack_int* ldwork,
16541                     lapack_int* iwork, lapack_int *info );
16542 void LAPACK_dtrsna( char* job, char* howmny, const lapack_logical* select,
16543                     lapack_int* n, const double* t, lapack_int* ldt,
16544                     const double* vl, lapack_int* ldvl, const double* vr,
16545                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
16546                     lapack_int* m, double* work, lapack_int* ldwork,
16547                     lapack_int* iwork, lapack_int *info );
16548 void LAPACK_ctrsna( char* job, char* howmny, const lapack_logical* select,
16549                     lapack_int* n, const lapack_complex_float* t,
16550                     lapack_int* ldt, const lapack_complex_float* vl,
16551                     lapack_int* ldvl, const lapack_complex_float* vr,
16552                     lapack_int* ldvr, float* s, float* sep, lapack_int* mm,
16553                     lapack_int* m, lapack_complex_float* work,
16554                     lapack_int* ldwork, float* rwork, lapack_int *info );
16555 void LAPACK_ztrsna( char* job, char* howmny, const lapack_logical* select,
16556                     lapack_int* n, const lapack_complex_double* t,
16557                     lapack_int* ldt, const lapack_complex_double* vl,
16558                     lapack_int* ldvl, const lapack_complex_double* vr,
16559                     lapack_int* ldvr, double* s, double* sep, lapack_int* mm,
16560                     lapack_int* m, lapack_complex_double* work,
16561                     lapack_int* ldwork, double* rwork, lapack_int *info );
16562 void LAPACK_strexc( char* compq, lapack_int* n, float* t, lapack_int* ldt,
16563                     float* q, lapack_int* ldq, lapack_int* ifst,
16564                     lapack_int* ilst, float* work, lapack_int *info );
16565 void LAPACK_dtrexc( char* compq, lapack_int* n, double* t, lapack_int* ldt,
16566                     double* q, lapack_int* ldq, lapack_int* ifst,
16567                     lapack_int* ilst, double* work, lapack_int *info );
16568 void LAPACK_ctrexc( char* compq, lapack_int* n, lapack_complex_float* t,
16569                     lapack_int* ldt, lapack_complex_float* q, lapack_int* ldq,
16570                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
16571 void LAPACK_ztrexc( char* compq, lapack_int* n, lapack_complex_double* t,
16572                     lapack_int* ldt, lapack_complex_double* q, lapack_int* ldq,
16573                     lapack_int* ifst, lapack_int* ilst, lapack_int *info );
16574 void LAPACK_strsen( char* job, char* compq, const lapack_logical* select,
16575                     lapack_int* n, float* t, lapack_int* ldt, float* q,
16576                     lapack_int* ldq, float* wr, float* wi, lapack_int* m,
16577                     float* s, float* sep, float* work, lapack_int* lwork,
16578                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16579 void LAPACK_dtrsen( char* job, char* compq, const lapack_logical* select,
16580                     lapack_int* n, double* t, lapack_int* ldt, double* q,
16581                     lapack_int* ldq, double* wr, double* wi, lapack_int* m,
16582                     double* s, double* sep, double* work, lapack_int* lwork,
16583                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16584 void LAPACK_ctrsen( char* job, char* compq, const lapack_logical* select,
16585                     lapack_int* n, lapack_complex_float* t, lapack_int* ldt,
16586                     lapack_complex_float* q, lapack_int* ldq,
16587                     lapack_complex_float* w, lapack_int* m, float* s,
16588                     float* sep, lapack_complex_float* work, lapack_int* lwork,
16589                     lapack_int *info );
16590 void LAPACK_ztrsen( char* job, char* compq, const lapack_logical* select,
16591                     lapack_int* n, lapack_complex_double* t, lapack_int* ldt,
16592                     lapack_complex_double* q, lapack_int* ldq,
16593                     lapack_complex_double* w, lapack_int* m, double* s,
16594                     double* sep, lapack_complex_double* work, lapack_int* lwork,
16595                     lapack_int *info );
16596 void LAPACK_strsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16597                     lapack_int* n, const float* a, lapack_int* lda,
16598                     const float* b, lapack_int* ldb, float* c, lapack_int* ldc,
16599                     float* scale, lapack_int *info );
16600 void LAPACK_dtrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16601                     lapack_int* n, const double* a, lapack_int* lda,
16602                     const double* b, lapack_int* ldb, double* c,
16603                     lapack_int* ldc, double* scale, lapack_int *info );
16604 void LAPACK_ctrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16605                     lapack_int* n, const lapack_complex_float* a,
16606                     lapack_int* lda, const lapack_complex_float* b,
16607                     lapack_int* ldb, lapack_complex_float* c, lapack_int* ldc,
16608                     float* scale, lapack_int *info );
16609 void LAPACK_ztrsyl( char* trana, char* tranb, lapack_int* isgn, lapack_int* m,
16610                     lapack_int* n, const lapack_complex_double* a,
16611                     lapack_int* lda, const lapack_complex_double* b,
16612                     lapack_int* ldb, lapack_complex_double* c, lapack_int* ldc,
16613                     double* scale, lapack_int *info );
16614 void LAPACK_sgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16615                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
16616                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
16617                     lapack_int* ldz, lapack_int *info );
16618 void LAPACK_dgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16619                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
16620                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
16621                     lapack_int* ldz, lapack_int *info );
16622 void LAPACK_cgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16623                     lapack_int* ihi, lapack_complex_float* a, lapack_int* lda,
16624                     lapack_complex_float* b, lapack_int* ldb,
16625                     lapack_complex_float* q, lapack_int* ldq,
16626                     lapack_complex_float* z, lapack_int* ldz,
16627                     lapack_int *info );
16628 void LAPACK_zgghrd( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16629                     lapack_int* ihi, lapack_complex_double* a, lapack_int* lda,
16630                     lapack_complex_double* b, lapack_int* ldb,
16631                     lapack_complex_double* q, lapack_int* ldq,
16632                     lapack_complex_double* z, lapack_int* ldz,
16633                     lapack_int *info );
16634 void LAPACK_sgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16635                     lapack_int* ihi, float* a, lapack_int* lda, float* b,
16636                     lapack_int* ldb, float* q, lapack_int* ldq, float* z,
16637                     lapack_int* ldz, float* work, lapack_int* lwork,
16638                     lapack_int *info );
16639 void LAPACK_dgghd3( char* compq, char* compz, lapack_int* n, lapack_int* ilo,
16640                     lapack_int* ihi, double* a, lapack_int* lda, double* b,
16641                     lapack_int* ldb, double* q, lapack_int* ldq, double* z,
16642                     lapack_int* ldz, double* work, lapack_int* lwork,
16643                     lapack_int *info );
16644 void LAPACK_cgghd3( char* compq, char* compz, lapack_int* n,
16645                     lapack_int* ilo, lapack_int* ihi,
16646                     lapack_complex_float* a, lapack_int* lda,
16647                     lapack_complex_float* b, lapack_int* ldb,
16648                     lapack_complex_float* q, lapack_int* ldq,
16649                     lapack_complex_float* z, lapack_int* ldz,
16650                     lapack_complex_float* work, lapack_int* lwork,
16651                     lapack_int *info );
16652 void LAPACK_zgghd3( char* compq, char* compz, lapack_int* n,
16653                     lapack_int* ilo, lapack_int* ihi,
16654                     lapack_complex_double* a, lapack_int* lda,
16655                     lapack_complex_double* b, lapack_int* ldb,
16656                     lapack_complex_double* q, lapack_int* ldq,
16657                     lapack_complex_double* z, lapack_int* ldz,
16658                     lapack_complex_double* work, lapack_int* lwork,
16659                     lapack_int *info );
16660 void LAPACK_sggbal( char* job, lapack_int* n, float* a, lapack_int* lda,
16661                     float* b, lapack_int* ldb, lapack_int* ilo, lapack_int* ihi,
16662                     float* lscale, float* rscale, float* work,
16663                     lapack_int *info );
16664 void LAPACK_dggbal( char* job, lapack_int* n, double* a, lapack_int* lda,
16665                     double* b, lapack_int* ldb, lapack_int* ilo,
16666                     lapack_int* ihi, double* lscale, double* rscale,
16667                     double* work, lapack_int *info );
16668 void LAPACK_cggbal( char* job, lapack_int* n, lapack_complex_float* a,
16669                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16670                     lapack_int* ilo, lapack_int* ihi, float* lscale,
16671                     float* rscale, float* work, lapack_int *info );
16672 void LAPACK_zggbal( char* job, lapack_int* n, lapack_complex_double* a,
16673                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16674                     lapack_int* ilo, lapack_int* ihi, double* lscale,
16675                     double* rscale, double* work, lapack_int *info );
16676 void LAPACK_sggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16677                     lapack_int* ihi, const float* lscale, const float* rscale,
16678                     lapack_int* m, float* v, lapack_int* ldv,
16679                     lapack_int *info );
16680 void LAPACK_dggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16681                     lapack_int* ihi, const double* lscale, const double* rscale,
16682                     lapack_int* m, double* v, lapack_int* ldv,
16683                     lapack_int *info );
16684 void LAPACK_cggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16685                     lapack_int* ihi, const float* lscale, const float* rscale,
16686                     lapack_int* m, lapack_complex_float* v, lapack_int* ldv,
16687                     lapack_int *info );
16688 void LAPACK_zggbak( char* job, char* side, lapack_int* n, lapack_int* ilo,
16689                     lapack_int* ihi, const double* lscale, const double* rscale,
16690                     lapack_int* m, lapack_complex_double* v, lapack_int* ldv,
16691                     lapack_int *info );
16692 void LAPACK_shgeqz( char* job, char* compq, char* compz, lapack_int* n,
16693                     lapack_int* ilo, lapack_int* ihi, float* h, lapack_int* ldh,
16694                     float* t, lapack_int* ldt, float* alphar, float* alphai,
16695                     float* beta, float* q, lapack_int* ldq, float* z,
16696                     lapack_int* ldz, float* work, lapack_int* lwork,
16697                     lapack_int *info );
16698 void LAPACK_dhgeqz( char* job, char* compq, char* compz, lapack_int* n,
16699                     lapack_int* ilo, lapack_int* ihi, double* h,
16700                     lapack_int* ldh, double* t, lapack_int* ldt, double* alphar,
16701                     double* alphai, double* beta, double* q, lapack_int* ldq,
16702                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
16703                     lapack_int *info );
16704 void LAPACK_chgeqz( char* job, char* compq, char* compz, lapack_int* n,
16705                     lapack_int* ilo, lapack_int* ihi, lapack_complex_float* h,
16706                     lapack_int* ldh, lapack_complex_float* t, lapack_int* ldt,
16707                     lapack_complex_float* alpha, lapack_complex_float* beta,
16708                     lapack_complex_float* q, lapack_int* ldq,
16709                     lapack_complex_float* z, lapack_int* ldz,
16710                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
16711                     lapack_int *info );
16712 void LAPACK_zhgeqz( char* job, char* compq, char* compz, lapack_int* n,
16713                     lapack_int* ilo, lapack_int* ihi, lapack_complex_double* h,
16714                     lapack_int* ldh, lapack_complex_double* t, lapack_int* ldt,
16715                     lapack_complex_double* alpha, lapack_complex_double* beta,
16716                     lapack_complex_double* q, lapack_int* ldq,
16717                     lapack_complex_double* z, lapack_int* ldz,
16718                     lapack_complex_double* work, lapack_int* lwork,
16719                     double* rwork, lapack_int *info );
16720 void LAPACK_stgevc( char* side, char* howmny, const lapack_logical* select,
16721                     lapack_int* n, const float* s, lapack_int* lds,
16722                     const float* p, lapack_int* ldp, float* vl,
16723                     lapack_int* ldvl, float* vr, lapack_int* ldvr,
16724                     lapack_int* mm, lapack_int* m, float* work,
16725                     lapack_int *info );
16726 void LAPACK_dtgevc( char* side, char* howmny, const lapack_logical* select,
16727                     lapack_int* n, const double* s, lapack_int* lds,
16728                     const double* p, lapack_int* ldp, double* vl,
16729                     lapack_int* ldvl, double* vr, lapack_int* ldvr,
16730                     lapack_int* mm, lapack_int* m, double* work,
16731                     lapack_int *info );
16732 void LAPACK_ctgevc( char* side, char* howmny, const lapack_logical* select,
16733                     lapack_int* n, const lapack_complex_float* s,
16734                     lapack_int* lds, const lapack_complex_float* p,
16735                     lapack_int* ldp, lapack_complex_float* vl, lapack_int* ldvl,
16736                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* mm,
16737                     lapack_int* m, lapack_complex_float* work, float* rwork,
16738                     lapack_int *info );
16739 void LAPACK_ztgevc( char* side, char* howmny, const lapack_logical* select,
16740                     lapack_int* n, const lapack_complex_double* s,
16741                     lapack_int* lds, const lapack_complex_double* p,
16742                     lapack_int* ldp, lapack_complex_double* vl,
16743                     lapack_int* ldvl, lapack_complex_double* vr,
16744                     lapack_int* ldvr, lapack_int* mm, lapack_int* m,
16745                     lapack_complex_double* work, double* rwork,
16746                     lapack_int *info );
16747 void LAPACK_stgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16748                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16749                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
16750                     lapack_int* ifst, lapack_int* ilst, float* work,
16751                     lapack_int* lwork, lapack_int *info );
16752 void LAPACK_dtgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16753                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16754                     double* q, lapack_int* ldq, double* z, lapack_int* ldz,
16755                     lapack_int* ifst, lapack_int* ilst, double* work,
16756                     lapack_int* lwork, lapack_int *info );
16757 void LAPACK_ctgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16758                     lapack_complex_float* a, lapack_int* lda,
16759                     lapack_complex_float* b, lapack_int* ldb,
16760                     lapack_complex_float* q, lapack_int* ldq,
16761                     lapack_complex_float* z, lapack_int* ldz, lapack_int* ifst,
16762                     lapack_int* ilst, lapack_int *info );
16763 void LAPACK_ztgexc( lapack_logical* wantq, lapack_logical* wantz, lapack_int* n,
16764                     lapack_complex_double* a, lapack_int* lda,
16765                     lapack_complex_double* b, lapack_int* ldb,
16766                     lapack_complex_double* q, lapack_int* ldq,
16767                     lapack_complex_double* z, lapack_int* ldz, lapack_int* ifst,
16768                     lapack_int* ilst, lapack_int *info );
16769 void LAPACK_stgsen( lapack_int* ijob, lapack_logical* wantq,
16770                     lapack_logical* wantz, const lapack_logical* select,
16771                     lapack_int* n, float* a, lapack_int* lda, float* b,
16772                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
16773                     float* q, lapack_int* ldq, float* z, lapack_int* ldz,
16774                     lapack_int* m, float* pl, float* pr, float* dif,
16775                     float* work, lapack_int* lwork, lapack_int* iwork,
16776                     lapack_int* liwork, lapack_int *info );
16777 void LAPACK_dtgsen( lapack_int* ijob, lapack_logical* wantq,
16778                     lapack_logical* wantz, const lapack_logical* select,
16779                     lapack_int* n, double* a, lapack_int* lda, double* b,
16780                     lapack_int* ldb, double* alphar, double* alphai,
16781                     double* beta, double* q, lapack_int* ldq, double* z,
16782                     lapack_int* ldz, lapack_int* m, double* pl, double* pr,
16783                     double* dif, double* work, lapack_int* lwork,
16784                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16785 void LAPACK_ctgsen( lapack_int* ijob, lapack_logical* wantq,
16786                     lapack_logical* wantz, const lapack_logical* select,
16787                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
16788                     lapack_complex_float* b, lapack_int* ldb,
16789                     lapack_complex_float* alpha, lapack_complex_float* beta,
16790                     lapack_complex_float* q, lapack_int* ldq,
16791                     lapack_complex_float* z, lapack_int* ldz, lapack_int* m,
16792                     float* pl, float* pr, float* dif,
16793                     lapack_complex_float* work, lapack_int* lwork,
16794                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16795 void LAPACK_ztgsen( lapack_int* ijob, lapack_logical* wantq,
16796                     lapack_logical* wantz, const lapack_logical* select,
16797                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
16798                     lapack_complex_double* b, lapack_int* ldb,
16799                     lapack_complex_double* alpha, lapack_complex_double* beta,
16800                     lapack_complex_double* q, lapack_int* ldq,
16801                     lapack_complex_double* z, lapack_int* ldz, lapack_int* m,
16802                     double* pl, double* pr, double* dif,
16803                     lapack_complex_double* work, lapack_int* lwork,
16804                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
16805 void LAPACK_stgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16806                     const float* a, lapack_int* lda, const float* b,
16807                     lapack_int* ldb, float* c, lapack_int* ldc, const float* d,
16808                     lapack_int* ldd, const float* e, lapack_int* lde, float* f,
16809                     lapack_int* ldf, float* scale, float* dif, float* work,
16810                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16811 void LAPACK_dtgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16812                     const double* a, lapack_int* lda, const double* b,
16813                     lapack_int* ldb, double* c, lapack_int* ldc,
16814                     const double* d, lapack_int* ldd, const double* e,
16815                     lapack_int* lde, double* f, lapack_int* ldf, double* scale,
16816                     double* dif, double* work, lapack_int* lwork,
16817                     lapack_int* iwork, lapack_int *info );
16818 void LAPACK_ctgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16819                     const lapack_complex_float* a, lapack_int* lda,
16820                     const lapack_complex_float* b, lapack_int* ldb,
16821                     lapack_complex_float* c, lapack_int* ldc,
16822                     const lapack_complex_float* d, lapack_int* ldd,
16823                     const lapack_complex_float* e, lapack_int* lde,
16824                     lapack_complex_float* f, lapack_int* ldf, float* scale,
16825                     float* dif, lapack_complex_float* work, lapack_int* lwork,
16826                     lapack_int* iwork, lapack_int *info );
16827 void LAPACK_ztgsyl( char* trans, lapack_int* ijob, lapack_int* m, lapack_int* n,
16828                     const lapack_complex_double* a, lapack_int* lda,
16829                     const lapack_complex_double* b, lapack_int* ldb,
16830                     lapack_complex_double* c, lapack_int* ldc,
16831                     const lapack_complex_double* d, lapack_int* ldd,
16832                     const lapack_complex_double* e, lapack_int* lde,
16833                     lapack_complex_double* f, lapack_int* ldf, double* scale,
16834                     double* dif, lapack_complex_double* work, lapack_int* lwork,
16835                     lapack_int* iwork, lapack_int *info );
16836 void LAPACK_stgsna( char* job, char* howmny, const lapack_logical* select,
16837                     lapack_int* n, const float* a, lapack_int* lda,
16838                     const float* b, lapack_int* ldb, const float* vl,
16839                     lapack_int* ldvl, const float* vr, lapack_int* ldvr,
16840                     float* s, float* dif, lapack_int* mm, lapack_int* m,
16841                     float* work, lapack_int* lwork, lapack_int* iwork,
16842                     lapack_int *info );
16843 void LAPACK_dtgsna( char* job, char* howmny, const lapack_logical* select,
16844                     lapack_int* n, const double* a, lapack_int* lda,
16845                     const double* b, lapack_int* ldb, const double* vl,
16846                     lapack_int* ldvl, const double* vr, lapack_int* ldvr,
16847                     double* s, double* dif, lapack_int* mm, lapack_int* m,
16848                     double* work, lapack_int* lwork, lapack_int* iwork,
16849                     lapack_int *info );
16850 void LAPACK_ctgsna( char* job, char* howmny, const lapack_logical* select,
16851                     lapack_int* n, const lapack_complex_float* a,
16852                     lapack_int* lda, const lapack_complex_float* b,
16853                     lapack_int* ldb, const lapack_complex_float* vl,
16854                     lapack_int* ldvl, const lapack_complex_float* vr,
16855                     lapack_int* ldvr, float* s, float* dif, lapack_int* mm,
16856                     lapack_int* m, lapack_complex_float* work,
16857                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16858 void LAPACK_ztgsna( char* job, char* howmny, const lapack_logical* select,
16859                     lapack_int* n, const lapack_complex_double* a,
16860                     lapack_int* lda, const lapack_complex_double* b,
16861                     lapack_int* ldb, const lapack_complex_double* vl,
16862                     lapack_int* ldvl, const lapack_complex_double* vr,
16863                     lapack_int* ldvr, double* s, double* dif, lapack_int* mm,
16864                     lapack_int* m, lapack_complex_double* work,
16865                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
16866 void LAPACK_sggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16867                     lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
16868                     float* b, lapack_int* ldb, float* tola, float* tolb,
16869                     lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
16870                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16871                     lapack_int* iwork, float* tau, float* work,
16872                     lapack_int *info );
16873 void LAPACK_dggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16874                     lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
16875                     double* b, lapack_int* ldb, double* tola, double* tolb,
16876                     lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
16877                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16878                     lapack_int* iwork, double* tau, double* work,
16879                     lapack_int *info );
16880 void LAPACK_cggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16881                     lapack_int* p, lapack_int* n, lapack_complex_float* a,
16882                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16883                     float* tola, float* tolb, lapack_int* k, lapack_int* l,
16884                     lapack_complex_float* u, lapack_int* ldu,
16885                     lapack_complex_float* v, lapack_int* ldv,
16886                     lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
16887                     float* rwork, lapack_complex_float* tau,
16888                     lapack_complex_float* work, lapack_int *info );
16889 void LAPACK_zggsvp( char* jobu, char* jobv, char* jobq, lapack_int* m,
16890                     lapack_int* p, lapack_int* n, lapack_complex_double* a,
16891                     lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16892                     double* tola, double* tolb, lapack_int* k, lapack_int* l,
16893                     lapack_complex_double* u, lapack_int* ldu,
16894                     lapack_complex_double* v, lapack_int* ldv,
16895                     lapack_complex_double* q, lapack_int* ldq,
16896                     lapack_int* iwork, double* rwork,
16897                     lapack_complex_double* tau, lapack_complex_double* work,
16898                     lapack_int *info );
16899 void LAPACK_sggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16900                      lapack_int* p, lapack_int* n, float* a, lapack_int* lda,
16901                      float* b, lapack_int* ldb, float* tola, float* tolb,
16902                      lapack_int* k, lapack_int* l, float* u, lapack_int* ldu,
16903                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
16904                      lapack_int* iwork, float* tau, float* work,
16905                      lapack_int* lwork, lapack_int *info );
16906 void LAPACK_dggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16907                      lapack_int* p, lapack_int* n, double* a, lapack_int* lda,
16908                      double* b, lapack_int* ldb, double* tola, double* tolb,
16909                      lapack_int* k, lapack_int* l, double* u, lapack_int* ldu,
16910                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
16911                      lapack_int* iwork, double* tau, double* work,
16912                      lapack_int* lwork, lapack_int *info );
16913 void LAPACK_cggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16914                      lapack_int* p, lapack_int* n, lapack_complex_float* a,
16915                      lapack_int* lda, lapack_complex_float* b, lapack_int* ldb,
16916                      float* tola, float* tolb, lapack_int* k, lapack_int* l,
16917                      lapack_complex_float* u, lapack_int* ldu,
16918                      lapack_complex_float* v, lapack_int* ldv,
16919                      lapack_complex_float* q, lapack_int* ldq, lapack_int* iwork,
16920                      float* rwork, lapack_complex_float* tau,
16921                      lapack_complex_float* work, lapack_int* lwork,
16922                      lapack_int *info );
16923 void LAPACK_zggsvp3( char* jobu, char* jobv, char* jobq, lapack_int* m,
16924                      lapack_int* p, lapack_int* n, lapack_complex_double* a,
16925                      lapack_int* lda, lapack_complex_double* b, lapack_int* ldb,
16926                      double* tola, double* tolb, lapack_int* k, lapack_int* l,
16927                      lapack_complex_double* u, lapack_int* ldu,
16928                      lapack_complex_double* v, lapack_int* ldv,
16929                      lapack_complex_double* q, lapack_int* ldq,
16930                      lapack_int* iwork, double* rwork,
16931                      lapack_complex_double* tau, lapack_complex_double* work,
16932                      lapack_int* lwork, lapack_int *info );
16933 void LAPACK_stgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16934                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16935                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
16936                     float* tola, float* tolb, float* alpha, float* beta,
16937                     float* u, lapack_int* ldu, float* v, lapack_int* ldv,
16938                     float* q, lapack_int* ldq, float* work, lapack_int* ncycle,
16939                     lapack_int *info );
16940 void LAPACK_dtgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16941                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16942                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
16943                     double* tola, double* tolb, double* alpha, double* beta,
16944                     double* u, lapack_int* ldu, double* v, lapack_int* ldv,
16945                     double* q, lapack_int* ldq, double* work,
16946                     lapack_int* ncycle, lapack_int *info );
16947 void LAPACK_ctgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16948                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16949                     lapack_complex_float* a, lapack_int* lda,
16950                     lapack_complex_float* b, lapack_int* ldb, float* tola,
16951                     float* tolb, float* alpha, float* beta,
16952                     lapack_complex_float* u, lapack_int* ldu,
16953                     lapack_complex_float* v, lapack_int* ldv,
16954                     lapack_complex_float* q, lapack_int* ldq,
16955                     lapack_complex_float* work, lapack_int* ncycle,
16956                     lapack_int *info );
16957 void LAPACK_ztgsja( char* jobu, char* jobv, char* jobq, lapack_int* m,
16958                     lapack_int* p, lapack_int* n, lapack_int* k, lapack_int* l,
16959                     lapack_complex_double* a, lapack_int* lda,
16960                     lapack_complex_double* b, lapack_int* ldb, double* tola,
16961                     double* tolb, double* alpha, double* beta,
16962                     lapack_complex_double* u, lapack_int* ldu,
16963                     lapack_complex_double* v, lapack_int* ldv,
16964                     lapack_complex_double* q, lapack_int* ldq,
16965                     lapack_complex_double* work, lapack_int* ncycle,
16966                     lapack_int *info );
16967 void LAPACK_sgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16968                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
16969                    float* work, lapack_int* lwork, lapack_int *info );
16970 void LAPACK_dgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16971                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
16972                    double* work, lapack_int* lwork, lapack_int *info );
16973 void LAPACK_cgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16974                    lapack_complex_float* a, lapack_int* lda,
16975                    lapack_complex_float* b, lapack_int* ldb,
16976                    lapack_complex_float* work, lapack_int* lwork,
16977                    lapack_int *info );
16978 void LAPACK_zgels( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
16979                    lapack_complex_double* a, lapack_int* lda,
16980                    lapack_complex_double* b, lapack_int* ldb,
16981                    lapack_complex_double* work, lapack_int* lwork,
16982                    lapack_int *info );
16983 void LAPACK_sgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
16984                     lapack_int* lda, float* b, lapack_int* ldb,
16985                     lapack_int* jpvt, float* rcond, lapack_int* rank,
16986                     float* work, lapack_int* lwork, lapack_int *info );
16987 void LAPACK_dgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
16988                     lapack_int* lda, double* b, lapack_int* ldb,
16989                     lapack_int* jpvt, double* rcond, lapack_int* rank,
16990                     double* work, lapack_int* lwork, lapack_int *info );
16991 void LAPACK_cgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16992                     lapack_complex_float* a, lapack_int* lda,
16993                     lapack_complex_float* b, lapack_int* ldb, lapack_int* jpvt,
16994                     float* rcond, lapack_int* rank, lapack_complex_float* work,
16995                     lapack_int* lwork, float* rwork, lapack_int *info );
16996 void LAPACK_zgelsy( lapack_int* m, lapack_int* n, lapack_int* nrhs,
16997                     lapack_complex_double* a, lapack_int* lda,
16998                     lapack_complex_double* b, lapack_int* ldb, lapack_int* jpvt,
16999                     double* rcond, lapack_int* rank,
17000                     lapack_complex_double* work, lapack_int* lwork,
17001                     double* rwork, lapack_int *info );
17002 void LAPACK_sgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
17003                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
17004                     float* rcond, lapack_int* rank, float* work,
17005                     lapack_int* lwork, lapack_int *info );
17006 void LAPACK_dgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
17007                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
17008                     double* rcond, lapack_int* rank, double* work,
17009                     lapack_int* lwork, lapack_int *info );
17010 void LAPACK_cgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17011                     lapack_complex_float* a, lapack_int* lda,
17012                     lapack_complex_float* b, lapack_int* ldb, float* s,
17013                     float* rcond, lapack_int* rank, lapack_complex_float* work,
17014                     lapack_int* lwork, float* rwork, lapack_int *info );
17015 void LAPACK_zgelss( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17016                     lapack_complex_double* a, lapack_int* lda,
17017                     lapack_complex_double* b, lapack_int* ldb, double* s,
17018                     double* rcond, lapack_int* rank,
17019                     lapack_complex_double* work, lapack_int* lwork,
17020                     double* rwork, lapack_int *info );
17021 void LAPACK_sgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, float* a,
17022                     lapack_int* lda, float* b, lapack_int* ldb, float* s,
17023                     float* rcond, lapack_int* rank, float* work,
17024                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17025 void LAPACK_dgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs, double* a,
17026                     lapack_int* lda, double* b, lapack_int* ldb, double* s,
17027                     double* rcond, lapack_int* rank, double* work,
17028                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17029 void LAPACK_cgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17030                     lapack_complex_float* a, lapack_int* lda,
17031                     lapack_complex_float* b, lapack_int* ldb, float* s,
17032                     float* rcond, lapack_int* rank, lapack_complex_float* work,
17033                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17034                     lapack_int *info );
17035 void LAPACK_zgelsd( lapack_int* m, lapack_int* n, lapack_int* nrhs,
17036                     lapack_complex_double* a, lapack_int* lda,
17037                     lapack_complex_double* b, lapack_int* ldb, double* s,
17038                     double* rcond, lapack_int* rank,
17039                     lapack_complex_double* work, lapack_int* lwork,
17040                     double* rwork, lapack_int* iwork, lapack_int *info );
17041 void LAPACK_sgglse( lapack_int* m, lapack_int* n, lapack_int* p, float* a,
17042                     lapack_int* lda, float* b, lapack_int* ldb, float* c,
17043                     float* d, float* x, float* work, lapack_int* lwork,
17044                     lapack_int *info );
17045 void LAPACK_dgglse( lapack_int* m, lapack_int* n, lapack_int* p, double* a,
17046                     lapack_int* lda, double* b, lapack_int* ldb, double* c,
17047                     double* d, double* x, double* work, lapack_int* lwork,
17048                     lapack_int *info );
17049 void LAPACK_cgglse( lapack_int* m, lapack_int* n, lapack_int* p,
17050                     lapack_complex_float* a, lapack_int* lda,
17051                     lapack_complex_float* b, lapack_int* ldb,
17052                     lapack_complex_float* c, lapack_complex_float* d,
17053                     lapack_complex_float* x, lapack_complex_float* work,
17054                     lapack_int* lwork, lapack_int *info );
17055 void LAPACK_zgglse( lapack_int* m, lapack_int* n, lapack_int* p,
17056                     lapack_complex_double* a, lapack_int* lda,
17057                     lapack_complex_double* b, lapack_int* ldb,
17058                     lapack_complex_double* c, lapack_complex_double* d,
17059                     lapack_complex_double* x, lapack_complex_double* work,
17060                     lapack_int* lwork, lapack_int *info );
17061 void LAPACK_sggglm( lapack_int* n, lapack_int* m, lapack_int* p, float* a,
17062                     lapack_int* lda, float* b, lapack_int* ldb, float* d,
17063                     float* x, float* y, float* work, lapack_int* lwork,
17064                     lapack_int *info );
17065 void LAPACK_dggglm( lapack_int* n, lapack_int* m, lapack_int* p, double* a,
17066                     lapack_int* lda, double* b, lapack_int* ldb, double* d,
17067                     double* x, double* y, double* work, lapack_int* lwork,
17068                     lapack_int *info );
17069 void LAPACK_cggglm( lapack_int* n, lapack_int* m, lapack_int* p,
17070                     lapack_complex_float* a, lapack_int* lda,
17071                     lapack_complex_float* b, lapack_int* ldb,
17072                     lapack_complex_float* d, lapack_complex_float* x,
17073                     lapack_complex_float* y, lapack_complex_float* work,
17074                     lapack_int* lwork, lapack_int *info );
17075 void LAPACK_zggglm( lapack_int* n, lapack_int* m, lapack_int* p,
17076                     lapack_complex_double* a, lapack_int* lda,
17077                     lapack_complex_double* b, lapack_int* ldb,
17078                     lapack_complex_double* d, lapack_complex_double* x,
17079                     lapack_complex_double* y, lapack_complex_double* work,
17080                     lapack_int* lwork, lapack_int *info );
17081 void LAPACK_ssyev( char* jobz, char* uplo, lapack_int* n, float* a,
17082                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
17083                    lapack_int *info );
17084 void LAPACK_dsyev( char* jobz, char* uplo, lapack_int* n, double* a,
17085                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
17086                    lapack_int *info );
17087 void LAPACK_cheev( char* jobz, char* uplo, lapack_int* n,
17088                    lapack_complex_float* a, lapack_int* lda, float* w,
17089                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17090                    lapack_int *info );
17091 void LAPACK_zheev( char* jobz, char* uplo, lapack_int* n,
17092                    lapack_complex_double* a, lapack_int* lda, double* w,
17093                    lapack_complex_double* work, lapack_int* lwork,
17094                    double* rwork, lapack_int *info );
17095 void LAPACK_ssyevd( char* jobz, char* uplo, lapack_int* n, float* a,
17096                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
17097                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17098 void LAPACK_dsyevd( char* jobz, char* uplo, lapack_int* n, double* a,
17099                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
17100                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17101 void LAPACK_cheevd( char* jobz, char* uplo, lapack_int* n,
17102                     lapack_complex_float* a, lapack_int* lda, float* w,
17103                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17104                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17105                     lapack_int *info );
17106 void LAPACK_zheevd( char* jobz, char* uplo, lapack_int* n,
17107                     lapack_complex_double* a, lapack_int* lda, double* w,
17108                     lapack_complex_double* work, lapack_int* lwork,
17109                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17110                     lapack_int* liwork, lapack_int *info );
17111 void LAPACK_ssyevx( char* jobz, char* range, char* uplo, lapack_int* n,
17112                     float* a, lapack_int* lda, float* vl, float* vu,
17113                     lapack_int* il, lapack_int* iu, float* abstol,
17114                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17115                     float* work, lapack_int* lwork, lapack_int* iwork,
17116                     lapack_int* ifail, lapack_int *info );
17117 void LAPACK_dsyevx( char* jobz, char* range, char* uplo, lapack_int* n,
17118                     double* a, lapack_int* lda, double* vl, double* vu,
17119                     lapack_int* il, lapack_int* iu, double* abstol,
17120                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17121                     double* work, lapack_int* lwork, lapack_int* iwork,
17122                     lapack_int* ifail, lapack_int *info );
17123 void LAPACK_cheevx( char* jobz, char* range, char* uplo, lapack_int* n,
17124                     lapack_complex_float* a, lapack_int* lda, float* vl,
17125                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17126                     lapack_int* m, float* w, lapack_complex_float* z,
17127                     lapack_int* ldz, lapack_complex_float* work,
17128                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17129                     lapack_int* ifail, lapack_int *info );
17130 void LAPACK_zheevx( char* jobz, char* range, char* uplo, lapack_int* n,
17131                     lapack_complex_double* a, lapack_int* lda, double* vl,
17132                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17133                     lapack_int* m, double* w, lapack_complex_double* z,
17134                     lapack_int* ldz, lapack_complex_double* work,
17135                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17136                     lapack_int* ifail, lapack_int *info );
17137 void LAPACK_ssyevr( char* jobz, char* range, char* uplo, lapack_int* n,
17138                     float* a, lapack_int* lda, float* vl, float* vu,
17139                     lapack_int* il, lapack_int* iu, float* abstol,
17140                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17141                     lapack_int* isuppz, float* work, lapack_int* lwork,
17142                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17143 void LAPACK_dsyevr( char* jobz, char* range, char* uplo, lapack_int* n,
17144                     double* a, lapack_int* lda, double* vl, double* vu,
17145                     lapack_int* il, lapack_int* iu, double* abstol,
17146                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17147                     lapack_int* isuppz, double* work, lapack_int* lwork,
17148                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17149 void LAPACK_cheevr( char* jobz, char* range, char* uplo, lapack_int* n,
17150                     lapack_complex_float* a, lapack_int* lda, float* vl,
17151                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17152                     lapack_int* m, float* w, lapack_complex_float* z,
17153                     lapack_int* ldz, lapack_int* isuppz,
17154                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17155                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17156                     lapack_int *info );
17157 void LAPACK_zheevr( char* jobz, char* range, char* uplo, lapack_int* n,
17158                     lapack_complex_double* a, lapack_int* lda, double* vl,
17159                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17160                     lapack_int* m, double* w, lapack_complex_double* z,
17161                     lapack_int* ldz, lapack_int* isuppz,
17162                     lapack_complex_double* work, lapack_int* lwork,
17163                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17164                     lapack_int* liwork, lapack_int *info );
17165 void LAPACK_sspev( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
17166                    float* z, lapack_int* ldz, float* work, lapack_int *info );
17167 void LAPACK_dspev( char* jobz, char* uplo, lapack_int* n, double* ap, double* w,
17168                    double* z, lapack_int* ldz, double* work, lapack_int *info );
17169 void LAPACK_chpev( char* jobz, char* uplo, lapack_int* n,
17170                    lapack_complex_float* ap, float* w, lapack_complex_float* z,
17171                    lapack_int* ldz, lapack_complex_float* work, float* rwork,
17172                    lapack_int *info );
17173 void LAPACK_zhpev( char* jobz, char* uplo, lapack_int* n,
17174                    lapack_complex_double* ap, double* w,
17175                    lapack_complex_double* z, lapack_int* ldz,
17176                    lapack_complex_double* work, double* rwork,
17177                    lapack_int *info );
17178 void LAPACK_sspevd( char* jobz, char* uplo, lapack_int* n, float* ap, float* w,
17179                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
17180                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17181 void LAPACK_dspevd( char* jobz, char* uplo, lapack_int* n, double* ap,
17182                     double* w, double* z, lapack_int* ldz, double* work,
17183                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17184                     lapack_int *info );
17185 void LAPACK_chpevd( char* jobz, char* uplo, lapack_int* n,
17186                     lapack_complex_float* ap, float* w, lapack_complex_float* z,
17187                     lapack_int* ldz, lapack_complex_float* work,
17188                     lapack_int* lwork, float* rwork, lapack_int* lrwork,
17189                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17190 void LAPACK_zhpevd( char* jobz, char* uplo, lapack_int* n,
17191                     lapack_complex_double* ap, double* w,
17192                     lapack_complex_double* z, lapack_int* ldz,
17193                     lapack_complex_double* work, lapack_int* lwork,
17194                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17195                     lapack_int* liwork, lapack_int *info );
17196 void LAPACK_sspevx( char* jobz, char* range, char* uplo, lapack_int* n,
17197                     float* ap, float* vl, float* vu, lapack_int* il,
17198                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17199                     float* z, lapack_int* ldz, float* work, lapack_int* iwork,
17200                     lapack_int* ifail, lapack_int *info );
17201 void LAPACK_dspevx( char* jobz, char* range, char* uplo, lapack_int* n,
17202                     double* ap, double* vl, double* vu, lapack_int* il,
17203                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17204                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17205                     lapack_int* ifail, lapack_int *info );
17206 void LAPACK_chpevx( char* jobz, char* range, char* uplo, lapack_int* n,
17207                     lapack_complex_float* ap, float* vl, float* vu,
17208                     lapack_int* il, lapack_int* iu, float* abstol,
17209                     lapack_int* m, float* w, lapack_complex_float* z,
17210                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
17211                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17212 void LAPACK_zhpevx( char* jobz, char* range, char* uplo, lapack_int* n,
17213                     lapack_complex_double* ap, double* vl, double* vu,
17214                     lapack_int* il, lapack_int* iu, double* abstol,
17215                     lapack_int* m, double* w, lapack_complex_double* z,
17216                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
17217                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17218 void LAPACK_ssbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17219                    float* ab, lapack_int* ldab, float* w, float* z,
17220                    lapack_int* ldz, float* work, lapack_int *info );
17221 void LAPACK_dsbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17222                    double* ab, lapack_int* ldab, double* w, double* z,
17223                    lapack_int* ldz, double* work, lapack_int *info );
17224 void LAPACK_chbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17225                    lapack_complex_float* ab, lapack_int* ldab, float* w,
17226                    lapack_complex_float* z, lapack_int* ldz,
17227                    lapack_complex_float* work, float* rwork, lapack_int *info );
17228 void LAPACK_zhbev( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17229                    lapack_complex_double* ab, lapack_int* ldab, double* w,
17230                    lapack_complex_double* z, lapack_int* ldz,
17231                    lapack_complex_double* work, double* rwork,
17232                    lapack_int *info );
17233 void LAPACK_ssbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17234                     float* ab, lapack_int* ldab, float* w, float* z,
17235                     lapack_int* ldz, float* work, lapack_int* lwork,
17236                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17237 void LAPACK_dsbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17238                     double* ab, lapack_int* ldab, double* w, double* z,
17239                     lapack_int* ldz, double* work, lapack_int* lwork,
17240                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17241 void LAPACK_chbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17242                     lapack_complex_float* ab, lapack_int* ldab, float* w,
17243                     lapack_complex_float* z, lapack_int* ldz,
17244                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17245                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17246                     lapack_int *info );
17247 void LAPACK_zhbevd( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
17248                     lapack_complex_double* ab, lapack_int* ldab, double* w,
17249                     lapack_complex_double* z, lapack_int* ldz,
17250                     lapack_complex_double* work, lapack_int* lwork,
17251                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17252                     lapack_int* liwork, lapack_int *info );
17253 void LAPACK_ssbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17254                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
17255                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
17256                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17257                     float* z, lapack_int* ldz, float* work,
17258                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17259 void LAPACK_dsbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17260                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
17261                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
17262                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17263                     double* z, lapack_int* ldz, double* work,
17264                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17265 void LAPACK_chbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17266                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
17267                     lapack_complex_float* q, lapack_int* ldq, float* vl,
17268                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17269                     lapack_int* m, float* w, lapack_complex_float* z,
17270                     lapack_int* ldz, lapack_complex_float* work,
17271                     float* rwork, lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17272 void LAPACK_zhbevx( char* jobz, char* range, char* uplo, lapack_int* n,
17273                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
17274                     lapack_complex_double* q, lapack_int* ldq, double* vl,
17275                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17276                     lapack_int* m, double* w, lapack_complex_double* z,
17277                     lapack_int* ldz, lapack_complex_double* work,
17278                     double* rwork, lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17279 void LAPACK_sstev( char* jobz, lapack_int* n, float* d, float* e, float* z,
17280                    lapack_int* ldz, float* work, lapack_int *info );
17281 void LAPACK_dstev( char* jobz, lapack_int* n, double* d, double* e, double* z,
17282                    lapack_int* ldz, double* work, lapack_int *info );
17283 void LAPACK_sstevd( char* jobz, lapack_int* n, float* d, float* e, float* z,
17284                     lapack_int* ldz, float* work, lapack_int* lwork,
17285                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17286 void LAPACK_dstevd( char* jobz, lapack_int* n, double* d, double* e, double* z,
17287                     lapack_int* ldz, double* work, lapack_int* lwork,
17288                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17289 void LAPACK_sstevx( char* jobz, char* range, lapack_int* n, float* d, float* e,
17290                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17291                     float* abstol, lapack_int* m, float* w, float* z,
17292                     lapack_int* ldz, float* work, lapack_int* iwork,
17293                     lapack_int* ifail, lapack_int *info );
17294 void LAPACK_dstevx( char* jobz, char* range, lapack_int* n, double* d,
17295                     double* e, double* vl, double* vu, lapack_int* il,
17296                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17297                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17298                     lapack_int* ifail, lapack_int *info );
17299 void LAPACK_sstevr( char* jobz, char* range, lapack_int* n, float* d, float* e,
17300                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17301                     float* abstol, lapack_int* m, float* w, float* z,
17302                     lapack_int* ldz, lapack_int* isuppz, float* work,
17303                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17304                     lapack_int *info );
17305 void LAPACK_dstevr( char* jobz, char* range, lapack_int* n, double* d,
17306                     double* e, double* vl, double* vu, lapack_int* il,
17307                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17308                     double* z, lapack_int* ldz, lapack_int* isuppz,
17309                     double* work, lapack_int* lwork, lapack_int* iwork,
17310                     lapack_int* liwork, lapack_int *info );
17311 void LAPACK_sgees( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
17312                    lapack_int* n, float* a, lapack_int* lda, lapack_int* sdim,
17313                    float* wr, float* wi, float* vs, lapack_int* ldvs,
17314                    float* work, lapack_int* lwork, lapack_logical* bwork,
17315                    lapack_int *info );
17316 void LAPACK_dgees( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
17317                    lapack_int* n, double* a, lapack_int* lda, lapack_int* sdim,
17318                    double* wr, double* wi, double* vs, lapack_int* ldvs,
17319                    double* work, lapack_int* lwork, lapack_logical* bwork,
17320                    lapack_int *info );
17321 void LAPACK_cgees( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
17322                    lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17323                    lapack_int* sdim, lapack_complex_float* w,
17324                    lapack_complex_float* vs, lapack_int* ldvs,
17325                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17326                    lapack_logical* bwork, lapack_int *info );
17327 void LAPACK_zgees( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
17328                    lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17329                    lapack_int* sdim, lapack_complex_double* w,
17330                    lapack_complex_double* vs, lapack_int* ldvs,
17331                    lapack_complex_double* work, lapack_int* lwork,
17332                    double* rwork, lapack_logical* bwork, lapack_int *info );
17333 void LAPACK_sgeesx( char* jobvs, char* sort, LAPACK_S_SELECT2 select,
17334                     char* sense, lapack_int* n, float* a, lapack_int* lda,
17335                     lapack_int* sdim, float* wr, float* wi, float* vs,
17336                     lapack_int* ldvs, float* rconde, float* rcondv, float* work,
17337                     lapack_int* lwork, lapack_int* iwork, lapack_int* liwork,
17338                     lapack_logical* bwork, lapack_int *info );
17339 void LAPACK_dgeesx( char* jobvs, char* sort, LAPACK_D_SELECT2 select,
17340                     char* sense, lapack_int* n, double* a, lapack_int* lda,
17341                     lapack_int* sdim, double* wr, double* wi, double* vs,
17342                     lapack_int* ldvs, double* rconde, double* rcondv,
17343                     double* work, lapack_int* lwork, lapack_int* iwork,
17344                     lapack_int* liwork, lapack_logical* bwork,
17345                     lapack_int *info );
17346 void LAPACK_cgeesx( char* jobvs, char* sort, LAPACK_C_SELECT1 select,
17347                     char* sense, lapack_int* n, lapack_complex_float* a,
17348                     lapack_int* lda, lapack_int* sdim, lapack_complex_float* w,
17349                     lapack_complex_float* vs, lapack_int* ldvs, float* rconde,
17350                     float* rcondv, lapack_complex_float* work,
17351                     lapack_int* lwork, float* rwork, lapack_logical* bwork,
17352                     lapack_int *info );
17353 void LAPACK_zgeesx( char* jobvs, char* sort, LAPACK_Z_SELECT1 select,
17354                     char* sense, lapack_int* n, lapack_complex_double* a,
17355                     lapack_int* lda, lapack_int* sdim, lapack_complex_double* w,
17356                     lapack_complex_double* vs, lapack_int* ldvs, double* rconde,
17357                     double* rcondv, lapack_complex_double* work,
17358                     lapack_int* lwork, double* rwork, lapack_logical* bwork,
17359                     lapack_int *info );
17360 void LAPACK_sgeev( char* jobvl, char* jobvr, lapack_int* n, float* a,
17361                    lapack_int* lda, float* wr, float* wi, float* vl,
17362                    lapack_int* ldvl, float* vr, lapack_int* ldvr, float* work,
17363                    lapack_int* lwork, lapack_int *info );
17364 void LAPACK_dgeev( char* jobvl, char* jobvr, lapack_int* n, double* a,
17365                    lapack_int* lda, double* wr, double* wi, double* vl,
17366                    lapack_int* ldvl, double* vr, lapack_int* ldvr, double* work,
17367                    lapack_int* lwork, lapack_int *info );
17368 void LAPACK_cgeev( char* jobvl, char* jobvr, lapack_int* n,
17369                    lapack_complex_float* a, lapack_int* lda,
17370                    lapack_complex_float* w, lapack_complex_float* vl,
17371                    lapack_int* ldvl, lapack_complex_float* vr, lapack_int* ldvr,
17372                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17373                    lapack_int *info );
17374 void LAPACK_zgeev( char* jobvl, char* jobvr, lapack_int* n,
17375                    lapack_complex_double* a, lapack_int* lda,
17376                    lapack_complex_double* w, lapack_complex_double* vl,
17377                    lapack_int* ldvl, lapack_complex_double* vr,
17378                    lapack_int* ldvr, lapack_complex_double* work,
17379                    lapack_int* lwork, double* rwork, lapack_int *info );
17380 void LAPACK_sgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17381                     lapack_int* n, float* a, lapack_int* lda, float* wr,
17382                     float* wi, float* vl, lapack_int* ldvl, float* vr,
17383                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17384                     float* scale, float* abnrm, float* rconde, float* rcondv,
17385                     float* work, lapack_int* lwork, lapack_int* iwork,
17386                     lapack_int *info );
17387 void LAPACK_dgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17388                     lapack_int* n, double* a, lapack_int* lda, double* wr,
17389                     double* wi, double* vl, lapack_int* ldvl, double* vr,
17390                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17391                     double* scale, double* abnrm, double* rconde,
17392                     double* rcondv, double* work, lapack_int* lwork,
17393                     lapack_int* iwork, lapack_int *info );
17394 void LAPACK_cgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17395                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17396                     lapack_complex_float* w, lapack_complex_float* vl,
17397                     lapack_int* ldvl, lapack_complex_float* vr,
17398                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17399                     float* scale, float* abnrm, float* rconde, float* rcondv,
17400                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17401                     lapack_int *info );
17402 void LAPACK_zgeevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17403                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17404                     lapack_complex_double* w, lapack_complex_double* vl,
17405                     lapack_int* ldvl, lapack_complex_double* vr,
17406                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17407                     double* scale, double* abnrm, double* rconde,
17408                     double* rcondv, lapack_complex_double* work,
17409                     lapack_int* lwork, double* rwork, lapack_int *info );
17410 void LAPACK_sgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17411                     float* a, lapack_int* lda, float* s, float* u,
17412                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
17413                     lapack_int* lwork, lapack_int *info );
17414 void LAPACK_dgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17415                     double* a, lapack_int* lda, double* s, double* u,
17416                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
17417                     lapack_int* lwork, lapack_int *info );
17418 void LAPACK_cgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17419                     lapack_complex_float* a, lapack_int* lda, float* s,
17420                     lapack_complex_float* u, lapack_int* ldu,
17421                     lapack_complex_float* vt, lapack_int* ldvt,
17422                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17423                     lapack_int *info );
17424 void LAPACK_zgesvd( char* jobu, char* jobvt, lapack_int* m, lapack_int* n,
17425                     lapack_complex_double* a, lapack_int* lda, double* s,
17426                     lapack_complex_double* u, lapack_int* ldu,
17427                     lapack_complex_double* vt, lapack_int* ldvt,
17428                     lapack_complex_double* work, lapack_int* lwork,
17429                     double* rwork, lapack_int *info );
17430 void LAPACK_sgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17431                     float* a, lapack_int* lda, float* vl, float* vu,
17432                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s, float* u,
17433                     lapack_int* ldu, float* vt, lapack_int* ldvt, float* work,
17434                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
17435 void LAPACK_dgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17436                     double* a, lapack_int* lda, double* vl, double* vu,
17437                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s, double* u,
17438                     lapack_int* ldu, double* vt, lapack_int* ldvt, double* work,
17439                     lapack_int* lwork, lapack_int *iwork, lapack_int *info );
17440 void LAPACK_cgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17441                     lapack_complex_float* a, lapack_int* lda, float* vl, float* vu,
17442                     lapack_int* il, lapack_int* iu, lapack_int* ns, float* s,
17443                     lapack_complex_float* u, lapack_int* ldu,
17444                     lapack_complex_float* vt, lapack_int* ldvt,
17445                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17446                     lapack_int *iwork, lapack_int *info );
17447 void LAPACK_zgesvdx( char* jobu, char* jobvt, char* range, lapack_int* m, lapack_int* n,
17448                     lapack_complex_double* a, lapack_int* lda, double* vl, double* vu,
17449                     lapack_int* il, lapack_int* iu, lapack_int* ns, double* s,
17450                     lapack_complex_double* u, lapack_int* ldu,
17451                     lapack_complex_double* vt, lapack_int* ldvt,
17452                     lapack_complex_double* work, lapack_int* lwork,
17453                     double* rwork, lapack_int *iwork, lapack_int *info );
17454 void LAPACK_sgesdd( char* jobz, lapack_int* m, lapack_int* n, float* a,
17455                     lapack_int* lda, float* s, float* u, lapack_int* ldu,
17456                     float* vt, lapack_int* ldvt, float* work, lapack_int* lwork,
17457                     lapack_int* iwork, lapack_int *info );
17458 void LAPACK_dgesdd( char* jobz, lapack_int* m, lapack_int* n, double* a,
17459                     lapack_int* lda, double* s, double* u, lapack_int* ldu,
17460                     double* vt, lapack_int* ldvt, double* work,
17461                     lapack_int* lwork, lapack_int* iwork, lapack_int *info );
17462 void LAPACK_cgesdd( char* jobz, lapack_int* m, lapack_int* n,
17463                     lapack_complex_float* a, lapack_int* lda, float* s,
17464                     lapack_complex_float* u, lapack_int* ldu,
17465                     lapack_complex_float* vt, lapack_int* ldvt,
17466                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17467                     lapack_int* iwork, lapack_int *info );
17468 void LAPACK_zgesdd( char* jobz, lapack_int* m, lapack_int* n,
17469                     lapack_complex_double* a, lapack_int* lda, double* s,
17470                     lapack_complex_double* u, lapack_int* ldu,
17471                     lapack_complex_double* vt, lapack_int* ldvt,
17472                     lapack_complex_double* work, lapack_int* lwork,
17473                     double* rwork, lapack_int* iwork, lapack_int *info );
17474 void LAPACK_dgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17475                     char* jobp, lapack_int* m, lapack_int* n, double* a,
17476                     lapack_int* lda, double* sva, double* u, lapack_int* ldu,
17477                     double* v, lapack_int* ldv, double* work, lapack_int* lwork,
17478                     lapack_int* iwork, lapack_int *info );
17479 void LAPACK_sgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17480                     char* jobp, lapack_int* m, lapack_int* n, float* a,
17481                     lapack_int* lda, float* sva, float* u, lapack_int* ldu,
17482                     float* v, lapack_int* ldv, float* work, lapack_int* lwork,
17483                     lapack_int* iwork, lapack_int *info );
17484 void LAPACK_cgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17485                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_float* a,
17486                     lapack_int* lda, float* sva, lapack_complex_float* u, lapack_int* ldu,
17487                     lapack_complex_float* v, lapack_int* ldv, lapack_complex_float* cwork,
17488                     lapack_int* lwork, float* work, lapack_int* lrwork,
17489                     lapack_int* iwork, lapack_int *info );
17490 void LAPACK_zgejsv( char* joba, char* jobu, char* jobv, char* jobr, char* jobt,
17491                     char* jobp, lapack_int* m, lapack_int* n, lapack_complex_double* a,
17492                     lapack_int* lda, double* sva, lapack_complex_double* u, lapack_int* ldu,
17493                     lapack_complex_double* v, lapack_int* ldv, lapack_complex_double* cwork,
17494                     lapack_int* lwork, double* work, lapack_int* lrwork,
17495                     lapack_int* iwork, lapack_int *info );
17496 void LAPACK_dgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17497                     lapack_int* n, double* a, lapack_int* lda, double* sva,
17498                     lapack_int* mv, double* v, lapack_int* ldv, double* work,
17499                     lapack_int* lwork, lapack_int *info );
17500 void LAPACK_sgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17501                     lapack_int* n, float* a, lapack_int* lda, float* sva,
17502                     lapack_int* mv, float* v, lapack_int* ldv, float* work,
17503                     lapack_int* lwork, lapack_int *info );
17504 void LAPACK_cgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17505                     lapack_int* n, lapack_complex_float* a, lapack_int* lda, float* sva,
17506                     lapack_int* mv, lapack_complex_float* v, lapack_int* ldv,
17507                     lapack_complex_float* cwork, lapack_int* lwork, float* rwork,
17508                     lapack_int* lrwork, lapack_int *info );
17509 void LAPACK_zgesvj( char* joba, char* jobu, char* jobv, lapack_int* m,
17510                     lapack_int* n, lapack_complex_double* a, lapack_int* lda, double* sva,
17511                     lapack_int* mv, lapack_complex_double* v, lapack_int* ldv,
17512                     lapack_complex_double* cwork, lapack_int* lwork, double* rwork,
17513                     lapack_int* lrwork, lapack_int *info );
17514 void LAPACK_sggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17515                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17516                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17517                     float* alpha, float* beta, float* u, lapack_int* ldu,
17518                     float* v, lapack_int* ldv, float* q, lapack_int* ldq,
17519                     float* work, lapack_int* iwork, lapack_int *info );
17520 void LAPACK_dggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17521                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17522                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17523                     double* alpha, double* beta, double* u, lapack_int* ldu,
17524                     double* v, lapack_int* ldv, double* q, lapack_int* ldq,
17525                     double* work, lapack_int* iwork, lapack_int *info );
17526 void LAPACK_cggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17527                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17528                     lapack_complex_float* a, lapack_int* lda,
17529                     lapack_complex_float* b, lapack_int* ldb, float* alpha,
17530                     float* beta, lapack_complex_float* u, lapack_int* ldu,
17531                     lapack_complex_float* v, lapack_int* ldv,
17532                     lapack_complex_float* q, lapack_int* ldq,
17533                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
17534                     lapack_int *info );
17535 void LAPACK_zggsvd( char* jobu, char* jobv, char* jobq, lapack_int* m,
17536                     lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17537                     lapack_complex_double* a, lapack_int* lda,
17538                     lapack_complex_double* b, lapack_int* ldb, double* alpha,
17539                     double* beta, lapack_complex_double* u, lapack_int* ldu,
17540                     lapack_complex_double* v, lapack_int* ldv,
17541                     lapack_complex_double* q, lapack_int* ldq,
17542                     lapack_complex_double* work, double* rwork,
17543                     lapack_int* iwork, lapack_int *info );
17544 void LAPACK_sggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17545                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17546                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
17547                      float* alpha, float* beta, float* u, lapack_int* ldu,
17548                      float* v, lapack_int* ldv, float* q, lapack_int* ldq,
17549                      float* work, lapack_int* lwork, lapack_int* iwork,
17550                      lapack_int *info );
17551 void LAPACK_dggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17552                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17553                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
17554                      double* alpha, double* beta, double* u, lapack_int* ldu,
17555                      double* v, lapack_int* ldv, double* q, lapack_int* ldq,
17556                      double* work, lapack_int* lwork, lapack_int* iwork,
17557                      lapack_int *info );
17558 void LAPACK_cggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17559                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17560                      lapack_complex_float* a, lapack_int* lda,
17561                      lapack_complex_float* b, lapack_int* ldb, float* alpha,
17562                      float* beta, lapack_complex_float* u, lapack_int* ldu,
17563                      lapack_complex_float* v, lapack_int* ldv,
17564                      lapack_complex_float* q, lapack_int* ldq,
17565                      lapack_complex_float* work, lapack_int* lwork, float* rwork,
17566                      lapack_int* iwork, lapack_int *info );
17567 void LAPACK_zggsvd3( char* jobu, char* jobv, char* jobq, lapack_int* m,
17568                      lapack_int* n, lapack_int* p, lapack_int* k, lapack_int* l,
17569                      lapack_complex_double* a, lapack_int* lda,
17570                      lapack_complex_double* b, lapack_int* ldb, double* alpha,
17571                      double* beta, lapack_complex_double* u, lapack_int* ldu,
17572                      lapack_complex_double* v, lapack_int* ldv,
17573                      lapack_complex_double* q, lapack_int* ldq,
17574                      lapack_complex_double* work, lapack_int* lwork,
17575                      double* rwork, lapack_int* iwork, lapack_int *info );
17576 void LAPACK_ssygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17577                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
17578                    float* w, float* work, lapack_int* lwork, lapack_int *info );
17579 void LAPACK_dsygv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17580                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
17581                    double* w, double* work, lapack_int* lwork,
17582                    lapack_int *info );
17583 void LAPACK_chegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17584                    lapack_complex_float* a, lapack_int* lda,
17585                    lapack_complex_float* b, lapack_int* ldb, float* w,
17586                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17587                    lapack_int *info );
17588 void LAPACK_zhegv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17589                    lapack_complex_double* a, lapack_int* lda,
17590                    lapack_complex_double* b, lapack_int* ldb, double* w,
17591                    lapack_complex_double* work, lapack_int* lwork,
17592                    double* rwork, lapack_int *info );
17593 void LAPACK_ssygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17594                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17595                     float* w, float* work, lapack_int* lwork, lapack_int* iwork,
17596                     lapack_int* liwork, lapack_int *info );
17597 void LAPACK_dsygvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17598                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17599                     double* w, double* work, lapack_int* lwork,
17600                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17601 void LAPACK_chegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17602                     lapack_complex_float* a, lapack_int* lda,
17603                     lapack_complex_float* b, lapack_int* ldb, float* w,
17604                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17605                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17606                     lapack_int *info );
17607 void LAPACK_zhegvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17608                     lapack_complex_double* a, lapack_int* lda,
17609                     lapack_complex_double* b, lapack_int* ldb, double* w,
17610                     lapack_complex_double* work, lapack_int* lwork,
17611                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17612                     lapack_int* liwork, lapack_int *info );
17613 void LAPACK_ssygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17614                     lapack_int* n, float* a, lapack_int* lda, float* b,
17615                     lapack_int* ldb, float* vl, float* vu, lapack_int* il,
17616                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
17617                     float* z, lapack_int* ldz, float* work, lapack_int* lwork,
17618                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17619 void LAPACK_dsygvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17620                     lapack_int* n, double* a, lapack_int* lda, double* b,
17621                     lapack_int* ldb, double* vl, double* vu, lapack_int* il,
17622                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17623                     double* z, lapack_int* ldz, double* work, lapack_int* lwork,
17624                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17625 void LAPACK_chegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17626                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17627                     lapack_complex_float* b, lapack_int* ldb, float* vl,
17628                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
17629                     lapack_int* m, float* w, lapack_complex_float* z,
17630                     lapack_int* ldz, lapack_complex_float* work,
17631                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17632                     lapack_int* ifail, lapack_int *info );
17633 void LAPACK_zhegvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17634                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17635                     lapack_complex_double* b, lapack_int* ldb, double* vl,
17636                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17637                     lapack_int* m, double* w, lapack_complex_double* z,
17638                     lapack_int* ldz, lapack_complex_double* work,
17639                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17640                     lapack_int* ifail, lapack_int *info );
17641 void LAPACK_sspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17642                    float* ap, float* bp, float* w, float* z, lapack_int* ldz,
17643                    float* work, lapack_int *info );
17644 void LAPACK_dspgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17645                    double* ap, double* bp, double* w, double* z,
17646                    lapack_int* ldz, double* work, lapack_int *info );
17647 void LAPACK_chpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17648                    lapack_complex_float* ap, lapack_complex_float* bp, float* w,
17649                    lapack_complex_float* z, lapack_int* ldz,
17650                    lapack_complex_float* work, float* rwork, lapack_int *info );
17651 void LAPACK_zhpgv( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17652                    lapack_complex_double* ap, lapack_complex_double* bp,
17653                    double* w, lapack_complex_double* z, lapack_int* ldz,
17654                    lapack_complex_double* work, double* rwork,
17655                    lapack_int *info );
17656 void LAPACK_sspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17657                     float* ap, float* bp, float* w, float* z, lapack_int* ldz,
17658                     float* work, lapack_int* lwork, lapack_int* iwork,
17659                     lapack_int* liwork, lapack_int *info );
17660 void LAPACK_dspgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17661                     double* ap, double* bp, double* w, double* z,
17662                     lapack_int* ldz, double* work, lapack_int* lwork,
17663                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
17664 void LAPACK_chpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17665                     lapack_complex_float* ap, lapack_complex_float* bp,
17666                     float* w, lapack_complex_float* z, lapack_int* ldz,
17667                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17668                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17669                     lapack_int *info );
17670 void LAPACK_zhpgvd( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
17671                     lapack_complex_double* ap, lapack_complex_double* bp,
17672                     double* w, lapack_complex_double* z, lapack_int* ldz,
17673                     lapack_complex_double* work, lapack_int* lwork,
17674                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17675                     lapack_int* liwork, lapack_int *info );
17676 void LAPACK_sspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17677                     lapack_int* n, float* ap, float* bp, float* vl, float* vu,
17678                     lapack_int* il, lapack_int* iu, float* abstol,
17679                     lapack_int* m, float* w, float* z, lapack_int* ldz,
17680                     float* work, lapack_int* iwork, lapack_int* ifail,
17681                     lapack_int *info );
17682 void LAPACK_dspgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17683                     lapack_int* n, double* ap, double* bp, double* vl,
17684                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
17685                     lapack_int* m, double* w, double* z, lapack_int* ldz,
17686                     double* work, lapack_int* iwork, lapack_int* ifail,
17687                     lapack_int *info );
17688 void LAPACK_chpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17689                     lapack_int* n, lapack_complex_float* ap,
17690                     lapack_complex_float* bp, float* vl, float* vu,
17691                     lapack_int* il, lapack_int* iu, float* abstol,
17692                     lapack_int* m, float* w, lapack_complex_float* z,
17693                     lapack_int* ldz, lapack_complex_float* work, float* rwork,
17694                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17695 void LAPACK_zhpgvx( lapack_int* itype, char* jobz, char* range, char* uplo,
17696                     lapack_int* n, lapack_complex_double* ap,
17697                     lapack_complex_double* bp, double* vl, double* vu,
17698                     lapack_int* il, lapack_int* iu, double* abstol,
17699                     lapack_int* m, double* w, lapack_complex_double* z,
17700                     lapack_int* ldz, lapack_complex_double* work, double* rwork,
17701                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17702 void LAPACK_ssbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17703                    lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
17704                    lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
17705                    float* work, lapack_int *info );
17706 void LAPACK_dsbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17707                    lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
17708                    lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
17709                    double* work, lapack_int *info );
17710 void LAPACK_chbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17711                    lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
17712                    lapack_complex_float* bb, lapack_int* ldbb, float* w,
17713                    lapack_complex_float* z, lapack_int* ldz,
17714                    lapack_complex_float* work, float* rwork, lapack_int *info );
17715 void LAPACK_zhbgv( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17716                    lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
17717                    lapack_complex_double* bb, lapack_int* ldbb, double* w,
17718                    lapack_complex_double* z, lapack_int* ldz,
17719                    lapack_complex_double* work, double* rwork,
17720                    lapack_int *info );
17721 void LAPACK_ssbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17722                     lapack_int* kb, float* ab, lapack_int* ldab, float* bb,
17723                     lapack_int* ldbb, float* w, float* z, lapack_int* ldz,
17724                     float* work, lapack_int* lwork, lapack_int* iwork,
17725                     lapack_int* liwork, lapack_int *info );
17726 void LAPACK_dsbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17727                     lapack_int* kb, double* ab, lapack_int* ldab, double* bb,
17728                     lapack_int* ldbb, double* w, double* z, lapack_int* ldz,
17729                     double* work, lapack_int* lwork, lapack_int* iwork,
17730                     lapack_int* liwork, lapack_int *info );
17731 void LAPACK_chbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17732                     lapack_int* kb, lapack_complex_float* ab, lapack_int* ldab,
17733                     lapack_complex_float* bb, lapack_int* ldbb, float* w,
17734                     lapack_complex_float* z, lapack_int* ldz,
17735                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17736                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
17737                     lapack_int *info );
17738 void LAPACK_zhbgvd( char* jobz, char* uplo, lapack_int* n, lapack_int* ka,
17739                     lapack_int* kb, lapack_complex_double* ab, lapack_int* ldab,
17740                     lapack_complex_double* bb, lapack_int* ldbb, double* w,
17741                     lapack_complex_double* z, lapack_int* ldz,
17742                     lapack_complex_double* work, lapack_int* lwork,
17743                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
17744                     lapack_int* liwork, lapack_int *info );
17745 void LAPACK_ssbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17746                     lapack_int* ka, lapack_int* kb, float* ab, lapack_int* ldab,
17747                     float* bb, lapack_int* ldbb, float* q, lapack_int* ldq,
17748                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17749                     float* abstol, lapack_int* m, float* w, float* z,
17750                     lapack_int* ldz, float* work, lapack_int* iwork,
17751                     lapack_int* ifail, lapack_int *info );
17752 void LAPACK_dsbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17753                     lapack_int* ka, lapack_int* kb, double* ab,
17754                     lapack_int* ldab, double* bb, lapack_int* ldbb, double* q,
17755                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
17756                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
17757                     double* z, lapack_int* ldz, double* work, lapack_int* iwork,
17758                     lapack_int* ifail, lapack_int *info );
17759 void LAPACK_chbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17760                     lapack_int* ka, lapack_int* kb, lapack_complex_float* ab,
17761                     lapack_int* ldab, lapack_complex_float* bb,
17762                     lapack_int* ldbb, lapack_complex_float* q, lapack_int* ldq,
17763                     float* vl, float* vu, lapack_int* il, lapack_int* iu,
17764                     float* abstol, lapack_int* m, float* w,
17765                     lapack_complex_float* z, lapack_int* ldz,
17766                     lapack_complex_float* work, float* rwork, lapack_int* iwork,
17767                     lapack_int* ifail, lapack_int *info );
17768 void LAPACK_zhbgvx( char* jobz, char* range, char* uplo, lapack_int* n,
17769                     lapack_int* ka, lapack_int* kb, lapack_complex_double* ab,
17770                     lapack_int* ldab, lapack_complex_double* bb,
17771                     lapack_int* ldbb, lapack_complex_double* q, lapack_int* ldq,
17772                     double* vl, double* vu, lapack_int* il, lapack_int* iu,
17773                     double* abstol, lapack_int* m, double* w,
17774                     lapack_complex_double* z, lapack_int* ldz,
17775                     lapack_complex_double* work, double* rwork,
17776                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
17777 void LAPACK_sgges( char* jobvsl, char* jobvsr, char* sort,
17778                    LAPACK_S_SELECT3 selctg, lapack_int* n, float* a,
17779                    lapack_int* lda, float* b, lapack_int* ldb, lapack_int* sdim,
17780                    float* alphar, float* alphai, float* beta, float* vsl,
17781                    lapack_int* ldvsl, float* vsr, lapack_int* ldvsr,
17782                    float* work, lapack_int* lwork, lapack_logical* bwork,
17783                    lapack_int *info );
17784 void LAPACK_dgges( char* jobvsl, char* jobvsr, char* sort,
17785                    LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
17786                    lapack_int* lda, double* b, lapack_int* ldb,
17787                    lapack_int* sdim, double* alphar, double* alphai,
17788                    double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17789                    lapack_int* ldvsr, double* work, lapack_int* lwork,
17790                    lapack_logical* bwork, lapack_int *info );
17791 void LAPACK_cgges( char* jobvsl, char* jobvsr, char* sort,
17792                    LAPACK_C_SELECT2 selctg, lapack_int* n,
17793                    lapack_complex_float* a, lapack_int* lda,
17794                    lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
17795                    lapack_complex_float* alpha, lapack_complex_float* beta,
17796                    lapack_complex_float* vsl, lapack_int* ldvsl,
17797                    lapack_complex_float* vsr, lapack_int* ldvsr,
17798                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17799                    lapack_logical* bwork, lapack_int *info );
17800 void LAPACK_zgges( char* jobvsl, char* jobvsr, char* sort,
17801                    LAPACK_Z_SELECT2 selctg, lapack_int* n,
17802                    lapack_complex_double* a, lapack_int* lda,
17803                    lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17804                    lapack_complex_double* alpha, lapack_complex_double* beta,
17805                    lapack_complex_double* vsl, lapack_int* ldvsl,
17806                    lapack_complex_double* vsr, lapack_int* ldvsr,
17807                    lapack_complex_double* work, lapack_int* lwork,
17808                    double* rwork, lapack_logical* bwork, lapack_int *info );
17809 void LAPACK_sgges3( char* jobvsl, char* jobvsr, char* sort,
17810                     LAPACK_S_SELECT3 selctg, lapack_int* n,
17811                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17812                     lapack_int* sdim, float* alphar, float* alphai,
17813                     float* beta, float* vsl, lapack_int* ldvsl,
17814                     float* vsr, lapack_int* ldvsr,
17815                     float* work, lapack_int* lwork, lapack_logical* bwork,
17816                     lapack_int *info );
17817 void LAPACK_dgges3( char* jobvsl, char* jobvsr, char* sort,
17818                     LAPACK_D_SELECT3 selctg, lapack_int* n, double* a,
17819                     lapack_int* lda, double* b, lapack_int* ldb,
17820                     lapack_int* sdim, double* alphar, double* alphai,
17821                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17822                     lapack_int* ldvsr, double* work, lapack_int* lwork,
17823                     lapack_logical* bwork, lapack_int *info );
17824 void LAPACK_cgges3( char* jobvsl, char* jobvsr, char* sort,
17825                     LAPACK_C_SELECT2 selctg, lapack_int* n,
17826                     lapack_complex_float* a, lapack_int* lda,
17827                     lapack_complex_float* b, lapack_int* ldb,
17828                     lapack_int* sdim,
17829                     lapack_complex_float* alpha, lapack_complex_float* beta,
17830                     lapack_complex_float* vsl, lapack_int* ldvsl,
17831                     lapack_complex_float* vsr, lapack_int* ldvsr,
17832                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17833                     lapack_logical* bwork, lapack_int *info );
17834 void LAPACK_zgges3( char* jobvsl, char* jobvsr, char* sort,
17835                     LAPACK_Z_SELECT2 selctg, lapack_int* n,
17836                     lapack_complex_double* a, lapack_int* lda,
17837                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17838                     lapack_complex_double* alpha, lapack_complex_double* beta,
17839                     lapack_complex_double* vsl, lapack_int* ldvsl,
17840                     lapack_complex_double* vsr, lapack_int* ldvsr,
17841                     lapack_complex_double* work, lapack_int* lwork,
17842                     double* rwork, lapack_logical* bwork, lapack_int *info );
17843 void LAPACK_sggesx( char* jobvsl, char* jobvsr, char* sort,
17844                     LAPACK_S_SELECT3 selctg, char* sense, lapack_int* n,
17845                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
17846                     lapack_int* sdim, float* alphar, float* alphai, float* beta,
17847                     float* vsl, lapack_int* ldvsl, float* vsr,
17848                     lapack_int* ldvsr, float* rconde, float* rcondv,
17849                     float* work, lapack_int* lwork, lapack_int* iwork,
17850                     lapack_int* liwork, lapack_logical* bwork,
17851                     lapack_int *info );
17852 void LAPACK_dggesx( char* jobvsl, char* jobvsr, char* sort,
17853                     LAPACK_D_SELECT3 selctg, char* sense, lapack_int* n,
17854                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
17855                     lapack_int* sdim, double* alphar, double* alphai,
17856                     double* beta, double* vsl, lapack_int* ldvsl, double* vsr,
17857                     lapack_int* ldvsr, double* rconde, double* rcondv,
17858                     double* work, lapack_int* lwork, lapack_int* iwork,
17859                     lapack_int* liwork, lapack_logical* bwork,
17860                     lapack_int *info );
17861 void LAPACK_cggesx( char* jobvsl, char* jobvsr, char* sort,
17862                     LAPACK_C_SELECT2 selctg, char* sense, lapack_int* n,
17863                     lapack_complex_float* a, lapack_int* lda,
17864                     lapack_complex_float* b, lapack_int* ldb, lapack_int* sdim,
17865                     lapack_complex_float* alpha, lapack_complex_float* beta,
17866                     lapack_complex_float* vsl, lapack_int* ldvsl,
17867                     lapack_complex_float* vsr, lapack_int* ldvsr, float* rconde,
17868                     float* rcondv, lapack_complex_float* work,
17869                     lapack_int* lwork, float* rwork, lapack_int* iwork,
17870                     lapack_int* liwork, lapack_logical* bwork,
17871                     lapack_int *info );
17872 void LAPACK_zggesx( char* jobvsl, char* jobvsr, char* sort,
17873                     LAPACK_Z_SELECT2 selctg, char* sense, lapack_int* n,
17874                     lapack_complex_double* a, lapack_int* lda,
17875                     lapack_complex_double* b, lapack_int* ldb, lapack_int* sdim,
17876                     lapack_complex_double* alpha, lapack_complex_double* beta,
17877                     lapack_complex_double* vsl, lapack_int* ldvsl,
17878                     lapack_complex_double* vsr, lapack_int* ldvsr,
17879                     double* rconde, double* rcondv, lapack_complex_double* work,
17880                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17881                     lapack_int* liwork, lapack_logical* bwork,
17882                     lapack_int *info );
17883 void LAPACK_sggev( char* jobvl, char* jobvr, lapack_int* n, float* a,
17884                    lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
17885                    float* alphai, float* beta, float* vl, lapack_int* ldvl,
17886                    float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
17887                    lapack_int *info );
17888 void LAPACK_dggev( char* jobvl, char* jobvr, lapack_int* n, double* a,
17889                    lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
17890                    double* alphai, double* beta, double* vl, lapack_int* ldvl,
17891                    double* vr, lapack_int* ldvr, double* work,
17892                    lapack_int* lwork, lapack_int *info );
17893 void LAPACK_cggev( char* jobvl, char* jobvr, lapack_int* n,
17894                    lapack_complex_float* a, lapack_int* lda,
17895                    lapack_complex_float* b, lapack_int* ldb,
17896                    lapack_complex_float* alpha, lapack_complex_float* beta,
17897                    lapack_complex_float* vl, lapack_int* ldvl,
17898                    lapack_complex_float* vr, lapack_int* ldvr,
17899                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
17900                    lapack_int *info );
17901 void LAPACK_zggev( char* jobvl, char* jobvr, lapack_int* n,
17902                    lapack_complex_double* a, lapack_int* lda,
17903                    lapack_complex_double* b, lapack_int* ldb,
17904                    lapack_complex_double* alpha, lapack_complex_double* beta,
17905                    lapack_complex_double* vl, lapack_int* ldvl,
17906                    lapack_complex_double* vr, lapack_int* ldvr,
17907                    lapack_complex_double* work, lapack_int* lwork,
17908                    double* rwork, lapack_int *info );
17909 void LAPACK_sggev3( char* jobvl, char* jobvr, lapack_int* n, float* a,
17910                     lapack_int* lda, float* b, lapack_int* ldb, float* alphar,
17911                     float* alphai, float* beta, float* vl, lapack_int* ldvl,
17912                     float* vr, lapack_int* ldvr, float* work, lapack_int* lwork,
17913                     lapack_int *info );
17914 void LAPACK_dggev3( char* jobvl, char* jobvr, lapack_int* n, double* a,
17915                     lapack_int* lda, double* b, lapack_int* ldb, double* alphar,
17916                     double* alphai, double* beta, double* vl, lapack_int* ldvl,
17917                     double* vr, lapack_int* ldvr, double* work,
17918                     lapack_int* lwork, lapack_int *info );
17919 void LAPACK_cggev3( char* jobvl, char* jobvr, lapack_int* n,
17920                     lapack_complex_float* a, lapack_int* lda,
17921                     lapack_complex_float* b, lapack_int* ldb,
17922                     lapack_complex_float* alpha, lapack_complex_float* beta,
17923                     lapack_complex_float* vl, lapack_int* ldvl,
17924                     lapack_complex_float* vr, lapack_int* ldvr,
17925                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17926                     lapack_int *info );
17927 void LAPACK_zggev3( char* jobvl, char* jobvr, lapack_int* n,
17928                     lapack_complex_double* a, lapack_int* lda,
17929                     lapack_complex_double* b, lapack_int* ldb,
17930                     lapack_complex_double* alpha, lapack_complex_double* beta,
17931                     lapack_complex_double* vl, lapack_int* ldvl,
17932                     lapack_complex_double* vr, lapack_int* ldvr,
17933                     lapack_complex_double* work, lapack_int* lwork,
17934                     double* rwork, lapack_int *info );
17935 void LAPACK_sggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17936                     lapack_int* n, float* a, lapack_int* lda, float* b,
17937                     lapack_int* ldb, float* alphar, float* alphai, float* beta,
17938                     float* vl, lapack_int* ldvl, float* vr, lapack_int* ldvr,
17939                     lapack_int* ilo, lapack_int* ihi, float* lscale,
17940                     float* rscale, float* abnrm, float* bbnrm, float* rconde,
17941                     float* rcondv, float* work, lapack_int* lwork,
17942                     lapack_int* iwork, lapack_logical* bwork,
17943                     lapack_int *info );
17944 void LAPACK_dggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17945                     lapack_int* n, double* a, lapack_int* lda, double* b,
17946                     lapack_int* ldb, double* alphar, double* alphai,
17947                     double* beta, double* vl, lapack_int* ldvl, double* vr,
17948                     lapack_int* ldvr, lapack_int* ilo, lapack_int* ihi,
17949                     double* lscale, double* rscale, double* abnrm,
17950                     double* bbnrm, double* rconde, double* rcondv, double* work,
17951                     lapack_int* lwork, lapack_int* iwork, lapack_logical* bwork,
17952                     lapack_int *info );
17953 void LAPACK_cggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17954                     lapack_int* n, lapack_complex_float* a, lapack_int* lda,
17955                     lapack_complex_float* b, lapack_int* ldb,
17956                     lapack_complex_float* alpha, lapack_complex_float* beta,
17957                     lapack_complex_float* vl, lapack_int* ldvl,
17958                     lapack_complex_float* vr, lapack_int* ldvr, lapack_int* ilo,
17959                     lapack_int* ihi, float* lscale, float* rscale, float* abnrm,
17960                     float* bbnrm, float* rconde, float* rcondv,
17961                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
17962                     lapack_int* iwork, lapack_logical* bwork,
17963                     lapack_int *info );
17964 void LAPACK_zggevx( char* balanc, char* jobvl, char* jobvr, char* sense,
17965                     lapack_int* n, lapack_complex_double* a, lapack_int* lda,
17966                     lapack_complex_double* b, lapack_int* ldb,
17967                     lapack_complex_double* alpha, lapack_complex_double* beta,
17968                     lapack_complex_double* vl, lapack_int* ldvl,
17969                     lapack_complex_double* vr, lapack_int* ldvr,
17970                     lapack_int* ilo, lapack_int* ihi, double* lscale,
17971                     double* rscale, double* abnrm, double* bbnrm,
17972                     double* rconde, double* rcondv, lapack_complex_double* work,
17973                     lapack_int* lwork, double* rwork, lapack_int* iwork,
17974                     lapack_logical* bwork, lapack_int *info );
17975 void LAPACK_dsfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17976                    lapack_int* k, double* alpha, const double* a,
17977                    lapack_int* lda, double* beta, double* c );
17978 void LAPACK_ssfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17979                    lapack_int* k, float* alpha, const float* a, lapack_int* lda,
17980                    float* beta, float* c );
17981 void LAPACK_zhfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17982                    lapack_int* k, double* alpha, const lapack_complex_double* a,
17983                    lapack_int* lda, double* beta, lapack_complex_double* c );
17984 void LAPACK_chfrk( char* transr, char* uplo, char* trans, lapack_int* n,
17985                    lapack_int* k, float* alpha, const lapack_complex_float* a,
17986                    lapack_int* lda, float* beta, lapack_complex_float* c );
17987 void LAPACK_dtfsm( char* transr, char* side, char* uplo, char* trans,
17988                    char* diag, lapack_int* m, lapack_int* n, double* alpha,
17989                    const double* a, double* b, lapack_int* ldb );
17990 void LAPACK_stfsm( char* transr, char* side, char* uplo, char* trans,
17991                    char* diag, lapack_int* m, lapack_int* n, float* alpha,
17992                    const float* a, float* b, lapack_int* ldb );
17993 void LAPACK_ztfsm( char* transr, char* side, char* uplo, char* trans,
17994                    char* diag, lapack_int* m, lapack_int* n,
17995                    lapack_complex_double* alpha, const lapack_complex_double* a,
17996                    lapack_complex_double* b, lapack_int* ldb );
17997 void LAPACK_ctfsm( char* transr, char* side, char* uplo, char* trans,
17998                    char* diag, lapack_int* m, lapack_int* n,
17999                    lapack_complex_float* alpha, const lapack_complex_float* a,
18000                    lapack_complex_float* b, lapack_int* ldb );
18001 void LAPACK_dtfttp( char* transr, char* uplo, lapack_int* n, const double* arf,
18002                     double* ap, lapack_int *info );
18003 void LAPACK_stfttp( char* transr, char* uplo, lapack_int* n, const float* arf,
18004                     float* ap, lapack_int *info );
18005 void LAPACK_ztfttp( char* transr, char* uplo, lapack_int* n,
18006                     const lapack_complex_double* arf, lapack_complex_double* ap,
18007                     lapack_int *info );
18008 void LAPACK_ctfttp( char* transr, char* uplo, lapack_int* n,
18009                     const lapack_complex_float* arf, lapack_complex_float* ap,
18010                     lapack_int *info );
18011 void LAPACK_dtfttr( char* transr, char* uplo, lapack_int* n, const double* arf,
18012                     double* a, lapack_int* lda, lapack_int *info );
18013 void LAPACK_stfttr( char* transr, char* uplo, lapack_int* n, const float* arf,
18014                     float* a, lapack_int* lda, lapack_int *info );
18015 void LAPACK_ztfttr( char* transr, char* uplo, lapack_int* n,
18016                     const lapack_complex_double* arf, lapack_complex_double* a,
18017                     lapack_int* lda, lapack_int *info );
18018 void LAPACK_ctfttr( char* transr, char* uplo, lapack_int* n,
18019                     const lapack_complex_float* arf, lapack_complex_float* a,
18020                     lapack_int* lda, lapack_int *info );
18021 void LAPACK_dtpttf( char* transr, char* uplo, lapack_int* n, const double* ap,
18022                     double* arf, lapack_int *info );
18023 void LAPACK_stpttf( char* transr, char* uplo, lapack_int* n, const float* ap,
18024                     float* arf, lapack_int *info );
18025 void LAPACK_ztpttf( char* transr, char* uplo, lapack_int* n,
18026                     const lapack_complex_double* ap, lapack_complex_double* arf,
18027                     lapack_int *info );
18028 void LAPACK_ctpttf( char* transr, char* uplo, lapack_int* n,
18029                     const lapack_complex_float* ap, lapack_complex_float* arf,
18030                     lapack_int *info );
18031 void LAPACK_dtpttr( char* uplo, lapack_int* n, const double* ap, double* a,
18032                     lapack_int* lda, lapack_int *info );
18033 void LAPACK_stpttr( char* uplo, lapack_int* n, const float* ap, float* a,
18034                     lapack_int* lda, lapack_int *info );
18035 void LAPACK_ztpttr( char* uplo, lapack_int* n, const lapack_complex_double* ap,
18036                     lapack_complex_double* a, lapack_int* lda,
18037                     lapack_int *info );
18038 void LAPACK_ctpttr( char* uplo, lapack_int* n, const lapack_complex_float* ap,
18039                     lapack_complex_float* a, lapack_int* lda,
18040                     lapack_int *info );
18041 void LAPACK_dtrttf( char* transr, char* uplo, lapack_int* n, const double* a,
18042                     lapack_int* lda, double* arf, lapack_int *info );
18043 void LAPACK_strttf( char* transr, char* uplo, lapack_int* n, const float* a,
18044                     lapack_int* lda, float* arf, lapack_int *info );
18045 void LAPACK_ztrttf( char* transr, char* uplo, lapack_int* n,
18046                     const lapack_complex_double* a, lapack_int* lda,
18047                     lapack_complex_double* arf, lapack_int *info );
18048 void LAPACK_ctrttf( char* transr, char* uplo, lapack_int* n,
18049                     const lapack_complex_float* a, lapack_int* lda,
18050                     lapack_complex_float* arf, lapack_int *info );
18051 void LAPACK_dtrttp( char* uplo, lapack_int* n, const double* a, lapack_int* lda,
18052                     double* ap, lapack_int *info );
18053 void LAPACK_strttp( char* uplo, lapack_int* n, const float* a, lapack_int* lda,
18054                     float* ap, lapack_int *info );
18055 void LAPACK_ztrttp( char* uplo, lapack_int* n, const lapack_complex_double* a,
18056                     lapack_int* lda, lapack_complex_double* ap,
18057                     lapack_int *info );
18058 void LAPACK_ctrttp( char* uplo, lapack_int* n, const lapack_complex_float* a,
18059                     lapack_int* lda, lapack_complex_float* ap,
18060                     lapack_int *info );
18061 void LAPACK_sgeqrfp( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18062                      float* tau, float* work, lapack_int* lwork,
18063                      lapack_int *info );
18064 void LAPACK_dgeqrfp( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18065                      double* tau, double* work, lapack_int* lwork,
18066                      lapack_int *info );
18067 void LAPACK_cgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18068                      lapack_int* lda, lapack_complex_float* tau,
18069                      lapack_complex_float* work, lapack_int* lwork,
18070                      lapack_int *info );
18071 void LAPACK_zgeqrfp( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18072                      lapack_int* lda, lapack_complex_double* tau,
18073                      lapack_complex_double* work, lapack_int* lwork,
18074                      lapack_int *info );
18075 void LAPACK_clacgv( lapack_int* n, lapack_complex_float* x, lapack_int* incx );
18076 void LAPACK_zlacgv( lapack_int* n, lapack_complex_double* x, lapack_int* incx );
18077 void LAPACK_slarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18078                     float* x );
18079 void LAPACK_dlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18080                     double* x );
18081 void LAPACK_clarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18082                     lapack_complex_float* x );
18083 void LAPACK_zlarnv( lapack_int* idist, lapack_int* iseed, lapack_int* n,
18084                     lapack_complex_double* x );
18085 void LAPACK_sgeqr2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18086                     float* tau, float* work, lapack_int *info );
18087 void LAPACK_dgeqr2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18088                     double* tau, double* work, lapack_int *info );
18089 void LAPACK_cgeqr2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18090                     lapack_int* lda, lapack_complex_float* tau,
18091                     lapack_complex_float* work, lapack_int *info );
18092 void LAPACK_zgeqr2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18093                     lapack_int* lda, lapack_complex_double* tau,
18094                     lapack_complex_double* work, lapack_int *info );
18095 void LAPACK_slacn2( lapack_int* n, float* v, float* x, lapack_int* isgn,
18096                     float* est, lapack_int* kase, lapack_int* isave );
18097 void LAPACK_dlacn2( lapack_int* n, double* v, double* x, lapack_int* isgn,
18098                     double* est, lapack_int* kase, lapack_int* isave );
18099 void LAPACK_clacn2( lapack_int* n, lapack_complex_float* v,
18100                     lapack_complex_float* x, float* est,
18101                     lapack_int* kase, lapack_int* isave );
18102 void LAPACK_zlacn2( lapack_int* n, lapack_complex_double* v,
18103                     lapack_complex_double* x, double* est,
18104                     lapack_int* kase, lapack_int* isave );
18105 void LAPACK_slacpy( char* uplo, lapack_int* m, lapack_int* n, const float* a,
18106                     lapack_int* lda, float* b, lapack_int* ldb );
18107 void LAPACK_dlacpy( char* uplo, lapack_int* m, lapack_int* n, const double* a,
18108                     lapack_int* lda, double* b, lapack_int* ldb );
18109 void LAPACK_clacpy( char* uplo, lapack_int* m, lapack_int* n,
18110                     const lapack_complex_float* a, lapack_int* lda,
18111                     lapack_complex_float* b, lapack_int* ldb );
18112 void LAPACK_zlacpy( char* uplo, lapack_int* m, lapack_int* n,
18113                     const lapack_complex_double* a, lapack_int* lda,
18114                     lapack_complex_double* b, lapack_int* ldb );
18115
18116 void LAPACK_clacp2( char* uplo, lapack_int* m, lapack_int* n, const float* a,
18117                     lapack_int* lda, lapack_complex_float* b, lapack_int* ldb );
18118 void LAPACK_zlacp2( char* uplo, lapack_int* m, lapack_int* n, const double* a,
18119                     lapack_int* lda, lapack_complex_double* b,
18120                     lapack_int* ldb );
18121
18122 void LAPACK_sgetf2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18123                     lapack_int* ipiv, lapack_int *info );
18124 void LAPACK_dgetf2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18125                     lapack_int* ipiv, lapack_int *info );
18126 void LAPACK_cgetf2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18127                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
18128 void LAPACK_zgetf2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18129                     lapack_int* lda, lapack_int* ipiv, lapack_int *info );
18130 void LAPACK_slaswp( lapack_int* n, float* a, lapack_int* lda, lapack_int* k1,
18131                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
18132 void LAPACK_dlaswp( lapack_int* n, double* a, lapack_int* lda, lapack_int* k1,
18133                     lapack_int* k2, const lapack_int* ipiv, lapack_int* incx );
18134 void LAPACK_claswp( lapack_int* n, lapack_complex_float* a, lapack_int* lda,
18135                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
18136                     lapack_int* incx );
18137 void LAPACK_zlaswp( lapack_int* n, lapack_complex_double* a, lapack_int* lda,
18138                     lapack_int* k1, lapack_int* k2, const lapack_int* ipiv,
18139                     lapack_int* incx );
18140 float LAPACK_slange( char* norm, lapack_int* m, lapack_int* n, const float* a,
18141                     lapack_int* lda, float* work );
18142 double LAPACK_dlange( char* norm, lapack_int* m, lapack_int* n, const double* a,
18143                     lapack_int* lda, double* work );
18144 float LAPACK_clange( char* norm, lapack_int* m, lapack_int* n,
18145                     const lapack_complex_float* a, lapack_int* lda, float* work );
18146 double LAPACK_zlange( char* norm, lapack_int* m, lapack_int* n,
18147                     const lapack_complex_double* a, lapack_int* lda, double* work );
18148 float LAPACK_clanhe( char* norm, char* uplo, lapack_int* n,
18149                     const lapack_complex_float* a, lapack_int* lda, float* work );
18150 double LAPACK_zlanhe( char* norm, char* uplo, lapack_int* n,
18151                     const lapack_complex_double* a, lapack_int* lda, double* work );
18152 void LAPACK_clarcm( lapack_int* m, lapack_int* n, const float* a,
18153                     lapack_int* lda, const lapack_complex_float* b,
18154                     lapack_int* ldb, lapack_complex_float* c,
18155                     lapack_int* ldc, float* work );
18156 void LAPACK_zlarcm( lapack_int* m, lapack_int* n, const double* a,
18157                     lapack_int* lda, const lapack_complex_double* b,
18158                     lapack_int* ldb, lapack_complex_double* c,
18159                     lapack_int* ldc, double* work );
18160 void LAPACK_clacrm( lapack_int* m, lapack_int* n, const lapack_complex_float* a,
18161                     lapack_int* lda, const float* b,
18162                     lapack_int* ldb, lapack_complex_float* c,
18163                     lapack_int* ldc, float* work );
18164 void LAPACK_zlacrm( lapack_int* m, lapack_int* n, const lapack_complex_double* a,
18165                     lapack_int* lda, const double* b,
18166                     lapack_int* ldb, lapack_complex_double* c,
18167                     lapack_int* ldc, double* work );
18168 float LAPACK_slansy( char* norm, char* uplo, lapack_int* n, const float* a,
18169                     lapack_int* lda, float* work );
18170 double LAPACK_dlansy( char* norm, char* uplo, lapack_int* n, const double* a,
18171                     lapack_int* lda, double* work );
18172 float LAPACK_clansy( char* norm, char* uplo, lapack_int* n,
18173                     const lapack_complex_float* a, lapack_int* lda, float* work );
18174 double LAPACK_zlansy( char* norm, char* uplo, lapack_int* n,
18175                     const lapack_complex_double* a, lapack_int* lda, double* work );
18176 float LAPACK_slantr( char* norm, char* uplo, char* diag, lapack_int* m,
18177                     lapack_int* n, const float* a, lapack_int* lda, float* work );
18178 double LAPACK_dlantr( char* norm, char* uplo, char* diag, lapack_int* m,
18179                     lapack_int* n, const double* a, lapack_int* lda, double* work );
18180 float LAPACK_clantr( char* norm, char* uplo, char* diag, lapack_int* m,
18181                     lapack_int* n, const lapack_complex_float* a, lapack_int* lda,
18182                     float* work );
18183 double LAPACK_zlantr( char* norm, char* uplo, char* diag, lapack_int* m,
18184                     lapack_int* n, const lapack_complex_double* a, lapack_int* lda,
18185                     double* work );
18186 float LAPACK_slamch( char* cmach );
18187 double LAPACK_dlamch( char* cmach );
18188 void LAPACK_sgelq2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18189                     float* tau, float* work, lapack_int *info );
18190 void LAPACK_dgelq2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18191                     double* tau, double* work, lapack_int *info );
18192 void LAPACK_cgelq2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18193                     lapack_int* lda, lapack_complex_float* tau,
18194                     lapack_complex_float* work, lapack_int *info );
18195 void LAPACK_zgelq2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18196                     lapack_int* lda, lapack_complex_double* tau,
18197                     lapack_complex_double* work, lapack_int *info );
18198 void LAPACK_slarfb( char* side, char* trans, char* direct, char* storev,
18199                     lapack_int* m, lapack_int* n, lapack_int* k, const float* v,
18200                     lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
18201                     lapack_int* ldc, float* work, lapack_int* ldwork );
18202 void LAPACK_dlarfb( char* side, char* trans, char* direct, char* storev,
18203                     lapack_int* m, lapack_int* n, lapack_int* k,
18204                     const double* v, lapack_int* ldv, const double* t,
18205                     lapack_int* ldt, double* c, lapack_int* ldc, double* work,
18206                     lapack_int* ldwork );
18207 void LAPACK_clarfb( char* side, char* trans, char* direct, char* storev,
18208                     lapack_int* m, lapack_int* n, lapack_int* k,
18209                     const lapack_complex_float* v, lapack_int* ldv,
18210                     const lapack_complex_float* t, lapack_int* ldt,
18211                     lapack_complex_float* c, lapack_int* ldc,
18212                     lapack_complex_float* work, lapack_int* ldwork );
18213 void LAPACK_zlarfb( char* side, char* trans, char* direct, char* storev,
18214                     lapack_int* m, lapack_int* n, lapack_int* k,
18215                     const lapack_complex_double* v, lapack_int* ldv,
18216                     const lapack_complex_double* t, lapack_int* ldt,
18217                     lapack_complex_double* c, lapack_int* ldc,
18218                     lapack_complex_double* work, lapack_int* ldwork );
18219 void LAPACK_slarfg( lapack_int* n, float* alpha, float* x, lapack_int* incx,
18220                     float* tau );
18221 void LAPACK_dlarfg( lapack_int* n, double* alpha, double* x, lapack_int* incx,
18222                     double* tau );
18223 void LAPACK_clarfg( lapack_int* n, lapack_complex_float* alpha,
18224                     lapack_complex_float* x, lapack_int* incx,
18225                     lapack_complex_float* tau );
18226 void LAPACK_zlarfg( lapack_int* n, lapack_complex_double* alpha,
18227                     lapack_complex_double* x, lapack_int* incx,
18228                     lapack_complex_double* tau );
18229 void LAPACK_slassq( lapack_int *n,                 float* x, lapack_int *incx,  float* scale,  float* sumsq );
18230 void LAPACK_dlassq( lapack_int *n,                double* x, lapack_int *incx, double* scale, double* sumsq );
18231 void LAPACK_classq( lapack_int *n,  lapack_complex_float* x, lapack_int *incx,  float* scale,  float* sumsq );
18232 void LAPACK_zlassq( lapack_int *n, lapack_complex_double* x, lapack_int *incx, double* scale, double* sumsq );
18233 void LAPACK_slarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18234                     const float* v, lapack_int* ldv, const float* tau, float* t,
18235                     lapack_int* ldt );
18236 void LAPACK_dlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18237                     const double* v, lapack_int* ldv, const double* tau,
18238                     double* t, lapack_int* ldt );
18239 void LAPACK_clarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18240                     const lapack_complex_float* v, lapack_int* ldv,
18241                     const lapack_complex_float* tau, lapack_complex_float* t,
18242                     lapack_int* ldt );
18243 void LAPACK_zlarft( char* direct, char* storev, lapack_int* n, lapack_int* k,
18244                     const lapack_complex_double* v, lapack_int* ldv,
18245                     const lapack_complex_double* tau, lapack_complex_double* t,
18246                     lapack_int* ldt );
18247 void LAPACK_slarfx( char* side, lapack_int* m, lapack_int* n, const float* v,
18248                     float* tau, float* c, lapack_int* ldc, float* work );
18249 void LAPACK_dlarfx( char* side, lapack_int* m, lapack_int* n, const double* v,
18250                     double* tau, double* c, lapack_int* ldc, double* work );
18251 void LAPACK_clarfx( char* side, lapack_int* m, lapack_int* n,
18252                     const lapack_complex_float* v, lapack_complex_float* tau,
18253                     lapack_complex_float* c, lapack_int* ldc,
18254                     lapack_complex_float* work );
18255 void LAPACK_zlarfx( char* side, lapack_int* m, lapack_int* n,
18256                     const lapack_complex_double* v, lapack_complex_double* tau,
18257                     lapack_complex_double* c, lapack_int* ldc,
18258                     lapack_complex_double* work );
18259 void LAPACK_slatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18260                     char* sym, float* d, lapack_int* mode, float* cond,
18261                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18262                     float* a, lapack_int* lda, float* work, lapack_int *info );
18263 void LAPACK_dlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18264                     char* sym, double* d, lapack_int* mode, double* cond,
18265                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18266                     double* a, lapack_int* lda, double* work,
18267                     lapack_int *info );
18268 void LAPACK_clatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18269                     char* sym, float* d, lapack_int* mode, float* cond,
18270                     float* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18271                     lapack_complex_float* a, lapack_int* lda,
18272                     lapack_complex_float* work, lapack_int *info );
18273 void LAPACK_zlatms( lapack_int* m, lapack_int* n, char* dist, lapack_int* iseed,
18274                     char* sym, double* d, lapack_int* mode, double* cond,
18275                     double* dmax, lapack_int* kl, lapack_int* ku, char* pack,
18276                     lapack_complex_double* a, lapack_int* lda,
18277                     lapack_complex_double* work, lapack_int *info );
18278 void LAPACK_slag2d( lapack_int* m, lapack_int* n, const float* sa,
18279                     lapack_int* ldsa, double* a, lapack_int* lda,
18280                     lapack_int *info );
18281 void LAPACK_dlag2s( lapack_int* m, lapack_int* n, const double* a,
18282                     lapack_int* lda, float* sa, lapack_int* ldsa,
18283                     lapack_int *info );
18284 void LAPACK_clag2z( lapack_int* m, lapack_int* n,
18285                     const lapack_complex_float* sa, lapack_int* ldsa,
18286                     lapack_complex_double* a, lapack_int* lda,
18287                     lapack_int *info );
18288 void LAPACK_zlag2c( lapack_int* m, lapack_int* n,
18289                     const lapack_complex_double* a, lapack_int* lda,
18290                     lapack_complex_float* sa, lapack_int* ldsa,
18291                     lapack_int *info );
18292 void LAPACK_slauum( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18293                     lapack_int *info );
18294 void LAPACK_dlauum( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18295                     lapack_int *info );
18296 void LAPACK_clauum( char* uplo, lapack_int* n, lapack_complex_float* a,
18297                     lapack_int* lda, lapack_int *info );
18298 void LAPACK_zlauum( char* uplo, lapack_int* n, lapack_complex_double* a,
18299                     lapack_int* lda, lapack_int *info );
18300 void LAPACK_slagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18301                     lapack_int* ku, const float* d, float* a, lapack_int* lda,
18302                     lapack_int* iseed, float* work, lapack_int *info );
18303 void LAPACK_dlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18304                     lapack_int* ku, const double* d, double* a, lapack_int* lda,
18305                     lapack_int* iseed, double* work, lapack_int *info );
18306 void LAPACK_clagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18307                     lapack_int* ku, const float* d, lapack_complex_float* a,
18308                     lapack_int* lda, lapack_int* iseed,
18309                     lapack_complex_float* work, lapack_int *info );
18310 void LAPACK_zlagge( lapack_int* m, lapack_int* n, lapack_int* kl,
18311                     lapack_int* ku, const double* d, lapack_complex_double* a,
18312                     lapack_int* lda, lapack_int* iseed,
18313                     lapack_complex_double* work, lapack_int *info );
18314 void LAPACK_slascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
18315                     float* cto, lapack_int* m, lapack_int* n, float* a,
18316                     lapack_int* lda, lapack_int *info );
18317 void LAPACK_dlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
18318                     double* cto, lapack_int* m, lapack_int* n, double* a,
18319                     lapack_int* lda, lapack_int *info );
18320 void LAPACK_clascl( char* type, lapack_int* kl, lapack_int* ku, float* cfrom,
18321                     float* cto, lapack_int* m, lapack_int* n, lapack_complex_float* a,
18322                     lapack_int* lda, lapack_int *info );
18323 void LAPACK_zlascl( char* type, lapack_int* kl, lapack_int* ku, double* cfrom,
18324                     double* cto, lapack_int* m, lapack_int* n, lapack_complex_double* a,
18325                     lapack_int* lda, lapack_int *info );
18326 void LAPACK_slaset( char* uplo, lapack_int* m, lapack_int* n, float* alpha,
18327                     float* beta, float* a, lapack_int* lda );
18328 void LAPACK_dlaset( char* uplo, lapack_int* m, lapack_int* n, double* alpha,
18329                     double* beta, double* a, lapack_int* lda );
18330 void LAPACK_claset( char* uplo, lapack_int* m, lapack_int* n,
18331                     lapack_complex_float* alpha, lapack_complex_float* beta,
18332                     lapack_complex_float* a, lapack_int* lda );
18333 void LAPACK_zlaset( char* uplo, lapack_int* m, lapack_int* n,
18334                     lapack_complex_double* alpha, lapack_complex_double* beta,
18335                     lapack_complex_double* a, lapack_int* lda );
18336 void LAPACK_slasrt( char* id, lapack_int* n, float* d, lapack_int *info );
18337 void LAPACK_dlasrt( char* id, lapack_int* n, double* d, lapack_int *info );
18338 void LAPACK_claghe( lapack_int* n, lapack_int* k, const float* d,
18339                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
18340                     lapack_complex_float* work, lapack_int *info );
18341 void LAPACK_zlaghe( lapack_int* n, lapack_int* k, const double* d,
18342                     lapack_complex_double* a, lapack_int* lda,
18343                     lapack_int* iseed, lapack_complex_double* work,
18344                     lapack_int *info );
18345 void LAPACK_slagsy( lapack_int* n, lapack_int* k, const float* d, float* a,
18346                     lapack_int* lda, lapack_int* iseed, float* work,
18347                     lapack_int *info );
18348 void LAPACK_dlagsy( lapack_int* n, lapack_int* k, const double* d, double* a,
18349                     lapack_int* lda, lapack_int* iseed, double* work,
18350                     lapack_int *info );
18351 void LAPACK_clagsy( lapack_int* n, lapack_int* k, const float* d,
18352                     lapack_complex_float* a, lapack_int* lda, lapack_int* iseed,
18353                     lapack_complex_float* work, lapack_int *info );
18354 void LAPACK_zlagsy( lapack_int* n, lapack_int* k, const double* d,
18355                     lapack_complex_double* a, lapack_int* lda,
18356                     lapack_int* iseed, lapack_complex_double* work,
18357                     lapack_int *info );
18358 void LAPACK_slapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18359                     float* x, lapack_int* ldx, lapack_int* k );
18360 void LAPACK_dlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18361                     double* x, lapack_int* ldx, lapack_int* k );
18362 void LAPACK_clapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18363                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
18364 void LAPACK_zlapmr( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18365                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
18366 void LAPACK_slapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18367                     float* x, lapack_int* ldx, lapack_int* k );
18368 void LAPACK_dlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18369                     double* x, lapack_int* ldx, lapack_int* k );
18370 void LAPACK_clapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18371                     lapack_complex_float* x, lapack_int* ldx, lapack_int* k );
18372 void LAPACK_zlapmt( lapack_logical* forwrd, lapack_int* m, lapack_int* n,
18373                     lapack_complex_double* x, lapack_int* ldx, lapack_int* k );
18374 float LAPACK_slapy2( float* x, float* y );
18375 double LAPACK_dlapy2( double* x, double* y );
18376 float LAPACK_slapy3( float* x, float* y, float* z );
18377 double LAPACK_dlapy3( double* x, double* y, double* z );
18378 void LAPACK_slartgp( float* f, float* g, float* cs, float* sn, float* r );
18379 void LAPACK_dlartgp( double* f, double* g, double* cs, double* sn, double* r );
18380 void LAPACK_slartgs( float* x, float* y, float* sigma, float* cs, float* sn );
18381 void LAPACK_dlartgs( double* x, double* y, double* sigma, double* cs,
18382                      double* sn );
18383 // LAPACK 3.3.0
18384 void LAPACK_cbbcsd( char* jobu1, char* jobu2,
18385                     char* jobv1t, char* jobv2t, char* trans,
18386                     lapack_int* m, lapack_int* p, lapack_int* q,
18387                     float* theta, float* phi,
18388                     lapack_complex_float* u1, lapack_int* ldu1,
18389                     lapack_complex_float* u2, lapack_int* ldu2,
18390                     lapack_complex_float* v1t, lapack_int* ldv1t,
18391                     lapack_complex_float* v2t, lapack_int* ldv2t,
18392                     float* b11d, float* b11e, float* b12d,
18393                     float* b12e, float* b21d, float* b21e,
18394                     float* b22d, float* b22e, float* rwork,
18395                     lapack_int* lrwork , lapack_int *info );
18396 void LAPACK_cheswapr( char* uplo, lapack_int* n, lapack_complex_float* a,
18397                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18398 void LAPACK_chetri2( 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* lwork , lapack_int *info );
18402 void LAPACK_chetri2x( char* uplo, lapack_int* n,
18403                       lapack_complex_float* a, lapack_int* lda,
18404                       const lapack_int* ipiv,
18405                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
18406 void LAPACK_chetrs2( char* uplo, lapack_int* n,
18407                      lapack_int* nrhs, const lapack_complex_float* a,
18408                      lapack_int* lda, const lapack_int* ipiv,
18409                      lapack_complex_float* b, lapack_int* ldb,
18410                      lapack_complex_float* work , lapack_int *info );
18411 void LAPACK_csyconv( char* uplo, char* way,
18412                      lapack_int* n, lapack_complex_float* a,
18413                      lapack_int* lda, const lapack_int* ipiv,
18414                      lapack_complex_float* e , lapack_int *info );
18415 void LAPACK_csyswapr( char* uplo, lapack_int* n,
18416                       lapack_complex_float* a, lapack_int* lda,
18417                       lapack_int* i1, lapack_int* i2 );
18418 void LAPACK_csytri2( 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* lwork , lapack_int *info );
18422 void LAPACK_csytri2x( char* uplo, lapack_int* n,
18423                       lapack_complex_float* a, lapack_int* lda,
18424                       const lapack_int* ipiv,
18425                       lapack_complex_float* work, lapack_int* nb , lapack_int *info );
18426 void LAPACK_csytrs2( char* uplo, lapack_int* n,
18427                      lapack_int* nrhs, const lapack_complex_float* a,
18428                      lapack_int* lda, const lapack_int* ipiv,
18429                      lapack_complex_float* b, lapack_int* ldb,
18430                      lapack_complex_float* work , lapack_int *info );
18431 void LAPACK_cunbdb( char* trans, char* signs,
18432                     lapack_int* m, lapack_int* p, lapack_int* q,
18433                     lapack_complex_float* x11, lapack_int* ldx11,
18434                     lapack_complex_float* x12, lapack_int* ldx12,
18435                     lapack_complex_float* x21, lapack_int* ldx21,
18436                     lapack_complex_float* x22, lapack_int* ldx22,
18437                     float* theta, float* phi,
18438                     lapack_complex_float* taup1,
18439                     lapack_complex_float* taup2,
18440                     lapack_complex_float* tauq1,
18441                     lapack_complex_float* tauq2,
18442                     lapack_complex_float* work, lapack_int* lwork , lapack_int *info );
18443 void LAPACK_cuncsd( char* jobu1, char* jobu2,
18444                     char* jobv1t, char* jobv2t, char* trans,
18445                     char* signs, lapack_int* m, lapack_int* p,
18446                     lapack_int* q, lapack_complex_float* x11,
18447                     lapack_int* ldx11, lapack_complex_float* x12,
18448                     lapack_int* ldx12, lapack_complex_float* x21,
18449                     lapack_int* ldx21, lapack_complex_float* x22,
18450                     lapack_int* ldx22, float* theta,
18451                     lapack_complex_float* u1, lapack_int* ldu1,
18452                     lapack_complex_float* u2, lapack_int* ldu2,
18453                     lapack_complex_float* v1t, lapack_int* ldv1t,
18454                     lapack_complex_float* v2t, lapack_int* ldv2t,
18455                     lapack_complex_float* work, lapack_int* lwork,
18456                     float* rwork, lapack_int* lrwork,
18457                     lapack_int* iwork , lapack_int *info );
18458 void LAPACK_cuncsd2by1( char* jobu1, char* jobu2,
18459                     char* jobv1t, lapack_int* m, lapack_int* p,
18460                     lapack_int* q, lapack_complex_float* x11,
18461                     lapack_int* ldx11, lapack_complex_float* x21,
18462                     lapack_int* ldx21, float* theta,
18463                     lapack_complex_float* u1, lapack_int* ldu1,
18464                     lapack_complex_float* u2, lapack_int* ldu2,
18465                     lapack_complex_float* v1t, lapack_int* ldv1t,
18466                     lapack_complex_float* work, lapack_int* lwork,
18467                     float* rwork, lapack_int* lrwork,
18468                     lapack_int* iwork , lapack_int *info );
18469 void LAPACK_dbbcsd( char* jobu1, char* jobu2,
18470                     char* jobv1t, char* jobv2t, char* trans,
18471                     lapack_int* m, lapack_int* p, lapack_int* q,
18472                     double* theta, double* phi, double* u1,
18473                     lapack_int* ldu1, double* u2, lapack_int* ldu2,
18474                     double* v1t, lapack_int* ldv1t, double* v2t,
18475                     lapack_int* ldv2t, double* b11d, double* b11e,
18476                     double* b12d, double* b12e, double* b21d,
18477                     double* b21e, double* b22d, double* b22e,
18478                     double* work, lapack_int* lwork , lapack_int *info );
18479 void LAPACK_dorbdb( char* trans, char* signs,
18480                     lapack_int* m, lapack_int* p, lapack_int* q,
18481                     double* x11, lapack_int* ldx11, double* x12,
18482                     lapack_int* ldx12, double* x21, lapack_int* ldx21,
18483                     double* x22, lapack_int* ldx22, double* theta,
18484                     double* phi, double* taup1, double* taup2,
18485                     double* tauq1, double* tauq2, double* work,
18486                     lapack_int* lwork , lapack_int *info );
18487 void LAPACK_dorcsd( char* jobu1, char* jobu2,
18488                     char* jobv1t, char* jobv2t, char* trans,
18489                     char* signs, lapack_int* m, lapack_int* p,
18490                     lapack_int* q, double* x11, lapack_int* ldx11,
18491                     double* x12, lapack_int* ldx12, double* x21,
18492                     lapack_int* ldx21, double* x22, lapack_int* ldx22,
18493                     double* theta, double* u1, lapack_int* ldu1,
18494                     double* u2, lapack_int* ldu2, double* v1t,
18495                     lapack_int* ldv1t, double* v2t, lapack_int* ldv2t,
18496                     double* work, lapack_int* lwork,
18497                     lapack_int* iwork , lapack_int *info );
18498 void LAPACK_dorcsd2by1( char* jobu1, char* jobu2,
18499                     char* jobv1t, lapack_int* m, lapack_int* p,
18500                     lapack_int* q, double* x11, lapack_int* ldx11,
18501                     double* x21, lapack_int* ldx21,
18502                     double* theta, double* u1, lapack_int* ldu1,
18503                     double* u2, lapack_int* ldu2, double* v1t,
18504                     lapack_int* ldv1t, double* work, lapack_int* lwork,
18505                     lapack_int* iwork , lapack_int *info );
18506 void LAPACK_dsyconv( char* uplo, char* way,
18507                      lapack_int* n, double* a, lapack_int* lda,
18508                      const lapack_int* ipiv, double* e , lapack_int *info );
18509 void LAPACK_dsyswapr( char* uplo, lapack_int* n, double* a,
18510                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18511 void LAPACK_dsytri2( char* uplo, lapack_int* n,
18512                      double* a, lapack_int* lda,
18513                      const lapack_int* ipiv,
18514                      double* work, lapack_int* lwork , lapack_int *info );
18515 void LAPACK_dsytri2x( char* uplo, lapack_int* n,
18516                       double* a, lapack_int* lda,
18517                       const lapack_int* ipiv, double* work,
18518                       lapack_int* nb , lapack_int *info );
18519 void LAPACK_dsytrs2( char* uplo, lapack_int* n,
18520                      lapack_int* nrhs, const double* a,
18521                      lapack_int* lda, const lapack_int* ipiv,
18522                      double* b, lapack_int* ldb, double* work , lapack_int *info );
18523 void LAPACK_sbbcsd( char* jobu1, char* jobu2,
18524                     char* jobv1t, char* jobv2t, char* trans,
18525                     lapack_int* m, lapack_int* p, lapack_int* q,
18526                     float* theta, float* phi, float* u1,
18527                     lapack_int* ldu1, float* u2, lapack_int* ldu2,
18528                     float* v1t, lapack_int* ldv1t, float* v2t,
18529                     lapack_int* ldv2t, float* b11d, float* b11e,
18530                     float* b12d, float* b12e, float* b21d,
18531                     float* b21e, float* b22d, float* b22e,
18532                     float* work, lapack_int* lwork , lapack_int *info );
18533 void LAPACK_sorbdb( char* trans, char* signs,
18534                     lapack_int* m, lapack_int* p, lapack_int* q,
18535                     float* x11, lapack_int* ldx11, float* x12,
18536                     lapack_int* ldx12, float* x21, lapack_int* ldx21,
18537                     float* x22, lapack_int* ldx22, float* theta,
18538                     float* phi, float* taup1, float* taup2,
18539                     float* tauq1, float* tauq2, float* work,
18540                     lapack_int* lwork , lapack_int *info );
18541 void LAPACK_sorcsd( char* jobu1, char* jobu2,
18542                     char* jobv1t, char* jobv2t, char* trans,
18543                     char* signs, lapack_int* m, lapack_int* p,
18544                     lapack_int* q, float* x11, lapack_int* ldx11,
18545                     float* x12, lapack_int* ldx12, float* x21,
18546                     lapack_int* ldx21, float* x22, lapack_int* ldx22,
18547                     float* theta, float* u1, lapack_int* ldu1,
18548                     float* u2, lapack_int* ldu2, float* v1t,
18549                     lapack_int* ldv1t, float* v2t, lapack_int* ldv2t,
18550                     float* work, lapack_int* lwork,
18551                     lapack_int* iwork , lapack_int *info );
18552 void LAPACK_sorcsd2by1( char* jobu1, char* jobu2,
18553                     char* jobv1t, lapack_int* m, lapack_int* p,
18554                     lapack_int* q, float* x11, lapack_int* ldx11,
18555                     float* x21, lapack_int* ldx21,
18556                     float* theta, float* u1, lapack_int* ldu1,
18557                     float* u2, lapack_int* ldu2, float* v1t,
18558                     lapack_int* ldv1t, float* work, lapack_int* lwork,
18559                     lapack_int* iwork , lapack_int *info );
18560 void LAPACK_ssyconv( char* uplo, char* way,
18561                      lapack_int* n, float* a, lapack_int* lda,
18562                      const lapack_int* ipiv, float* e , lapack_int *info );
18563 void LAPACK_ssyswapr( char* uplo, lapack_int* n, float* a,
18564                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18565 void LAPACK_ssytri2( char* uplo, lapack_int* n,
18566                      float* a, lapack_int* lda,
18567                      const lapack_int* ipiv,
18568                      float* work, lapack_int* lwork , lapack_int *info );
18569 void LAPACK_ssytri2x( char* uplo, lapack_int* n,
18570                       float* a, lapack_int* lda,
18571                       const lapack_int* ipiv, float* work,
18572                       lapack_int* nb , lapack_int *info );
18573 void LAPACK_ssytrs2( char* uplo, lapack_int* n,
18574                      lapack_int* nrhs, const float* a,
18575                      lapack_int* lda, const lapack_int* ipiv,
18576                      float* b, lapack_int* ldb, float* work , lapack_int *info );
18577 void LAPACK_zbbcsd( char* jobu1, char* jobu2,
18578                     char* jobv1t, char* jobv2t, char* trans,
18579                     lapack_int* m, lapack_int* p, lapack_int* q,
18580                     double* theta, double* phi,
18581                     lapack_complex_double* u1, lapack_int* ldu1,
18582                     lapack_complex_double* u2, lapack_int* ldu2,
18583                     lapack_complex_double* v1t, lapack_int* ldv1t,
18584                     lapack_complex_double* v2t, lapack_int* ldv2t,
18585                     double* b11d, double* b11e, double* b12d,
18586                     double* b12e, double* b21d, double* b21e,
18587                     double* b22d, double* b22e, double* rwork,
18588                     lapack_int* lrwork , lapack_int *info );
18589 void LAPACK_zheswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
18590                       lapack_int* lda, lapack_int* i1, lapack_int* i2 );
18591 void LAPACK_zhetri2( 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* lwork , lapack_int *info );
18595 void LAPACK_zhetri2x( char* uplo, lapack_int* n,
18596                       lapack_complex_double* a, lapack_int* lda,
18597                       const lapack_int* ipiv,
18598                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
18599 void LAPACK_zhetrs2( char* uplo, lapack_int* n,
18600                      lapack_int* nrhs,
18601                      const lapack_complex_double* a, lapack_int* lda,
18602                      const lapack_int* ipiv,
18603                      lapack_complex_double* b, lapack_int* ldb,
18604                      lapack_complex_double* work , lapack_int *info );
18605 void LAPACK_zsyconv( char* uplo, char* way,
18606                      lapack_int* n, lapack_complex_double* a,
18607                      lapack_int* lda, const lapack_int* ipiv,
18608                      lapack_complex_double* e , lapack_int *info );
18609 void LAPACK_zsyswapr( char* uplo, lapack_int* n, lapack_complex_double* a,
18610                       lapack_int* lda, lapack_int* i1,
18611                       lapack_int* i2 );
18612 void LAPACK_zsytri2( 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* lwork , lapack_int *info );
18616 void LAPACK_zsytri2x( char* uplo, lapack_int* n,
18617                       lapack_complex_double* a, lapack_int* lda,
18618                       const lapack_int* ipiv,
18619                       lapack_complex_double* work, lapack_int* nb , lapack_int *info );
18620 void LAPACK_zsytrs2( char* uplo, lapack_int* n,
18621                      lapack_int* nrhs,
18622                      const lapack_complex_double* a, lapack_int* lda,
18623                      const lapack_int* ipiv,
18624                      lapack_complex_double* b, lapack_int* ldb,
18625                      lapack_complex_double* work , lapack_int *info );
18626 void LAPACK_zunbdb( char* trans, char* signs,
18627                     lapack_int* m, lapack_int* p, lapack_int* q,
18628                     lapack_complex_double* x11, lapack_int* ldx11,
18629                     lapack_complex_double* x12, lapack_int* ldx12,
18630                     lapack_complex_double* x21, lapack_int* ldx21,
18631                     lapack_complex_double* x22, lapack_int* ldx22,
18632                     double* theta, double* phi,
18633                     lapack_complex_double* taup1,
18634                     lapack_complex_double* taup2,
18635                     lapack_complex_double* tauq1,
18636                     lapack_complex_double* tauq2,
18637                     lapack_complex_double* work, lapack_int* lwork , lapack_int *info );
18638 void LAPACK_zuncsd( char* jobu1, char* jobu2,
18639                     char* jobv1t, char* jobv2t, char* trans,
18640                     char* signs, lapack_int* m, lapack_int* p,
18641                     lapack_int* q, lapack_complex_double* x11,
18642                     lapack_int* ldx11, lapack_complex_double* x12,
18643                     lapack_int* ldx12, lapack_complex_double* x21,
18644                     lapack_int* ldx21, lapack_complex_double* x22,
18645                     lapack_int* ldx22, double* theta,
18646                     lapack_complex_double* u1, lapack_int* ldu1,
18647                     lapack_complex_double* u2, lapack_int* ldu2,
18648                     lapack_complex_double* v1t, lapack_int* ldv1t,
18649                     lapack_complex_double* v2t, lapack_int* ldv2t,
18650                     lapack_complex_double* work, lapack_int* lwork,
18651                     double* rwork, lapack_int* lrwork,
18652                     lapack_int* iwork , lapack_int *info );
18653 void LAPACK_zuncsd2by1( char* jobu1, char* jobu2,
18654                     char* jobv1t, lapack_int* m, lapack_int* p,
18655                     lapack_int* q, lapack_complex_double* x11,
18656                     lapack_int* ldx11, lapack_complex_double* x21,
18657                     lapack_int* ldx21, double* theta,
18658                     lapack_complex_double* u1, lapack_int* ldu1,
18659                     lapack_complex_double* u2, lapack_int* ldu2,
18660                     lapack_complex_double* v1t, lapack_int* ldv1t,
18661                     lapack_complex_double* work, lapack_int* lwork,
18662                     double* rwork, lapack_int* lrwork,
18663                     lapack_int* iwork , lapack_int *info );
18664 // LAPACK 3.4.0
18665 void LAPACK_sgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18666                      lapack_int* k, lapack_int* nb, const float* v,
18667                      lapack_int* ldv, const float* t, lapack_int* ldt, float* c,
18668                      lapack_int* ldc, float* work, lapack_int *info );
18669 void LAPACK_dgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18670                      lapack_int* k, lapack_int* nb, const double* v,
18671                      lapack_int* ldv, const double* t, lapack_int* ldt,
18672                      double* c, lapack_int* ldc, double* work,
18673                      lapack_int *info );
18674 void LAPACK_cgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18675                      lapack_int* k, lapack_int* nb,
18676                      const lapack_complex_float* v, lapack_int* ldv,
18677                      const lapack_complex_float* t, lapack_int* ldt,
18678                      lapack_complex_float* c, lapack_int* ldc,
18679                      lapack_complex_float* work, lapack_int *info );
18680 void LAPACK_zgemqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18681                      lapack_int* k, lapack_int* nb,
18682                      const lapack_complex_double* v, lapack_int* ldv,
18683                      const lapack_complex_double* t, lapack_int* ldt,
18684                      lapack_complex_double* c, lapack_int* ldc,
18685                      lapack_complex_double* work, lapack_int *info );
18686 void LAPACK_sgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, float* a,
18687                     lapack_int* lda, float* t, lapack_int* ldt, float* work,
18688                     lapack_int *info );
18689 void LAPACK_dgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb, double* a,
18690                     lapack_int* lda, double* t, lapack_int* ldt, double* work,
18691                     lapack_int *info );
18692 void LAPACK_cgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
18693                     lapack_complex_float* a, lapack_int* lda,
18694                     lapack_complex_float* t, lapack_int* ldt,
18695                     lapack_complex_float* work, lapack_int *info );
18696 void LAPACK_zgeqrt( lapack_int* m, lapack_int* n, lapack_int* nb,
18697                     lapack_complex_double* a, lapack_int* lda,
18698                     lapack_complex_double* t, lapack_int* ldt,
18699                     lapack_complex_double* work, lapack_int *info );
18700 void LAPACK_sgeqrt2( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18701                      float* t, lapack_int* ldt, lapack_int *info );
18702 void LAPACK_dgeqrt2( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18703                      double* t, lapack_int* ldt, lapack_int *info );
18704 void LAPACK_cgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18705                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
18706                      lapack_int *info );
18707 void LAPACK_zgeqrt2( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18708                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
18709                      lapack_int *info );
18710 void LAPACK_sgeqrt3( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
18711                      float* t, lapack_int* ldt, lapack_int *info );
18712 void LAPACK_dgeqrt3( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
18713                      double* t, lapack_int* ldt, lapack_int *info );
18714 void LAPACK_cgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_float* a,
18715                      lapack_int* lda, lapack_complex_float* t, lapack_int* ldt,
18716                      lapack_int *info );
18717 void LAPACK_zgeqrt3( lapack_int* m, lapack_int* n, lapack_complex_double* a,
18718                      lapack_int* lda, lapack_complex_double* t, lapack_int* ldt,
18719                      lapack_int *info );
18720 void LAPACK_stpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18721                      lapack_int* k, lapack_int* l, lapack_int* nb,
18722                      const float* v, lapack_int* ldv, const float* t,
18723                      lapack_int* ldt, float* a, lapack_int* lda, float* b,
18724                      lapack_int* ldb, float* work, lapack_int *info );
18725 void LAPACK_dtpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18726                      lapack_int* k, lapack_int* l, lapack_int* nb,
18727                      const double* v, lapack_int* ldv, const double* t,
18728                      lapack_int* ldt, double* a, lapack_int* lda, double* b,
18729                      lapack_int* ldb, double* work, lapack_int *info );
18730 void LAPACK_ctpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18731                      lapack_int* k, lapack_int* l, lapack_int* nb,
18732                      const lapack_complex_float* v, lapack_int* ldv,
18733                      const lapack_complex_float* t, lapack_int* ldt,
18734                      lapack_complex_float* a, lapack_int* lda,
18735                      lapack_complex_float* b, lapack_int* ldb,
18736                      lapack_complex_float* work, lapack_int *info );
18737 void LAPACK_ztpmqrt( char* side, char* trans, lapack_int* m, lapack_int* n,
18738                      lapack_int* k, lapack_int* l, lapack_int* nb,
18739                      const lapack_complex_double* v, lapack_int* ldv,
18740                      const lapack_complex_double* t, lapack_int* ldt,
18741                      lapack_complex_double* a, lapack_int* lda,
18742                      lapack_complex_double* b, lapack_int* ldb,
18743                      lapack_complex_double* work, lapack_int *info );
18744 void LAPACK_stpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18745                     float* a, lapack_int* lda, float* b, lapack_int* ldb,
18746                     float* t, lapack_int* ldt, float* work, lapack_int *info );
18747 void LAPACK_dtpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18748                     double* a, lapack_int* lda, double* b, lapack_int* ldb,
18749                     double* t, lapack_int* ldt, double* work,
18750                     lapack_int *info );
18751 void LAPACK_ctpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18752                     lapack_complex_float* a, lapack_int* lda,
18753                     lapack_complex_float* b, lapack_int* ldb,
18754                     lapack_complex_float* t, lapack_int* ldt,
18755                     lapack_complex_float* work, lapack_int *info );
18756 void LAPACK_ztpqrt( lapack_int* m, lapack_int* n, lapack_int* l, lapack_int* nb,
18757                     lapack_complex_double* a, lapack_int* lda,
18758                     lapack_complex_double* b, lapack_int* ldb,
18759                     lapack_complex_double* t, lapack_int* ldt,
18760                     lapack_complex_double* work, lapack_int *info );
18761 void LAPACK_stpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18762                      float* a, lapack_int* lda,
18763                      float* b, lapack_int* ldb,
18764                      float* t, lapack_int* ldt,
18765                      lapack_int *info );
18766 void LAPACK_dtpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18767                      double* a, lapack_int* lda,
18768                      double* b, lapack_int* ldb,
18769                      double* t, lapack_int* ldt,
18770                      lapack_int *info );
18771 void LAPACK_ctpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18772                      lapack_complex_float* a, lapack_int* lda,
18773                      lapack_complex_float* b, lapack_int* ldb,
18774                      lapack_complex_float* t, lapack_int* ldt,
18775                      lapack_int *info );
18776 void LAPACK_ztpqrt2( lapack_int* m, lapack_int* n, lapack_int* l,
18777                      lapack_complex_double* a, lapack_int* lda,
18778                      lapack_complex_double* b, lapack_int* ldb,
18779                      lapack_complex_double* t, lapack_int* ldt,
18780                      lapack_int *info );
18781 void LAPACK_stprfb( char* side, char* trans, char* direct, char* storev,
18782                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18783                     const float* v, lapack_int* ldv, const float* t,
18784                     lapack_int* ldt, float* a, lapack_int* lda, float* b,
18785                     lapack_int* ldb, const float* work,
18786                     lapack_int* ldwork );
18787 void LAPACK_dtprfb( char* side, char* trans, char* direct, char* storev,
18788                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18789                     const double* v, lapack_int* ldv, const double* t,
18790                     lapack_int* ldt, double* a, lapack_int* lda, double* b,
18791                     lapack_int* ldb, const double* work,
18792                     lapack_int* ldwork );
18793 void LAPACK_ctprfb( char* side, char* trans, char* direct, char* storev,
18794                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18795                     const lapack_complex_float* v, lapack_int* ldv,
18796                     const lapack_complex_float* t, lapack_int* ldt,
18797                     lapack_complex_float* a, lapack_int* lda,
18798                     lapack_complex_float* b, lapack_int* ldb,
18799                     lapack_complex_float* work, lapack_int* ldwork );
18800 void LAPACK_ztprfb( char* side, char* trans, char* direct, char* storev,
18801                     lapack_int* m, lapack_int* n, lapack_int* k, lapack_int* l,
18802                     const lapack_complex_double* v, lapack_int* ldv,
18803                     const lapack_complex_double* t, lapack_int* ldt,
18804                     lapack_complex_double* a, lapack_int* lda,
18805                     lapack_complex_double* b, lapack_int* ldb,
18806                     lapack_complex_double* work, lapack_int* ldwork );
18807 // LAPACK 3.5.0
18808 void LAPACK_ssysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18809                         lapack_int* lda, lapack_int* ipiv, float* b,
18810                         lapack_int* ldb, float* work, lapack_int* lwork,
18811                         lapack_int *info );
18812 void LAPACK_ssytrf_rook( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18813                     lapack_int* ipiv, float* work, lapack_int* lwork,
18814                     lapack_int *info );
18815 void LAPACK_dsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18816                         lapack_int* lda, lapack_int* ipiv, double* b,
18817                         lapack_int* ldb, double* work, lapack_int* lwork,
18818                         lapack_int *info );
18819 void LAPACK_dsytrf_rook( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18820                     lapack_int* ipiv, double* work, lapack_int* lwork,
18821                     lapack_int *info );
18822 void LAPACK_csysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18823                         lapack_complex_float* a, lapack_int* lda,
18824                         lapack_int* ipiv, lapack_complex_float* b,
18825                         lapack_int* ldb, lapack_complex_float* work,
18826                         lapack_int* lwork, lapack_int *info );
18827 void LAPACK_csytrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
18828                     lapack_int* lda, lapack_int* ipiv,
18829                     lapack_complex_float* work, lapack_int* lwork,
18830                     lapack_int *info );
18831 void LAPACK_zsysv_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18832                         lapack_complex_double* a, lapack_int* lda,
18833                         lapack_int* ipiv, lapack_complex_double* b,
18834                         lapack_int* ldb, lapack_complex_double* work,
18835                         lapack_int* lwork, lapack_int *info );
18836 void LAPACK_zsytrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
18837                     lapack_int* lda, lapack_int* ipiv,
18838                     lapack_complex_double* work, lapack_int* lwork,
18839                     lapack_int *info );
18840 void LAPACK_ssytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs, const float* a,
18841                     lapack_int* lda, const lapack_int* ipiv, float* b,
18842                     lapack_int* ldb, lapack_int *info );
18843 void LAPACK_dsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18844                     const double* a, lapack_int* lda, const lapack_int* ipiv,
18845                     double* b, lapack_int* ldb, lapack_int *info );
18846 void LAPACK_csytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18847                     const lapack_complex_float* a, lapack_int* lda,
18848                     const lapack_int* ipiv, lapack_complex_float* b,
18849                     lapack_int* ldb, lapack_int *info );
18850 void LAPACK_zsytrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18851                     const lapack_complex_double* a, lapack_int* lda,
18852                     const lapack_int* ipiv, lapack_complex_double* b,
18853                     lapack_int* ldb, lapack_int *info );
18854 void LAPACK_chetrf_rook( char* uplo, lapack_int* n, lapack_complex_float* a,
18855                     lapack_int* lda, lapack_int* ipiv,
18856                     lapack_complex_float* work, lapack_int* lwork,
18857                     lapack_int *info );
18858 void LAPACK_zhetrf_rook( char* uplo, lapack_int* n, lapack_complex_double* a,
18859                     lapack_int* lda, lapack_int* ipiv,
18860                     lapack_complex_double* work, lapack_int* lwork,
18861                     lapack_int *info );
18862 void LAPACK_chetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18863                     const lapack_complex_float* a, lapack_int* lda,
18864                     const lapack_int* ipiv, lapack_complex_float* b,
18865                     lapack_int* ldb, lapack_int *info );
18866 void LAPACK_zhetrs_rook( char* uplo, lapack_int* n, lapack_int* nrhs,
18867                     const lapack_complex_double* a, lapack_int* lda,
18868                     const lapack_int* ipiv, lapack_complex_double* b,
18869                     lapack_int* ldb, lapack_int *info );
18870
18871 void LAPACK_csyr( char* uplo, lapack_int* n, lapack_complex_float* alpha,
18872                       const lapack_complex_float* x, lapack_int* incx,
18873                       lapack_complex_float* a, lapack_int* lda );
18874 void LAPACK_zsyr( char* uplo, lapack_int* n, lapack_complex_double* alpha,
18875                       const lapack_complex_double* x, lapack_int* incx,
18876                       lapack_complex_double* a, lapack_int* lda );
18877 void LAPACK_ilaver( const lapack_int* vers_major, const lapack_int* vers_minor,
18878                      const lapack_int* vers_patch );
18879
18880 // LAPACK 3.7.0
18881 void LAPACK_ssysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18882                    lapack_int* lda, lapack_int* ipiv, float* b, lapack_int* ldb,
18883                    float* work, lapack_int* lwork, lapack_int *info );
18884 void LAPACK_dsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18885                    lapack_int* lda, lapack_int* ipiv, double* b,
18886                    lapack_int* ldb, double* work, lapack_int* lwork,
18887                    lapack_int *info );
18888 void LAPACK_csysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18889                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
18890                    lapack_complex_float* b, lapack_int* ldb,
18891                    lapack_complex_float* work, lapack_int* lwork,
18892                    lapack_int *info );
18893 void LAPACK_zsysv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18894                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
18895                    lapack_complex_double* b, lapack_int* ldb,
18896                    lapack_complex_double* work, lapack_int* lwork,
18897                    lapack_int *info );
18898 void LAPACK_chesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18899                    lapack_complex_float* a, lapack_int* lda, lapack_int* ipiv,
18900                    lapack_complex_float* b, lapack_int* ldb,
18901                    lapack_complex_float* work, lapack_int* lwork,
18902                    lapack_int *info );
18903 void LAPACK_zhesv_aa( char* uplo, lapack_int* n, lapack_int* nrhs,
18904                    lapack_complex_double* a, lapack_int* lda, lapack_int* ipiv,
18905                    lapack_complex_double* b, lapack_int* ldb,
18906                    lapack_complex_double* work, lapack_int* lwork,
18907                    lapack_int *info );
18908
18909 void LAPACK_ssytrf_aa( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18910                     lapack_int* ipiv, float* work, lapack_int* lwork,
18911                     lapack_int *info );
18912 void LAPACK_dsytrf_aa( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18913                     lapack_int* ipiv, double* work, lapack_int* lwork,
18914                     lapack_int *info );
18915 void LAPACK_csytrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
18916                     lapack_int* lda, lapack_int* ipiv,
18917                     lapack_complex_float* work, lapack_int* lwork,
18918                     lapack_int *info );
18919 void LAPACK_zsytrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
18920                     lapack_int* lda, lapack_int* ipiv,
18921                     lapack_complex_double* work, lapack_int* lwork,
18922                     lapack_int *info );
18923 void LAPACK_chetrf_aa( char* uplo, lapack_int* n, lapack_complex_float* a,
18924                     lapack_int* lda, lapack_int* ipiv,
18925                     lapack_complex_float* work, lapack_int* lwork,
18926                     lapack_int *info );
18927 void LAPACK_zhetrf_aa( char* uplo, lapack_int* n, lapack_complex_double* a,
18928                     lapack_int* lda, lapack_int* ipiv,
18929                     lapack_complex_double* work, lapack_int* lwork,
18930                     lapack_int *info );
18931
18932 void LAPACK_ssytrs_aa( char* uplo, lapack_int* n,
18933                      lapack_int* nrhs, const float* a,
18934                      lapack_int* lda, const lapack_int* ipiv,
18935                      float* b, lapack_int* ldb, float* work, lapack_int* lwork, lapack_int *info );
18936 void LAPACK_dsytrs_aa( char* uplo, lapack_int* n,
18937                      lapack_int* nrhs, const double* a,
18938                      lapack_int* lda, const lapack_int* ipiv,
18939                      double* b, lapack_int* ldb, double* work, lapack_int* lwork,  lapack_int *info );
18940 void LAPACK_csytrs_aa( char* uplo, lapack_int* n,
18941                      lapack_int* nrhs, const lapack_complex_float* a,
18942                      lapack_int* lda, const lapack_int* ipiv,
18943                      lapack_complex_float* b, lapack_int* ldb,
18944                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
18945 void LAPACK_zsytrs_aa( char* uplo, lapack_int* n,
18946                      lapack_int* nrhs,
18947                      const lapack_complex_double* a, lapack_int* lda,
18948                      const lapack_int* ipiv,
18949                      lapack_complex_double* b, lapack_int* ldb,
18950                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18951 void LAPACK_chetrs_aa( char* uplo, lapack_int* n,
18952                      lapack_int* nrhs, const lapack_complex_float* a,
18953                      lapack_int* lda, const lapack_int* ipiv,
18954                      lapack_complex_float* b, lapack_int* ldb,
18955                      lapack_complex_float* work , lapack_int* lwork, lapack_int *info );
18956 void LAPACK_zhetrs_aa( char* uplo, lapack_int* n,
18957                      lapack_int* nrhs,
18958                      const lapack_complex_double* a, lapack_int* lda,
18959                      const lapack_int* ipiv,
18960                      lapack_complex_double* b, lapack_int* ldb,
18961                      lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
18962
18963 void LAPACK_ssysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, float* a,
18964                    lapack_int* lda, float* e, lapack_int* ipiv, float* b, lapack_int* ldb,
18965                    float* work, lapack_int* lwork, lapack_int *info );
18966 void LAPACK_dsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
18967                    lapack_int* lda, double* e, lapack_int* ipiv, double* b,
18968                    lapack_int* ldb, double* work, lapack_int* lwork,
18969                    lapack_int *info );
18970 void LAPACK_csysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18971                    lapack_complex_float* a, lapack_int* lda,
18972                    lapack_complex_float* e, lapack_int* ipiv,
18973                    lapack_complex_float* b, lapack_int* ldb,
18974                    lapack_complex_float* work, lapack_int* lwork,
18975                    lapack_int *info );
18976 void LAPACK_zsysv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18977                    lapack_complex_double* a, lapack_int* lda,
18978                    lapack_complex_double* e, lapack_int* ipiv,
18979                    lapack_complex_double* b, lapack_int* ldb,
18980                    lapack_complex_double* work, lapack_int* lwork,
18981                    lapack_int *info );
18982 void LAPACK_chesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18983                    lapack_complex_float* a, lapack_int* lda,
18984                    lapack_complex_float* e, lapack_int* ipiv,
18985                    lapack_complex_float* b, lapack_int* ldb,
18986                    lapack_complex_float* work, lapack_int* lwork,
18987                    lapack_int *info );
18988 void LAPACK_zhesv_rk( char* uplo, lapack_int* n, lapack_int* nrhs,
18989                    lapack_complex_double* a, lapack_int* lda,
18990                    lapack_complex_double* e, lapack_int* ipiv,
18991                    lapack_complex_double* b, lapack_int* ldb,
18992                    lapack_complex_double* work, lapack_int* lwork,
18993                    lapack_int *info );
18994
18995 void LAPACK_ssytrf_rk( char* uplo, lapack_int* n, float* a, lapack_int* lda,
18996                     float* e, lapack_int* ipiv, float* work, lapack_int* lwork,
18997                     lapack_int *info );
18998 void LAPACK_dsytrf_rk( char* uplo, lapack_int* n, double* a, lapack_int* lda,
18999                     double* e, lapack_int* ipiv, double* work, lapack_int* lwork,
19000                     lapack_int *info );
19001 void LAPACK_csytrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
19002                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
19003                     lapack_complex_float* work, lapack_int* lwork,
19004                     lapack_int *info );
19005 void LAPACK_zsytrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
19006                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
19007                     lapack_complex_double* work, lapack_int* lwork,
19008                     lapack_int *info );
19009 void LAPACK_chetrf_rk( char* uplo, lapack_int* n, lapack_complex_float* a,
19010                     lapack_int* lda, lapack_complex_float* e, lapack_int* ipiv,
19011                     lapack_complex_float* work, lapack_int* lwork,
19012                     lapack_int *info );
19013 void LAPACK_zhetrf_rk( char* uplo, lapack_int* n, lapack_complex_double* a,
19014                     lapack_int* lda, lapack_complex_double* e, lapack_int* ipiv,
19015                     lapack_complex_double* work, lapack_int* lwork,
19016                     lapack_int *info );
19017
19018 void LAPACK_ssytrs_3( char* uplo, lapack_int* n,
19019                      lapack_int* nrhs, const float* a,
19020                      lapack_int* lda, const float* e, const lapack_int* ipiv,
19021                      float* b, lapack_int* ldb, lapack_int *info );
19022 void LAPACK_dsytrs_3( char* uplo, lapack_int* n,
19023                      lapack_int* nrhs, const double* a,
19024                      lapack_int* lda, const double* e, const lapack_int* ipiv,
19025                      double* b, lapack_int* ldb, lapack_int *info );
19026 void LAPACK_csytrs_3( char* uplo, lapack_int* n,
19027                      lapack_int* nrhs, const lapack_complex_float* a,
19028                      lapack_int* lda, const lapack_complex_float* e,
19029                      const lapack_int* ipiv,
19030                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
19031 void LAPACK_zsytrs_3( char* uplo, lapack_int* n,
19032                      lapack_int* nrhs,
19033                      const lapack_complex_double* a, lapack_int* lda,
19034                      const lapack_complex_double* e, const lapack_int* ipiv,
19035                      lapack_complex_double* b, lapack_int* ldb, lapack_int *info );
19036 void LAPACK_chetrs_3( char* uplo, lapack_int* n,
19037                      lapack_int* nrhs, const lapack_complex_float* a,
19038                      lapack_int* lda, const lapack_complex_float* e,
19039                      const lapack_int* ipiv,
19040                      lapack_complex_float* b, lapack_int* ldb, lapack_int *info );
19041 void LAPACK_zhetrs_3( char* uplo, lapack_int* n,
19042                      lapack_int* nrhs,
19043                      const lapack_complex_double* a, lapack_int* lda,
19044                      const lapack_complex_double* e,
19045                      const lapack_int* ipiv,
19046                      lapack_complex_double* b, lapack_int* ldb,  lapack_int *info );
19047
19048 void LAPACK_ssytri_3( char* uplo, lapack_int* n, float* a, lapack_int* lda, const float* e,
19049                     const lapack_int* ipiv, float* work, lapack_int* lwork, lapack_int *info );
19050 void LAPACK_dsytri_3( char* uplo, lapack_int* n, double* a, lapack_int* lda, const double* e,
19051                     const lapack_int* ipiv, double* work, lapack_int* lwork, lapack_int *info );
19052 void LAPACK_csytri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
19053                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
19054                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
19055 void LAPACK_zsytri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
19056                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
19057                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
19058 void LAPACK_chetri_3( char* uplo, lapack_int* n, lapack_complex_float* a,
19059                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv,
19060                     lapack_complex_float* work, lapack_int* lwork, lapack_int *info );
19061 void LAPACK_zhetri_3( char* uplo, lapack_int* n, lapack_complex_double* a,
19062                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv,
19063                     lapack_complex_double* work, lapack_int* lwork, lapack_int *info );
19064
19065 void LAPACK_ssycon_3( char* uplo, lapack_int* n, const float* a, lapack_int* lda, const float* e,
19066                     const lapack_int* ipiv, float* anorm, float* rcond,
19067                     float* work, lapack_int* iwork, lapack_int *info );
19068 void LAPACK_dsycon_3( char* uplo, lapack_int* n, const double* a, lapack_int* lda, const double* e,
19069                     const lapack_int* ipiv, double* anorm, double* rcond,
19070                     double* work, lapack_int* iwork, lapack_int *info );
19071 void LAPACK_csycon_3( char* uplo, lapack_int* n, const lapack_complex_float* a,
19072                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv, float* anorm,
19073                     float* rcond, lapack_complex_float* work,
19074                     lapack_int *info );
19075 void LAPACK_zsycon_3( char* uplo, lapack_int* n, const lapack_complex_double* a,
19076                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv, double* anorm,
19077                     double* rcond, lapack_complex_double* work,
19078                     lapack_int *info );
19079 void LAPACK_checon_3( char* uplo, lapack_int* n, const lapack_complex_float* a,
19080                     lapack_int* lda, const lapack_complex_float* e, const lapack_int* ipiv, float* anorm,
19081                     float* rcond, lapack_complex_float* work,
19082                     lapack_int *info );
19083 void LAPACK_zhecon_3( char* uplo, lapack_int* n, const lapack_complex_double* a,
19084                     lapack_int* lda, const lapack_complex_double* e, const lapack_int* ipiv, double* anorm,
19085                     double* rcond, lapack_complex_double* work,
19086                     lapack_int *info );
19087
19088 void LAPACK_sgelq( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
19089                    float* t, lapack_int* tsize, float* work, lapack_int* lwork,
19090                    lapack_int* info );
19091 void LAPACK_dgelq( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
19092                    double* t, lapack_int* tsize, double* work, lapack_int* lwork,
19093                    lapack_int* info );
19094 void LAPACK_cgelq( lapack_int* m, lapack_int* n, lapack_complex_float* a, lapack_int* lda,
19095                    lapack_complex_float* t, lapack_int* tsize, lapack_complex_float* work, lapack_int* lwork,
19096                    lapack_int* info );
19097 void LAPACK_zgelq( lapack_int* m, lapack_int* n, lapack_complex_double* a, lapack_int* lda,
19098                    lapack_complex_double* t, lapack_int* tsize, lapack_complex_double* work, lapack_int* lwork,
19099                    lapack_int* info );
19100
19101 void LAPACK_sgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19102                     const float* a, lapack_int* lda,
19103                     const float* t, lapack_int* tsize,
19104                     float* c, lapack_int* ldc,
19105                     float* work, lapack_int* lwork,
19106                     lapack_int* info );
19107 void LAPACK_dgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19108                     const double* a, lapack_int* lda,
19109                     const double* t, lapack_int* tsize,
19110                     double* c, lapack_int* ldc,
19111                     double* work, lapack_int* lwork,
19112                     lapack_int* info );
19113 void LAPACK_cgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19114                     const lapack_complex_float* a, lapack_int* lda,
19115                     const lapack_complex_float* t, lapack_int* tsize,
19116                     lapack_complex_float* c, lapack_int* ldc,
19117                     lapack_complex_float* work, lapack_int* lwork,
19118                     lapack_int* info );
19119 void LAPACK_zgemlq( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19120                     const lapack_complex_double* a, lapack_int* lda,
19121                     const lapack_complex_double* t, lapack_int* tsize,
19122                     lapack_complex_double* c, lapack_int* ldc,
19123                     lapack_complex_double* work, lapack_int* lwork,
19124                     lapack_int* info );
19125
19126 void LAPACK_sgeqr( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
19127                    float* t, lapack_int* tsize, float* work, lapack_int* lwork,
19128                    lapack_int* info );
19129 void LAPACK_dgeqr( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
19130                    double* t, lapack_int* tsize, double* work, lapack_int* lwork,
19131                    lapack_int* info );
19132 void LAPACK_cgeqr( lapack_int* m, lapack_int* n, lapack_complex_float* a, lapack_int* lda,
19133                    lapack_complex_float* t, lapack_int* tsize, lapack_complex_float* work, lapack_int* lwork,
19134                    lapack_int* info );
19135 void LAPACK_zgeqr( lapack_int* m, lapack_int* n, lapack_complex_double* a, lapack_int* lda,
19136                    lapack_complex_double* t, lapack_int* tsize, lapack_complex_double* work, lapack_int* lwork,
19137                    lapack_int* info );
19138
19139 void LAPACK_sgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19140                     const float* a, lapack_int* lda,
19141                     const float* t, lapack_int* tsize,
19142                     float* c, lapack_int* ldc,
19143                     float* work, lapack_int* lwork,
19144                     lapack_int* info );
19145 void LAPACK_dgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19146                     const double* a, lapack_int* lda,
19147                     const double* t, lapack_int* tsize,
19148                     double* c, lapack_int* ldc,
19149                     double* work, lapack_int* lwork,
19150                     lapack_int* info );
19151 void LAPACK_cgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19152                     const lapack_complex_float* a, lapack_int* lda,
19153                     const lapack_complex_float* t, lapack_int* tsize,
19154                     lapack_complex_float* c, lapack_int* ldc,
19155                     lapack_complex_float* work, lapack_int* lwork,
19156                     lapack_int* info );
19157 void LAPACK_zgemqr( char* side, char* trans, lapack_int* m, lapack_int* n, lapack_int* k,
19158                     const lapack_complex_double* a, lapack_int* lda,
19159                     const lapack_complex_double* t, lapack_int* tsize,
19160                     lapack_complex_double* c, lapack_int* ldc,
19161                     lapack_complex_double* work, lapack_int* lwork,
19162                     lapack_int* info );
19163
19164 void LAPACK_sgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19165                      float* a, lapack_int* lda, float* b, lapack_int* ldb,
19166                      float* work, lapack_int* lwork, lapack_int *info );
19167 void LAPACK_dgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19168                      double* a, lapack_int* lda, double* b, lapack_int* ldb,
19169                      double* work, lapack_int* lwork, lapack_int *info );
19170 void LAPACK_cgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19171                      lapack_complex_float* a, lapack_int* lda,
19172                      lapack_complex_float* b, lapack_int* ldb,
19173                      lapack_complex_float* work, lapack_int* lwork,
19174                      lapack_int *info );
19175 void LAPACK_zgetsls( char* trans, lapack_int* m, lapack_int* n, lapack_int* nrhs,
19176                      lapack_complex_double* a, lapack_int* lda,
19177                      lapack_complex_double* b, lapack_int* ldb,
19178                      lapack_complex_double* work, lapack_int* lwork,
19179                      lapack_int *info );
19180
19181 void LAPACK_ssyev_2stage( char* jobz, char* uplo, lapack_int* n, float* a,
19182                    lapack_int* lda, float* w, float* work, lapack_int* lwork,
19183                    lapack_int *info );
19184 void LAPACK_dsyev_2stage( char* jobz, char* uplo, lapack_int* n, double* a,
19185                    lapack_int* lda, double* w, double* work, lapack_int* lwork,
19186                    lapack_int *info );
19187 void LAPACK_cheev_2stage( char* jobz, char* uplo, lapack_int* n,
19188                    lapack_complex_float* a, lapack_int* lda, float* w,
19189                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
19190                    lapack_int *info );
19191 void LAPACK_zheev_2stage( char* jobz, char* uplo, lapack_int* n,
19192                    lapack_complex_double* a, lapack_int* lda, double* w,
19193                    lapack_complex_double* work, lapack_int* lwork,
19194                    double* rwork, lapack_int *info );
19195 void LAPACK_ssyevd_2stage( char* jobz, char* uplo, lapack_int* n, float* a,
19196                     lapack_int* lda, float* w, float* work, lapack_int* lwork,
19197                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19198 void LAPACK_dsyevd_2stage( char* jobz, char* uplo, lapack_int* n, double* a,
19199                     lapack_int* lda, double* w, double* work, lapack_int* lwork,
19200                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19201 void LAPACK_cheevd_2stage( char* jobz, char* uplo, lapack_int* n,
19202                     lapack_complex_float* a, lapack_int* lda, float* w,
19203                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19204                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19205                     lapack_int *info );
19206 void LAPACK_zheevd_2stage( char* jobz, char* uplo, lapack_int* n,
19207                     lapack_complex_double* a, lapack_int* lda, double* w,
19208                     lapack_complex_double* work, lapack_int* lwork,
19209                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19210                     lapack_int* liwork, lapack_int *info );
19211 void LAPACK_ssyevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19212                     float* a, lapack_int* lda, float* vl, float* vu,
19213                     lapack_int* il, lapack_int* iu, float* abstol,
19214                     lapack_int* m, float* w, float* z, lapack_int* ldz,
19215                     float* work, lapack_int* lwork, lapack_int* iwork,
19216                     lapack_int* ifail, lapack_int *info );
19217 void LAPACK_dsyevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19218                     double* a, lapack_int* lda, double* vl, double* vu,
19219                     lapack_int* il, lapack_int* iu, double* abstol,
19220                     lapack_int* m, double* w, double* z, lapack_int* ldz,
19221                     double* work, lapack_int* lwork, lapack_int* iwork,
19222                     lapack_int* ifail, lapack_int *info );
19223 void LAPACK_cheevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19224                     lapack_complex_float* a, lapack_int* lda, float* vl,
19225                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19226                     lapack_int* m, float* w, lapack_complex_float* z,
19227                     lapack_int* ldz, lapack_complex_float* work,
19228                     lapack_int* lwork, float* rwork, lapack_int* iwork,
19229                     lapack_int* ifail, lapack_int *info );
19230 void LAPACK_zheevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19231                     lapack_complex_double* a, lapack_int* lda, double* vl,
19232                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19233                     lapack_int* m, double* w, lapack_complex_double* z,
19234                     lapack_int* ldz, lapack_complex_double* work,
19235                     lapack_int* lwork, double* rwork, lapack_int* iwork,
19236                     lapack_int* ifail, lapack_int *info );
19237 void LAPACK_ssyevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19238                     float* a, lapack_int* lda, float* vl, float* vu,
19239                     lapack_int* il, lapack_int* iu, float* abstol,
19240                     lapack_int* m, float* w, float* z, lapack_int* ldz,
19241                     lapack_int* isuppz, float* work, lapack_int* lwork,
19242                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19243 void LAPACK_dsyevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19244                     double* a, lapack_int* lda, double* vl, double* vu,
19245                     lapack_int* il, lapack_int* iu, double* abstol,
19246                     lapack_int* m, double* w, double* z, lapack_int* ldz,
19247                     lapack_int* isuppz, double* work, lapack_int* lwork,
19248                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19249 void LAPACK_cheevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19250                     lapack_complex_float* a, lapack_int* lda, float* vl,
19251                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19252                     lapack_int* m, float* w, lapack_complex_float* z,
19253                     lapack_int* ldz, lapack_int* isuppz,
19254                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19255                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19256                     lapack_int *info );
19257 void LAPACK_zheevr_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19258                     lapack_complex_double* a, lapack_int* lda, double* vl,
19259                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19260                     lapack_int* m, double* w, lapack_complex_double* z,
19261                     lapack_int* ldz, lapack_int* isuppz,
19262                     lapack_complex_double* work, lapack_int* lwork,
19263                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19264                     lapack_int* liwork, lapack_int *info );
19265 void LAPACK_ssbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19266                    float* ab, lapack_int* ldab, float* w, float* z,
19267                    lapack_int* ldz, float* work, lapack_int* lwork, lapack_int *info );
19268 void LAPACK_dsbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19269                    double* ab, lapack_int* ldab, double* w, double* z,
19270                    lapack_int* ldz, double* work, lapack_int* lwork, lapack_int *info );
19271 void LAPACK_chbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19272                    lapack_complex_float* ab, lapack_int* ldab, float* w,
19273                    lapack_complex_float* z, lapack_int* ldz,
19274                    lapack_complex_float* work, lapack_int* lwork, float* rwork, lapack_int *info );
19275 void LAPACK_zhbev_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19276                    lapack_complex_double* ab, lapack_int* ldab, double* w,
19277                    lapack_complex_double* z, lapack_int* ldz,
19278                    lapack_complex_double* work, lapack_int* lwork, double* rwork,
19279                    lapack_int *info );
19280 void LAPACK_ssbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19281                     float* ab, lapack_int* ldab, float* w, float* z,
19282                     lapack_int* ldz, float* work, lapack_int* lwork,
19283                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19284 void LAPACK_dsbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19285                     double* ab, lapack_int* ldab, double* w, double* z,
19286                     lapack_int* ldz, double* work, lapack_int* lwork,
19287                     lapack_int* iwork, lapack_int* liwork, lapack_int *info );
19288 void LAPACK_chbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19289                     lapack_complex_float* ab, lapack_int* ldab, float* w,
19290                     lapack_complex_float* z, lapack_int* ldz,
19291                     lapack_complex_float* work, lapack_int* lwork, float* rwork,
19292                     lapack_int* lrwork, lapack_int* iwork, lapack_int* liwork,
19293                     lapack_int *info );
19294 void LAPACK_zhbevd_2stage( char* jobz, char* uplo, lapack_int* n, lapack_int* kd,
19295                     lapack_complex_double* ab, lapack_int* ldab, double* w,
19296                     lapack_complex_double* z, lapack_int* ldz,
19297                     lapack_complex_double* work, lapack_int* lwork,
19298                     double* rwork, lapack_int* lrwork, lapack_int* iwork,
19299                     lapack_int* liwork, lapack_int *info );
19300 void LAPACK_ssbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19301                     lapack_int* kd, float* ab, lapack_int* ldab, float* q,
19302                     lapack_int* ldq, float* vl, float* vu, lapack_int* il,
19303                     lapack_int* iu, float* abstol, lapack_int* m, float* w,
19304                     float* z, lapack_int* ldz, float* work, lapack_int* lwork, lapack_int* iwork,
19305                     lapack_int* ifail, lapack_int *info );
19306 void LAPACK_dsbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19307                     lapack_int* kd, double* ab, lapack_int* ldab, double* q,
19308                     lapack_int* ldq, double* vl, double* vu, lapack_int* il,
19309                     lapack_int* iu, double* abstol, lapack_int* m, double* w,
19310                     double* z, lapack_int* ldz, double* work, lapack_int* lwork, lapack_int* iwork,
19311                     lapack_int* ifail, lapack_int *info );
19312 void LAPACK_chbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19313                     lapack_int* kd, lapack_complex_float* ab, lapack_int* ldab,
19314                     lapack_complex_float* q, lapack_int* ldq, float* vl,
19315                     float* vu, lapack_int* il, lapack_int* iu, float* abstol,
19316                     lapack_int* m, float* w, lapack_complex_float* z,
19317                     lapack_int* ldz, lapack_complex_float* work, lapack_int* lwork, float* rwork,
19318                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
19319 void LAPACK_zhbevx_2stage( char* jobz, char* range, char* uplo, lapack_int* n,
19320                     lapack_int* kd, lapack_complex_double* ab, lapack_int* ldab,
19321                     lapack_complex_double* q, lapack_int* ldq, double* vl,
19322                     double* vu, lapack_int* il, lapack_int* iu, double* abstol,
19323                     lapack_int* m, double* w, lapack_complex_double* z,
19324                     lapack_int* ldz, lapack_complex_double* work, lapack_int* lwork, double* rwork,
19325                     lapack_int* iwork, lapack_int* ifail, lapack_int *info );
19326 void LAPACK_ssygv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19327                    float* a, lapack_int* lda, float* b, lapack_int* ldb,
19328                    float* w, float* work, lapack_int* lwork, lapack_int *info );
19329 void LAPACK_dsygv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19330                    double* a, lapack_int* lda, double* b, lapack_int* ldb,
19331                    double* w, double* work, lapack_int* lwork,
19332                    lapack_int *info );
19333 void LAPACK_chegv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19334                    lapack_complex_float* a, lapack_int* lda,
19335                    lapack_complex_float* b, lapack_int* ldb, float* w,
19336                    lapack_complex_float* work, lapack_int* lwork, float* rwork,
19337                    lapack_int *info );
19338 void LAPACK_zhegv_2stage( lapack_int* itype, char* jobz, char* uplo, lapack_int* n,
19339                    lapack_complex_double* a, lapack_int* lda,
19340                    lapack_complex_double* b, lapack_int* ldb, double* w,
19341                    lapack_complex_double* work, lapack_int* lwork,
19342                    double* rwork, lapack_int *info );
19343
19344 //LAPACK 3.8.0
19345
19346 void LAPACK_ssysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19347                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19348                                    lapack_int* ipiv, lapack_int* ipiv2, float* b, lapack_int* ldb,
19349                    float* work, lapack_int* lwork, lapack_int *info );
19350 void LAPACK_dsysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
19351                    lapack_int* lda, double* tb, lapack_int* ltb,
19352                    lapack_int* ipiv, lapack_int* ipiv2, double* b,
19353                    lapack_int* ldb, double* work, lapack_int* lwork,
19354                    lapack_int *info );
19355 void LAPACK_csysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19356                    lapack_complex_float* a, lapack_int* lda,
19357                    lapack_complex_float* tb, lapack_int* ltb,
19358                    lapack_int* ipiv, lapack_int* ipiv2,
19359                    lapack_complex_float* b, lapack_int* ldb,
19360                    lapack_complex_float* work, lapack_int* lwork,
19361                    lapack_int *info );
19362 void LAPACK_zsysv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19363                    lapack_complex_double* a, lapack_int* lda,
19364                    lapack_complex_double* tb, lapack_int* ltb,
19365                    lapack_int* ipiv, lapack_int* ipiv2,
19366                    lapack_complex_double* b, lapack_int* ldb,
19367                    lapack_complex_double* work, lapack_int* lwork,
19368                    lapack_int *info );
19369 void LAPACK_chesv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19370                    lapack_complex_float* a, lapack_int* lda,
19371                    lapack_complex_float* tb, lapack_int* ltb,
19372                    lapack_int* ipiv, lapack_int* ipiv2,
19373                    lapack_complex_float* b, lapack_int* ldb,
19374                    lapack_complex_float* work, lapack_int* lwork,
19375                    lapack_int *info );
19376 void LAPACK_zhesv_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19377                    lapack_complex_double* a, lapack_int* lda,
19378                    lapack_complex_double* tb, lapack_int* ltb,
19379                    lapack_int* ipiv, lapack_int* ipiv2,
19380                    lapack_complex_double* b, lapack_int* ldb,
19381                    lapack_complex_double* work, lapack_int* lwork,
19382                    lapack_int *info );
19383
19384 void LAPACK_ssytrf_aa_2stage( char* uplo, lapack_int* n,
19385                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19386                                    lapack_int* ipiv, lapack_int* ipiv2,
19387                    float* work, lapack_int* lwork, lapack_int *info );
19388 void LAPACK_dsytrf_aa_2stage( char* uplo, lapack_int* n, double* a,
19389                    lapack_int* lda, double* tb, lapack_int* ltb,
19390                    lapack_int* ipiv, lapack_int* ipiv2,
19391                    double* work, lapack_int* lwork,
19392                    lapack_int *info );
19393 void LAPACK_csytrf_aa_2stage( char* uplo, lapack_int* n,
19394                    lapack_complex_float* a, lapack_int* lda,
19395                    lapack_complex_float* tb, lapack_int* ltb,
19396                    lapack_int* ipiv, lapack_int* ipiv2,
19397                    lapack_complex_float* work, lapack_int* lwork,
19398                    lapack_int *info );
19399 void LAPACK_zsytrf_aa_2stage( char* uplo, lapack_int* n,
19400                    lapack_complex_double* a, lapack_int* lda,
19401                    lapack_complex_double* tb, lapack_int* ltb,
19402                    lapack_int* ipiv, lapack_int* ipiv2,
19403                    lapack_complex_double* work, lapack_int* lwork,
19404                    lapack_int *info );
19405 void LAPACK_chetrf_aa_2stage( char* uplo, lapack_int* n,
19406                    lapack_complex_float* a, lapack_int* lda,
19407                    lapack_complex_float* tb, lapack_int* ltb,
19408                    lapack_int* ipiv, lapack_int* ipiv2,
19409                    lapack_complex_float* work, lapack_int* lwork,
19410                    lapack_int *info );
19411 void LAPACK_zhetrf_aa_2stage( char* uplo, lapack_int* n,
19412                    lapack_complex_double* a, lapack_int* lda,
19413                    lapack_complex_double* tb, lapack_int* ltb,
19414                    lapack_int* ipiv, lapack_int* ipiv2,
19415                    lapack_complex_double* work, lapack_int* lwork,
19416                    lapack_int *info );
19417
19418 void LAPACK_ssytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19419                                    float* a, lapack_int* lda, float* tb, lapack_int* ltb,
19420                                    lapack_int* ipiv, lapack_int* ipiv2, float* b, lapack_int* ldb,
19421                 lapack_int *info );
19422 void LAPACK_dsytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs, double* a,
19423                    lapack_int* lda, double* tb, lapack_int* ltb,
19424                    lapack_int* ipiv, lapack_int* ipiv2, double* b,
19425                    lapack_int* ldb, lapack_int *info );
19426 void LAPACK_csytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19427                    lapack_complex_float* a, lapack_int* lda,
19428                    lapack_complex_float* tb, lapack_int* ltb,
19429                    lapack_int* ipiv, lapack_int* ipiv2,
19430                    lapack_complex_float* b, lapack_int* ldb,
19431                    lapack_int *info );
19432 void LAPACK_zsytrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19433                    lapack_complex_double* a, lapack_int* lda,
19434                    lapack_complex_double* tb, lapack_int* ltb,
19435                    lapack_int* ipiv, lapack_int* ipiv2,
19436                    lapack_complex_double* b, lapack_int* ldb,
19437                    lapack_int *info );
19438 void LAPACK_chetrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19439                    lapack_complex_float* a, lapack_int* lda,
19440                    lapack_complex_float* tb, lapack_int* ltb,
19441                    lapack_int* ipiv, lapack_int* ipiv2,
19442                    lapack_complex_float* b, lapack_int* ldb,
19443                    lapack_int *info );
19444 void LAPACK_zhetrs_aa_2stage( char* uplo, lapack_int* n, lapack_int* nrhs,
19445                    lapack_complex_double* a, lapack_int* lda,
19446                    lapack_complex_double* tb, lapack_int* ltb,
19447                    lapack_int* ipiv, lapack_int* ipiv2,
19448                    lapack_complex_double* b, lapack_int* ldb,
19449                    lapack_int *info );
19450
19451 /* APIs for set/get nancheck flags */
19452 void LAPACKE_set_nancheck( int flag );
19453 int LAPACKE_get_nancheck( );
19454
19455 #ifdef __cplusplus
19456 }
19457 #endif /* __cplusplus */
19458
19459 #endif /* _LAPACKE_H_ */